1 /* Routing Information Base.
2 * Copyright (C) 1997, 98, 99, 2001 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 "sockunion.h"
34 #include "srcdest_table.h"
38 #include "workqueue.h"
39 #include "nexthop_group_private.h"
40 #include "frr_pthread.h"
42 #include "zebra/zebra_router.h"
43 #include "zebra/connected.h"
44 #include "zebra/debug.h"
45 #include "zebra/interface.h"
46 #include "zebra/redistribute.h"
47 #include "zebra/rib.h"
49 #include "zebra/zapi_msg.h"
50 #include "zebra/zebra_errors.h"
51 #include "zebra/zebra_memory.h"
52 #include "zebra/zebra_ns.h"
53 #include "zebra/zebra_rnh.h"
54 #include "zebra/zebra_routemap.h"
55 #include "zebra/zebra_vrf.h"
56 #include "zebra/zebra_vxlan.h"
57 #include "zebra/zapi_msg.h"
58 #include "zebra/zebra_dplane.h"
60 DEFINE_MTYPE_STATIC(ZEBRA
, RIB_UPDATE_CTX
, "Rib update context object");
63 * Event, list, and mutex for delivery of dataplane results
65 static pthread_mutex_t dplane_mutex
;
66 static struct thread
*t_dplane
;
67 static struct dplane_ctx_q rib_dplane_q
;
69 DEFINE_HOOK(rib_update
, (struct route_node
* rn
, const char *reason
),
72 /* Should we allow non Quagga processes to delete our routes */
73 extern int allow_delete
;
75 /* Each route type's string and default distance value. */
80 } route_info
[ZEBRA_ROUTE_MAX
] = {
81 [ZEBRA_ROUTE_NHG
] = {ZEBRA_ROUTE_NHG
, 255 /* Uneeded for nhg's */, 0},
82 [ZEBRA_ROUTE_SYSTEM
] = {ZEBRA_ROUTE_SYSTEM
, 0, 5},
83 [ZEBRA_ROUTE_KERNEL
] = {ZEBRA_ROUTE_KERNEL
, 0, 1},
84 [ZEBRA_ROUTE_CONNECT
] = {ZEBRA_ROUTE_CONNECT
, 0, 1},
85 [ZEBRA_ROUTE_STATIC
] = {ZEBRA_ROUTE_STATIC
, 1, 2},
86 [ZEBRA_ROUTE_RIP
] = {ZEBRA_ROUTE_RIP
, 120, 3},
87 [ZEBRA_ROUTE_RIPNG
] = {ZEBRA_ROUTE_RIPNG
, 120, 3},
88 [ZEBRA_ROUTE_OSPF
] = {ZEBRA_ROUTE_OSPF
, 110, 3},
89 [ZEBRA_ROUTE_OSPF6
] = {ZEBRA_ROUTE_OSPF6
, 110, 3},
90 [ZEBRA_ROUTE_ISIS
] = {ZEBRA_ROUTE_ISIS
, 115, 3},
91 [ZEBRA_ROUTE_BGP
] = {ZEBRA_ROUTE_BGP
, 20 /* IBGP is 200. */, 4},
92 [ZEBRA_ROUTE_PIM
] = {ZEBRA_ROUTE_PIM
, 255, 5},
93 [ZEBRA_ROUTE_EIGRP
] = {ZEBRA_ROUTE_EIGRP
, 90, 3},
94 [ZEBRA_ROUTE_NHRP
] = {ZEBRA_ROUTE_NHRP
, 10, 3},
95 [ZEBRA_ROUTE_HSLS
] = {ZEBRA_ROUTE_HSLS
, 255, 5},
96 [ZEBRA_ROUTE_OLSR
] = {ZEBRA_ROUTE_OLSR
, 255, 5},
97 [ZEBRA_ROUTE_TABLE
] = {ZEBRA_ROUTE_TABLE
, 150, 2},
98 [ZEBRA_ROUTE_LDP
] = {ZEBRA_ROUTE_LDP
, 150, 5},
99 [ZEBRA_ROUTE_VNC
] = {ZEBRA_ROUTE_VNC
, 20, 4},
100 [ZEBRA_ROUTE_VNC_DIRECT
] = {ZEBRA_ROUTE_VNC_DIRECT
, 20, 4},
101 [ZEBRA_ROUTE_VNC_DIRECT_RH
] = {ZEBRA_ROUTE_VNC_DIRECT_RH
, 20, 4},
102 [ZEBRA_ROUTE_BGP_DIRECT
] = {ZEBRA_ROUTE_BGP_DIRECT
, 20, 4},
103 [ZEBRA_ROUTE_BGP_DIRECT_EXT
] = {ZEBRA_ROUTE_BGP_DIRECT_EXT
, 20, 4},
104 [ZEBRA_ROUTE_BABEL
] = {ZEBRA_ROUTE_BABEL
, 100, 3},
105 [ZEBRA_ROUTE_SHARP
] = {ZEBRA_ROUTE_SHARP
, 150, 5},
106 [ZEBRA_ROUTE_PBR
] = {ZEBRA_ROUTE_PBR
, 200, 5},
107 [ZEBRA_ROUTE_BFD
] = {ZEBRA_ROUTE_BFD
, 255, 5},
108 [ZEBRA_ROUTE_OPENFABRIC
] = {ZEBRA_ROUTE_OPENFABRIC
, 115, 3},
109 [ZEBRA_ROUTE_VRRP
] = {ZEBRA_ROUTE_VRRP
, 255, 5}
110 /* Any new route type added to zebra, should be mirrored here */
112 /* no entry/default: 150 */
115 static void __attribute__((format(printf
, 5, 6)))
116 _rnode_zlog(const char *_func
, vrf_id_t vrf_id
, struct route_node
*rn
,
117 int priority
, const char *msgfmt
, ...)
119 char buf
[SRCDEST2STR_BUFFER
+ sizeof(" (MRIB)")];
123 va_start(ap
, msgfmt
);
124 vsnprintf(msgbuf
, sizeof(msgbuf
), msgfmt
, ap
);
128 rib_table_info_t
*info
= srcdest_rnode_table_info(rn
);
129 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
131 if (info
->safi
== SAFI_MULTICAST
)
132 strlcat(buf
, " (MRIB)", sizeof(buf
));
134 snprintf(buf
, sizeof(buf
), "{(route_node *) NULL}");
137 zlog(priority
, "%s: %d:%s: %s", _func
, vrf_id
, buf
, msgbuf
);
140 #define rnode_debug(node, vrf_id, ...) \
141 _rnode_zlog(__func__, vrf_id, node, LOG_DEBUG, __VA_ARGS__)
142 #define rnode_info(node, ...) \
143 _rnode_zlog(__func__, vrf_id, node, LOG_INFO, __VA_ARGS__)
145 uint8_t route_distance(int type
)
149 if ((unsigned)type
>= array_size(route_info
))
152 distance
= route_info
[type
].distance
;
157 int is_zebra_valid_kernel_table(uint32_t table_id
)
160 if ((table_id
== RT_TABLE_UNSPEC
) || (table_id
== RT_TABLE_LOCAL
)
161 || (table_id
== RT_TABLE_COMPAT
))
168 int is_zebra_main_routing_table(uint32_t table_id
)
170 if (table_id
== RT_TABLE_MAIN
)
175 int zebra_check_addr(const struct prefix
*p
)
177 if (p
->family
== AF_INET
) {
180 addr
= p
->u
.prefix4
.s_addr
;
183 if (IPV4_NET127(addr
) || IN_CLASSD(addr
)
184 || IPV4_LINKLOCAL(addr
))
187 if (p
->family
== AF_INET6
) {
188 if (IN6_IS_ADDR_LOOPBACK(&p
->u
.prefix6
))
190 if (IN6_IS_ADDR_LINKLOCAL(&p
->u
.prefix6
))
197 * copy_nexthop - copy a nexthop to the rib structure.
199 void route_entry_copy_nexthops(struct route_entry
*re
, struct nexthop
*nh
)
201 assert(!re
->nhe
->nhg
->nexthop
);
202 copy_nexthops(&re
->nhe
->nhg
->nexthop
, nh
, NULL
);
205 static void route_entry_attach_ref(struct route_entry
*re
,
206 struct nhg_hash_entry
*new)
209 re
->nhe_id
= new->id
;
211 zebra_nhg_increment_ref(new);
214 int route_entry_update_nhe(struct route_entry
*re
, struct nhg_hash_entry
*new)
216 struct nhg_hash_entry
*old
= NULL
;
224 if (re
->nhe_id
!= new->id
) {
225 old
= zebra_nhg_lookup_id(re
->nhe_id
);
227 route_entry_attach_ref(re
, new);
230 zebra_nhg_decrement_ref(old
);
232 /* This is the first time it's being attached */
233 route_entry_attach_ref(re
, new);
239 struct route_entry
*rib_match(afi_t afi
, safi_t safi
, vrf_id_t vrf_id
,
240 union g_addr
*addr
, struct route_node
**rn_out
)
243 struct route_table
*table
;
244 struct route_node
*rn
;
245 struct route_entry
*match
= NULL
;
248 table
= zebra_vrf_table(afi
, safi
, vrf_id
);
252 memset(&p
, 0, sizeof(struct prefix
));
255 p
.u
.prefix4
= addr
->ipv4
;
256 p
.prefixlen
= IPV4_MAX_PREFIXLEN
;
258 p
.u
.prefix6
= addr
->ipv6
;
259 p
.prefixlen
= IPV6_MAX_PREFIXLEN
;
262 rn
= route_node_match(table
, (struct prefix
*)&p
);
267 route_unlock_node(rn
);
269 dest
= rib_dest_from_rnode(rn
);
270 if (dest
&& dest
->selected_fib
271 && !CHECK_FLAG(dest
->selected_fib
->status
,
272 ROUTE_ENTRY_REMOVED
))
273 match
= dest
->selected_fib
;
275 /* If there is no selected route or matched route is EGP, go up
280 } while (rn
&& rn
->info
== NULL
);
284 if (match
->type
!= ZEBRA_ROUTE_CONNECT
) {
285 if (!CHECK_FLAG(match
->status
,
286 ROUTE_ENTRY_INSTALLED
))
298 struct route_entry
*rib_match_ipv4_multicast(vrf_id_t vrf_id
,
300 struct route_node
**rn_out
)
302 struct route_entry
*re
= NULL
, *mre
= NULL
, *ure
= NULL
;
303 struct route_node
*m_rn
= NULL
, *u_rn
= NULL
;
304 union g_addr gaddr
= {.ipv4
= addr
};
306 switch (zrouter
.ipv4_multicast_mode
) {
307 case MCAST_MRIB_ONLY
:
308 return rib_match(AFI_IP
, SAFI_MULTICAST
, vrf_id
, &gaddr
,
310 case MCAST_URIB_ONLY
:
311 return rib_match(AFI_IP
, SAFI_UNICAST
, vrf_id
, &gaddr
, rn_out
);
312 case MCAST_NO_CONFIG
:
313 case MCAST_MIX_MRIB_FIRST
:
314 re
= mre
= rib_match(AFI_IP
, SAFI_MULTICAST
, vrf_id
, &gaddr
,
317 re
= ure
= rib_match(AFI_IP
, SAFI_UNICAST
, vrf_id
,
320 case MCAST_MIX_DISTANCE
:
321 mre
= rib_match(AFI_IP
, SAFI_MULTICAST
, vrf_id
, &gaddr
, &m_rn
);
322 ure
= rib_match(AFI_IP
, SAFI_UNICAST
, vrf_id
, &gaddr
, &u_rn
);
324 re
= ure
->distance
< mre
->distance
? ure
: mre
;
330 case MCAST_MIX_PFXLEN
:
331 mre
= rib_match(AFI_IP
, SAFI_MULTICAST
, vrf_id
, &gaddr
, &m_rn
);
332 ure
= rib_match(AFI_IP
, SAFI_UNICAST
, vrf_id
, &gaddr
, &u_rn
);
334 re
= u_rn
->p
.prefixlen
> m_rn
->p
.prefixlen
? ure
: mre
;
343 *rn_out
= (re
== mre
) ? m_rn
: u_rn
;
345 if (IS_ZEBRA_DEBUG_RIB
) {
347 inet_ntop(AF_INET
, &addr
, buf
, BUFSIZ
);
349 zlog_debug("%s: %s: vrf: %u found %s, using %s",
350 __func__
, buf
, vrf_id
,
351 mre
? (ure
? "MRIB+URIB" : "MRIB")
352 : ure
? "URIB" : "nothing",
353 re
== ure
? "URIB" : re
== mre
? "MRIB" : "none");
358 struct route_entry
*rib_lookup_ipv4(struct prefix_ipv4
*p
, vrf_id_t vrf_id
)
360 struct route_table
*table
;
361 struct route_node
*rn
;
362 struct route_entry
*match
= NULL
;
366 table
= zebra_vrf_table(AFI_IP
, SAFI_UNICAST
, vrf_id
);
370 rn
= route_node_lookup(table
, (struct prefix
*)p
);
372 /* No route for this prefix. */
377 route_unlock_node(rn
);
378 dest
= rib_dest_from_rnode(rn
);
380 if (dest
&& dest
->selected_fib
381 && !CHECK_FLAG(dest
->selected_fib
->status
, ROUTE_ENTRY_REMOVED
))
382 match
= dest
->selected_fib
;
387 if (match
->type
== ZEBRA_ROUTE_CONNECT
)
390 if (CHECK_FLAG(match
->status
, ROUTE_ENTRY_INSTALLED
))
397 * Is this RIB labeled-unicast? It must be of type BGP and all paths
398 * (nexthops) must have a label.
400 int zebra_rib_labeled_unicast(struct route_entry
*re
)
402 struct nexthop
*nexthop
= NULL
;
404 if (re
->type
!= ZEBRA_ROUTE_BGP
)
407 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
))
408 if (!nexthop
->nh_label
|| !nexthop
->nh_label
->num_labels
)
414 /* Update flag indicates whether this is a "replace" or not. Currently, this
415 * is only used for IPv4.
417 void rib_install_kernel(struct route_node
*rn
, struct route_entry
*re
,
418 struct route_entry
*old
)
420 struct nexthop
*nexthop
;
421 rib_table_info_t
*info
= srcdest_rnode_table_info(rn
);
422 struct zebra_vrf
*zvrf
= vrf_info_lookup(re
->vrf_id
);
423 const struct prefix
*p
, *src_p
;
424 enum zebra_dplane_result ret
;
426 rib_dest_t
*dest
= rib_dest_from_rnode(rn
);
428 srcdest_rnode_prefixes(rn
, &p
, &src_p
);
430 if (info
->safi
!= SAFI_UNICAST
) {
431 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
))
432 SET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
438 * Install the resolved nexthop object first.
440 zebra_nhg_install_kernel(zebra_nhg_lookup_id(re
->nhe_id
));
443 * If this is a replace to a new RE let the originator of the RE
444 * know that they've lost
446 if (old
&& (old
!= re
) && (old
->type
!= re
->type
))
447 zsend_route_notify_owner(old
, p
, ZAPI_ROUTE_BETTER_ADMIN_WON
);
449 /* Update fib selection */
450 dest
->selected_fib
= re
;
453 * Make sure we update the FPM any time we send new information to
456 hook_call(rib_update
, rn
, "installing in kernel");
458 /* Send add or update */
460 ret
= dplane_route_update(rn
, re
, old
);
462 ret
= dplane_route_add(rn
, re
);
465 case ZEBRA_DPLANE_REQUEST_QUEUED
:
466 SET_FLAG(re
->status
, ROUTE_ENTRY_QUEUED
);
469 SET_FLAG(old
->status
, ROUTE_ENTRY_QUEUED
);
471 /* Free old FIB nexthop group */
472 if (old
->fib_ng
.nexthop
) {
473 nexthops_free(old
->fib_ng
.nexthop
);
474 old
->fib_ng
.nexthop
= NULL
;
479 zvrf
->installs_queued
++;
481 case ZEBRA_DPLANE_REQUEST_FAILURE
:
483 char str
[SRCDEST2STR_BUFFER
];
485 srcdest_rnode2str(rn
, str
, sizeof(str
));
486 flog_err(EC_ZEBRA_DP_INSTALL_FAIL
,
487 "%u:%s: Failed to enqueue dataplane install",
491 case ZEBRA_DPLANE_REQUEST_SUCCESS
:
500 /* Uninstall the route from kernel. */
501 void rib_uninstall_kernel(struct route_node
*rn
, struct route_entry
*re
)
503 struct nexthop
*nexthop
;
504 rib_table_info_t
*info
= srcdest_rnode_table_info(rn
);
505 struct zebra_vrf
*zvrf
= vrf_info_lookup(re
->vrf_id
);
507 if (info
->safi
!= SAFI_UNICAST
) {
508 UNSET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
509 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
))
510 UNSET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
515 * Make sure we update the FPM any time we send new information to
518 hook_call(rib_update
, rn
, "uninstalling from kernel");
520 switch (dplane_route_delete(rn
, re
)) {
521 case ZEBRA_DPLANE_REQUEST_QUEUED
:
523 zvrf
->removals_queued
++;
525 case ZEBRA_DPLANE_REQUEST_FAILURE
:
527 char str
[SRCDEST2STR_BUFFER
];
529 srcdest_rnode2str(rn
, str
, sizeof(str
));
530 flog_err(EC_ZEBRA_DP_INSTALL_FAIL
,
531 "%u:%s: Failed to enqueue dataplane uninstall",
535 case ZEBRA_DPLANE_REQUEST_SUCCESS
:
544 /* Uninstall the route from kernel. */
545 static void rib_uninstall(struct route_node
*rn
, struct route_entry
*re
)
547 rib_table_info_t
*info
= srcdest_rnode_table_info(rn
);
548 rib_dest_t
*dest
= rib_dest_from_rnode(rn
);
549 struct nexthop
*nexthop
;
551 if (dest
&& dest
->selected_fib
== re
) {
552 if (info
->safi
== SAFI_UNICAST
)
553 hook_call(rib_update
, rn
, "rib_uninstall");
555 /* If labeled-unicast route, uninstall transit LSP. */
556 if (zebra_rib_labeled_unicast(re
))
557 zebra_mpls_lsp_uninstall(info
->zvrf
, rn
, re
);
559 rib_uninstall_kernel(rn
, re
);
561 dest
->selected_fib
= NULL
;
563 /* Free FIB nexthop group, if present */
564 if (re
->fib_ng
.nexthop
) {
565 nexthops_free(re
->fib_ng
.nexthop
);
566 re
->fib_ng
.nexthop
= NULL
;
569 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
))
570 UNSET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
573 if (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_SELECTED
)) {
574 const struct prefix
*p
, *src_p
;
576 srcdest_rnode_prefixes(rn
, &p
, &src_p
);
578 redistribute_delete(p
, src_p
, re
, NULL
);
579 UNSET_FLAG(re
->flags
, ZEBRA_FLAG_SELECTED
);
584 * rib_can_delete_dest
586 * Returns true if the given dest can be deleted from the table.
588 static int rib_can_delete_dest(rib_dest_t
*dest
)
590 if (re_list_first(&dest
->routes
)) {
595 * Unresolved rnh's are stored on the default route's list
597 * dest->rnode can also be the source prefix node in an
598 * ipv6 sourcedest table. Fortunately the prefix of a
599 * source prefix node can never be the default prefix.
601 if (is_default_prefix(&dest
->rnode
->p
))
605 * Don't delete the dest if we have to update the FPM about this
608 if (CHECK_FLAG(dest
->flags
, RIB_DEST_UPDATE_FPM
)
609 || CHECK_FLAG(dest
->flags
, RIB_DEST_SENT_TO_FPM
))
615 void zebra_rib_evaluate_rn_nexthops(struct route_node
*rn
, uint32_t seq
)
617 rib_dest_t
*dest
= rib_dest_from_rnode(rn
);
621 * We are storing the rnh's associated withb
622 * the tracked nexthop as a list of the rn's.
623 * Unresolved rnh's are placed at the top
624 * of the tree list.( 0.0.0.0/0 for v4 and 0::0/0 for v6 )
625 * As such for each rn we need to walk up the tree
626 * and see if any rnh's need to see if they
627 * would match a more specific route
630 if (IS_ZEBRA_DEBUG_NHT_DETAILED
) {
631 char buf
[PREFIX_STRLEN
];
633 zlog_debug("%s: %s Being examined for Nexthop Tracking Count: %zd",
635 srcdest_rnode2str(rn
, buf
, sizeof(buf
)),
636 dest
? rnh_list_count(&dest
->nht
) : 0);
641 dest
= rib_dest_from_rnode(rn
);
645 * If we have any rnh's stored in the nht list
646 * then we know that this route node was used for
647 * nht resolution and as such we need to call the
648 * nexthop tracking evaluation code
650 frr_each_safe(rnh_list
, &dest
->nht
, rnh
) {
651 struct zebra_vrf
*zvrf
=
652 zebra_vrf_lookup_by_id(rnh
->vrf_id
);
653 struct prefix
*p
= &rnh
->node
->p
;
655 if (IS_ZEBRA_DEBUG_NHT_DETAILED
) {
656 char buf1
[PREFIX_STRLEN
];
657 char buf2
[PREFIX_STRLEN
];
659 zlog_debug("%u:%s has Nexthop(%s) Type: %s depending on it, evaluating %u:%u",
661 srcdest_rnode2str(rn
, buf1
,
663 prefix2str(p
, buf2
, sizeof(buf2
)),
664 rnh_type2str(rnh
->type
),
669 * If we have evaluated this node on this pass
670 * already, due to following the tree up
671 * then we know that we can move onto the next
674 * Additionally we call zebra_evaluate_rnh
675 * when we gc the dest. In this case we know
676 * that there must be no other re's where
677 * we were originally as such we know that
678 * that sequence number is ok to respect.
680 if (rnh
->seqno
== seq
) {
681 if (IS_ZEBRA_DEBUG_NHT_DETAILED
)
683 "\tNode processed and moved already");
688 zebra_evaluate_rnh(zvrf
, family2afi(p
->family
), 0,
694 dest
= rib_dest_from_rnode(rn
);
701 * Garbage collect the rib dest corresponding to the given route node
704 * Returns true if the dest was deleted, false otherwise.
706 int rib_gc_dest(struct route_node
*rn
)
710 dest
= rib_dest_from_rnode(rn
);
714 if (!rib_can_delete_dest(dest
))
717 if (IS_ZEBRA_DEBUG_RIB
) {
718 struct zebra_vrf
*zvrf
;
720 zvrf
= rib_dest_vrf(dest
);
721 rnode_debug(rn
, zvrf_id(zvrf
), "removing dest from table");
724 zebra_rib_evaluate_rn_nexthops(rn
, zebra_router_get_next_sequence());
727 rnh_list_fini(&dest
->nht
);
728 XFREE(MTYPE_RIB_DEST
, dest
);
732 * Release the one reference that we keep on the route node.
734 route_unlock_node(rn
);
738 static void rib_process_add_fib(struct zebra_vrf
*zvrf
, struct route_node
*rn
,
739 struct route_entry
*new)
741 hook_call(rib_update
, rn
, "new route selected");
743 /* Update real nexthop. This may actually determine if nexthop is active
745 if (!nexthop_group_active_nexthop_num(new->nhe
->nhg
)) {
746 UNSET_FLAG(new->status
, ROUTE_ENTRY_CHANGED
);
750 if (IS_ZEBRA_DEBUG_RIB
) {
751 char buf
[SRCDEST2STR_BUFFER
];
752 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
753 zlog_debug("%u:%s: Adding route rn %p, re %p (%s)",
754 zvrf_id(zvrf
), buf
, rn
, new,
755 zebra_route_string(new->type
));
758 /* If labeled-unicast route, install transit LSP. */
759 if (zebra_rib_labeled_unicast(new))
760 zebra_mpls_lsp_install(zvrf
, rn
, new);
762 rib_install_kernel(rn
, new, NULL
);
764 UNSET_FLAG(new->status
, ROUTE_ENTRY_CHANGED
);
767 static void rib_process_del_fib(struct zebra_vrf
*zvrf
, struct route_node
*rn
,
768 struct route_entry
*old
)
770 hook_call(rib_update
, rn
, "removing existing route");
772 /* Uninstall from kernel. */
773 if (IS_ZEBRA_DEBUG_RIB
) {
774 char buf
[SRCDEST2STR_BUFFER
];
775 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
776 zlog_debug("%u:%s: Deleting route rn %p, re %p (%s)",
777 zvrf_id(zvrf
), buf
, rn
, old
,
778 zebra_route_string(old
->type
));
781 /* If labeled-unicast route, uninstall transit LSP. */
782 if (zebra_rib_labeled_unicast(old
))
783 zebra_mpls_lsp_uninstall(zvrf
, rn
, old
);
785 rib_uninstall_kernel(rn
, old
);
787 /* Update nexthop for route, reset changed flag. */
788 /* Note: this code also handles the Linux case when an interface goes
789 * down, causing the kernel to delete routes without sending DELROUTE
792 if (RIB_KERNEL_ROUTE(old
))
793 SET_FLAG(old
->status
, ROUTE_ENTRY_REMOVED
);
795 UNSET_FLAG(old
->status
, ROUTE_ENTRY_CHANGED
);
798 static void rib_process_update_fib(struct zebra_vrf
*zvrf
,
799 struct route_node
*rn
,
800 struct route_entry
*old
,
801 struct route_entry
*new)
806 * We have to install or update if a new route has been selected or
807 * something has changed.
809 if (new != old
|| CHECK_FLAG(new->status
, ROUTE_ENTRY_CHANGED
)) {
810 hook_call(rib_update
, rn
, "updating existing route");
812 /* Update the nexthop; we could determine here that nexthop is
814 if (nexthop_group_active_nexthop_num(new->nhe
->nhg
))
817 /* If nexthop is active, install the selected route, if
819 * the install succeeds, cleanup flags for prior route, if
824 if (IS_ZEBRA_DEBUG_RIB
) {
825 char buf
[SRCDEST2STR_BUFFER
];
826 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
829 "%u:%s: Updating route rn %p, re %p (%s) old %p (%s)",
830 zvrf_id(zvrf
), buf
, rn
, new,
831 zebra_route_string(new->type
),
833 zebra_route_string(old
->type
));
836 "%u:%s: Updating route rn %p, re %p (%s)",
837 zvrf_id(zvrf
), buf
, rn
, new,
838 zebra_route_string(new->type
));
841 /* If labeled-unicast route, uninstall transit LSP. */
842 if (zebra_rib_labeled_unicast(old
))
843 zebra_mpls_lsp_uninstall(zvrf
, rn
, old
);
846 * Non-system route should be installed.
847 * If labeled-unicast route, install transit
850 if (zebra_rib_labeled_unicast(new))
851 zebra_mpls_lsp_install(zvrf
, rn
, new);
853 rib_install_kernel(rn
, new, old
);
857 * If nexthop for selected route is not active or install
859 * may need to uninstall and delete for redistribution.
862 if (IS_ZEBRA_DEBUG_RIB
) {
863 char buf
[SRCDEST2STR_BUFFER
];
864 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
867 "%u:%s: Deleting route rn %p, re %p (%s) old %p (%s) - nexthop inactive",
868 zvrf_id(zvrf
), buf
, rn
, new,
869 zebra_route_string(new->type
),
871 zebra_route_string(old
->type
));
874 "%u:%s: Deleting route rn %p, re %p (%s) - nexthop inactive",
875 zvrf_id(zvrf
), buf
, rn
, new,
876 zebra_route_string(new->type
));
879 /* If labeled-unicast route, uninstall transit LSP. */
880 if (zebra_rib_labeled_unicast(old
))
881 zebra_mpls_lsp_uninstall(zvrf
, rn
, old
);
883 rib_uninstall_kernel(rn
, old
);
887 * Same route selected; check if in the FIB and if not,
888 * re-install. This is housekeeping code to deal with
889 * race conditions in kernel with linux netlink reporting
890 * interface up before IPv4 or IPv6 protocol is ready
893 if (!CHECK_FLAG(new->status
, ROUTE_ENTRY_INSTALLED
) ||
894 RIB_SYSTEM_ROUTE(new))
895 rib_install_kernel(rn
, new, NULL
);
898 /* Update prior route. */
900 UNSET_FLAG(old
->status
, ROUTE_ENTRY_CHANGED
);
902 /* Clear changed flag. */
903 UNSET_FLAG(new->status
, ROUTE_ENTRY_CHANGED
);
906 /* Check if 'alternate' RIB entry is better than 'current'. */
907 static struct route_entry
*rib_choose_best(struct route_entry
*current
,
908 struct route_entry
*alternate
)
913 /* filter route selection in following order:
914 * - connected beats other types
915 * - if both connected, loopback or vrf wins
916 * - lower distance beats higher
917 * - lower metric beats higher for equal distance
918 * - last, hence oldest, route wins tie break.
921 /* Connected routes. Check to see if either are a vrf
922 * or loopback interface. If not, pick the last connected
923 * route of the set of lowest metric connected routes.
925 if (alternate
->type
== ZEBRA_ROUTE_CONNECT
) {
926 if (current
->type
!= ZEBRA_ROUTE_CONNECT
)
929 /* both are connected. are either loop or vrf? */
930 struct nexthop
*nexthop
= NULL
;
932 for (ALL_NEXTHOPS_PTR(alternate
->nhe
->nhg
, nexthop
)) {
933 struct interface
*ifp
= if_lookup_by_index(
934 nexthop
->ifindex
, alternate
->vrf_id
);
936 if (ifp
&& if_is_loopback_or_vrf(ifp
))
940 for (ALL_NEXTHOPS_PTR(current
->nhe
->nhg
, nexthop
)) {
941 struct interface
*ifp
= if_lookup_by_index(
942 nexthop
->ifindex
, current
->vrf_id
);
944 if (ifp
&& if_is_loopback_or_vrf(ifp
))
948 /* Neither are loop or vrf so pick best metric */
949 if (alternate
->metric
<= current
->metric
)
955 if (current
->type
== ZEBRA_ROUTE_CONNECT
)
958 /* higher distance loses */
959 if (alternate
->distance
< current
->distance
)
961 if (current
->distance
< alternate
->distance
)
964 /* metric tie-breaks equal distance */
965 if (alternate
->metric
<= current
->metric
)
971 /* Core function for processing nexthop group contexts's off metaq */
972 static void rib_nhg_process(struct nhg_ctx
*ctx
)
974 nhg_ctx_process(ctx
);
977 /* Core function for processing routing information base. */
978 static void rib_process(struct route_node
*rn
)
980 struct route_entry
*re
;
981 struct route_entry
*next
;
982 struct route_entry
*old_selected
= NULL
;
983 struct route_entry
*new_selected
= NULL
;
984 struct route_entry
*old_fib
= NULL
;
985 struct route_entry
*new_fib
= NULL
;
986 struct route_entry
*best
= NULL
;
987 char buf
[SRCDEST2STR_BUFFER
];
989 struct zebra_vrf
*zvrf
= NULL
;
990 const struct prefix
*p
, *src_p
;
992 srcdest_rnode_prefixes(rn
, &p
, &src_p
);
993 vrf_id_t vrf_id
= VRF_UNKNOWN
;
997 dest
= rib_dest_from_rnode(rn
);
999 zvrf
= rib_dest_vrf(dest
);
1000 vrf_id
= zvrf_id(zvrf
);
1003 if (IS_ZEBRA_DEBUG_RIB
)
1004 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
1006 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
1007 zlog_debug("%u:%s: Processing rn %p", vrf_id
, buf
, rn
);
1010 * we can have rn's that have a NULL info pointer
1011 * (dest). As such let's not let the deref happen
1012 * additionally we know RNODE_FOREACH_RE_SAFE
1013 * will not iterate so we are ok.
1016 old_fib
= dest
->selected_fib
;
1018 RNODE_FOREACH_RE_SAFE (rn
, re
, next
) {
1019 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
1021 "%u:%s: Examine re %p (%s) status %x flags %x dist %d metric %d",
1022 vrf_id
, buf
, re
, zebra_route_string(re
->type
),
1023 re
->status
, re
->flags
, re
->distance
,
1026 /* Currently selected re. */
1027 if (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_SELECTED
)) {
1028 assert(old_selected
== NULL
);
1032 /* Skip deleted entries from selection */
1033 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
1036 /* Skip unreachable nexthop. */
1037 /* This first call to nexthop_active_update is merely to
1038 * determine if there's any change to nexthops associated
1039 * with this RIB entry. Now, rib_process() can be invoked due
1040 * to an external event such as link down or due to
1041 * next-hop-tracking evaluation. In the latter case,
1042 * a decision has already been made that the NHs have changed.
1043 * So, no need to invoke a potentially expensive call again.
1044 * Further, since the change might be in a recursive NH which
1045 * is not caught in the nexthop_active_update() code. Thus, we
1046 * might miss changes to recursive NHs.
1048 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_CHANGED
)
1049 && !nexthop_active_update(rn
, re
)) {
1050 if (re
->type
== ZEBRA_ROUTE_TABLE
) {
1051 /* XXX: HERE BE DRAGONS!!!!!
1052 * In all honesty, I have not yet figured out
1053 * what this part does or why the
1054 * ROUTE_ENTRY_CHANGED test above is correct
1055 * or why we need to delete a route here, and
1056 * also not whether this concerns both selected
1057 * and fib route, or only selected
1060 * This entry was denied by the 'ip protocol
1061 * table' route-map, we need to delete it */
1062 if (re
!= old_selected
) {
1063 if (IS_ZEBRA_DEBUG_RIB
)
1065 "%s: %u:%s: imported via import-table but denied "
1066 "by the ip protocol table route-map",
1067 __func__
, vrf_id
, buf
);
1070 SET_FLAG(re
->status
,
1071 ROUTE_ENTRY_REMOVED
);
1077 /* Infinite distance. */
1078 if (re
->distance
== DISTANCE_INFINITY
) {
1079 UNSET_FLAG(re
->status
, ROUTE_ENTRY_CHANGED
);
1083 if (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_FIB_OVERRIDE
)) {
1084 best
= rib_choose_best(new_fib
, re
);
1085 if (new_fib
&& best
!= new_fib
)
1086 UNSET_FLAG(new_fib
->status
,
1087 ROUTE_ENTRY_CHANGED
);
1090 best
= rib_choose_best(new_selected
, re
);
1091 if (new_selected
&& best
!= new_selected
)
1092 UNSET_FLAG(new_selected
->status
,
1093 ROUTE_ENTRY_CHANGED
);
1094 new_selected
= best
;
1097 UNSET_FLAG(re
->status
, ROUTE_ENTRY_CHANGED
);
1098 } /* RNODE_FOREACH_RE */
1100 /* If no FIB override route, use the selected route also for FIB */
1101 if (new_fib
== NULL
)
1102 new_fib
= new_selected
;
1104 /* After the cycle is finished, the following pointers will be set:
1105 * old_selected --- RE entry currently having SELECTED
1106 * new_selected --- RE entry that is newly SELECTED
1107 * old_fib --- RE entry currently in kernel FIB
1108 * new_fib --- RE entry that is newly to be in kernel FIB
1110 * new_selected will get SELECTED flag, and is going to be redistributed
1111 * the zclients. new_fib (which can be new_selected) will be installed
1115 if (IS_ZEBRA_DEBUG_RIB_DETAILED
) {
1117 "%u:%s: After processing: old_selected %p new_selected %p old_fib %p new_fib %p",
1118 vrf_id
, buf
, (void *)old_selected
, (void *)new_selected
,
1119 (void *)old_fib
, (void *)new_fib
);
1122 /* Buffer ROUTE_ENTRY_CHANGED here, because it will get cleared if
1123 * fib == selected */
1124 bool selected_changed
= new_selected
&& CHECK_FLAG(new_selected
->status
,
1125 ROUTE_ENTRY_CHANGED
);
1127 /* Update fib according to selection results */
1128 if (new_fib
&& old_fib
)
1129 rib_process_update_fib(zvrf
, rn
, old_fib
, new_fib
);
1131 rib_process_add_fib(zvrf
, rn
, new_fib
);
1133 rib_process_del_fib(zvrf
, rn
, old_fib
);
1135 /* Update SELECTED entry */
1136 if (old_selected
!= new_selected
|| selected_changed
) {
1138 if (new_selected
&& new_selected
!= new_fib
)
1139 UNSET_FLAG(new_selected
->status
, ROUTE_ENTRY_CHANGED
);
1142 SET_FLAG(new_selected
->flags
, ZEBRA_FLAG_SELECTED
);
1146 * If we're removing the old entry, we should tell
1147 * redist subscribers about that *if* they aren't
1148 * going to see a redist for the new entry.
1150 if (!new_selected
|| CHECK_FLAG(old_selected
->status
,
1151 ROUTE_ENTRY_REMOVED
))
1152 redistribute_delete(p
, src_p
,
1156 if (old_selected
!= new_selected
)
1157 UNSET_FLAG(old_selected
->flags
,
1158 ZEBRA_FLAG_SELECTED
);
1162 /* Remove all RE entries queued for removal */
1163 RNODE_FOREACH_RE_SAFE (rn
, re
, next
) {
1164 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
)) {
1165 if (IS_ZEBRA_DEBUG_RIB
) {
1166 rnode_debug(rn
, vrf_id
, "rn %p, removing re %p",
1167 (void *)rn
, (void *)re
);
1174 * Check if the dest can be deleted now.
1179 static void zebra_rib_evaluate_mpls(struct route_node
*rn
)
1181 rib_dest_t
*dest
= rib_dest_from_rnode(rn
);
1182 struct zebra_vrf
*zvrf
= vrf_info_lookup(VRF_DEFAULT
);
1187 if (CHECK_FLAG(dest
->flags
, RIB_DEST_UPDATE_LSPS
)) {
1188 if (IS_ZEBRA_DEBUG_MPLS
)
1190 "%u: Scheduling all LSPs upon RIB completion",
1192 zebra_mpls_lsp_schedule(zvrf
);
1193 mpls_unmark_lsps_for_processing(rn
);
1198 * Utility to match route with dplane context data
1200 static bool rib_route_match_ctx(const struct route_entry
*re
,
1201 const struct zebra_dplane_ctx
*ctx
,
1204 bool result
= false;
1208 * In 'update' case, we test info about the 'previous' or
1211 if ((re
->type
== dplane_ctx_get_old_type(ctx
)) &&
1212 (re
->instance
== dplane_ctx_get_old_instance(ctx
))) {
1215 /* TODO -- we're using this extra test, but it's not
1216 * exactly clear why.
1218 if (re
->type
== ZEBRA_ROUTE_STATIC
&&
1219 (re
->distance
!= dplane_ctx_get_old_distance(ctx
) ||
1220 re
->tag
!= dplane_ctx_get_old_tag(ctx
))) {
1227 * Ordinary, single-route case using primary context info
1229 if ((dplane_ctx_get_op(ctx
) != DPLANE_OP_ROUTE_DELETE
) &&
1230 CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
)) {
1231 /* Skip route that's been deleted */
1235 if ((re
->type
== dplane_ctx_get_type(ctx
)) &&
1236 (re
->instance
== dplane_ctx_get_instance(ctx
))) {
1239 /* TODO -- we're using this extra test, but it's not
1240 * exactly clear why.
1242 if (re
->type
== ZEBRA_ROUTE_STATIC
&&
1243 (re
->distance
!= dplane_ctx_get_distance(ctx
) ||
1244 re
->tag
!= dplane_ctx_get_tag(ctx
))) {
1255 static void zebra_rib_fixup_system(struct route_node
*rn
)
1257 struct route_entry
*re
;
1259 RNODE_FOREACH_RE(rn
, re
) {
1260 struct nexthop
*nhop
;
1262 if (!RIB_SYSTEM_ROUTE(re
))
1265 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
1268 SET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1269 UNSET_FLAG(re
->status
, ROUTE_ENTRY_QUEUED
);
1271 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nhop
)) {
1272 if (CHECK_FLAG(nhop
->flags
, NEXTHOP_FLAG_RECURSIVE
))
1275 SET_FLAG(nhop
->flags
, NEXTHOP_FLAG_FIB
);
1281 * Update a route from a dplane context. This consolidates common code
1282 * that can be used in processing of results from FIB updates, and in
1283 * async notification processing.
1284 * The return is 'true' if the installed nexthops changed; 'false' otherwise.
1286 static bool rib_update_re_from_ctx(struct route_entry
*re
,
1287 struct route_node
*rn
,
1288 struct zebra_dplane_ctx
*ctx
)
1290 char dest_str
[PREFIX_STRLEN
] = "";
1291 char nh_str
[NEXTHOP_STRLEN
];
1292 struct nexthop
*nexthop
, *ctx_nexthop
;
1294 const struct nexthop_group
*ctxnhg
;
1295 bool is_selected
= false; /* Is 're' currently the selected re? */
1296 bool changed_p
= false; /* Change to nexthops? */
1299 /* Note well: only capturing the prefix string if debug is enabled here;
1300 * unconditional log messages will have to generate the string.
1302 if (IS_ZEBRA_DEBUG_RIB
)
1303 prefix2str(&(rn
->p
), dest_str
, sizeof(dest_str
));
1305 dest
= rib_dest_from_rnode(rn
);
1307 is_selected
= (re
== dest
->selected_fib
);
1309 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
1310 zlog_debug("update_from_ctx: %u:%s: %sSELECTED",
1311 re
->vrf_id
, dest_str
, (is_selected
? "" : "NOT "));
1313 /* Update zebra's nexthop FIB flag for each nexthop that was installed.
1314 * If the installed set differs from the set requested by the rib/owner,
1315 * we use the fib-specific nexthop-group to record the actual FIB
1319 /* Check both fib group and notif group for equivalence.
1321 * Let's assume the nexthops are ordered here to save time.
1323 if (nexthop_group_equal(&re
->fib_ng
, dplane_ctx_get_ng(ctx
)) == false) {
1324 if (IS_ZEBRA_DEBUG_RIB_DETAILED
) {
1326 "%u:%s update_from_ctx: notif nh and fib nh mismatch",
1327 re
->vrf_id
, dest_str
);
1334 /* If the new FIB set matches the existing FIB set, we're done. */
1336 if (IS_ZEBRA_DEBUG_RIB
)
1337 zlog_debug("%u:%s update_from_ctx(): existing fib nhg, no change",
1338 re
->vrf_id
, dest_str
);
1341 } else if (re
->fib_ng
.nexthop
) {
1343 * Free stale fib list and move on to check the rib nhg.
1345 if (IS_ZEBRA_DEBUG_RIB
)
1346 zlog_debug("%u:%s update_from_ctx(): replacing fib nhg",
1347 re
->vrf_id
, dest_str
);
1348 nexthops_free(re
->fib_ng
.nexthop
);
1349 re
->fib_ng
.nexthop
= NULL
;
1351 /* Note that the installed nexthops have changed */
1354 if (IS_ZEBRA_DEBUG_RIB
)
1355 zlog_debug("%u:%s update_from_ctx(): no fib nhg",
1356 re
->vrf_id
, dest_str
);
1360 * Compare with the rib nexthop group. The comparison here is different:
1361 * the RIB group may be a superset of the list installed in the FIB. We
1362 * walk the RIB group, looking for the 'installable' candidate
1363 * nexthops, and then check those against the set
1364 * that is actually installed.
1366 * Assume nexthops are ordered here as well.
1370 ctx_nexthop
= dplane_ctx_get_ng(ctx
)->nexthop
;
1372 /* Nothing installed - we can skip some of the checking/comparison
1375 if (ctx_nexthop
== NULL
) {
1380 /* Get the first `installed` one to check against.
1381 * If the dataplane doesn't set these to be what was actually installed,
1382 * it will just be whatever was in re->nhe->nhg?
1384 if (CHECK_FLAG(ctx_nexthop
->flags
, NEXTHOP_FLAG_RECURSIVE
)
1385 || !CHECK_FLAG(ctx_nexthop
->flags
, NEXTHOP_FLAG_ACTIVE
))
1386 ctx_nexthop
= nexthop_next_active_resolved(ctx_nexthop
);
1388 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
)) {
1390 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_RECURSIVE
))
1393 if (!CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_ACTIVE
))
1396 /* Check for a FIB nexthop corresponding to the RIB nexthop */
1397 if (nexthop_same(ctx_nexthop
, nexthop
) == false) {
1398 /* If the FIB doesn't know about the nexthop,
1399 * it's not installed
1401 if (IS_ZEBRA_DEBUG_RIB_DETAILED
) {
1402 nexthop2str(nexthop
, nh_str
, sizeof(nh_str
));
1404 "update_from_ctx: no notif match for rib nh %s",
1409 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1412 UNSET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
1414 /* Keep checking nexthops */
1418 if (CHECK_FLAG(ctx_nexthop
->flags
, NEXTHOP_FLAG_FIB
)) {
1419 if (!CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1422 SET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
1424 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1427 UNSET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
1430 ctx_nexthop
= nexthop_next_active_resolved(ctx_nexthop
);
1433 /* If all nexthops were processed, we're done */
1435 if (IS_ZEBRA_DEBUG_RIB
)
1436 zlog_debug("%u:%s update_from_ctx(): rib nhg matched, changed '%s'",
1437 re
->vrf_id
, dest_str
,
1438 (changed_p
? "true" : "false"));
1444 /* FIB nexthop set differs from the RIB set:
1445 * create a fib-specific nexthop-group
1447 if (IS_ZEBRA_DEBUG_RIB
)
1448 zlog_debug("%u:%s update_from_ctx(): changed %s, adding new fib nhg",
1449 re
->vrf_id
, dest_str
,
1450 (changed_p
? "true" : "false"));
1452 ctxnhg
= dplane_ctx_get_ng(ctx
);
1454 if (ctxnhg
->nexthop
)
1455 copy_nexthops(&(re
->fib_ng
.nexthop
), ctxnhg
->nexthop
, NULL
);
1457 /* Bit of a special case when the fib has _no_ installed
1460 nexthop
= nexthop_new();
1461 nexthop
->type
= NEXTHOP_TYPE_IPV4
;
1462 _nexthop_add(&(re
->fib_ng
.nexthop
), nexthop
);
1470 * Helper to locate a zebra route-node from a dplane context. This is used
1471 * when processing dplane results, e.g. Note well: the route-node is returned
1472 * with a ref held - route_unlock_node() must be called eventually.
1474 static struct route_node
*
1475 rib_find_rn_from_ctx(const struct zebra_dplane_ctx
*ctx
)
1477 struct route_table
*table
= NULL
;
1478 struct route_node
*rn
= NULL
;
1479 const struct prefix
*dest_pfx
, *src_pfx
;
1481 /* Locate rn and re(s) from ctx */
1483 table
= zebra_vrf_lookup_table_with_table_id(
1484 dplane_ctx_get_afi(ctx
), dplane_ctx_get_safi(ctx
),
1485 dplane_ctx_get_vrf(ctx
), dplane_ctx_get_table(ctx
));
1486 if (table
== NULL
) {
1487 if (IS_ZEBRA_DEBUG_DPLANE
) {
1488 zlog_debug("Failed to find route for ctx: no table for afi %d, safi %d, vrf %u",
1489 dplane_ctx_get_afi(ctx
),
1490 dplane_ctx_get_safi(ctx
),
1491 dplane_ctx_get_vrf(ctx
));
1496 dest_pfx
= dplane_ctx_get_dest(ctx
);
1497 src_pfx
= dplane_ctx_get_src(ctx
);
1499 rn
= srcdest_rnode_get(table
, dest_pfx
,
1500 src_pfx
? (struct prefix_ipv6
*)src_pfx
: NULL
);
1509 * Route-update results processing after async dataplane update.
1511 static void rib_process_result(struct zebra_dplane_ctx
*ctx
)
1513 struct zebra_vrf
*zvrf
= NULL
;
1514 struct route_node
*rn
= NULL
;
1515 struct route_entry
*re
= NULL
, *old_re
= NULL
, *rib
;
1516 bool is_update
= false;
1517 char dest_str
[PREFIX_STRLEN
] = "";
1518 enum dplane_op_e op
;
1519 enum zebra_dplane_result status
;
1520 const struct prefix
*dest_pfx
, *src_pfx
;
1522 bool fib_changed
= false;
1524 zvrf
= vrf_info_lookup(dplane_ctx_get_vrf(ctx
));
1525 dest_pfx
= dplane_ctx_get_dest(ctx
);
1527 /* Note well: only capturing the prefix string if debug is enabled here;
1528 * unconditional log messages will have to generate the string.
1530 if (IS_ZEBRA_DEBUG_DPLANE
)
1531 prefix2str(dest_pfx
, dest_str
, sizeof(dest_str
));
1533 /* Locate rn and re(s) from ctx */
1534 rn
= rib_find_rn_from_ctx(ctx
);
1536 if (IS_ZEBRA_DEBUG_DPLANE
) {
1537 zlog_debug("Failed to process dplane results: no route for %u:%s",
1538 dplane_ctx_get_vrf(ctx
), dest_str
);
1543 srcdest_rnode_prefixes(rn
, &dest_pfx
, &src_pfx
);
1545 op
= dplane_ctx_get_op(ctx
);
1546 status
= dplane_ctx_get_status(ctx
);
1548 if (IS_ZEBRA_DEBUG_DPLANE_DETAIL
)
1549 zlog_debug("%u:%s Processing dplane ctx %p, op %s result %s",
1550 dplane_ctx_get_vrf(ctx
), dest_str
, ctx
,
1551 dplane_op2str(op
), dplane_res2str(status
));
1554 * Update is a bit of a special case, where we may have both old and new
1555 * routes to post-process.
1557 is_update
= dplane_ctx_is_update(ctx
);
1560 * Take a pass through the routes, look for matches with the context
1563 RNODE_FOREACH_RE(rn
, rib
) {
1566 if (rib_route_match_ctx(rib
, ctx
, false))
1570 /* Check for old route match */
1571 if (is_update
&& (old_re
== NULL
)) {
1572 if (rib_route_match_ctx(rib
, ctx
, true /*is_update*/))
1576 /* Have we found the routes we need to work on? */
1577 if (re
&& ((!is_update
|| old_re
)))
1581 seq
= dplane_ctx_get_seq(ctx
);
1584 * Check sequence number(s) to detect stale results before continuing
1587 if (re
->dplane_sequence
!= seq
) {
1588 if (IS_ZEBRA_DEBUG_DPLANE_DETAIL
)
1589 zlog_debug("%u:%s Stale dplane result for re %p",
1590 dplane_ctx_get_vrf(ctx
),
1593 UNSET_FLAG(re
->status
, ROUTE_ENTRY_QUEUED
);
1597 if (old_re
->dplane_sequence
!= dplane_ctx_get_old_seq(ctx
)) {
1598 if (IS_ZEBRA_DEBUG_DPLANE_DETAIL
)
1599 zlog_debug("%u:%s Stale dplane result for old_re %p",
1600 dplane_ctx_get_vrf(ctx
),
1603 UNSET_FLAG(old_re
->status
, ROUTE_ENTRY_QUEUED
);
1607 case DPLANE_OP_ROUTE_INSTALL
:
1608 case DPLANE_OP_ROUTE_UPDATE
:
1609 if (status
== ZEBRA_DPLANE_REQUEST_SUCCESS
) {
1611 UNSET_FLAG(re
->status
, ROUTE_ENTRY_FAILED
);
1612 SET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1615 * On an update operation from the same route type
1616 * context retrieval currently has no way to know
1617 * which was the old and which was the new.
1618 * So don't unset our flags that we just set.
1619 * We know redistribution is ok because the
1620 * old_re in this case is used for nothing
1621 * more than knowing whom to contact if necessary.
1623 if (old_re
&& old_re
!= re
) {
1624 UNSET_FLAG(old_re
->status
, ROUTE_ENTRY_FAILED
);
1625 UNSET_FLAG(old_re
->status
,
1626 ROUTE_ENTRY_INSTALLED
);
1629 /* Update zebra route based on the results in
1630 * the context struct.
1634 rib_update_re_from_ctx(re
, rn
, ctx
);
1637 if (IS_ZEBRA_DEBUG_DPLANE_DETAIL
)
1638 zlog_debug("%u:%s no fib change for re",
1645 redistribute_update(dest_pfx
, src_pfx
,
1650 * System routes are weird in that they
1651 * allow multiple to be installed that match
1652 * to the same prefix, so after we get the
1653 * result we need to clean them up so that
1654 * we can actually use them.
1656 if ((re
&& RIB_SYSTEM_ROUTE(re
)) ||
1657 (old_re
&& RIB_SYSTEM_ROUTE(old_re
)))
1658 zebra_rib_fixup_system(rn
);
1663 /* Notify route owner */
1664 zsend_route_notify_owner_ctx(ctx
, ZAPI_ROUTE_INSTALLED
);
1668 SET_FLAG(re
->status
, ROUTE_ENTRY_FAILED
);
1669 UNSET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1671 SET_FLAG(old_re
->status
, ROUTE_ENTRY_FAILED
);
1673 zsend_route_notify_owner(re
, dest_pfx
,
1674 ZAPI_ROUTE_FAIL_INSTALL
);
1676 zlog_warn("%u:%s: Route install failed",
1677 dplane_ctx_get_vrf(ctx
),
1678 prefix2str(dest_pfx
,
1679 dest_str
, sizeof(dest_str
)));
1682 case DPLANE_OP_ROUTE_DELETE
:
1684 SET_FLAG(re
->status
, ROUTE_ENTRY_FAILED
);
1686 * In the delete case, the zebra core datastructs were
1687 * updated (or removed) at the time the delete was issued,
1688 * so we're just notifying the route owner.
1690 if (status
== ZEBRA_DPLANE_REQUEST_SUCCESS
) {
1692 UNSET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1693 UNSET_FLAG(re
->status
, ROUTE_ENTRY_FAILED
);
1695 zsend_route_notify_owner_ctx(ctx
, ZAPI_ROUTE_REMOVED
);
1701 SET_FLAG(re
->status
, ROUTE_ENTRY_FAILED
);
1702 zsend_route_notify_owner_ctx(ctx
,
1703 ZAPI_ROUTE_REMOVE_FAIL
);
1705 zlog_warn("%u:%s: Route Deletion failure",
1706 dplane_ctx_get_vrf(ctx
),
1707 prefix2str(dest_pfx
,
1708 dest_str
, sizeof(dest_str
)));
1712 * System routes are weird in that they
1713 * allow multiple to be installed that match
1714 * to the same prefix, so after we get the
1715 * result we need to clean them up so that
1716 * we can actually use them.
1718 if ((re
&& RIB_SYSTEM_ROUTE(re
)) ||
1719 (old_re
&& RIB_SYSTEM_ROUTE(old_re
)))
1720 zebra_rib_fixup_system(rn
);
1726 zebra_rib_evaluate_rn_nexthops(rn
, seq
);
1727 zebra_rib_evaluate_mpls(rn
);
1731 route_unlock_node(rn
);
1733 /* Return context to dataplane module */
1734 dplane_ctx_fini(&ctx
);
1738 * Handle notification from async dataplane: the dataplane has detected
1739 * some change to a route, and notifies zebra so that the control plane
1740 * can reflect that change.
1742 static void rib_process_dplane_notify(struct zebra_dplane_ctx
*ctx
)
1744 struct route_node
*rn
= NULL
;
1745 struct route_entry
*re
= NULL
;
1746 struct nexthop
*nexthop
;
1747 char dest_str
[PREFIX_STRLEN
] = "";
1748 const struct prefix
*dest_pfx
, *src_pfx
;
1750 bool fib_changed
= false;
1751 bool debug_p
= IS_ZEBRA_DEBUG_DPLANE
| IS_ZEBRA_DEBUG_RIB
;
1752 int start_count
, end_count
;
1753 dest_pfx
= dplane_ctx_get_dest(ctx
);
1755 /* Note well: only capturing the prefix string if debug is enabled here;
1756 * unconditional log messages will have to generate the string.
1759 prefix2str(dest_pfx
, dest_str
, sizeof(dest_str
));
1761 /* Locate rn and re(s) from ctx */
1762 rn
= rib_find_rn_from_ctx(ctx
);
1765 zlog_debug("Failed to process dplane notification: no routes for %u:%s",
1766 dplane_ctx_get_vrf(ctx
), dest_str
);
1771 dest
= rib_dest_from_rnode(rn
);
1772 srcdest_rnode_prefixes(rn
, &dest_pfx
, &src_pfx
);
1775 zlog_debug("%u:%s Processing dplane notif ctx %p",
1776 dplane_ctx_get_vrf(ctx
), dest_str
, ctx
);
1779 * Take a pass through the routes, look for matches with the context
1782 RNODE_FOREACH_RE(rn
, re
) {
1783 if (rib_route_match_ctx(re
, ctx
, false /*!update*/))
1787 /* No match? Nothing we can do */
1790 zlog_debug("%u:%s Unable to process dplane notification: no entry for type %s",
1791 dplane_ctx_get_vrf(ctx
), dest_str
,
1793 dplane_ctx_get_type(ctx
)));
1798 /* Ensure we clear the QUEUED flag */
1799 UNSET_FLAG(re
->status
, ROUTE_ENTRY_QUEUED
);
1801 /* Is this a notification that ... matters? We mostly care about
1802 * the route that is currently selected for installation; we may also
1803 * get an un-install notification, and handle that too.
1805 if (re
!= dest
->selected_fib
) {
1807 * If we need to, clean up after a delete that was part of
1808 * an update operation.
1811 for (ALL_NEXTHOPS_PTR(dplane_ctx_get_ng(ctx
), nexthop
)) {
1812 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1816 /* If no nexthops or none installed, ensure that this re
1817 * gets its 'installed' flag cleared.
1819 if (end_count
== 0) {
1820 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
))
1821 UNSET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1823 zlog_debug("%u:%s dplane notif, uninstalled type %s route",
1824 dplane_ctx_get_vrf(ctx
), dest_str
,
1826 dplane_ctx_get_type(ctx
)));
1828 /* At least report on the event. */
1830 zlog_debug("%u:%s dplane notif, but type %s not selected_fib",
1831 dplane_ctx_get_vrf(ctx
), dest_str
,
1833 dplane_ctx_get_type(ctx
)));
1838 /* We'll want to determine whether the installation status of the
1839 * route has changed: we'll check the status before processing,
1840 * and then again if there's been a change.
1844 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
)) {
1845 for (ALL_NEXTHOPS_PTR(rib_active_nhg(re
), nexthop
)) {
1846 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1851 /* Update zebra's nexthop FIB flags based on the context struct's
1854 fib_changed
= rib_update_re_from_ctx(re
, rn
, ctx
);
1858 zlog_debug("%u:%s dplane notification: rib_update returns FALSE",
1859 dplane_ctx_get_vrf(ctx
), dest_str
);
1863 * Perform follow-up work if the actual status of the prefix
1868 for (ALL_NEXTHOPS_PTR(rib_active_nhg(re
), nexthop
)) {
1869 if (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
))
1873 /* Various fib transitions: changed nexthops; from installed to
1874 * not-installed; or not-installed to installed.
1876 if (start_count
> 0 && end_count
> 0) {
1878 zlog_debug("%u:%s applied nexthop changes from dplane notification",
1879 dplane_ctx_get_vrf(ctx
), dest_str
);
1881 /* Changed nexthops - update kernel/others */
1882 dplane_route_notif_update(rn
, re
,
1883 DPLANE_OP_ROUTE_UPDATE
, ctx
);
1885 } else if (start_count
== 0 && end_count
> 0) {
1887 zlog_debug("%u:%s installed transition from dplane notification",
1888 dplane_ctx_get_vrf(ctx
), dest_str
);
1890 /* We expect this to be the selected route, so we want
1891 * to tell others about this transition.
1893 SET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1895 /* Changed nexthops - update kernel/others */
1896 dplane_route_notif_update(rn
, re
, DPLANE_OP_ROUTE_INSTALL
, ctx
);
1898 /* Redistribute, lsp, and nht update */
1899 redistribute_update(dest_pfx
, src_pfx
, re
, NULL
);
1901 zebra_rib_evaluate_rn_nexthops(
1902 rn
, zebra_router_get_next_sequence());
1904 zebra_rib_evaluate_mpls(rn
);
1906 } else if (start_count
> 0 && end_count
== 0) {
1908 zlog_debug("%u:%s un-installed transition from dplane notification",
1909 dplane_ctx_get_vrf(ctx
), dest_str
);
1911 /* Transition from _something_ installed to _nothing_
1914 /* We expect this to be the selected route, so we want
1915 * to tell others about this transistion.
1917 UNSET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
1919 /* Changed nexthops - update kernel/others */
1920 dplane_route_notif_update(rn
, re
, DPLANE_OP_ROUTE_DELETE
, ctx
);
1922 /* Redistribute, lsp, and nht update */
1923 redistribute_delete(dest_pfx
, src_pfx
, re
, NULL
);
1925 zebra_rib_evaluate_rn_nexthops(
1926 rn
, zebra_router_get_next_sequence());
1928 zebra_rib_evaluate_mpls(rn
);
1933 route_unlock_node(rn
);
1935 /* Return context to dataplane module */
1936 dplane_ctx_fini(&ctx
);
1939 static void process_subq_nhg(struct listnode
*lnode
)
1941 struct nhg_ctx
*ctx
= NULL
;
1942 uint8_t qindex
= route_info
[ZEBRA_ROUTE_NHG
].meta_q_map
;
1944 ctx
= listgetdata(lnode
);
1949 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
1950 zlog_debug("NHG Context id=%u dequeued from sub-queue %u",
1953 rib_nhg_process(ctx
);
1956 static void process_subq_route(struct listnode
*lnode
, uint8_t qindex
)
1958 struct route_node
*rnode
= NULL
;
1959 rib_dest_t
*dest
= NULL
;
1960 struct zebra_vrf
*zvrf
= NULL
;
1962 rnode
= listgetdata(lnode
);
1963 dest
= rib_dest_from_rnode(rnode
);
1965 zvrf
= rib_dest_vrf(dest
);
1969 if (IS_ZEBRA_DEBUG_RIB_DETAILED
) {
1970 char buf
[SRCDEST2STR_BUFFER
];
1972 srcdest_rnode2str(rnode
, buf
, sizeof(buf
));
1973 zlog_debug("%u:%s: rn %p dequeued from sub-queue %u",
1974 zvrf
? zvrf_id(zvrf
) : 0, buf
, rnode
, qindex
);
1978 UNSET_FLAG(rib_dest_from_rnode(rnode
)->flags
,
1979 RIB_ROUTE_QUEUED(qindex
));
1984 zlog_debug ("%s: called for route_node (%p, %d) with no ribs",
1985 __func__
, rnode
, rnode
->lock
);
1986 zlog_backtrace(LOG_DEBUG
);
1989 route_unlock_node(rnode
);
1992 /* Take a list of route_node structs and return 1, if there was a record
1993 * picked from it and processed by rib_process(). Don't process more,
1994 * than one RN record; operate only in the specified sub-queue.
1996 static unsigned int process_subq(struct list
*subq
, uint8_t qindex
)
1998 struct listnode
*lnode
= listhead(subq
);
2003 if (qindex
== route_info
[ZEBRA_ROUTE_NHG
].meta_q_map
)
2004 process_subq_nhg(lnode
);
2006 process_subq_route(lnode
, qindex
);
2008 list_delete_node(subq
, lnode
);
2013 /* Dispatch the meta queue by picking, processing and unlocking the next RN from
2014 * a non-empty sub-queue with lowest priority. wq is equal to zebra->ribq and
2016 * is pointed to the meta queue structure.
2018 static wq_item_status
meta_queue_process(struct work_queue
*dummy
, void *data
)
2020 struct meta_queue
*mq
= data
;
2022 uint32_t queue_len
, queue_limit
;
2024 /* Ensure there's room for more dataplane updates */
2025 queue_limit
= dplane_get_in_queue_limit();
2026 queue_len
= dplane_get_in_queue_len();
2027 if (queue_len
> queue_limit
) {
2028 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2029 zlog_debug("rib queue: dplane queue len %u, limit %u, retrying",
2030 queue_len
, queue_limit
);
2032 /* Ensure that the meta-queue is actually enqueued */
2033 if (work_queue_empty(zrouter
.ribq
))
2034 work_queue_add(zrouter
.ribq
, zrouter
.mq
);
2036 return WQ_QUEUE_BLOCKED
;
2039 for (i
= 0; i
< MQ_SIZE
; i
++)
2040 if (process_subq(mq
->subq
[i
], i
)) {
2044 return mq
->size
? WQ_REQUEUE
: WQ_SUCCESS
;
2049 * Look into the RN and queue it into the highest priority queue
2050 * at this point in time for processing.
2052 * We will enqueue a route node only once per invocation.
2054 * There are two possibilities here that should be kept in mind.
2055 * If the original invocation has not been pulled off for processing
2056 * yet, A subsuquent invocation can have a route entry with a better
2057 * meta queue index value and we can have a situation where
2058 * we might have the same node enqueued 2 times. Not necessarily
2059 * an optimal situation but it should be ok.
2061 * The other possibility is that the original invocation has not
2062 * been pulled off for processing yet, A subsusquent invocation
2063 * doesn't have a route_entry with a better meta-queue and the
2064 * original metaqueue index value will win and we'll end up with
2065 * the route node enqueued once.
2067 static int rib_meta_queue_add(struct meta_queue
*mq
, void *data
)
2069 struct route_node
*rn
= NULL
;
2070 struct route_entry
*re
= NULL
, *curr_re
= NULL
;
2071 uint8_t qindex
= MQ_SIZE
, curr_qindex
= MQ_SIZE
;
2073 rn
= (struct route_node
*)data
;
2075 RNODE_FOREACH_RE (rn
, curr_re
) {
2076 curr_qindex
= route_info
[curr_re
->type
].meta_q_map
;
2078 if (curr_qindex
<= qindex
) {
2080 qindex
= curr_qindex
;
2087 /* Invariant: at this point we always have rn->info set. */
2088 if (CHECK_FLAG(rib_dest_from_rnode(rn
)->flags
,
2089 RIB_ROUTE_QUEUED(qindex
))) {
2090 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2091 rnode_debug(rn
, re
->vrf_id
,
2092 "rn %p is already queued in sub-queue %u",
2093 (void *)rn
, qindex
);
2097 SET_FLAG(rib_dest_from_rnode(rn
)->flags
, RIB_ROUTE_QUEUED(qindex
));
2098 listnode_add(mq
->subq
[qindex
], rn
);
2099 route_lock_node(rn
);
2102 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2103 rnode_debug(rn
, re
->vrf_id
, "queued rn %p into sub-queue %u",
2104 (void *)rn
, qindex
);
2109 static int rib_meta_queue_nhg_add(struct meta_queue
*mq
, void *data
)
2111 struct nhg_ctx
*ctx
= NULL
;
2112 uint8_t qindex
= route_info
[ZEBRA_ROUTE_NHG
].meta_q_map
;
2114 ctx
= (struct nhg_ctx
*)data
;
2119 listnode_add(mq
->subq
[qindex
], ctx
);
2122 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2123 zlog_debug("NHG Context id=%u queued into sub-queue %u",
2129 static int mq_add_handler(void *data
,
2130 int (*mq_add_func
)(struct meta_queue
*mq
, void *data
))
2132 if (zrouter
.ribq
== NULL
) {
2133 flog_err(EC_ZEBRA_WQ_NONEXISTENT
,
2134 "%s: work_queue does not exist!", __func__
);
2139 * The RIB queue should normally be either empty or holding the only
2140 * work_queue_item element. In the latter case this element would
2141 * hold a pointer to the meta queue structure, which must be used to
2142 * actually queue the route nodes to process. So create the MQ
2143 * holder, if necessary, then push the work into it in any case.
2144 * This semantics was introduced after 0.99.9 release.
2146 if (work_queue_empty(zrouter
.ribq
))
2147 work_queue_add(zrouter
.ribq
, zrouter
.mq
);
2149 return mq_add_func(zrouter
.mq
, data
);
2152 /* Add route_node to work queue and schedule processing */
2153 int rib_queue_add(struct route_node
*rn
)
2157 /* Pointless to queue a route_node with no RIB entries to add or remove
2159 if (!rnode_to_ribs(rn
)) {
2160 zlog_debug("%s: called for route_node (%p, %d) with no ribs",
2161 __func__
, (void *)rn
, rn
->lock
);
2162 zlog_backtrace(LOG_DEBUG
);
2166 return mq_add_handler(rn
, &rib_meta_queue_add
);
2169 int rib_queue_nhg_add(struct nhg_ctx
*ctx
)
2173 return mq_add_handler(ctx
, &rib_meta_queue_nhg_add
);
2176 /* Create new meta queue.
2177 A destructor function doesn't seem to be necessary here.
2179 static struct meta_queue
*meta_queue_new(void)
2181 struct meta_queue
*new;
2184 new = XCALLOC(MTYPE_WORK_QUEUE
, sizeof(struct meta_queue
));
2186 for (i
= 0; i
< MQ_SIZE
; i
++) {
2187 new->subq
[i
] = list_new();
2188 assert(new->subq
[i
]);
2194 void meta_queue_free(struct meta_queue
*mq
)
2198 for (i
= 0; i
< MQ_SIZE
; i
++)
2199 list_delete(&mq
->subq
[i
]);
2201 XFREE(MTYPE_WORK_QUEUE
, mq
);
2204 /* initialise zebra rib work queue */
2205 static void rib_queue_init(void)
2207 if (!(zrouter
.ribq
= work_queue_new(zrouter
.master
,
2208 "route_node processing"))) {
2209 flog_err(EC_ZEBRA_WQ_NONEXISTENT
,
2210 "%s: could not initialise work queue!", __func__
);
2214 /* fill in the work queue spec */
2215 zrouter
.ribq
->spec
.workfunc
= &meta_queue_process
;
2216 zrouter
.ribq
->spec
.errorfunc
= NULL
;
2217 zrouter
.ribq
->spec
.completion_func
= NULL
;
2218 /* XXX: TODO: These should be runtime configurable via vty */
2219 zrouter
.ribq
->spec
.max_retries
= 3;
2220 zrouter
.ribq
->spec
.hold
= ZEBRA_RIB_PROCESS_HOLD_TIME
;
2221 zrouter
.ribq
->spec
.retry
= ZEBRA_RIB_PROCESS_RETRY_TIME
;
2223 if (!(zrouter
.mq
= meta_queue_new())) {
2224 flog_err(EC_ZEBRA_WQ_NONEXISTENT
,
2225 "%s: could not initialise meta queue!", __func__
);
2231 rib_dest_t
*zebra_rib_create_dest(struct route_node
*rn
)
2235 dest
= XCALLOC(MTYPE_RIB_DEST
, sizeof(rib_dest_t
));
2236 rnh_list_init(&dest
->nht
);
2237 route_lock_node(rn
); /* rn route table reference */
2244 /* RIB updates are processed via a queue of pointers to route_nodes.
2246 * The queue length is bounded by the maximal size of the routing table,
2247 * as a route_node will not be requeued, if already queued.
2249 * REs are submitted via rib_addnode or rib_delnode which set minimal
2250 * state, or static_install_route (when an existing RE is updated)
2251 * and then submit route_node to queue for best-path selection later.
2252 * Order of add/delete state changes are preserved for any given RE.
2254 * Deleted REs are reaped during best-path selection.
2257 * |-> rib_link or unset ROUTE_ENTRY_REMOVE |->Update kernel with
2258 * |-------->| | best RE, if required
2260 * static_install->|->rib_addqueue...... -> rib_process
2262 * |-------->| |-> rib_unlink
2263 * |-> set ROUTE_ENTRY_REMOVE |
2264 * rib_delnode (RE freed)
2266 * The 'info' pointer of a route_node points to a rib_dest_t
2267 * ('dest'). Queueing state for a route_node is kept on the dest. The
2268 * dest is created on-demand by rib_link() and is kept around at least
2269 * as long as there are ribs hanging off it (@see rib_gc_dest()).
2271 * Refcounting (aka "locking" throughout the GNU Zebra and Quagga code):
2273 * - route_nodes: refcounted by:
2274 * - dest attached to route_node:
2275 * - managed by: rib_link/rib_gc_dest
2276 * - route_node processing queue
2277 * - managed by: rib_addqueue, rib_process.
2281 /* Add RE to head of the route node. */
2282 static void rib_link(struct route_node
*rn
, struct route_entry
*re
, int process
)
2286 const char *rmap_name
;
2290 dest
= rib_dest_from_rnode(rn
);
2292 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2293 rnode_debug(rn
, re
->vrf_id
, "rn %p adding dest", rn
);
2295 dest
= zebra_rib_create_dest(rn
);
2298 re_list_add_head(&dest
->routes
, re
);
2300 afi
= (rn
->p
.family
== AF_INET
)
2302 : (rn
->p
.family
== AF_INET6
) ? AFI_IP6
: AFI_MAX
;
2303 if (is_zebra_import_table_enabled(afi
, re
->vrf_id
, re
->table
)) {
2304 struct zebra_vrf
*zvrf
= zebra_vrf_lookup_by_id(re
->vrf_id
);
2306 rmap_name
= zebra_get_import_table_route_map(afi
, re
->table
);
2307 zebra_add_import_table_entry(zvrf
, rn
, re
, rmap_name
);
2312 static void rib_addnode(struct route_node
*rn
,
2313 struct route_entry
*re
, int process
)
2315 /* RE node has been un-removed before route-node is processed.
2316 * route_node must hence already be on the queue for processing..
2318 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
)) {
2319 if (IS_ZEBRA_DEBUG_RIB
)
2320 rnode_debug(rn
, re
->vrf_id
, "rn %p, un-removed re %p",
2321 (void *)rn
, (void *)re
);
2323 UNSET_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
);
2326 rib_link(rn
, re
, process
);
2332 * Detach a rib structure from a route_node.
2334 * Note that a call to rib_unlink() should be followed by a call to
2335 * rib_gc_dest() at some point. This allows a rib_dest_t that is no
2336 * longer required to be deleted.
2338 void rib_unlink(struct route_node
*rn
, struct route_entry
*re
)
2341 struct nhg_hash_entry
*nhe
= NULL
;
2345 if (IS_ZEBRA_DEBUG_RIB
)
2346 rnode_debug(rn
, re
->vrf_id
, "rn %p, re %p", (void *)rn
,
2349 dest
= rib_dest_from_rnode(rn
);
2351 re_list_del(&dest
->routes
, re
);
2353 if (dest
->selected_fib
== re
)
2354 dest
->selected_fib
= NULL
;
2357 nhe
= zebra_nhg_lookup_id(re
->nhe_id
);
2359 zebra_nhg_decrement_ref(nhe
);
2360 } else if (re
->nhe
->nhg
)
2361 nexthop_group_delete(&re
->nhe
->nhg
);
2363 nexthops_free(re
->fib_ng
.nexthop
);
2365 XFREE(MTYPE_RE
, re
);
2368 void rib_delnode(struct route_node
*rn
, struct route_entry
*re
)
2372 if (IS_ZEBRA_DEBUG_RIB
)
2373 rnode_debug(rn
, re
->vrf_id
, "rn %p, re %p, removing",
2374 (void *)rn
, (void *)re
);
2375 SET_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
);
2377 afi
= (rn
->p
.family
== AF_INET
)
2379 : (rn
->p
.family
== AF_INET6
) ? AFI_IP6
: AFI_MAX
;
2380 if (is_zebra_import_table_enabled(afi
, re
->vrf_id
, re
->table
)) {
2381 struct zebra_vrf
*zvrf
= zebra_vrf_lookup_by_id(re
->vrf_id
);
2383 zebra_del_import_table_entry(zvrf
, rn
, re
);
2384 /* Just clean up if non main table */
2385 if (IS_ZEBRA_DEBUG_RIB
) {
2386 char buf
[SRCDEST2STR_BUFFER
];
2387 srcdest_rnode2str(rn
, buf
, sizeof(buf
));
2388 zlog_debug("%u:%s: Freeing route rn %p, re %p (%s)",
2389 re
->vrf_id
, buf
, rn
, re
,
2390 zebra_route_string(re
->type
));
2399 /* This function dumps the contents of a given RE entry into
2400 * standard debug log. Calling function name and IP prefix in
2401 * question are passed as 1st and 2nd arguments.
2404 void _route_entry_dump(const char *func
, union prefixconstptr pp
,
2405 union prefixconstptr src_pp
,
2406 const struct route_entry
*re
)
2408 const struct prefix
*src_p
= src_pp
.p
;
2409 bool is_srcdst
= src_p
&& src_p
->prefixlen
;
2410 char straddr
[PREFIX_STRLEN
];
2411 char srcaddr
[PREFIX_STRLEN
];
2412 char nhname
[PREFIX_STRLEN
];
2413 struct nexthop
*nexthop
;
2415 zlog_debug("%s: dumping RE entry %p for %s%s%s vrf %u", func
,
2416 (const void *)re
, prefix2str(pp
, straddr
, sizeof(straddr
)),
2417 is_srcdst
? " from " : "",
2418 is_srcdst
? prefix2str(src_pp
, srcaddr
, sizeof(srcaddr
))
2421 zlog_debug("%s: uptime == %lu, type == %u, instance == %d, table == %d",
2422 straddr
, (unsigned long)re
->uptime
, re
->type
, re
->instance
,
2425 "%s: metric == %u, mtu == %u, distance == %u, flags == %u, status == %u",
2426 straddr
, re
->metric
, re
->mtu
, re
->distance
, re
->flags
, re
->status
);
2427 zlog_debug("%s: nexthop_num == %u, nexthop_active_num == %u", straddr
,
2428 nexthop_group_nexthop_num(re
->nhe
->nhg
),
2429 nexthop_group_active_nexthop_num(re
->nhe
->nhg
));
2431 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
)) {
2432 struct interface
*ifp
;
2433 struct vrf
*vrf
= vrf_lookup_by_id(nexthop
->vrf_id
);
2435 switch (nexthop
->type
) {
2436 case NEXTHOP_TYPE_BLACKHOLE
:
2437 sprintf(nhname
, "Blackhole");
2439 case NEXTHOP_TYPE_IFINDEX
:
2440 ifp
= if_lookup_by_index(nexthop
->ifindex
,
2442 sprintf(nhname
, "%s", ifp
? ifp
->name
: "Unknown");
2444 case NEXTHOP_TYPE_IPV4
:
2446 case NEXTHOP_TYPE_IPV4_IFINDEX
:
2447 inet_ntop(AF_INET
, &nexthop
->gate
, nhname
,
2450 case NEXTHOP_TYPE_IPV6
:
2451 case NEXTHOP_TYPE_IPV6_IFINDEX
:
2452 inet_ntop(AF_INET6
, &nexthop
->gate
, nhname
,
2456 zlog_debug("%s: %s %s[%u] vrf %s(%u) with flags %s%s%s%s%s%s",
2457 straddr
, (nexthop
->rparent
? " NH" : "NH"), nhname
,
2458 nexthop
->ifindex
, vrf
? vrf
->name
: "Unknown",
2460 (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_ACTIVE
)
2463 (CHECK_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
)
2466 (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_RECURSIVE
)
2469 (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_ONLINK
)
2472 (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_MATCHED
)
2475 (CHECK_FLAG(nexthop
->flags
, NEXTHOP_FLAG_DUPLICATE
)
2479 zlog_debug("%s: dump complete", straddr
);
2482 /* This is an exported helper to rtm_read() to dump the strange
2483 * RE entry found by rib_lookup_ipv4_route()
2486 void rib_lookup_and_dump(struct prefix_ipv4
*p
, vrf_id_t vrf_id
)
2488 struct route_table
*table
;
2489 struct route_node
*rn
;
2490 struct route_entry
*re
;
2491 char prefix_buf
[INET_ADDRSTRLEN
];
2494 table
= zebra_vrf_table(AFI_IP
, SAFI_UNICAST
, vrf_id
);
2496 flog_err(EC_ZEBRA_TABLE_LOOKUP_FAILED
,
2497 "%s:%u zebra_vrf_table() returned NULL", __func__
,
2502 /* Scan the RIB table for exactly matching RE entry. */
2503 rn
= route_node_lookup(table
, (struct prefix
*)p
);
2505 /* No route for this prefix. */
2507 zlog_debug("%s:%u lookup failed for %s", __func__
, vrf_id
,
2508 prefix2str((struct prefix
*)p
, prefix_buf
,
2509 sizeof(prefix_buf
)));
2514 route_unlock_node(rn
);
2517 RNODE_FOREACH_RE (rn
, re
) {
2518 zlog_debug("%s:%u rn %p, re %p: %s, %s",
2520 (void *)rn
, (void *)re
,
2521 (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
)
2524 (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_SELECTED
)
2527 route_entry_dump(p
, NULL
, re
);
2531 /* Check if requested address assignment will fail due to another
2532 * route being installed by zebra in FIB already. Take necessary
2533 * actions, if needed: remove such a route from FIB and deSELECT
2534 * corresponding RE entry. Then put affected RN into RIBQ head.
2536 void rib_lookup_and_pushup(struct prefix_ipv4
*p
, vrf_id_t vrf_id
)
2538 struct route_table
*table
;
2539 struct route_node
*rn
;
2542 if (NULL
== (table
= zebra_vrf_table(AFI_IP
, SAFI_UNICAST
, vrf_id
))) {
2543 flog_err(EC_ZEBRA_TABLE_LOOKUP_FAILED
,
2544 "%s:%u zebra_vrf_table() returned NULL", __func__
,
2549 /* No matches would be the simplest case. */
2550 if (NULL
== (rn
= route_node_lookup(table
, (struct prefix
*)p
)))
2554 route_unlock_node(rn
);
2556 dest
= rib_dest_from_rnode(rn
);
2557 /* Check all RE entries. In case any changes have to be done, requeue
2558 * the RN into RIBQ head. If the routing message about the new connected
2559 * route (generated by the IP address we are going to assign very soon)
2560 * comes before the RIBQ is processed, the new RE entry will join
2561 * RIBQ record already on head. This is necessary for proper
2563 * of the rest of the RE.
2565 if (dest
->selected_fib
) {
2566 if (IS_ZEBRA_DEBUG_RIB
) {
2567 char buf
[PREFIX_STRLEN
];
2569 zlog_debug("%u:%s: freeing way for connected prefix",
2570 dest
->selected_fib
->vrf_id
,
2571 prefix2str(&rn
->p
, buf
, sizeof(buf
)));
2572 route_entry_dump(&rn
->p
, NULL
, dest
->selected_fib
);
2574 rib_uninstall(rn
, dest
->selected_fib
);
2579 int rib_add_multipath(afi_t afi
, safi_t safi
, struct prefix
*p
,
2580 struct prefix_ipv6
*src_p
, struct route_entry
*re
,
2581 struct nexthop_group
*ng
)
2583 struct nhg_hash_entry
*nhe
= NULL
;
2584 struct route_table
*table
;
2585 struct route_node
*rn
;
2586 struct route_entry
*same
= NULL
;
2592 assert(!src_p
|| !src_p
->prefixlen
|| afi
== AFI_IP6
);
2595 table
= zebra_vrf_get_table_with_table_id(afi
, safi
, re
->vrf_id
,
2599 nexthop_group_delete(&ng
);
2600 XFREE(MTYPE_RE
, re
);
2605 nhe
= zebra_nhg_lookup_id(re
->nhe_id
);
2609 EC_ZEBRA_TABLE_LOOKUP_FAILED
,
2610 "Zebra failed to find the nexthop hash entry for id=%u in a route entry",
2612 XFREE(MTYPE_RE
, re
);
2616 nhe
= zebra_nhg_rib_find(0, ng
, afi
);
2619 * The nexthops got copied over into an nhe,
2622 nexthop_group_delete(&ng
);
2625 char buf
[PREFIX_STRLEN
] = "";
2626 char buf2
[PREFIX_STRLEN
] = "";
2629 EC_ZEBRA_TABLE_LOOKUP_FAILED
,
2630 "Zebra failed to find or create a nexthop hash entry for %s%s%s",
2631 prefix2str(p
, buf
, sizeof(buf
)),
2632 src_p
? " from " : "",
2633 src_p
? prefix2str(src_p
, buf2
, sizeof(buf2
))
2636 XFREE(MTYPE_RE
, re
);
2642 * Attach the re to the nhe's nexthop group.
2644 * TODO: This will need to change when we start getting IDs from upper
2645 * level protocols, as the refcnt might be wrong, since it checks
2646 * if old_id != new_id.
2648 route_entry_update_nhe(re
, nhe
);
2650 /* Make it sure prefixlen is applied to the prefix. */
2653 apply_mask_ipv6(src_p
);
2655 /* Set default distance by route type. */
2656 if (re
->distance
== 0)
2657 re
->distance
= route_distance(re
->type
);
2659 /* Lookup route node.*/
2660 rn
= srcdest_rnode_get(table
, p
, src_p
);
2663 * If same type of route are installed, treat it as a implicit
2665 * If the user has specified the No route replace semantics
2666 * for the install don't do a route replace.
2668 RNODE_FOREACH_RE (rn
, same
) {
2669 if (CHECK_FLAG(same
->status
, ROUTE_ENTRY_REMOVED
))
2672 if (same
->type
!= re
->type
)
2674 if (same
->instance
!= re
->instance
)
2676 if (same
->type
== ZEBRA_ROUTE_KERNEL
2677 && same
->metric
!= re
->metric
)
2680 if (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_RR_USE_DISTANCE
) &&
2681 same
->distance
!= re
->distance
)
2685 * We should allow duplicate connected routes
2686 * because of IPv6 link-local routes and unnumbered
2687 * interfaces on Linux.
2689 if (same
->type
!= ZEBRA_ROUTE_CONNECT
)
2693 /* If this route is kernel/connected route, notify the dataplane. */
2694 if (RIB_SYSTEM_ROUTE(re
)) {
2695 /* Notify dataplane */
2696 dplane_sys_route_add(rn
, re
);
2699 /* Link new re to node.*/
2700 if (IS_ZEBRA_DEBUG_RIB
) {
2701 rnode_debug(rn
, re
->vrf_id
,
2702 "Inserting route rn %p, re %p (%s) existing %p",
2703 rn
, re
, zebra_route_string(re
->type
), same
);
2705 if (IS_ZEBRA_DEBUG_RIB_DETAILED
)
2706 route_entry_dump(p
, src_p
, re
);
2709 SET_FLAG(re
->status
, ROUTE_ENTRY_CHANGED
);
2710 rib_addnode(rn
, re
, 1);
2713 /* Free implicit route.*/
2715 rib_delnode(rn
, same
);
2719 route_unlock_node(rn
);
2723 void rib_delete(afi_t afi
, safi_t safi
, vrf_id_t vrf_id
, int type
,
2724 unsigned short instance
, int flags
, struct prefix
*p
,
2725 struct prefix_ipv6
*src_p
, const struct nexthop
*nh
,
2726 uint32_t nhe_id
, uint32_t table_id
, uint32_t metric
,
2727 uint8_t distance
, bool fromkernel
)
2729 struct route_table
*table
;
2730 struct route_node
*rn
;
2731 struct route_entry
*re
;
2732 struct route_entry
*fib
= NULL
;
2733 struct route_entry
*same
= NULL
;
2734 struct nexthop
*rtnh
;
2735 char buf2
[INET6_ADDRSTRLEN
];
2738 assert(!src_p
|| !src_p
->prefixlen
|| afi
== AFI_IP6
);
2741 table
= zebra_vrf_lookup_table_with_table_id(afi
, safi
, vrf_id
,
2749 apply_mask_ipv6(src_p
);
2751 /* Lookup route node. */
2752 rn
= srcdest_rnode_lookup(table
, p
, src_p
);
2754 char dst_buf
[PREFIX_STRLEN
], src_buf
[PREFIX_STRLEN
];
2756 prefix2str(p
, dst_buf
, sizeof(dst_buf
));
2757 if (src_p
&& src_p
->prefixlen
)
2758 prefix2str(src_p
, src_buf
, sizeof(src_buf
));
2762 if (IS_ZEBRA_DEBUG_RIB
) {
2763 struct vrf
*vrf
= vrf_lookup_by_id(vrf_id
);
2765 zlog_debug("%s[%d]:%s%s%s doesn't exist in rib",
2766 vrf
->name
, table_id
, dst_buf
,
2767 (src_buf
[0] != '\0') ? " from " : "",
2773 dest
= rib_dest_from_rnode(rn
);
2774 fib
= dest
->selected_fib
;
2776 /* Lookup same type route. */
2777 RNODE_FOREACH_RE (rn
, re
) {
2778 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
2781 if (re
->type
!= type
)
2783 if (re
->instance
!= instance
)
2785 if (CHECK_FLAG(re
->flags
, ZEBRA_FLAG_RR_USE_DISTANCE
) &&
2786 distance
!= re
->distance
)
2789 if (re
->type
== ZEBRA_ROUTE_KERNEL
&& re
->metric
!= metric
)
2791 if (re
->type
== ZEBRA_ROUTE_CONNECT
&&
2792 (rtnh
= re
->nhe
->nhg
->nexthop
)
2793 && rtnh
->type
== NEXTHOP_TYPE_IFINDEX
&& nh
) {
2794 if (rtnh
->ifindex
!= nh
->ifindex
)
2800 /* Make sure that the route found has the same gateway. */
2801 if (nhe_id
&& re
->nhe_id
== nhe_id
) {
2810 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, rtnh
)) {
2812 * No guarantee all kernel send nh with labels
2815 if (nexthop_same_no_labels(rtnh
, nh
)) {
2824 /* If same type of route can't be found and this message is from
2828 * In the past(HA!) we could get here because
2829 * we were receiving a route delete from the
2830 * kernel and we're not marking the proto
2831 * as coming from it's appropriate originator.
2832 * Now that we are properly noticing the fact
2833 * that the kernel has deleted our route we
2834 * are not going to get called in this path
2835 * I am going to leave this here because
2836 * this might still work this way on non-linux
2837 * platforms as well as some weird state I have
2838 * not properly thought of yet.
2839 * If we can show that this code path is
2840 * dead then we can remove it.
2842 if (fib
&& CHECK_FLAG(flags
, ZEBRA_FLAG_SELFROUTE
)) {
2843 if (IS_ZEBRA_DEBUG_RIB
) {
2844 rnode_debug(rn
, vrf_id
,
2845 "rn %p, re %p (%s) was deleted from kernel, adding",
2847 zebra_route_string(fib
->type
));
2850 UNSET_FLAG(fib
->status
, ROUTE_ENTRY_INSTALLED
);
2852 for (rtnh
= fib
->nhe
->nhg
->nexthop
; rtnh
;
2854 UNSET_FLAG(rtnh
->flags
,
2858 * This is a non FRR route
2859 * as such we should mark
2862 dest
->selected_fib
= NULL
;
2864 /* This means someone else, other than Zebra,
2866 * a Zebra router from the kernel. We will add
2868 rib_install_kernel(rn
, fib
, NULL
);
2871 if (IS_ZEBRA_DEBUG_RIB
) {
2875 "via %s ifindex %d type %d "
2876 "doesn't exist in rib",
2877 inet_ntop(afi2family(afi
),
2884 "type %d doesn't exist in rib",
2887 route_unlock_node(rn
);
2893 if (fromkernel
&& CHECK_FLAG(flags
, ZEBRA_FLAG_SELFROUTE
)
2895 rib_install_kernel(rn
, same
, NULL
);
2896 route_unlock_node(rn
);
2901 /* Special handling for IPv4 or IPv6 routes sourced from
2902 * EVPN - the nexthop (and associated MAC) need to be
2903 * uninstalled if no more refs.
2905 if (CHECK_FLAG(flags
, ZEBRA_FLAG_EVPN_ROUTE
)) {
2906 struct nexthop
*tmp_nh
;
2908 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, tmp_nh
)) {
2909 struct ipaddr vtep_ip
;
2911 memset(&vtep_ip
, 0, sizeof(struct ipaddr
));
2912 if (afi
== AFI_IP
) {
2913 vtep_ip
.ipa_type
= IPADDR_V4
;
2914 memcpy(&(vtep_ip
.ipaddr_v4
),
2915 &(tmp_nh
->gate
.ipv4
),
2916 sizeof(struct in_addr
));
2918 vtep_ip
.ipa_type
= IPADDR_V6
;
2919 memcpy(&(vtep_ip
.ipaddr_v6
),
2920 &(tmp_nh
->gate
.ipv6
),
2921 sizeof(struct in6_addr
));
2923 zebra_vxlan_evpn_vrf_route_del(re
->vrf_id
,
2928 /* Notify dplane if system route changes */
2929 if (RIB_SYSTEM_ROUTE(re
))
2930 dplane_sys_route_del(rn
, same
);
2932 rib_delnode(rn
, same
);
2935 route_unlock_node(rn
);
2940 int rib_add(afi_t afi
, safi_t safi
, vrf_id_t vrf_id
, int type
,
2941 unsigned short instance
, int flags
, struct prefix
*p
,
2942 struct prefix_ipv6
*src_p
, const struct nexthop
*nh
,
2943 uint32_t nhe_id
, uint32_t table_id
, uint32_t metric
, uint32_t mtu
,
2944 uint8_t distance
, route_tag_t tag
)
2946 struct route_entry
*re
= NULL
;
2947 struct nexthop
*nexthop
= NULL
;
2948 struct nexthop_group
*ng
= NULL
;
2950 /* Allocate new route_entry structure. */
2951 re
= XCALLOC(MTYPE_RE
, sizeof(struct route_entry
));
2953 re
->instance
= instance
;
2954 re
->distance
= distance
;
2956 re
->metric
= metric
;
2958 re
->table
= table_id
;
2959 re
->vrf_id
= vrf_id
;
2960 re
->uptime
= monotime(NULL
);
2962 re
->nhe_id
= nhe_id
;
2964 /* If the owner of the route supplies a shared nexthop-group id,
2965 * we'll use that. Otherwise, pass the nexthop along directly.
2968 ng
= nexthop_group_new();
2971 nexthop
= nexthop_new();
2973 nexthop_group_add_sorted(ng
, nexthop
);
2976 return rib_add_multipath(afi
, safi
, p
, src_p
, re
, ng
);
2979 static const char *rib_update_event2str(rib_update_event_t event
)
2981 const char *ret
= "UNKNOWN";
2984 case RIB_UPDATE_KERNEL
:
2985 ret
= "RIB_UPDATE_KERNEL";
2987 case RIB_UPDATE_RMAP_CHANGE
:
2988 ret
= "RIB_UPDATE_RMAP_CHANGE";
2990 case RIB_UPDATE_OTHER
:
2991 ret
= "RIB_UPDATE_OTHER";
2993 case RIB_UPDATE_MAX
:
3001 /* Schedule route nodes to be processed if they match the type */
3002 static void rib_update_route_node(struct route_node
*rn
, int type
)
3004 struct route_entry
*re
, *next
;
3005 bool re_changed
= false;
3007 RNODE_FOREACH_RE_SAFE (rn
, re
, next
) {
3008 if (type
== ZEBRA_ROUTE_ALL
|| type
== re
->type
) {
3009 SET_FLAG(re
->status
, ROUTE_ENTRY_CHANGED
);
3018 /* Schedule routes of a particular table (address-family) based on event. */
3019 void rib_update_table(struct route_table
*table
, rib_update_event_t event
)
3021 struct route_node
*rn
;
3023 if (IS_ZEBRA_DEBUG_EVENT
) {
3024 struct zebra_vrf
*zvrf
;
3027 zvrf
= table
->info
? ((rib_table_info_t
*)table
->info
)->zvrf
3029 vrf
= zvrf
? zvrf
->vrf
: NULL
;
3031 zlog_debug("%s: %s VRF %s Table %u event %s", __func__
,
3032 table
->info
? afi2str(
3033 ((rib_table_info_t
*)table
->info
)->afi
)
3035 vrf
? vrf
->name
: "Unknown",
3036 zvrf
? zvrf
->table_id
: 0,
3037 rib_update_event2str(event
));
3040 /* Walk all routes and queue for processing, if appropriate for
3041 * the trigger event.
3043 for (rn
= route_top(table
); rn
; rn
= srcdest_route_next(rn
)) {
3045 * If we are looking at a route node and the node
3046 * has already been queued we don't
3047 * need to queue it up again
3050 && CHECK_FLAG(rib_dest_from_rnode(rn
)->flags
,
3051 RIB_ROUTE_ANY_QUEUED
))
3055 case RIB_UPDATE_KERNEL
:
3056 rib_update_route_node(rn
, ZEBRA_ROUTE_KERNEL
);
3058 case RIB_UPDATE_RMAP_CHANGE
:
3059 case RIB_UPDATE_OTHER
:
3060 rib_update_route_node(rn
, ZEBRA_ROUTE_ALL
);
3068 static void rib_update_handle_vrf(vrf_id_t vrf_id
, rib_update_event_t event
)
3070 struct route_table
*table
;
3072 if (IS_ZEBRA_DEBUG_EVENT
)
3073 zlog_debug("%s: Handling VRF %s event %s", __func__
,
3074 vrf_id_to_name(vrf_id
), rib_update_event2str(event
));
3076 /* Process routes of interested address-families. */
3077 table
= zebra_vrf_table(AFI_IP
, SAFI_UNICAST
, vrf_id
);
3079 rib_update_table(table
, event
);
3081 table
= zebra_vrf_table(AFI_IP6
, SAFI_UNICAST
, vrf_id
);
3083 rib_update_table(table
, event
);
3086 static void rib_update_handle_vrf_all(rib_update_event_t event
)
3088 struct zebra_router_table
*zrt
;
3090 if (IS_ZEBRA_DEBUG_EVENT
)
3091 zlog_debug("%s: Handling VRF (ALL) event %s", __func__
,
3092 rib_update_event2str(event
));
3094 /* Just iterate over all the route tables, rather than vrf lookups */
3095 RB_FOREACH (zrt
, zebra_router_table_head
, &zrouter
.tables
)
3096 rib_update_table(zrt
->table
, event
);
3099 struct rib_update_ctx
{
3100 rib_update_event_t event
;
3105 static struct rib_update_ctx
*rib_update_ctx_init(vrf_id_t vrf_id
,
3106 rib_update_event_t event
)
3108 struct rib_update_ctx
*ctx
;
3110 ctx
= XCALLOC(MTYPE_RIB_UPDATE_CTX
, sizeof(struct rib_update_ctx
));
3113 ctx
->vrf_id
= vrf_id
;
3118 static void rib_update_ctx_fini(struct rib_update_ctx
**ctx
)
3120 XFREE(MTYPE_RIB_UPDATE_CTX
, *ctx
);
3125 static int rib_update_handler(struct thread
*thread
)
3127 struct rib_update_ctx
*ctx
;
3129 ctx
= THREAD_ARG(thread
);
3132 rib_update_handle_vrf_all(ctx
->event
);
3134 rib_update_handle_vrf(ctx
->vrf_id
, ctx
->event
);
3136 rib_update_ctx_fini(&ctx
);
3142 * Thread list to ensure we don't schedule a ton of events
3143 * if interfaces are flapping for instance.
3145 static struct thread
*t_rib_update_threads
[RIB_UPDATE_MAX
];
3147 /* Schedule a RIB update event for specific vrf */
3148 void rib_update_vrf(vrf_id_t vrf_id
, rib_update_event_t event
)
3150 struct rib_update_ctx
*ctx
;
3152 ctx
= rib_update_ctx_init(vrf_id
, event
);
3154 /* Don't worry about making sure multiple rib updates for specific vrf
3155 * are scheduled at once for now. If it becomes a problem, we can use a
3156 * lookup of some sort to keep track of running threads via t_vrf_id
3157 * like how we are doing it in t_rib_update_threads[].
3159 thread_add_event(zrouter
.master
, rib_update_handler
, ctx
, 0, NULL
);
3161 if (IS_ZEBRA_DEBUG_EVENT
)
3162 zlog_debug("%s: Scheduled VRF %s, event %s", __func__
,
3163 vrf_id_to_name(ctx
->vrf_id
),
3164 rib_update_event2str(event
));
3167 /* Schedule a RIB update event for all vrfs */
3168 void rib_update(rib_update_event_t event
)
3170 struct rib_update_ctx
*ctx
;
3172 ctx
= rib_update_ctx_init(0, event
);
3174 ctx
->vrf_all
= true;
3176 if (!thread_add_event(zrouter
.master
, rib_update_handler
, ctx
, 0,
3177 &t_rib_update_threads
[event
]))
3178 rib_update_ctx_fini(&ctx
); /* Already scheduled */
3179 else if (IS_ZEBRA_DEBUG_EVENT
)
3180 zlog_debug("%s: Schedued VRF (ALL), event %s", __func__
,
3181 rib_update_event2str(event
));
3184 /* Delete self installed routes after zebra is relaunched. */
3185 void rib_sweep_table(struct route_table
*table
)
3187 struct route_node
*rn
;
3188 struct route_entry
*re
;
3189 struct route_entry
*next
;
3190 struct nexthop
*nexthop
;
3195 for (rn
= route_top(table
); rn
; rn
= srcdest_route_next(rn
)) {
3196 RNODE_FOREACH_RE_SAFE (rn
, re
, next
) {
3198 if (IS_ZEBRA_DEBUG_RIB
)
3199 route_entry_dump(&rn
->p
, NULL
, re
);
3201 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
3204 if (!CHECK_FLAG(re
->flags
, ZEBRA_FLAG_SELFROUTE
))
3208 * If routes are older than startup_time then
3209 * we know we read them in from the kernel.
3210 * As such we can safely remove them.
3212 if (zrouter
.startup_time
< re
->uptime
)
3216 * So we are starting up and have received
3217 * routes from the kernel that we have installed
3218 * from a previous run of zebra but not cleaned
3219 * up ( say a kill -9 )
3220 * But since we haven't actually installed
3221 * them yet( we received them from the kernel )
3222 * we don't think they are active.
3223 * So let's pretend they are active to actually
3225 * In all honesty I'm not sure if we should
3226 * mark them as active when we receive them
3227 * This is startup only so probably ok.
3229 * If we ever decide to move rib_sweep_table
3230 * to a different spot (ie startup )
3231 * this decision needs to be revisited
3233 SET_FLAG(re
->status
, ROUTE_ENTRY_INSTALLED
);
3234 for (ALL_NEXTHOPS_PTR(re
->nhe
->nhg
, nexthop
))
3235 SET_FLAG(nexthop
->flags
, NEXTHOP_FLAG_FIB
);
3237 rib_uninstall_kernel(rn
, re
);
3238 rib_delnode(rn
, re
);
3243 /* Sweep all RIB tables. */
3244 int rib_sweep_route(struct thread
*t
)
3247 struct zebra_vrf
*zvrf
;
3249 RB_FOREACH (vrf
, vrf_id_head
, &vrfs_by_id
) {
3250 if ((zvrf
= vrf
->info
) == NULL
)
3253 rib_sweep_table(zvrf
->table
[AFI_IP
][SAFI_UNICAST
]);
3254 rib_sweep_table(zvrf
->table
[AFI_IP6
][SAFI_UNICAST
]);
3257 zebra_router_sweep_route();
3258 zebra_router_sweep_nhgs();
3263 /* Remove specific by protocol routes from 'table'. */
3264 unsigned long rib_score_proto_table(uint8_t proto
, unsigned short instance
,
3265 struct route_table
*table
)
3267 struct route_node
*rn
;
3268 struct route_entry
*re
;
3269 struct route_entry
*next
;
3270 unsigned long n
= 0;
3273 for (rn
= route_top(table
); rn
; rn
= srcdest_route_next(rn
))
3274 RNODE_FOREACH_RE_SAFE (rn
, re
, next
) {
3275 if (CHECK_FLAG(re
->status
, ROUTE_ENTRY_REMOVED
))
3277 if (re
->type
== proto
3278 && re
->instance
== instance
) {
3279 rib_delnode(rn
, re
);
3286 /* Remove specific by protocol routes. */
3287 unsigned long rib_score_proto(uint8_t proto
, unsigned short instance
)
3290 struct zebra_vrf
*zvrf
;
3291 struct other_route_table
*ort
;
3292 unsigned long cnt
= 0;
3294 RB_FOREACH (vrf
, vrf_id_head
, &vrfs_by_id
) {
3299 cnt
+= rib_score_proto_table(proto
, instance
,
3300 zvrf
->table
[AFI_IP
][SAFI_UNICAST
])
3301 + rib_score_proto_table(
3303 zvrf
->table
[AFI_IP6
][SAFI_UNICAST
]);
3305 frr_each(otable
, &zvrf
->other_tables
, ort
) cnt
+=
3306 rib_score_proto_table(proto
, instance
, ort
->table
);
3312 /* Close RIB and clean up kernel routes. */
3313 void rib_close_table(struct route_table
*table
)
3315 struct route_node
*rn
;
3316 rib_table_info_t
*info
;
3322 info
= route_table_get_info(table
);
3324 for (rn
= route_top(table
); rn
; rn
= srcdest_route_next(rn
)) {
3325 dest
= rib_dest_from_rnode(rn
);
3327 if (dest
&& dest
->selected_fib
) {
3328 if (info
->safi
== SAFI_UNICAST
)
3329 hook_call(rib_update
, rn
, NULL
);
3331 rib_uninstall_kernel(rn
, dest
->selected_fib
);
3332 dest
->selected_fib
= NULL
;
3338 * Handler for async dataplane results after a pseudowire installation
3340 static int handle_pw_result(struct zebra_dplane_ctx
*ctx
)
3342 struct zebra_pw
*pw
;
3343 struct zebra_vrf
*vrf
;
3345 /* The pseudowire code assumes success - we act on an error
3346 * result for installation attempts here.
3348 if (dplane_ctx_get_op(ctx
) != DPLANE_OP_PW_INSTALL
)
3351 if (dplane_ctx_get_status(ctx
) != ZEBRA_DPLANE_REQUEST_SUCCESS
) {
3352 vrf
= zebra_vrf_lookup_by_id(dplane_ctx_get_vrf(ctx
));
3353 pw
= zebra_pw_find(vrf
, dplane_ctx_get_ifname(ctx
));
3355 zebra_pw_install_failure(pw
);
3365 * Handle results from the dataplane system. Dequeue update context
3366 * structs, dispatch to appropriate internal handlers.
3368 static int rib_process_dplane_results(struct thread
*thread
)
3370 struct zebra_dplane_ctx
*ctx
;
3371 struct dplane_ctx_q ctxlist
;
3372 bool shut_p
= false;
3374 /* Dequeue a list of completed updates with one lock/unlock cycle */
3377 TAILQ_INIT(&ctxlist
);
3379 /* Take lock controlling queue of results */
3380 frr_with_mutex(&dplane_mutex
) {
3381 /* Dequeue list of context structs */
3382 dplane_ctx_list_append(&ctxlist
, &rib_dplane_q
);
3385 /* Dequeue context block */
3386 ctx
= dplane_ctx_dequeue(&ctxlist
);
3388 /* If we've emptied the results queue, we're done */
3392 /* If zebra is shutting down, avoid processing results,
3393 * just drain the results queue.
3395 shut_p
= atomic_load_explicit(&zrouter
.in_shutdown
,
3396 memory_order_relaxed
);
3399 dplane_ctx_fini(&ctx
);
3401 ctx
= dplane_ctx_dequeue(&ctxlist
);
3408 switch (dplane_ctx_get_op(ctx
)) {
3409 case DPLANE_OP_ROUTE_INSTALL
:
3410 case DPLANE_OP_ROUTE_UPDATE
:
3411 case DPLANE_OP_ROUTE_DELETE
:
3413 /* Bit of special case for route updates
3414 * that were generated by async notifications:
3415 * we don't want to continue processing these
3418 if (dplane_ctx_get_notif_provider(ctx
) == 0)
3419 rib_process_result(ctx
);
3421 dplane_ctx_fini(&ctx
);
3425 case DPLANE_OP_ROUTE_NOTIFY
:
3426 rib_process_dplane_notify(ctx
);
3429 case DPLANE_OP_NH_INSTALL
:
3430 case DPLANE_OP_NH_UPDATE
:
3431 case DPLANE_OP_NH_DELETE
:
3432 zebra_nhg_dplane_result(ctx
);
3435 case DPLANE_OP_LSP_INSTALL
:
3436 case DPLANE_OP_LSP_UPDATE
:
3437 case DPLANE_OP_LSP_DELETE
:
3439 /* Bit of special case for LSP updates
3440 * that were generated by async notifications:
3441 * we don't want to continue processing these.
3443 if (dplane_ctx_get_notif_provider(ctx
) == 0)
3444 zebra_mpls_lsp_dplane_result(ctx
);
3446 dplane_ctx_fini(&ctx
);
3450 case DPLANE_OP_LSP_NOTIFY
:
3451 zebra_mpls_process_dplane_notify(ctx
);
3454 case DPLANE_OP_PW_INSTALL
:
3455 case DPLANE_OP_PW_UNINSTALL
:
3456 handle_pw_result(ctx
);
3459 case DPLANE_OP_SYS_ROUTE_ADD
:
3460 case DPLANE_OP_SYS_ROUTE_DELETE
:
3461 /* No further processing in zebra for these. */
3462 dplane_ctx_fini(&ctx
);
3465 case DPLANE_OP_MAC_INSTALL
:
3466 case DPLANE_OP_MAC_DELETE
:
3467 zebra_vxlan_handle_result(ctx
);
3470 /* Some op codes not handled here */
3471 case DPLANE_OP_ADDR_INSTALL
:
3472 case DPLANE_OP_ADDR_UNINSTALL
:
3473 case DPLANE_OP_NEIGH_INSTALL
:
3474 case DPLANE_OP_NEIGH_UPDATE
:
3475 case DPLANE_OP_NEIGH_DELETE
:
3476 case DPLANE_OP_VTEP_ADD
:
3477 case DPLANE_OP_VTEP_DELETE
:
3478 case DPLANE_OP_NONE
:
3479 /* Don't expect this: just return the struct? */
3480 dplane_ctx_fini(&ctx
);
3483 } /* Dispatch by op code */
3485 ctx
= dplane_ctx_dequeue(&ctxlist
);
3494 * Results are returned from the dataplane subsystem, in the context of
3495 * the dataplane pthread. We enqueue the results here for processing by
3496 * the main thread later.
3498 static int rib_dplane_results(struct dplane_ctx_q
*ctxlist
)
3500 /* Take lock controlling queue of results */
3501 frr_with_mutex(&dplane_mutex
) {
3502 /* Enqueue context blocks */
3503 dplane_ctx_list_append(&rib_dplane_q
, ctxlist
);
3506 /* Ensure event is signalled to zebra main pthread */
3507 thread_add_event(zrouter
.master
, rib_process_dplane_results
, NULL
, 0,
3514 * Ensure there are no empty slots in the route_info array.
3515 * Every route type in zebra should be present there.
3517 static void check_route_info(void)
3519 int len
= array_size(route_info
);
3522 * ZEBRA_ROUTE_SYSTEM is special cased since
3523 * its key is 0 anyway.
3525 * ZEBRA_ROUTE_ALL is also ignored.
3527 for (int i
= 0; i
< len
; i
++) {
3528 if (i
== ZEBRA_ROUTE_SYSTEM
|| i
== ZEBRA_ROUTE_ALL
)
3530 assert(route_info
[i
].key
);
3531 assert(route_info
[i
].meta_q_map
< MQ_SIZE
);
3535 /* Routing information base initialize. */
3542 /* Init dataplane, and register for results */
3543 pthread_mutex_init(&dplane_mutex
, NULL
);
3544 TAILQ_INIT(&rib_dplane_q
);
3545 zebra_dplane_init(rib_dplane_results
);
3551 * Get the first vrf id that is greater than the given vrf id if any.
3553 * Returns true if a vrf id was found, false otherwise.
3555 static inline int vrf_id_get_next(vrf_id_t vrf_id
, vrf_id_t
*next_id_p
)
3559 vrf
= vrf_lookup_by_id(vrf_id
);
3561 vrf
= RB_NEXT(vrf_id_head
, vrf
);
3563 *next_id_p
= vrf
->vrf_id
;
3572 * rib_tables_iter_next
3574 * Returns the next table in the iteration.
3576 struct route_table
*rib_tables_iter_next(rib_tables_iter_t
*iter
)
3578 struct route_table
*table
;
3581 * Array that helps us go over all AFI/SAFI combinations via one
3584 static const struct {
3588 {AFI_IP
, SAFI_UNICAST
}, {AFI_IP
, SAFI_MULTICAST
},
3589 {AFI_IP
, SAFI_LABELED_UNICAST
}, {AFI_IP6
, SAFI_UNICAST
},
3590 {AFI_IP6
, SAFI_MULTICAST
}, {AFI_IP6
, SAFI_LABELED_UNICAST
},
3595 switch (iter
->state
) {
3597 case RIB_TABLES_ITER_S_INIT
:
3598 iter
->vrf_id
= VRF_DEFAULT
;
3599 iter
->afi_safi_ix
= -1;
3603 case RIB_TABLES_ITER_S_ITERATING
:
3604 iter
->afi_safi_ix
++;
3607 while (iter
->afi_safi_ix
3608 < (int)array_size(afi_safis
)) {
3609 table
= zebra_vrf_table(
3610 afi_safis
[iter
->afi_safi_ix
].afi
,
3611 afi_safis
[iter
->afi_safi_ix
].safi
,
3616 iter
->afi_safi_ix
++;
3620 * Found another table in this vrf.
3626 * Done with all tables in the current vrf, go to the
3630 if (!vrf_id_get_next(iter
->vrf_id
, &iter
->vrf_id
))
3633 iter
->afi_safi_ix
= 0;
3638 case RIB_TABLES_ITER_S_DONE
:
3643 iter
->state
= RIB_TABLES_ITER_S_ITERATING
;
3645 iter
->state
= RIB_TABLES_ITER_S_DONE
;