]> git.proxmox.com Git - mirror_frr.git/blob - bgpd/bgp_zebra.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Merge pull request #2624 from donaldsharp/PIM_ZOMILY_ZOM
[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 #include "bgpd/bgp_mplsvpn.h"
58 #include "bgpd/bgp_labelpool.h"
59 #include "bgpd/bgp_pbr.h"
60
61 /* All information about zebra. */
62 struct zclient *zclient = NULL;
63
64 /* Can we install into zebra? */
65 static inline int bgp_install_info_to_zebra(struct bgp *bgp)
66 {
67 if (zclient->sock <= 0)
68 return 0;
69
70 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
71 return 0;
72
73 return 1;
74 }
75
76 int zclient_num_connects;
77
78 /* Router-id update message from zebra. */
79 static int bgp_router_id_update(int command, struct zclient *zclient,
80 zebra_size_t length, vrf_id_t vrf_id)
81 {
82 struct prefix router_id;
83
84 zebra_router_id_update_read(zclient->ibuf, &router_id);
85
86 if (BGP_DEBUG(zebra, ZEBRA)) {
87 char buf[PREFIX2STR_BUFFER];
88 prefix2str(&router_id, buf, sizeof(buf));
89 zlog_debug("Rx Router Id update VRF %u Id %s", vrf_id, buf);
90 }
91
92 bgp_router_id_zebra_bump(vrf_id, &router_id);
93 return 0;
94 }
95
96 /* Nexthop update message from zebra. */
97 static int bgp_read_nexthop_update(int command, struct zclient *zclient,
98 zebra_size_t length, vrf_id_t vrf_id)
99 {
100 bgp_parse_nexthop_update(command, vrf_id);
101 return 0;
102 }
103
104 static int bgp_read_import_check_update(int command, struct zclient *zclient,
105 zebra_size_t length, vrf_id_t vrf_id)
106 {
107 bgp_parse_nexthop_update(command, vrf_id);
108 return 0;
109 }
110
111 /* Set or clear interface on which unnumbered neighbor is configured. This
112 * would in turn cause BGP to initiate or turn off IPv6 RAs on this
113 * interface.
114 */
115 static void bgp_update_interface_nbrs(struct bgp *bgp, struct interface *ifp,
116 struct interface *upd_ifp)
117 {
118 struct listnode *node, *nnode;
119 struct peer *peer;
120
121 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
122 if (peer->conf_if && (strcmp(peer->conf_if, ifp->name) == 0)) {
123 if (upd_ifp) {
124 peer->ifp = upd_ifp;
125 bgp_zebra_initiate_radv(bgp, peer);
126 } else {
127 bgp_zebra_terminate_radv(bgp, peer);
128 peer->ifp = upd_ifp;
129 }
130 }
131 }
132 }
133
134 static int bgp_read_fec_update(int command, struct zclient *zclient,
135 zebra_size_t length)
136 {
137 bgp_parse_fec_update();
138 return 0;
139 }
140
141 static void bgp_start_interface_nbrs(struct bgp *bgp, struct interface *ifp)
142 {
143 struct listnode *node, *nnode;
144 struct peer *peer;
145
146 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
147 if (peer->conf_if && (strcmp(peer->conf_if, ifp->name) == 0)
148 && peer->status != Established) {
149 if (peer_active(peer))
150 BGP_EVENT_ADD(peer, BGP_Stop);
151 BGP_EVENT_ADD(peer, BGP_Start);
152 }
153 }
154 }
155
156 static void bgp_nbr_connected_add(struct bgp *bgp, struct nbr_connected *ifc)
157 {
158 struct listnode *node;
159 struct connected *connected;
160 struct interface *ifp;
161 struct prefix *p;
162
163 /* Kick-off the FSM for any relevant peers only if there is a
164 * valid local address on the interface.
165 */
166 ifp = ifc->ifp;
167 for (ALL_LIST_ELEMENTS_RO(ifp->connected, node, connected)) {
168 p = connected->address;
169 if (p->family == AF_INET6
170 && IN6_IS_ADDR_LINKLOCAL(&p->u.prefix6))
171 break;
172 }
173 if (!connected)
174 return;
175
176 bgp_start_interface_nbrs(bgp, ifp);
177 }
178
179 static void bgp_nbr_connected_delete(struct bgp *bgp, struct nbr_connected *ifc,
180 int del)
181 {
182 struct listnode *node, *nnode;
183 struct peer *peer;
184 struct interface *ifp;
185
186 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
187 if (peer->conf_if
188 && (strcmp(peer->conf_if, ifc->ifp->name) == 0)) {
189 peer->last_reset = PEER_DOWN_NBR_ADDR_DEL;
190 BGP_EVENT_ADD(peer, BGP_Stop);
191 }
192 }
193 /* Free neighbor also, if we're asked to. */
194 if (del) {
195 ifp = ifc->ifp;
196 listnode_delete(ifp->nbr_connected, ifc);
197 nbr_connected_free(ifc);
198 }
199 }
200
201 /* Inteface addition message from zebra. */
202 static int bgp_interface_add(int command, struct zclient *zclient,
203 zebra_size_t length, vrf_id_t vrf_id)
204 {
205 struct interface *ifp;
206 struct bgp *bgp;
207
208 ifp = zebra_interface_add_read(zclient->ibuf, vrf_id);
209 if (!ifp) // unexpected
210 return 0;
211
212 if (BGP_DEBUG(zebra, ZEBRA) && ifp)
213 zlog_debug("Rx Intf add VRF %u IF %s", vrf_id, ifp->name);
214
215 bgp = bgp_lookup_by_vrf_id(vrf_id);
216 if (!bgp)
217 return 0;
218
219 bgp_update_interface_nbrs(bgp, ifp, ifp);
220 return 0;
221 }
222
223 static int bgp_interface_delete(int command, struct zclient *zclient,
224 zebra_size_t length, vrf_id_t vrf_id)
225 {
226 struct stream *s;
227 struct interface *ifp;
228 struct bgp *bgp;
229
230 bgp = bgp_lookup_by_vrf_id(vrf_id);
231 if (!bgp)
232 return 0;
233
234 s = zclient->ibuf;
235 ifp = zebra_interface_state_read(s, vrf_id);
236 if (!ifp) /* This may happen if we've just unregistered for a VRF. */
237 return 0;
238
239 if (BGP_DEBUG(zebra, ZEBRA))
240 zlog_debug("Rx Intf del VRF %u IF %s", vrf_id, ifp->name);
241
242 bgp_update_interface_nbrs(bgp, ifp, NULL);
243
244 if_set_index(ifp, IFINDEX_INTERNAL);
245 return 0;
246 }
247
248 static int bgp_interface_up(int command, struct zclient *zclient,
249 zebra_size_t length, vrf_id_t vrf_id)
250 {
251 struct stream *s;
252 struct interface *ifp;
253 struct connected *c;
254 struct nbr_connected *nc;
255 struct listnode *node, *nnode;
256 struct bgp *bgp;
257
258 bgp = bgp_lookup_by_vrf_id(vrf_id);
259 if (!bgp)
260 return 0;
261
262 s = zclient->ibuf;
263 ifp = zebra_interface_state_read(s, vrf_id);
264
265 if (!ifp)
266 return 0;
267
268 if (BGP_DEBUG(zebra, ZEBRA))
269 zlog_debug("Rx Intf up VRF %u IF %s", vrf_id, ifp->name);
270
271 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
272 bgp_connected_add(bgp, c);
273
274 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
275 bgp_nbr_connected_add(bgp, nc);
276
277 return 0;
278 }
279
280 static int bgp_interface_down(int command, struct zclient *zclient,
281 zebra_size_t length, vrf_id_t vrf_id)
282 {
283 struct stream *s;
284 struct interface *ifp;
285 struct connected *c;
286 struct nbr_connected *nc;
287 struct listnode *node, *nnode;
288 struct bgp *bgp;
289
290 bgp = bgp_lookup_by_vrf_id(vrf_id);
291 if (!bgp)
292 return 0;
293
294 s = zclient->ibuf;
295 ifp = zebra_interface_state_read(s, vrf_id);
296 if (!ifp)
297 return 0;
298
299 if (BGP_DEBUG(zebra, ZEBRA))
300 zlog_debug("Rx Intf down VRF %u IF %s", vrf_id, ifp->name);
301
302 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
303 bgp_connected_delete(bgp, c);
304
305 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
306 bgp_nbr_connected_delete(bgp, nc, 1);
307
308 /* Fast external-failover */
309 {
310 struct peer *peer;
311
312 if (CHECK_FLAG(bgp->flags, BGP_FLAG_NO_FAST_EXT_FAILOVER))
313 return 0;
314
315 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
316 #if defined(HAVE_CUMULUS)
317 /* Take down directly connected EBGP peers as well as
318 * 1-hop BFD
319 * tracked (directly connected) IBGP peers.
320 */
321 if ((peer->ttl != 1) && (peer->gtsm_hops != 1)
322 && (!peer->bfd_info
323 || bgp_bfd_is_peer_multihop(peer)))
324 #else
325 /* Take down directly connected EBGP peers */
326 if ((peer->ttl != 1) && (peer->gtsm_hops != 1))
327 #endif
328 continue;
329
330 if (ifp == peer->nexthop.ifp) {
331 BGP_EVENT_ADD(peer, BGP_Stop);
332 peer->last_reset = PEER_DOWN_IF_DOWN;
333 }
334 }
335 }
336
337 return 0;
338 }
339
340 static int bgp_interface_address_add(int command, struct zclient *zclient,
341 zebra_size_t length, vrf_id_t vrf_id)
342 {
343 struct connected *ifc;
344 struct bgp *bgp;
345
346 bgp = bgp_lookup_by_vrf_id(vrf_id);
347 if (!bgp)
348 return 0;
349
350 ifc = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
351
352 if (ifc == NULL)
353 return 0;
354
355 if (bgp_debug_zebra(ifc->address)) {
356 char buf[PREFIX2STR_BUFFER];
357 prefix2str(ifc->address, buf, sizeof(buf));
358 zlog_debug("Rx Intf address add VRF %u IF %s addr %s", vrf_id,
359 ifc->ifp->name, buf);
360 }
361
362 if (if_is_operative(ifc->ifp)) {
363 bgp_connected_add(bgp, ifc);
364
365 /* If we have learnt of any neighbors on this interface,
366 * check to kick off any BGP interface-based neighbors,
367 * but only if this is a link-local address.
368 */
369 if (IN6_IS_ADDR_LINKLOCAL(&ifc->address->u.prefix6)
370 && !list_isempty(ifc->ifp->nbr_connected))
371 bgp_start_interface_nbrs(bgp, ifc->ifp);
372 }
373
374 return 0;
375 }
376
377 static int bgp_interface_address_delete(int command, struct zclient *zclient,
378 zebra_size_t length, vrf_id_t vrf_id)
379 {
380 struct connected *ifc;
381 struct bgp *bgp;
382
383 bgp = bgp_lookup_by_vrf_id(vrf_id);
384 if (!bgp)
385 return 0;
386
387 ifc = zebra_interface_address_read(command, zclient->ibuf, vrf_id);
388
389 if (ifc == NULL)
390 return 0;
391
392 if (bgp_debug_zebra(ifc->address)) {
393 char buf[PREFIX2STR_BUFFER];
394 prefix2str(ifc->address, buf, sizeof(buf));
395 zlog_debug("Rx Intf address del VRF %u IF %s addr %s", vrf_id,
396 ifc->ifp->name, buf);
397 }
398
399 if (if_is_operative(ifc->ifp)) {
400 bgp_connected_delete(bgp, ifc);
401 }
402
403 connected_free(ifc);
404
405 return 0;
406 }
407
408 static int bgp_interface_nbr_address_add(int command, struct zclient *zclient,
409 zebra_size_t length, vrf_id_t vrf_id)
410 {
411 struct nbr_connected *ifc = NULL;
412 struct bgp *bgp;
413
414 ifc = zebra_interface_nbr_address_read(command, zclient->ibuf, vrf_id);
415
416 if (ifc == NULL)
417 return 0;
418
419 if (bgp_debug_zebra(ifc->address)) {
420 char buf[PREFIX2STR_BUFFER];
421 prefix2str(ifc->address, buf, sizeof(buf));
422 zlog_debug("Rx Intf neighbor add VRF %u IF %s addr %s", vrf_id,
423 ifc->ifp->name, buf);
424 }
425
426 if (if_is_operative(ifc->ifp)) {
427 bgp = bgp_lookup_by_vrf_id(vrf_id);
428 if (bgp)
429 bgp_nbr_connected_add(bgp, ifc);
430 }
431
432 return 0;
433 }
434
435 static int bgp_interface_nbr_address_delete(int command,
436 struct zclient *zclient,
437 zebra_size_t length,
438 vrf_id_t vrf_id)
439 {
440 struct nbr_connected *ifc = NULL;
441 struct bgp *bgp;
442
443 ifc = zebra_interface_nbr_address_read(command, zclient->ibuf, vrf_id);
444
445 if (ifc == NULL)
446 return 0;
447
448 if (bgp_debug_zebra(ifc->address)) {
449 char buf[PREFIX2STR_BUFFER];
450 prefix2str(ifc->address, buf, sizeof(buf));
451 zlog_debug("Rx Intf neighbor del VRF %u IF %s addr %s", vrf_id,
452 ifc->ifp->name, buf);
453 }
454
455 if (if_is_operative(ifc->ifp)) {
456 bgp = bgp_lookup_by_vrf_id(vrf_id);
457 if (bgp)
458 bgp_nbr_connected_delete(bgp, ifc, 0);
459 }
460
461 nbr_connected_free(ifc);
462
463 return 0;
464 }
465
466 /* VRF update for an interface. */
467 static int bgp_interface_vrf_update(int command, struct zclient *zclient,
468 zebra_size_t length, vrf_id_t vrf_id)
469 {
470 struct interface *ifp;
471 vrf_id_t new_vrf_id;
472 struct connected *c;
473 struct nbr_connected *nc;
474 struct listnode *node, *nnode;
475 struct bgp *bgp;
476
477 ifp = zebra_interface_vrf_update_read(zclient->ibuf, vrf_id,
478 &new_vrf_id);
479 if (!ifp)
480 return 0;
481
482 if (BGP_DEBUG(zebra, ZEBRA) && ifp)
483 zlog_debug("Rx Intf VRF change VRF %u IF %s NewVRF %u", vrf_id,
484 ifp->name, new_vrf_id);
485
486 bgp = bgp_lookup_by_vrf_id(vrf_id);
487 if (!bgp)
488 return 0;
489
490 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
491 bgp_connected_delete(bgp, c);
492
493 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
494 bgp_nbr_connected_delete(bgp, nc, 1);
495
496 /* Fast external-failover */
497 {
498 struct peer *peer;
499
500 if (CHECK_FLAG(bgp->flags, BGP_FLAG_NO_FAST_EXT_FAILOVER))
501 return 0;
502
503 for (ALL_LIST_ELEMENTS(bgp->peer, node, nnode, peer)) {
504 if ((peer->ttl != 1) && (peer->gtsm_hops != 1))
505 continue;
506
507 if (ifp == peer->nexthop.ifp)
508 BGP_EVENT_ADD(peer, BGP_Stop);
509 }
510 }
511
512 if_update_to_new_vrf(ifp, new_vrf_id);
513
514 bgp = bgp_lookup_by_vrf_id(new_vrf_id);
515 if (!bgp)
516 return 0;
517
518 for (ALL_LIST_ELEMENTS(ifp->connected, node, nnode, c))
519 bgp_connected_add(bgp, c);
520
521 for (ALL_LIST_ELEMENTS(ifp->nbr_connected, node, nnode, nc))
522 bgp_nbr_connected_add(bgp, nc);
523 return 0;
524 }
525
526 /* Zebra route add and delete treatment. */
527 static int zebra_read_route(int command, struct zclient *zclient,
528 zebra_size_t length, vrf_id_t vrf_id)
529 {
530 enum nexthop_types_t nhtype;
531 struct zapi_route api;
532 union g_addr nexthop;
533 ifindex_t ifindex;
534 int add, i;
535 struct bgp *bgp;
536
537 bgp = bgp_lookup_by_vrf_id(vrf_id);
538 if (!bgp)
539 return 0;
540
541 if (zapi_route_decode(zclient->ibuf, &api) < 0)
542 return -1;
543
544 /* we completely ignore srcdest routes for now. */
545 if (CHECK_FLAG(api.message, ZAPI_MESSAGE_SRCPFX))
546 return 0;
547
548 /* ignore link-local address. */
549 if (api.prefix.family == AF_INET6
550 && IN6_IS_ADDR_LINKLOCAL(&api.prefix.u.prefix6))
551 return 0;
552
553 nexthop = api.nexthops[0].gate;
554 ifindex = api.nexthops[0].ifindex;
555 nhtype = api.nexthops[0].type;
556
557 add = (command == ZEBRA_REDISTRIBUTE_ROUTE_ADD);
558 if (add) {
559 /*
560 * The ADD message is actually an UPDATE and there is no
561 * explicit DEL
562 * for a prior redistributed route, if any. So, perform an
563 * implicit
564 * DEL processing for the same redistributed route from any
565 * other
566 * source type.
567 */
568 for (i = 0; i < ZEBRA_ROUTE_MAX; i++) {
569 if (i != api.type)
570 bgp_redistribute_delete(bgp, &api.prefix, i,
571 api.instance);
572 }
573
574 /* Now perform the add/update. */
575 bgp_redistribute_add(bgp, &api.prefix, &nexthop, ifindex,
576 nhtype, api.metric, api.type, api.instance,
577 api.tag);
578 } else {
579 bgp_redistribute_delete(bgp, &api.prefix, api.type,
580 api.instance);
581 }
582
583 if (bgp_debug_zebra(&api.prefix)) {
584 char buf[2][PREFIX_STRLEN];
585
586 prefix2str(&api.prefix, buf[0], sizeof(buf[0]));
587 if (add) {
588 inet_ntop(api.prefix.family, &nexthop, buf[1],
589 sizeof(buf[1]));
590 zlog_debug(
591 "Rx route ADD VRF %u %s[%d] %s nexthop %s (type %d if %u) metric %u tag %" ROUTE_TAG_PRI,
592 vrf_id, zebra_route_string(api.type),
593 api.instance, buf[0], buf[1], nhtype,
594 ifindex, api.metric, api.tag);
595 } else {
596 zlog_debug(
597 "Rx route DEL VRF %u %s[%d] %s",
598 vrf_id, zebra_route_string(api.type),
599 api.instance, buf[0]);
600 }
601 }
602
603 return 0;
604 }
605
606 struct interface *if_lookup_by_ipv4(struct in_addr *addr, vrf_id_t vrf_id)
607 {
608 struct vrf *vrf;
609 struct listnode *cnode;
610 struct interface *ifp;
611 struct connected *connected;
612 struct prefix_ipv4 p;
613 struct prefix *cp;
614
615 vrf = vrf_lookup_by_id(vrf_id);
616 if (!vrf)
617 return NULL;
618
619 p.family = AF_INET;
620 p.prefix = *addr;
621 p.prefixlen = IPV4_MAX_BITLEN;
622
623 FOR_ALL_INTERFACES (vrf, ifp) {
624 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
625 cp = connected->address;
626
627 if (cp->family == AF_INET)
628 if (prefix_match(cp, (struct prefix *)&p))
629 return ifp;
630 }
631 }
632 return NULL;
633 }
634
635 struct interface *if_lookup_by_ipv4_exact(struct in_addr *addr, vrf_id_t vrf_id)
636 {
637 struct vrf *vrf;
638 struct listnode *cnode;
639 struct interface *ifp;
640 struct connected *connected;
641 struct prefix *cp;
642
643 vrf = vrf_lookup_by_id(vrf_id);
644 if (!vrf)
645 return NULL;
646
647 FOR_ALL_INTERFACES (vrf, ifp) {
648 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
649 cp = connected->address;
650
651 if (cp->family == AF_INET)
652 if (IPV4_ADDR_SAME(&cp->u.prefix4, addr))
653 return ifp;
654 }
655 }
656 return NULL;
657 }
658
659 struct interface *if_lookup_by_ipv6(struct in6_addr *addr, ifindex_t ifindex,
660 vrf_id_t vrf_id)
661 {
662 struct vrf *vrf;
663 struct listnode *cnode;
664 struct interface *ifp;
665 struct connected *connected;
666 struct prefix_ipv6 p;
667 struct prefix *cp;
668
669 vrf = vrf_lookup_by_id(vrf_id);
670 if (!vrf)
671 return NULL;
672
673 p.family = AF_INET6;
674 p.prefix = *addr;
675 p.prefixlen = IPV6_MAX_BITLEN;
676
677 FOR_ALL_INTERFACES (vrf, ifp) {
678 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
679 cp = connected->address;
680
681 if (cp->family == AF_INET6)
682 if (prefix_match(cp, (struct prefix *)&p)) {
683 if (IN6_IS_ADDR_LINKLOCAL(
684 &cp->u.prefix6)) {
685 if (ifindex == ifp->ifindex)
686 return ifp;
687 } else
688 return ifp;
689 }
690 }
691 }
692 return NULL;
693 }
694
695 struct interface *if_lookup_by_ipv6_exact(struct in6_addr *addr,
696 ifindex_t ifindex, vrf_id_t vrf_id)
697 {
698 struct vrf *vrf;
699 struct listnode *cnode;
700 struct interface *ifp;
701 struct connected *connected;
702 struct prefix *cp;
703
704 vrf = vrf_lookup_by_id(vrf_id);
705 if (!vrf)
706 return NULL;
707
708 FOR_ALL_INTERFACES (vrf, ifp) {
709 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
710 cp = connected->address;
711
712 if (cp->family == AF_INET6)
713 if (IPV6_ADDR_SAME(&cp->u.prefix6, addr)) {
714 if (IN6_IS_ADDR_LINKLOCAL(
715 &cp->u.prefix6)) {
716 if (ifindex == ifp->ifindex)
717 return ifp;
718 } else
719 return ifp;
720 }
721 }
722 }
723 return NULL;
724 }
725
726 static int if_get_ipv6_global(struct interface *ifp, struct in6_addr *addr)
727 {
728 struct listnode *cnode;
729 struct connected *connected;
730 struct prefix *cp;
731
732 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
733 cp = connected->address;
734
735 if (cp->family == AF_INET6)
736 if (!IN6_IS_ADDR_LINKLOCAL(&cp->u.prefix6)) {
737 memcpy(addr, &cp->u.prefix6, IPV6_MAX_BYTELEN);
738 return 1;
739 }
740 }
741 return 0;
742 }
743
744 static int if_get_ipv6_local(struct interface *ifp, struct in6_addr *addr)
745 {
746 struct listnode *cnode;
747 struct connected *connected;
748 struct prefix *cp;
749
750 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
751 cp = connected->address;
752
753 if (cp->family == AF_INET6)
754 if (IN6_IS_ADDR_LINKLOCAL(&cp->u.prefix6)) {
755 memcpy(addr, &cp->u.prefix6, IPV6_MAX_BYTELEN);
756 return 1;
757 }
758 }
759 return 0;
760 }
761
762 static int if_get_ipv4_address(struct interface *ifp, struct in_addr *addr)
763 {
764 struct listnode *cnode;
765 struct connected *connected;
766 struct prefix *cp;
767
768 for (ALL_LIST_ELEMENTS_RO(ifp->connected, cnode, connected)) {
769 cp = connected->address;
770 if ((cp->family == AF_INET)
771 && !ipv4_martian(&(cp->u.prefix4))) {
772 *addr = cp->u.prefix4;
773 return 1;
774 }
775 }
776 return 0;
777 }
778
779 int bgp_nexthop_set(union sockunion *local, union sockunion *remote,
780 struct bgp_nexthop *nexthop, struct peer *peer)
781 {
782 int ret = 0;
783 struct interface *ifp = NULL;
784
785 memset(nexthop, 0, sizeof(struct bgp_nexthop));
786
787 if (!local)
788 return -1;
789 if (!remote)
790 return -1;
791
792 if (local->sa.sa_family == AF_INET) {
793 nexthop->v4 = local->sin.sin_addr;
794 if (peer->update_if)
795 ifp = if_lookup_by_name(peer->update_if,
796 peer->bgp->vrf_id);
797 else
798 ifp = if_lookup_by_ipv4_exact(&local->sin.sin_addr,
799 peer->bgp->vrf_id);
800 }
801 if (local->sa.sa_family == AF_INET6) {
802 if (IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)) {
803 if (peer->conf_if || peer->ifname)
804 ifp = if_lookup_by_name(peer->conf_if
805 ? peer->conf_if
806 : peer->ifname,
807 peer->bgp->vrf_id);
808 } else if (peer->update_if)
809 ifp = if_lookup_by_name(peer->update_if,
810 peer->bgp->vrf_id);
811 else
812 ifp = if_lookup_by_ipv6_exact(&local->sin6.sin6_addr,
813 local->sin6.sin6_scope_id,
814 peer->bgp->vrf_id);
815 }
816
817 if (!ifp)
818 return -1;
819
820 nexthop->ifp = ifp;
821
822 /* IPv4 connection, fetch and store IPv6 local address(es) if any. */
823 if (local->sa.sa_family == AF_INET) {
824 /* IPv6 nexthop*/
825 ret = if_get_ipv6_global(ifp, &nexthop->v6_global);
826
827 if (!ret) {
828 /* There is no global nexthop. Use link-local address as
829 * both the
830 * global and link-local nexthop. In this scenario, the
831 * expectation
832 * for interop is that the network admin would use a
833 * route-map to
834 * specify the global IPv6 nexthop.
835 */
836 if_get_ipv6_local(ifp, &nexthop->v6_global);
837 memcpy(&nexthop->v6_local, &nexthop->v6_global,
838 IPV6_MAX_BYTELEN);
839 } else
840 if_get_ipv6_local(ifp, &nexthop->v6_local);
841
842 if (if_lookup_by_ipv4(&remote->sin.sin_addr, peer->bgp->vrf_id))
843 peer->shared_network = 1;
844 else
845 peer->shared_network = 0;
846 }
847
848 /* IPv6 connection, fetch and store IPv4 local address if any. */
849 if (local->sa.sa_family == AF_INET6) {
850 struct interface *direct = NULL;
851
852 /* IPv4 nexthop. */
853 ret = if_get_ipv4_address(ifp, &nexthop->v4);
854 if (!ret && peer->local_id.s_addr)
855 nexthop->v4 = peer->local_id;
856
857 /* Global address*/
858 if (!IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)) {
859 memcpy(&nexthop->v6_global, &local->sin6.sin6_addr,
860 IPV6_MAX_BYTELEN);
861
862 /* If directory connected set link-local address. */
863 direct = if_lookup_by_ipv6(&remote->sin6.sin6_addr,
864 remote->sin6.sin6_scope_id,
865 peer->bgp->vrf_id);
866 if (direct)
867 if_get_ipv6_local(ifp, &nexthop->v6_local);
868 } else
869 /* Link-local address. */
870 {
871 ret = if_get_ipv6_global(ifp, &nexthop->v6_global);
872
873 /* If there is no global address. Set link-local
874 address as
875 global. I know this break RFC specification... */
876 /* In this scenario, the expectation for interop is that
877 * the
878 * network admin would use a route-map to specify the
879 * global
880 * IPv6 nexthop.
881 */
882 if (!ret)
883 memcpy(&nexthop->v6_global,
884 &local->sin6.sin6_addr,
885 IPV6_MAX_BYTELEN);
886 /* Always set the link-local address */
887 memcpy(&nexthop->v6_local, &local->sin6.sin6_addr,
888 IPV6_MAX_BYTELEN);
889 }
890
891 if (IN6_IS_ADDR_LINKLOCAL(&local->sin6.sin6_addr)
892 || if_lookup_by_ipv6(&remote->sin6.sin6_addr,
893 remote->sin6.sin6_scope_id,
894 peer->bgp->vrf_id))
895 peer->shared_network = 1;
896 else
897 peer->shared_network = 0;
898 }
899
900 /* KAME stack specific treatment. */
901 #ifdef KAME
902 if (IN6_IS_ADDR_LINKLOCAL(&nexthop->v6_global)
903 && IN6_LINKLOCAL_IFINDEX(nexthop->v6_global)) {
904 SET_IN6_LINKLOCAL_IFINDEX(nexthop->v6_global, 0);
905 }
906 if (IN6_IS_ADDR_LINKLOCAL(&nexthop->v6_local)
907 && IN6_LINKLOCAL_IFINDEX(nexthop->v6_local)) {
908 SET_IN6_LINKLOCAL_IFINDEX(nexthop->v6_local, 0);
909 }
910 #endif /* KAME */
911
912 /* If we have identified the local interface, there is no error for now.
913 */
914 return 0;
915 }
916
917 static struct in6_addr *bgp_info_to_ipv6_nexthop(struct bgp_info *info,
918 ifindex_t *ifindex)
919 {
920 struct in6_addr *nexthop = NULL;
921
922 /* Only global address nexthop exists. */
923 if (info->attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL) {
924 nexthop = &info->attr->mp_nexthop_global;
925 if (IN6_IS_ADDR_LINKLOCAL(nexthop))
926 *ifindex = info->attr->nh_ifindex;
927
928 }
929
930 /* If both global and link-local address present. */
931 if (info->attr->mp_nexthop_len == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL) {
932 /* Check if route-map is set to prefer global over link-local */
933 if (info->attr->mp_nexthop_prefer_global) {
934 nexthop = &info->attr->mp_nexthop_global;
935 if (IN6_IS_ADDR_LINKLOCAL(nexthop))
936 *ifindex = info->attr->nh_ifindex;
937 } else {
938 /* Workaround for Cisco's nexthop bug. */
939 if (IN6_IS_ADDR_UNSPECIFIED(
940 &info->attr->mp_nexthop_global)
941 && info->peer->su_remote->sa.sa_family
942 == AF_INET6) {
943 nexthop =
944 &info->peer->su_remote->sin6.sin6_addr;
945 if (IN6_IS_ADDR_LINKLOCAL(nexthop))
946 *ifindex = info->peer->nexthop.ifp
947 ->ifindex;
948 } else {
949 nexthop = &info->attr->mp_nexthop_local;
950 if (IN6_IS_ADDR_LINKLOCAL(nexthop))
951 *ifindex = info->attr->nh_lla_ifindex;
952 }
953 }
954 }
955
956 return nexthop;
957 }
958
959 static int bgp_table_map_apply(struct route_map *map, struct prefix *p,
960 struct bgp_info *info)
961 {
962 route_map_result_t ret;
963
964 ret = route_map_apply(map, p, RMAP_BGP, info);
965 bgp_attr_flush(info->attr);
966
967 if (ret != RMAP_DENYMATCH)
968 return 1;
969
970 if (bgp_debug_zebra(p)) {
971 if (p->family == AF_INET) {
972 char buf[2][INET_ADDRSTRLEN];
973 zlog_debug(
974 "Zebra rmap deny: IPv4 route %s/%d nexthop %s",
975 inet_ntop(AF_INET, &p->u.prefix4, buf[0],
976 sizeof(buf[0])),
977 p->prefixlen,
978 inet_ntop(AF_INET, &info->attr->nexthop, buf[1],
979 sizeof(buf[1])));
980 }
981 if (p->family == AF_INET6) {
982 char buf[2][INET6_ADDRSTRLEN];
983 ifindex_t ifindex;
984 struct in6_addr *nexthop;
985
986 nexthop = bgp_info_to_ipv6_nexthop(info, &ifindex);
987 zlog_debug(
988 "Zebra rmap deny: IPv6 route %s/%d nexthop %s",
989 inet_ntop(AF_INET6, &p->u.prefix6, buf[0],
990 sizeof(buf[0])),
991 p->prefixlen,
992 inet_ntop(AF_INET6, nexthop,
993 buf[1], sizeof(buf[1])));
994 }
995 }
996 return 0;
997 }
998
999 static struct thread *bgp_tm_thread_connect;
1000 static bool bgp_tm_status_connected;
1001 static bool bgp_tm_chunk_obtained;
1002 #define BGP_FLOWSPEC_TABLE_CHUNK 100000
1003 static uint32_t bgp_tm_min, bgp_tm_max, bgp_tm_chunk_size;
1004 struct bgp *bgp_tm_bgp;
1005
1006 static int bgp_zebra_tm_connect(struct thread *t)
1007 {
1008 struct zclient *zclient;
1009 int delay = 10, ret = 0;
1010
1011 zclient = THREAD_ARG(t);
1012 if (bgp_tm_status_connected && zclient->sock > 0)
1013 delay = 60;
1014 else {
1015 bgp_tm_status_connected = false;
1016 ret = tm_table_manager_connect(zclient);
1017 }
1018 if (ret < 0) {
1019 zlog_warn("Error connecting to table manager!");
1020 bgp_tm_status_connected = false;
1021 } else {
1022 if (!bgp_tm_status_connected)
1023 zlog_debug("Connecting to table manager. Success");
1024 bgp_tm_status_connected = true;
1025 if (!bgp_tm_chunk_obtained) {
1026 if (bgp_zebra_get_table_range(bgp_tm_chunk_size,
1027 &bgp_tm_min,
1028 &bgp_tm_max) >= 0) {
1029 bgp_tm_chunk_obtained = true;
1030 /* parse non installed entries */
1031 bgp_zebra_announce_table(bgp_tm_bgp, AFI_IP, SAFI_FLOWSPEC);
1032 }
1033 }
1034 }
1035 thread_add_timer(bm->master, bgp_zebra_tm_connect, zclient, delay,
1036 &bgp_tm_thread_connect);
1037 return 0;
1038 }
1039
1040 bool bgp_zebra_tm_chunk_obtained(void)
1041 {
1042 return bgp_tm_chunk_obtained;
1043 }
1044
1045 uint32_t bgp_zebra_tm_get_id(void)
1046 {
1047 static int table_id;
1048
1049 if (!bgp_tm_chunk_obtained)
1050 return ++table_id;
1051 return bgp_tm_min++;
1052 }
1053
1054 void bgp_zebra_init_tm_connect(struct bgp *bgp)
1055 {
1056 int delay = 1;
1057
1058 /* if already set, do nothing
1059 */
1060 if (bgp_tm_thread_connect != NULL)
1061 return;
1062 bgp_tm_status_connected = false;
1063 bgp_tm_chunk_obtained = false;
1064 bgp_tm_min = bgp_tm_max = 0;
1065 bgp_tm_chunk_size = BGP_FLOWSPEC_TABLE_CHUNK;
1066 bgp_tm_bgp = bgp;
1067 thread_add_timer(bm->master, bgp_zebra_tm_connect, zclient, delay,
1068 &bgp_tm_thread_connect);
1069 }
1070
1071 int bgp_zebra_get_table_range(uint32_t chunk_size,
1072 uint32_t *start, uint32_t *end)
1073 {
1074 int ret;
1075
1076 if (!bgp_tm_status_connected)
1077 return -1;
1078 ret = tm_get_table_chunk(zclient, chunk_size, start, end);
1079 if (ret < 0) {
1080 zlog_err("BGP: Error getting table chunk %u", chunk_size);
1081 return -1;
1082 }
1083 zlog_info("BGP: Table Manager returns range from chunk %u is [%u %u]",
1084 chunk_size, *start, *end);
1085 return 0;
1086 }
1087
1088 static int update_ipv4nh_for_route_install(int nh_othervrf,
1089 struct in_addr *nexthop,
1090 struct attr *attr,
1091 bool is_evpn,
1092 struct zapi_nexthop *api_nh)
1093 {
1094 api_nh->gate.ipv4 = *nexthop;
1095
1096 /* Need to set fields appropriately for EVPN routes imported into
1097 * a VRF (which are programmed as onlink on l3-vni SVI) as well as
1098 * connected routes leaked into a VRF.
1099 */
1100 if (is_evpn)
1101 api_nh->type = NEXTHOP_TYPE_IPV4_IFINDEX;
1102 else if (nh_othervrf &&
1103 api_nh->gate.ipv4.s_addr == INADDR_ANY) {
1104 api_nh->type = NEXTHOP_TYPE_IFINDEX;
1105 api_nh->ifindex = attr->nh_ifindex;
1106 } else
1107 api_nh->type = NEXTHOP_TYPE_IPV4;
1108
1109 return 1;
1110 }
1111
1112 static int update_ipv6nh_for_route_install(int nh_othervrf,
1113 struct in6_addr *nexthop,
1114 ifindex_t ifindex,
1115 struct bgp_info *ri,
1116 struct bgp_info *best_ri,
1117 bool is_evpn,
1118 struct zapi_nexthop *api_nh)
1119 {
1120 struct attr *attr;
1121
1122 attr = ri->attr;
1123
1124 if (is_evpn)
1125 api_nh->type = NEXTHOP_TYPE_IPV6_IFINDEX;
1126 else if (nh_othervrf) {
1127 if (IN6_IS_ADDR_UNSPECIFIED(nexthop)) {
1128 api_nh->type = NEXTHOP_TYPE_IFINDEX;
1129 api_nh->ifindex = attr->nh_ifindex;
1130 } else if (IN6_IS_ADDR_LINKLOCAL(nexthop)) {
1131 if (ifindex == 0)
1132 return 0;
1133 api_nh->type = NEXTHOP_TYPE_IPV6_IFINDEX;
1134 api_nh->ifindex = ifindex;
1135 } else {
1136 api_nh->type = NEXTHOP_TYPE_IPV6;
1137 api_nh->ifindex = 0;
1138 }
1139 } else {
1140 if (IN6_IS_ADDR_LINKLOCAL(nexthop)) {
1141 if (ri == best_ri &&
1142 attr->mp_nexthop_len
1143 == BGP_ATTR_NHLEN_IPV6_GLOBAL_AND_LL)
1144 if (ri->peer->nexthop.ifp)
1145 ifindex = ri->peer->nexthop.ifp
1146 ->ifindex;
1147 if (!ifindex) {
1148 if (ri->peer->conf_if)
1149 ifindex = ri->peer->ifp->ifindex;
1150 else if (ri->peer->ifname)
1151 ifindex = ifname2ifindex(
1152 ri->peer->ifname,
1153 ri->peer->bgp->vrf_id);
1154 else if (ri->peer->nexthop.ifp)
1155 ifindex = ri->peer->nexthop.ifp
1156 ->ifindex;
1157 }
1158
1159 if (ifindex == 0)
1160 return 0;
1161 api_nh->type = NEXTHOP_TYPE_IPV6_IFINDEX;
1162 api_nh->ifindex = ifindex;
1163 } else {
1164 api_nh->type = NEXTHOP_TYPE_IPV6;
1165 api_nh->ifindex = 0;
1166 }
1167 }
1168 api_nh->gate.ipv6 = *nexthop;
1169
1170 return 1;
1171 }
1172
1173 void bgp_zebra_announce(struct bgp_node *rn, struct prefix *p,
1174 struct bgp_info *info, struct bgp *bgp, afi_t afi,
1175 safi_t safi)
1176 {
1177 struct zapi_route api;
1178 struct zapi_nexthop *api_nh;
1179 int nh_family;
1180 unsigned int valid_nh_count = 0;
1181 int has_valid_label = 0;
1182 uint8_t distance;
1183 struct peer *peer;
1184 struct bgp_info *mpinfo;
1185 uint32_t metric;
1186 struct attr local_attr;
1187 struct bgp_info local_info;
1188 struct bgp_info *mpinfo_cp = &local_info;
1189 route_tag_t tag;
1190 mpls_label_t label;
1191 int nh_othervrf = 0;
1192 char buf_prefix[PREFIX_STRLEN]; /* filled in if we are debugging */
1193 bool is_evpn = false;
1194 int nh_updated;
1195
1196 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
1197 * know of this instance.
1198 */
1199 if (!bgp_install_info_to_zebra(bgp))
1200 return;
1201
1202 if (bgp->main_zebra_update_hold)
1203 return;
1204
1205 if (bgp_debug_zebra(p))
1206 prefix2str(p, buf_prefix, sizeof(buf_prefix));
1207
1208 if (safi == SAFI_FLOWSPEC)
1209 return bgp_pbr_update_entry(bgp, &rn->p,
1210 info, afi, safi, true);
1211
1212 /*
1213 * vrf leaking support (will have only one nexthop)
1214 */
1215 if (info->extra && info->extra->bgp_orig)
1216 nh_othervrf = 1;
1217
1218 /* Make Zebra API structure. */
1219 memset(&api, 0, sizeof(api));
1220 api.vrf_id = bgp->vrf_id;
1221 api.type = ZEBRA_ROUTE_BGP;
1222 api.safi = safi;
1223 api.prefix = *p;
1224 SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
1225
1226 peer = info->peer;
1227
1228 if (info->type == ZEBRA_ROUTE_BGP
1229 && info->sub_type == BGP_ROUTE_IMPORTED) {
1230
1231 /* Obtain peer from parent */
1232 if (info->extra && info->extra->parent)
1233 peer = ((struct bgp_info *)(info->extra->parent))->peer;
1234 }
1235
1236 tag = info->attr->tag;
1237
1238 /* If the route's source is EVPN, flag as such. */
1239 is_evpn = is_route_parent_evpn(info);
1240 if (is_evpn)
1241 SET_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE);
1242
1243 if (peer->sort == BGP_PEER_IBGP || peer->sort == BGP_PEER_CONFED
1244 || info->sub_type == BGP_ROUTE_AGGREGATE) {
1245 SET_FLAG(api.flags, ZEBRA_FLAG_IBGP);
1246 SET_FLAG(api.flags, ZEBRA_FLAG_ALLOW_RECURSION);
1247 }
1248
1249 if ((peer->sort == BGP_PEER_EBGP && peer->ttl != 1)
1250 || CHECK_FLAG(peer->flags, PEER_FLAG_DISABLE_CONNECTED_CHECK)
1251 || bgp_flag_check(bgp, BGP_FLAG_DISABLE_NH_CONNECTED_CHK))
1252
1253 SET_FLAG(api.flags, ZEBRA_FLAG_ALLOW_RECURSION);
1254
1255 /* Metric is currently based on the best-path only */
1256 metric = info->attr->med;
1257 for (mpinfo = info; mpinfo; mpinfo = bgp_info_mpath_next(mpinfo)) {
1258 if (valid_nh_count >= multipath_num)
1259 break;
1260
1261 *mpinfo_cp = *mpinfo;
1262
1263 /* Get nexthop address-family */
1264 if (p->family == AF_INET
1265 && !BGP_ATTR_NEXTHOP_AFI_IP6(mpinfo_cp->attr))
1266 nh_family = AF_INET;
1267 else if (p->family == AF_INET6
1268 || (p->family == AF_INET
1269 && BGP_ATTR_NEXTHOP_AFI_IP6(mpinfo_cp->attr)))
1270 nh_family = AF_INET6;
1271 else
1272 continue;
1273
1274 api_nh = &api.nexthops[valid_nh_count];
1275 api_nh->vrf_id = nh_othervrf ? info->extra->bgp_orig->vrf_id
1276 : bgp->vrf_id;
1277 if (nh_family == AF_INET) {
1278 if (bgp_debug_zebra(&api.prefix)) {
1279 if (mpinfo->extra) {
1280 zlog_debug(
1281 "%s: p=%s, bgp_is_valid_label: %d",
1282 __func__, buf_prefix,
1283 bgp_is_valid_label(
1284 &mpinfo->extra
1285 ->label[0]));
1286 } else {
1287 zlog_debug(
1288 "%s: p=%s, extra is NULL, no label",
1289 __func__, buf_prefix);
1290 }
1291 }
1292
1293 if (bgp->table_map[afi][safi].name) {
1294 /* Copy info and attributes, so the route-map
1295 apply doesn't modify the BGP route info. */
1296 local_attr = *mpinfo->attr;
1297 mpinfo_cp->attr = &local_attr;
1298 }
1299
1300 if (bgp->table_map[afi][safi].name) {
1301 if (!bgp_table_map_apply(
1302 bgp->table_map[afi][safi].map, p,
1303 mpinfo_cp))
1304 continue;
1305
1306 /* metric/tag is only allowed to be
1307 * overridden on 1st nexthop */
1308 if (mpinfo == info) {
1309 metric = mpinfo_cp->attr->med;
1310 tag = mpinfo_cp->attr->tag;
1311 }
1312 }
1313
1314 nh_updated = update_ipv4nh_for_route_install(
1315 nh_othervrf,
1316 &mpinfo_cp->attr->nexthop,
1317 mpinfo_cp->attr, is_evpn, api_nh);
1318 } else {
1319 ifindex_t ifindex = IFINDEX_INTERNAL;
1320 struct in6_addr *nexthop;
1321
1322 if (bgp->table_map[afi][safi].name) {
1323 /* Copy info and attributes, so the route-map
1324 apply doesn't modify the BGP route info. */
1325 local_attr = *mpinfo->attr;
1326 mpinfo_cp->attr = &local_attr;
1327 }
1328
1329 if (bgp->table_map[afi][safi].name) {
1330 /* Copy info and attributes, so the route-map
1331 apply doesn't modify the BGP route info. */
1332 local_attr = *mpinfo->attr;
1333 mpinfo_cp->attr = &local_attr;
1334
1335 if (!bgp_table_map_apply(
1336 bgp->table_map[afi][safi].map, p,
1337 mpinfo_cp))
1338 continue;
1339
1340 /* metric/tag is only allowed to be
1341 * overridden on 1st nexthop */
1342 if (mpinfo == info) {
1343 metric = mpinfo_cp->attr->med;
1344 tag = mpinfo_cp->attr->tag;
1345 }
1346 }
1347 nexthop = bgp_info_to_ipv6_nexthop(mpinfo_cp,
1348 &ifindex);
1349 nh_updated = update_ipv6nh_for_route_install(
1350 nh_othervrf, nexthop, ifindex,
1351 mpinfo, info, is_evpn, api_nh);
1352 }
1353
1354 /* Did we get proper nexthop info to update zebra? */
1355 if (!nh_updated)
1356 continue;
1357
1358 if (mpinfo->extra
1359 && bgp_is_valid_label(&mpinfo->extra->label[0])
1360 && !CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)) {
1361 has_valid_label = 1;
1362 label = label_pton(&mpinfo->extra->label[0]);
1363
1364 api_nh->label_num = 1;
1365 api_nh->labels[0] = label;
1366 }
1367 memcpy(&api_nh->rmac, &(mpinfo->attr->rmac),
1368 sizeof(struct ethaddr));
1369 valid_nh_count++;
1370 }
1371
1372
1373 /* if this is a evpn route we don't have to include the label */
1374 if (has_valid_label && !(CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE)))
1375 SET_FLAG(api.message, ZAPI_MESSAGE_LABEL);
1376
1377 /*
1378 * When we create an aggregate route we must also
1379 * install a Null0 route in the RIB, so overwrite
1380 * what was written into api with a blackhole route
1381 */
1382 if (info->sub_type == BGP_ROUTE_AGGREGATE)
1383 zapi_route_set_blackhole(&api, BLACKHOLE_NULL);
1384 else
1385 api.nexthop_num = valid_nh_count;
1386
1387 SET_FLAG(api.message, ZAPI_MESSAGE_METRIC);
1388 api.metric = metric;
1389
1390 if (tag) {
1391 SET_FLAG(api.message, ZAPI_MESSAGE_TAG);
1392 api.tag = tag;
1393 }
1394
1395 distance = bgp_distance_apply(p, info, afi, safi, bgp);
1396 if (distance) {
1397 SET_FLAG(api.message, ZAPI_MESSAGE_DISTANCE);
1398 api.distance = distance;
1399 }
1400
1401 if (bgp_debug_zebra(p)) {
1402 char prefix_buf[PREFIX_STRLEN];
1403 char nh_buf[INET6_ADDRSTRLEN];
1404 char label_buf[20];
1405 int i;
1406
1407 prefix2str(&api.prefix, prefix_buf, sizeof(prefix_buf));
1408 zlog_debug("Tx route %s VRF %u %s metric %u tag %" ROUTE_TAG_PRI
1409 " count %d",
1410 valid_nh_count ? "add" : "delete", bgp->vrf_id,
1411 prefix_buf, api.metric, api.tag, api.nexthop_num);
1412 for (i = 0; i < api.nexthop_num; i++) {
1413 api_nh = &api.nexthops[i];
1414
1415 if (api_nh->type == NEXTHOP_TYPE_IFINDEX)
1416 nh_buf[0] = '\0';
1417 else {
1418 if (api_nh->type == NEXTHOP_TYPE_IPV4)
1419 nh_family = AF_INET;
1420 else
1421 nh_family = AF_INET6;
1422 inet_ntop(nh_family, &api_nh->gate, nh_buf,
1423 sizeof(nh_buf));
1424 }
1425
1426 label_buf[0] = '\0';
1427 if (has_valid_label
1428 && !CHECK_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE))
1429 sprintf(label_buf, "label %u",
1430 api_nh->labels[0]);
1431 zlog_debug(" nhop [%d]: %s if %u VRF %u %s",
1432 i + 1, nh_buf, api_nh->ifindex,
1433 api_nh->vrf_id, label_buf);
1434 }
1435 }
1436
1437 if (bgp_debug_zebra(p)) {
1438 int recursion_flag = 0;
1439
1440 if (CHECK_FLAG(api.flags, ZEBRA_FLAG_ALLOW_RECURSION))
1441 recursion_flag = 1;
1442
1443 zlog_debug("%s: %s: announcing to zebra (recursion %sset)",
1444 __func__, buf_prefix,
1445 (recursion_flag ? "" : "NOT "));
1446 }
1447 zclient_route_send(valid_nh_count ? ZEBRA_ROUTE_ADD
1448 : ZEBRA_ROUTE_DELETE,
1449 zclient, &api);
1450 }
1451
1452 /* Announce all routes of a table to zebra */
1453 void bgp_zebra_announce_table(struct bgp *bgp, afi_t afi, safi_t safi)
1454 {
1455 struct bgp_node *rn;
1456 struct bgp_table *table;
1457 struct bgp_info *ri;
1458
1459 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
1460 * know of this instance.
1461 */
1462 if (!bgp_install_info_to_zebra(bgp))
1463 return;
1464
1465 table = bgp->rib[afi][safi];
1466 if (!table)
1467 return;
1468
1469 for (rn = bgp_table_top(table); rn; rn = bgp_route_next(rn))
1470 for (ri = rn->info; ri; ri = ri->next)
1471 if (CHECK_FLAG(ri->flags, BGP_INFO_SELECTED) &&
1472
1473 (ri->type == ZEBRA_ROUTE_BGP
1474 && (ri->sub_type == BGP_ROUTE_NORMAL
1475 || ri->sub_type == BGP_ROUTE_IMPORTED)))
1476
1477 bgp_zebra_announce(rn, &rn->p, ri, bgp, afi,
1478 safi);
1479 }
1480
1481 void bgp_zebra_withdraw(struct prefix *p, struct bgp_info *info,
1482 struct bgp *bgp, safi_t safi)
1483 {
1484 struct zapi_route api;
1485 struct peer *peer;
1486
1487 /* Don't try to install if we're not connected to Zebra or Zebra doesn't
1488 * know of this instance.
1489 */
1490 if (!bgp_install_info_to_zebra(bgp))
1491 return;
1492
1493 if (safi == SAFI_FLOWSPEC) {
1494 peer = info->peer;
1495 return bgp_pbr_update_entry(peer->bgp, p,
1496 info, AFI_IP, safi, false);
1497 }
1498
1499 memset(&api, 0, sizeof(api));
1500 api.vrf_id = bgp->vrf_id;
1501 api.type = ZEBRA_ROUTE_BGP;
1502 api.safi = safi;
1503 api.prefix = *p;
1504
1505 /* If the route's source is EVPN, flag as such. */
1506 if (is_route_parent_evpn(info))
1507 SET_FLAG(api.flags, ZEBRA_FLAG_EVPN_ROUTE);
1508
1509 if (bgp_debug_zebra(p)) {
1510 char buf[PREFIX_STRLEN];
1511
1512 prefix2str(&api.prefix, buf, sizeof(buf));
1513 zlog_debug("Tx route delete VRF %u %s", bgp->vrf_id, buf);
1514 }
1515
1516 zclient_route_send(ZEBRA_ROUTE_DELETE, zclient, &api);
1517 }
1518
1519 struct bgp_redist *bgp_redist_lookup(struct bgp *bgp, afi_t afi, uint8_t type,
1520 unsigned short instance)
1521 {
1522 struct list *red_list;
1523 struct listnode *node;
1524 struct bgp_redist *red;
1525
1526 red_list = bgp->redist[afi][type];
1527 if (!red_list)
1528 return (NULL);
1529
1530 for (ALL_LIST_ELEMENTS_RO(red_list, node, red))
1531 if (red->instance == instance)
1532 return red;
1533
1534 return NULL;
1535 }
1536
1537 struct bgp_redist *bgp_redist_add(struct bgp *bgp, afi_t afi, uint8_t type,
1538 unsigned short instance)
1539 {
1540 struct list *red_list;
1541 struct bgp_redist *red;
1542
1543 red = bgp_redist_lookup(bgp, afi, type, instance);
1544 if (red)
1545 return red;
1546
1547 if (!bgp->redist[afi][type])
1548 bgp->redist[afi][type] = list_new();
1549
1550 red_list = bgp->redist[afi][type];
1551 red = (struct bgp_redist *)XCALLOC(MTYPE_BGP_REDIST,
1552 sizeof(struct bgp_redist));
1553 red->instance = instance;
1554
1555 listnode_add(red_list, red);
1556
1557 return red;
1558 }
1559
1560 static void bgp_redist_del(struct bgp *bgp, afi_t afi, uint8_t type,
1561 unsigned short instance)
1562 {
1563 struct bgp_redist *red;
1564
1565 red = bgp_redist_lookup(bgp, afi, type, instance);
1566
1567 if (red) {
1568 listnode_delete(bgp->redist[afi][type], red);
1569 XFREE(MTYPE_BGP_REDIST, red);
1570 if (!bgp->redist[afi][type]->count)
1571 list_delete_and_null(&bgp->redist[afi][type]);
1572 }
1573 }
1574
1575 /* Other routes redistribution into BGP. */
1576 int bgp_redistribute_set(struct bgp *bgp, afi_t afi, int type,
1577 unsigned short instance)
1578 {
1579
1580 /* Return if already redistribute flag is set. */
1581 if (instance) {
1582 if (redist_check_instance(&zclient->mi_redist[afi][type],
1583 instance))
1584 return CMD_WARNING;
1585
1586 redist_add_instance(&zclient->mi_redist[afi][type], instance);
1587 } else {
1588 if (vrf_bitmap_check(zclient->redist[afi][type], bgp->vrf_id))
1589 return CMD_WARNING;
1590
1591 #if ENABLE_BGP_VNC
1592 if (bgp->vrf_id == VRF_DEFAULT
1593 && type == ZEBRA_ROUTE_VNC_DIRECT) {
1594 vnc_export_bgp_enable(
1595 bgp, afi); /* only enables if mode bits cfg'd */
1596 }
1597 #endif
1598
1599 vrf_bitmap_set(zclient->redist[afi][type], bgp->vrf_id);
1600 }
1601
1602 /*
1603 * Don't try to register if we're not connected to Zebra or Zebra
1604 * doesn't know of this instance.
1605 *
1606 * When we come up later well resend if needed.
1607 */
1608 if (!bgp_install_info_to_zebra(bgp))
1609 return CMD_SUCCESS;
1610
1611 if (BGP_DEBUG(zebra, ZEBRA))
1612 zlog_debug("Tx redistribute add VRF %u afi %d %s %d",
1613 bgp->vrf_id, afi, zebra_route_string(type),
1614 instance);
1615
1616 /* Send distribute add message to zebra. */
1617 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_ADD, zclient, afi, type,
1618 instance, bgp->vrf_id);
1619
1620 return CMD_SUCCESS;
1621 }
1622
1623 int bgp_redistribute_resend(struct bgp *bgp, afi_t afi, int type,
1624 unsigned short instance)
1625 {
1626 /* Don't try to send if we're not connected to Zebra or Zebra doesn't
1627 * know of this instance.
1628 */
1629 if (!bgp_install_info_to_zebra(bgp))
1630 return -1;
1631
1632 if (BGP_DEBUG(zebra, ZEBRA))
1633 zlog_debug("Tx redistribute del/add VRF %u afi %d %s %d",
1634 bgp->vrf_id, afi, zebra_route_string(type),
1635 instance);
1636
1637 /* Send distribute add message to zebra. */
1638 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_DELETE, zclient, afi, type,
1639 instance, bgp->vrf_id);
1640 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_ADD, zclient, afi, type,
1641 instance, bgp->vrf_id);
1642
1643 return 0;
1644 }
1645
1646 /* Redistribute with route-map specification. */
1647 int bgp_redistribute_rmap_set(struct bgp_redist *red, const char *name)
1648 {
1649 if (red->rmap.name && (strcmp(red->rmap.name, name) == 0))
1650 return 0;
1651
1652 if (red->rmap.name)
1653 XFREE(MTYPE_ROUTE_MAP_NAME, red->rmap.name);
1654 red->rmap.name = XSTRDUP(MTYPE_ROUTE_MAP_NAME, name);
1655 red->rmap.map = route_map_lookup_by_name(name);
1656
1657 return 1;
1658 }
1659
1660 /* Redistribute with metric specification. */
1661 int bgp_redistribute_metric_set(struct bgp *bgp, struct bgp_redist *red,
1662 afi_t afi, int type, uint32_t metric)
1663 {
1664 struct bgp_node *rn;
1665 struct bgp_info *ri;
1666
1667 if (red->redist_metric_flag && red->redist_metric == metric)
1668 return 0;
1669
1670 red->redist_metric_flag = 1;
1671 red->redist_metric = metric;
1672
1673 for (rn = bgp_table_top(bgp->rib[afi][SAFI_UNICAST]); rn;
1674 rn = bgp_route_next(rn)) {
1675 for (ri = rn->info; ri; ri = ri->next) {
1676 if (ri->sub_type == BGP_ROUTE_REDISTRIBUTE
1677 && ri->type == type
1678 && ri->instance == red->instance) {
1679 struct attr *old_attr;
1680 struct attr new_attr;
1681
1682 bgp_attr_dup(&new_attr, ri->attr);
1683 new_attr.med = red->redist_metric;
1684 old_attr = ri->attr;
1685 ri->attr = bgp_attr_intern(&new_attr);
1686 bgp_attr_unintern(&old_attr);
1687
1688 bgp_info_set_flag(rn, ri,
1689 BGP_INFO_ATTR_CHANGED);
1690 bgp_process(bgp, rn, afi, SAFI_UNICAST);
1691 }
1692 }
1693 }
1694
1695 return 1;
1696 }
1697
1698 /* Unset redistribution. */
1699 int bgp_redistribute_unreg(struct bgp *bgp, afi_t afi, int type,
1700 unsigned short instance)
1701 {
1702 struct bgp_redist *red;
1703
1704 red = bgp_redist_lookup(bgp, afi, type, instance);
1705 if (!red)
1706 return CMD_SUCCESS;
1707
1708 /* Return if zebra connection is disabled. */
1709 if (instance) {
1710 if (!redist_check_instance(&zclient->mi_redist[afi][type],
1711 instance))
1712 return CMD_WARNING;
1713 redist_del_instance(&zclient->mi_redist[afi][type], instance);
1714 } else {
1715 if (!vrf_bitmap_check(zclient->redist[afi][type], bgp->vrf_id))
1716 return CMD_WARNING;
1717 vrf_bitmap_unset(zclient->redist[afi][type], bgp->vrf_id);
1718 }
1719
1720
1721 if (bgp_install_info_to_zebra(bgp)) {
1722 /* Send distribute delete message to zebra. */
1723 if (BGP_DEBUG(zebra, ZEBRA))
1724 zlog_debug("Tx redistribute del VRF %u afi %d %s %d",
1725 bgp->vrf_id, afi, zebra_route_string(type),
1726 instance);
1727 zebra_redistribute_send(ZEBRA_REDISTRIBUTE_DELETE, zclient, afi,
1728 type, instance, bgp->vrf_id);
1729 }
1730
1731 /* Withdraw redistributed routes from current BGP's routing table. */
1732 bgp_redistribute_withdraw(bgp, afi, type, instance);
1733
1734 return CMD_SUCCESS;
1735 }
1736
1737 /* Unset redistribution. */
1738 int bgp_redistribute_unset(struct bgp *bgp, afi_t afi, int type,
1739 unsigned short instance)
1740 {
1741 struct bgp_redist *red;
1742
1743 /*
1744 * vnc and vpn->vrf checks must be before red check because
1745 * they operate within bgpd irrespective of zebra connection
1746 * status. red lookup fails if there is no zebra connection.
1747 */
1748 #if ENABLE_BGP_VNC
1749 if (bgp->vrf_id == VRF_DEFAULT && type == ZEBRA_ROUTE_VNC_DIRECT) {
1750 vnc_export_bgp_disable(bgp, afi);
1751 }
1752 #endif
1753
1754 red = bgp_redist_lookup(bgp, afi, type, instance);
1755 if (!red)
1756 return CMD_SUCCESS;
1757
1758 bgp_redistribute_unreg(bgp, afi, type, instance);
1759
1760 /* Unset route-map. */
1761 if (red->rmap.name)
1762 XFREE(MTYPE_ROUTE_MAP_NAME, red->rmap.name);
1763 red->rmap.name = NULL;
1764 red->rmap.map = NULL;
1765
1766 /* Unset metric. */
1767 red->redist_metric_flag = 0;
1768 red->redist_metric = 0;
1769
1770 bgp_redist_del(bgp, afi, type, instance);
1771
1772 return CMD_SUCCESS;
1773 }
1774
1775 /* Update redistribute vrf bitmap during triggers like
1776 restart networking or delete/add VRFs */
1777 void bgp_update_redist_vrf_bitmaps(struct bgp *bgp, vrf_id_t old_vrf_id)
1778 {
1779 int i;
1780 afi_t afi;
1781
1782 for (afi = AFI_IP; afi < AFI_MAX; afi++)
1783 for (i = 0; i < ZEBRA_ROUTE_MAX; i++)
1784 if ((old_vrf_id == VRF_UNKNOWN)
1785 || vrf_bitmap_check(zclient->redist[afi][i],
1786 old_vrf_id)) {
1787 vrf_bitmap_unset(zclient->redist[afi][i],
1788 old_vrf_id);
1789 vrf_bitmap_set(zclient->redist[afi][i],
1790 bgp->vrf_id);
1791 }
1792 return;
1793 }
1794
1795 void bgp_zclient_reset(void)
1796 {
1797 zclient_reset(zclient);
1798 }
1799
1800 /* Register this instance with Zebra. Invoked upon connect (for
1801 * default instance) and when other VRFs are learnt (or created and
1802 * already learnt).
1803 */
1804 void bgp_zebra_instance_register(struct bgp *bgp)
1805 {
1806 /* Don't try to register if we're not connected to Zebra */
1807 if (!zclient || zclient->sock < 0)
1808 return;
1809
1810 if (BGP_DEBUG(zebra, ZEBRA))
1811 zlog_debug("Registering VRF %u", bgp->vrf_id);
1812
1813 /* Register for router-id, interfaces, redistributed routes. */
1814 zclient_send_reg_requests(zclient, bgp->vrf_id);
1815
1816 /* For default instance, register to learn about VNIs, if appropriate.
1817 */
1818 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT && is_evpn_enabled())
1819 bgp_zebra_advertise_all_vni(bgp, 1);
1820 }
1821
1822 /* Deregister this instance with Zebra. Invoked upon the instance
1823 * being deleted (default or VRF) and it is already registered.
1824 */
1825 void bgp_zebra_instance_deregister(struct bgp *bgp)
1826 {
1827 /* Don't try to deregister if we're not connected to Zebra */
1828 if (zclient->sock < 0)
1829 return;
1830
1831 if (BGP_DEBUG(zebra, ZEBRA))
1832 zlog_debug("Deregistering VRF %u", bgp->vrf_id);
1833
1834 /* For default instance, unregister learning about VNIs, if appropriate.
1835 */
1836 if (bgp->inst_type == BGP_INSTANCE_TYPE_DEFAULT && is_evpn_enabled())
1837 bgp_zebra_advertise_all_vni(bgp, 0);
1838
1839 /* Deregister for router-id, interfaces, redistributed routes. */
1840 zclient_send_dereg_requests(zclient, bgp->vrf_id);
1841 }
1842
1843 void bgp_zebra_initiate_radv(struct bgp *bgp, struct peer *peer)
1844 {
1845 int ra_interval = BGP_UNNUM_DEFAULT_RA_INTERVAL;
1846
1847 /* Don't try to initiate if we're not connected to Zebra */
1848 if (zclient->sock < 0)
1849 return;
1850
1851 if (BGP_DEBUG(zebra, ZEBRA))
1852 zlog_debug("%u: Initiating RA for peer %s", bgp->vrf_id,
1853 peer->host);
1854
1855 zclient_send_interface_radv_req(zclient, bgp->vrf_id, peer->ifp, 1,
1856 ra_interval);
1857 }
1858
1859 void bgp_zebra_terminate_radv(struct bgp *bgp, struct peer *peer)
1860 {
1861 /* Don't try to terminate if we're not connected to Zebra */
1862 if (zclient->sock < 0)
1863 return;
1864
1865 if (BGP_DEBUG(zebra, ZEBRA))
1866 zlog_debug("%u: Terminating RA for peer %s", bgp->vrf_id,
1867 peer->host);
1868
1869 zclient_send_interface_radv_req(zclient, bgp->vrf_id, peer->ifp, 0, 0);
1870 }
1871
1872 int bgp_zebra_advertise_subnet(struct bgp *bgp, int advertise, vni_t vni)
1873 {
1874 struct stream *s = NULL;
1875
1876 /* Check socket. */
1877 if (!zclient || zclient->sock < 0)
1878 return 0;
1879
1880 /* Don't try to register if Zebra doesn't know of this instance. */
1881 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1882 return 0;
1883
1884 s = zclient->obuf;
1885 stream_reset(s);
1886
1887 zclient_create_header(s, ZEBRA_ADVERTISE_SUBNET, bgp->vrf_id);
1888 stream_putc(s, advertise);
1889 stream_put3(s, vni);
1890 stream_putw_at(s, 0, stream_get_endp(s));
1891
1892 return zclient_send_message(zclient);
1893 }
1894
1895 int bgp_zebra_advertise_gw_macip(struct bgp *bgp, int advertise, vni_t vni)
1896 {
1897 struct stream *s = NULL;
1898
1899 /* Check socket. */
1900 if (!zclient || zclient->sock < 0)
1901 return 0;
1902
1903 /* Don't try to register if Zebra doesn't know of this instance. */
1904 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1905 return 0;
1906
1907 s = zclient->obuf;
1908 stream_reset(s);
1909
1910 zclient_create_header(s, ZEBRA_ADVERTISE_DEFAULT_GW, bgp->vrf_id);
1911 stream_putc(s, advertise);
1912 stream_putl(s, vni);
1913 stream_putw_at(s, 0, stream_get_endp(s));
1914
1915 return zclient_send_message(zclient);
1916 }
1917
1918 int bgp_zebra_advertise_all_vni(struct bgp *bgp, int advertise)
1919 {
1920 struct stream *s;
1921
1922 /* Check socket. */
1923 if (!zclient || zclient->sock < 0)
1924 return 0;
1925
1926 /* Don't try to register if Zebra doesn't know of this instance. */
1927 if (!IS_BGP_INST_KNOWN_TO_ZEBRA(bgp))
1928 return 0;
1929
1930 s = zclient->obuf;
1931 stream_reset(s);
1932
1933 zclient_create_header(s, ZEBRA_ADVERTISE_ALL_VNI, bgp->vrf_id);
1934 stream_putc(s, advertise);
1935 stream_putw_at(s, 0, stream_get_endp(s));
1936
1937 return zclient_send_message(zclient);
1938 }
1939
1940 static int rule_notify_owner(int command, struct zclient *zclient,
1941 zebra_size_t length, vrf_id_t vrf_id)
1942 {
1943 uint32_t seqno, priority, unique;
1944 enum zapi_rule_notify_owner note;
1945 struct bgp_pbr_action *bgp_pbra;
1946 ifindex_t ifi;
1947
1948 if (!zapi_rule_notify_decode(zclient->ibuf, &seqno, &priority, &unique,
1949 &ifi, &note))
1950 return -1;
1951
1952 bgp_pbra = bgp_pbr_action_rule_lookup(vrf_id, unique);
1953 if (!bgp_pbra) {
1954 if (BGP_DEBUG(zebra, ZEBRA))
1955 zlog_debug("%s: Fail to look BGP rule (%u)",
1956 __PRETTY_FUNCTION__, unique);
1957 return 0;
1958 }
1959
1960 switch (note) {
1961 case ZAPI_RULE_FAIL_INSTALL:
1962 if (BGP_DEBUG(zebra, ZEBRA))
1963 zlog_debug("%s: Received RULE_FAIL_INSTALL",
1964 __PRETTY_FUNCTION__);
1965 bgp_pbra->installed = false;
1966 bgp_pbra->install_in_progress = false;
1967 break;
1968 case ZAPI_RULE_INSTALLED:
1969 bgp_pbra->installed = true;
1970 bgp_pbra->install_in_progress = false;
1971 if (BGP_DEBUG(zebra, ZEBRA))
1972 zlog_debug("%s: Received RULE_INSTALLED",
1973 __PRETTY_FUNCTION__);
1974 break;
1975 case ZAPI_RULE_FAIL_REMOVE:
1976 case ZAPI_RULE_REMOVED:
1977 if (BGP_DEBUG(zebra, ZEBRA))
1978 zlog_debug("%s: Received RULE REMOVED",
1979 __PRETTY_FUNCTION__);
1980 break;
1981 }
1982
1983 return 0;
1984 }
1985
1986 static int ipset_notify_owner(int command, struct zclient *zclient,
1987 zebra_size_t length, vrf_id_t vrf_id)
1988 {
1989 uint32_t unique;
1990 enum zapi_ipset_notify_owner note;
1991 struct bgp_pbr_match *bgp_pbim;
1992
1993 if (!zapi_ipset_notify_decode(zclient->ibuf,
1994 &unique,
1995 &note))
1996 return -1;
1997
1998 bgp_pbim = bgp_pbr_match_ipset_lookup(vrf_id, unique);
1999 if (!bgp_pbim) {
2000 if (BGP_DEBUG(zebra, ZEBRA))
2001 zlog_debug("%s: Fail to look BGP match ( %u %u)",
2002 __PRETTY_FUNCTION__, note, unique);
2003 return 0;
2004 }
2005
2006 switch (note) {
2007 case ZAPI_IPSET_FAIL_INSTALL:
2008 if (BGP_DEBUG(zebra, ZEBRA))
2009 zlog_debug("%s: Received IPSET_FAIL_INSTALL",
2010 __PRETTY_FUNCTION__);
2011 bgp_pbim->installed = false;
2012 bgp_pbim->install_in_progress = false;
2013 break;
2014 case ZAPI_IPSET_INSTALLED:
2015 bgp_pbim->installed = true;
2016 bgp_pbim->install_in_progress = false;
2017 if (BGP_DEBUG(zebra, ZEBRA))
2018 zlog_debug("%s: Received IPSET_INSTALLED",
2019 __PRETTY_FUNCTION__);
2020 break;
2021 case ZAPI_IPSET_FAIL_REMOVE:
2022 case ZAPI_IPSET_REMOVED:
2023 if (BGP_DEBUG(zebra, ZEBRA))
2024 zlog_debug("%s: Received IPSET REMOVED",
2025 __PRETTY_FUNCTION__);
2026 break;
2027 }
2028
2029 return 0;
2030 }
2031
2032 static int ipset_entry_notify_owner(int command, struct zclient *zclient,
2033 zebra_size_t length, vrf_id_t vrf_id)
2034 {
2035 uint32_t unique;
2036 char ipset_name[ZEBRA_IPSET_NAME_SIZE];
2037 enum zapi_ipset_entry_notify_owner note;
2038 struct bgp_pbr_match_entry *bgp_pbime;
2039
2040 if (!zapi_ipset_entry_notify_decode(
2041 zclient->ibuf,
2042 &unique,
2043 ipset_name,
2044 &note))
2045 return -1;
2046 bgp_pbime = bgp_pbr_match_ipset_entry_lookup(vrf_id,
2047 ipset_name,
2048 unique);
2049 if (!bgp_pbime) {
2050 if (BGP_DEBUG(zebra, ZEBRA))
2051 zlog_debug("%s: Fail to look BGP match entry (%u %u)",
2052 __PRETTY_FUNCTION__, note, unique);
2053 return 0;
2054 }
2055
2056 switch (note) {
2057 case ZAPI_IPSET_ENTRY_FAIL_INSTALL:
2058 if (BGP_DEBUG(zebra, ZEBRA))
2059 zlog_debug("%s: Received IPSET_ENTRY_FAIL_INSTALL",
2060 __PRETTY_FUNCTION__);
2061 bgp_pbime->installed = false;
2062 bgp_pbime->install_in_progress = false;
2063 break;
2064 case ZAPI_IPSET_ENTRY_INSTALLED:
2065 {
2066 struct bgp_info *bgp_info;
2067 struct bgp_info_extra *extra;
2068
2069 bgp_pbime->installed = true;
2070 bgp_pbime->install_in_progress = false;
2071 if (BGP_DEBUG(zebra, ZEBRA))
2072 zlog_debug("%s: Received IPSET_ENTRY_INSTALLED",
2073 __PRETTY_FUNCTION__);
2074 /* link bgp_info to bpme */
2075 bgp_info = (struct bgp_info *)bgp_pbime->bgp_info;
2076 extra = bgp_info_extra_get(bgp_info);
2077 extra->bgp_fs_pbr = (void *)bgp_pbime;
2078 }
2079 break;
2080 case ZAPI_IPSET_ENTRY_FAIL_REMOVE:
2081 case ZAPI_IPSET_ENTRY_REMOVED:
2082 if (BGP_DEBUG(zebra, ZEBRA))
2083 zlog_debug("%s: Received IPSET_ENTRY_REMOVED",
2084 __PRETTY_FUNCTION__);
2085 break;
2086 }
2087 return 0;
2088 }
2089
2090 static int iptable_notify_owner(int command, struct zclient *zclient,
2091 zebra_size_t length, vrf_id_t vrf_id)
2092 {
2093 uint32_t unique;
2094 enum zapi_iptable_notify_owner note;
2095 struct bgp_pbr_match *bgpm;
2096
2097 if (!zapi_iptable_notify_decode(
2098 zclient->ibuf,
2099 &unique,
2100 &note))
2101 return -1;
2102 bgpm = bgp_pbr_match_iptable_lookup(vrf_id, unique);
2103 if (!bgpm) {
2104 if (BGP_DEBUG(zebra, ZEBRA))
2105 zlog_debug("%s: Fail to look BGP iptable (%u %u)",
2106 __PRETTY_FUNCTION__, note, unique);
2107 return 0;
2108 }
2109 switch (note) {
2110 case ZAPI_IPTABLE_FAIL_INSTALL:
2111 if (BGP_DEBUG(zebra, ZEBRA))
2112 zlog_debug("%s: Received IPTABLE_FAIL_INSTALL",
2113 __PRETTY_FUNCTION__);
2114 bgpm->installed_in_iptable = false;
2115 bgpm->install_iptable_in_progress = false;
2116 break;
2117 case ZAPI_IPTABLE_INSTALLED:
2118 bgpm->installed_in_iptable = true;
2119 bgpm->install_iptable_in_progress = false;
2120 if (BGP_DEBUG(zebra, ZEBRA))
2121 zlog_debug("%s: Received IPTABLE_INSTALLED",
2122 __PRETTY_FUNCTION__);
2123 bgpm->action->refcnt++;
2124 break;
2125 case ZAPI_IPTABLE_FAIL_REMOVE:
2126 case ZAPI_IPTABLE_REMOVED:
2127 if (BGP_DEBUG(zebra, ZEBRA))
2128 zlog_debug("%s: Received IPTABLE REMOVED",
2129 __PRETTY_FUNCTION__);
2130 break;
2131 }
2132 return 0;
2133 }
2134
2135 static void bgp_encode_pbr_rule_action(struct stream *s,
2136 struct bgp_pbr_action *pbra)
2137 {
2138 struct prefix any;
2139
2140 stream_putl(s, 0); /* seqno unused */
2141 stream_putl(s, 0); /* ruleno unused */
2142
2143 stream_putl(s, pbra->unique);
2144
2145 memset(&any, 0, sizeof(any));
2146 any.family = AF_INET;
2147 stream_putc(s, any.family);
2148 stream_putc(s, any.prefixlen);
2149 stream_put(s, &any.u.prefix, prefix_blen(&any));
2150
2151 stream_putw(s, 0); /* src port */
2152
2153 stream_putc(s, any.family);
2154 stream_putc(s, any.prefixlen);
2155 stream_put(s, &any.u.prefix, prefix_blen(&any));
2156
2157 stream_putw(s, 0); /* dst port */
2158
2159 stream_putl(s, pbra->fwmark); /* fwmark */
2160
2161 stream_putl(s, pbra->table_id);
2162
2163 stream_putl(s, 0); /* ifindex unused */
2164 }
2165
2166 static void bgp_encode_pbr_ipset_match(struct stream *s,
2167 struct bgp_pbr_match *pbim)
2168 {
2169 stream_putl(s, pbim->unique);
2170 stream_putl(s, pbim->type);
2171
2172 stream_put(s, pbim->ipset_name,
2173 ZEBRA_IPSET_NAME_SIZE);
2174
2175
2176 }
2177
2178 static void bgp_encode_pbr_ipset_entry_match(struct stream *s,
2179 struct bgp_pbr_match_entry *pbime)
2180 {
2181 stream_putl(s, pbime->unique);
2182 /* check that back pointer is not null */
2183 stream_put(s, pbime->backpointer->ipset_name,
2184 ZEBRA_IPSET_NAME_SIZE);
2185
2186 stream_putc(s, pbime->src.family);
2187 stream_putc(s, pbime->src.prefixlen);
2188 stream_put(s, &pbime->src.u.prefix, prefix_blen(&pbime->src));
2189
2190 stream_putc(s, pbime->dst.family);
2191 stream_putc(s, pbime->dst.prefixlen);
2192 stream_put(s, &pbime->dst.u.prefix, prefix_blen(&pbime->dst));
2193
2194 stream_putw(s, pbime->src_port_min);
2195 stream_putw(s, pbime->src_port_max);
2196 stream_putw(s, pbime->dst_port_min);
2197 stream_putw(s, pbime->dst_port_max);
2198 stream_putc(s, pbime->proto);
2199 }
2200
2201 static void bgp_encode_pbr_iptable_match(struct stream *s,
2202 struct bgp_pbr_action *bpa,
2203 struct bgp_pbr_match *pbm)
2204 {
2205 stream_putl(s, pbm->unique2);
2206
2207 stream_putl(s, pbm->type);
2208
2209 stream_putl(s, pbm->flags);
2210
2211 /* TODO: correlate with what is contained
2212 * into bgp_pbr_action.
2213 * currently only forward supported
2214 */
2215 if (bpa->nh.type == NEXTHOP_TYPE_BLACKHOLE)
2216 stream_putl(s, ZEBRA_IPTABLES_DROP);
2217 else
2218 stream_putl(s, ZEBRA_IPTABLES_FORWARD);
2219 stream_putl(s, bpa->fwmark);
2220 stream_put(s, pbm->ipset_name,
2221 ZEBRA_IPSET_NAME_SIZE);
2222 stream_putw(s, pbm->pkt_len_min);
2223 stream_putw(s, pbm->pkt_len_max);
2224 stream_putw(s, pbm->tcp_flags);
2225 stream_putw(s, pbm->tcp_mask_flags);
2226 stream_putc(s, pbm->dscp_value);
2227 stream_putc(s, pbm->fragment);
2228 }
2229
2230 /* BGP has established connection with Zebra. */
2231 static void bgp_zebra_connected(struct zclient *zclient)
2232 {
2233 struct bgp *bgp;
2234
2235 zclient_num_connects++; /* increment even if not responding */
2236
2237 /* At this point, we may or may not have BGP instances configured, but
2238 * we're only interested in the default VRF (others wouldn't have learnt
2239 * the VRF from Zebra yet.)
2240 */
2241 bgp = bgp_get_default();
2242 if (!bgp)
2243 return;
2244
2245 bgp_zebra_instance_register(bgp);
2246
2247 /* Send the client registration */
2248 bfd_client_sendmsg(zclient, ZEBRA_BFD_CLIENT_REGISTER);
2249
2250 /* tell label pool that zebra is connected */
2251 bgp_lp_event_zebra_up();
2252
2253 /* TODO - What if we have peers and networks configured, do we have to
2254 * kick-start them?
2255 */
2256 }
2257
2258 static int bgp_zebra_process_local_es(int cmd, struct zclient *zclient,
2259 zebra_size_t length, vrf_id_t vrf_id)
2260 {
2261 esi_t esi;
2262 struct bgp *bgp = NULL;
2263 struct stream *s = NULL;
2264 char buf[ESI_STR_LEN];
2265 char buf1[INET6_ADDRSTRLEN];
2266 struct ipaddr originator_ip;
2267
2268 memset(&esi, 0, sizeof(esi_t));
2269 memset(&originator_ip, 0, sizeof(struct ipaddr));
2270
2271 bgp = bgp_lookup_by_vrf_id(vrf_id);
2272 if (!bgp)
2273 return 0;
2274
2275 s = zclient->ibuf;
2276 stream_get(&esi, s, sizeof(esi_t));
2277 stream_get(&originator_ip, s, sizeof(struct ipaddr));
2278
2279 if (BGP_DEBUG(zebra, ZEBRA))
2280 zlog_debug("Rx %s ESI %s originator-ip %s",
2281 (cmd == ZEBRA_LOCAL_ES_ADD) ? "add" : "del",
2282 esi_to_str(&esi, buf, sizeof(buf)),
2283 ipaddr2str(&originator_ip, buf1, sizeof(buf1)));
2284
2285 if (cmd == ZEBRA_LOCAL_ES_ADD)
2286 bgp_evpn_local_es_add(bgp, &esi, &originator_ip);
2287 else
2288 bgp_evpn_local_es_del(bgp, &esi, &originator_ip);
2289 return 0;
2290 }
2291
2292 static int bgp_zebra_process_local_l3vni(int cmd, struct zclient *zclient,
2293 zebra_size_t length, vrf_id_t vrf_id)
2294 {
2295 int filter = 0;
2296 char buf[ETHER_ADDR_STRLEN];
2297 vni_t l3vni = 0;
2298 struct ethaddr rmac;
2299 struct in_addr originator_ip;
2300 struct stream *s;
2301
2302 memset(&rmac, 0, sizeof(struct ethaddr));
2303 memset(&originator_ip, 0, sizeof(struct in_addr));
2304 s = zclient->ibuf;
2305 l3vni = stream_getl(s);
2306 if (cmd == ZEBRA_L3VNI_ADD) {
2307 stream_get(&rmac, s, sizeof(struct ethaddr));
2308 originator_ip.s_addr = stream_get_ipv4(s);
2309 stream_get(&filter, s, sizeof(int));
2310 }
2311
2312 if (BGP_DEBUG(zebra, ZEBRA))
2313 zlog_debug("Rx L3-VNI %s VRF %s VNI %u RMAC %s filter %s",
2314 (cmd == ZEBRA_L3VNI_ADD) ? "add" : "del",
2315 vrf_id_to_name(vrf_id), l3vni,
2316 prefix_mac2str(&rmac, buf, sizeof(buf)),
2317 filter ? "prefix-routes-only" : "none");
2318
2319 if (cmd == ZEBRA_L3VNI_ADD)
2320 bgp_evpn_local_l3vni_add(l3vni, vrf_id, &rmac, originator_ip,
2321 filter);
2322 else
2323 bgp_evpn_local_l3vni_del(l3vni, vrf_id);
2324
2325 return 0;
2326 }
2327
2328 static int bgp_zebra_process_local_vni(int command, struct zclient *zclient,
2329 zebra_size_t length, vrf_id_t vrf_id)
2330 {
2331 struct stream *s;
2332 vni_t vni;
2333 struct bgp *bgp;
2334 struct in_addr vtep_ip = {INADDR_ANY};
2335 vrf_id_t tenant_vrf_id = VRF_DEFAULT;
2336
2337 s = zclient->ibuf;
2338 vni = stream_getl(s);
2339 if (command == ZEBRA_VNI_ADD) {
2340 vtep_ip.s_addr = stream_get_ipv4(s);
2341 stream_get(&tenant_vrf_id, s, sizeof(vrf_id_t));
2342 }
2343
2344 bgp = bgp_lookup_by_vrf_id(vrf_id);
2345 if (!bgp)
2346 return 0;
2347
2348 if (BGP_DEBUG(zebra, ZEBRA))
2349 zlog_debug("Rx VNI %s VRF %s VNI %u tenant-vrf %s",
2350 (command == ZEBRA_VNI_ADD) ? "add" : "del",
2351 vrf_id_to_name(vrf_id), vni,
2352 vrf_id_to_name(tenant_vrf_id));
2353
2354 if (command == ZEBRA_VNI_ADD)
2355 return bgp_evpn_local_vni_add(
2356 bgp, vni, vtep_ip.s_addr ? vtep_ip : bgp->router_id,
2357 tenant_vrf_id);
2358 else
2359 return bgp_evpn_local_vni_del(bgp, vni);
2360 }
2361
2362 static int bgp_zebra_process_local_macip(int command, struct zclient *zclient,
2363 zebra_size_t length, vrf_id_t vrf_id)
2364 {
2365 struct stream *s;
2366 vni_t vni;
2367 struct bgp *bgp;
2368 struct ethaddr mac;
2369 struct ipaddr ip;
2370 int ipa_len;
2371 char buf[ETHER_ADDR_STRLEN];
2372 char buf1[INET6_ADDRSTRLEN];
2373 uint8_t flags;
2374
2375 memset(&ip, 0, sizeof(ip));
2376 s = zclient->ibuf;
2377 vni = stream_getl(s);
2378 stream_get(&mac.octet, s, ETH_ALEN);
2379 ipa_len = stream_getl(s);
2380 if (ipa_len != 0 && ipa_len != IPV4_MAX_BYTELEN
2381 && ipa_len != IPV6_MAX_BYTELEN) {
2382 zlog_err("%u:Recv MACIP %s with invalid IP addr length %d",
2383 vrf_id, (command == ZEBRA_MACIP_ADD) ? "Add" : "Del",
2384 ipa_len);
2385 return -1;
2386 }
2387
2388 if (ipa_len) {
2389 ip.ipa_type =
2390 (ipa_len == IPV4_MAX_BYTELEN) ? IPADDR_V4 : IPADDR_V6;
2391 stream_get(&ip.ip.addr, s, ipa_len);
2392 }
2393 flags = stream_getc(s);
2394
2395 bgp = bgp_lookup_by_vrf_id(vrf_id);
2396 if (!bgp)
2397 return 0;
2398
2399 if (BGP_DEBUG(zebra, ZEBRA))
2400 zlog_debug("%u:Recv MACIP %s flags 0x%x MAC %s IP %s VNI %u",
2401 vrf_id, (command == ZEBRA_MACIP_ADD) ? "Add" : "Del",
2402 flags, prefix_mac2str(&mac, buf, sizeof(buf)),
2403 ipaddr2str(&ip, buf1, sizeof(buf1)), vni);
2404
2405 if (command == ZEBRA_MACIP_ADD)
2406 return bgp_evpn_local_macip_add(bgp, vni, &mac, &ip, flags);
2407 else
2408 return bgp_evpn_local_macip_del(bgp, vni, &mac, &ip);
2409 }
2410
2411 static void bgp_zebra_process_local_ip_prefix(int cmd, struct zclient *zclient,
2412 zebra_size_t length,
2413 vrf_id_t vrf_id)
2414 {
2415 struct stream *s = NULL;
2416 struct bgp *bgp_vrf = NULL;
2417 struct prefix p;
2418 char buf[PREFIX_STRLEN];
2419
2420 memset(&p, 0, sizeof(struct prefix));
2421 s = zclient->ibuf;
2422 stream_get(&p, s, sizeof(struct prefix));
2423
2424 bgp_vrf = bgp_lookup_by_vrf_id(vrf_id);
2425 if (!bgp_vrf)
2426 return;
2427
2428 if (BGP_DEBUG(zebra, ZEBRA))
2429 zlog_debug("Recv prefix %s %s on vrf %s",
2430 prefix2str(&p, buf, sizeof(buf)),
2431 (cmd == ZEBRA_IP_PREFIX_ROUTE_ADD) ? "ADD" : "DEL",
2432 vrf_id_to_name(vrf_id));
2433
2434 if (cmd == ZEBRA_IP_PREFIX_ROUTE_ADD) {
2435
2436 if (p.family == AF_INET)
2437 return bgp_evpn_advertise_type5_route(
2438 bgp_vrf, &p, NULL, AFI_IP, SAFI_UNICAST);
2439 else
2440 return bgp_evpn_advertise_type5_route(
2441 bgp_vrf, &p, NULL, AFI_IP6, SAFI_UNICAST);
2442
2443 } else {
2444 if (p.family == AF_INET)
2445 return bgp_evpn_withdraw_type5_route(
2446 bgp_vrf, &p, AFI_IP, SAFI_UNICAST);
2447 else
2448 return bgp_evpn_withdraw_type5_route(
2449 bgp_vrf, &p, AFI_IP6, SAFI_UNICAST);
2450 }
2451 }
2452
2453 static void bgp_zebra_process_label_chunk(
2454 int cmd,
2455 struct zclient *zclient,
2456 zebra_size_t length,
2457 vrf_id_t vrf_id)
2458 {
2459 struct stream *s = NULL;
2460 uint8_t response_keep;
2461 uint32_t first;
2462 uint32_t last;
2463 uint8_t proto;
2464 unsigned short instance;
2465
2466 s = zclient->ibuf;
2467 STREAM_GETC(s, proto);
2468 STREAM_GETW(s, instance);
2469 STREAM_GETC(s, response_keep);
2470 STREAM_GETL(s, first);
2471 STREAM_GETL(s, last);
2472
2473 if (zclient->redist_default != proto) {
2474 zlog_err("Got LM msg with wrong proto %u", proto);
2475 return;
2476 }
2477 if (zclient->instance != instance) {
2478 zlog_err("Got LM msg with wrong instance %u", proto);
2479 return;
2480 }
2481
2482 if (first > last ||
2483 first < MPLS_LABEL_UNRESERVED_MIN ||
2484 last > MPLS_LABEL_UNRESERVED_MAX) {
2485
2486 zlog_err("%s: Invalid Label chunk: %u - %u",
2487 __func__, first, last);
2488 return;
2489 }
2490 if (BGP_DEBUG(zebra, ZEBRA)) {
2491 zlog_debug("Label Chunk assign: %u - %u (%u) ",
2492 first, last, response_keep);
2493 }
2494
2495 bgp_lp_event_chunk(response_keep, first, last);
2496
2497 stream_failure: /* for STREAM_GETX */
2498 return;
2499 }
2500
2501 extern struct zebra_privs_t bgpd_privs;
2502
2503 void bgp_zebra_init(struct thread_master *master)
2504 {
2505 zclient_num_connects = 0;
2506
2507 /* Set default values. */
2508 zclient = zclient_new_notify(master, &zclient_options_default);
2509 zclient_init(zclient, ZEBRA_ROUTE_BGP, 0, &bgpd_privs);
2510 zclient->zebra_connected = bgp_zebra_connected;
2511 zclient->router_id_update = bgp_router_id_update;
2512 zclient->interface_add = bgp_interface_add;
2513 zclient->interface_delete = bgp_interface_delete;
2514 zclient->interface_address_add = bgp_interface_address_add;
2515 zclient->interface_address_delete = bgp_interface_address_delete;
2516 zclient->interface_nbr_address_add = bgp_interface_nbr_address_add;
2517 zclient->interface_nbr_address_delete =
2518 bgp_interface_nbr_address_delete;
2519 zclient->interface_vrf_update = bgp_interface_vrf_update;
2520 zclient->redistribute_route_add = zebra_read_route;
2521 zclient->redistribute_route_del = zebra_read_route;
2522 zclient->interface_up = bgp_interface_up;
2523 zclient->interface_down = bgp_interface_down;
2524 zclient->nexthop_update = bgp_read_nexthop_update;
2525 zclient->import_check_update = bgp_read_import_check_update;
2526 zclient->fec_update = bgp_read_fec_update;
2527 zclient->local_es_add = bgp_zebra_process_local_es;
2528 zclient->local_es_del = bgp_zebra_process_local_es;
2529 zclient->local_vni_add = bgp_zebra_process_local_vni;
2530 zclient->local_vni_del = bgp_zebra_process_local_vni;
2531 zclient->local_macip_add = bgp_zebra_process_local_macip;
2532 zclient->local_macip_del = bgp_zebra_process_local_macip;
2533 zclient->local_l3vni_add = bgp_zebra_process_local_l3vni;
2534 zclient->local_l3vni_del = bgp_zebra_process_local_l3vni;
2535 zclient->local_ip_prefix_add = bgp_zebra_process_local_ip_prefix;
2536 zclient->local_ip_prefix_del = bgp_zebra_process_local_ip_prefix;
2537 zclient->label_chunk = bgp_zebra_process_label_chunk;
2538 zclient->rule_notify_owner = rule_notify_owner;
2539 zclient->ipset_notify_owner = ipset_notify_owner;
2540 zclient->ipset_entry_notify_owner = ipset_entry_notify_owner;
2541 zclient->iptable_notify_owner = iptable_notify_owner;
2542 }
2543
2544 void bgp_zebra_destroy(void)
2545 {
2546 if (zclient == NULL)
2547 return;
2548 zclient_stop(zclient);
2549 zclient_free(zclient);
2550 zclient = NULL;
2551 }
2552
2553 int bgp_zebra_num_connects(void)
2554 {
2555 return zclient_num_connects;
2556 }
2557
2558 void bgp_send_pbr_rule_action(struct bgp_pbr_action *pbra, bool install)
2559 {
2560 struct stream *s;
2561
2562 if (pbra->install_in_progress)
2563 return;
2564 if (BGP_DEBUG(zebra, ZEBRA))
2565 zlog_debug("%s: table %d fwmark %d %d",
2566 __PRETTY_FUNCTION__,
2567 pbra->table_id, pbra->fwmark, install);
2568 s = zclient->obuf;
2569 stream_reset(s);
2570
2571 zclient_create_header(s,
2572 install ? ZEBRA_RULE_ADD : ZEBRA_RULE_DELETE,
2573 VRF_DEFAULT);
2574 stream_putl(s, 1); /* send one pbr action */
2575
2576 bgp_encode_pbr_rule_action(s, pbra);
2577
2578 stream_putw_at(s, 0, stream_get_endp(s));
2579 if (!zclient_send_message(zclient) && install)
2580 pbra->install_in_progress = true;
2581 }
2582
2583 void bgp_send_pbr_ipset_match(struct bgp_pbr_match *pbrim, bool install)
2584 {
2585 struct stream *s;
2586
2587 if (pbrim->install_in_progress)
2588 return;
2589 if (BGP_DEBUG(zebra, ZEBRA))
2590 zlog_debug("%s: name %s type %d %d",
2591 __PRETTY_FUNCTION__,
2592 pbrim->ipset_name, pbrim->type, install);
2593 s = zclient->obuf;
2594 stream_reset(s);
2595
2596 zclient_create_header(s,
2597 install ? ZEBRA_IPSET_CREATE :
2598 ZEBRA_IPSET_DESTROY,
2599 VRF_DEFAULT);
2600
2601 stream_putl(s, 1); /* send one pbr action */
2602
2603 bgp_encode_pbr_ipset_match(s, pbrim);
2604
2605 stream_putw_at(s, 0, stream_get_endp(s));
2606 if (!zclient_send_message(zclient) && install)
2607 pbrim->install_in_progress = true;
2608 }
2609
2610 void bgp_send_pbr_ipset_entry_match(struct bgp_pbr_match_entry *pbrime,
2611 bool install)
2612 {
2613 struct stream *s;
2614
2615 if (pbrime->install_in_progress)
2616 return;
2617 if (BGP_DEBUG(zebra, ZEBRA))
2618 zlog_debug("%s: name %s %d %d", __PRETTY_FUNCTION__,
2619 pbrime->backpointer->ipset_name,
2620 pbrime->unique, install);
2621 s = zclient->obuf;
2622 stream_reset(s);
2623
2624 zclient_create_header(s,
2625 install ? ZEBRA_IPSET_ENTRY_ADD :
2626 ZEBRA_IPSET_ENTRY_DELETE,
2627 VRF_DEFAULT);
2628
2629 stream_putl(s, 1); /* send one pbr action */
2630
2631 bgp_encode_pbr_ipset_entry_match(s, pbrime);
2632
2633 stream_putw_at(s, 0, stream_get_endp(s));
2634 if (!zclient_send_message(zclient) && install)
2635 pbrime->install_in_progress = true;
2636 }
2637
2638 static void bgp_encode_pbr_interface_list(struct bgp *bgp, struct stream *s)
2639 {
2640 struct bgp_pbr_config *bgp_pbr_cfg = bgp->bgp_pbr_cfg;
2641 struct bgp_pbr_interface_head *head;
2642 struct bgp_pbr_interface *pbr_if;
2643 struct interface *ifp;
2644
2645 if (!bgp_pbr_cfg)
2646 return;
2647 head = &(bgp_pbr_cfg->ifaces_by_name_ipv4);
2648
2649 RB_FOREACH (pbr_if, bgp_pbr_interface_head, head) {
2650 ifp = if_lookup_by_name(pbr_if->name, bgp->vrf_id);
2651 if (ifp)
2652 stream_putl(s, ifp->ifindex);
2653 }
2654 }
2655
2656 static int bgp_pbr_get_ifnumber(struct bgp *bgp)
2657 {
2658 struct bgp_pbr_config *bgp_pbr_cfg = bgp->bgp_pbr_cfg;
2659 struct bgp_pbr_interface_head *head;
2660 struct bgp_pbr_interface *pbr_if;
2661 int cnt = 0;
2662
2663 if (!bgp_pbr_cfg)
2664 return 0;
2665 head = &(bgp_pbr_cfg->ifaces_by_name_ipv4);
2666
2667 RB_FOREACH (pbr_if, bgp_pbr_interface_head, head) {
2668 if (if_lookup_by_name(pbr_if->name, bgp->vrf_id))
2669 cnt++;
2670 }
2671 return cnt;
2672 }
2673
2674 void bgp_send_pbr_iptable(struct bgp_pbr_action *pba,
2675 struct bgp_pbr_match *pbm,
2676 bool install)
2677 {
2678 struct stream *s;
2679 int ret = 0;
2680 int nb_interface;
2681
2682 if (pbm->install_iptable_in_progress)
2683 return;
2684 if (BGP_DEBUG(zebra, ZEBRA))
2685 zlog_debug("%s: name %s type %d mark %d %d",
2686 __PRETTY_FUNCTION__, pbm->ipset_name,
2687 pbm->type, pba->fwmark, install);
2688 s = zclient->obuf;
2689 stream_reset(s);
2690
2691 zclient_create_header(s,
2692 install ? ZEBRA_IPTABLE_ADD :
2693 ZEBRA_IPTABLE_DELETE,
2694 VRF_DEFAULT);
2695
2696 bgp_encode_pbr_iptable_match(s, pba, pbm);
2697 nb_interface = bgp_pbr_get_ifnumber(pba->bgp);
2698 stream_putl(s, nb_interface);
2699 if (nb_interface)
2700 bgp_encode_pbr_interface_list(pba->bgp, s);
2701 stream_putw_at(s, 0, stream_get_endp(s));
2702 ret = zclient_send_message(zclient);
2703 if (install) {
2704 if (ret)
2705 pba->refcnt++;
2706 else
2707 pbm->install_iptable_in_progress = true;
2708 }
2709 }
2710
2711 /* inject in table <table_id> a default route to:
2712 * - if nexthop IP is present : to this nexthop
2713 * - if vrf is different from local : to the matching VRF
2714 */
2715 void bgp_zebra_announce_default(struct bgp *bgp, struct nexthop *nh,
2716 afi_t afi, uint32_t table_id, bool announce)
2717 {
2718 struct zapi_nexthop *api_nh;
2719 struct zapi_route api;
2720 struct prefix p;
2721
2722 if (!nh || nh->type != NEXTHOP_TYPE_IPV4
2723 || nh->vrf_id == VRF_UNKNOWN)
2724 return;
2725 memset(&p, 0, sizeof(struct prefix));
2726 /* default route */
2727 if (afi != AFI_IP)
2728 return;
2729 p.family = AF_INET;
2730 memset(&api, 0, sizeof(api));
2731 api.vrf_id = bgp->vrf_id;
2732 api.type = ZEBRA_ROUTE_BGP;
2733 api.safi = SAFI_UNICAST;
2734 api.prefix = p;
2735 api.tableid = table_id;
2736 api.nexthop_num = 1;
2737 SET_FLAG(api.message, ZAPI_MESSAGE_TABLEID);
2738 SET_FLAG(api.message, ZAPI_MESSAGE_NEXTHOP);
2739 api_nh = &api.nexthops[0];
2740
2741 /* redirect IP */
2742 if (nh->gate.ipv4.s_addr) {
2743 char buff[PREFIX_STRLEN];
2744
2745 api_nh->vrf_id = nh->vrf_id;
2746 api_nh->gate.ipv4 = nh->gate.ipv4;
2747 api_nh->type = NEXTHOP_TYPE_IPV4;
2748
2749 inet_ntop(AF_INET, &(nh->gate.ipv4), buff, INET_ADDRSTRLEN);
2750 if (BGP_DEBUG(zebra, ZEBRA))
2751 zlog_info("BGP: %s default route to %s table %d (redirect IP)",
2752 announce ? "adding" : "withdrawing",
2753 buff, table_id);
2754 zclient_route_send(announce ? ZEBRA_ROUTE_ADD
2755 : ZEBRA_ROUTE_DELETE,
2756 zclient, &api);
2757 } else if (nh->vrf_id != bgp->vrf_id) {
2758 struct vrf *vrf;
2759 struct interface *ifp;
2760
2761 vrf = vrf_lookup_by_id(nh->vrf_id);
2762 if (!vrf)
2763 return;
2764 /* create default route with interface <VRF>
2765 * with nexthop-vrf <VRF>
2766 */
2767 ifp = if_lookup_by_name_all_vrf(vrf->name);
2768 if (!ifp)
2769 return;
2770 api_nh->vrf_id = nh->vrf_id;
2771 api_nh->type = NEXTHOP_TYPE_IFINDEX;
2772 api_nh->ifindex = ifp->ifindex;
2773 if (BGP_DEBUG(zebra, ZEBRA))
2774 zlog_info("BGP: %s default route to %s table %d (redirect VRF)",
2775 announce ? "adding" : "withdrawing",
2776 vrf->name, table_id);
2777 zclient_route_send(announce ? ZEBRA_ROUTE_ADD
2778 : ZEBRA_ROUTE_DELETE,
2779 zclient, &api);
2780 return;
2781 }
2782 }
FRRouting mirror