]> git.proxmox.com Git - mirror_frr.git/blob - zebra/rt_netlink.c
projects / mirror_frr.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
zebra: add handy res2str utility
[mirror_frr.git] / zebra / rt_netlink.c
1 /* Kernel routing table updates using netlink over GNU/Linux system.
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 #ifdef HAVE_NETLINK
24
25 #include <net/if_arp.h>
26 #include <linux/lwtunnel.h>
27 #include <linux/mpls_iptunnel.h>
28 #include <linux/neighbour.h>
29 #include <linux/rtnetlink.h>
30
31 /* Hack for GNU libc version 2. */
32 #ifndef MSG_TRUNC
33 #define MSG_TRUNC 0x20
34 #endif /* MSG_TRUNC */
35
36 #include "linklist.h"
37 #include "if.h"
38 #include "log.h"
39 #include "prefix.h"
40 #include "connected.h"
41 #include "table.h"
42 #include "memory.h"
43 #include "zebra_memory.h"
44 #include "rib.h"
45 #include "thread.h"
46 #include "privs.h"
47 #include "nexthop.h"
48 #include "vrf.h"
49 #include "vty.h"
50 #include "mpls.h"
51 #include "vxlan.h"
52
53 #include "zebra/zapi_msg.h"
54 #include "zebra/zebra_ns.h"
55 #include "zebra/zebra_vrf.h"
56 #include "zebra/rt.h"
57 #include "zebra/redistribute.h"
58 #include "zebra/interface.h"
59 #include "zebra/debug.h"
60 #include "zebra/rtadv.h"
61 #include "zebra/zebra_ptm.h"
62 #include "zebra/zebra_mpls.h"
63 #include "zebra/kernel_netlink.h"
64 #include "zebra/rt_netlink.h"
65 #include "zebra/zebra_mroute.h"
66 #include "zebra/zebra_vxlan.h"
67 #include "zebra/zebra_errors.h"
68
69 #ifndef AF_MPLS
70 #define AF_MPLS 28
71 #endif
72
73 static vlanid_t filter_vlan = 0;
74
75 struct gw_family_t {
76 uint16_t filler;
77 uint16_t family;
78 union g_addr gate;
79 };
80
81 char ipv4_ll_buf[16] = "169.254.0.1";
82 struct in_addr ipv4_ll;
83
84 /*
85 * The ipv4_ll data structure is used for all 5549
86 * additions to the kernel. Let's figure out the
87 * correct value one time instead for every
88 * install/remove of a 5549 type route
89 */
90 void rt_netlink_init(void)
91 {
92 inet_pton(AF_INET, ipv4_ll_buf, &ipv4_ll);
93 }
94
95 static inline int is_selfroute(int proto)
96 {
97 if ((proto == RTPROT_BGP) || (proto == RTPROT_OSPF)
98 || (proto == RTPROT_ZSTATIC) || (proto == RTPROT_ZEBRA)
99 || (proto == RTPROT_ISIS) || (proto == RTPROT_RIPNG)
100 || (proto == RTPROT_NHRP) || (proto == RTPROT_EIGRP)
101 || (proto == RTPROT_LDP) || (proto == RTPROT_BABEL)
102 || (proto == RTPROT_RIP) || (proto == RTPROT_SHARP)
103 || (proto == RTPROT_PBR) || (proto == RTPROT_OPENFABRIC)) {
104 return 1;
105 }
106
107 return 0;
108 }
109
110 static inline int zebra2proto(int proto)
111 {
112 switch (proto) {
113 case ZEBRA_ROUTE_BABEL:
114 proto = RTPROT_BABEL;
115 break;
116 case ZEBRA_ROUTE_BGP:
117 proto = RTPROT_BGP;
118 break;
119 case ZEBRA_ROUTE_OSPF:
120 case ZEBRA_ROUTE_OSPF6:
121 proto = RTPROT_OSPF;
122 break;
123 case ZEBRA_ROUTE_STATIC:
124 proto = RTPROT_ZSTATIC;
125 break;
126 case ZEBRA_ROUTE_ISIS:
127 proto = RTPROT_ISIS;
128 break;
129 case ZEBRA_ROUTE_RIP:
130 proto = RTPROT_RIP;
131 break;
132 case ZEBRA_ROUTE_RIPNG:
133 proto = RTPROT_RIPNG;
134 break;
135 case ZEBRA_ROUTE_NHRP:
136 proto = RTPROT_NHRP;
137 break;
138 case ZEBRA_ROUTE_EIGRP:
139 proto = RTPROT_EIGRP;
140 break;
141 case ZEBRA_ROUTE_LDP:
142 proto = RTPROT_LDP;
143 break;
144 case ZEBRA_ROUTE_SHARP:
145 proto = RTPROT_SHARP;
146 break;
147 case ZEBRA_ROUTE_PBR:
148 proto = RTPROT_PBR;
149 break;
150 case ZEBRA_ROUTE_OPENFABRIC:
151 proto = RTPROT_OPENFABRIC;
152 break;
153 default:
154 /*
155 * When a user adds a new protocol this will show up
156 * to let them know to do something about it. This
157 * is intentionally a warn because we should see
158 * this as part of development of a new protocol
159 */
160 zlog_debug(
161 "%s: Please add this protocol(%d) to proper rt_netlink.c handling",
162 __PRETTY_FUNCTION__, proto);
163 proto = RTPROT_ZEBRA;
164 break;
165 }
166
167 return proto;
168 }
169
170 static inline int proto2zebra(int proto, int family)
171 {
172 switch (proto) {
173 case RTPROT_BABEL:
174 proto = ZEBRA_ROUTE_BABEL;
175 break;
176 case RTPROT_BGP:
177 proto = ZEBRA_ROUTE_BGP;
178 break;
179 case RTPROT_OSPF:
180 proto = (family == AFI_IP) ? ZEBRA_ROUTE_OSPF
181 : ZEBRA_ROUTE_OSPF6;
182 break;
183 case RTPROT_ISIS:
184 proto = ZEBRA_ROUTE_ISIS;
185 break;
186 case RTPROT_RIP:
187 proto = ZEBRA_ROUTE_RIP;
188 break;
189 case RTPROT_RIPNG:
190 proto = ZEBRA_ROUTE_RIPNG;
191 break;
192 case RTPROT_NHRP:
193 proto = ZEBRA_ROUTE_NHRP;
194 break;
195 case RTPROT_EIGRP:
196 proto = ZEBRA_ROUTE_EIGRP;
197 break;
198 case RTPROT_LDP:
199 proto = ZEBRA_ROUTE_LDP;
200 break;
201 case RTPROT_STATIC:
202 case RTPROT_ZSTATIC:
203 proto = ZEBRA_ROUTE_STATIC;
204 break;
205 case RTPROT_SHARP:
206 proto = ZEBRA_ROUTE_SHARP;
207 break;
208 case RTPROT_PBR:
209 proto = ZEBRA_ROUTE_PBR;
210 break;
211 case RTPROT_OPENFABRIC:
212 proto = ZEBRA_ROUTE_OPENFABRIC;
213 break;
214 default:
215 /*
216 * When a user adds a new protocol this will show up
217 * to let them know to do something about it. This
218 * is intentionally a warn because we should see
219 * this as part of development of a new protocol
220 */
221 zlog_debug(
222 "%s: Please add this protocol(%d) to proper rt_netlink.c handling",
223 __PRETTY_FUNCTION__, proto);
224 proto = ZEBRA_ROUTE_KERNEL;
225 break;
226 }
227 return proto;
228 }
229
230 /*
231 Pending: create an efficient table_id (in a tree/hash) based lookup)
232 */
233 static vrf_id_t vrf_lookup_by_table(uint32_t table_id, ns_id_t ns_id)
234 {
235 struct vrf *vrf;
236 struct zebra_vrf *zvrf;
237
238 RB_FOREACH (vrf, vrf_id_head, &vrfs_by_id) {
239 zvrf = vrf->info;
240 if (zvrf == NULL)
241 continue;
242 /* case vrf with netns : match the netnsid */
243 if (vrf_is_backend_netns()) {
244 if (ns_id == zvrf_id(zvrf))
245 return zvrf_id(zvrf);
246 } else {
247 /* VRF is VRF_BACKEND_VRF_LITE */
248 if (zvrf->table_id != table_id)
249 continue;
250 return zvrf_id(zvrf);
251 }
252 }
253
254 return VRF_DEFAULT;
255 }
256
257 /**
258 * @parse_encap_mpls() - Parses encapsulated mpls attributes
259 * @tb: Pointer to rtattr to look for nested items in.
260 * @labels: Pointer to store labels in.
261 *
262 * Return: Number of mpls labels found.
263 */
264 static int parse_encap_mpls(struct rtattr *tb, mpls_label_t *labels)
265 {
266 struct rtattr *tb_encap[MPLS_IPTUNNEL_MAX + 1] = {0};
267 mpls_lse_t *lses = NULL;
268 int num_labels = 0;
269 uint32_t ttl = 0;
270 uint32_t bos = 0;
271 uint32_t exp = 0;
272 mpls_label_t label = 0;
273
274 netlink_parse_rtattr_nested(tb_encap, MPLS_IPTUNNEL_MAX, tb);
275 lses = (mpls_lse_t *)RTA_DATA(tb_encap[MPLS_IPTUNNEL_DST]);
276 while (!bos && num_labels < MPLS_MAX_LABELS) {
277 mpls_lse_decode(lses[num_labels], &label, &ttl, &exp, &bos);
278 labels[num_labels++] = label;
279 }
280
281 return num_labels;
282 }
283
284 /* Looking up routing table by netlink interface. */
285 static int netlink_route_change_read_unicast(struct nlmsghdr *h, ns_id_t ns_id,
286 int startup)
287 {
288 int len;
289 struct rtmsg *rtm;
290 struct rtattr *tb[RTA_MAX + 1];
291 uint8_t flags = 0;
292 struct prefix p;
293 struct prefix_ipv6 src_p = {};
294 vrf_id_t vrf_id;
295
296 char anyaddr[16] = {0};
297
298 int proto = ZEBRA_ROUTE_KERNEL;
299 int index = 0;
300 int table;
301 int metric = 0;
302 uint32_t mtu = 0;
303 uint8_t distance = 0;
304 route_tag_t tag = 0;
305
306 void *dest = NULL;
307 void *gate = NULL;
308 void *prefsrc = NULL; /* IPv4 preferred source host address */
309 void *src = NULL; /* IPv6 srcdest source prefix */
310 enum blackhole_type bh_type = BLACKHOLE_UNSPEC;
311
312 /* MPLS labels */
313 mpls_label_t labels[MPLS_MAX_LABELS] = {0};
314 int num_labels = 0;
315
316 rtm = NLMSG_DATA(h);
317
318 if (startup && h->nlmsg_type != RTM_NEWROUTE)
319 return 0;
320 switch (rtm->rtm_type) {
321 case RTN_UNICAST:
322 break;
323 case RTN_BLACKHOLE:
324 bh_type = BLACKHOLE_NULL;
325 break;
326 case RTN_UNREACHABLE:
327 bh_type = BLACKHOLE_REJECT;
328 break;
329 case RTN_PROHIBIT:
330 bh_type = BLACKHOLE_ADMINPROHIB;
331 break;
332 default:
333 return 0;
334 }
335
336 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct rtmsg));
337 if (len < 0) {
338 zlog_err("%s: Message received from netlink is of a broken size %d %zu",
339 __PRETTY_FUNCTION__, h->nlmsg_len,
340 (size_t)NLMSG_LENGTH(sizeof(struct rtmsg)));
341 return -1;
342 }
343
344 memset(tb, 0, sizeof tb);
345 netlink_parse_rtattr(tb, RTA_MAX, RTM_RTA(rtm), len);
346
347 if (rtm->rtm_flags & RTM_F_CLONED)
348 return 0;
349 if (rtm->rtm_protocol == RTPROT_REDIRECT)
350 return 0;
351 if (rtm->rtm_protocol == RTPROT_KERNEL)
352 return 0;
353
354 if (!startup && is_selfroute(rtm->rtm_protocol)
355 && h->nlmsg_type == RTM_NEWROUTE) {
356 if (IS_ZEBRA_DEBUG_KERNEL)
357 zlog_debug("Route type: %d Received that we think we have originated, ignoring",
358 rtm->rtm_protocol);
359 return 0;
360 }
361
362 /* We don't care about change notifications for the MPLS table. */
363 /* TODO: Revisit this. */
364 if (rtm->rtm_family == AF_MPLS)
365 return 0;
366
367 /* Table corresponding to route. */
368 if (tb[RTA_TABLE])
369 table = *(int *)RTA_DATA(tb[RTA_TABLE]);
370 else
371 table = rtm->rtm_table;
372
373 /* Map to VRF */
374 vrf_id = vrf_lookup_by_table(table, ns_id);
375 if (vrf_id == VRF_DEFAULT) {
376 if (!is_zebra_valid_kernel_table(table)
377 && !is_zebra_main_routing_table(table))
378 return 0;
379 }
380
381 /* Route which inserted by Zebra. */
382 if (is_selfroute(rtm->rtm_protocol)) {
383 flags |= ZEBRA_FLAG_SELFROUTE;
384 proto = proto2zebra(rtm->rtm_protocol, rtm->rtm_family);
385 }
386 if (tb[RTA_OIF])
387 index = *(int *)RTA_DATA(tb[RTA_OIF]);
388
389 if (tb[RTA_DST])
390 dest = RTA_DATA(tb[RTA_DST]);
391 else
392 dest = anyaddr;
393
394 if (tb[RTA_SRC])
395 src = RTA_DATA(tb[RTA_SRC]);
396 else
397 src = anyaddr;
398
399 if (tb[RTA_PREFSRC])
400 prefsrc = RTA_DATA(tb[RTA_PREFSRC]);
401
402 if (tb[RTA_GATEWAY])
403 gate = RTA_DATA(tb[RTA_GATEWAY]);
404
405 if (tb[RTA_PRIORITY])
406 metric = *(int *)RTA_DATA(tb[RTA_PRIORITY]);
407
408 #if defined(SUPPORT_REALMS)
409 if (tb[RTA_FLOW])
410 tag = *(uint32_t *)RTA_DATA(tb[RTA_FLOW]);
411 #endif
412
413 if (tb[RTA_METRICS]) {
414 struct rtattr *mxrta[RTAX_MAX + 1];
415
416 memset(mxrta, 0, sizeof mxrta);
417 netlink_parse_rtattr(mxrta, RTAX_MAX, RTA_DATA(tb[RTA_METRICS]),
418 RTA_PAYLOAD(tb[RTA_METRICS]));
419
420 if (mxrta[RTAX_MTU])
421 mtu = *(uint32_t *)RTA_DATA(mxrta[RTAX_MTU]);
422 }
423
424 if (rtm->rtm_family == AF_INET) {
425 p.family = AF_INET;
426 if (rtm->rtm_dst_len > IPV4_MAX_BITLEN) {
427 zlog_err(
428 "Invalid destination prefix length: %u received from kernel route change",
429 rtm->rtm_dst_len);
430 return -1;
431 }
432 memcpy(&p.u.prefix4, dest, 4);
433 p.prefixlen = rtm->rtm_dst_len;
434
435 if (rtm->rtm_src_len != 0) {
436 char buf[PREFIX_STRLEN];
437 flog_warn(
438 EC_ZEBRA_UNSUPPORTED_V4_SRCDEST,
439 "unsupported IPv4 sourcedest route (dest %s vrf %u)",
440 prefix2str(&p, buf, sizeof(buf)), vrf_id);
441 return 0;
442 }
443
444 /* Force debug below to not display anything for source */
445 src_p.prefixlen = 0;
446 } else if (rtm->rtm_family == AF_INET6) {
447 p.family = AF_INET6;
448 if (rtm->rtm_dst_len > IPV6_MAX_BITLEN) {
449 zlog_err(
450 "Invalid destination prefix length: %u received from kernel route change",
451 rtm->rtm_dst_len);
452 return -1;
453 }
454 memcpy(&p.u.prefix6, dest, 16);
455 p.prefixlen = rtm->rtm_dst_len;
456
457 src_p.family = AF_INET6;
458 if (rtm->rtm_src_len > IPV6_MAX_BITLEN) {
459 zlog_err(
460 "Invalid source prefix length: %u received from kernel route change",
461 rtm->rtm_src_len);
462 return -1;
463 }
464 memcpy(&src_p.prefix, src, 16);
465 src_p.prefixlen = rtm->rtm_src_len;
466 }
467
468 /*
469 * For ZEBRA_ROUTE_KERNEL types:
470 *
471 * The metric/priority of the route received from the kernel
472 * is a 32 bit number. We are going to interpret the high
473 * order byte as the Admin Distance and the low order 3 bytes
474 * as the metric.
475 *
476 * This will allow us to do two things:
477 * 1) Allow the creation of kernel routes that can be
478 * overridden by zebra.
479 * 2) Allow the old behavior for 'most' kernel route types
480 * if a user enters 'ip route ...' v4 routes get a metric
481 * of 0 and v6 routes get a metric of 1024. Both of these
482 * values will end up with a admin distance of 0, which
483 * will cause them to win for the purposes of zebra.
484 */
485 if (proto == ZEBRA_ROUTE_KERNEL) {
486 distance = (metric >> 24) & 0xFF;
487 metric = (metric & 0x00FFFFFF);
488 }
489
490 if (IS_ZEBRA_DEBUG_KERNEL) {
491 char buf[PREFIX_STRLEN];
492 char buf2[PREFIX_STRLEN];
493 zlog_debug("%s %s%s%s vrf %u(%u) metric: %d Admin Distance: %d",
494 nl_msg_type_to_str(h->nlmsg_type),
495 prefix2str(&p, buf, sizeof(buf)),
496 src_p.prefixlen ? " from " : "",
497 src_p.prefixlen
498 ? prefix2str(&src_p, buf2, sizeof(buf2))
499 : "",
500 vrf_id, table, metric, distance);
501 }
502
503 afi_t afi = AFI_IP;
504 if (rtm->rtm_family == AF_INET6)
505 afi = AFI_IP6;
506
507 if (h->nlmsg_type == RTM_NEWROUTE) {
508 struct interface *ifp;
509 vrf_id_t nh_vrf_id = vrf_id;
510
511 if (!tb[RTA_MULTIPATH]) {
512 struct nexthop nh;
513 size_t sz = (afi == AFI_IP) ? 4 : 16;
514
515 memset(&nh, 0, sizeof(nh));
516
517 if (bh_type == BLACKHOLE_UNSPEC) {
518 if (index && !gate)
519 nh.type = NEXTHOP_TYPE_IFINDEX;
520 else if (index && gate)
521 nh.type =
522 (afi == AFI_IP)
523 ? NEXTHOP_TYPE_IPV4_IFINDEX
524 : NEXTHOP_TYPE_IPV6_IFINDEX;
525 else if (!index && gate)
526 nh.type = (afi == AFI_IP)
527 ? NEXTHOP_TYPE_IPV4
528 : NEXTHOP_TYPE_IPV6;
529 else {
530 nh.type = NEXTHOP_TYPE_BLACKHOLE;
531 nh.bh_type = bh_type;
532 }
533 } else {
534 nh.type = NEXTHOP_TYPE_BLACKHOLE;
535 nh.bh_type = bh_type;
536 }
537 nh.ifindex = index;
538 if (prefsrc)
539 memcpy(&nh.src, prefsrc, sz);
540 if (gate)
541 memcpy(&nh.gate, gate, sz);
542
543 if (index) {
544 ifp = if_lookup_by_index_per_ns(
545 zebra_ns_lookup(ns_id),
546 index);
547 if (ifp)
548 nh_vrf_id = ifp->vrf_id;
549 }
550 nh.vrf_id = nh_vrf_id;
551
552 if (tb[RTA_ENCAP] && tb[RTA_ENCAP_TYPE]
553 && *(uint16_t *)RTA_DATA(tb[RTA_ENCAP_TYPE])
554 == LWTUNNEL_ENCAP_MPLS) {
555 num_labels =
556 parse_encap_mpls(tb[RTA_ENCAP], labels);
557 }
558
559 if (num_labels)
560 nexthop_add_labels(&nh, ZEBRA_LSP_STATIC,
561 num_labels, labels);
562
563 rib_add(afi, SAFI_UNICAST, vrf_id, proto, 0, flags, &p,
564 &src_p, &nh, table, metric, mtu, distance, tag);
565 } else {
566 /* This is a multipath route */
567
568 struct route_entry *re;
569 struct rtnexthop *rtnh =
570 (struct rtnexthop *)RTA_DATA(tb[RTA_MULTIPATH]);
571
572 len = RTA_PAYLOAD(tb[RTA_MULTIPATH]);
573
574 re = XCALLOC(MTYPE_RE, sizeof(struct route_entry));
575 re->type = proto;
576 re->distance = distance;
577 re->flags = flags;
578 re->metric = metric;
579 re->mtu = mtu;
580 re->vrf_id = vrf_id;
581 re->table = table;
582 re->nexthop_num = 0;
583 re->uptime = time(NULL);
584 re->tag = tag;
585
586 for (;;) {
587 struct nexthop *nh = NULL;
588
589 if (len < (int)sizeof(*rtnh)
590 || rtnh->rtnh_len > len)
591 break;
592
593 index = rtnh->rtnh_ifindex;
594 if (index) {
595 /*
596 * Yes we are looking this up
597 * for every nexthop and just
598 * using the last one looked
599 * up right now
600 */
601 ifp = if_lookup_by_index_per_ns(
602 zebra_ns_lookup(ns_id),
603 index);
604 if (ifp)
605 nh_vrf_id = ifp->vrf_id;
606 else {
607 flog_warn(
608 EC_ZEBRA_UNKNOWN_INTERFACE,
609 "%s: Unknown interface %u specified, defaulting to VRF_DEFAULT",
610 __PRETTY_FUNCTION__,
611 index);
612 nh_vrf_id = VRF_DEFAULT;
613 }
614 } else
615 nh_vrf_id = vrf_id;
616
617 gate = 0;
618 if (rtnh->rtnh_len > sizeof(*rtnh)) {
619 memset(tb, 0, sizeof(tb));
620 netlink_parse_rtattr(
621 tb, RTA_MAX, RTNH_DATA(rtnh),
622 rtnh->rtnh_len - sizeof(*rtnh));
623 if (tb[RTA_GATEWAY])
624 gate = RTA_DATA(
625 tb[RTA_GATEWAY]);
626 if (tb[RTA_ENCAP] && tb[RTA_ENCAP_TYPE]
627 && *(uint16_t *)RTA_DATA(
628 tb[RTA_ENCAP_TYPE])
629 == LWTUNNEL_ENCAP_MPLS) {
630 num_labels = parse_encap_mpls(
631 tb[RTA_ENCAP], labels);
632 }
633 }
634
635 if (gate) {
636 if (rtm->rtm_family == AF_INET) {
637 if (index)
638 nh = route_entry_nexthop_ipv4_ifindex_add(
639 re, gate,
640 prefsrc, index,
641 nh_vrf_id);
642 else
643 nh = route_entry_nexthop_ipv4_add(
644 re, gate,
645 prefsrc,
646 nh_vrf_id);
647 } else if (rtm->rtm_family
648 == AF_INET6) {
649 if (index)
650 nh = route_entry_nexthop_ipv6_ifindex_add(
651 re, gate, index,
652 nh_vrf_id);
653 else
654 nh = route_entry_nexthop_ipv6_add(
655 re, gate,
656 nh_vrf_id);
657 }
658 } else
659 nh = route_entry_nexthop_ifindex_add(
660 re, index, nh_vrf_id);
661
662 if (nh && num_labels)
663 nexthop_add_labels(nh, ZEBRA_LSP_STATIC,
664 num_labels, labels);
665
666 if (rtnh->rtnh_len == 0)
667 break;
668
669 len -= NLMSG_ALIGN(rtnh->rtnh_len);
670 rtnh = RTNH_NEXT(rtnh);
671 }
672
673 zserv_nexthop_num_warn(__func__,
674 (const struct prefix *)&p,
675 re->nexthop_num);
676 if (re->nexthop_num == 0)
677 XFREE(MTYPE_RE, re);
678 else
679 rib_add_multipath(afi, SAFI_UNICAST, &p,
680 &src_p, re);
681 }
682 } else {
683 if (!tb[RTA_MULTIPATH]) {
684 struct nexthop nh;
685 size_t sz = (afi == AFI_IP) ? 4 : 16;
686
687 memset(&nh, 0, sizeof(nh));
688 if (bh_type == BLACKHOLE_UNSPEC) {
689 if (index && !gate)
690 nh.type = NEXTHOP_TYPE_IFINDEX;
691 else if (index && gate)
692 nh.type =
693 (afi == AFI_IP)
694 ? NEXTHOP_TYPE_IPV4_IFINDEX
695 : NEXTHOP_TYPE_IPV6_IFINDEX;
696 else if (!index && gate)
697 nh.type = (afi == AFI_IP)
698 ? NEXTHOP_TYPE_IPV4
699 : NEXTHOP_TYPE_IPV6;
700 else {
701 nh.type = NEXTHOP_TYPE_BLACKHOLE;
702 nh.bh_type = BLACKHOLE_UNSPEC;
703 }
704 } else {
705 nh.type = NEXTHOP_TYPE_BLACKHOLE;
706 nh.bh_type = bh_type;
707 }
708 nh.ifindex = index;
709 if (gate)
710 memcpy(&nh.gate, gate, sz);
711 rib_delete(afi, SAFI_UNICAST, vrf_id, proto, 0, flags,
712 &p, &src_p, &nh, table, metric, distance,
713 true);
714 } else {
715 /* XXX: need to compare the entire list of nexthops
716 * here for NLM_F_APPEND stupidity */
717 rib_delete(afi, SAFI_UNICAST, vrf_id, proto, 0, flags,
718 &p, &src_p, NULL, table, metric, distance,
719 true);
720 }
721 }
722
723 return 0;
724 }
725
726 static struct mcast_route_data *mroute = NULL;
727
728 static int netlink_route_change_read_multicast(struct nlmsghdr *h,
729 ns_id_t ns_id, int startup)
730 {
731 int len;
732 struct rtmsg *rtm;
733 struct rtattr *tb[RTA_MAX + 1];
734 struct mcast_route_data *m;
735 struct mcast_route_data mr;
736 int iif = 0;
737 int count;
738 int oif[256];
739 int oif_count = 0;
740 char sbuf[40];
741 char gbuf[40];
742 char oif_list[256] = "\0";
743 vrf_id_t vrf;
744 int table;
745
746 if (mroute)
747 m = mroute;
748 else {
749 memset(&mr, 0, sizeof(mr));
750 m = &mr;
751 }
752
753 rtm = NLMSG_DATA(h);
754
755 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct rtmsg));
756
757 memset(tb, 0, sizeof tb);
758 netlink_parse_rtattr(tb, RTA_MAX, RTM_RTA(rtm), len);
759
760 if (tb[RTA_TABLE])
761 table = *(int *)RTA_DATA(tb[RTA_TABLE]);
762 else
763 table = rtm->rtm_table;
764
765 vrf = vrf_lookup_by_table(table, ns_id);
766
767 if (tb[RTA_IIF])
768 iif = *(int *)RTA_DATA(tb[RTA_IIF]);
769
770 if (tb[RTA_SRC])
771 m->sg.src = *(struct in_addr *)RTA_DATA(tb[RTA_SRC]);
772
773 if (tb[RTA_DST])
774 m->sg.grp = *(struct in_addr *)RTA_DATA(tb[RTA_DST]);
775
776 if ((RTA_EXPIRES <= RTA_MAX) && tb[RTA_EXPIRES])
777 m->lastused = *(unsigned long long *)RTA_DATA(tb[RTA_EXPIRES]);
778
779 if (tb[RTA_MULTIPATH]) {
780 struct rtnexthop *rtnh =
781 (struct rtnexthop *)RTA_DATA(tb[RTA_MULTIPATH]);
782
783 len = RTA_PAYLOAD(tb[RTA_MULTIPATH]);
784 for (;;) {
785 if (len < (int)sizeof(*rtnh) || rtnh->rtnh_len > len)
786 break;
787
788 oif[oif_count] = rtnh->rtnh_ifindex;
789 oif_count++;
790
791 if (rtnh->rtnh_len == 0)
792 break;
793
794 len -= NLMSG_ALIGN(rtnh->rtnh_len);
795 rtnh = RTNH_NEXT(rtnh);
796 }
797 }
798
799 if (IS_ZEBRA_DEBUG_KERNEL) {
800 struct interface *ifp;
801 strlcpy(sbuf, inet_ntoa(m->sg.src), sizeof(sbuf));
802 strlcpy(gbuf, inet_ntoa(m->sg.grp), sizeof(gbuf));
803 for (count = 0; count < oif_count; count++) {
804 ifp = if_lookup_by_index(oif[count], vrf);
805 char temp[256];
806
807 sprintf(temp, "%s(%d) ", ifp ? ifp->name : "Unknown",
808 oif[count]);
809 strcat(oif_list, temp);
810 }
811 struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(vrf);
812 ifp = if_lookup_by_index(iif, vrf);
813 zlog_debug("MCAST VRF: %s(%d) %s (%s,%s) IIF: %s(%d) OIF: %s jiffies: %lld",
814 zvrf->vrf->name, vrf,
815 nl_msg_type_to_str(h->nlmsg_type),
816 sbuf, gbuf, ifp ? ifp->name : "Unknown", iif,
817 oif_list, m->lastused);
818 }
819 return 0;
820 }
821
822 int netlink_route_change(struct nlmsghdr *h, ns_id_t ns_id, int startup)
823 {
824 int len;
825 struct rtmsg *rtm;
826
827 rtm = NLMSG_DATA(h);
828
829 if (!(h->nlmsg_type == RTM_NEWROUTE || h->nlmsg_type == RTM_DELROUTE)) {
830 /* If this is not route add/delete message print warning. */
831 zlog_debug("Kernel message: %s NS %u\n",
832 nl_msg_type_to_str(h->nlmsg_type), ns_id);
833 return 0;
834 }
835
836 if (!(rtm->rtm_family == AF_INET ||
837 rtm->rtm_family == AF_INET6 ||
838 rtm->rtm_family == RTNL_FAMILY_IPMR )) {
839 flog_warn(
840 EC_ZEBRA_UNKNOWN_FAMILY,
841 "Invalid address family: %u received from kernel route change: %s",
842 rtm->rtm_family, nl_msg_type_to_str(h->nlmsg_type));
843 return 0;
844 }
845
846 /* Connected route. */
847 if (IS_ZEBRA_DEBUG_KERNEL)
848 zlog_debug("%s %s %s proto %s NS %u",
849 nl_msg_type_to_str(h->nlmsg_type),
850 nl_family_to_str(rtm->rtm_family),
851 nl_rttype_to_str(rtm->rtm_type),
852 nl_rtproto_to_str(rtm->rtm_protocol), ns_id);
853
854
855 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct rtmsg));
856 if (len < 0) {
857 zlog_err("%s: Message received from netlink is of a broken size: %d %zu",
858 __PRETTY_FUNCTION__,
859 h->nlmsg_len,
860 (size_t)NLMSG_LENGTH(sizeof(struct rtmsg)));
861 return -1;
862 }
863
864 if (rtm->rtm_type == RTN_MULTICAST)
865 netlink_route_change_read_multicast(h, ns_id, startup);
866 else
867 netlink_route_change_read_unicast(h, ns_id, startup);
868 return 0;
869 }
870
871 /* Request for specific route information from the kernel */
872 static int netlink_request_route(struct zebra_ns *zns, int family, int type)
873 {
874 struct {
875 struct nlmsghdr n;
876 struct rtmsg rtm;
877 } req;
878
879 /* Form the request, specifying filter (rtattr) if needed. */
880 memset(&req, 0, sizeof(req));
881 req.n.nlmsg_type = type;
882 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
883 req.rtm.rtm_family = family;
884
885 return netlink_request(&zns->netlink_cmd, &req.n);
886 }
887
888 /* Routing table read function using netlink interface. Only called
889 bootstrap time. */
890 int netlink_route_read(struct zebra_ns *zns)
891 {
892 int ret;
893 struct zebra_dplane_info dp_info;
894
895 zebra_dplane_info_from_zns(&dp_info, zns, true /*is_cmd*/);
896
897 /* Get IPv4 routing table. */
898 ret = netlink_request_route(zns, AF_INET, RTM_GETROUTE);
899 if (ret < 0)
900 return ret;
901 ret = netlink_parse_info(netlink_route_change_read_unicast,
902 &zns->netlink_cmd, &dp_info, 0, 1);
903 if (ret < 0)
904 return ret;
905
906 /* Get IPv6 routing table. */
907 ret = netlink_request_route(zns, AF_INET6, RTM_GETROUTE);
908 if (ret < 0)
909 return ret;
910 ret = netlink_parse_info(netlink_route_change_read_unicast,
911 &zns->netlink_cmd, &dp_info, 0, 1);
912 if (ret < 0)
913 return ret;
914
915 return 0;
916 }
917
918 static void _netlink_route_nl_add_gateway_info(uint8_t route_family,
919 uint8_t gw_family,
920 struct nlmsghdr *nlmsg,
921 size_t req_size, int bytelen,
922 struct nexthop *nexthop)
923 {
924 if (route_family == AF_MPLS) {
925 struct gw_family_t gw_fam;
926
927 gw_fam.family = gw_family;
928 if (gw_family == AF_INET)
929 memcpy(&gw_fam.gate.ipv4, &nexthop->gate.ipv4, bytelen);
930 else
931 memcpy(&gw_fam.gate.ipv6, &nexthop->gate.ipv6, bytelen);
932 addattr_l(nlmsg, req_size, RTA_VIA, &gw_fam.family,
933 bytelen + 2);
934 } else {
935 if (gw_family == AF_INET)
936 addattr_l(nlmsg, req_size, RTA_GATEWAY,
937 &nexthop->gate.ipv4, bytelen);
938 else
939 addattr_l(nlmsg, req_size, RTA_GATEWAY,
940 &nexthop->gate.ipv6, bytelen);
941 }
942 }
943
944 static void _netlink_route_rta_add_gateway_info(uint8_t route_family,
945 uint8_t gw_family,
946 struct rtattr *rta,
947 struct rtnexthop *rtnh,
948 size_t req_size, int bytelen,
949 struct nexthop *nexthop)
950 {
951 if (route_family == AF_MPLS) {
952 struct gw_family_t gw_fam;
953
954 gw_fam.family = gw_family;
955 if (gw_family == AF_INET)
956 memcpy(&gw_fam.gate.ipv4, &nexthop->gate.ipv4, bytelen);
957 else
958 memcpy(&gw_fam.gate.ipv6, &nexthop->gate.ipv6, bytelen);
959 rta_addattr_l(rta, req_size, RTA_VIA, &gw_fam.family,
960 bytelen + 2);
961 rtnh->rtnh_len += RTA_LENGTH(bytelen + 2);
962 } else {
963 if (gw_family == AF_INET)
964 rta_addattr_l(rta, req_size, RTA_GATEWAY,
965 &nexthop->gate.ipv4, bytelen);
966 else
967 rta_addattr_l(rta, req_size, RTA_GATEWAY,
968 &nexthop->gate.ipv6, bytelen);
969 rtnh->rtnh_len += sizeof(struct rtattr) + bytelen;
970 }
971 }
972
973 /* This function takes a nexthop as argument and adds
974 * the appropriate netlink attributes to an existing
975 * netlink message.
976 *
977 * @param routedesc: Human readable description of route type
978 * (direct/recursive, single-/multipath)
979 * @param bytelen: Length of addresses in bytes.
980 * @param nexthop: Nexthop information
981 * @param nlmsg: nlmsghdr structure to fill in.
982 * @param req_size: The size allocated for the message.
983 */
984 static void _netlink_route_build_singlepath(const char *routedesc, int bytelen,
985 struct nexthop *nexthop,
986 struct nlmsghdr *nlmsg,
987 struct rtmsg *rtmsg,
988 size_t req_size, int cmd)
989 {
990 struct mpls_label_stack *nh_label;
991 mpls_lse_t out_lse[MPLS_MAX_LABELS];
992 int num_labels = 0;
993 char label_buf[256];
994
995 /*
996 * label_buf is *only* currently used within debugging.
997 * As such when we assign it we are guarding it inside
998 * a debug test. If you want to change this make sure
999 * you fix this assumption
1000 */
1001 label_buf[0] = '\0';
1002
1003 assert(nexthop);
1004 for (struct nexthop *nh = nexthop; nh; nh = nh->rparent) {
1005 char label_buf1[20];
1006
1007 nh_label = nh->nh_label;
1008 if (!nh_label || !nh_label->num_labels)
1009 continue;
1010
1011 for (int i = 0; i < nh_label->num_labels; i++) {
1012 if (nh_label->label[i] == MPLS_LABEL_IMPLICIT_NULL)
1013 continue;
1014
1015 if (IS_ZEBRA_DEBUG_KERNEL) {
1016 if (!num_labels)
1017 sprintf(label_buf, "label %u",
1018 nh_label->label[i]);
1019 else {
1020 sprintf(label_buf1, "/%u",
1021 nh_label->label[i]);
1022 strlcat(label_buf, label_buf1,
1023 sizeof(label_buf));
1024 }
1025 }
1026
1027 out_lse[num_labels] =
1028 mpls_lse_encode(nh_label->label[i], 0, 0, 0);
1029 num_labels++;
1030 }
1031 }
1032
1033 if (num_labels) {
1034 /* Set the BoS bit */
1035 out_lse[num_labels - 1] |= htonl(1 << MPLS_LS_S_SHIFT);
1036
1037 if (rtmsg->rtm_family == AF_MPLS)
1038 addattr_l(nlmsg, req_size, RTA_NEWDST, &out_lse,
1039 num_labels * sizeof(mpls_lse_t));
1040 else {
1041 struct rtattr *nest;
1042 uint16_t encap = LWTUNNEL_ENCAP_MPLS;
1043
1044 addattr_l(nlmsg, req_size, RTA_ENCAP_TYPE, &encap,
1045 sizeof(uint16_t));
1046 nest = addattr_nest(nlmsg, req_size, RTA_ENCAP);
1047 addattr_l(nlmsg, req_size, MPLS_IPTUNNEL_DST, &out_lse,
1048 num_labels * sizeof(mpls_lse_t));
1049 addattr_nest_end(nlmsg, nest);
1050 }
1051 }
1052
1053 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ONLINK))
1054 rtmsg->rtm_flags |= RTNH_F_ONLINK;
1055
1056 if (rtmsg->rtm_family == AF_INET
1057 && (nexthop->type == NEXTHOP_TYPE_IPV6
1058 || nexthop->type == NEXTHOP_TYPE_IPV6_IFINDEX)) {
1059 rtmsg->rtm_flags |= RTNH_F_ONLINK;
1060 addattr_l(nlmsg, req_size, RTA_GATEWAY, &ipv4_ll, 4);
1061 addattr32(nlmsg, req_size, RTA_OIF, nexthop->ifindex);
1062
1063 if (nexthop->rmap_src.ipv4.s_addr && (cmd == RTM_NEWROUTE))
1064 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1065 &nexthop->rmap_src.ipv4, bytelen);
1066 else if (nexthop->src.ipv4.s_addr && (cmd == RTM_NEWROUTE))
1067 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1068 &nexthop->src.ipv4, bytelen);
1069
1070 if (IS_ZEBRA_DEBUG_KERNEL)
1071 zlog_debug(
1072 " 5549: _netlink_route_build_singlepath() (%s): "
1073 "nexthop via %s %s if %u(%u)",
1074 routedesc, ipv4_ll_buf, label_buf,
1075 nexthop->ifindex, nexthop->vrf_id);
1076 return;
1077 }
1078
1079 if (nexthop->type == NEXTHOP_TYPE_IPV4
1080 || nexthop->type == NEXTHOP_TYPE_IPV4_IFINDEX) {
1081 /* Send deletes to the kernel without specifying the next-hop */
1082 if (cmd != RTM_DELROUTE)
1083 _netlink_route_nl_add_gateway_info(
1084 rtmsg->rtm_family, AF_INET, nlmsg, req_size,
1085 bytelen, nexthop);
1086
1087 if (cmd == RTM_NEWROUTE) {
1088 if (nexthop->rmap_src.ipv4.s_addr)
1089 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1090 &nexthop->rmap_src.ipv4, bytelen);
1091 else if (nexthop->src.ipv4.s_addr)
1092 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1093 &nexthop->src.ipv4, bytelen);
1094 }
1095
1096 if (IS_ZEBRA_DEBUG_KERNEL)
1097 zlog_debug(
1098 "netlink_route_multipath() (%s): "
1099 "nexthop via %s %s if %u(%u)",
1100 routedesc, inet_ntoa(nexthop->gate.ipv4),
1101 label_buf, nexthop->ifindex, nexthop->vrf_id);
1102 }
1103
1104 if (nexthop->type == NEXTHOP_TYPE_IPV6
1105 || nexthop->type == NEXTHOP_TYPE_IPV6_IFINDEX) {
1106 _netlink_route_nl_add_gateway_info(rtmsg->rtm_family, AF_INET6,
1107 nlmsg, req_size, bytelen,
1108 nexthop);
1109
1110 if (cmd == RTM_NEWROUTE) {
1111 if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->rmap_src.ipv6))
1112 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1113 &nexthop->rmap_src.ipv6, bytelen);
1114 else if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->src.ipv6))
1115 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1116 &nexthop->src.ipv6, bytelen);
1117 }
1118
1119 if (IS_ZEBRA_DEBUG_KERNEL)
1120 zlog_debug(
1121 "netlink_route_multipath() (%s): "
1122 "nexthop via %s %s if %u(%u)",
1123 routedesc, inet6_ntoa(nexthop->gate.ipv6),
1124 label_buf, nexthop->ifindex, nexthop->vrf_id);
1125 }
1126
1127 /*
1128 * We have the ifindex so we should always send it
1129 * This is especially useful if we are doing route
1130 * leaking.
1131 */
1132 if (nexthop->type != NEXTHOP_TYPE_BLACKHOLE)
1133 addattr32(nlmsg, req_size, RTA_OIF, nexthop->ifindex);
1134
1135 if (nexthop->type == NEXTHOP_TYPE_IFINDEX
1136 || nexthop->type == NEXTHOP_TYPE_IPV4_IFINDEX) {
1137 if (cmd == RTM_NEWROUTE) {
1138 if (nexthop->rmap_src.ipv4.s_addr)
1139 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1140 &nexthop->rmap_src.ipv4, bytelen);
1141 else if (nexthop->src.ipv4.s_addr)
1142 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1143 &nexthop->src.ipv4, bytelen);
1144 }
1145
1146 if (IS_ZEBRA_DEBUG_KERNEL)
1147 zlog_debug(
1148 "netlink_route_multipath() (%s): "
1149 "nexthop via if %u(%u)",
1150 routedesc, nexthop->ifindex, nexthop->vrf_id);
1151 }
1152
1153 if (nexthop->type == NEXTHOP_TYPE_IPV6_IFINDEX) {
1154 if (cmd == RTM_NEWROUTE) {
1155 if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->rmap_src.ipv6))
1156 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1157 &nexthop->rmap_src.ipv6, bytelen);
1158 else if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->src.ipv6))
1159 addattr_l(nlmsg, req_size, RTA_PREFSRC,
1160 &nexthop->src.ipv6, bytelen);
1161 }
1162
1163 if (IS_ZEBRA_DEBUG_KERNEL)
1164 zlog_debug(
1165 "netlink_route_multipath() (%s): "
1166 "nexthop via if %u(%u)",
1167 routedesc, nexthop->ifindex, nexthop->vrf_id);
1168 }
1169 }
1170
1171 /* This function takes a nexthop as argument and
1172 * appends to the given rtattr/rtnexthop pair the
1173 * representation of the nexthop. If the nexthop
1174 * defines a preferred source, the src parameter
1175 * will be modified to point to that src, otherwise
1176 * it will be kept unmodified.
1177 *
1178 * @param routedesc: Human readable description of route type
1179 * (direct/recursive, single-/multipath)
1180 * @param bytelen: Length of addresses in bytes.
1181 * @param nexthop: Nexthop information
1182 * @param rta: rtnetlink attribute structure
1183 * @param rtnh: pointer to an rtnetlink nexthop structure
1184 * @param src: pointer pointing to a location where
1185 * the prefsrc should be stored.
1186 */
1187 static void _netlink_route_build_multipath(const char *routedesc, int bytelen,
1188 struct nexthop *nexthop,
1189 struct rtattr *rta,
1190 struct rtnexthop *rtnh,
1191 struct rtmsg *rtmsg,
1192 union g_addr **src)
1193 {
1194 struct mpls_label_stack *nh_label;
1195 mpls_lse_t out_lse[MPLS_MAX_LABELS];
1196 int num_labels = 0;
1197 char label_buf[256];
1198
1199 rtnh->rtnh_len = sizeof(*rtnh);
1200 rtnh->rtnh_flags = 0;
1201 rtnh->rtnh_hops = 0;
1202 rta->rta_len += rtnh->rtnh_len;
1203
1204 /*
1205 * label_buf is *only* currently used within debugging.
1206 * As such when we assign it we are guarding it inside
1207 * a debug test. If you want to change this make sure
1208 * you fix this assumption
1209 */
1210 label_buf[0] = '\0';
1211
1212 assert(nexthop);
1213 for (struct nexthop *nh = nexthop; nh; nh = nh->rparent) {
1214 char label_buf1[20];
1215
1216 nh_label = nh->nh_label;
1217 if (!nh_label || !nh_label->num_labels)
1218 continue;
1219
1220 for (int i = 0; i < nh_label->num_labels; i++) {
1221 if (nh_label->label[i] == MPLS_LABEL_IMPLICIT_NULL)
1222 continue;
1223
1224 if (IS_ZEBRA_DEBUG_KERNEL) {
1225 if (!num_labels)
1226 sprintf(label_buf, "label %u",
1227 nh_label->label[i]);
1228 else {
1229 sprintf(label_buf1, "/%u",
1230 nh_label->label[i]);
1231 strlcat(label_buf, label_buf1,
1232 sizeof(label_buf));
1233 }
1234 }
1235
1236 out_lse[num_labels] =
1237 mpls_lse_encode(nh_label->label[i], 0, 0, 0);
1238 num_labels++;
1239 }
1240 }
1241
1242 if (num_labels) {
1243 /* Set the BoS bit */
1244 out_lse[num_labels - 1] |= htonl(1 << MPLS_LS_S_SHIFT);
1245
1246 if (rtmsg->rtm_family == AF_MPLS) {
1247 rta_addattr_l(rta, NL_PKT_BUF_SIZE, RTA_NEWDST,
1248 &out_lse,
1249 num_labels * sizeof(mpls_lse_t));
1250 rtnh->rtnh_len +=
1251 RTA_LENGTH(num_labels * sizeof(mpls_lse_t));
1252 } else {
1253 struct rtattr *nest;
1254 uint16_t encap = LWTUNNEL_ENCAP_MPLS;
1255 int len = rta->rta_len;
1256
1257 rta_addattr_l(rta, NL_PKT_BUF_SIZE, RTA_ENCAP_TYPE,
1258 &encap, sizeof(uint16_t));
1259 nest = rta_nest(rta, NL_PKT_BUF_SIZE, RTA_ENCAP);
1260 rta_addattr_l(rta, NL_PKT_BUF_SIZE, MPLS_IPTUNNEL_DST,
1261 &out_lse,
1262 num_labels * sizeof(mpls_lse_t));
1263 rta_nest_end(rta, nest);
1264 rtnh->rtnh_len += rta->rta_len - len;
1265 }
1266 }
1267
1268 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ONLINK))
1269 rtnh->rtnh_flags |= RTNH_F_ONLINK;
1270
1271 if (rtmsg->rtm_family == AF_INET
1272 && (nexthop->type == NEXTHOP_TYPE_IPV6
1273 || nexthop->type == NEXTHOP_TYPE_IPV6_IFINDEX)) {
1274 bytelen = 4;
1275 rtnh->rtnh_flags |= RTNH_F_ONLINK;
1276 rta_addattr_l(rta, NL_PKT_BUF_SIZE, RTA_GATEWAY, &ipv4_ll,
1277 bytelen);
1278 rtnh->rtnh_len += sizeof(struct rtattr) + bytelen;
1279 rtnh->rtnh_ifindex = nexthop->ifindex;
1280
1281 if (nexthop->rmap_src.ipv4.s_addr)
1282 *src = &nexthop->rmap_src;
1283 else if (nexthop->src.ipv4.s_addr)
1284 *src = &nexthop->src;
1285
1286 if (IS_ZEBRA_DEBUG_KERNEL)
1287 zlog_debug(
1288 " 5549: netlink_route_build_multipath() (%s): "
1289 "nexthop via %s %s if %u",
1290 routedesc, ipv4_ll_buf, label_buf,
1291 nexthop->ifindex);
1292 return;
1293 }
1294
1295 if (nexthop->type == NEXTHOP_TYPE_IPV4
1296 || nexthop->type == NEXTHOP_TYPE_IPV4_IFINDEX) {
1297 _netlink_route_rta_add_gateway_info(rtmsg->rtm_family, AF_INET,
1298 rta, rtnh, NL_PKT_BUF_SIZE,
1299 bytelen, nexthop);
1300 if (nexthop->rmap_src.ipv4.s_addr)
1301 *src = &nexthop->rmap_src;
1302 else if (nexthop->src.ipv4.s_addr)
1303 *src = &nexthop->src;
1304
1305 if (IS_ZEBRA_DEBUG_KERNEL)
1306 zlog_debug(
1307 "netlink_route_multipath() (%s): "
1308 "nexthop via %s %s if %u",
1309 routedesc, inet_ntoa(nexthop->gate.ipv4),
1310 label_buf, nexthop->ifindex);
1311 }
1312 if (nexthop->type == NEXTHOP_TYPE_IPV6
1313 || nexthop->type == NEXTHOP_TYPE_IPV6_IFINDEX) {
1314 _netlink_route_rta_add_gateway_info(rtmsg->rtm_family, AF_INET6,
1315 rta, rtnh, NL_PKT_BUF_SIZE,
1316 bytelen, nexthop);
1317
1318 if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->rmap_src.ipv6))
1319 *src = &nexthop->rmap_src;
1320 else if (!IN6_IS_ADDR_UNSPECIFIED(&nexthop->src.ipv6))
1321 *src = &nexthop->src;
1322
1323 if (IS_ZEBRA_DEBUG_KERNEL)
1324 zlog_debug(
1325 "netlink_route_multipath() (%s): "
1326 "nexthop via %s %s if %u",
1327 routedesc, inet6_ntoa(nexthop->gate.ipv6),
1328 label_buf, nexthop->ifindex);
1329 }
1330
1331 /*
1332 * We have figured out the ifindex so we should always send it
1333 * This is especially useful if we are doing route
1334 * leaking.
1335 */
1336 if (nexthop->type != NEXTHOP_TYPE_BLACKHOLE)
1337 rtnh->rtnh_ifindex = nexthop->ifindex;
1338
1339 /* ifindex */
1340 if (nexthop->type == NEXTHOP_TYPE_IPV4_IFINDEX
1341 || nexthop->type == NEXTHOP_TYPE_IFINDEX) {
1342 if (nexthop->rmap_src.ipv4.s_addr)
1343 *src = &nexthop->rmap_src;
1344 else if (nexthop->src.ipv4.s_addr)
1345 *src = &nexthop->src;
1346
1347 if (IS_ZEBRA_DEBUG_KERNEL)
1348 zlog_debug(
1349 "netlink_route_multipath() (%s): "
1350 "nexthop via if %u",
1351 routedesc, nexthop->ifindex);
1352 }
1353 }
1354
1355 static inline void _netlink_mpls_build_singlepath(const char *routedesc,
1356 zebra_nhlfe_t *nhlfe,
1357 struct nlmsghdr *nlmsg,
1358 struct rtmsg *rtmsg,
1359 size_t req_size, int cmd)
1360 {
1361 int bytelen;
1362 uint8_t family;
1363
1364 family = NHLFE_FAMILY(nhlfe);
1365 bytelen = (family == AF_INET ? 4 : 16);
1366 _netlink_route_build_singlepath(routedesc, bytelen, nhlfe->nexthop,
1367 nlmsg, rtmsg, req_size, cmd);
1368 }
1369
1370
1371 static inline void
1372 _netlink_mpls_build_multipath(const char *routedesc, zebra_nhlfe_t *nhlfe,
1373 struct rtattr *rta, struct rtnexthop *rtnh,
1374 struct rtmsg *rtmsg, union g_addr **src)
1375 {
1376 int bytelen;
1377 uint8_t family;
1378
1379 family = NHLFE_FAMILY(nhlfe);
1380 bytelen = (family == AF_INET ? 4 : 16);
1381 _netlink_route_build_multipath(routedesc, bytelen, nhlfe->nexthop, rta,
1382 rtnh, rtmsg, src);
1383 }
1384
1385
1386 /* Log debug information for netlink_route_multipath
1387 * if debug logging is enabled.
1388 *
1389 * @param cmd: Netlink command which is to be processed
1390 * @param p: Prefix for which the change is due
1391 * @param family: Address family which the change concerns
1392 * @param zvrf: The vrf we are in
1393 * @param tableid: The table we are working on
1394 */
1395 static void _netlink_route_debug(int cmd, const struct prefix *p,
1396 int family, vrf_id_t vrfid,
1397 uint32_t tableid)
1398 {
1399 if (IS_ZEBRA_DEBUG_KERNEL) {
1400 char buf[PREFIX_STRLEN];
1401 zlog_debug(
1402 "netlink_route_multipath(): %s %s vrf %u(%u)",
1403 nl_msg_type_to_str(cmd),
1404 prefix2str(p, buf, sizeof(buf)),
1405 vrfid, tableid);
1406 }
1407 }
1408
1409 static void _netlink_mpls_debug(int cmd, uint32_t label, const char *routedesc)
1410 {
1411 if (IS_ZEBRA_DEBUG_KERNEL)
1412 zlog_debug("netlink_mpls_multipath() (%s): %s %u/20", routedesc,
1413 nl_msg_type_to_str(cmd), label);
1414 }
1415
1416 static int netlink_neigh_update(int cmd, int ifindex, uint32_t addr, char *lla,
1417 int llalen, ns_id_t ns_id)
1418 {
1419 struct {
1420 struct nlmsghdr n;
1421 struct ndmsg ndm;
1422 char buf[256];
1423 } req;
1424
1425 struct zebra_ns *zns = zebra_ns_lookup(ns_id);
1426
1427 memset(&req, 0, sizeof(req));
1428
1429 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
1430 req.n.nlmsg_flags = NLM_F_CREATE | NLM_F_REQUEST;
1431 req.n.nlmsg_type = cmd; // RTM_NEWNEIGH or RTM_DELNEIGH
1432 req.n.nlmsg_pid = zns->netlink_cmd.snl.nl_pid;
1433
1434 req.ndm.ndm_family = AF_INET;
1435 req.ndm.ndm_state = NUD_PERMANENT;
1436 req.ndm.ndm_ifindex = ifindex;
1437 req.ndm.ndm_type = RTN_UNICAST;
1438
1439 addattr_l(&req.n, sizeof(req), NDA_DST, &addr, 4);
1440 addattr_l(&req.n, sizeof(req), NDA_LLADDR, lla, llalen);
1441
1442 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
1443 0);
1444 }
1445
1446 /* Routing table change via netlink interface. */
1447 /* Update flag indicates whether this is a "replace" or not. */
1448 static int netlink_route_multipath(int cmd, const struct prefix *p,
1449 const struct prefix *src_p,
1450 struct route_entry *re,
1451 int update)
1452 {
1453 int bytelen;
1454 struct sockaddr_nl snl;
1455 struct nexthop *nexthop = NULL;
1456 unsigned int nexthop_num;
1457 int family = PREFIX_FAMILY(p);
1458 const char *routedesc;
1459 int setsrc = 0;
1460 union g_addr src;
1461
1462 struct {
1463 struct nlmsghdr n;
1464 struct rtmsg r;
1465 char buf[NL_PKT_BUF_SIZE];
1466 } req;
1467
1468 struct zebra_ns *zns;
1469 struct zebra_vrf *zvrf = vrf_info_lookup(re->vrf_id);
1470
1471 zns = zvrf->zns;
1472 memset(&req, 0, sizeof req - NL_PKT_BUF_SIZE);
1473
1474 bytelen = (family == AF_INET ? 4 : 16);
1475
1476 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
1477 req.n.nlmsg_flags = NLM_F_CREATE | NLM_F_REQUEST;
1478 if ((cmd == RTM_NEWROUTE) && update)
1479 req.n.nlmsg_flags |= NLM_F_REPLACE;
1480 req.n.nlmsg_type = cmd;
1481 req.n.nlmsg_pid = zns->netlink_cmd.snl.nl_pid;
1482
1483 req.r.rtm_family = family;
1484 req.r.rtm_dst_len = p->prefixlen;
1485 req.r.rtm_src_len = src_p ? src_p->prefixlen : 0;
1486 req.r.rtm_protocol = zebra2proto(re->type);
1487 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
1488
1489 /*
1490 * blackhole routes are not RTN_UNICAST, they are
1491 * RTN_ BLACKHOLE|UNREACHABLE|PROHIBIT
1492 * so setting this value as a RTN_UNICAST would
1493 * cause the route lookup of just the prefix
1494 * to fail. So no need to specify this for
1495 * the RTM_DELROUTE case
1496 */
1497 if (cmd != RTM_DELROUTE)
1498 req.r.rtm_type = RTN_UNICAST;
1499
1500 addattr_l(&req.n, sizeof req, RTA_DST, &p->u.prefix, bytelen);
1501 if (src_p)
1502 addattr_l(&req.n, sizeof req, RTA_SRC, &src_p->u.prefix,
1503 bytelen);
1504
1505 /* Metric. */
1506 /* Hardcode the metric for all routes coming from zebra. Metric isn't
1507 * used
1508 * either by the kernel or by zebra. Its purely for calculating best
1509 * path(s)
1510 * by the routing protocol and for communicating with protocol peers.
1511 */
1512 addattr32(&req.n, sizeof req, RTA_PRIORITY, NL_DEFAULT_ROUTE_METRIC);
1513 #if defined(SUPPORT_REALMS)
1514 if (re->tag > 0 && re->tag <= 255)
1515 addattr32(&req.n, sizeof req, RTA_FLOW, re->tag);
1516 #endif
1517 /* Table corresponding to this route. */
1518 if (re->table < 256)
1519 req.r.rtm_table = re->table;
1520 else {
1521 req.r.rtm_table = RT_TABLE_UNSPEC;
1522 addattr32(&req.n, sizeof req, RTA_TABLE, re->table);
1523 }
1524
1525 _netlink_route_debug(cmd, p, family, zvrf_id(zvrf), re->table);
1526
1527 /*
1528 * If we are not updating the route and we have received
1529 * a route delete, then all we need to fill in is the
1530 * prefix information to tell the kernel to schwack
1531 * it.
1532 */
1533 if (!update && cmd == RTM_DELROUTE)
1534 goto skip;
1535
1536 if (re->mtu || re->nexthop_mtu) {
1537 char buf[NL_PKT_BUF_SIZE];
1538 struct rtattr *rta = (void *)buf;
1539 uint32_t mtu = re->mtu;
1540 if (!mtu || (re->nexthop_mtu && re->nexthop_mtu < mtu))
1541 mtu = re->nexthop_mtu;
1542 rta->rta_type = RTA_METRICS;
1543 rta->rta_len = RTA_LENGTH(0);
1544 rta_addattr_l(rta, NL_PKT_BUF_SIZE, RTAX_MTU, &mtu, sizeof mtu);
1545 addattr_l(&req.n, NL_PKT_BUF_SIZE, RTA_METRICS, RTA_DATA(rta),
1546 RTA_PAYLOAD(rta));
1547 }
1548
1549 /* Count overall nexthops so we can decide whether to use singlepath
1550 * or multipath case. */
1551 nexthop_num = 0;
1552 for (ALL_NEXTHOPS(re->ng, nexthop)) {
1553 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_RECURSIVE))
1554 continue;
1555 if (cmd == RTM_NEWROUTE && !NEXTHOP_IS_ACTIVE(nexthop->flags))
1556 continue;
1557 if (cmd == RTM_DELROUTE
1558 && !CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_FIB))
1559 continue;
1560
1561 nexthop_num++;
1562 }
1563
1564 /* Singlepath case. */
1565 if (nexthop_num == 1 || multipath_num == 1) {
1566 nexthop_num = 0;
1567 for (ALL_NEXTHOPS(re->ng, nexthop)) {
1568 /*
1569 * So we want to cover 2 types of blackhole
1570 * routes here:
1571 * 1) A normal blackhole route( ala from a static
1572 * install.
1573 * 2) A recursively resolved blackhole route
1574 */
1575 if (nexthop->type == NEXTHOP_TYPE_BLACKHOLE) {
1576 switch (nexthop->bh_type) {
1577 case BLACKHOLE_ADMINPROHIB:
1578 req.r.rtm_type = RTN_PROHIBIT;
1579 break;
1580 case BLACKHOLE_REJECT:
1581 req.r.rtm_type = RTN_UNREACHABLE;
1582 break;
1583 default:
1584 req.r.rtm_type = RTN_BLACKHOLE;
1585 break;
1586 }
1587 goto skip;
1588 }
1589 if (CHECK_FLAG(nexthop->flags,
1590 NEXTHOP_FLAG_RECURSIVE)) {
1591 if (!setsrc) {
1592 if (family == AF_INET) {
1593 if (nexthop->rmap_src.ipv4
1594 .s_addr
1595 != 0) {
1596 src.ipv4 =
1597 nexthop->rmap_src
1598 .ipv4;
1599 setsrc = 1;
1600 } else if (nexthop->src.ipv4
1601 .s_addr
1602 != 0) {
1603 src.ipv4 =
1604 nexthop->src
1605 .ipv4;
1606 setsrc = 1;
1607 }
1608 } else if (family == AF_INET6) {
1609 if (!IN6_IS_ADDR_UNSPECIFIED(
1610 &nexthop->rmap_src
1611 .ipv6)) {
1612 src.ipv6 =
1613 nexthop->rmap_src
1614 .ipv6;
1615 setsrc = 1;
1616 } else if (
1617 !IN6_IS_ADDR_UNSPECIFIED(
1618 &nexthop->src
1619 .ipv6)) {
1620 src.ipv6 =
1621 nexthop->src
1622 .ipv6;
1623 setsrc = 1;
1624 }
1625 }
1626 }
1627 continue;
1628 }
1629
1630 if ((cmd == RTM_NEWROUTE
1631 && NEXTHOP_IS_ACTIVE(nexthop->flags))
1632 || (cmd == RTM_DELROUTE
1633 && CHECK_FLAG(nexthop->flags,
1634 NEXTHOP_FLAG_FIB))) {
1635 routedesc = nexthop->rparent
1636 ? "recursive, single-path"
1637 : "single-path";
1638
1639 _netlink_route_build_singlepath(
1640 routedesc, bytelen, nexthop, &req.n,
1641 &req.r, sizeof req, cmd);
1642 nexthop_num++;
1643 break;
1644 }
1645 }
1646 if (setsrc && (cmd == RTM_NEWROUTE)) {
1647 if (family == AF_INET)
1648 addattr_l(&req.n, sizeof req, RTA_PREFSRC,
1649 &src.ipv4, bytelen);
1650 else if (family == AF_INET6)
1651 addattr_l(&req.n, sizeof req, RTA_PREFSRC,
1652 &src.ipv6, bytelen);
1653 }
1654 } else { /* Multipath case */
1655 char buf[NL_PKT_BUF_SIZE];
1656 struct rtattr *rta = (void *)buf;
1657 struct rtnexthop *rtnh;
1658 union g_addr *src1 = NULL;
1659
1660 rta->rta_type = RTA_MULTIPATH;
1661 rta->rta_len = RTA_LENGTH(0);
1662 rtnh = RTA_DATA(rta);
1663
1664 nexthop_num = 0;
1665 for (ALL_NEXTHOPS(re->ng, nexthop)) {
1666 if (nexthop_num >= multipath_num)
1667 break;
1668
1669 if (CHECK_FLAG(nexthop->flags,
1670 NEXTHOP_FLAG_RECURSIVE)) {
1671 /* This only works for IPv4 now */
1672 if (!setsrc) {
1673 if (family == AF_INET) {
1674 if (nexthop->rmap_src.ipv4
1675 .s_addr
1676 != 0) {
1677 src.ipv4 =
1678 nexthop->rmap_src
1679 .ipv4;
1680 setsrc = 1;
1681 } else if (nexthop->src.ipv4
1682 .s_addr
1683 != 0) {
1684 src.ipv4 =
1685 nexthop->src
1686 .ipv4;
1687 setsrc = 1;
1688 }
1689 } else if (family == AF_INET6) {
1690 if (!IN6_IS_ADDR_UNSPECIFIED(
1691 &nexthop->rmap_src
1692 .ipv6)) {
1693 src.ipv6 =
1694 nexthop->rmap_src
1695 .ipv6;
1696 setsrc = 1;
1697 } else if (
1698 !IN6_IS_ADDR_UNSPECIFIED(
1699 &nexthop->src
1700 .ipv6)) {
1701 src.ipv6 =
1702 nexthop->src
1703 .ipv6;
1704 setsrc = 1;
1705 }
1706 }
1707 }
1708 continue;
1709 }
1710
1711 if ((cmd == RTM_NEWROUTE
1712 && NEXTHOP_IS_ACTIVE(nexthop->flags))
1713 || (cmd == RTM_DELROUTE
1714 && CHECK_FLAG(nexthop->flags,
1715 NEXTHOP_FLAG_FIB))) {
1716 routedesc = nexthop->rparent
1717 ? "recursive, multipath"
1718 : "multipath";
1719 nexthop_num++;
1720
1721 _netlink_route_build_multipath(
1722 routedesc, bytelen, nexthop, rta, rtnh,
1723 &req.r, &src1);
1724 rtnh = RTNH_NEXT(rtnh);
1725
1726 if (!setsrc && src1) {
1727 if (family == AF_INET)
1728 src.ipv4 = src1->ipv4;
1729 else if (family == AF_INET6)
1730 src.ipv6 = src1->ipv6;
1731
1732 setsrc = 1;
1733 }
1734 }
1735 }
1736 if (setsrc && (cmd == RTM_NEWROUTE)) {
1737 if (family == AF_INET)
1738 addattr_l(&req.n, sizeof req, RTA_PREFSRC,
1739 &src.ipv4, bytelen);
1740 else if (family == AF_INET6)
1741 addattr_l(&req.n, sizeof req, RTA_PREFSRC,
1742 &src.ipv6, bytelen);
1743 if (IS_ZEBRA_DEBUG_KERNEL)
1744 zlog_debug("Setting source");
1745 }
1746
1747 if (rta->rta_len > RTA_LENGTH(0))
1748 addattr_l(&req.n, NL_PKT_BUF_SIZE, RTA_MULTIPATH,
1749 RTA_DATA(rta), RTA_PAYLOAD(rta));
1750 }
1751
1752 /* If there is no useful nexthop then return. */
1753 if (nexthop_num == 0) {
1754 if (IS_ZEBRA_DEBUG_KERNEL)
1755 zlog_debug(
1756 "netlink_route_multipath(): No useful nexthop.");
1757 return 0;
1758 }
1759
1760 skip:
1761
1762 /* Destination netlink address. */
1763 memset(&snl, 0, sizeof snl);
1764 snl.nl_family = AF_NETLINK;
1765
1766 /* Talk to netlink socket. */
1767 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
1768 0);
1769 }
1770
1771 /*
1772 * Routing table change via netlink interface, using a dataplane context object
1773 */
1774 static int netlink_route_multipath_ctx(int cmd, dplane_ctx_h ctx)
1775 {
1776 int bytelen;
1777 struct sockaddr_nl snl;
1778 struct nexthop *nexthop = NULL;
1779 unsigned int nexthop_num;
1780 int family;
1781 const char *routedesc;
1782 int setsrc = 0;
1783 union g_addr src;
1784 const struct prefix *p, *src_p;
1785 uint32_t table_id;
1786
1787 struct {
1788 struct nlmsghdr n;
1789 struct rtmsg r;
1790 char buf[NL_PKT_BUF_SIZE];
1791 } req;
1792
1793 p = dplane_ctx_get_dest(ctx);
1794 src_p = dplane_ctx_get_src(ctx);
1795
1796 family = PREFIX_FAMILY(p);
1797
1798 memset(&req, 0, sizeof(req) - NL_PKT_BUF_SIZE);
1799
1800 bytelen = (family == AF_INET ? 4 : 16);
1801
1802 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
1803 req.n.nlmsg_flags = NLM_F_CREATE | NLM_F_REQUEST;
1804
1805 if (dplane_ctx_get_op(ctx) == DPLANE_OP_ROUTE_UPDATE) {
1806 if ((p->family == AF_INET) || v6_rr_semantics)
1807 req.n.nlmsg_flags |= NLM_F_REPLACE;
1808 }
1809
1810 req.n.nlmsg_type = cmd;
1811
1812 req.n.nlmsg_pid = dplane_ctx_get_ns(ctx)->nls.snl.nl_pid;
1813
1814 req.r.rtm_family = family;
1815 req.r.rtm_dst_len = p->prefixlen;
1816 req.r.rtm_src_len = src_p ? src_p->prefixlen : 0;
1817 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
1818
1819 if (cmd == RTM_DELROUTE)
1820 req.r.rtm_protocol = zebra2proto(dplane_ctx_get_old_type(ctx));
1821 else
1822 req.r.rtm_protocol = zebra2proto(dplane_ctx_get_type(ctx));
1823
1824 /*
1825 * blackhole routes are not RTN_UNICAST, they are
1826 * RTN_ BLACKHOLE|UNREACHABLE|PROHIBIT
1827 * so setting this value as a RTN_UNICAST would
1828 * cause the route lookup of just the prefix
1829 * to fail. So no need to specify this for
1830 * the RTM_DELROUTE case
1831 */
1832 if (cmd != RTM_DELROUTE)
1833 req.r.rtm_type = RTN_UNICAST;
1834
1835 addattr_l(&req.n, sizeof(req), RTA_DST, &p->u.prefix, bytelen);
1836 if (src_p)
1837 addattr_l(&req.n, sizeof(req), RTA_SRC, &src_p->u.prefix,
1838 bytelen);
1839
1840 /* Metric. */
1841 /* Hardcode the metric for all routes coming from zebra. Metric isn't
1842 * used
1843 * either by the kernel or by zebra. Its purely for calculating best
1844 * path(s)
1845 * by the routing protocol and for communicating with protocol peers.
1846 */
1847 addattr32(&req.n, sizeof(req), RTA_PRIORITY, NL_DEFAULT_ROUTE_METRIC);
1848
1849 #if defined(SUPPORT_REALMS)
1850 {
1851 route_tag_t tag;
1852
1853 if (cmd == RTM_DELROUTE)
1854 tag = dplane_ctx_get_old_tag(ctx);
1855 else
1856 tag = dplane_ctx_get_tag(ctx);
1857
1858 if (tag > 0 && tag <= 255)
1859 addattr32(&req.n, sizeof(req), RTA_FLOW, tag);
1860 }
1861 #endif
1862 /* Table corresponding to this route. */
1863 table_id = dplane_ctx_get_table(ctx);
1864 if (table_id < 256)
1865 req.r.rtm_table = table_id;
1866 else {
1867 req.r.rtm_table = RT_TABLE_UNSPEC;
1868 addattr32(&req.n, sizeof(req), RTA_TABLE, table_id);
1869 }
1870
1871 _netlink_route_debug(cmd, p, family, dplane_ctx_get_vrf(ctx), table_id);
1872
1873 /*
1874 * If we are not updating the route and we have received
1875 * a route delete, then all we need to fill in is the
1876 * prefix information to tell the kernel to schwack
1877 * it.
1878 */
1879 if (cmd == RTM_DELROUTE)
1880 goto skip;
1881
1882 if (dplane_ctx_get_mtu(ctx) || dplane_ctx_get_nh_mtu(ctx)) {
1883 char buf[NL_PKT_BUF_SIZE];
1884 struct rtattr *rta = (void *)buf;
1885 uint32_t mtu = dplane_ctx_get_mtu(ctx);
1886 uint32_t nexthop_mtu = dplane_ctx_get_nh_mtu(ctx);
1887
1888 if (!mtu || (nexthop_mtu && nexthop_mtu < mtu))
1889 mtu = nexthop_mtu;
1890 rta->rta_type = RTA_METRICS;
1891 rta->rta_len = RTA_LENGTH(0);
1892 rta_addattr_l(rta, NL_PKT_BUF_SIZE,
1893 RTAX_MTU, &mtu, sizeof(mtu));
1894 addattr_l(&req.n, NL_PKT_BUF_SIZE, RTA_METRICS, RTA_DATA(rta),
1895 RTA_PAYLOAD(rta));
1896 }
1897
1898 /* Count overall nexthops so we can decide whether to use singlepath
1899 * or multipath case.
1900 */
1901 nexthop_num = 0;
1902 for (ALL_NEXTHOPS_PTR(dplane_ctx_get_ng(ctx), nexthop)) {
1903 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_RECURSIVE))
1904 continue;
1905 if (cmd == RTM_NEWROUTE && !NEXTHOP_IS_ACTIVE(nexthop->flags))
1906 continue;
1907
1908 nexthop_num++;
1909 }
1910
1911 /* Singlepath case. */
1912 if (nexthop_num == 1 || multipath_num == 1) {
1913 nexthop_num = 0;
1914 for (ALL_NEXTHOPS_PTR(dplane_ctx_get_ng(ctx), nexthop)) {
1915 /*
1916 * So we want to cover 2 types of blackhole
1917 * routes here:
1918 * 1) A normal blackhole route( ala from a static
1919 * install.
1920 * 2) A recursively resolved blackhole route
1921 */
1922 if (nexthop->type == NEXTHOP_TYPE_BLACKHOLE) {
1923 switch (nexthop->bh_type) {
1924 case BLACKHOLE_ADMINPROHIB:
1925 req.r.rtm_type = RTN_PROHIBIT;
1926 break;
1927 case BLACKHOLE_REJECT:
1928 req.r.rtm_type = RTN_UNREACHABLE;
1929 break;
1930 default:
1931 req.r.rtm_type = RTN_BLACKHOLE;
1932 break;
1933 }
1934 goto skip;
1935 }
1936 if (CHECK_FLAG(nexthop->flags,
1937 NEXTHOP_FLAG_RECURSIVE)) {
1938
1939 if (setsrc)
1940 continue;
1941
1942 if (family == AF_INET) {
1943 if (nexthop->rmap_src.ipv4.s_addr
1944 != 0) {
1945 src.ipv4 =
1946 nexthop->rmap_src.ipv4;
1947 setsrc = 1;
1948 } else if (nexthop->src.ipv4.s_addr
1949 != 0) {
1950 src.ipv4 =
1951 nexthop->src.ipv4;
1952 setsrc = 1;
1953 }
1954 } else if (family == AF_INET6) {
1955 if (!IN6_IS_ADDR_UNSPECIFIED(
1956 &nexthop->rmap_src.ipv6)) {
1957 src.ipv6 =
1958 nexthop->rmap_src.ipv6;
1959 setsrc = 1;
1960 } else if (
1961 !IN6_IS_ADDR_UNSPECIFIED(
1962 &nexthop->src.ipv6)) {
1963 src.ipv6 =
1964 nexthop->src.ipv6;
1965 setsrc = 1;
1966 }
1967 }
1968 continue;
1969 }
1970
1971 if ((cmd == RTM_NEWROUTE
1972 && NEXTHOP_IS_ACTIVE(nexthop->flags))) {
1973 routedesc = nexthop->rparent
1974 ? "recursive, single-path"
1975 : "single-path";
1976
1977 _netlink_route_build_singlepath(
1978 routedesc, bytelen, nexthop, &req.n,
1979 &req.r, sizeof(req), cmd);
1980 nexthop_num++;
1981 break;
1982 }
1983 }
1984 if (setsrc && (cmd == RTM_NEWROUTE)) {
1985 if (family == AF_INET)
1986 addattr_l(&req.n, sizeof(req), RTA_PREFSRC,
1987 &src.ipv4, bytelen);
1988 else if (family == AF_INET6)
1989 addattr_l(&req.n, sizeof(req), RTA_PREFSRC,
1990 &src.ipv6, bytelen);
1991 }
1992 } else { /* Multipath case */
1993 char buf[NL_PKT_BUF_SIZE];
1994 struct rtattr *rta = (void *)buf;
1995 struct rtnexthop *rtnh;
1996 union g_addr *src1 = NULL;
1997
1998 rta->rta_type = RTA_MULTIPATH;
1999 rta->rta_len = RTA_LENGTH(0);
2000 rtnh = RTA_DATA(rta);
2001
2002 nexthop_num = 0;
2003 for (ALL_NEXTHOPS_PTR(dplane_ctx_get_ng(ctx), nexthop)) {
2004 if (nexthop_num >= multipath_num)
2005 break;
2006
2007 if (CHECK_FLAG(nexthop->flags,
2008 NEXTHOP_FLAG_RECURSIVE)) {
2009 /* This only works for IPv4 now */
2010 if (setsrc)
2011 continue;
2012
2013 if (family == AF_INET) {
2014 if (nexthop->rmap_src.ipv4.s_addr
2015 != 0) {
2016 src.ipv4 =
2017 nexthop->rmap_src.ipv4;
2018 setsrc = 1;
2019 } else if (nexthop->src.ipv4.s_addr
2020 != 0) {
2021 src.ipv4 =
2022 nexthop->src.ipv4;
2023 setsrc = 1;
2024 }
2025 } else if (family == AF_INET6) {
2026 if (!IN6_IS_ADDR_UNSPECIFIED(
2027 &nexthop->rmap_src.ipv6)) {
2028 src.ipv6 =
2029 nexthop->rmap_src.ipv6;
2030 setsrc = 1;
2031 } else if (
2032 !IN6_IS_ADDR_UNSPECIFIED(
2033 &nexthop->src.ipv6)) {
2034 src.ipv6 =
2035 nexthop->src.ipv6;
2036 setsrc = 1;
2037 }
2038 }
2039 }
2040
2041 if ((cmd == RTM_NEWROUTE
2042 && NEXTHOP_IS_ACTIVE(nexthop->flags))) {
2043 routedesc = nexthop->rparent
2044 ? "recursive, multipath"
2045 : "multipath";
2046 nexthop_num++;
2047
2048 _netlink_route_build_multipath(
2049 routedesc, bytelen, nexthop, rta, rtnh,
2050 &req.r, &src1);
2051 rtnh = RTNH_NEXT(rtnh);
2052
2053 if (!setsrc && src1) {
2054 if (family == AF_INET)
2055 src.ipv4 = src1->ipv4;
2056 else if (family == AF_INET6)
2057 src.ipv6 = src1->ipv6;
2058
2059 setsrc = 1;
2060 }
2061 }
2062 }
2063 if (setsrc && (cmd == RTM_NEWROUTE)) {
2064 if (family == AF_INET)
2065 addattr_l(&req.n, sizeof(req), RTA_PREFSRC,
2066 &src.ipv4, bytelen);
2067 else if (family == AF_INET6)
2068 addattr_l(&req.n, sizeof(req), RTA_PREFSRC,
2069 &src.ipv6, bytelen);
2070 if (IS_ZEBRA_DEBUG_KERNEL)
2071 zlog_debug("Setting source");
2072 }
2073
2074 if (rta->rta_len > RTA_LENGTH(0))
2075 addattr_l(&req.n, NL_PKT_BUF_SIZE, RTA_MULTIPATH,
2076 RTA_DATA(rta), RTA_PAYLOAD(rta));
2077 }
2078
2079 /* If there is no useful nexthop then return. */
2080 if (nexthop_num == 0) {
2081 if (IS_ZEBRA_DEBUG_KERNEL)
2082 zlog_debug(
2083 "netlink_route_multipath(): No useful nexthop.");
2084 return 0;
2085 }
2086
2087 skip:
2088
2089 /* Destination netlink address. */
2090 memset(&snl, 0, sizeof(snl));
2091 snl.nl_family = AF_NETLINK;
2092
2093 /* Talk to netlink socket. */
2094 return netlink_talk_info(netlink_talk_filter, &req.n,
2095 dplane_ctx_get_ns(ctx), 0);
2096 }
2097
2098 int kernel_get_ipmr_sg_stats(struct zebra_vrf *zvrf, void *in)
2099 {
2100 uint32_t actual_table;
2101 int suc = 0;
2102 struct mcast_route_data *mr = (struct mcast_route_data *)in;
2103 struct {
2104 struct nlmsghdr n;
2105 struct ndmsg ndm;
2106 char buf[256];
2107 } req;
2108
2109 mroute = mr;
2110 struct zebra_ns *zns;
2111
2112 zns = zvrf->zns;
2113 memset(&req, 0, sizeof(req));
2114
2115 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
2116 req.n.nlmsg_flags = NLM_F_REQUEST;
2117 req.n.nlmsg_pid = zns->netlink_cmd.snl.nl_pid;
2118
2119 req.ndm.ndm_family = RTNL_FAMILY_IPMR;
2120 req.n.nlmsg_type = RTM_GETROUTE;
2121
2122 addattr_l(&req.n, sizeof(req), RTA_IIF, &mroute->ifindex, 4);
2123 addattr_l(&req.n, sizeof(req), RTA_OIF, &mroute->ifindex, 4);
2124 addattr_l(&req.n, sizeof(req), RTA_SRC, &mroute->sg.src.s_addr, 4);
2125 addattr_l(&req.n, sizeof(req), RTA_DST, &mroute->sg.grp.s_addr, 4);
2126 /*
2127 * What?
2128 *
2129 * So during the namespace cleanup we started storing
2130 * the zvrf table_id for the default table as RT_TABLE_MAIN
2131 * which is what the normal routing table for ip routing is.
2132 * This change caused this to break our lookups of sg data
2133 * because prior to this change the zvrf->table_id was 0
2134 * and when the pim multicast kernel code saw a 0,
2135 * it was auto-translated to RT_TABLE_DEFAULT. But since
2136 * we are now passing in RT_TABLE_MAIN there is no auto-translation
2137 * and the kernel goes screw you and the delicious cookies you
2138 * are trying to give me. So now we have this little hack.
2139 */
2140 actual_table = (zvrf->table_id == RT_TABLE_MAIN) ? RT_TABLE_DEFAULT :
2141 zvrf->table_id;
2142 addattr_l(&req.n, sizeof(req), RTA_TABLE, &actual_table, 4);
2143
2144 suc = netlink_talk(netlink_route_change_read_multicast, &req.n,
2145 &zns->netlink_cmd, zns, 0);
2146
2147 mroute = NULL;
2148 return suc;
2149 }
2150
2151 enum zebra_dplane_result kernel_route_rib(struct route_node *rn,
2152 const struct prefix *p,
2153 const struct prefix *src_p,
2154 struct route_entry *old,
2155 struct route_entry *new)
2156 {
2157 int ret = 0;
2158
2159 assert(old || new);
2160
2161 if (new) {
2162 if (p->family == AF_INET || v6_rr_semantics)
2163 ret = netlink_route_multipath(RTM_NEWROUTE, p, src_p,
2164 new, (old) ? 1 : 0);
2165 else {
2166 /*
2167 * So v6 route replace semantics are not in
2168 * the kernel at this point as I understand it.
2169 * So let's do a delete than an add.
2170 * In the future once v6 route replace semantics
2171 * are in we can figure out what to do here to
2172 * allow working with old and new kernels.
2173 *
2174 * I'm also intentionally ignoring the failure case
2175 * of the route delete. If that happens yeah we're
2176 * screwed.
2177 */
2178 if (old)
2179 netlink_route_multipath(RTM_DELROUTE, p, src_p,
2180 old, 0);
2181 ret = netlink_route_multipath(RTM_NEWROUTE, p, src_p,
2182 new, 0);
2183 }
2184 kernel_route_rib_pass_fail(rn, p, new,
2185 (!ret) ? ZEBRA_DPLANE_INSTALL_SUCCESS
2186 : ZEBRA_DPLANE_INSTALL_FAILURE);
2187 return ZEBRA_DPLANE_REQUEST_SUCCESS;
2188 }
2189
2190 if (old) {
2191 ret = netlink_route_multipath(RTM_DELROUTE, p, src_p, old, 0);
2192
2193 kernel_route_rib_pass_fail(rn, p, old,
2194 (!ret) ? ZEBRA_DPLANE_DELETE_SUCCESS
2195 : ZEBRA_DPLANE_DELETE_FAILURE);
2196 }
2197
2198 return ZEBRA_DPLANE_REQUEST_SUCCESS;
2199 }
2200
2201 /*
2202 * Update or delete a prefix from the kernel,
2203 * using info from a dataplane context.
2204 */
2205 enum zebra_dplane_result kernel_route_update(dplane_ctx_h ctx)
2206 {
2207 int cmd, ret;
2208 const struct prefix *p = dplane_ctx_get_dest(ctx);
2209 struct nexthop *nexthop;
2210
2211 if (dplane_ctx_get_op(ctx) == DPLANE_OP_ROUTE_DELETE) {
2212 cmd = RTM_DELROUTE;
2213 } else if (dplane_ctx_get_op(ctx) == DPLANE_OP_ROUTE_INSTALL) {
2214 cmd = RTM_NEWROUTE;
2215 } else if (dplane_ctx_get_op(ctx) == DPLANE_OP_ROUTE_UPDATE) {
2216
2217 if (p->family == AF_INET || v6_rr_semantics) {
2218 /* Single 'replace' operation */
2219 cmd = RTM_NEWROUTE;
2220 } else {
2221 /*
2222 * So v6 route replace semantics are not in
2223 * the kernel at this point as I understand it.
2224 * so let's do a delete then an add.
2225 * In the future once v6 route replace semantics
2226 * are in we can figure out what to do here to
2227 * allow working with old and new kernels.
2228 *
2229 * I'm also intentionally ignoring the failure case
2230 * of the route delete. If that happens yeah we're
2231 * screwed.
2232 */
2233 (void)netlink_route_multipath_ctx(RTM_DELROUTE, ctx);
2234 cmd = RTM_NEWROUTE;
2235 }
2236
2237 } else {
2238 return ZEBRA_DPLANE_REQUEST_FAILURE;
2239 }
2240
2241 ret = netlink_route_multipath_ctx(cmd, ctx);
2242 if ((cmd == RTM_NEWROUTE) && (ret == 0)) {
2243 /* Update installed nexthops to signal which have been
2244 * installed.
2245 */
2246 for (ALL_NEXTHOPS_PTR(dplane_ctx_get_ng(ctx), nexthop)) {
2247 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_RECURSIVE))
2248 continue;
2249
2250 if (CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE)) {
2251 SET_FLAG(nexthop->flags, NEXTHOP_FLAG_FIB);
2252
2253 /* If we're only allowed a single nh, don't
2254 * continue.
2255 */
2256 if (multipath_num == 1)
2257 break;
2258 }
2259 }
2260 }
2261
2262 return (ret == 0 ?
2263 ZEBRA_DPLANE_REQUEST_SUCCESS : ZEBRA_DPLANE_REQUEST_FAILURE);
2264 }
2265
2266 int kernel_neigh_update(int add, int ifindex, uint32_t addr, char *lla,
2267 int llalen, ns_id_t ns_id)
2268 {
2269 return netlink_neigh_update(add ? RTM_NEWNEIGH : RTM_DELNEIGH, ifindex,
2270 addr, lla, llalen, ns_id);
2271 }
2272
2273 /*
2274 * Add remote VTEP to the flood list for this VxLAN interface (VNI). This
2275 * is done by adding an FDB entry with a MAC of 00:00:00:00:00:00.
2276 */
2277 static int netlink_vxlan_flood_list_update(struct interface *ifp,
2278 struct in_addr *vtep_ip, int cmd)
2279 {
2280 struct zebra_ns *zns;
2281 struct {
2282 struct nlmsghdr n;
2283 struct ndmsg ndm;
2284 char buf[256];
2285 } req;
2286 uint8_t dst_mac[6] = {0x0, 0x0, 0x0, 0x0, 0x0, 0x0};
2287 struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(ifp->vrf_id);
2288
2289 zns = zvrf->zns;
2290 memset(&req, 0, sizeof(req));
2291
2292 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
2293 req.n.nlmsg_flags = NLM_F_REQUEST;
2294 if (cmd == RTM_NEWNEIGH)
2295 req.n.nlmsg_flags |= (NLM_F_CREATE | NLM_F_APPEND);
2296 req.n.nlmsg_type = cmd;
2297 req.ndm.ndm_family = PF_BRIDGE;
2298 req.ndm.ndm_state = NUD_NOARP | NUD_PERMANENT;
2299 req.ndm.ndm_flags |= NTF_SELF; // Handle by "self", not "master"
2300
2301
2302 addattr_l(&req.n, sizeof(req), NDA_LLADDR, &dst_mac, 6);
2303 req.ndm.ndm_ifindex = ifp->ifindex;
2304 addattr_l(&req.n, sizeof(req), NDA_DST, &vtep_ip->s_addr, 4);
2305
2306 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
2307 0);
2308 }
2309
2310 /*
2311 * Add remote VTEP for this VxLAN interface (VNI). In Linux, this involves
2312 * adding
2313 * a "flood" MAC FDB entry.
2314 */
2315 int kernel_add_vtep(vni_t vni, struct interface *ifp, struct in_addr *vtep_ip)
2316 {
2317 if (IS_ZEBRA_DEBUG_VXLAN)
2318 zlog_debug("Install %s into flood list for VNI %u intf %s(%u)",
2319 inet_ntoa(*vtep_ip), vni, ifp->name, ifp->ifindex);
2320
2321 return netlink_vxlan_flood_list_update(ifp, vtep_ip, RTM_NEWNEIGH);
2322 }
2323
2324 /*
2325 * Remove remote VTEP for this VxLAN interface (VNI). In Linux, this involves
2326 * deleting the "flood" MAC FDB entry.
2327 */
2328 int kernel_del_vtep(vni_t vni, struct interface *ifp, struct in_addr *vtep_ip)
2329 {
2330 if (IS_ZEBRA_DEBUG_VXLAN)
2331 zlog_debug(
2332 "Uninstall %s from flood list for VNI %u intf %s(%u)",
2333 inet_ntoa(*vtep_ip), vni, ifp->name, ifp->ifindex);
2334
2335 return netlink_vxlan_flood_list_update(ifp, vtep_ip, RTM_DELNEIGH);
2336 }
2337
2338 #ifndef NDA_RTA
2339 #define NDA_RTA(r) \
2340 ((struct rtattr *)(((char *)(r)) + NLMSG_ALIGN(sizeof(struct ndmsg))))
2341 #endif
2342
2343 static int netlink_macfdb_change(struct nlmsghdr *h, int len, ns_id_t ns_id)
2344 {
2345 struct ndmsg *ndm;
2346 struct interface *ifp;
2347 struct zebra_if *zif;
2348 struct rtattr *tb[NDA_MAX + 1];
2349 struct interface *br_if;
2350 struct ethaddr mac;
2351 vlanid_t vid = 0;
2352 struct prefix vtep_ip;
2353 int vid_present = 0, dst_present = 0;
2354 char buf[ETHER_ADDR_STRLEN];
2355 char vid_buf[20];
2356 char dst_buf[30];
2357 bool sticky;
2358
2359 ndm = NLMSG_DATA(h);
2360
2361 /* We only process macfdb notifications if EVPN is enabled */
2362 if (!is_evpn_enabled())
2363 return 0;
2364
2365 /* The interface should exist. */
2366 ifp = if_lookup_by_index_per_ns(zebra_ns_lookup(ns_id),
2367 ndm->ndm_ifindex);
2368 if (!ifp || !ifp->info)
2369 return 0;
2370
2371 /* The interface should be something we're interested in. */
2372 if (!IS_ZEBRA_IF_BRIDGE_SLAVE(ifp))
2373 return 0;
2374
2375 /* Drop "permanent" entries. */
2376 if (ndm->ndm_state & NUD_PERMANENT)
2377 return 0;
2378
2379 zif = (struct zebra_if *)ifp->info;
2380 if ((br_if = zif->brslave_info.br_if) == NULL) {
2381 zlog_debug("%s family %s IF %s(%u) brIF %u - no bridge master",
2382 nl_msg_type_to_str(h->nlmsg_type),
2383 nl_family_to_str(ndm->ndm_family), ifp->name,
2384 ndm->ndm_ifindex, zif->brslave_info.bridge_ifindex);
2385 return 0;
2386 }
2387
2388 /* Parse attributes and extract fields of interest. */
2389 memset(tb, 0, sizeof tb);
2390 netlink_parse_rtattr(tb, NDA_MAX, NDA_RTA(ndm), len);
2391
2392 if (!tb[NDA_LLADDR]) {
2393 zlog_debug("%s family %s IF %s(%u) brIF %u - no LLADDR",
2394 nl_msg_type_to_str(h->nlmsg_type),
2395 nl_family_to_str(ndm->ndm_family), ifp->name,
2396 ndm->ndm_ifindex, zif->brslave_info.bridge_ifindex);
2397 return 0;
2398 }
2399
2400 if (RTA_PAYLOAD(tb[NDA_LLADDR]) != ETH_ALEN) {
2401 zlog_debug(
2402 "%s family %s IF %s(%u) brIF %u - LLADDR is not MAC, len %lu",
2403 nl_msg_type_to_str(h->nlmsg_type),
2404 nl_family_to_str(ndm->ndm_family), ifp->name,
2405 ndm->ndm_ifindex, zif->brslave_info.bridge_ifindex,
2406 (unsigned long)RTA_PAYLOAD(tb[NDA_LLADDR]));
2407 return 0;
2408 }
2409
2410 memcpy(&mac, RTA_DATA(tb[NDA_LLADDR]), ETH_ALEN);
2411
2412 if ((NDA_VLAN <= NDA_MAX) && tb[NDA_VLAN]) {
2413 vid_present = 1;
2414 vid = *(uint16_t *)RTA_DATA(tb[NDA_VLAN]);
2415 sprintf(vid_buf, " VLAN %u", vid);
2416 }
2417
2418 if (tb[NDA_DST]) {
2419 /* TODO: Only IPv4 supported now. */
2420 dst_present = 1;
2421 vtep_ip.family = AF_INET;
2422 vtep_ip.prefixlen = IPV4_MAX_BITLEN;
2423 memcpy(&(vtep_ip.u.prefix4.s_addr), RTA_DATA(tb[NDA_DST]),
2424 IPV4_MAX_BYTELEN);
2425 sprintf(dst_buf, " dst %s", inet_ntoa(vtep_ip.u.prefix4));
2426 }
2427
2428 sticky = !!(ndm->ndm_state & NUD_NOARP);
2429
2430 if (IS_ZEBRA_DEBUG_KERNEL)
2431 zlog_debug("Rx %s family %s IF %s(%u)%s %sMAC %s%s",
2432 nl_msg_type_to_str(h->nlmsg_type),
2433 nl_family_to_str(ndm->ndm_family), ifp->name,
2434 ndm->ndm_ifindex, vid_present ? vid_buf : "",
2435 sticky ? "sticky " : "",
2436 prefix_mac2str(&mac, buf, sizeof(buf)),
2437 dst_present ? dst_buf : "");
2438
2439 if (filter_vlan && vid != filter_vlan)
2440 return 0;
2441
2442 /* If add or update, do accordingly if learnt on a "local" interface; if
2443 * the notification is over VxLAN, this has to be related to
2444 * multi-homing,
2445 * so perform an implicit delete of any local entry (if it exists).
2446 */
2447 if (h->nlmsg_type == RTM_NEWNEIGH) {
2448 /* Drop "permanent" entries. */
2449 if (ndm->ndm_state & NUD_PERMANENT)
2450 return 0;
2451
2452 if (IS_ZEBRA_IF_VXLAN(ifp))
2453 return zebra_vxlan_check_del_local_mac(ifp, br_if, &mac,
2454 vid);
2455
2456 return zebra_vxlan_local_mac_add_update(ifp, br_if, &mac, vid,
2457 sticky);
2458 }
2459
2460 /* This is a delete notification.
2461 * 1. For a MAC over VxLan, check if it needs to be refreshed(readded)
2462 * 2. For a MAC over "local" interface, delete the mac
2463 * Note: We will get notifications from both bridge driver and VxLAN
2464 * driver.
2465 * Ignore the notification from VxLan driver as it is also generated
2466 * when mac moves from remote to local.
2467 */
2468 if (dst_present)
2469 return 0;
2470
2471 if (IS_ZEBRA_IF_VXLAN(ifp))
2472 return zebra_vxlan_check_readd_remote_mac(ifp, br_if, &mac,
2473 vid);
2474
2475 return zebra_vxlan_local_mac_del(ifp, br_if, &mac, vid);
2476 }
2477
2478 static int netlink_macfdb_table(struct nlmsghdr *h, ns_id_t ns_id, int startup)
2479 {
2480 int len;
2481 struct ndmsg *ndm;
2482
2483 if (h->nlmsg_type != RTM_NEWNEIGH)
2484 return 0;
2485
2486 /* Length validity. */
2487 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct ndmsg));
2488 if (len < 0)
2489 return -1;
2490
2491 /* We are interested only in AF_BRIDGE notifications. */
2492 ndm = NLMSG_DATA(h);
2493 if (ndm->ndm_family != AF_BRIDGE)
2494 return 0;
2495
2496 return netlink_macfdb_change(h, len, ns_id);
2497 }
2498
2499 /* Request for MAC FDB information from the kernel */
2500 static int netlink_request_macs(struct nlsock *netlink_cmd, int family,
2501 int type, ifindex_t master_ifindex)
2502 {
2503 struct {
2504 struct nlmsghdr n;
2505 struct ifinfomsg ifm;
2506 char buf[256];
2507 } req;
2508
2509 /* Form the request, specifying filter (rtattr) if needed. */
2510 memset(&req, 0, sizeof(req));
2511 req.n.nlmsg_type = type;
2512 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ifinfomsg));
2513 req.ifm.ifi_family = family;
2514 if (master_ifindex)
2515 addattr32(&req.n, sizeof(req), IFLA_MASTER, master_ifindex);
2516
2517 return netlink_request(netlink_cmd, &req.n);
2518 }
2519
2520 /*
2521 * MAC forwarding database read using netlink interface. This is invoked
2522 * at startup.
2523 */
2524 int netlink_macfdb_read(struct zebra_ns *zns)
2525 {
2526 int ret;
2527 struct zebra_dplane_info dp_info;
2528
2529 zebra_dplane_info_from_zns(&dp_info, zns, true /*is_cmd*/);
2530
2531 /* Get bridge FDB table. */
2532 ret = netlink_request_macs(&zns->netlink_cmd, AF_BRIDGE, RTM_GETNEIGH,
2533 0);
2534 if (ret < 0)
2535 return ret;
2536 /* We are reading entire table. */
2537 filter_vlan = 0;
2538 ret = netlink_parse_info(netlink_macfdb_table, &zns->netlink_cmd,
2539 &dp_info, 0, 1);
2540
2541 return ret;
2542 }
2543
2544 /*
2545 * MAC forwarding database read using netlink interface. This is for a
2546 * specific bridge and matching specific access VLAN (if VLAN-aware bridge).
2547 */
2548 int netlink_macfdb_read_for_bridge(struct zebra_ns *zns, struct interface *ifp,
2549 struct interface *br_if)
2550 {
2551 struct zebra_if *br_zif;
2552 struct zebra_if *zif;
2553 struct zebra_l2info_vxlan *vxl;
2554 struct zebra_dplane_info dp_info;
2555 int ret = 0;
2556
2557 zebra_dplane_info_from_zns(&dp_info, zns, true /*is_cmd*/);
2558
2559 /* Save VLAN we're filtering on, if needed. */
2560 br_zif = (struct zebra_if *)br_if->info;
2561 zif = (struct zebra_if *)ifp->info;
2562 vxl = &zif->l2info.vxl;
2563 if (IS_ZEBRA_IF_BRIDGE_VLAN_AWARE(br_zif))
2564 filter_vlan = vxl->access_vlan;
2565
2566 /* Get bridge FDB table for specific bridge - we do the VLAN filtering.
2567 */
2568 ret = netlink_request_macs(&zns->netlink_cmd, AF_BRIDGE, RTM_GETNEIGH,
2569 br_if->ifindex);
2570 if (ret < 0)
2571 return ret;
2572 ret = netlink_parse_info(netlink_macfdb_table, &zns->netlink_cmd,
2573 &dp_info, 0, 0);
2574
2575 /* Reset VLAN filter. */
2576 filter_vlan = 0;
2577 return ret;
2578 }
2579
2580 static int netlink_macfdb_update(struct interface *ifp, vlanid_t vid,
2581 struct ethaddr *mac, struct in_addr vtep_ip,
2582 int cmd, bool sticky)
2583 {
2584 struct zebra_ns *zns;
2585 struct {
2586 struct nlmsghdr n;
2587 struct ndmsg ndm;
2588 char buf[256];
2589 } req;
2590 int dst_alen;
2591 struct zebra_if *zif;
2592 struct interface *br_if;
2593 struct zebra_if *br_zif;
2594 char buf[ETHER_ADDR_STRLEN];
2595 int vid_present = 0;
2596 char vid_buf[20];
2597 char dst_buf[30];
2598 struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(ifp->vrf_id);
2599
2600 zns = zvrf->zns;
2601 zif = ifp->info;
2602 if ((br_if = zif->brslave_info.br_if) == NULL) {
2603 zlog_debug("MAC %s on IF %s(%u) - no mapping to bridge",
2604 (cmd == RTM_NEWNEIGH) ? "add" : "del", ifp->name,
2605 ifp->ifindex);
2606 return -1;
2607 }
2608
2609 memset(&req, 0, sizeof(req));
2610
2611 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
2612 req.n.nlmsg_flags = NLM_F_REQUEST;
2613 if (cmd == RTM_NEWNEIGH)
2614 req.n.nlmsg_flags |= (NLM_F_CREATE | NLM_F_REPLACE);
2615 req.n.nlmsg_type = cmd;
2616 req.ndm.ndm_family = AF_BRIDGE;
2617 req.ndm.ndm_flags |= NTF_SELF | NTF_MASTER;
2618 req.ndm.ndm_state = NUD_REACHABLE;
2619
2620 if (sticky)
2621 req.ndm.ndm_state |= NUD_NOARP;
2622 else
2623 req.ndm.ndm_flags |= NTF_EXT_LEARNED;
2624
2625 addattr_l(&req.n, sizeof(req), NDA_LLADDR, mac, 6);
2626 req.ndm.ndm_ifindex = ifp->ifindex;
2627 dst_alen = 4; // TODO: hardcoded
2628 addattr_l(&req.n, sizeof(req), NDA_DST, &vtep_ip, dst_alen);
2629 sprintf(dst_buf, " dst %s", inet_ntoa(vtep_ip));
2630 br_zif = (struct zebra_if *)br_if->info;
2631 if (IS_ZEBRA_IF_BRIDGE_VLAN_AWARE(br_zif) && vid > 0) {
2632 addattr16(&req.n, sizeof(req), NDA_VLAN, vid);
2633 vid_present = 1;
2634 sprintf(vid_buf, " VLAN %u", vid);
2635 }
2636 addattr32(&req.n, sizeof(req), NDA_MASTER, br_if->ifindex);
2637
2638 if (IS_ZEBRA_DEBUG_KERNEL)
2639 zlog_debug("Tx %s family %s IF %s(%u)%s %sMAC %s%s",
2640 nl_msg_type_to_str(cmd),
2641 nl_family_to_str(req.ndm.ndm_family), ifp->name,
2642 ifp->ifindex, vid_present ? vid_buf : "",
2643 sticky ? "sticky " : "",
2644 prefix_mac2str(mac, buf, sizeof(buf)), dst_buf);
2645
2646 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
2647 0);
2648 }
2649
2650 #define NUD_VALID \
2651 (NUD_PERMANENT | NUD_NOARP | NUD_REACHABLE | NUD_PROBE | NUD_STALE \
2652 | NUD_DELAY)
2653
2654 static int netlink_ipneigh_change(struct nlmsghdr *h, int len, ns_id_t ns_id)
2655 {
2656 struct ndmsg *ndm;
2657 struct interface *ifp;
2658 struct zebra_if *zif;
2659 struct rtattr *tb[NDA_MAX + 1];
2660 struct interface *link_if;
2661 struct ethaddr mac;
2662 struct ipaddr ip;
2663 char buf[ETHER_ADDR_STRLEN];
2664 char buf2[INET6_ADDRSTRLEN];
2665 int mac_present = 0;
2666 bool is_ext;
2667 bool is_router;
2668
2669 ndm = NLMSG_DATA(h);
2670
2671 /* The interface should exist. */
2672 ifp = if_lookup_by_index_per_ns(zebra_ns_lookup(ns_id),
2673 ndm->ndm_ifindex);
2674 if (!ifp || !ifp->info)
2675 return 0;
2676
2677 zif = (struct zebra_if *)ifp->info;
2678
2679 /* Parse attributes and extract fields of interest. */
2680 memset(tb, 0, sizeof tb);
2681 netlink_parse_rtattr(tb, NDA_MAX, NDA_RTA(ndm), len);
2682
2683 if (!tb[NDA_DST]) {
2684 zlog_debug("%s family %s IF %s(%u) - no DST",
2685 nl_msg_type_to_str(h->nlmsg_type),
2686 nl_family_to_str(ndm->ndm_family), ifp->name,
2687 ndm->ndm_ifindex);
2688 return 0;
2689 }
2690
2691 memset(&ip, 0, sizeof(struct ipaddr));
2692 ip.ipa_type = (ndm->ndm_family == AF_INET) ? IPADDR_V4 : IPADDR_V6;
2693 memcpy(&ip.ip.addr, RTA_DATA(tb[NDA_DST]), RTA_PAYLOAD(tb[NDA_DST]));
2694
2695 /* Drop some "permanent" entries. */
2696 if (ndm->ndm_state & NUD_PERMANENT) {
2697 char b[16] = "169.254.0.1";
2698 struct in_addr ipv4_ll;
2699
2700 if (ndm->ndm_family != AF_INET)
2701 return 0;
2702
2703 if (!zif->v6_2_v4_ll_neigh_entry)
2704 return 0;
2705
2706 if (h->nlmsg_type != RTM_DELNEIGH)
2707 return 0;
2708
2709 inet_pton(AF_INET, b, &ipv4_ll);
2710 if (ipv4_ll.s_addr != ip.ip._v4_addr.s_addr)
2711 return 0;
2712
2713 if_nbr_ipv6ll_to_ipv4ll_neigh_update(
2714 ifp, &zif->v6_2_v4_ll_addr6, true);
2715 return 0;
2716 }
2717
2718 /* The neighbor is present on an SVI. From this, we locate the
2719 * underlying
2720 * bridge because we're only interested in neighbors on a VxLAN bridge.
2721 * The bridge is located based on the nature of the SVI:
2722 * (a) In the case of a VLAN-aware bridge, the SVI is a L3 VLAN
2723 * interface
2724 * and is linked to the bridge
2725 * (b) In the case of a VLAN-unaware bridge, the SVI is the bridge
2726 * inteface
2727 * itself
2728 */
2729 if (IS_ZEBRA_IF_VLAN(ifp)) {
2730 link_if = if_lookup_by_index_per_ns(zebra_ns_lookup(ns_id),
2731 zif->link_ifindex);
2732 if (!link_if)
2733 return 0;
2734 } else if (IS_ZEBRA_IF_BRIDGE(ifp))
2735 link_if = ifp;
2736 else
2737 return 0;
2738
2739 memset(&mac, 0, sizeof(struct ethaddr));
2740 if (h->nlmsg_type == RTM_NEWNEIGH) {
2741 if (tb[NDA_LLADDR]) {
2742 if (RTA_PAYLOAD(tb[NDA_LLADDR]) != ETH_ALEN) {
2743 zlog_debug(
2744 "%s family %s IF %s(%u) - LLADDR is not MAC, len %lu",
2745 nl_msg_type_to_str(h->nlmsg_type),
2746 nl_family_to_str(ndm->ndm_family),
2747 ifp->name, ndm->ndm_ifindex,
2748 (unsigned long)RTA_PAYLOAD(
2749 tb[NDA_LLADDR]));
2750 return 0;
2751 }
2752
2753 mac_present = 1;
2754 memcpy(&mac, RTA_DATA(tb[NDA_LLADDR]), ETH_ALEN);
2755 }
2756
2757 is_ext = !!(ndm->ndm_flags & NTF_EXT_LEARNED);
2758 is_router = !!(ndm->ndm_flags & NTF_ROUTER);
2759
2760 if (IS_ZEBRA_DEBUG_KERNEL)
2761 zlog_debug(
2762 "Rx %s family %s IF %s(%u) IP %s MAC %s state 0x%x flags 0x%x",
2763 nl_msg_type_to_str(h->nlmsg_type),
2764 nl_family_to_str(ndm->ndm_family), ifp->name,
2765 ndm->ndm_ifindex,
2766 ipaddr2str(&ip, buf2, sizeof(buf2)),
2767 mac_present
2768 ? prefix_mac2str(&mac, buf, sizeof(buf))
2769 : "",
2770 ndm->ndm_state, ndm->ndm_flags);
2771
2772 /* If the neighbor state is valid for use, process as an add or
2773 * update
2774 * else process as a delete. Note that the delete handling may
2775 * result
2776 * in re-adding the neighbor if it is a valid "remote" neighbor.
2777 */
2778 if (ndm->ndm_state & NUD_VALID)
2779 return zebra_vxlan_handle_kernel_neigh_update(
2780 ifp, link_if, &ip, &mac, ndm->ndm_state,
2781 is_ext, is_router);
2782
2783 return zebra_vxlan_handle_kernel_neigh_del(ifp, link_if, &ip);
2784 }
2785
2786 if (IS_ZEBRA_DEBUG_KERNEL)
2787 zlog_debug("Rx %s family %s IF %s(%u) IP %s",
2788 nl_msg_type_to_str(h->nlmsg_type),
2789 nl_family_to_str(ndm->ndm_family), ifp->name,
2790 ndm->ndm_ifindex,
2791 ipaddr2str(&ip, buf2, sizeof(buf2)));
2792
2793 /* Process the delete - it may result in re-adding the neighbor if it is
2794 * a valid "remote" neighbor.
2795 */
2796 return zebra_vxlan_handle_kernel_neigh_del(ifp, link_if, &ip);
2797 }
2798
2799 static int netlink_neigh_table(struct nlmsghdr *h, ns_id_t ns_id, int startup)
2800 {
2801 int len;
2802 struct ndmsg *ndm;
2803
2804 if (h->nlmsg_type != RTM_NEWNEIGH)
2805 return 0;
2806
2807 /* Length validity. */
2808 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct ndmsg));
2809 if (len < 0)
2810 return -1;
2811
2812 /* We are interested only in AF_INET or AF_INET6 notifications. */
2813 ndm = NLMSG_DATA(h);
2814 if (ndm->ndm_family != AF_INET && ndm->ndm_family != AF_INET6)
2815 return 0;
2816
2817 return netlink_neigh_change(h, len);
2818 }
2819
2820 /* Request for IP neighbor information from the kernel */
2821 static int netlink_request_neigh(struct nlsock *netlink_cmd, int family,
2822 int type, ifindex_t ifindex)
2823 {
2824 struct {
2825 struct nlmsghdr n;
2826 struct ndmsg ndm;
2827 char buf[256];
2828 } req;
2829
2830 /* Form the request, specifying filter (rtattr) if needed. */
2831 memset(&req, 0, sizeof(req));
2832 req.n.nlmsg_type = type;
2833 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
2834 req.ndm.ndm_family = family;
2835 if (ifindex)
2836 addattr32(&req.n, sizeof(req), NDA_IFINDEX, ifindex);
2837
2838 return netlink_request(netlink_cmd, &req.n);
2839 }
2840
2841 /*
2842 * IP Neighbor table read using netlink interface. This is invoked
2843 * at startup.
2844 */
2845 int netlink_neigh_read(struct zebra_ns *zns)
2846 {
2847 int ret;
2848 struct zebra_dplane_info dp_info;
2849
2850 zebra_dplane_info_from_zns(&dp_info, zns, true /*is_cmd*/);
2851
2852 /* Get IP neighbor table. */
2853 ret = netlink_request_neigh(&zns->netlink_cmd, AF_UNSPEC, RTM_GETNEIGH,
2854 0);
2855 if (ret < 0)
2856 return ret;
2857 ret = netlink_parse_info(netlink_neigh_table, &zns->netlink_cmd,
2858 &dp_info, 0, 1);
2859
2860 return ret;
2861 }
2862
2863 /*
2864 * IP Neighbor table read using netlink interface. This is for a specific
2865 * VLAN device.
2866 */
2867 int netlink_neigh_read_for_vlan(struct zebra_ns *zns, struct interface *vlan_if)
2868 {
2869 int ret = 0;
2870 struct zebra_dplane_info dp_info;
2871
2872 zebra_dplane_info_from_zns(&dp_info, zns, true /*is_cmd*/);
2873
2874 ret = netlink_request_neigh(&zns->netlink_cmd, AF_UNSPEC, RTM_GETNEIGH,
2875 vlan_if->ifindex);
2876 if (ret < 0)
2877 return ret;
2878 ret = netlink_parse_info(netlink_neigh_table, &zns->netlink_cmd,
2879 &dp_info, 0, 0);
2880
2881 return ret;
2882 }
2883
2884 int netlink_neigh_change(struct nlmsghdr *h, ns_id_t ns_id)
2885 {
2886 int len;
2887 struct ndmsg *ndm;
2888
2889 if (!(h->nlmsg_type == RTM_NEWNEIGH || h->nlmsg_type == RTM_DELNEIGH))
2890 return 0;
2891
2892 /* Length validity. */
2893 len = h->nlmsg_len - NLMSG_LENGTH(sizeof(struct ndmsg));
2894 if (len < 0) {
2895 zlog_err("%s: Message received from netlink is of a broken size %d %zu",
2896 __PRETTY_FUNCTION__, h->nlmsg_len,
2897 (size_t)NLMSG_LENGTH(sizeof(struct ndmsg)));
2898 return -1;
2899 }
2900
2901 /* Is this a notification for the MAC FDB or IP neighbor table? */
2902 ndm = NLMSG_DATA(h);
2903 if (ndm->ndm_family == AF_BRIDGE)
2904 return netlink_macfdb_change(h, len, ns_id);
2905
2906 if (ndm->ndm_type != RTN_UNICAST)
2907 return 0;
2908
2909 if (ndm->ndm_family == AF_INET || ndm->ndm_family == AF_INET6)
2910 return netlink_ipneigh_change(h, len, ns_id);
2911 else {
2912 flog_warn(
2913 EC_ZEBRA_UNKNOWN_FAMILY,
2914 "Invalid address family: %u received from kernel neighbor change: %s",
2915 ndm->ndm_family, nl_msg_type_to_str(h->nlmsg_type));
2916 return 0;
2917 }
2918
2919 return 0;
2920 }
2921
2922 static int netlink_neigh_update2(struct interface *ifp, struct ipaddr *ip,
2923 struct ethaddr *mac, uint8_t flags,
2924 uint16_t state, int cmd)
2925 {
2926 struct {
2927 struct nlmsghdr n;
2928 struct ndmsg ndm;
2929 char buf[256];
2930 } req;
2931 int ipa_len;
2932
2933 struct zebra_ns *zns;
2934 char buf[INET6_ADDRSTRLEN];
2935 char buf2[ETHER_ADDR_STRLEN];
2936 struct zebra_vrf *zvrf = zebra_vrf_lookup_by_id(ifp->vrf_id);
2937
2938 zns = zvrf->zns;
2939 memset(&req, 0, sizeof(req));
2940
2941 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ndmsg));
2942 req.n.nlmsg_flags = NLM_F_REQUEST;
2943 if (cmd == RTM_NEWNEIGH)
2944 req.n.nlmsg_flags |= (NLM_F_CREATE | NLM_F_REPLACE);
2945 req.n.nlmsg_type = cmd; // RTM_NEWNEIGH or RTM_DELNEIGH
2946 req.ndm.ndm_family = IS_IPADDR_V4(ip) ? AF_INET : AF_INET6;
2947 req.ndm.ndm_state = state;
2948 req.ndm.ndm_ifindex = ifp->ifindex;
2949 req.ndm.ndm_type = RTN_UNICAST;
2950 req.ndm.ndm_flags = flags;
2951
2952 ipa_len = IS_IPADDR_V4(ip) ? IPV4_MAX_BYTELEN : IPV6_MAX_BYTELEN;
2953 addattr_l(&req.n, sizeof(req), NDA_DST, &ip->ip.addr, ipa_len);
2954 if (mac)
2955 addattr_l(&req.n, sizeof(req), NDA_LLADDR, mac, 6);
2956
2957 if (IS_ZEBRA_DEBUG_KERNEL)
2958 zlog_debug("Tx %s family %s IF %s(%u) Neigh %s MAC %s flags 0x%x",
2959 nl_msg_type_to_str(cmd),
2960 nl_family_to_str(req.ndm.ndm_family), ifp->name,
2961 ifp->ifindex, ipaddr2str(ip, buf, sizeof(buf)),
2962 mac ? prefix_mac2str(mac, buf2, sizeof(buf2))
2963 : "null", flags);
2964
2965 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
2966 0);
2967 }
2968
2969 int kernel_add_mac(struct interface *ifp, vlanid_t vid, struct ethaddr *mac,
2970 struct in_addr vtep_ip, bool sticky)
2971 {
2972 return netlink_macfdb_update(ifp, vid, mac, vtep_ip, RTM_NEWNEIGH,
2973 sticky);
2974 }
2975
2976 int kernel_del_mac(struct interface *ifp, vlanid_t vid, struct ethaddr *mac,
2977 struct in_addr vtep_ip)
2978 {
2979 return netlink_macfdb_update(ifp, vid, mac, vtep_ip, RTM_DELNEIGH, 0);
2980 }
2981
2982 int kernel_add_neigh(struct interface *ifp, struct ipaddr *ip,
2983 struct ethaddr *mac, uint8_t flags)
2984 {
2985 return netlink_neigh_update2(ifp, ip, mac, flags,
2986 NUD_NOARP, RTM_NEWNEIGH);
2987 }
2988
2989 int kernel_del_neigh(struct interface *ifp, struct ipaddr *ip)
2990 {
2991 return netlink_neigh_update2(ifp, ip, NULL, 0, 0, RTM_DELNEIGH);
2992 }
2993
2994 /*
2995 * MPLS label forwarding table change via netlink interface.
2996 */
2997 int netlink_mpls_multipath(int cmd, zebra_lsp_t *lsp)
2998 {
2999 mpls_lse_t lse;
3000 zebra_nhlfe_t *nhlfe;
3001 struct nexthop *nexthop = NULL;
3002 unsigned int nexthop_num;
3003 const char *routedesc;
3004 struct zebra_ns *zns = zebra_ns_lookup(NS_DEFAULT);
3005 int route_type;
3006
3007 struct {
3008 struct nlmsghdr n;
3009 struct rtmsg r;
3010 char buf[NL_PKT_BUF_SIZE];
3011 } req;
3012
3013 memset(&req, 0, sizeof req - NL_PKT_BUF_SIZE);
3014
3015 /*
3016 * Count # nexthops so we can decide whether to use singlepath
3017 * or multipath case.
3018 */
3019 nexthop_num = 0;
3020 for (nhlfe = lsp->nhlfe_list; nhlfe; nhlfe = nhlfe->next) {
3021 nexthop = nhlfe->nexthop;
3022 if (!nexthop)
3023 continue;
3024 if (cmd == RTM_NEWROUTE) {
3025 /* Count all selected NHLFEs */
3026 if (CHECK_FLAG(nhlfe->flags, NHLFE_FLAG_SELECTED)
3027 && CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_ACTIVE))
3028 nexthop_num++;
3029 } else /* DEL */
3030 {
3031 /* Count all installed NHLFEs */
3032 if (CHECK_FLAG(nhlfe->flags, NHLFE_FLAG_INSTALLED)
3033 && CHECK_FLAG(nexthop->flags, NEXTHOP_FLAG_FIB))
3034 nexthop_num++;
3035 }
3036 }
3037
3038 if ((nexthop_num == 0) || (!lsp->best_nhlfe && (cmd != RTM_DELROUTE)))
3039 return 0;
3040
3041 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct rtmsg));
3042 req.n.nlmsg_flags = NLM_F_CREATE | NLM_F_REQUEST;
3043 req.n.nlmsg_type = cmd;
3044 req.n.nlmsg_pid = zns->netlink_cmd.snl.nl_pid;
3045
3046 req.r.rtm_family = AF_MPLS;
3047 req.r.rtm_table = RT_TABLE_MAIN;
3048 req.r.rtm_dst_len = MPLS_LABEL_LEN_BITS;
3049 req.r.rtm_scope = RT_SCOPE_UNIVERSE;
3050 req.r.rtm_type = RTN_UNICAST;
3051
3052 if (cmd == RTM_NEWROUTE) {
3053 /* We do a replace to handle update. */
3054 req.n.nlmsg_flags |= NLM_F_REPLACE;
3055
3056 /* set the protocol value if installing */
3057 route_type = re_type_from_lsp_type(lsp->best_nhlfe->type);
3058 req.r.rtm_protocol = zebra2proto(route_type);
3059 }
3060
3061 /* Fill destination */
3062 lse = mpls_lse_encode(lsp->ile.in_label, 0, 0, 1);
3063 addattr_l(&req.n, sizeof req, RTA_DST, &lse, sizeof(mpls_lse_t));
3064
3065 /* Fill nexthops (paths) based on single-path or multipath. The paths
3066 * chosen depend on the operation.
3067 */
3068 if (nexthop_num == 1 || multipath_num == 1) {
3069 routedesc = "single-path";
3070 _netlink_mpls_debug(cmd, lsp->ile.in_label, routedesc);
3071
3072 nexthop_num = 0;
3073 for (nhlfe = lsp->nhlfe_list; nhlfe; nhlfe = nhlfe->next) {
3074 nexthop = nhlfe->nexthop;
3075 if (!nexthop)
3076 continue;
3077
3078 if ((cmd == RTM_NEWROUTE
3079 && (CHECK_FLAG(nhlfe->flags, NHLFE_FLAG_SELECTED)
3080 && CHECK_FLAG(nexthop->flags,
3081 NEXTHOP_FLAG_ACTIVE)))
3082 || (cmd == RTM_DELROUTE
3083 && (CHECK_FLAG(nhlfe->flags,
3084 NHLFE_FLAG_INSTALLED)
3085 && CHECK_FLAG(nexthop->flags,
3086 NEXTHOP_FLAG_FIB)))) {
3087 /* Add the gateway */
3088 _netlink_mpls_build_singlepath(routedesc, nhlfe,
3089 &req.n, &req.r,
3090 sizeof req, cmd);
3091 nexthop_num++;
3092 break;
3093 }
3094 }
3095 } else /* Multipath case */
3096 {
3097 char buf[NL_PKT_BUF_SIZE];
3098 struct rtattr *rta = (void *)buf;
3099 struct rtnexthop *rtnh;
3100 union g_addr *src1 = NULL;
3101
3102 rta->rta_type = RTA_MULTIPATH;
3103 rta->rta_len = RTA_LENGTH(0);
3104 rtnh = RTA_DATA(rta);
3105
3106 routedesc = "multipath";
3107 _netlink_mpls_debug(cmd, lsp->ile.in_label, routedesc);
3108
3109 nexthop_num = 0;
3110 for (nhlfe = lsp->nhlfe_list; nhlfe; nhlfe = nhlfe->next) {
3111 nexthop = nhlfe->nexthop;
3112 if (!nexthop)
3113 continue;
3114
3115 if (nexthop_num >= multipath_num)
3116 break;
3117
3118 if ((cmd == RTM_NEWROUTE
3119 && (CHECK_FLAG(nhlfe->flags, NHLFE_FLAG_SELECTED)
3120 && CHECK_FLAG(nexthop->flags,
3121 NEXTHOP_FLAG_ACTIVE)))
3122 || (cmd == RTM_DELROUTE
3123 && (CHECK_FLAG(nhlfe->flags,
3124 NHLFE_FLAG_INSTALLED)
3125 && CHECK_FLAG(nexthop->flags,
3126 NEXTHOP_FLAG_FIB)))) {
3127 nexthop_num++;
3128
3129 /* Build the multipath */
3130 _netlink_mpls_build_multipath(routedesc, nhlfe,
3131 rta, rtnh, &req.r,
3132 &src1);
3133 rtnh = RTNH_NEXT(rtnh);
3134 }
3135 }
3136
3137 /* Add the multipath */
3138 if (rta->rta_len > RTA_LENGTH(0))
3139 addattr_l(&req.n, NL_PKT_BUF_SIZE, RTA_MULTIPATH,
3140 RTA_DATA(rta), RTA_PAYLOAD(rta));
3141 }
3142
3143 /* Talk to netlink socket. */
3144 return netlink_talk(netlink_talk_filter, &req.n, &zns->netlink_cmd, zns,
3145 0);
3146 }
3147 #endif /* HAVE_NETLINK */
FRRouting mirror