1 /* Redistribution Handler
2 * Copyright (C) 1998 Kunihiro Ishiguro
4 * This file is part of GNU Zebra.
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
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.
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
33 #include "srcdest_table.h"
35 #include "zebra/rib.h"
36 #include "zebra/zserv.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/zebra_memory.h"
44 #include "zebra/zebra_vxlan.h"
46 #define ZEBRA_PTM_SUPPORT
48 /* array holding redistribute info about table redistribution */
49 /* bit AFI is set if that AFI is redistributing routes from this table */
50 static int zebra_import_table_used
[AFI_MAX
][ZEBRA_KERNEL_TABLE_MAX
];
51 static u_int32_t zebra_import_table_distance
[AFI_MAX
][ZEBRA_KERNEL_TABLE_MAX
];
53 int is_zebra_import_table_enabled(afi_t afi
, u_int32_t table_id
)
56 * Make sure that what we are called with actualy makes sense
61 if (is_zebra_valid_kernel_table(table_id
) &&
62 table_id
< ZEBRA_KERNEL_TABLE_MAX
)
63 return zebra_import_table_used
[afi
][table_id
];
67 static void zebra_redistribute_default(struct zserv
*client
, vrf_id_t vrf_id
)
71 struct route_table
*table
;
72 struct route_node
*rn
;
73 struct route_entry
*newre
;
75 for (afi
= AFI_IP
; afi
<= AFI_IP6
; afi
++) {
77 table
= zebra_vrf_table(afi
, SAFI_UNICAST
, vrf_id
);
81 /* Lookup default route. */
82 memset(&p
, 0, sizeof(p
));
83 p
.family
= afi2family(afi
);
84 rn
= route_node_lookup(table
, &p
);
88 RNODE_FOREACH_RE (rn
, newre
) {
89 if (CHECK_FLAG(newre
->flags
, ZEBRA_FLAG_SELECTED
)
90 && newre
->distance
!= DISTANCE_INFINITY
)
91 zsend_redistribute_route(
92 ZEBRA_REDISTRIBUTE_ROUTE_ADD
, client
,
96 route_unlock_node(rn
);
100 /* Redistribute routes. */
101 static void zebra_redistribute(struct zserv
*client
, int type
, u_short instance
,
102 vrf_id_t vrf_id
, int afi
)
104 struct route_entry
*newre
;
105 struct route_table
*table
;
106 struct route_node
*rn
;
108 table
= zebra_vrf_table(afi
, SAFI_UNICAST
, vrf_id
);
112 for (rn
= route_top(table
); rn
; rn
= srcdest_route_next(rn
))
113 RNODE_FOREACH_RE (rn
, newre
) {
114 struct prefix
*dst_p
, *src_p
;
115 srcdest_rnode_prefixes(rn
, &dst_p
, &src_p
);
117 if (IS_ZEBRA_DEBUG_EVENT
)
119 "%s: client %s vrf %d checking: selected=%d, type=%d, distance=%d, "
120 "zebra_check_addr=%d",
122 zebra_route_string(client
->proto
),
123 vrf_id
, CHECK_FLAG(newre
->flags
,
124 ZEBRA_FLAG_SELECTED
),
125 newre
->type
, newre
->distance
,
126 zebra_check_addr(dst_p
));
128 if (!CHECK_FLAG(newre
->flags
, ZEBRA_FLAG_SELECTED
))
130 if ((type
!= ZEBRA_ROUTE_ALL
131 && (newre
->type
!= type
132 || newre
->instance
!= instance
)))
134 if (newre
->distance
== DISTANCE_INFINITY
)
136 if (!zebra_check_addr(dst_p
))
139 zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_ADD
,
140 client
, dst_p
, src_p
, newre
);
144 /* Either advertise a route for redistribution to registered clients or */
145 /* withdraw redistribution if add cannot be done for client */
146 void redistribute_update(struct prefix
*p
, struct prefix
*src_p
,
147 struct route_entry
*re
, struct route_entry
*prev_re
)
149 struct listnode
*node
, *nnode
;
150 struct zserv
*client
;
151 int send_redistribute
;
153 char buf
[INET6_ADDRSTRLEN
];
155 if (IS_ZEBRA_DEBUG_RIB
) {
156 inet_ntop(p
->family
, &p
->u
.prefix
, buf
, INET6_ADDRSTRLEN
);
158 "%u:%s/%d: Redist update re %p (type %d), old %p (type %d)",
159 re
->vrf_id
, buf
, p
->prefixlen
, re
, re
->type
, prev_re
,
160 prev_re
? prev_re
->type
: -1);
163 afi
= family2afi(p
->family
);
165 zlog_warn("%s: Unknown AFI/SAFI prefix received\n",
170 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
171 send_redistribute
= 0;
173 if (is_default_prefix(p
)
174 && vrf_bitmap_check(client
->redist_default
, re
->vrf_id
))
175 send_redistribute
= 1;
176 else if (vrf_bitmap_check(client
->redist
[afi
][ZEBRA_ROUTE_ALL
],
178 send_redistribute
= 1;
179 else if (re
->instance
180 && redist_check_instance(
181 &client
->mi_redist
[afi
][re
->type
],
183 send_redistribute
= 1;
184 else if (vrf_bitmap_check(client
->redist
[afi
][re
->type
],
186 send_redistribute
= 1;
188 if (send_redistribute
) {
189 zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_ADD
,
190 client
, p
, src_p
, re
);
193 && redist_check_instance(
194 &client
->mi_redist
[afi
]
198 client
->redist
[afi
][prev_re
->type
],
200 zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_DEL
,
201 client
, p
, src_p
, prev_re
);
206 void redistribute_delete(struct prefix
*p
, struct prefix
*src_p
,
207 struct route_entry
*re
)
209 struct listnode
*node
, *nnode
;
210 struct zserv
*client
;
211 char buf
[INET6_ADDRSTRLEN
];
214 if (IS_ZEBRA_DEBUG_RIB
) {
215 inet_ntop(p
->family
, &p
->u
.prefix
, buf
, INET6_ADDRSTRLEN
);
216 zlog_debug("%u:%s/%d: Redist delete re %p (type %d)",
217 re
->vrf_id
, buf
, p
->prefixlen
, re
, re
->type
);
220 /* Add DISTANCE_INFINITY check. */
221 if (re
->distance
== DISTANCE_INFINITY
)
224 afi
= family2afi(p
->family
);
226 zlog_warn("%s: Unknown AFI/SAFI prefix received\n",
231 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
232 if ((is_default_prefix(p
)
233 && vrf_bitmap_check(client
->redist_default
, re
->vrf_id
))
234 || vrf_bitmap_check(client
->redist
[afi
][ZEBRA_ROUTE_ALL
],
237 && redist_check_instance(
238 &client
->mi_redist
[afi
][re
->type
],
240 || vrf_bitmap_check(client
->redist
[afi
][re
->type
],
242 zsend_redistribute_route(ZEBRA_REDISTRIBUTE_ROUTE_DEL
,
243 client
, p
, src_p
, re
);
248 void zebra_redistribute_add(ZAPI_HANDLER_ARGS
)
254 STREAM_GETC(msg
, afi
);
255 STREAM_GETC(msg
, type
);
256 STREAM_GETW(msg
, instance
);
258 if (IS_ZEBRA_DEBUG_EVENT
)
260 "%s: client proto %s afi=%d, wants %s, vrf %d, instance=%d",
261 __func__
, zebra_route_string(client
->proto
), afi
,
262 zebra_route_string(type
), zvrf_id(zvrf
), instance
);
264 if (afi
== 0 || afi
> AFI_MAX
) {
265 zlog_warn("%s: Specified afi %d does not exist",
266 __PRETTY_FUNCTION__
, afi
);
270 if (type
== 0 || type
>= ZEBRA_ROUTE_MAX
) {
271 zlog_warn("%s: Specified Route Type %d does not exist",
272 __PRETTY_FUNCTION__
, type
);
277 if (!redist_check_instance(&client
->mi_redist
[afi
][type
],
279 redist_add_instance(&client
->mi_redist
[afi
][type
],
281 zebra_redistribute(client
, type
, instance
,
285 if (!vrf_bitmap_check(client
->redist
[afi
][type
],
287 if (IS_ZEBRA_DEBUG_EVENT
)
288 zlog_debug("%s: setting vrf %d redist bitmap",
289 __func__
, zvrf_id(zvrf
));
290 vrf_bitmap_set(client
->redist
[afi
][type
],
292 zebra_redistribute(client
, type
, 0, zvrf_id(zvrf
), afi
);
300 void zebra_redistribute_delete(ZAPI_HANDLER_ARGS
)
306 STREAM_GETC(msg
, afi
);
307 STREAM_GETC(msg
, type
);
308 STREAM_GETW(msg
, instance
);
310 if (afi
== 0 || afi
> AFI_MAX
) {
311 zlog_warn("%s: Specified afi %d does not exist",
312 __PRETTY_FUNCTION__
, afi
);
316 if (type
== 0 || type
>= ZEBRA_ROUTE_MAX
) {
317 zlog_warn("%s: Specified Route Type %d does not exist",
318 __PRETTY_FUNCTION__
, type
);
323 * NOTE: no need to withdraw the previously advertised routes. The
325 * themselves should keep track of the received routes from zebra and
326 * withdraw them when necessary.
329 redist_del_instance(&client
->mi_redist
[afi
][type
], instance
);
331 vrf_bitmap_unset(client
->redist
[afi
][type
], zvrf_id(zvrf
));
337 void zebra_redistribute_default_add(ZAPI_HANDLER_ARGS
)
339 vrf_bitmap_set(client
->redist_default
, zvrf_id(zvrf
));
340 zebra_redistribute_default(client
, zvrf_id(zvrf
));
343 void zebra_redistribute_default_delete(ZAPI_HANDLER_ARGS
)
345 vrf_bitmap_unset(client
->redist_default
, zvrf_id(zvrf
));
348 /* Interface up information. */
349 void zebra_interface_up_update(struct interface
*ifp
)
351 struct listnode
*node
, *nnode
;
352 struct zserv
*client
;
354 if (IS_ZEBRA_DEBUG_EVENT
)
355 zlog_debug("MESSAGE: ZEBRA_INTERFACE_UP %s", ifp
->name
);
357 if (ifp
->ptm_status
|| !ifp
->ptm_enable
) {
358 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
))
359 if (client
->ifinfo
) {
360 zsend_interface_update(ZEBRA_INTERFACE_UP
,
362 zsend_interface_link_params(client
, ifp
);
367 /* Interface down information. */
368 void zebra_interface_down_update(struct interface
*ifp
)
370 struct listnode
*node
, *nnode
;
371 struct zserv
*client
;
373 if (IS_ZEBRA_DEBUG_EVENT
)
374 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DOWN %s", ifp
->name
);
376 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
377 zsend_interface_update(ZEBRA_INTERFACE_DOWN
, client
, ifp
);
381 /* Interface information update. */
382 void zebra_interface_add_update(struct interface
*ifp
)
384 struct listnode
*node
, *nnode
;
385 struct zserv
*client
;
387 if (IS_ZEBRA_DEBUG_EVENT
)
388 zlog_debug("MESSAGE: ZEBRA_INTERFACE_ADD %s[%d]", ifp
->name
,
391 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
))
392 if (client
->ifinfo
) {
394 zsend_interface_add(client
, ifp
);
395 zsend_interface_link_params(client
, ifp
);
399 void zebra_interface_delete_update(struct interface
*ifp
)
401 struct listnode
*node
, *nnode
;
402 struct zserv
*client
;
404 if (IS_ZEBRA_DEBUG_EVENT
)
405 zlog_debug("MESSAGE: ZEBRA_INTERFACE_DELETE %s", ifp
->name
);
407 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
409 zsend_interface_delete(client
, ifp
);
413 /* Interface address addition. */
414 void zebra_interface_address_add_update(struct interface
*ifp
,
415 struct connected
*ifc
)
417 struct listnode
*node
, *nnode
;
418 struct zserv
*client
;
421 if (IS_ZEBRA_DEBUG_EVENT
) {
422 char buf
[PREFIX_STRLEN
];
425 zlog_debug("MESSAGE: ZEBRA_INTERFACE_ADDRESS_ADD %s on %s",
426 prefix2str(p
, buf
, sizeof(buf
)), ifc
->ifp
->name
);
429 if (!CHECK_FLAG(ifc
->conf
, ZEBRA_IFC_REAL
))
431 "WARNING: advertising address to clients that is not yet usable.");
433 zebra_vxlan_add_del_gw_macip(ifp
, ifc
->address
, 1);
435 router_id_add_address(ifc
);
437 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
))
438 if (CHECK_FLAG(ifc
->conf
, ZEBRA_IFC_REAL
)) {
439 client
->connected_rt_add_cnt
++;
440 zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_ADD
,
445 /* Interface address deletion. */
446 void zebra_interface_address_delete_update(struct interface
*ifp
,
447 struct connected
*ifc
)
449 struct listnode
*node
, *nnode
;
450 struct zserv
*client
;
453 if (IS_ZEBRA_DEBUG_EVENT
) {
454 char buf
[PREFIX_STRLEN
];
457 zlog_debug("MESSAGE: ZEBRA_INTERFACE_ADDRESS_DELETE %s on %s",
458 prefix2str(p
, buf
, sizeof(buf
)), ifc
->ifp
->name
);
461 zebra_vxlan_add_del_gw_macip(ifp
, ifc
->address
, 0);
463 router_id_del_address(ifc
);
465 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
))
466 if (CHECK_FLAG(ifc
->conf
, ZEBRA_IFC_REAL
)) {
467 client
->connected_rt_del_cnt
++;
468 zsend_interface_address(ZEBRA_INTERFACE_ADDRESS_DELETE
,
473 /* Interface VRF change. May need to delete from clients not interested in
474 * the new VRF. Note that this function is invoked *prior* to the VRF change.
476 void zebra_interface_vrf_update_del(struct interface
*ifp
, vrf_id_t new_vrf_id
)
478 struct listnode
*node
, *nnode
;
479 struct zserv
*client
;
481 if (IS_ZEBRA_DEBUG_EVENT
)
483 "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/DEL %s VRF Id %u -> %u",
484 ifp
->name
, ifp
->vrf_id
, new_vrf_id
);
486 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
487 /* Need to delete if the client is not interested in the new
489 zsend_interface_update(ZEBRA_INTERFACE_DOWN
, client
, ifp
);
491 zsend_interface_delete(client
, ifp
);
492 zsend_interface_vrf_update(client
, ifp
, new_vrf_id
);
496 /* Interface VRF change. This function is invoked *post* VRF change and sends an
497 * add to clients who are interested in the new VRF but not in the old VRF.
499 void zebra_interface_vrf_update_add(struct interface
*ifp
, vrf_id_t old_vrf_id
)
501 struct listnode
*node
, *nnode
;
502 struct zserv
*client
;
504 if (IS_ZEBRA_DEBUG_EVENT
)
506 "MESSAGE: ZEBRA_INTERFACE_VRF_UPDATE/ADD %s VRF Id %u -> %u",
507 ifp
->name
, old_vrf_id
, ifp
->vrf_id
);
509 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
)) {
510 /* Need to add if the client is interested in the new VRF. */
512 zsend_interface_add(client
, ifp
);
513 zsend_interface_addresses(client
, ifp
);
517 int zebra_add_import_table_entry(struct route_node
*rn
, struct route_entry
*re
,
518 const char *rmap_name
)
520 struct route_entry
*newre
;
521 struct route_entry
*same
;
523 route_map_result_t ret
= RMAP_MATCH
;
526 afi
= family2afi(rn
->p
.family
);
528 ret
= zebra_import_table_route_map_check(
529 afi
, re
->type
, &rn
->p
, re
->ng
.nexthop
, re
->vrf_id
,
532 if (ret
!= RMAP_MATCH
) {
533 zebra_del_import_table_entry(rn
, re
);
537 prefix_copy(&p
, &rn
->p
);
539 RNODE_FOREACH_RE (rn
, same
) {
540 if (CHECK_FLAG(same
->status
, ROUTE_ENTRY_REMOVED
))
543 if (same
->type
== re
->type
&& same
->instance
== re
->instance
544 && same
->table
== re
->table
545 && same
->type
!= ZEBRA_ROUTE_CONNECT
)
550 zebra_del_import_table_entry(rn
, same
);
552 newre
= XCALLOC(MTYPE_RE
, sizeof(struct route_entry
));
553 newre
->type
= ZEBRA_ROUTE_TABLE
;
554 newre
->distance
= zebra_import_table_distance
[afi
][re
->table
];
555 newre
->flags
= re
->flags
;
556 newre
->metric
= re
->metric
;
557 newre
->mtu
= re
->mtu
;
558 newre
->table
= zebrad
.rtm_table_default
;
559 newre
->nexthop_num
= 0;
560 newre
->uptime
= time(NULL
);
561 newre
->instance
= re
->table
;
562 route_entry_copy_nexthops(newre
, re
->ng
.nexthop
);
564 rib_add_multipath(afi
, SAFI_UNICAST
, &p
, NULL
, newre
);
569 int zebra_del_import_table_entry(struct route_node
*rn
, struct route_entry
*re
)
574 afi
= family2afi(rn
->p
.family
);
575 prefix_copy(&p
, &rn
->p
);
577 rib_delete(afi
, SAFI_UNICAST
, re
->vrf_id
, ZEBRA_ROUTE_TABLE
, re
->table
,
578 re
->flags
, &p
, NULL
, re
->ng
.nexthop
,
579 zebrad
.rtm_table_default
, re
->metric
, false, NULL
);
584 /* Assuming no one calls this with the main routing table */
585 int zebra_import_table(afi_t afi
, u_int32_t table_id
, u_int32_t distance
,
586 const char *rmap_name
, int add
)
588 struct route_table
*table
;
589 struct route_entry
*re
;
590 struct route_node
*rn
;
592 if (!is_zebra_valid_kernel_table(table_id
)
593 || ((table_id
== RT_TABLE_MAIN
)
594 || (table_id
== zebrad
.rtm_table_default
)))
600 table
= zebra_vrf_other_route_table(afi
, table_id
, VRF_DEFAULT
);
603 } else if (IS_ZEBRA_DEBUG_RIB
) {
604 zlog_debug("%s routes from table %d",
605 add
? "Importing" : "Unimporting", table_id
);
610 zebra_add_import_table_route_map(afi
, rmap_name
,
614 zebra_get_import_table_route_map(afi
, table_id
);
616 zebra_del_import_table_route_map(afi
, table_id
);
619 zebra_import_table_used
[afi
][table_id
] = 1;
620 zebra_import_table_distance
[afi
][table_id
] = distance
;
622 zebra_import_table_used
[afi
][table_id
] = 0;
623 zebra_import_table_distance
[afi
][table_id
] =
624 ZEBRA_TABLE_DISTANCE_DEFAULT
;
626 rmap_name
= zebra_get_import_table_route_map(afi
, table_id
);
628 zebra_del_import_table_route_map(afi
, table_id
);
631 for (rn
= route_top(table
); rn
; rn
= route_next(rn
)) {
632 /* For each entry in the non-default routing table,
633 * add the entry in the main table
638 RNODE_FOREACH_RE (rn
, re
) {
639 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
647 if (((afi
== AFI_IP
) && (rn
->p
.family
== AF_INET
))
648 || ((afi
== AFI_IP6
) && (rn
->p
.family
== AF_INET6
))) {
650 zebra_add_import_table_entry(rn
, re
, rmap_name
);
652 zebra_del_import_table_entry(rn
, re
);
658 int zebra_import_table_config(struct vty
*vty
)
663 char afi_str
[AFI_MAX
][10] = {"", "ip", "ipv6", "ethernet"};
664 const char *rmap_name
;
666 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++) {
667 for (i
= 1; i
< ZEBRA_KERNEL_TABLE_MAX
; i
++) {
668 if (!is_zebra_import_table_enabled(afi
, i
))
671 if (zebra_import_table_distance
[afi
][i
]
672 != ZEBRA_TABLE_DISTANCE_DEFAULT
) {
673 vty_out(vty
, "%s import-table %d distance %d",
675 zebra_import_table_distance
[afi
][i
]);
677 vty_out(vty
, "%s import-table %d", afi_str
[afi
],
681 rmap_name
= zebra_get_import_table_route_map(afi
, i
);
683 vty_out(vty
, " route-map %s", rmap_name
);
693 void zebra_import_table_rm_update()
697 struct route_table
*table
;
698 struct route_entry
*re
;
699 struct route_node
*rn
;
700 const char *rmap_name
;
702 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++) {
703 for (i
= 1; i
< ZEBRA_KERNEL_TABLE_MAX
; i
++) {
704 if (!is_zebra_import_table_enabled(afi
, i
))
707 rmap_name
= zebra_get_import_table_route_map(afi
, i
);
711 table
= zebra_vrf_other_route_table(afi
, i
,
713 for (rn
= route_top(table
); rn
; rn
= route_next(rn
)) {
714 /* For each entry in the non-default
716 * add the entry in the main table
721 RNODE_FOREACH_RE (rn
, re
) {
722 if (CHECK_FLAG(re
->status
,
723 ROUTE_ENTRY_REMOVED
))
732 && (rn
->p
.family
== AF_INET
))
734 && (rn
->p
.family
== AF_INET6
)))
735 zebra_add_import_table_entry(rn
, re
,
744 /* Interface parameters update */
745 void zebra_interface_parameters_update(struct interface
*ifp
)
747 struct listnode
*node
, *nnode
;
748 struct zserv
*client
;
750 if (IS_ZEBRA_DEBUG_EVENT
)
751 zlog_debug("MESSAGE: ZEBRA_INTERFACE_LINK_PARAMS %s",
754 for (ALL_LIST_ELEMENTS(zebrad
.client_list
, node
, nnode
, client
))
756 zsend_interface_link_params(client
, ifp
);