zebra/redistribute.c

   1 /* Redistribution Handler
   2  * Copyright (C) 1998 Kunihiro Ishiguro
   3  *
   4  * This file is part of GNU Zebra.
   5  *
   6  * GNU Zebra is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License as published by the
   8  * Free Software Foundation; either version 2, or (at your option) any
   9  * later version.
  10  *
  11  * GNU Zebra is distributed in the hope that it will be useful, but
  12  * WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with this program; see the file COPYING; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #include <zebra.h>
  22
  23 #include "vector.h"
  24 #include "vty.h"
  25 #include "command.h"
  26 #include "prefix.h"
  27 #include "table.h"
  28 #include "stream.h"
  29 #include "zclient.h"
  30 #include "linklist.h"
  31 #include "log.h"
  32 #include "vrf.h"
  33 #include "srcdest_table.h"
  34
  35 #include "zebra/rib.h"
  36 #include "zebra/zebra_router.h"
  37 #include "zebra/zebra_ns.h"
  38 #include "zebra/zebra_vrf.h"
  39 #include "zebra/zebra_routemap.h"
  40 #include "zebra/redistribute.h"
  41 #include "zebra/debug.h"
  42 #include "zebra/router-id.h"
  43 #include "zebra/zapi_msg.h"
  44 #include "zebra/zebra_vxlan.h"
  45 #include "zebra/zebra_errors.h"
  46
  47 #define ZEBRA_PTM_SUPPORT
  48
  49 /* array holding redistribute info about table redistribution */
  50 /* bit AFI is set if that AFI is redistributing routes from this table */
  51 static int zebra_import_table_used[AFI_MAX][ZEBRA_KERNEL_TABLE_MAX];
  52 static uint32_t zebra_import_table_distance[AFI_MAX][ZEBRA_KERNEL_TABLE_MAX];
  53
  54 int is_zebra_import_table_enabled(afi_t afi, vrf_id_t vrf_id, uint32_t table_id)
  55 {
  56         /*
  57          * Make sure that what we are called with actualy makes sense
  58          */
  59         if (afi == AFI_MAX)
  60                 return 0;
  61
  62         if (is_zebra_valid_kernel_table(table_id) &&
  63             table_id < ZEBRA_KERNEL_TABLE_MAX)
  64                 return zebra_import_table_used[afi][table_id];
  65         return 0;
  66 }
  67
  68 static void zebra_redistribute_default(struct zserv *client, vrf_id_t vrf_id)
  69 {
  70         int afi;
  71         struct prefix p;
  72         struct route_table *table;
  73         struct route_node *rn;
  74         struct route_entry *newre;
  75
  76         for (afi = AFI_IP; afi <= AFI_IP6; afi++) {
  77
  78                 if (!vrf_bitmap_check(client->redist_default[afi], vrf_id))
  79                         continue;
  80
  81                 /* Lookup table.  */
  82                 table = zebra_vrf_table(afi, SAFI_UNICAST, vrf_id);
  83                 if (!table)
  84                         continue;
  85
  86                 /* Lookup default route. */
  87                 memset(&p, 0, sizeof(p));
  88                 p.family = afi2family(afi);
  89                 rn = route_node_lookup(table, &p);
  90                 if (!rn)
  91                         continue;
  92
  93                 RNODE_FOREACH_RE (rn, newre) {
  94                         if (CHECK_FLAG(newre->flags, ZEBRA_FLAG_SELECTED)
  95                             && newre->distance != DISTANCE_INFINITY)
  96                                 zsend_redistribute_route(
  97                                         ZEBRA_REDISTRIBUTE_ROUTE_ADD, client,
  98                                         &rn->p, NULL, newre);
  99                 }
 100
 101                 route_unlock_node(rn);
 102         }
 103 }
 104
 105 /* Redistribute routes. */
 106 static void zebra_redistribute(struct zserv *client, int type,
 107                                unsigned short instance, vrf_id_t vrf_id,
 108                                int afi)
 109 {
 110         struct route_entry *newre;
 111         struct route_table *table;
 112         struct route_node *rn;
 113
 114         table = zebra_vrf_table(afi, SAFI_UNICAST, vrf_id);
 115         if (!table)
 116                 return;
 117
 118         for (rn = route_top(table); rn; rn = srcdest_route_next(rn))
 119                 RNODE_FOREACH_RE (rn, newre) {
 120                         const struct prefix *dst_p, *src_p;
 121
 122                         srcdest_rnode_prefixes(rn, &dst_p, &src_p);
 123
 124                         if (IS_ZEBRA_DEBUG_RIB)
 125                                 zlog_debug(
 126                                         "%s: client %s %pFX(%u) checking: selected=%d, type=%d, distance=%d, metric=%d zebra_check_addr=%d",
 127                                         __func__,
 128                                         zebra_route_string(client->proto),
 129                                         dst_p, vrf_id,
 130                                         CHECK_FLAG(newre->flags,
 131                                                    ZEBRA_FLAG_SELECTED),
 132                                         newre->type, newre->distance,
 133                                         newre->metric, zebra_check_addr(dst_p));
 134
 135                         if (!CHECK_FLAG(newre->flags, ZEBRA_FLAG_SELECTED))
 136                                 continue;
 137                         if ((type != ZEBRA_ROUTE_ALL
 138                              && (newre->type != type
 139                                  || newre->instance != instance)))
 140                                 continue;
 141                         if (newre->distance == DISTANCE_INFINITY)
 142                                 continue;
 143                         if (!zebra_check_addr(dst_p))
 144                                 continue;
 145
 146                         zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_ADD,
 147                                                  client, dst_p, src_p, newre);
 148                 }
 149 }
 150
 151 /*
 152  * Function to check if prefix is candidate for
 153  * redistribute.
 154  */
 155 static bool zebra_redistribute_check(const struct route_entry *re,
 156                                      struct zserv *client,
 157                                      const struct prefix *p, int afi)
 158 {
 159         /* Process only if there is valid re */
 160         if (!re)
 161                 return false;
 162
 163         /* If default route and redistributed */
 164         if (is_default_prefix(p)
 165             && vrf_bitmap_check(client->redist_default[afi], re->vrf_id))
 166                 return true;
 167
 168         /* If redistribute in enabled for zebra route all */
 169         if (vrf_bitmap_check(client->redist[afi][ZEBRA_ROUTE_ALL], re->vrf_id))
 170                 return true;
 171
 172         /*
 173          * If multi-instance then check for route
 174          * redistribution for given instance.
 175          */
 176         if (re->instance
 177             && redist_check_instance(&client->mi_redist[afi][re->type],
 178                                      re->instance))
 179                 return true;
 180
 181         /* If redistribution is enabled for give route type. */
 182         if (vrf_bitmap_check(client->redist[afi][re->type], re->vrf_id))
 183                 return true;
 184
 185         return false;
 186 }
 187
 188 /* Either advertise a route for redistribution to registered clients or */
 189 /* withdraw redistribution if add cannot be done for client */
 190 void redistribute_update(const struct prefix *p, const struct prefix *src_p,
 191                          const struct route_entry *re,
 192                          const struct route_entry *prev_re)
 193 {
 194         struct listnode *node, *nnode;
 195         struct zserv *client;
 196         int afi;
 197
 198         if (IS_ZEBRA_DEBUG_RIB)
 199                 zlog_debug(
 200                         "(%u:%u):%pFX: Redist update re %p (%s), old %p (%s)",
 201                         re->vrf_id, re->table, p, re,
 202                         zebra_route_string(re->type), prev_re,
 203                         prev_re ? zebra_route_string(prev_re->type) : "None");
 204
 205         afi = family2afi(p->family);
 206         if (!afi) {
 207                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 208                           "%s: Unknown AFI/SAFI prefix received", __func__);
 209                 return;
 210         }
 211         if (!zebra_check_addr(p)) {
 212                 if (IS_ZEBRA_DEBUG_RIB)
 213                         zlog_debug("Redist update filter prefix %pFX", p);
 214                 return;
 215         }
 216
 217
 218         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 219                 if (zebra_redistribute_check(re, client, p, afi)) {
 220                         if (IS_ZEBRA_DEBUG_RIB) {
 221                                 zlog_debug(
 222                                         "%s: client %s %pFX(%u:%u), type=%d, distance=%d, metric=%d",
 223                                         __func__,
 224                                         zebra_route_string(client->proto), p,
 225                                         re->vrf_id, re->table, re->type,
 226                                         re->distance, re->metric);
 227                         }
 228                         zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_ADD,
 229                                                  client, p, src_p, re);
 230                 } else if (zebra_redistribute_check(prev_re, client, p, afi))
 231                         zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_DEL,
 232                                                  client, p, src_p, prev_re);
 233         }
 234 }
 235
 236 /*
 237  * During a route delete, where 'new_re' is NULL, redist a delete to all
 238  * clients registered for the type of 'old_re'.
 239  * During a route update, redist a delete to any clients who will not see
 240  * an update when the new route is installed. There are cases when a client
 241  * may have seen a redist for 'old_re', but will not see
 242  * the redist for 'new_re'.
 243  */
 244 void redistribute_delete(const struct prefix *p, const struct prefix *src_p,
 245                          const struct route_entry *old_re,
 246                          const struct route_entry *new_re)
 247 {
 248         struct listnode *node, *nnode;
 249         struct zserv *client;
 250         int afi;
 251         vrf_id_t vrfid;
 252
 253         if (old_re)
 254                 vrfid = old_re->vrf_id;
 255         else if (new_re)
 256                 vrfid = new_re->vrf_id;
 257         else
 258                 return;
 259
 260         if (IS_ZEBRA_DEBUG_RIB) {
 261                 zlog_debug("%u:%pFX: Redist del: re %p (%s), new re %p (%s)",
 262                            vrfid, p, old_re,
 263                            old_re ? zebra_route_string(old_re->type) : "None",
 264                            new_re,
 265                            new_re ? zebra_route_string(new_re->type) : "None");
 266         }
 267
 268         /* Add DISTANCE_INFINITY check. */
 269         if (old_re && (old_re->distance == DISTANCE_INFINITY)) {
 270                 if (IS_ZEBRA_DEBUG_RIB)
 271                         zlog_debug("        Skipping due to Infinite Distance");
 272                 return;
 273         }
 274
 275         afi = family2afi(p->family);
 276         if (!afi) {
 277                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 278                           "%s: Unknown AFI/SAFI prefix received",
 279                           __func__);
 280                 return;
 281         }
 282
 283         /* Skip invalid (e.g. linklocal) prefix */
 284         if (!zebra_check_addr(p)) {
 285                 if (IS_ZEBRA_DEBUG_RIB) {
 286                         zlog_debug(
 287                                 "%u:%pFX: Redist del old: skipping invalid prefix",
 288                                 vrfid, p);
 289                 }
 290                 return;
 291         }
 292
 293         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 294                 /* Do not send unsolicited messages to synchronous clients. */
 295                 if (client->synchronous)
 296                         continue;
 297                 /*
 298                  * Skip this client if it will receive an update for the
 299                  * 'new' re
 300                  */
 301                 if (zebra_redistribute_check(new_re, client, p, afi))
 302                         continue;
 303
 304                 /* Send a delete for the 'old' re to any subscribed client. */
 305                 if (zebra_redistribute_check(old_re, client, p, afi))
 306                         zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_DEL,
 307                                                  client, p, src_p, old_re);
 308         }
 309 }
 310
 311
 312 void zebra_redistribute_add(ZAPI_HANDLER_ARGS)
 313 {
 314         afi_t afi = 0;
 315         int type = 0;
 316         unsigned short instance;
 317
 318         STREAM_GETC(msg, afi);
 319         STREAM_GETC(msg, type);
 320         STREAM_GETW(msg, instance);
 321
 322         if (IS_ZEBRA_DEBUG_EVENT)
 323                 zlog_debug(
 324                         "%s: client proto %s afi=%d, wants %s, vrf %s(%u), instance=%d",
 325                         __func__, zebra_route_string(client->proto), afi,
 326                         zebra_route_string(type), VRF_LOGNAME(zvrf->vrf),
 327                         zvrf_id(zvrf), instance);
 328
 329         if (afi == 0 || afi >= AFI_MAX) {
 330                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 331                           "%s: Specified afi %d does not exist", __func__, afi);
 332                 return;
 333         }
 334
 335         if (type == 0 || type >= ZEBRA_ROUTE_MAX) {
 336                 zlog_debug("%s: Specified Route Type %d does not exist",
 337                            __func__, type);
 338                 return;
 339         }
 340
 341         if (instance) {
 342                 if (!redist_check_instance(&client->mi_redist[afi][type],
 343                                            instance)) {
 344                         redist_add_instance(&client->mi_redist[afi][type],
 345                                             instance);
 346                         zebra_redistribute(client, type, instance,
 347                                            zvrf_id(zvrf), afi);
 348                 }
 349         } else {
 350                 if (IS_ZEBRA_DEBUG_EVENT)
 351                         zlog_debug("%s: setting vrf %s(%u) redist bitmap",
 352                                    __func__, VRF_LOGNAME(zvrf->vrf),
 353                                    zvrf_id(zvrf));
 354                 vrf_bitmap_set(client->redist[afi][type], zvrf_id(zvrf));
 355                 zebra_redistribute(client, type, 0, zvrf_id(zvrf), afi);
 356         }
 357
 358 stream_failure:
 359         return;
 360 }
 361
 362 void zebra_redistribute_delete(ZAPI_HANDLER_ARGS)
 363 {
 364         afi_t afi = 0;
 365         int type = 0;
 366         unsigned short instance;
 367
 368         STREAM_GETC(msg, afi);
 369         STREAM_GETC(msg, type);
 370         STREAM_GETW(msg, instance);
 371
 372         if (afi == 0 || afi >= AFI_MAX) {
 373                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 374                           "%s: Specified afi %d does not exist", __func__, afi);
 375                 return;
 376         }
 377
 378         if (type == 0 || type >= ZEBRA_ROUTE_MAX) {
 379                 zlog_debug("%s: Specified Route Type %d does not exist",
 380                            __func__, type);
 381                 return;
 382         }
 383
 384         /*
 385          * NOTE: no need to withdraw the previously advertised routes. The
 386          * clients
 387          * themselves should keep track of the received routes from zebra and
 388          * withdraw them when necessary.
 389          */
 390         if (instance)
 391                 redist_del_instance(&client->mi_redist[afi][type], instance);
 392         else
 393                 vrf_bitmap_unset(client->redist[afi][type], zvrf_id(zvrf));
 394
 395 stream_failure:
 396         return;
 397 }
 398
 399 void zebra_redistribute_default_add(ZAPI_HANDLER_ARGS)
 400 {
 401         afi_t afi = 0;
 402
 403         STREAM_GETC(msg, afi);
 404
 405         if (afi == 0 || afi >= AFI_MAX) {
 406                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 407                           "%s: Specified afi %u does not exist", __func__, afi);
 408                 return;
 409         }
 410
 411         vrf_bitmap_set(client->redist_default[afi], zvrf_id(zvrf));
 412         zebra_redistribute_default(client, zvrf_id(zvrf));
 413
 414 stream_failure:
 415         return;
 416 }
 417
 418 void zebra_redistribute_default_delete(ZAPI_HANDLER_ARGS)
 419 {
 420         afi_t afi = 0;
 421
 422         STREAM_GETC(msg, afi);
 423
 424         if (afi == 0 || afi >= AFI_MAX) {
 425                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 426                           "%s: Specified afi %u does not exist", __func__, afi);
 427                 return;
 428         }
 429
 430         vrf_bitmap_unset(client->redist_default[afi], zvrf_id(zvrf));
 431
 432 stream_failure:
 433         return;
 434 }
 435
 436 /* Interface up information. */
 437 void zebra_interface_up_update(struct interface *ifp)
 438 {
 439         struct listnode *node, *nnode;
 440         struct zserv *client;
 441
 442         if (IS_ZEBRA_DEBUG_EVENT)
 443                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_UP %s(%u)",
 444                            ifp->name, ifp->vrf_id);
 445
 446         if (ifp->ptm_status || !ifp->ptm_enable) {
 447                 for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode,
 448                                        client)) {
 449                         /* Do not send unsolicited messages to synchronous
 450                          * clients.
 451                          */
 452                         if (client->synchronous)
 453                                 continue;
 454
 455                         zsend_interface_update(ZEBRA_INTERFACE_UP,
 456                                                client, ifp);
 457                         zsend_interface_link_params(client, ifp);
 458                 }
 459         }
 460 }
 461
 462 /* Interface down information. */
 463 void zebra_interface_down_update(struct interface *ifp)
 464 {
 465         struct listnode *node, *nnode;
 466         struct zserv *client;
 467
 468         if (IS_ZEBRA_DEBUG_EVENT)
 469                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DOWN %s(%u)",
 470                            ifp->name, ifp->vrf_id);
 471
 472         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 473                 /* Do not send unsolicited messages to synchronous clients. */
 474                 if (client->synchronous)
 475                         continue;
 476
 477                 zsend_interface_update(ZEBRA_INTERFACE_DOWN, client, ifp);
 478         }
 479 }
 480
 481 /* Interface information update. */
 482 void zebra_interface_add_update(struct interface *ifp)
 483 {
 484         struct listnode *node, *nnode;
 485         struct zserv *client;
 486
 487         if (IS_ZEBRA_DEBUG_EVENT)
 488                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_ADD %s(%u)", ifp->name,
 489                            ifp->vrf_id);
 490
 491         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 492                 /* Do not send unsolicited messages to synchronous clients. */
 493                 if (client->synchronous)
 494                         continue;
 495
 496                 client->ifadd_cnt++;
 497                 zsend_interface_add(client, ifp);
 498                 zsend_interface_link_params(client, ifp);
 499         }
 500 }
 501
 502 void zebra_interface_delete_update(struct interface *ifp)
 503 {
 504         struct listnode *node, *nnode;
 505         struct zserv *client;
 506
 507         if (IS_ZEBRA_DEBUG_EVENT)
 508                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DELETE %s(%u)",
 509                            ifp->name, ifp->vrf_id);
 510
 511         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 512                 /* Do not send unsolicited messages to synchronous clients. */
 513                 if (client->synchronous)
 514                         continue;
 515
 516                 client->ifdel_cnt++;
 517                 zsend_interface_delete(client, ifp);
 518         }
 519 }
 520
 521 /* Interface address addition. */
 522 void zebra_interface_address_add_update(struct interface *ifp,
 523                                         struct connected *ifc)
 524 {
 525         struct listnode *node, *nnode;
 526         struct zserv *client;
 527         struct prefix *p;
 528
 529         if (IS_ZEBRA_DEBUG_EVENT) {
 530                 p = ifc->address;
 531                 zlog_debug(
 532                         "MESSAGE: ZEBRA_INTERFACE_ADDRESS_ADD %pFX on %s(%u)",
 533                         p, ifp->name, ifp->vrf_id);
 534         }
 535
 536         if (!CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL))
 537                 flog_warn(
 538                         EC_ZEBRA_ADVERTISING_UNUSABLE_ADDR,
 539                         "advertising address to clients that is not yet usable.");
 540
 541         zebra_vxlan_add_del_gw_macip(ifp, ifc->address, 1);
 542
 543         router_id_add_address(ifc);
 544
 545         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 546                 /* Do not send unsolicited messages to synchronous clients. */
 547                 if (client->synchronous)
 548                         continue;
 549
 550                 if (CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL)) {
 551                         client->connected_rt_add_cnt++;
 552                         zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_ADD,
 553                                                 client, ifp, ifc);
 554                 }
 555         }
 556 }
 557
 558 /* Interface address deletion. */
 559 void zebra_interface_address_delete_update(struct interface *ifp,
 560                                            struct connected *ifc)
 561 {
 562         struct listnode *node, *nnode;
 563         struct zserv *client;
 564         struct prefix *p;
 565
 566         if (IS_ZEBRA_DEBUG_EVENT) {
 567                 p = ifc->address;
 568                 zlog_debug(
 569                         "MESSAGE: ZEBRA_INTERFACE_ADDRESS_DELETE %pFX on %s(%u)",
 570                         p, ifp->name, ifp->vrf_id);
 571         }
 572
 573         zebra_vxlan_add_del_gw_macip(ifp, ifc->address, 0);
 574
 575         router_id_del_address(ifc);
 576
 577         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 578                 /* Do not send unsolicited messages to synchronous clients. */
 579                 if (client->synchronous)
 580                         continue;
 581
 582                 if (CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL)) {
 583                         client->connected_rt_del_cnt++;
 584                         zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_DELETE,
 585                                                 client, ifp, ifc);
 586                 }
 587         }
 588 }
 589
 590 /* Interface VRF change. May need to delete from clients not interested in
 591  * the new VRF. Note that this function is invoked *prior* to the VRF change.
 592  */
 593 void zebra_interface_vrf_update_del(struct interface *ifp, vrf_id_t new_vrf_id)
 594 {
 595         struct listnode *node, *nnode;
 596         struct zserv *client;
 597
 598         if (IS_ZEBRA_DEBUG_EVENT)
 599                 zlog_debug(
 600                         "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/DEL %s VRF Id %u -> %u",
 601                         ifp->name, ifp->vrf_id, new_vrf_id);
 602
 603         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 604                 /* Do not send unsolicited messages to synchronous clients. */
 605                 if (client->synchronous)
 606                         continue;
 607
 608                 /* Need to delete if the client is not interested in the new
 609                  * VRF. */
 610                 zsend_interface_update(ZEBRA_INTERFACE_DOWN, client, ifp);
 611                 client->ifdel_cnt++;
 612                 zsend_interface_delete(client, ifp);
 613                 zsend_interface_vrf_update(client, ifp, new_vrf_id);
 614         }
 615 }
 616
 617 /* Interface VRF change. This function is invoked *post* VRF change and sends an
 618  * add to clients who are interested in the new VRF but not in the old VRF.
 619  */
 620 void zebra_interface_vrf_update_add(struct interface *ifp, vrf_id_t old_vrf_id)
 621 {
 622         struct listnode *node, *nnode;
 623         struct zserv *client;
 624
 625         if (IS_ZEBRA_DEBUG_EVENT)
 626                 zlog_debug(
 627                         "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/ADD %s VRF Id %u -> %u",
 628                         ifp->name, old_vrf_id, ifp->vrf_id);
 629
 630         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 631                 /* Do not send unsolicited messages to synchronous clients. */
 632                 if (client->synchronous)
 633                         continue;
 634
 635                 /* Need to add if the client is interested in the new VRF. */
 636                 client->ifadd_cnt++;
 637                 zsend_interface_add(client, ifp);
 638                 zsend_interface_addresses(client, ifp);
 639         }
 640 }
 641
 642 int zebra_add_import_table_entry(struct zebra_vrf *zvrf, struct route_node *rn,
 643                                  struct route_entry *re, const char *rmap_name)
 644 {
 645         struct route_entry *newre;
 646         struct route_entry *same;
 647         struct prefix p;
 648         struct nexthop_group *ng;
 649         route_map_result_t ret = RMAP_PERMITMATCH;
 650         afi_t afi;
 651
 652         afi = family2afi(rn->p.family);
 653         if (rmap_name)
 654                 ret = zebra_import_table_route_map_check(
 655                         afi, re->type, re->instance, &rn->p,
 656                         re->nhe->nhg.nexthop,
 657                         zvrf->vrf->vrf_id, re->tag, rmap_name);
 658
 659         if (ret != RMAP_PERMITMATCH) {
 660                 UNSET_FLAG(re->flags, ZEBRA_FLAG_SELECTED);
 661                 zebra_del_import_table_entry(zvrf, rn, re);
 662                 return 0;
 663         }
 664
 665         prefix_copy(&p, &rn->p);
 666
 667         RNODE_FOREACH_RE (rn, same) {
 668                 if (CHECK_FLAG(same->status, ROUTE_ENTRY_REMOVED))
 669                         continue;
 670
 671                 if (same->type == re->type && same->instance == re->instance
 672                     && same->table == re->table
 673                     && same->type != ZEBRA_ROUTE_CONNECT)
 674                         break;
 675         }
 676
 677         if (same) {
 678                 UNSET_FLAG(same->flags, ZEBRA_FLAG_SELECTED);
 679                 zebra_del_import_table_entry(zvrf, rn, same);
 680         }
 681
 682         newre = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
 683         newre->type = ZEBRA_ROUTE_TABLE;
 684         newre->distance = zebra_import_table_distance[afi][re->table];
 685         newre->flags = re->flags;
 686         newre->metric = re->metric;
 687         newre->mtu = re->mtu;
 688         newre->table = zvrf->table_id;
 689         newre->uptime = monotime(NULL);
 690         newre->instance = re->table;
 691
 692         ng = nexthop_group_new();
 693         copy_nexthops(&ng->nexthop, re->nhe->nhg.nexthop, NULL);
 694
 695         rib_add_multipath(afi, SAFI_UNICAST, &p, NULL, newre, ng);
 696
 697         return 0;
 698 }
 699
 700 int zebra_del_import_table_entry(struct zebra_vrf *zvrf, struct route_node *rn,
 701                                  struct route_entry *re)
 702 {
 703         struct prefix p;
 704         afi_t afi;
 705
 706         afi = family2afi(rn->p.family);
 707         prefix_copy(&p, &rn->p);
 708
 709         rib_delete(afi, SAFI_UNICAST, zvrf->vrf->vrf_id, ZEBRA_ROUTE_TABLE,
 710                    re->table, re->flags, &p, NULL, re->nhe->nhg.nexthop,
 711                    re->nhe_id, zvrf->table_id, re->metric, re->distance,
 712                    false);
 713
 714         return 0;
 715 }
 716
 717 /* Assuming no one calls this with the main routing table */
 718 int zebra_import_table(afi_t afi, vrf_id_t vrf_id, uint32_t table_id,
 719                        uint32_t distance, const char *rmap_name, int add)
 720 {
 721         struct route_table *table;
 722         struct route_entry *re;
 723         struct route_node *rn;
 724         struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(vrf_id);
 725
 726         if (!is_zebra_valid_kernel_table(table_id)
 727             || (table_id == RT_TABLE_MAIN))
 728                 return -1;
 729
 730         if (afi >= AFI_MAX)
 731                 return -1;
 732
 733         table = zebra_vrf_get_table_with_table_id(afi, SAFI_UNICAST, vrf_id,
 734                                                   table_id);
 735         if (table == NULL) {
 736                 return 0;
 737         } else if (IS_ZEBRA_DEBUG_RIB) {
 738                 zlog_debug("%s routes from table %d",
 739                            add ? "Importing" : "Unimporting", table_id);
 740         }
 741
 742         if (add) {
 743                 if (rmap_name)
 744                         zebra_add_import_table_route_map(afi, rmap_name,
 745                                                          table_id);
 746                 else {
 747                         rmap_name =
 748                                 zebra_get_import_table_route_map(afi, table_id);
 749                         if (rmap_name) {
 750                                 zebra_del_import_table_route_map(afi, table_id);
 751                                 rmap_name = NULL;
 752                         }
 753                 }
 754
 755                 zebra_import_table_used[afi][table_id] = 1;
 756                 zebra_import_table_distance[afi][table_id] = distance;
 757         } else {
 758                 zebra_import_table_used[afi][table_id] = 0;
 759                 zebra_import_table_distance[afi][table_id] =
 760                         ZEBRA_TABLE_DISTANCE_DEFAULT;
 761
 762                 rmap_name = zebra_get_import_table_route_map(afi, table_id);
 763                 if (rmap_name) {
 764                         zebra_del_import_table_route_map(afi, table_id);
 765                         rmap_name = NULL;
 766                 }
 767         }
 768
 769         for (rn = route_top(table); rn; rn = route_next(rn)) {
 770                 /* For each entry in the non-default routing table,
 771                  * add the entry in the main table
 772                  */
 773                 if (!rn->info)
 774                         continue;
 775
 776                 RNODE_FOREACH_RE (rn, re) {
 777                         if (CHECK_FLAG(re->status, ROUTE_ENTRY_REMOVED))
 778                                 continue;
 779                         break;
 780                 }
 781
 782                 if (!re)
 783                         continue;
 784
 785                 if (((afi == AFI_IP) && (rn->p.family == AF_INET))
 786                     || ((afi == AFI_IP6) && (rn->p.family == AF_INET6))) {
 787                         if (add)
 788                                 zebra_add_import_table_entry(zvrf, rn, re,
 789                                                              rmap_name);
 790                         else
 791                                 zebra_del_import_table_entry(zvrf, rn, re);
 792                 }
 793         }
 794         return 0;
 795 }
 796
 797 int zebra_import_table_config(struct vty *vty, vrf_id_t vrf_id)
 798 {
 799         int i;
 800         afi_t afi;
 801         int write = 0;
 802         char afi_str[AFI_MAX][10] = {"", "ip", "ipv6", "ethernet"};
 803         const char *rmap_name;
 804
 805         for (afi = AFI_IP; afi < AFI_MAX; afi++) {
 806                 for (i = 1; i < ZEBRA_KERNEL_TABLE_MAX; i++) {
 807                         if (!is_zebra_import_table_enabled(afi, vrf_id, i))
 808                                 continue;
 809
 810                         if (zebra_import_table_distance[afi][i]
 811                             != ZEBRA_TABLE_DISTANCE_DEFAULT) {
 812                                 vty_out(vty, "%s import-table %d distance %d",
 813                                         afi_str[afi], i,
 814                                         zebra_import_table_distance[afi][i]);
 815                         } else {
 816                                 vty_out(vty, "%s import-table %d", afi_str[afi],
 817                                         i);
 818                         }
 819
 820                         rmap_name = zebra_get_import_table_route_map(afi, i);
 821                         if (rmap_name)
 822                                 vty_out(vty, " route-map %s", rmap_name);
 823
 824                         vty_out(vty, "\n");
 825                         write = 1;
 826                 }
 827         }
 828
 829         return write;
 830 }
 831
 832 static void zebra_import_table_rm_update_vrf_afi(struct zebra_vrf *zvrf,
 833                                                  afi_t afi, int table_id,
 834                                                  const char *rmap)
 835 {
 836         struct route_table *table;
 837         struct route_entry *re;
 838         struct route_node *rn;
 839         const char *rmap_name;
 840
 841         rmap_name = zebra_get_import_table_route_map(afi, table_id);
 842         if ((!rmap_name) || (strcmp(rmap_name, rmap) != 0))
 843                 return;
 844
 845         table = zebra_vrf_get_table_with_table_id(afi, SAFI_UNICAST,
 846                                                   zvrf->vrf->vrf_id, table_id);
 847         if (!table) {
 848                 if (IS_ZEBRA_DEBUG_RIB_DETAILED)
 849                         zlog_debug("%s: Table id=%d not found", __func__,
 850                                    table_id);
 851                 return;
 852         }
 853
 854         for (rn = route_top(table); rn; rn = route_next(rn)) {
 855                 /*
 856                  * For each entry in the non-default routing table,
 857                  * add the entry in the main table
 858                  */
 859                 if (!rn->info)
 860                         continue;
 861
 862                 RNODE_FOREACH_RE (rn, re) {
 863                         if (CHECK_FLAG(re->status, ROUTE_ENTRY_REMOVED))
 864                                 continue;
 865                         break;
 866                 }
 867
 868                 if (!re)
 869                         continue;
 870
 871                 if (((afi == AFI_IP) && (rn->p.family == AF_INET))
 872                     || ((afi == AFI_IP6) && (rn->p.family == AF_INET6)))
 873                         zebra_add_import_table_entry(zvrf, rn, re, rmap_name);
 874         }
 875
 876         return;
 877 }
 878
 879 static void zebra_import_table_rm_update_vrf(struct zebra_vrf *zvrf,
 880                                              const char *rmap)
 881 {
 882         afi_t afi;
 883         int i;
 884
 885         for (afi = AFI_IP; afi < AFI_MAX; afi++) {
 886                 for (i = 1; i < ZEBRA_KERNEL_TABLE_MAX; i++) {
 887                         if (!is_zebra_import_table_enabled(
 888                                     afi, zvrf->vrf->vrf_id, i))
 889                                 continue;
 890
 891                         zebra_import_table_rm_update_vrf_afi(zvrf, afi, i,
 892                                                              rmap);
 893                 }
 894         }
 895 }
 896
 897 void zebra_import_table_rm_update(const char *rmap)
 898 {
 899         struct vrf *vrf;
 900         struct zebra_vrf *zvrf;
 901
 902         RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name) {
 903                 zvrf = vrf->info;
 904
 905                 if (!zvrf)
 906                         continue;
 907
 908                 zebra_import_table_rm_update_vrf(zvrf, rmap);
 909         }
 910 }
 911
 912 /* Interface parameters update */
 913 void zebra_interface_parameters_update(struct interface *ifp)
 914 {
 915         struct listnode *node, *nnode;
 916         struct zserv *client;
 917
 918         if (IS_ZEBRA_DEBUG_EVENT)
 919                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_LINK_PARAMS %s(%u)",
 920                            ifp->name, ifp->vrf_id);
 921
 922         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 923                 /* Do not send unsolicited messages to synchronous clients. */
 924                 if (client->synchronous)
 925                         continue;
 926
 927                 zsend_interface_link_params(client, ifp);
 928         }
 929 }