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