2 * Copyright (C) 2016 CumulusNetworks
5 * This file is part of Quagga
7 * Quagga is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU General Public License as published by the
9 * Free Software Foundation; either version 2, or (at your option) any
12 * Quagga is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
17 * You should have received a copy of the GNU General Public License along
18 * with this program; see the file COPYING; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
27 #include "srcdest_table.h"
30 #include "zebra/debug.h"
31 #include "zebra/zserv.h"
32 #include "zebra/rib.h"
33 #include "zebra/zebra_vrf.h"
34 #include "zebra/zebra_rnh.h"
35 #include "zebra/router-id.h"
36 #include "zebra/zebra_memory.h"
37 #include "zebra/zebra_static.h"
38 #include "zebra/interface.h"
39 #include "zebra/zebra_mpls.h"
41 extern struct zebra_t zebrad
;
43 /* VRF information update. */
45 zebra_vrf_add_update (struct zebra_vrf
*zvrf
)
47 struct listnode
*node
, *nnode
;
50 if (IS_ZEBRA_DEBUG_EVENT
)
51 zlog_debug ("MESSAGE: ZEBRA_VRF_ADD %s", zvrf_name (zvrf
));
53 for (ALL_LIST_ELEMENTS (zebrad
.client_list
, node
, nnode
, client
))
54 zsend_vrf_add (client
, zvrf
);
58 zebra_vrf_delete_update (struct zebra_vrf
*zvrf
)
60 struct listnode
*node
, *nnode
;
63 if (IS_ZEBRA_DEBUG_EVENT
)
64 zlog_debug ("MESSAGE: ZEBRA_VRF_DELETE %s", zvrf_name (zvrf
));
66 for (ALL_LIST_ELEMENTS (zebrad
.client_list
, node
, nnode
, client
))
67 zsend_vrf_delete (client
, zvrf
);
71 zebra_vrf_update_all (struct zserv
*client
)
75 RB_FOREACH (vrf
, vrf_id_head
, &vrfs_by_id
)
78 zsend_vrf_add (client
, vrf_info_lookup (vrf
->vrf_id
));
82 /* Callback upon creating a new VRF. */
84 zebra_vrf_new (struct vrf
*vrf
)
86 struct zebra_vrf
*zvrf
;
88 if (IS_ZEBRA_DEBUG_EVENT
)
89 zlog_info ("ZVRF %s with id %u", vrf
->name
, vrf
->vrf_id
);
91 zvrf
= zebra_vrf_alloc ();
92 zvrf
->zns
= zebra_ns_lookup (NS_DEFAULT
); /* Point to the global (single) NS */
93 router_id_init (zvrf
);
101 * Moving an interface amongst different vrf's
102 * causes the interface to get a new ifindex
103 * so we need to find static routes with
104 * the old ifindex and replace with new
105 * ifindex to insert back into the table
108 zebra_vrf_static_route_interface_fixup (struct interface
*ifp
)
112 struct zebra_vrf
*zvrf
= zebra_vrf_lookup_by_id (ifp
->vrf_id
);
113 struct route_table
*stable
= NULL
;
114 struct route_node
*rn
= NULL
;
115 struct static_route
*si
= NULL
;
120 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
122 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
124 stable
= zvrf
->stable
[afi
][safi
];
126 for (rn
= route_top (stable
); rn
; rn
= route_next (rn
))
131 if ((strcmp (si
->ifname
, ifp
->name
) == 0) &&
132 (si
->ifindex
!= ifp
->ifindex
))
134 si
->ifindex
= ifp
->ifindex
;
135 static_install_route (afi
, safi
, &rn
->p
, NULL
, si
);
144 /* Callback upon enabling a VRF. */
146 zebra_vrf_enable (struct vrf
*vrf
)
148 struct zebra_vrf
*zvrf
= vrf
->info
;
149 struct route_table
*stable
;
150 struct route_node
*rn
;
151 struct static_route
*si
;
152 struct interface
*ifp
;
158 zebra_vrf_add_update (zvrf
);
160 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
161 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
163 stable
= zvrf
->stable
[afi
][safi
];
167 for (rn
= route_top (stable
); rn
; rn
= route_next (rn
))
168 for (si
= rn
->info
; si
; si
= si
->next
)
170 si
->vrf_id
= vrf
->vrf_id
;
173 ifp
= if_lookup_by_name (si
->ifname
, si
->vrf_id
);
175 si
->ifindex
= ifp
->ifindex
;
179 static_install_route (afi
, safi
, &rn
->p
, NULL
, si
);
186 /* Callback upon disabling a VRF. */
188 zebra_vrf_disable (struct vrf
*vrf
)
190 struct zebra_vrf
*zvrf
= vrf
->info
;
191 struct route_table
*stable
;
192 struct route_node
*rn
;
193 struct static_route
*si
;
197 if (IS_ZEBRA_DEBUG_KERNEL
)
198 zlog_debug ("VRF %s id %u is now disabled.",
199 zvrf_name (zvrf
), zvrf_id (zvrf
));
201 for (afi
= AFI_IP
; afi
< AFI_MAX
; afi
++)
202 for (safi
= SAFI_UNICAST
; safi
< SAFI_MAX
; safi
++)
204 stable
= zvrf
->stable
[afi
][safi
];
208 for (rn
= route_top (stable
); rn
; rn
= route_next (rn
))
209 for (si
= rn
->info
; si
; si
= si
->next
)
210 static_uninstall_route(afi
, safi
, &rn
->p
, NULL
, si
);
217 zebra_vrf_delete (struct vrf
*vrf
)
219 struct zebra_vrf
*zvrf
= vrf
->info
;
220 struct route_table
*table
;
228 zebra_vrf_delete_update (zvrf
);
230 /* uninstall everything */
231 if (! CHECK_FLAG (zvrf
->flags
, ZEBRA_VRF_RETAIN
))
233 struct listnode
*node
;
234 struct interface
*ifp
;
236 for (afi
= AFI_IP
; afi
<= AFI_IP6
; afi
++)
238 for (safi
= SAFI_UNICAST
; safi
<= SAFI_MULTICAST
; safi
++)
239 rib_close_table (zvrf
->table
[afi
][safi
]);
241 if (vrf
->vrf_id
== VRF_DEFAULT
)
242 for (table_id
= 0; table_id
< ZEBRA_KERNEL_TABLE_MAX
; table_id
++)
243 if (zvrf
->other_table
[afi
][table_id
])
244 rib_close_table (zvrf
->other_table
[afi
][table_id
]);
247 zebra_mpls_close_tables (zvrf
);
249 for (ALL_LIST_ELEMENTS_RO (vrf
->iflist
, node
, ifp
))
250 if_nbr_ipv6ll_to_ipv4ll_neigh_del_all (ifp
);
253 /* clean-up work queues */
254 for (i
= 0; i
< MQ_SIZE
; i
++)
256 struct listnode
*lnode
, *nnode
;
257 struct route_node
*rnode
;
260 for (ALL_LIST_ELEMENTS (zebrad
.mq
->subq
[i
], lnode
, nnode
, rnode
))
262 dest
= rib_dest_from_rnode (rnode
);
263 if (dest
&& rib_dest_vrf (dest
) == zvrf
)
265 route_unlock_node (rnode
);
266 list_delete_node (zebrad
.mq
->subq
[i
], lnode
);
272 /* release allocated memory */
273 for (afi
= AFI_IP
; afi
<= AFI_IP6
; afi
++)
277 for (safi
= SAFI_UNICAST
; safi
<= SAFI_MULTICAST
; safi
++)
279 table
= zvrf
->table
[afi
][safi
];
280 table_info
= table
->info
;
281 route_table_finish (table
);
282 XFREE (MTYPE_RIB_TABLE_INFO
, table_info
);
284 table
= zvrf
->stable
[afi
][safi
];
285 route_table_finish (table
);
288 for (table_id
= 0; table_id
< ZEBRA_KERNEL_TABLE_MAX
; table_id
++)
289 if (zvrf
->other_table
[afi
][table_id
])
291 table
= zvrf
->other_table
[afi
][table_id
];
292 table_info
= table
->info
;
293 route_table_finish (table
);
294 XFREE (MTYPE_RIB_TABLE_INFO
, table_info
);
297 route_table_finish (zvrf
->rnh_table
[afi
]);
298 route_table_finish (zvrf
->import_check_table
[afi
]);
300 list_delete_all_node (zvrf
->rid_all_sorted_list
);
301 list_delete_all_node (zvrf
->rid_lo_sorted_list
);
302 XFREE (MTYPE_ZEBRA_VRF
, zvrf
);
308 /* Lookup the routing table in a VRF based on both VRF-Id and table-id.
309 * NOTE: Table-id is relevant only in the Default VRF.
312 zebra_vrf_table_with_table_id (afi_t afi
, safi_t safi
,
313 vrf_id_t vrf_id
, u_int32_t table_id
)
315 struct route_table
*table
= NULL
;
317 if (afi
>= AFI_MAX
|| safi
>= SAFI_MAX
)
320 if (vrf_id
== VRF_DEFAULT
)
322 if (table_id
== RT_TABLE_MAIN
||
323 table_id
== zebrad
.rtm_table_default
)
324 table
= zebra_vrf_table (afi
, safi
, vrf_id
);
326 table
= zebra_vrf_other_route_table (afi
, table_id
, vrf_id
);
329 table
= zebra_vrf_table (afi
, safi
, vrf_id
);
335 zebra_rtable_node_cleanup (struct route_table
*table
, struct route_node
*node
)
337 struct route_entry
*re
, *next
;
339 RNODE_FOREACH_RE_SAFE (node
, re
, next
)
340 rib_unlink (node
, re
);
343 XFREE (MTYPE_RIB_DEST
, node
->info
);
347 zebra_stable_node_cleanup (struct route_table
*table
, struct route_node
*node
)
349 struct static_route
*si
, *next
;
352 for (si
= node
->info
; si
; si
= next
)
355 XFREE (MTYPE_STATIC_ROUTE
, si
);
360 zebra_rnhtable_node_cleanup (struct route_table
*table
, struct route_node
*node
)
363 zebra_free_rnh (node
->info
);
367 * Create a routing table for the specific AFI/SAFI in the given VRF.
370 zebra_vrf_table_create (struct zebra_vrf
*zvrf
, afi_t afi
, safi_t safi
)
372 rib_table_info_t
*info
;
373 struct route_table
*table
;
375 assert (!zvrf
->table
[afi
][safi
]);
378 table
= srcdest_table_init();
380 table
= route_table_init();
381 table
->cleanup
= zebra_rtable_node_cleanup
;
382 zvrf
->table
[afi
][safi
] = table
;
384 info
= XCALLOC (MTYPE_RIB_TABLE_INFO
, sizeof (*info
));
391 /* Allocate new zebra VRF. */
393 zebra_vrf_alloc (void)
395 struct zebra_vrf
*zvrf
;
398 struct route_table
*table
;
400 zvrf
= XCALLOC (MTYPE_ZEBRA_VRF
, sizeof (struct zebra_vrf
));
402 for (afi
= AFI_IP
; afi
<= AFI_IP6
; afi
++)
404 for (safi
= SAFI_UNICAST
; safi
<= SAFI_MULTICAST
; safi
++)
406 zebra_vrf_table_create (zvrf
, afi
, safi
);
408 table
= srcdest_table_init();
410 table
= route_table_init();
411 table
->cleanup
= zebra_stable_node_cleanup
;
412 zvrf
->stable
[afi
][safi
] = table
;
415 table
= route_table_init();
416 table
->cleanup
= zebra_rnhtable_node_cleanup
;
417 zvrf
->rnh_table
[afi
] = table
;
419 table
= route_table_init();
420 table
->cleanup
= zebra_rnhtable_node_cleanup
;
421 zvrf
->import_check_table
[afi
] = table
;
424 zebra_mpls_init_tables (zvrf
);
429 /* Lookup VRF by identifier. */
431 zebra_vrf_lookup_by_id (vrf_id_t vrf_id
)
433 return vrf_info_lookup (vrf_id
);
436 /* Lookup VRF by name. */
438 zebra_vrf_lookup_by_name (const char *name
)
443 name
= VRF_DEFAULT_NAME
;
445 vrf
= vrf_lookup_by_name (name
);
447 return ((struct zebra_vrf
*) vrf
->info
);
452 /* Lookup the routing table in an enabled VRF. */
454 zebra_vrf_table (afi_t afi
, safi_t safi
, vrf_id_t vrf_id
)
456 struct zebra_vrf
*zvrf
= vrf_info_lookup (vrf_id
);
461 if (afi
>= AFI_MAX
|| safi
>= SAFI_MAX
)
464 return zvrf
->table
[afi
][safi
];
467 /* Lookup the static routing table in a VRF. */
469 zebra_vrf_static_table (afi_t afi
, safi_t safi
, struct zebra_vrf
*zvrf
)
474 if (afi
>= AFI_MAX
|| safi
>= SAFI_MAX
)
477 return zvrf
->stable
[afi
][safi
];
481 zebra_vrf_other_route_table (afi_t afi
, u_int32_t table_id
, vrf_id_t vrf_id
)
483 struct zebra_vrf
*zvrf
;
484 rib_table_info_t
*info
;
485 struct route_table
*table
;
487 zvrf
= vrf_info_lookup (vrf_id
);
494 if (table_id
>= ZEBRA_KERNEL_TABLE_MAX
)
497 if ((vrf_id
== VRF_DEFAULT
) && (table_id
!= RT_TABLE_MAIN
) && (table_id
!= zebrad
.rtm_table_default
))
499 if (zvrf
->other_table
[afi
][table_id
] == NULL
)
501 table
= (afi
== AFI_IP6
) ? srcdest_table_init() : route_table_init();
502 info
= XCALLOC (MTYPE_RIB_TABLE_INFO
, sizeof (*info
));
505 info
->safi
= SAFI_UNICAST
;
507 zvrf
->other_table
[afi
][table_id
] = table
;
510 return (zvrf
->other_table
[afi
][table_id
]);
513 return zvrf
->table
[afi
][SAFI_UNICAST
];
517 vrf_config_write (struct vty
*vty
)
520 struct zebra_vrf
*zvrf
;
522 RB_FOREACH (vrf
, vrf_name_head
, &vrfs_by_name
)
525 if (! zvrf
|| strcmp (zvrf_name (zvrf
), VRF_DEFAULT_NAME
))
527 vty_out (vty
, "vrf %s%s", zvrf_name (zvrf
), VTY_NEWLINE
);
528 vty_out (vty
, "!%s", VTY_NEWLINE
);
534 /* Zebra VRF initialization. */
536 zebra_vrf_init (void)
538 vrf_init (zebra_vrf_new
,
543 vrf_cmd_init (vrf_config_write
);