]> git.proxmox.com Git - mirror_frr.git/blob - bgpd/bgp_zebra.c
Merge pull request #1736 from mkanjari/type5-with-asymm
[mirror_frr.git] / bgpd / bgp_zebra.c
1 /* zebra client
2 * Copyright (C) 1997, 98, 99 Kunihiro Ishiguro
3 *
4 * This file is part of GNU Zebra.
5 *
6 * GNU Zebra is free software; you can redistribute it and/or modify it
7 * under the terms of the GNU General Public License as published by the
8 * Free Software Foundation; either version 2, or (at your option) any
9 * later version.
10 *
11 * GNU Zebra is distributed in the hope that it will be useful, but
12 * WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; see the file COPYING; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 #include <zebra.h>
22
23 #include "command.h"
24 #include "stream.h"
25 #include "network.h"
26 #include "prefix.h"
27 #include "log.h"
28 #include "sockunion.h"
29 #include "zclient.h"
30 #include "routemap.h"
31 #include "thread.h"
32 #include "queue.h"
33 #include "memory.h"
34 #include "lib/json.h"
35 #include "lib/bfd.h"
36 #include "filter.h"
37 #include "mpls.h"
38 #include "vxlan.h"
39
40 #include "bgpd/bgpd.h"
41 #include "bgpd/bgp_route.h"
42 #include "bgpd/bgp_attr.h"
43 #include "bgpd/bgp_nexthop.h"
44 #include "bgpd/bgp_zebra.h"
45 #include "bgpd/bgp_fsm.h"
46 #include "bgpd/bgp_debug.h"
47 #include "bgpd/bgp_mpath.h"
48 #include "bgpd/bgp_nexthop.h"
49 #include "bgpd/bgp_nht.h"
50 #include "bgpd/bgp_bfd.h"
51 #include "bgpd/bgp_label.h"
52 #if ENABLE_BGP_VNC
53 #include "bgpd/rfapi/rfapi_backend.h"
54 #include "bgpd/rfapi/vnc_export_bgp.h"
55 #endif
56 #include "bgpd/bgp_evpn.h"
57
58 /* All information about zebra. */
59 struct zclient *zclient = NULL;
60
61 /* Can we install into zebra? */
62 static inline int bgp_install_info_to_zebra(struct bgp *bgp)
63 {
64 if (zclient->sock <= 0)
65 return 0;
66
67 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
68 return 0;
69
70 return 1;
71 }
72
73 int zclient_num_connects;
74
75 /* Router-id update message from zebra. */
76 static int bgp_router_id_update(int command, struct zclient *zclient,
77 zebra_size_t length, vrf_id_t vrf_id)
78 {
79 struct prefix router_id;
80
81 zebra_router_id_update_read(zclient->ibuf, &router_id);
82
83 if (BGP_DEBUG(zebra, ZEBRA)) {
84 char buf[PREFIX2STR_BUFFER];
85 prefix2str(&router_id, buf, sizeof(buf));
86 zlog_debug("Rx Router Id update VRF %u Id %s", vrf_id, buf);
87 }
88
89 bgp_router_id_zebra_bump(vrf_id, &router_id);
90 return 0;
91 }
92
93 /* Nexthop update message from zebra. */
94 static int bgp_read_nexthop_update(int command, struct zclient *zclient,
95 zebra_size_t length, vrf_id_t vrf_id)
96 {
97 bgp_parse_nexthop_update(command, vrf_id);
98 return 0;
99 }
100
101 static int bgp_read_import_check_update(int command, struct zclient *zclient,
102 zebra_size_t length, vrf_id_t vrf_id)
103 {
104 bgp_parse_nexthop_update(command, vrf_id);
105 return 0;
106 }
107
108 /* Set or clear interface on which unnumbered neighbor is configured. This
109 * would in turn cause BGP to initiate or turn off IPv6 RAs on this
110 * interface.
111 */
112 static void bgp_update_interface_nbrs(struct bgp *bgp, struct interface *ifp,
113 struct interface *upd_ifp)
114 {
115 struct listnode *node, *nnode;
116 struct peer *peer;
117
118 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
119 if (peer->conf_if && (strcmp(peer->conf_if, ifp->name) == 0)) {
120 if (upd_ifp) {
121 peer->ifp = upd_ifp;
122 bgp_zebra_initiate_radv(bgp, peer);
123 } else {
124 bgp_zebra_terminate_radv(bgp, peer);
125 peer->ifp = upd_ifp;
126 }
127 }
128 }
129 }
130
131 static int bgp_read_fec_update(int command, struct zclient *zclient,
132 zebra_size_t length)
133 {
134 bgp_parse_fec_update();
135 return 0;
136 }
137
138 static void bgp_start_interface_nbrs(struct bgp *bgp, struct interface *ifp)
139 {
140 struct listnode *node, *nnode;
141 struct peer *peer;
142
143 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
144 if (peer->conf_if && (strcmp(peer->conf_if, ifp->name) == 0)
145 && peer->status != Established) {
146 if (peer_active(peer))
147 BGP_EVENT_ADD(peer, BGP_Stop);
148 BGP_EVENT_ADD(peer, BGP_Start);
149 }
150 }
151 }
152
153 static void bgp_nbr_connected_add(struct bgp *bgp, struct nbr_connected *ifc)
154 {
155 struct listnode *node;
156 struct connected *connected;
157 struct interface *ifp;
158 struct prefix *p;
159
160 /* Kick-off the FSM for any relevant peers only if there is a
161 * valid local address on the interface.
162 */
163 ifp = ifc->ifp;
164 for (ALL_LIST_ELEMENTS_RO(ifp->connected, node, connected)) {
165 p = connected->address;
166 if (p->family == AF_INET6
167 && IN6_IS_ADDR_LINKLOCAL(&p->u.prefix6))
168 break;
169 }
170 if (!connected)
171 return;
172
173 bgp_start_interface_nbrs(bgp, ifp);
174 }
175
176 static void bgp_nbr_connected_delete(struct bgp *bgp, struct nbr_connected *ifc,
177 int del)
178 {
179 struct listnode *node, *nnode;
180 struct peer *peer;
181 struct interface *ifp;
182
183 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
184 if (peer->conf_if
185 && (strcmp(peer->conf_if, ifc->ifp->name) == 0)) {
186 peer->last_reset = PEER_DOWN_NBR_ADDR_DEL;
187 BGP_EVENT_ADD(peer, BGP_Stop);
188 }
189 }
190 /* Free neighbor also, if we're asked to. */
191 if (del) {
192 ifp = ifc->ifp;
193 listnode_delete(ifp->nbr_connected, ifc);
194 nbr_connected_free(ifc);
195 }
196 }
197
198 /* Inteface addition message from zebra. */
199 static int bgp_interface_add(int command, struct zclient *zclient,
200 zebra_size_t length, vrf_id_t vrf_id)
201 {
202 struct interface *ifp;
203 struct bgp *bgp;
204
205 ifp = zebra_interface_add_read(zclient->ibuf, vrf_id);
206 if (!ifp) // unexpected
207 return 0;
208
209 if (BGP_DEBUG(zebra, ZEBRA) && ifp)
210 zlog_debug("Rx Intf add VRF %u IF %s", vrf_id, ifp->name);
211
212 bgp = bgp_lookup_by_vrf_id(vrf_id);
213 if (!bgp)
214 return 0;
215
216 bgp_update_interface_nbrs(bgp, ifp, ifp);
217 return 0;
218 }
219
220 static int bgp_interface_delete(int command, struct zclient *zclient,
221 zebra_size_t length, vrf_id_t vrf_id)
222 {
223 struct stream *s;
224 struct interface *ifp;
225 struct bgp *bgp;
226
227 bgp = bgp_lookup_by_vrf_id(vrf_id);
228 if (!bgp)
229 return 0;
230
231 s = zclient->ibuf;
232 ifp = zebra_interface_state_read(s, vrf_id);
233 if (!ifp) /* This may happen if we've just unregistered for a VRF. */
234 return 0;
235
236 if (BGP_DEBUG(zebra, ZEBRA))
237 zlog_debug("Rx Intf del VRF %u IF %s", vrf_id, ifp->name);
238
239 bgp_update_interface_nbrs(bgp, ifp, NULL);
240
241 if_set_index(ifp, IFINDEX_INTERNAL);
242 return 0;
243 }
244
245 static int bgp_interface_up(int command, struct zclient *zclient,
246 zebra_size_t length, vrf_id_t vrf_id)
247 {
248 struct stream *s;
249 struct interface *ifp;
250 struct connected *c;
251 struct nbr_connected *nc;
252 struct listnode *node, *nnode;
253 struct bgp *bgp;
254
255 bgp = bgp_lookup_by_vrf_id(vrf_id);
256 if (!bgp)
257 return 0;
258
259 s = zclient->ibuf;
260 ifp = zebra_interface_state_read(s, vrf_id);
261
262 if (!ifp)
263 return 0;
264
265 if (BGP_DEBUG(zebra, ZEBRA))
266 zlog_debug("Rx Intf up VRF %u IF %s", vrf_id, ifp->name);
267
268 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
269 bgp_connected_add(bgp, c);
270
271 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
272 bgp_nbr_connected_add(bgp, nc);
273
274 return 0;
275 }
276
277 static int bgp_interface_down(int command, struct zclient *zclient,
278 zebra_size_t length, vrf_id_t vrf_id)
279 {
280 struct stream *s;
281 struct interface *ifp;
282 struct connected *c;
283 struct nbr_connected *nc;
284 struct listnode *node, *nnode;
285 struct bgp *bgp;
286
287 bgp = bgp_lookup_by_vrf_id(vrf_id);
288 if (!bgp)
289 return 0;
290
291 s = zclient->ibuf;
292 ifp = zebra_interface_state_read(s, vrf_id);
293 if (!ifp)
294 return 0;
295
296 if (BGP_DEBUG(zebra, ZEBRA))
297 zlog_debug("Rx Intf down VRF %u IF %s", vrf_id, ifp->name);
298
299 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
300 bgp_connected_delete(bgp, c);
301
302 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
303 bgp_nbr_connected_delete(bgp, nc, 1);
304
305 /* Fast external-failover */
306 {
307 struct peer *peer;
308
309 if (CHECK_FLAG(bgp->flags, BGP_FLAG_NO_FAST_EXT_FAILOVER))
310 return 0;
311
312 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
313 #if defined(HAVE_CUMULUS)
314 /* Take down directly connected EBGP peers as well as
315 * 1-hop BFD
316 * tracked (directly connected) IBGP peers.
317 */
318 if ((peer->ttl != 1) && (peer->gtsm_hops != 1)
319 && (!peer->bfd_info
320 || bgp_bfd_is_peer_multihop(peer)))
321 #else
322 /* Take down directly connected EBGP peers */
323 if ((peer->ttl != 1) && (peer->gtsm_hops != 1))
324 #endif
325 continue;
326
327 if (ifp == peer->nexthop.ifp) {
328 BGP_EVENT_ADD(peer, BGP_Stop);
329 peer->last_reset = PEER_DOWN_IF_DOWN;
330 }
331 }
332 }
333
334 return 0;
335 }
336
337 static int bgp_interface_address_add(int command, struct zclient *zclient,
338 zebra_size_t length, vrf_id_t vrf_id)
339 {
340 struct connected *ifc;
341 struct bgp *bgp;
342
343 bgp = bgp_lookup_by_vrf_id(vrf_id);
344 if (!bgp)
345 return 0;
346
347 ifc = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
348
349 if (ifc == NULL)
350 return 0;
351
352 if (bgp_debug_zebra(ifc->address)) {
353 char buf[PREFIX2STR_BUFFER];
354 prefix2str(ifc->address, buf, sizeof(buf));
355 zlog_debug("Rx Intf address add VRF %u IF %s addr %s", vrf_id,
356 ifc->ifp->name, buf);
357 }
358
359 if (if_is_operative(ifc->ifp)) {
360 bgp_connected_add(bgp, ifc);
361
362 /* If we have learnt of any neighbors on this interface,
363 * check to kick off any BGP interface-based neighbors,
364 * but only if this is a link-local address.
365 */
366 if (IN6_IS_ADDR_LINKLOCAL(&ifc->address->u.prefix6)
367 && !list_isempty(ifc->ifp->nbr_connected))
368 bgp_start_interface_nbrs(bgp, ifc->ifp);
369 }
370
371 return 0;
372 }
373
374 static int bgp_interface_address_delete(int command, struct zclient *zclient,
375 zebra_size_t length, vrf_id_t vrf_id)
376 {
377 struct connected *ifc;
378 struct bgp *bgp;
379
380 bgp = bgp_lookup_by_vrf_id(vrf_id);
381 if (!bgp)
382 return 0;
383
384 ifc = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
385
386 if (ifc == NULL)
387 return 0;
388
389 if (bgp_debug_zebra(ifc->address)) {
390 char buf[PREFIX2STR_BUFFER];
391 prefix2str(ifc->address, buf, sizeof(buf));
392 zlog_debug("Rx Intf address del VRF %u IF %s addr %s", vrf_id,
393 ifc->ifp->name, buf);
394 }
395
396 if (if_is_operative(ifc->ifp)) {
397 bgp_connected_delete(bgp, ifc);
398 }
399
400 connected_free(ifc);
401
402 return 0;
403 }
404
405 static int bgp_interface_nbr_address_add(int command, struct zclient *zclient,
406 zebra_size_t length, vrf_id_t vrf_id)
407 {
408 struct nbr_connected *ifc = NULL;
409 struct bgp *bgp;
410
411 ifc = zebra_interface_nbr_address_read(command, zclient->ibuf, vrf_id);
412
413 if (ifc == NULL)
414 return 0;
415
416 if (bgp_debug_zebra(ifc->address)) {
417 char buf[PREFIX2STR_BUFFER];
418 prefix2str(ifc->address, buf, sizeof(buf));
419 zlog_debug("Rx Intf neighbor add VRF %u IF %s addr %s", vrf_id,
420 ifc->ifp->name, buf);
421 }
422
423 if (if_is_operative(ifc->ifp)) {
424 bgp = bgp_lookup_by_vrf_id(vrf_id);
425 if (bgp)
426 bgp_nbr_connected_add(bgp, ifc);
427 }
428
429 return 0;
430 }
431
432 static int bgp_interface_nbr_address_delete(int command,
433 struct zclient *zclient,
434 zebra_size_t length,
435 vrf_id_t vrf_id)
436 {
437 struct nbr_connected *ifc = NULL;
438 struct bgp *bgp;
439
440 ifc = zebra_interface_nbr_address_read(command, zclient->ibuf, vrf_id);
441
442 if (ifc == NULL)
443 return 0;
444
445 if (bgp_debug_zebra(ifc->address)) {
446 char buf[PREFIX2STR_BUFFER];
447 prefix2str(ifc->address, buf, sizeof(buf));
448 zlog_debug("Rx Intf neighbor del VRF %u IF %s addr %s", vrf_id,
449 ifc->ifp->name, buf);
450 }
451
452 if (if_is_operative(ifc->ifp)) {
453 bgp = bgp_lookup_by_vrf_id(vrf_id);
454 if (bgp)
455 bgp_nbr_connected_delete(bgp, ifc, 0);
456 }
457
458 nbr_connected_free(ifc);
459
460 return 0;
461 }
462
463 /* VRF update for an interface. */
464 static int bgp_interface_vrf_update(int command, struct zclient *zclient,
465 zebra_size_t length, vrf_id_t vrf_id)
466 {
467 struct interface *ifp;
468 vrf_id_t new_vrf_id;
469 struct connected *c;
470 struct nbr_connected *nc;
471 struct listnode *node, *nnode;
472 struct bgp *bgp;
473
474 ifp = zebra_interface_vrf_update_read(zclient->ibuf, vrf_id,
475 &new_vrf_id);
476 if (!ifp)
477 return 0;
478
479 if (BGP_DEBUG(zebra, ZEBRA) && ifp)
480 zlog_debug("Rx Intf VRF change VRF %u IF %s NewVRF %u", vrf_id,
481 ifp->name, new_vrf_id);
482
483 bgp = bgp_lookup_by_vrf_id(vrf_id);
484 if (!bgp)
485 return 0;
486
487 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
488 bgp_connected_delete(bgp, c);
489
490 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
491 bgp_nbr_connected_delete(bgp, nc, 1);
492
493 /* Fast external-failover */
494 {
495 struct peer *peer;
496
497 if (CHECK_FLAG(bgp->flags, BGP_FLAG_NO_FAST_EXT_FAILOVER))
498 return 0;
499
500 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
501 if ((peer->ttl != 1) && (peer->gtsm_hops != 1))
502 continue;
503
504 if (ifp == peer->nexthop.ifp)
505 BGP_EVENT_ADD(peer, BGP_Stop);
506 }
507 }
508
509 if_update_to_new_vrf(ifp, new_vrf_id);
510
511 bgp = bgp_lookup_by_vrf_id(new_vrf_id);
512 if (!bgp)
513 return 0;
514
515 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
516 bgp_connected_add(bgp, c);
517
518 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
519 bgp_nbr_connected_add(bgp, nc);
520 return 0;
521 }
522
523 /* Zebra route add and delete treatment. */
524 static int zebra_read_route(int command, struct zclient *zclient,
525 zebra_size_t length, vrf_id_t vrf_id)
526 {
527 enum nexthop_types_t nhtype;
528 struct zapi_route api;
529 union g_addr nexthop;
530 ifindex_t ifindex;
531 int add, i;
532 struct bgp *bgp;
533
534 bgp = bgp_lookup_by_vrf_id(vrf_id);
535 if (!bgp)
536 return 0;
537
538 if (zapi_route_decode(zclient->ibuf, &api) < 0)
539 return -1;
540
541 /* we completely ignore srcdest routes for now. */
542 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
543 return 0;
544
545 /* ignore link-local address. */
546 if (api.prefix.family == AF_INET6
547 && IN6_IS_ADDR_LINKLOCAL(&api.prefix.u.prefix6))
548 return 0;
549
550 nexthop = api.nexthops[0].gate;
551 ifindex = api.nexthops[0].ifindex;
552 nhtype = api.nexthops[0].type;
553
554 add = (command == ZEBRA_REDISTRIBUTE_ROUTE_ADD);
555 if (add) {
556 /*
557 * The ADD message is actually an UPDATE and there is no
558 * explicit DEL
559 * for a prior redistributed route, if any. So, perform an
560 * implicit
561 * DEL processing for the same redistributed route from any
562 * other
563 * source type.
564 */
565 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
566 if (i != api.type)
567 bgp_redistribute_delete(bgp, &api.prefix, i,
568 api.instance);
569 }
570
571 /* Now perform the add/update. */
572 bgp_redistribute_add(bgp, &api.prefix, &nexthop, ifindex,
573 nhtype, api.metric, api.type, api.instance,
574 api.tag);
575 } else {
576 bgp_redistribute_delete(bgp, &api.prefix, api.type,
577 api.instance);
578 }
579
580 if (bgp_debug_zebra(&api.prefix)) {
581 char buf[2][PREFIX_STRLEN];
582
583 prefix2str(&api.prefix, buf[0], sizeof(buf[0]));
584 inet_ntop(api.prefix.family, &nexthop, buf[1], sizeof(buf[1]));
585 zlog_debug(
586 "Rx route %s VRF %u %s[%d] %s "
587 "nexthop %s metric %u tag %" ROUTE_TAG_PRI,
588 (add) ? "add" : "delete", vrf_id,
589 zebra_route_string(api.type), api.instance, buf[0],
590 buf[1], api.metric, api.tag);
591 }
592
593 return 0;
594 }
595
596 struct interface *if_lookup_by_ipv4(struct in_addr *addr, vrf_id_t vrf_id)
597 {
598 struct vrf *vrf;
599 struct listnode *cnode;
600 struct interface *ifp;
601 struct connected *connected;
602 struct prefix_ipv4 p;
603 struct prefix *cp;
604
605 vrf = vrf_lookup_by_id(vrf_id);
606 if (!vrf)
607 return NULL;
608
609 p.family = AF_INET;
610 p.prefix = *addr;
611 p.prefixlen = IPV4_MAX_BITLEN;
612
613 FOR_ALL_INTERFACES (vrf, ifp) {
614 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
615 cp = connected->address;
616
617 if (cp->family == AF_INET)
618 if (prefix_match(cp, (struct prefix *)&p))
619 return ifp;
620 }
621 }
622 return NULL;
623 }
624
625 struct interface *if_lookup_by_ipv4_exact(struct in_addr *addr, vrf_id_t vrf_id)
626 {
627 struct vrf *vrf;
628 struct listnode *cnode;
629 struct interface *ifp;
630 struct connected *connected;
631 struct prefix *cp;
632
633 vrf = vrf_lookup_by_id(vrf_id);
634 if (!vrf)
635 return NULL;
636
637 FOR_ALL_INTERFACES (vrf, ifp) {
638 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
639 cp = connected->address;
640
641 if (cp->family == AF_INET)
642 if (IPV4_ADDR_SAME(&cp->u.prefix4, addr))
643 return ifp;
644 }
645 }
646 return NULL;
647 }
648
649 struct interface *if_lookup_by_ipv6(struct in6_addr *addr, ifindex_t ifindex,
650 vrf_id_t vrf_id)
651 {
652 struct vrf *vrf;
653 struct listnode *cnode;
654 struct interface *ifp;
655 struct connected *connected;
656 struct prefix_ipv6 p;
657 struct prefix *cp;
658
659 vrf = vrf_lookup_by_id(vrf_id);
660 if (!vrf)
661 return NULL;
662
663 p.family = AF_INET6;
664 p.prefix = *addr;
665 p.prefixlen = IPV6_MAX_BITLEN;
666
667 FOR_ALL_INTERFACES (vrf, ifp) {
668 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
669 cp = connected->address;
670
671 if (cp->family == AF_INET6)
672 if (prefix_match(cp, (struct prefix *)&p)) {
673 if (IN6_IS_ADDR_LINKLOCAL(
674 &cp->u.prefix6)) {
675 if (ifindex == ifp->ifindex)
676 return ifp;
677 } else
678 return ifp;
679 }
680 }
681 }
682 return NULL;
683 }
684
685 struct interface *if_lookup_by_ipv6_exact(struct in6_addr *addr,
686 ifindex_t ifindex, vrf_id_t vrf_id)
687 {
688 struct vrf *vrf;
689 struct listnode *cnode;
690 struct interface *ifp;
691 struct connected *connected;
692 struct prefix *cp;
693
694 vrf = vrf_lookup_by_id(vrf_id);
695 if (!vrf)
696 return NULL;
697
698 FOR_ALL_INTERFACES (vrf, ifp) {
699 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
700 cp = connected->address;
701
702 if (cp->family == AF_INET6)
703 if (IPV6_ADDR_SAME(&cp->u.prefix6, addr)) {
704 if (IN6_IS_ADDR_LINKLOCAL(
705 &cp->u.prefix6)) {
706 if (ifindex == ifp->ifindex)
707 return ifp;
708 } else
709 return ifp;
710 }
711 }
712 }
713 return NULL;
714 }
715
716 static int if_get_ipv6_global(struct interface *ifp, struct in6_addr *addr)
717 {
718 struct listnode *cnode;
719 struct connected *connected;
720 struct prefix *cp;
721
722 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
723 cp = connected->address;
724
725 if (cp->family == AF_INET6)
726 if (!IN6_IS_ADDR_LINKLOCAL(&cp->u.prefix6)) {
727 memcpy(addr, &cp->u.prefix6, IPV6_MAX_BYTELEN);
728 return 1;
729 }
730 }
731 return 0;
732 }
733
734 static int if_get_ipv6_local(struct interface *ifp, struct in6_addr *addr)
735 {
736 struct listnode *cnode;
737 struct connected *connected;
738 struct prefix *cp;
739
740 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
741 cp = connected->address;
742
743 if (cp->family == AF_INET6)
744 if (IN6_IS_ADDR_LINKLOCAL(&cp->u.prefix6)) {
745 memcpy(addr, &cp->u.prefix6, IPV6_MAX_BYTELEN);
746 return 1;
747 }
748 }
749 return 0;
750 }
751
752 static int if_get_ipv4_address(struct interface *ifp, struct in_addr *addr)
753 {
754 struct listnode *cnode;
755 struct connected *connected;
756 struct prefix *cp;
757
758 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
759 cp = connected->address;
760 if ((cp->family == AF_INET)
761 && !ipv4_martian(&(cp->u.prefix4))) {
762 *addr = cp->u.prefix4;
763 return 1;
764 }
765 }
766 return 0;
767 }
768
769 int bgp_nexthop_set(union sockunion *local, union sockunion *remote,
770 struct bgp_nexthop *nexthop, struct peer *peer)
771 {
772 int ret = 0;
773 struct interface *ifp = NULL;
774
775 memset(nexthop, 0, sizeof(struct bgp_nexthop));
776
777 if (!local)
778 return -1;
779 if (!remote)
780 return -1;
781
782 if (local->sa.sa_family == AF_INET) {
783 nexthop->v4 = local->sin.sin_addr;
784 if (peer->update_if)
785 ifp = if_lookup_by_name(peer->update_if,
786 peer->bgp->vrf_id);
787 else
788 ifp = if_lookup_by_ipv4_exact(&local->sin.sin_addr,
789 peer->bgp->vrf_id);
790 }
791 if (local->sa.sa_family == AF_INET6) {
792 if (IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)) {
793 if (peer->conf_if || peer->ifname)
794 ifp = if_lookup_by_name(peer->conf_if
795 ? peer->conf_if
796 : peer->ifname,
797 peer->bgp->vrf_id);
798 } else if (peer->update_if)
799 ifp = if_lookup_by_name(peer->update_if,
800 peer->bgp->vrf_id);
801 else
802 ifp = if_lookup_by_ipv6_exact(&local->sin6.sin6_addr,
803 local->sin6.sin6_scope_id,
804 peer->bgp->vrf_id);
805 }
806
807 if (!ifp)
808 return -1;
809
810 nexthop->ifp = ifp;
811
812 /* IPv4 connection, fetch and store IPv6 local address(es) if any. */
813 if (local->sa.sa_family == AF_INET) {
814 /* IPv6 nexthop*/
815 ret = if_get_ipv6_global(ifp, &nexthop->v6_global);
816
817 if (!ret) {
818 /* There is no global nexthop. Use link-local address as
819 * both the
820 * global and link-local nexthop. In this scenario, the
821 * expectation
822 * for interop is that the network admin would use a
823 * route-map to
824 * specify the global IPv6 nexthop.
825 */
826 if_get_ipv6_local(ifp, &nexthop->v6_global);
827 memcpy(&nexthop->v6_local, &nexthop->v6_global,
828 IPV6_MAX_BYTELEN);
829 } else
830 if_get_ipv6_local(ifp, &nexthop->v6_local);
831
832 if (if_lookup_by_ipv4(&remote->sin.sin_addr, peer->bgp->vrf_id))
833 peer->shared_network = 1;
834 else
835 peer->shared_network = 0;
836 }
837
838 /* IPv6 connection, fetch and store IPv4 local address if any. */
839 if (local->sa.sa_family == AF_INET6) {
840 struct interface *direct = NULL;
841
842 /* IPv4 nexthop. */
843 ret = if_get_ipv4_address(ifp, &nexthop->v4);
844 if (!ret && peer->local_id.s_addr)
845 nexthop->v4 = peer->local_id;
846
847 /* Global address*/
848 if (!IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)) {
849 memcpy(&nexthop->v6_global, &local->sin6.sin6_addr,
850 IPV6_MAX_BYTELEN);
851
852 /* If directory connected set link-local address. */
853 direct = if_lookup_by_ipv6(&remote->sin6.sin6_addr,
854 remote->sin6.sin6_scope_id,
855 peer->bgp->vrf_id);
856 if (direct)
857 if_get_ipv6_local(ifp, &nexthop->v6_local);
858 } else
859 /* Link-local address. */
860 {
861 ret = if_get_ipv6_global(ifp, &nexthop->v6_global);
862
863 /* If there is no global address. Set link-local
864 address as
865 global. I know this break RFC specification... */
866 /* In this scenario, the expectation for interop is that
867 * the
868 * network admin would use a route-map to specify the
869 * global
870 * IPv6 nexthop.
871 */
872 if (!ret)
873 memcpy(&nexthop->v6_global,
874 &local->sin6.sin6_addr,
875 IPV6_MAX_BYTELEN);
876 /* Always set the link-local address */
877 memcpy(&nexthop->v6_local, &local->sin6.sin6_addr,
878 IPV6_MAX_BYTELEN);
879 }
880
881 if (IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)
882 || if_lookup_by_ipv6(&remote->sin6.sin6_addr,
883 remote->sin6.sin6_scope_id,
884 peer->bgp->vrf_id))
885 peer->shared_network = 1;
886 else
887 peer->shared_network = 0;
888 }
889
890 /* KAME stack specific treatment. */
891 #ifdef KAME
892 if (IN6_IS_ADDR_LINKLOCAL(&nexthop->v6_global)
893 && IN6_LINKLOCAL_IFINDEX(nexthop->v6_global)) {
894 SET_IN6_LINKLOCAL_IFINDEX(nexthop->v6_global, 0);
895 }
896 if (IN6_IS_ADDR_LINKLOCAL(&nexthop->v6_local)
897 && IN6_LINKLOCAL_IFINDEX(nexthop->v6_local)) {
898 SET_IN6_LINKLOCAL_IFINDEX(nexthop->v6_local, 0);
899 }
900 #endif /* KAME */
901
902 /* If we have identified the local interface, there is no error for now.
903 */
904 return 0;
905 }
906
907 static struct in6_addr *bgp_info_to_ipv6_nexthop(struct bgp_info *info)
908 {
909 struct in6_addr *nexthop = NULL;
910
911 /* Only global address nexthop exists. */
912 if (info->attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL)
913 nexthop = &info->attr->mp_nexthop_global;
914
915 /* If both global and link-local address present. */
916 if (info->attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
917 /* Check if route-map is set to prefer global over link-local */
918 if (info->attr->mp_nexthop_prefer_global)
919 nexthop = &info->attr->mp_nexthop_global;
920 else {
921 /* Workaround for Cisco's nexthop bug. */
922 if (IN6_IS_ADDR_UNSPECIFIED(
923 &info->attr->mp_nexthop_global)
924 && info->peer->su_remote->sa.sa_family == AF_INET6)
925 nexthop =
926 &info->peer->su_remote->sin6.sin6_addr;
927 else
928 nexthop = &info->attr->mp_nexthop_local;
929 }
930 }
931
932 return nexthop;
933 }
934
935 static int bgp_table_map_apply(struct route_map *map, struct prefix *p,
936 struct bgp_info *info)
937 {
938 route_map_result_t ret;
939
940 ret = route_map_apply(map, p, RMAP_BGP, info);
941 bgp_attr_flush(info->attr);
942
943 if (ret != RMAP_DENYMATCH)
944 return 1;
945
946 if (bgp_debug_zebra(p)) {
947 if (p->family == AF_INET) {
948 char buf[2][INET_ADDRSTRLEN];
949 zlog_debug(
950 "Zebra rmap deny: IPv4 route %s/%d nexthop %s",
951 inet_ntop(AF_INET, &p->u.prefix4, buf[0],
952 sizeof(buf[0])),
953 p->prefixlen,
954 inet_ntop(AF_INET, &info->attr->nexthop, buf[1],
955 sizeof(buf[1])));
956 }
957 if (p->family == AF_INET6) {
958 char buf[2][INET6_ADDRSTRLEN];
959 zlog_debug(
960 "Zebra rmap deny: IPv6 route %s/%d nexthop %s",
961 inet_ntop(AF_INET6, &p->u.prefix6, buf[0],
962 sizeof(buf[0])),
963 p->prefixlen,
964 inet_ntop(AF_INET6,
965 bgp_info_to_ipv6_nexthop(info),
966 buf[1], sizeof(buf[1])));
967 }
968 }
969 return 0;
970 }
971
972 void bgp_zebra_announce(struct bgp_node *rn, struct prefix *p,
973 struct bgp_info *info, struct bgp *bgp, afi_t afi,
974 safi_t safi)
975 {
976 struct zapi_route api;
977 struct zapi_nexthop *api_nh;
978 int nh_family;
979 unsigned int valid_nh_count = 0;
980 int has_valid_label = 0;
981 u_char distance;
982 struct peer *peer;
983 struct bgp_info *mpinfo;
984 u_int32_t metric;
985 struct attr local_attr;
986 struct bgp_info local_info;
987 struct bgp_info *mpinfo_cp = &local_info;
988 route_tag_t tag;
989 mpls_label_t label;
990
991 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
992 * know of this instance.
993 */
994 if (!bgp_install_info_to_zebra(bgp))
995 return;
996
997 if (bgp->main_zebra_update_hold)
998 return;
999
1000 /* Make Zebra API structure. */
1001 memset(&api, 0, sizeof(api));
1002 memcpy(&api.rmac, &(info->attr->rmac), sizeof(struct ethaddr));
1003 api.vrf_id = bgp->vrf_id;
1004 api.type = ZEBRA_ROUTE_BGP;
1005 api.safi = safi;
1006 api.prefix = *p;
1007 SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
1008
1009 peer = info->peer;
1010
1011 tag = info->attr->tag;
1012
1013 /* When we create an aggregate route we must also install a Null0 route
1014 * in
1015 * the RIB */
1016 if (info->sub_type == BGP_ROUTE_AGGREGATE)
1017 zapi_route_set_blackhole(&api, BLACKHOLE_NULL);
1018
1019 /* If it is an EVPN route mark as such.
1020 * Currently presence of rmac in attr denotes
1021 * this is an EVPN type-2 route
1022 */
1023 if (!is_zero_mac(&(info->attr->rmac)))
1024 SET_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE);
1025
1026 if (peer->sort == BGP_PEER_IBGP || peer->sort == BGP_PEER_CONFED
1027 || info->sub_type == BGP_ROUTE_AGGREGATE) {
1028 SET_FLAG(api.flags, ZEBRA_FLAG_IBGP);
1029 SET_FLAG(api.flags, ZEBRA_FLAG_INTERNAL);
1030 }
1031
1032 if ((peer->sort == BGP_PEER_EBGP && peer->ttl != 1)
1033 || CHECK_FLAG(peer->flags, PEER_FLAG_DISABLE_CONNECTED_CHECK)
1034 || bgp_flag_check(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
1035
1036 SET_FLAG(api.flags, ZEBRA_FLAG_INTERNAL);
1037
1038 /* Metric is currently based on the best-path only */
1039 metric = info->attr->med;
1040 for (mpinfo = info; mpinfo; mpinfo = bgp_info_mpath_next(mpinfo)) {
1041 if (valid_nh_count >= multipath_num)
1042 break;
1043
1044 *mpinfo_cp = *mpinfo;
1045
1046 /* Get nexthop address-family */
1047 if (p->family == AF_INET
1048 && !BGP_ATTR_NEXTHOP_AFI_IP6(mpinfo_cp->attr))
1049 nh_family = AF_INET;
1050 else if (p->family == AF_INET6
1051 || (p->family == AF_INET
1052 && BGP_ATTR_NEXTHOP_AFI_IP6(mpinfo_cp->attr)))
1053 nh_family = AF_INET6;
1054 else
1055 continue;
1056
1057 if (nh_family == AF_INET) {
1058 struct in_addr *nexthop;
1059
1060 if (bgp->table_map[afi][safi].name) {
1061 /* Copy info and attributes, so the route-map
1062 apply doesn't modify the BGP route info. */
1063 local_attr = *mpinfo->attr;
1064 mpinfo_cp->attr = &local_attr;
1065
1066 if (!bgp_table_map_apply(
1067 bgp->table_map[afi][safi].map, p,
1068 mpinfo_cp))
1069 continue;
1070
1071 /* metric/tag is only allowed to be
1072 * overridden on 1st nexthop */
1073 if (mpinfo == info) {
1074 metric = mpinfo_cp->attr->med;
1075 tag = mpinfo_cp->attr->tag;
1076 }
1077 }
1078
1079 nexthop = &mpinfo_cp->attr->nexthop;
1080
1081 api_nh = &api.nexthops[valid_nh_count];
1082 api_nh->gate.ipv4 = *nexthop;
1083 api_nh->vrf_id = bgp->vrf_id;
1084 /* EVPN type-2 routes are
1085 programmed as onlink on l3-vni SVI
1086 */
1087 if (CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE))
1088 api_nh->type = NEXTHOP_TYPE_IPV4_IFINDEX;
1089 else
1090 api_nh->type = NEXTHOP_TYPE_IPV4;
1091 } else {
1092 ifindex_t ifindex;
1093 struct in6_addr *nexthop;
1094
1095 ifindex = 0;
1096
1097 if (bgp->table_map[afi][safi].name) {
1098 /* Copy info and attributes, so the route-map
1099 apply doesn't modify the BGP route info. */
1100 local_attr = *mpinfo->attr;
1101 mpinfo_cp->attr = &local_attr;
1102
1103 if (!bgp_table_map_apply(
1104 bgp->table_map[afi][safi].map, p,
1105 mpinfo_cp))
1106 continue;
1107
1108 /* metric/tag is only allowed to be
1109 * overridden on 1st nexthop */
1110 if (mpinfo == info) {
1111 metric = mpinfo_cp->attr->med;
1112 tag = mpinfo_cp->attr->tag;
1113 }
1114 }
1115 nexthop = bgp_info_to_ipv6_nexthop(mpinfo_cp);
1116
1117 if ((mpinfo == info)
1118 && mpinfo->attr->mp_nexthop_len
1119 == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL)
1120 if (mpinfo->peer->nexthop.ifp)
1121 ifindex = mpinfo->peer->nexthop.ifp
1122 ->ifindex;
1123
1124 if (!ifindex) {
1125 if (mpinfo->peer->conf_if)
1126 ifindex = mpinfo->peer->ifp->ifindex;
1127 else if (mpinfo->peer->ifname)
1128 ifindex = ifname2ifindex(
1129 mpinfo->peer->ifname,
1130 bgp->vrf_id);
1131 else if (mpinfo->peer->nexthop.ifp)
1132 ifindex = mpinfo->peer->nexthop.ifp
1133 ->ifindex;
1134 }
1135 if (ifindex == 0)
1136 continue;
1137
1138 api_nh = &api.nexthops[valid_nh_count];
1139 api_nh->gate.ipv6 = *nexthop;
1140 api_nh->ifindex = ifindex;
1141 api_nh->type = NEXTHOP_TYPE_IPV6_IFINDEX;
1142 }
1143
1144 if (mpinfo->extra
1145 && bgp_is_valid_label(&mpinfo->extra->label[0])
1146 && !CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)) {
1147 has_valid_label = 1;
1148 label = label_pton(&mpinfo->extra->label[0]);
1149
1150 api_nh->label_num = 1;
1151 api_nh->labels[0] = label;
1152 }
1153 valid_nh_count++;
1154 }
1155
1156 /* if this is a evpn route we don't have to include the label */
1157 if (has_valid_label && !(CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)))
1158 SET_FLAG(api.message, ZAPI_MESSAGE_LABEL);
1159
1160 if (info->sub_type != BGP_ROUTE_AGGREGATE)
1161 api.nexthop_num = valid_nh_count;
1162
1163 SET_FLAG(api.message, ZAPI_MESSAGE_METRIC);
1164 api.metric = metric;
1165
1166 if (tag) {
1167 SET_FLAG(api.message, ZAPI_MESSAGE_TAG);
1168 api.tag = tag;
1169 }
1170
1171 distance = bgp_distance_apply(p, info, afi, safi, bgp);
1172 if (distance) {
1173 SET_FLAG(api.message, ZAPI_MESSAGE_DISTANCE);
1174 api.distance = distance;
1175 }
1176
1177 if (bgp_debug_zebra(p)) {
1178 char prefix_buf[PREFIX_STRLEN];
1179 char nh_buf[INET6_ADDRSTRLEN];
1180 char label_buf[20];
1181 int i;
1182
1183 prefix2str(&api.prefix, prefix_buf, sizeof(prefix_buf));
1184 zlog_debug("Tx route %s VRF %u %s metric %u tag %" ROUTE_TAG_PRI
1185 " count %d",
1186 valid_nh_count ? "add" : "delete", bgp->vrf_id,
1187 prefix_buf, api.metric, api.tag, api.nexthop_num);
1188 for (i = 0; i < api.nexthop_num; i++) {
1189 api_nh = &api.nexthops[i];
1190
1191 if (api_nh->type == NEXTHOP_TYPE_IPV4)
1192 nh_family = AF_INET;
1193 else
1194 nh_family = AF_INET6;
1195 inet_ntop(nh_family, &api_nh->gate, nh_buf,
1196 sizeof(nh_buf));
1197
1198 label_buf[0] = '\0';
1199 if (has_valid_label
1200 && !CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE))
1201 sprintf(label_buf, "label %u",
1202 api_nh->labels[0]);
1203 zlog_debug(" nhop [%d]: %s %s", i + 1, nh_buf,
1204 label_buf);
1205 }
1206 }
1207
1208 zclient_route_send(valid_nh_count ? ZEBRA_ROUTE_ADD
1209 : ZEBRA_ROUTE_DELETE,
1210 zclient, &api);
1211 }
1212
1213 /* Announce all routes of a table to zebra */
1214 void bgp_zebra_announce_table(struct bgp *bgp, afi_t afi, safi_t safi)
1215 {
1216 struct bgp_node *rn;
1217 struct bgp_table *table;
1218 struct bgp_info *ri;
1219
1220 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
1221 * know of this instance.
1222 */
1223 if (!bgp_install_info_to_zebra(bgp))
1224 return;
1225
1226 table = bgp->rib[afi][safi];
1227 if (!table)
1228 return;
1229
1230 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn))
1231 for (ri = rn->info; ri; ri = ri->next)
1232 if (CHECK_FLAG(ri->flags, BGP_INFO_SELECTED)
1233 && ri->type == ZEBRA_ROUTE_BGP
1234 && ri->sub_type == BGP_ROUTE_NORMAL)
1235 bgp_zebra_announce(rn, &rn->p, ri, bgp, afi,
1236 safi);
1237 }
1238
1239 void bgp_zebra_withdraw(struct prefix *p, struct bgp_info *info, safi_t safi)
1240 {
1241 struct zapi_route api;
1242 struct peer *peer;
1243
1244 peer = info->peer;
1245 assert(peer);
1246
1247 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
1248 * know of this instance.
1249 */
1250 if (!bgp_install_info_to_zebra(peer->bgp))
1251 return;
1252
1253 memset(&api, 0, sizeof(api));
1254 memcpy(&api.rmac, &(info->attr->rmac), sizeof(struct ethaddr));
1255 api.vrf_id = peer->bgp->vrf_id;
1256 api.type = ZEBRA_ROUTE_BGP;
1257 api.safi = safi;
1258 api.prefix = *p;
1259
1260 /* If it is an EVPN route mark as such.
1261 * Currently presence of rmac in attr denotes
1262 * this is an EVPN type-2 route
1263 */
1264 if (!is_zero_mac(&(info->attr->rmac)))
1265 SET_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE);
1266
1267 if (peer->sort == BGP_PEER_IBGP) {
1268 SET_FLAG(api.flags, ZEBRA_FLAG_INTERNAL);
1269 SET_FLAG(api.flags, ZEBRA_FLAG_IBGP);
1270 }
1271
1272 if ((peer->sort == BGP_PEER_EBGP && peer->ttl != 1)
1273 || CHECK_FLAG(peer->flags, PEER_FLAG_DISABLE_CONNECTED_CHECK)
1274 || bgp_flag_check(peer->bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
1275 SET_FLAG(api.flags, ZEBRA_FLAG_INTERNAL);
1276
1277 if (bgp_debug_zebra(p)) {
1278 char buf[PREFIX_STRLEN];
1279
1280 prefix2str(&api.prefix, buf, sizeof(buf));
1281 zlog_debug("Tx route delete VRF %u %s", peer->bgp->vrf_id, buf);
1282 }
1283
1284 zclient_route_send(ZEBRA_ROUTE_DELETE, zclient, &api);
1285 }
1286
1287 struct bgp_redist *bgp_redist_lookup(struct bgp *bgp, afi_t afi, u_char type,
1288 u_short instance)
1289 {
1290 struct list *red_list;
1291 struct listnode *node;
1292 struct bgp_redist *red;
1293
1294 red_list = bgp->redist[afi][type];
1295 if (!red_list)
1296 return (NULL);
1297
1298 for (ALL_LIST_ELEMENTS_RO(red_list, node, red))
1299 if (red->instance == instance)
1300 return red;
1301
1302 return NULL;
1303 }
1304
1305 struct bgp_redist *bgp_redist_add(struct bgp *bgp, afi_t afi, u_char type,
1306 u_short instance)
1307 {
1308 struct list *red_list;
1309 struct bgp_redist *red;
1310
1311 red = bgp_redist_lookup(bgp, afi, type, instance);
1312 if (red)
1313 return red;
1314
1315 if (!bgp->redist[afi][type])
1316 bgp->redist[afi][type] = list_new();
1317
1318 red_list = bgp->redist[afi][type];
1319 red = (struct bgp_redist *)XCALLOC(MTYPE_BGP_REDIST,
1320 sizeof(struct bgp_redist));
1321 red->instance = instance;
1322
1323 listnode_add(red_list, red);
1324
1325 return red;
1326 }
1327
1328 static void bgp_redist_del(struct bgp *bgp, afi_t afi, u_char type,
1329 u_short instance)
1330 {
1331 struct bgp_redist *red;
1332
1333 red = bgp_redist_lookup(bgp, afi, type, instance);
1334
1335 if (red) {
1336 listnode_delete(bgp->redist[afi][type], red);
1337 XFREE(MTYPE_BGP_REDIST, red);
1338 if (!bgp->redist[afi][type]->count)
1339 list_delete_and_null(&bgp->redist[afi][type]);
1340 }
1341 }
1342
1343 /* Other routes redistribution into BGP. */
1344 int bgp_redistribute_set(struct bgp *bgp, afi_t afi, int type, u_short instance)
1345 {
1346
1347 /* Return if already redistribute flag is set. */
1348 if (instance) {
1349 if (redist_check_instance(&zclient->mi_redist[afi][type],
1350 instance))
1351 return CMD_WARNING;
1352
1353 redist_add_instance(&zclient->mi_redist[afi][type], instance);
1354 } else {
1355 if (vrf_bitmap_check(zclient->redist[afi][type], bgp->vrf_id))
1356 return CMD_WARNING;
1357
1358 #if ENABLE_BGP_VNC
1359 if (bgp->vrf_id == VRF_DEFAULT
1360 && type == ZEBRA_ROUTE_VNC_DIRECT) {
1361 vnc_export_bgp_enable(
1362 bgp, afi); /* only enables if mode bits cfg'd */
1363 }
1364 #endif
1365
1366 vrf_bitmap_set(zclient->redist[afi][type], bgp->vrf_id);
1367 }
1368
1369 /*
1370 * Don't try to register if we're not connected to Zebra or Zebra
1371 * doesn't know of this instance.
1372 *
1373 * When we come up later well resend if needed.
1374 */
1375 if (!bgp_install_info_to_zebra(bgp))
1376 return CMD_SUCCESS;
1377
1378 if (BGP_DEBUG(zebra, ZEBRA))
1379 zlog_debug("Tx redistribute add VRF %u afi %d %s %d",
1380 bgp->vrf_id, afi, zebra_route_string(type),
1381 instance);
1382
1383 /* Send distribute add message to zebra. */
1384 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_ADD, zclient, afi, type,
1385 instance, bgp->vrf_id);
1386
1387 return CMD_SUCCESS;
1388 }
1389
1390 int bgp_redistribute_resend(struct bgp *bgp, afi_t afi, int type,
1391 u_short instance)
1392 {
1393 /* Don't try to send if we're not connected to Zebra or Zebra doesn't
1394 * know of this instance.
1395 */
1396 if (!bgp_install_info_to_zebra(bgp))
1397 return -1;
1398
1399 if (BGP_DEBUG(zebra, ZEBRA))
1400 zlog_debug("Tx redistribute del/add VRF %u afi %d %s %d",
1401 bgp->vrf_id, afi, zebra_route_string(type),
1402 instance);
1403
1404 /* Send distribute add message to zebra. */
1405 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_DELETE, zclient, afi, type,
1406 instance, bgp->vrf_id);
1407 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_ADD, zclient, afi, type,
1408 instance, bgp->vrf_id);
1409
1410 return 0;
1411 }
1412
1413 /* Redistribute with route-map specification. */
1414 int bgp_redistribute_rmap_set(struct bgp_redist *red, const char *name)
1415 {
1416 if (red->rmap.name && (strcmp(red->rmap.name, name) == 0))
1417 return 0;
1418
1419 if (red->rmap.name)
1420 XFREE(MTYPE_ROUTE_MAP_NAME, red->rmap.name);
1421 red->rmap.name = XSTRDUP(MTYPE_ROUTE_MAP_NAME, name);
1422 red->rmap.map = route_map_lookup_by_name(name);
1423
1424 return 1;
1425 }
1426
1427 /* Redistribute with metric specification. */
1428 int bgp_redistribute_metric_set(struct bgp *bgp, struct bgp_redist *red,
1429 afi_t afi, int type, u_int32_t metric)
1430 {
1431 struct bgp_node *rn;
1432 struct bgp_info *ri;
1433
1434 if (red->redist_metric_flag && red->redist_metric == metric)
1435 return 0;
1436
1437 red->redist_metric_flag = 1;
1438 red->redist_metric = metric;
1439
1440 for (rn = bgp_table_top(bgp->rib[afi][SAFI_UNICAST]); rn;
1441 rn = bgp_route_next(rn)) {
1442 for (ri = rn->info; ri; ri = ri->next) {
1443 if (ri->sub_type == BGP_ROUTE_REDISTRIBUTE
1444 && ri->type == type
1445 && ri->instance == red->instance) {
1446 struct attr *old_attr;
1447 struct attr new_attr;
1448
1449 bgp_attr_dup(&new_attr, ri->attr);
1450 new_attr.med = red->redist_metric;
1451 old_attr = ri->attr;
1452 ri->attr = bgp_attr_intern(&new_attr);
1453 bgp_attr_unintern(&old_attr);
1454
1455 bgp_info_set_flag(rn, ri,
1456 BGP_INFO_ATTR_CHANGED);
1457 bgp_process(bgp, rn, afi, SAFI_UNICAST);
1458 }
1459 }
1460 }
1461
1462 return 1;
1463 }
1464
1465 /* Unset redistribution. */
1466 int bgp_redistribute_unreg(struct bgp *bgp, afi_t afi, int type,
1467 u_short instance)
1468 {
1469 struct bgp_redist *red;
1470
1471 red = bgp_redist_lookup(bgp, afi, type, instance);
1472 if (!red)
1473 return CMD_SUCCESS;
1474
1475 /* Return if zebra connection is disabled. */
1476 if (instance) {
1477 if (!redist_check_instance(&zclient->mi_redist[afi][type],
1478 instance))
1479 return CMD_WARNING;
1480 redist_del_instance(&zclient->mi_redist[afi][type], instance);
1481 } else {
1482 if (!vrf_bitmap_check(zclient->redist[afi][type], bgp->vrf_id))
1483 return CMD_WARNING;
1484 vrf_bitmap_unset(zclient->redist[afi][type], bgp->vrf_id);
1485 }
1486
1487 #if ENABLE_BGP_VNC
1488 if (bgp->vrf_id == VRF_DEFAULT && type == ZEBRA_ROUTE_VNC_DIRECT) {
1489 vnc_export_bgp_disable(bgp, afi);
1490 }
1491 #endif
1492
1493 if (bgp_install_info_to_zebra(bgp)) {
1494 /* Send distribute delete message to zebra. */
1495 if (BGP_DEBUG(zebra, ZEBRA))
1496 zlog_debug("Tx redistribute del VRF %u afi %d %s %d",
1497 bgp->vrf_id, afi, zebra_route_string(type),
1498 instance);
1499 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_DELETE, zclient, afi,
1500 type, instance, bgp->vrf_id);
1501 }
1502
1503 /* Withdraw redistributed routes from current BGP's routing table. */
1504 bgp_redistribute_withdraw(bgp, afi, type, instance);
1505
1506 return CMD_SUCCESS;
1507 }
1508
1509 /* Unset redistribution. */
1510 int bgp_redistribute_unset(struct bgp *bgp, afi_t afi, int type,
1511 u_short instance)
1512 {
1513 struct bgp_redist *red;
1514
1515 red = bgp_redist_lookup(bgp, afi, type, instance);
1516 if (!red)
1517 return CMD_SUCCESS;
1518
1519 bgp_redistribute_unreg(bgp, afi, type, instance);
1520
1521 /* Unset route-map. */
1522 if (red->rmap.name)
1523 XFREE(MTYPE_ROUTE_MAP_NAME, red->rmap.name);
1524 red->rmap.name = NULL;
1525 red->rmap.map = NULL;
1526
1527 /* Unset metric. */
1528 red->redist_metric_flag = 0;
1529 red->redist_metric = 0;
1530
1531 bgp_redist_del(bgp, afi, type, instance);
1532
1533 return CMD_SUCCESS;
1534 }
1535
1536 /* Update redistribute vrf bitmap during triggers like
1537 restart networking or delete/add VRFs */
1538 void bgp_update_redist_vrf_bitmaps(struct bgp *bgp, vrf_id_t old_vrf_id)
1539 {
1540 int i;
1541 afi_t afi;
1542
1543 for (afi = AFI_IP; afi < AFI_MAX; afi++)
1544 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
1545 if ((old_vrf_id == VRF_UNKNOWN)
1546 || vrf_bitmap_check(zclient->redist[afi][i],
1547 old_vrf_id)) {
1548 vrf_bitmap_unset(zclient->redist[afi][i],
1549 old_vrf_id);
1550 vrf_bitmap_set(zclient->redist[afi][i],
1551 bgp->vrf_id);
1552 }
1553 return;
1554 }
1555
1556 void bgp_zclient_reset(void)
1557 {
1558 zclient_reset(zclient);
1559 }
1560
1561 /* Register this instance with Zebra. Invoked upon connect (for
1562 * default instance) and when other VRFs are learnt (or created and
1563 * already learnt).
1564 */
1565 void bgp_zebra_instance_register(struct bgp *bgp)
1566 {
1567 /* Don't try to register if we're not connected to Zebra */
1568 if (!zclient || zclient->sock < 0)
1569 return;
1570
1571 if (BGP_DEBUG(zebra, ZEBRA))
1572 zlog_debug("Registering VRF %u", bgp->vrf_id);
1573
1574 /* Register for router-id, interfaces, redistributed routes. */
1575 zclient_send_reg_requests(zclient, bgp->vrf_id);
1576
1577 /* For default instance, register to learn about VNIs, if appropriate.
1578 */
1579 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT && is_evpn_enabled())
1580 bgp_zebra_advertise_all_vni(bgp, 1);
1581 }
1582
1583 /* Deregister this instance with Zebra. Invoked upon the instance
1584 * being deleted (default or VRF) and it is already registered.
1585 */
1586 void bgp_zebra_instance_deregister(struct bgp *bgp)
1587 {
1588 /* Don't try to deregister if we're not connected to Zebra */
1589 if (zclient->sock < 0)
1590 return;
1591
1592 if (BGP_DEBUG(zebra, ZEBRA))
1593 zlog_debug("Deregistering VRF %u", bgp->vrf_id);
1594
1595 /* For default instance, unregister learning about VNIs, if appropriate.
1596 */
1597 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT && is_evpn_enabled())
1598 bgp_zebra_advertise_all_vni(bgp, 0);
1599
1600 /* Deregister for router-id, interfaces, redistributed routes. */
1601 zclient_send_dereg_requests(zclient, bgp->vrf_id);
1602 }
1603
1604 void bgp_zebra_initiate_radv(struct bgp *bgp, struct peer *peer)
1605 {
1606 int ra_interval = BGP_UNNUM_DEFAULT_RA_INTERVAL;
1607
1608 /* Don't try to initiate if we're not connected to Zebra */
1609 if (zclient->sock < 0)
1610 return;
1611
1612 if (BGP_DEBUG(zebra, ZEBRA))
1613 zlog_debug("%u: Initiating RA for peer %s", bgp->vrf_id,
1614 peer->host);
1615
1616 zclient_send_interface_radv_req(zclient, bgp->vrf_id, peer->ifp, 1,
1617 ra_interval);
1618 }
1619
1620 void bgp_zebra_terminate_radv(struct bgp *bgp, struct peer *peer)
1621 {
1622 /* Don't try to terminate if we're not connected to Zebra */
1623 if (zclient->sock < 0)
1624 return;
1625
1626 if (BGP_DEBUG(zebra, ZEBRA))
1627 zlog_debug("%u: Terminating RA for peer %s", bgp->vrf_id,
1628 peer->host);
1629
1630 zclient_send_interface_radv_req(zclient, bgp->vrf_id, peer->ifp, 0, 0);
1631 }
1632
1633 int bgp_zebra_advertise_subnet(struct bgp *bgp, int advertise, vni_t vni)
1634 {
1635 struct stream *s = NULL;
1636
1637 /* Check socket. */
1638 if (!zclient || zclient->sock < 0)
1639 return 0;
1640
1641 /* Don't try to register if Zebra doesn't know of this instance. */
1642 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1643 return 0;
1644
1645 s = zclient->obuf;
1646 stream_reset(s);
1647
1648 zclient_create_header(s, ZEBRA_ADVERTISE_SUBNET, bgp->vrf_id);
1649 stream_putc(s, advertise);
1650 stream_put3(s, vni);
1651 stream_putw_at(s, 0, stream_get_endp(s));
1652
1653 return zclient_send_message(zclient);
1654 }
1655
1656 int bgp_zebra_advertise_gw_macip(struct bgp *bgp, int advertise, vni_t vni)
1657 {
1658 struct stream *s = NULL;
1659
1660 /* Check socket. */
1661 if (!zclient || zclient->sock < 0)
1662 return 0;
1663
1664 /* Don't try to register if Zebra doesn't know of this instance. */
1665 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1666 return 0;
1667
1668 s = zclient->obuf;
1669 stream_reset(s);
1670
1671 zclient_create_header(s, ZEBRA_ADVERTISE_DEFAULT_GW, bgp->vrf_id);
1672 stream_putc(s, advertise);
1673 stream_put3(s, vni);
1674 stream_putw_at(s, 0, stream_get_endp(s));
1675
1676 return zclient_send_message(zclient);
1677 }
1678
1679 int bgp_zebra_advertise_all_vni(struct bgp *bgp, int advertise)
1680 {
1681 struct stream *s;
1682
1683 /* Check socket. */
1684 if (!zclient || zclient->sock < 0)
1685 return 0;
1686
1687 /* Don't try to register if Zebra doesn't know of this instance. */
1688 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1689 return 0;
1690
1691 s = zclient->obuf;
1692 stream_reset(s);
1693
1694 zclient_create_header(s, ZEBRA_ADVERTISE_ALL_VNI, bgp->vrf_id);
1695 stream_putc(s, advertise);
1696 stream_putw_at(s, 0, stream_get_endp(s));
1697
1698 return zclient_send_message(zclient);
1699 }
1700
1701 /* BGP has established connection with Zebra. */
1702 static void bgp_zebra_connected(struct zclient *zclient)
1703 {
1704 struct bgp *bgp;
1705
1706 zclient_num_connects++; /* increment even if not responding */
1707
1708 /* At this point, we may or may not have BGP instances configured, but
1709 * we're only interested in the default VRF (others wouldn't have learnt
1710 * the VRF from Zebra yet.)
1711 */
1712 bgp = bgp_get_default();
1713 if (!bgp)
1714 return;
1715
1716 bgp_zebra_instance_register(bgp);
1717
1718 /* Send the client registration */
1719 bfd_client_sendmsg(zclient, ZEBRA_BFD_CLIENT_REGISTER);
1720
1721 /* TODO - What if we have peers and networks configured, do we have to
1722 * kick-start them?
1723 */
1724 }
1725
1726 static int bgp_zebra_process_local_l3vni(int cmd, struct zclient *zclient,
1727 zebra_size_t length, vrf_id_t vrf_id)
1728 {
1729 int filter = 0;
1730 char buf[ETHER_ADDR_STRLEN];
1731 vni_t l3vni = 0;
1732 struct ethaddr rmac;
1733 struct in_addr originator_ip;
1734 struct stream *s;
1735
1736 memset(&rmac, 0, sizeof(struct ethaddr));
1737 memset(&originator_ip, 0, sizeof(struct in_addr));
1738 s = zclient->ibuf;
1739 l3vni = stream_getl(s);
1740 if (cmd == ZEBRA_L3VNI_ADD) {
1741 stream_get(&rmac, s, sizeof(struct ethaddr));
1742 originator_ip.s_addr = stream_get_ipv4(s);
1743 stream_get(&filter, s, sizeof(int));
1744 }
1745
1746 if (BGP_DEBUG(zebra, ZEBRA))
1747 zlog_debug("Rx L3-VNI %s VRF %s VNI %u RMAC %s filter %s",
1748 (cmd == ZEBRA_L3VNI_ADD) ? "add" : "del",
1749 vrf_id_to_name(vrf_id),
1750 l3vni,
1751 prefix_mac2str(&rmac, buf, sizeof(buf)),
1752 filter ? "prefix-routes-only" : "none");
1753
1754 if (cmd == ZEBRA_L3VNI_ADD)
1755 bgp_evpn_local_l3vni_add(l3vni, vrf_id, &rmac, originator_ip,
1756 filter);
1757 else
1758 bgp_evpn_local_l3vni_del(l3vni, vrf_id);
1759
1760 return 0;
1761 }
1762
1763 static int bgp_zebra_process_local_vni(int command, struct zclient *zclient,
1764 zebra_size_t length, vrf_id_t vrf_id)
1765 {
1766 struct stream *s;
1767 vni_t vni;
1768 struct bgp *bgp;
1769 struct in_addr vtep_ip = {INADDR_ANY};
1770 vrf_id_t tenant_vrf_id = VRF_DEFAULT;
1771
1772 s = zclient->ibuf;
1773 vni = stream_getl(s);
1774 if (command == ZEBRA_VNI_ADD) {
1775 vtep_ip.s_addr = stream_get_ipv4(s);
1776 stream_get(&tenant_vrf_id, s, sizeof(vrf_id_t));
1777 }
1778
1779 bgp = bgp_lookup_by_vrf_id(vrf_id);
1780 if (!bgp)
1781 return 0;
1782
1783 if (BGP_DEBUG(zebra, ZEBRA))
1784 zlog_debug("Rx VNI %s VRF %s VNI %u tenant-vrf %s",
1785 (command == ZEBRA_VNI_ADD) ? "add" : "del",
1786 vrf_id_to_name(vrf_id), vni,
1787 vrf_id_to_name(tenant_vrf_id));
1788
1789 if (command == ZEBRA_VNI_ADD)
1790 return bgp_evpn_local_vni_add(
1791 bgp, vni, vtep_ip.s_addr ? vtep_ip : bgp->router_id,
1792 tenant_vrf_id);
1793 else
1794 return bgp_evpn_local_vni_del(bgp, vni);
1795 }
1796
1797 static int bgp_zebra_process_local_macip(int command, struct zclient *zclient,
1798 zebra_size_t length, vrf_id_t vrf_id)
1799 {
1800 struct stream *s;
1801 vni_t vni;
1802 struct bgp *bgp;
1803 struct ethaddr mac;
1804 struct ipaddr ip;
1805 int ipa_len;
1806 char buf[ETHER_ADDR_STRLEN];
1807 char buf1[INET6_ADDRSTRLEN];
1808 u_char flags;
1809
1810 memset(&ip, 0, sizeof(ip));
1811 s = zclient->ibuf;
1812 vni = stream_getl(s);
1813 stream_get(&mac.octet, s, ETH_ALEN);
1814 ipa_len = stream_getl(s);
1815 if (ipa_len != 0 && ipa_len != IPV4_MAX_BYTELEN
1816 && ipa_len != IPV6_MAX_BYTELEN) {
1817 zlog_err("%u:Recv MACIP %s with invalid IP addr length %d",
1818 vrf_id, (command == ZEBRA_MACIP_ADD) ? "Add" : "Del",
1819 ipa_len);
1820 return -1;
1821 }
1822
1823 if (ipa_len) {
1824 ip.ipa_type =
1825 (ipa_len == IPV4_MAX_BYTELEN) ? IPADDR_V4 : IPADDR_V6;
1826 stream_get(&ip.ip.addr, s, ipa_len);
1827 }
1828 flags = stream_getc(s);
1829
1830 bgp = bgp_lookup_by_vrf_id(vrf_id);
1831 if (!bgp)
1832 return 0;
1833
1834 if (BGP_DEBUG(zebra, ZEBRA))
1835 zlog_debug("%u:Recv MACIP %s flags 0x%x MAC %s IP %s VNI %u",
1836 vrf_id, (command == ZEBRA_MACIP_ADD) ? "Add" : "Del",
1837 flags, prefix_mac2str(&mac, buf, sizeof(buf)),
1838 ipaddr2str(&ip, buf1, sizeof(buf1)), vni);
1839
1840 if (command == ZEBRA_MACIP_ADD)
1841 return bgp_evpn_local_macip_add(bgp, vni, &mac, &ip, flags);
1842 else
1843 return bgp_evpn_local_macip_del(bgp, vni, &mac, &ip);
1844 }
1845
1846 static void bgp_zebra_process_local_ip_prefix(int cmd, struct zclient *zclient,
1847 zebra_size_t length,
1848 vrf_id_t vrf_id)
1849 {
1850 struct stream *s = NULL;
1851 struct bgp *bgp_vrf = NULL;
1852 struct prefix p;
1853 char buf[PREFIX_STRLEN];
1854
1855 memset(&p, 0, sizeof(struct prefix));
1856 s = zclient->ibuf;
1857 stream_get(&p, s, sizeof(struct prefix));
1858
1859 bgp_vrf = bgp_lookup_by_vrf_id(vrf_id);
1860 if (!bgp_vrf)
1861 return;
1862
1863 if (BGP_DEBUG(zebra, ZEBRA))
1864 zlog_debug("Recv prefix %s %s on vrf %s",
1865 prefix2str(&p, buf, sizeof(buf)),
1866 (cmd == ZEBRA_IP_PREFIX_ROUTE_ADD) ? "ADD" : "DEL",
1867 vrf_id_to_name(vrf_id));
1868
1869 if (cmd == ZEBRA_IP_PREFIX_ROUTE_ADD) {
1870
1871 if (p.family == AF_INET)
1872 return bgp_evpn_advertise_type5_route(
1873 bgp_vrf, &p, NULL, AFI_IP, SAFI_UNICAST);
1874 else
1875 return bgp_evpn_advertise_type5_route(
1876 bgp_vrf, &p, NULL, AFI_IP6, SAFI_UNICAST);
1877
1878 } else {
1879 if (p.family == AF_INET)
1880 return bgp_evpn_withdraw_type5_route(
1881 bgp_vrf, &p, AFI_IP, SAFI_UNICAST);
1882 else
1883 return bgp_evpn_withdraw_type5_route(
1884 bgp_vrf, &p, AFI_IP6, SAFI_UNICAST);
1885 }
1886 }
1887
1888 extern struct zebra_privs_t bgpd_privs;
1889
1890 void bgp_zebra_init(struct thread_master *master)
1891 {
1892 zclient_num_connects = 0;
1893
1894 /* Set default values. */
1895 zclient = zclient_new_notify(master, &zclient_options_default);
1896 zclient_init(zclient, ZEBRA_ROUTE_BGP, 0, &bgpd_privs);
1897 zclient->zebra_connected = bgp_zebra_connected;
1898 zclient->router_id_update = bgp_router_id_update;
1899 zclient->interface_add = bgp_interface_add;
1900 zclient->interface_delete = bgp_interface_delete;
1901 zclient->interface_address_add = bgp_interface_address_add;
1902 zclient->interface_address_delete = bgp_interface_address_delete;
1903 zclient->interface_nbr_address_add = bgp_interface_nbr_address_add;
1904 zclient->interface_nbr_address_delete =
1905 bgp_interface_nbr_address_delete;
1906 zclient->interface_vrf_update = bgp_interface_vrf_update;
1907 zclient->redistribute_route_add = zebra_read_route;
1908 zclient->redistribute_route_del = zebra_read_route;
1909 zclient->interface_up = bgp_interface_up;
1910 zclient->interface_down = bgp_interface_down;
1911 zclient->nexthop_update = bgp_read_nexthop_update;
1912 zclient->import_check_update = bgp_read_import_check_update;
1913 zclient->fec_update = bgp_read_fec_update;
1914 zclient->local_vni_add = bgp_zebra_process_local_vni;
1915 zclient->local_vni_del = bgp_zebra_process_local_vni;
1916 zclient->local_macip_add = bgp_zebra_process_local_macip;
1917 zclient->local_macip_del = bgp_zebra_process_local_macip;
1918 zclient->local_l3vni_add = bgp_zebra_process_local_l3vni;
1919 zclient->local_l3vni_del = bgp_zebra_process_local_l3vni;
1920 zclient->local_ip_prefix_add = bgp_zebra_process_local_ip_prefix;
1921 zclient->local_ip_prefix_del = bgp_zebra_process_local_ip_prefix;
1922 }
1923
1924 void bgp_zebra_destroy(void)
1925 {
1926 if (zclient == NULL)
1927 return;
1928 zclient_stop(zclient);
1929 zclient_free(zclient);
1930 zclient = NULL;
1931 }
1932
1933 int bgp_zebra_num_connects(void)
1934 {
1935 return zclient_num_connects;
1936 }