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 (!vrf_bitmap_check(client->redist[afi][type],
 351                                       zvrf_id(zvrf))) {
 352                         if (IS_ZEBRA_DEBUG_EVENT)
 353                                 zlog_debug(
 354                                         "%s: setting vrf %s(%u) redist bitmap",
 355                                         __func__, VRF_LOGNAME(zvrf->vrf),
 356                                         zvrf_id(zvrf));
 357                         vrf_bitmap_set(client->redist[afi][type],
 358                                        zvrf_id(zvrf));
 359                         zebra_redistribute(client, type, 0, zvrf_id(zvrf), afi);
 360                 }
 361         }
 362
 363 stream_failure:
 364         return;
 365 }
 366
 367 void zebra_redistribute_delete(ZAPI_HANDLER_ARGS)
 368 {
 369         afi_t afi = 0;
 370         int type = 0;
 371         unsigned short instance;
 372
 373         STREAM_GETC(msg, afi);
 374         STREAM_GETC(msg, type);
 375         STREAM_GETW(msg, instance);
 376
 377         if (afi == 0 || afi >= AFI_MAX) {
 378                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 379                           "%s: Specified afi %d does not exist", __func__, afi);
 380                 return;
 381         }
 382
 383         if (type == 0 || type >= ZEBRA_ROUTE_MAX) {
 384                 zlog_debug("%s: Specified Route Type %d does not exist",
 385                            __func__, type);
 386                 return;
 387         }
 388
 389         /*
 390          * NOTE: no need to withdraw the previously advertised routes. The
 391          * clients
 392          * themselves should keep track of the received routes from zebra and
 393          * withdraw them when necessary.
 394          */
 395         if (instance)
 396                 redist_del_instance(&client->mi_redist[afi][type], instance);
 397         else
 398                 vrf_bitmap_unset(client->redist[afi][type], zvrf_id(zvrf));
 399
 400 stream_failure:
 401         return;
 402 }
 403
 404 void zebra_redistribute_default_add(ZAPI_HANDLER_ARGS)
 405 {
 406         afi_t afi = 0;
 407
 408         STREAM_GETC(msg, afi);
 409
 410         if (afi == 0 || afi >= AFI_MAX) {
 411                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 412                           "%s: Specified afi %u does not exist", __func__, afi);
 413                 return;
 414         }
 415
 416         vrf_bitmap_set(client->redist_default[afi], zvrf_id(zvrf));
 417         zebra_redistribute_default(client, zvrf_id(zvrf));
 418
 419 stream_failure:
 420         return;
 421 }
 422
 423 void zebra_redistribute_default_delete(ZAPI_HANDLER_ARGS)
 424 {
 425         afi_t afi = 0;
 426
 427         STREAM_GETC(msg, afi);
 428
 429         if (afi == 0 || afi >= AFI_MAX) {
 430                 flog_warn(EC_ZEBRA_REDISTRIBUTE_UNKNOWN_AF,
 431                           "%s: Specified afi %u does not exist", __func__, afi);
 432                 return;
 433         }
 434
 435         vrf_bitmap_unset(client->redist_default[afi], zvrf_id(zvrf));
 436
 437 stream_failure:
 438         return;
 439 }
 440
 441 /* Interface up information. */
 442 void zebra_interface_up_update(struct interface *ifp)
 443 {
 444         struct listnode *node, *nnode;
 445         struct zserv *client;
 446
 447         if (IS_ZEBRA_DEBUG_EVENT)
 448                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_UP %s(%u)",
 449                            ifp->name, ifp->vrf_id);
 450
 451         if (ifp->ptm_status || !ifp->ptm_enable) {
 452                 for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode,
 453                                        client)) {
 454                         /* Do not send unsolicited messages to synchronous
 455                          * clients.
 456                          */
 457                         if (client->synchronous)
 458                                 continue;
 459
 460                         zsend_interface_update(ZEBRA_INTERFACE_UP,
 461                                                client, ifp);
 462                         zsend_interface_link_params(client, ifp);
 463                 }
 464         }
 465 }
 466
 467 /* Interface down information. */
 468 void zebra_interface_down_update(struct interface *ifp)
 469 {
 470         struct listnode *node, *nnode;
 471         struct zserv *client;
 472
 473         if (IS_ZEBRA_DEBUG_EVENT)
 474                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DOWN %s(%u)",
 475                            ifp->name, ifp->vrf_id);
 476
 477         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 478                 /* Do not send unsolicited messages to synchronous clients. */
 479                 if (client->synchronous)
 480                         continue;
 481
 482                 zsend_interface_update(ZEBRA_INTERFACE_DOWN, client, ifp);
 483         }
 484 }
 485
 486 /* Interface information update. */
 487 void zebra_interface_add_update(struct interface *ifp)
 488 {
 489         struct listnode *node, *nnode;
 490         struct zserv *client;
 491
 492         if (IS_ZEBRA_DEBUG_EVENT)
 493                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_ADD %s(%u)", ifp->name,
 494                            ifp->vrf_id);
 495
 496         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 497                 /* Do not send unsolicited messages to synchronous clients. */
 498                 if (client->synchronous)
 499                         continue;
 500
 501                 client->ifadd_cnt++;
 502                 zsend_interface_add(client, ifp);
 503                 zsend_interface_link_params(client, ifp);
 504         }
 505 }
 506
 507 void zebra_interface_delete_update(struct interface *ifp)
 508 {
 509         struct listnode *node, *nnode;
 510         struct zserv *client;
 511
 512         if (IS_ZEBRA_DEBUG_EVENT)
 513                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DELETE %s(%u)",
 514                            ifp->name, ifp->vrf_id);
 515
 516         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 517                 /* Do not send unsolicited messages to synchronous clients. */
 518                 if (client->synchronous)
 519                         continue;
 520
 521                 client->ifdel_cnt++;
 522                 zsend_interface_delete(client, ifp);
 523         }
 524 }
 525
 526 /* Interface address addition. */
 527 void zebra_interface_address_add_update(struct interface *ifp,
 528                                         struct connected *ifc)
 529 {
 530         struct listnode *node, *nnode;
 531         struct zserv *client;
 532         struct prefix *p;
 533
 534         if (IS_ZEBRA_DEBUG_EVENT) {
 535                 p = ifc->address;
 536                 zlog_debug(
 537                         "MESSAGE: ZEBRA_INTERFACE_ADDRESS_ADD %pFX on %s(%u)",
 538                         p, ifp->name, ifp->vrf_id);
 539         }
 540
 541         if (!CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL))
 542                 flog_warn(
 543                         EC_ZEBRA_ADVERTISING_UNUSABLE_ADDR,
 544                         "advertising address to clients that is not yet usable.");
 545
 546         zebra_vxlan_add_del_gw_macip(ifp, ifc->address, 1);
 547
 548         router_id_add_address(ifc);
 549
 550         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 551                 /* Do not send unsolicited messages to synchronous clients. */
 552                 if (client->synchronous)
 553                         continue;
 554
 555                 if (CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL)) {
 556                         client->connected_rt_add_cnt++;
 557                         zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_ADD,
 558                                                 client, ifp, ifc);
 559                 }
 560         }
 561 }
 562
 563 /* Interface address deletion. */
 564 void zebra_interface_address_delete_update(struct interface *ifp,
 565                                            struct connected *ifc)
 566 {
 567         struct listnode *node, *nnode;
 568         struct zserv *client;
 569         struct prefix *p;
 570
 571         if (IS_ZEBRA_DEBUG_EVENT) {
 572                 p = ifc->address;
 573                 zlog_debug(
 574                         "MESSAGE: ZEBRA_INTERFACE_ADDRESS_DELETE %pFX on %s(%u)",
 575                         p, ifp->name, ifp->vrf_id);
 576         }
 577
 578         zebra_vxlan_add_del_gw_macip(ifp, ifc->address, 0);
 579
 580         router_id_del_address(ifc);
 581
 582         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 583                 /* Do not send unsolicited messages to synchronous clients. */
 584                 if (client->synchronous)
 585                         continue;
 586
 587                 if (CHECK_FLAG(ifc->conf, ZEBRA_IFC_REAL)) {
 588                         client->connected_rt_del_cnt++;
 589                         zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_DELETE,
 590                                                 client, ifp, ifc);
 591                 }
 592         }
 593 }
 594
 595 /* Interface VRF change. May need to delete from clients not interested in
 596  * the new VRF. Note that this function is invoked *prior* to the VRF change.
 597  */
 598 void zebra_interface_vrf_update_del(struct interface *ifp, vrf_id_t new_vrf_id)
 599 {
 600         struct listnode *node, *nnode;
 601         struct zserv *client;
 602
 603         if (IS_ZEBRA_DEBUG_EVENT)
 604                 zlog_debug(
 605                         "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/DEL %s VRF Id %u -> %u",
 606                         ifp->name, ifp->vrf_id, new_vrf_id);
 607
 608         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 609                 /* Do not send unsolicited messages to synchronous clients. */
 610                 if (client->synchronous)
 611                         continue;
 612
 613                 /* Need to delete if the client is not interested in the new
 614                  * VRF. */
 615                 zsend_interface_update(ZEBRA_INTERFACE_DOWN, client, ifp);
 616                 client->ifdel_cnt++;
 617                 zsend_interface_delete(client, ifp);
 618                 zsend_interface_vrf_update(client, ifp, new_vrf_id);
 619         }
 620 }
 621
 622 /* Interface VRF change. This function is invoked *post* VRF change and sends an
 623  * add to clients who are interested in the new VRF but not in the old VRF.
 624  */
 625 void zebra_interface_vrf_update_add(struct interface *ifp, vrf_id_t old_vrf_id)
 626 {
 627         struct listnode *node, *nnode;
 628         struct zserv *client;
 629
 630         if (IS_ZEBRA_DEBUG_EVENT)
 631                 zlog_debug(
 632                         "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/ADD %s VRF Id %u -> %u",
 633                         ifp->name, old_vrf_id, ifp->vrf_id);
 634
 635         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 636                 /* Do not send unsolicited messages to synchronous clients. */
 637                 if (client->synchronous)
 638                         continue;
 639
 640                 /* Need to add if the client is interested in the new VRF. */
 641                 client->ifadd_cnt++;
 642                 zsend_interface_add(client, ifp);
 643                 zsend_interface_addresses(client, ifp);
 644         }
 645 }
 646
 647 int zebra_add_import_table_entry(struct zebra_vrf *zvrf, struct route_node *rn,
 648                                  struct route_entry *re, const char *rmap_name)
 649 {
 650         struct route_entry *newre;
 651         struct route_entry *same;
 652         struct prefix p;
 653         struct nexthop_group *ng;
 654         route_map_result_t ret = RMAP_PERMITMATCH;
 655         afi_t afi;
 656
 657         afi = family2afi(rn->p.family);
 658         if (rmap_name)
 659                 ret = zebra_import_table_route_map_check(
 660                         afi, re->type, re->instance, &rn->p,
 661                         re->nhe->nhg.nexthop,
 662                         zvrf->vrf->vrf_id, re->tag, rmap_name);
 663
 664         if (ret != RMAP_PERMITMATCH) {
 665                 UNSET_FLAG(re->flags, ZEBRA_FLAG_SELECTED);
 666                 zebra_del_import_table_entry(zvrf, rn, re);
 667                 return 0;
 668         }
 669
 670         prefix_copy(&p, &rn->p);
 671
 672         RNODE_FOREACH_RE (rn, same) {
 673                 if (CHECK_FLAG(same->status, ROUTE_ENTRY_REMOVED))
 674                         continue;
 675
 676                 if (same->type == re->type && same->instance == re->instance
 677                     && same->table == re->table
 678                     && same->type != ZEBRA_ROUTE_CONNECT)
 679                         break;
 680         }
 681
 682         if (same) {
 683                 UNSET_FLAG(same->flags, ZEBRA_FLAG_SELECTED);
 684                 zebra_del_import_table_entry(zvrf, rn, same);
 685         }
 686
 687         newre = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
 688         newre->type = ZEBRA_ROUTE_TABLE;
 689         newre->distance = zebra_import_table_distance[afi][re->table];
 690         newre->flags = re->flags;
 691         newre->metric = re->metric;
 692         newre->mtu = re->mtu;
 693         newre->table = zvrf->table_id;
 694         newre->uptime = monotime(NULL);
 695         newre->instance = re->table;
 696
 697         ng = nexthop_group_new();
 698         copy_nexthops(&ng->nexthop, re->nhe->nhg.nexthop, NULL);
 699
 700         rib_add_multipath(afi, SAFI_UNICAST, &p, NULL, newre, ng);
 701
 702         return 0;
 703 }
 704
 705 int zebra_del_import_table_entry(struct zebra_vrf *zvrf, struct route_node *rn,
 706                                  struct route_entry *re)
 707 {
 708         struct prefix p;
 709         afi_t afi;
 710
 711         afi = family2afi(rn->p.family);
 712         prefix_copy(&p, &rn->p);
 713
 714         rib_delete(afi, SAFI_UNICAST, zvrf->vrf->vrf_id, ZEBRA_ROUTE_TABLE,
 715                    re->table, re->flags, &p, NULL, re->nhe->nhg.nexthop,
 716                    re->nhe_id, zvrf->table_id, re->metric, re->distance,
 717                    false);
 718
 719         return 0;
 720 }
 721
 722 /* Assuming no one calls this with the main routing table */
 723 int zebra_import_table(afi_t afi, vrf_id_t vrf_id, uint32_t table_id,
 724                        uint32_t distance, const char *rmap_name, int add)
 725 {
 726         struct route_table *table;
 727         struct route_entry *re;
 728         struct route_node *rn;
 729         struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(vrf_id);
 730
 731         if (!is_zebra_valid_kernel_table(table_id)
 732             || (table_id == RT_TABLE_MAIN))
 733                 return -1;
 734
 735         if (afi >= AFI_MAX)
 736                 return -1;
 737
 738         table = zebra_vrf_get_table_with_table_id(afi, SAFI_UNICAST, vrf_id,
 739                                                   table_id);
 740         if (table == NULL) {
 741                 return 0;
 742         } else if (IS_ZEBRA_DEBUG_RIB) {
 743                 zlog_debug("%s routes from table %d",
 744                            add ? "Importing" : "Unimporting", table_id);
 745         }
 746
 747         if (add) {
 748                 if (rmap_name)
 749                         zebra_add_import_table_route_map(afi, rmap_name,
 750                                                          table_id);
 751                 else {
 752                         rmap_name =
 753                                 zebra_get_import_table_route_map(afi, table_id);
 754                         if (rmap_name) {
 755                                 zebra_del_import_table_route_map(afi, table_id);
 756                                 rmap_name = NULL;
 757                         }
 758                 }
 759
 760                 zebra_import_table_used[afi][table_id] = 1;
 761                 zebra_import_table_distance[afi][table_id] = distance;
 762         } else {
 763                 zebra_import_table_used[afi][table_id] = 0;
 764                 zebra_import_table_distance[afi][table_id] =
 765                         ZEBRA_TABLE_DISTANCE_DEFAULT;
 766
 767                 rmap_name = zebra_get_import_table_route_map(afi, table_id);
 768                 if (rmap_name) {
 769                         zebra_del_import_table_route_map(afi, table_id);
 770                         rmap_name = NULL;
 771                 }
 772         }
 773
 774         for (rn = route_top(table); rn; rn = route_next(rn)) {
 775                 /* For each entry in the non-default routing table,
 776                  * add the entry in the main table
 777                  */
 778                 if (!rn->info)
 779                         continue;
 780
 781                 RNODE_FOREACH_RE (rn, re) {
 782                         if (CHECK_FLAG(re->status, ROUTE_ENTRY_REMOVED))
 783                                 continue;
 784                         break;
 785                 }
 786
 787                 if (!re)
 788                         continue;
 789
 790                 if (((afi == AFI_IP) && (rn->p.family == AF_INET))
 791                     || ((afi == AFI_IP6) && (rn->p.family == AF_INET6))) {
 792                         if (add)
 793                                 zebra_add_import_table_entry(zvrf, rn, re,
 794                                                              rmap_name);
 795                         else
 796                                 zebra_del_import_table_entry(zvrf, rn, re);
 797                 }
 798         }
 799         return 0;
 800 }
 801
 802 int zebra_import_table_config(struct vty *vty, vrf_id_t vrf_id)
 803 {
 804         int i;
 805         afi_t afi;
 806         int write = 0;
 807         char afi_str[AFI_MAX][10] = {"", "ip", "ipv6", "ethernet"};
 808         const char *rmap_name;
 809
 810         for (afi = AFI_IP; afi < AFI_MAX; afi++) {
 811                 for (i = 1; i < ZEBRA_KERNEL_TABLE_MAX; i++) {
 812                         if (!is_zebra_import_table_enabled(afi, vrf_id, i))
 813                                 continue;
 814
 815                         if (zebra_import_table_distance[afi][i]
 816                             != ZEBRA_TABLE_DISTANCE_DEFAULT) {
 817                                 vty_out(vty, "%s import-table %d distance %d",
 818                                         afi_str[afi], i,
 819                                         zebra_import_table_distance[afi][i]);
 820                         } else {
 821                                 vty_out(vty, "%s import-table %d", afi_str[afi],
 822                                         i);
 823                         }
 824
 825                         rmap_name = zebra_get_import_table_route_map(afi, i);
 826                         if (rmap_name)
 827                                 vty_out(vty, " route-map %s", rmap_name);
 828
 829                         vty_out(vty, "\n");
 830                         write = 1;
 831                 }
 832         }
 833
 834         return write;
 835 }
 836
 837 static void zebra_import_table_rm_update_vrf_afi(struct zebra_vrf *zvrf,
 838                                                  afi_t afi, int table_id,
 839                                                  const char *rmap)
 840 {
 841         struct route_table *table;
 842         struct route_entry *re;
 843         struct route_node *rn;
 844         const char *rmap_name;
 845
 846         rmap_name = zebra_get_import_table_route_map(afi, table_id);
 847         if ((!rmap_name) || (strcmp(rmap_name, rmap) != 0))
 848                 return;
 849
 850         table = zebra_vrf_get_table_with_table_id(afi, SAFI_UNICAST,
 851                                                   zvrf->vrf->vrf_id, table_id);
 852         if (!table) {
 853                 if (IS_ZEBRA_DEBUG_RIB_DETAILED)
 854                         zlog_debug("%s: Table id=%d not found", __func__,
 855                                    table_id);
 856                 return;
 857         }
 858
 859         for (rn = route_top(table); rn; rn = route_next(rn)) {
 860                 /*
 861                  * For each entry in the non-default routing table,
 862                  * add the entry in the main table
 863                  */
 864                 if (!rn->info)
 865                         continue;
 866
 867                 RNODE_FOREACH_RE (rn, re) {
 868                         if (CHECK_FLAG(re->status, ROUTE_ENTRY_REMOVED))
 869                                 continue;
 870                         break;
 871                 }
 872
 873                 if (!re)
 874                         continue;
 875
 876                 if (((afi == AFI_IP) && (rn->p.family == AF_INET))
 877                     || ((afi == AFI_IP6) && (rn->p.family == AF_INET6)))
 878                         zebra_add_import_table_entry(zvrf, rn, re, rmap_name);
 879         }
 880
 881         return;
 882 }
 883
 884 static void zebra_import_table_rm_update_vrf(struct zebra_vrf *zvrf,
 885                                              const char *rmap)
 886 {
 887         afi_t afi;
 888         int i;
 889
 890         for (afi = AFI_IP; afi < AFI_MAX; afi++) {
 891                 for (i = 1; i < ZEBRA_KERNEL_TABLE_MAX; i++) {
 892                         if (!is_zebra_import_table_enabled(
 893                                     afi, zvrf->vrf->vrf_id, i))
 894                                 continue;
 895
 896                         zebra_import_table_rm_update_vrf_afi(zvrf, afi, i,
 897                                                              rmap);
 898                 }
 899         }
 900 }
 901
 902 void zebra_import_table_rm_update(const char *rmap)
 903 {
 904         struct vrf *vrf;
 905         struct zebra_vrf *zvrf;
 906
 907         RB_FOREACH (vrf, vrf_name_head, &vrfs_by_name) {
 908                 zvrf = vrf->info;
 909
 910                 if (!zvrf)
 911                         continue;
 912
 913                 zebra_import_table_rm_update_vrf(zvrf, rmap);
 914         }
 915 }
 916
 917 /* Interface parameters update */
 918 void zebra_interface_parameters_update(struct interface *ifp)
 919 {
 920         struct listnode *node, *nnode;
 921         struct zserv *client;
 922
 923         if (IS_ZEBRA_DEBUG_EVENT)
 924                 zlog_debug("MESSAGE: ZEBRA_INTERFACE_LINK_PARAMS %s(%u)",
 925                            ifp->name, ifp->vrf_id);
 926
 927         for (ALL_LIST_ELEMENTS(zrouter.client_list, node, nnode, client)) {
 928                 /* Do not send unsolicited messages to synchronous clients. */
 929                 if (client->synchronous)
 930                         continue;
 931
 932                 zsend_interface_link_params(client, ifp);
 933         }
 934 }