1 /* Kernel communication using routing socket.
2 * Copyright (C) 1999 Kunihiro Ishiguro
4 * This file is part of GNU Zebra.
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
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.
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
25 #include <net/if_types.h>
27 #include <netmpls/mpls.h>
32 #include "sockunion.h"
33 #include "connected.h"
35 #include "zebra_memory.h"
42 #include "lib_errors.h"
45 #include "zebra/interface.h"
46 #include "zebra/zebra_router.h"
47 #include "zebra/debug.h"
48 #include "zebra/kernel_socket.h"
49 #include "zebra/rib.h"
50 #include "zebra/zebra_errors.h"
51 #include "zebra/zebra_ptm.h"
53 extern struct zebra_privs_t zserv_privs
;
56 * Historically, the BSD routing socket has aligned data following a
57 * struct sockaddr to sizeof(long), which was 4 bytes on some
58 * platforms, and 8 bytes on others. NetBSD 6 changed the routing
59 * socket to align to sizeof(uint64_t), which is 8 bytes. OS X
60 * appears to align to sizeof(int), which is 4 bytes.
62 * Alignment of zero-sized sockaddrs is nonsensical, but historically
63 * BSD defines RT_ROUNDUP(0) to be the alignment interval (rather than
64 * 0). We follow this practice without questioning it, but it is a
65 * bug if quagga calls ROUNDUP with 0.
68 #define ROUNDUP_TYPE int
70 #define ROUNDUP_TYPE long
74 * Because of these varying conventions, the only sane approach is for
75 * the <net/route.h> header to define some flavor of ROUNDUP macro.
78 /* OS X (Xcode as of 2014-12) is known not to define RT_ROUNDUP */
79 #if defined(RT_ROUNDUP)
80 #define ROUNDUP(a) RT_ROUNDUP(a)
81 #endif /* defined(RT_ROUNDUP) */
84 /* Solaris has struct sockaddr_in[6] definitions at 16 / 32 bytes size,
85 * so the whole concept doesn't really apply. */
86 #define ROUNDUP(a) (a)
90 * If ROUNDUP has not yet been defined in terms of platform-provided
91 * defines, attempt to cope with heuristics.
96 * If you're porting to a platform that changed RT_ROUNDUP but doesn't
97 * have it in its headers, this will break rather obviously and you'll
98 * have to fix it here.
101 ((a) > 0 ? (1 + (((a)-1) | (sizeof(ROUNDUP_TYPE) - 1))) \
102 : sizeof(ROUNDUP_TYPE))
104 #endif /* defined(ROUNDUP) */
108 /* SAROUNDUP is the only thing we need, and SA_SIZE provides that */
109 #define SAROUNDUP(a) SA_SIZE(a)
112 * Given a pointer (sockaddr or void *), return the number of bytes
113 * taken up by the sockaddr and any padding needed for alignment.
115 #if defined(HAVE_STRUCT_SOCKADDR_SA_LEN)
116 #define SAROUNDUP(X) ROUNDUP(((struct sockaddr *)(X))->sa_len)
119 * One would hope all fixed-size structure definitions are aligned,
120 * but round them up nonetheless.
122 #define SAROUNDUP(X) \
123 (((struct sockaddr *)(X))->sa_family == AF_INET \
124 ? ROUNDUP(sizeof(struct sockaddr_in)) \
125 : (((struct sockaddr *)(X))->sa_family == AF_INET6 \
126 ? ROUNDUP(sizeof(struct sockaddr_in6)) \
127 : (((struct sockaddr *)(X))->sa_family == AF_LINK \
128 ? ROUNDUP(sizeof(struct sockaddr_dl)) \
129 : sizeof(struct sockaddr))))
130 #endif /* HAVE_STRUCT_SOCKADDR_SA_LEN */
132 #endif /* !SA_SIZE */
134 /* Routing socket message types. */
135 const struct message rtm_type_str
[] = {{RTM_ADD
, "RTM_ADD"},
136 {RTM_DELETE
, "RTM_DELETE"},
137 {RTM_CHANGE
, "RTM_CHANGE"},
138 {RTM_GET
, "RTM_GET"},
139 {RTM_LOSING
, "RTM_LOSING"},
140 {RTM_REDIRECT
, "RTM_REDIRECT"},
141 {RTM_MISS
, "RTM_MISS"},
143 {RTM_LOCK
, "RTM_LOCK"},
144 #endif /* RTM_LOCK */
146 {RTM_OLDADD
, "RTM_OLDADD"},
147 #endif /* RTM_OLDADD */
149 {RTM_OLDDEL
, "RTM_OLDDEL"},
150 #endif /* RTM_OLDDEL */
152 {RTM_RESOLVE
, "RTM_RESOLVE"},
153 #endif /* RTM_RESOLVE */
154 {RTM_NEWADDR
, "RTM_NEWADDR"},
155 {RTM_DELADDR
, "RTM_DELADDR"},
156 {RTM_IFINFO
, "RTM_IFINFO"},
158 {RTM_OIFINFO
, "RTM_OIFINFO"},
159 #endif /* RTM_OIFINFO */
161 {RTM_NEWMADDR
, "RTM_NEWMADDR"},
162 #endif /* RTM_NEWMADDR */
164 {RTM_DELMADDR
, "RTM_DELMADDR"},
165 #endif /* RTM_DELMADDR */
166 #ifdef RTM_IFANNOUNCE
167 {RTM_IFANNOUNCE
, "RTM_IFANNOUNCE"},
168 #endif /* RTM_IFANNOUNCE */
171 static const struct message rtm_flag_str
[] = {{RTF_UP
, "UP"},
172 {RTF_GATEWAY
, "GATEWAY"},
174 {RTF_REJECT
, "REJECT"},
175 {RTF_DYNAMIC
, "DYNAMIC"},
176 {RTF_MODIFIED
, "MODIFIED"},
180 #endif /* RTF_MASK */
182 {RTF_CLONING
, "CLONING"},
183 #endif /* RTF_CLONING */
185 {RTF_XRESOLVE
, "XRESOLVE"},
186 #endif /* RTF_XRESOLVE */
188 {RTF_LLINFO
, "LLINFO"},
189 #endif /* RTF_LLINFO */
190 {RTF_STATIC
, "STATIC"},
191 {RTF_BLACKHOLE
, "BLACKHOLE"},
193 {RTF_PRIVATE
, "PRIVATE"},
194 #endif /* RTF_PRIVATE */
195 {RTF_PROTO1
, "PROTO1"},
196 {RTF_PROTO2
, "PROTO2"},
198 {RTF_PRCLONING
, "PRCLONING"},
199 #endif /* RTF_PRCLONING */
201 {RTF_WASCLONED
, "WASCLONED"},
202 #endif /* RTF_WASCLONED */
204 {RTF_PROTO3
, "PROTO3"},
205 #endif /* RTF_PROTO3 */
207 {RTF_PINNED
, "PINNED"},
208 #endif /* RTF_PINNED */
210 {RTF_LOCAL
, "LOCAL"},
211 #endif /* RTF_LOCAL */
213 {RTF_BROADCAST
, "BROADCAST"},
214 #endif /* RTF_BROADCAST */
216 {RTF_MULTICAST
, "MULTICAST"},
217 #endif /* RTF_MULTICAST */
219 {RTF_MULTIRT
, "MULTIRT"},
220 #endif /* RTF_MULTIRT */
222 {RTF_SETSRC
, "SETSRC"},
223 #endif /* RTF_SETSRC */
226 /* Kernel routing update socket. */
227 int routing_sock
= -1;
229 /* Kernel dataplane routing update socket, used in the dataplane pthread
232 int dplane_routing_sock
= -1;
234 /* Yes I'm checking ugly routing socket behavior. */
237 size_t _rta_get(caddr_t sap
, void *destp
, size_t destlen
, bool checkaf
);
238 size_t rta_get(caddr_t sap
, void *dest
, size_t destlen
);
239 size_t rta_getattr(caddr_t sap
, void *destp
, size_t destlen
);
240 size_t rta_getsdlname(caddr_t sap
, void *dest
, short *destlen
);
241 const char *rtatostr(unsigned int flags
, char *buf
, size_t buflen
);
243 /* Supported address family check. */
244 static inline int af_check(int family
)
246 if (family
== AF_INET
)
248 if (family
== AF_INET6
)
253 size_t _rta_get(caddr_t sap
, void *destp
, size_t destlen
, bool checkaf
)
255 struct sockaddr
*sa
= (struct sockaddr
*)sap
;
256 struct sockaddr_dl
*sdl
;
257 uint8_t *dest
= destp
;
258 size_t tlen
, copylen
;
260 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
261 copylen
= sa
->sa_len
;
262 tlen
= (copylen
== 0) ? sizeof(ROUNDUP_TYPE
) : ROUNDUP(copylen
);
263 #else /* !HAVE_STRUCT_SOCKADDR_SA_LEN */
264 copylen
= tlen
= SAROUNDUP(sap
);
265 #endif /* !HAVE_STRUCT_SOCKADDR_SA_LEN */
267 if (copylen
> 0 && dest
!= NULL
) {
268 if (checkaf
&& af_check(sa
->sa_family
) == 0)
271 * Handle sockaddr_dl corner case:
272 * RTA_NETMASK might be AF_LINK, but it doesn't anything
273 * relevant (e.g. zeroed out fields). Check for this
274 * case and avoid warning log message.
276 if (sa
->sa_family
== AF_LINK
) {
277 sdl
= (struct sockaddr_dl
*)sa
;
278 if (sdl
->sdl_index
== 0 || sdl
->sdl_nlen
== 0)
282 if (copylen
> destlen
) {
283 zlog_warn("%s: destination buffer too small (%lu vs %lu)",
284 __func__
, copylen
, destlen
);
285 memcpy(dest
, sap
, destlen
);
287 memcpy(dest
, sap
, copylen
);
293 size_t rta_get(caddr_t sap
, void *destp
, size_t destlen
)
295 return _rta_get(sap
, destp
, destlen
, true);
298 size_t rta_getattr(caddr_t sap
, void *destp
, size_t destlen
)
300 return _rta_get(sap
, destp
, destlen
, false);
303 size_t rta_getsdlname(caddr_t sap
, void *destp
, short *destlen
)
305 struct sockaddr_dl
*sdl
= (struct sockaddr_dl
*)sap
;
306 struct sockaddr
*sa
= (struct sockaddr
*)sap
;
307 uint8_t *dest
= destp
;
308 size_t tlen
, copylen
;
310 copylen
= sdl
->sdl_nlen
;
311 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
312 tlen
= (sa
->sa_len
== 0) ? sizeof(ROUNDUP_TYPE
) : ROUNDUP(sa
->sa_len
);
313 #else /* !HAVE_STRUCT_SOCKADDR_SA_LEN */
314 tlen
= SAROUNDUP(sap
);
315 #endif /* !HAVE_STRUCT_SOCKADDR_SA_LEN */
317 if (copylen
> 0 && dest
!= NULL
&& sdl
->sdl_family
== AF_LINK
) {
318 if (copylen
> IFNAMSIZ
) {
319 zlog_warn("%s: destination buffer too small (%lu vs %d)",
320 __func__
, copylen
, IFNAMSIZ
);
321 memcpy(dest
, sdl
->sdl_data
, IFNAMSIZ
);
325 memcpy(dest
, sdl
->sdl_data
, copylen
);
335 const char *rtatostr(unsigned int flags
, char *buf
, size_t buflen
)
337 const char *flagstr
, *bufstart
;
341 /* Hold the pointer to the buffer beginning. */
344 for (bit
= 1; bit
; bit
<<= 1) {
345 if ((flags
& bit
) == 0)
362 #endif /* RTA_GENMASK */
373 #endif /* RTA_AUTHOR */
386 #endif /* RTA_SRCMASK */
391 #endif /* RTA_LABEL */
394 snprintf(ustr
, sizeof(ustr
), "0x%x", bit
);
399 wlen
= snprintf(buf
, buflen
, "%s,", flagstr
);
404 /* Check for empty buffer. */
408 /* Remove the last comma. */
414 /* Dump routing table flag for debug purpose. */
415 static void rtm_flag_dump(int flag
)
417 const struct message
*mes
;
418 static char buf
[BUFSIZ
];
421 for (mes
= rtm_flag_str
; mes
->key
!= 0; mes
++) {
422 if (mes
->key
& flag
) {
423 strlcat(buf
, mes
->str
, BUFSIZ
);
424 strlcat(buf
, " ", BUFSIZ
);
427 zlog_debug("Kernel: %s", buf
);
430 #ifdef RTM_IFANNOUNCE
431 /* Interface adding function */
432 static int ifan_read(struct if_announcemsghdr
*ifan
)
434 struct interface
*ifp
;
436 ifp
= if_lookup_by_index(ifan
->ifan_index
, VRF_DEFAULT
);
439 assert((ifp
->ifindex
== ifan
->ifan_index
)
440 || (ifp
->ifindex
== IFINDEX_INTERNAL
));
442 if ((ifp
== NULL
) || ((ifp
->ifindex
== IFINDEX_INTERNAL
)
443 && (ifan
->ifan_what
== IFAN_ARRIVAL
))) {
444 if (IS_ZEBRA_DEBUG_KERNEL
)
446 "%s: creating interface for ifindex %d, name %s",
447 __func__
, ifan
->ifan_index
, ifan
->ifan_name
);
449 /* Create Interface */
450 ifp
= if_get_by_name(ifan
->ifan_name
, VRF_DEFAULT
);
451 if_set_index(ifp
, ifan
->ifan_index
);
455 } else if (ifp
!= NULL
&& ifan
->ifan_what
== IFAN_DEPARTURE
)
456 if_delete_update(ifp
);
462 if (IS_ZEBRA_DEBUG_KERNEL
)
463 zlog_debug("%s: interface %s index %d", __func__
,
464 ifan
->ifan_name
, ifan
->ifan_index
);
468 #endif /* RTM_IFANNOUNCE */
470 #ifdef HAVE_BSD_IFI_LINK_STATE
471 /* BSD link detect translation */
472 static void bsd_linkdetect_translate(struct if_msghdr
*ifm
)
474 if ((ifm
->ifm_data
.ifi_link_state
>= LINK_STATE_UP
)
475 || (ifm
->ifm_data
.ifi_link_state
== LINK_STATE_UNKNOWN
))
476 SET_FLAG(ifm
->ifm_flags
, IFF_RUNNING
);
478 UNSET_FLAG(ifm
->ifm_flags
, IFF_RUNNING
);
480 #endif /* HAVE_BSD_IFI_LINK_STATE */
482 static enum zebra_link_type
sdl_to_zebra_link_type(unsigned int sdlt
)
486 return ZEBRA_LLT_ETHER
;
488 return ZEBRA_LLT_X25
;
490 return ZEBRA_LLT_FDDI
;
492 return ZEBRA_LLT_PPP
;
494 return ZEBRA_LLT_LOOPBACK
;
496 return ZEBRA_LLT_SLIP
;
498 return ZEBRA_LLT_ARCNET
;
500 return ZEBRA_LLT_ATM
;
502 return ZEBRA_LLT_LOCALTLK
;
504 return ZEBRA_LLT_HIPPI
;
507 return ZEBRA_LLT_IEEE1394
;
511 return ZEBRA_LLT_UNKNOWN
;
516 * Handle struct if_msghdr obtained from reading routing socket or
517 * sysctl (from interface_list). There may or may not be sockaddrs
518 * present after the header.
520 int ifm_read(struct if_msghdr
*ifm
)
522 struct interface
*ifp
= NULL
;
523 struct sockaddr_dl
*sdl
;
524 char ifname
[IFNAMSIZ
];
530 /* terminate ifname at head (for strnlen) and tail (for safety) */
531 ifname
[IFNAMSIZ
- 1] = '\0';
533 /* paranoia: sanity check structure */
534 if (ifm
->ifm_msglen
< sizeof(struct if_msghdr
)) {
535 flog_err(EC_ZEBRA_NETLINK_LENGTH_ERROR
,
536 "ifm_read: ifm->ifm_msglen %d too short\n",
542 * Check for a sockaddr_dl following the message. First, point to
543 * where a socakddr might be if one follows the message.
545 cp
= (void *)(ifm
+ 1);
549 * XXX This behavior should be narrowed to only the kernel versions
550 * for which the structures returned do not match the headers.
552 * if_msghdr_t on 64 bit kernels in Solaris 9 and earlier versions
553 * is 12 bytes larger than the 32 bit version.
555 if (((struct sockaddr
*)cp
)->sa_family
== AF_UNSPEC
)
559 /* Look up for RTA_IFP and skip others. */
560 for (maskbit
= 1; maskbit
; maskbit
<<= 1) {
561 if ((maskbit
& ifm
->ifm_addrs
) == 0)
563 if (maskbit
!= RTA_IFP
) {
564 cp
+= rta_get(cp
, NULL
, 0);
568 /* Save the pointer to the structure. */
569 sdl
= (struct sockaddr_dl
*)cp
;
570 cp
+= rta_getsdlname(cp
, ifname
, &ifnlen
);
573 if (IS_ZEBRA_DEBUG_KERNEL
)
574 zlog_debug("%s: sdl ifname %s addrs {%s}", __func__
,
575 (ifnlen
? ifname
: "(nil)"),
576 rtatostr(ifm
->ifm_addrs
, fbuf
, sizeof(fbuf
)));
579 * Look up on ifindex first, because ifindices are the primary handle
581 * interfaces across the user/kernel boundary, for most systems. (Some
582 * messages, such as up/down status changes on NetBSD, do not include a
585 if ((ifp
= if_lookup_by_index(ifm
->ifm_index
, VRF_DEFAULT
)) != NULL
) {
586 /* we have an ifp, verify that the name matches as some systems,
587 * eg Solaris, have a 1:many association of ifindex:ifname
588 * if they dont match, we dont have the correct ifp and should
589 * set it back to NULL to let next check do lookup by name
591 if (ifnlen
&& (strncmp(ifp
->name
, ifname
, IFNAMSIZ
) != 0)) {
592 if (IS_ZEBRA_DEBUG_KERNEL
)
594 "%s: ifp name %s doesn't match sdl name %s",
595 __func__
, ifp
->name
, ifname
);
601 * If we dont have an ifp, try looking up by name. Particularly as some
602 * systems (Solaris) have a 1:many mapping of ifindex:ifname - the
604 * is therefore our unique handle to that interface.
606 * Interfaces specified in the configuration file for which the ifindex
607 * has not been determined will have ifindex == IFINDEX_INTERNAL, and
609 * interfaces are found by this search, and then their ifindex values
613 if ((ifp
== NULL
) && ifnlen
)
614 ifp
= if_lookup_by_name(ifname
, VRF_DEFAULT
);
617 * If ifp still does not exist or has an invalid index
618 * (IFINDEX_INTERNAL),
619 * create or fill in an interface.
621 if ((ifp
== NULL
) || (ifp
->ifindex
== IFINDEX_INTERNAL
)) {
623 * To create or fill in an interface, a sockaddr_dl (via
624 * RTA_IFP) is required.
627 zlog_debug("Interface index %d (new) missing ifname",
632 #ifndef RTM_IFANNOUNCE
633 /* Down->Down interface should be ignored here.
634 * See further comment below.
636 if (!CHECK_FLAG(ifm
->ifm_flags
, IFF_UP
))
638 #endif /* !RTM_IFANNOUNCE */
641 /* Interface that zebra was not previously aware of, so
643 ifp
= if_create(ifname
, VRF_DEFAULT
);
644 if (IS_ZEBRA_DEBUG_KERNEL
)
645 zlog_debug("%s: creating ifp for ifindex %d",
646 __func__
, ifm
->ifm_index
);
649 if (IS_ZEBRA_DEBUG_KERNEL
)
651 "%s: updated/created ifp, ifname %s, ifindex %d",
652 __func__
, ifp
->name
, ifp
->ifindex
);
654 * Fill in newly created interface structure, or larval
655 * structure with ifindex IFINDEX_INTERNAL.
657 if_set_index(ifp
, ifm
->ifm_index
);
659 #ifdef HAVE_BSD_IFI_LINK_STATE /* translate BSD kernel msg for link-state */
660 bsd_linkdetect_translate(ifm
);
661 #endif /* HAVE_BSD_IFI_LINK_STATE */
663 if_flags_update(ifp
, ifm
->ifm_flags
);
664 #if defined(__bsdi__)
668 #endif /* __bsdi__ */
672 * XXX sockaddr_dl contents can be larger than the structure
673 * definition. There are 2 big families here:
674 * - BSD has sdl_len + sdl_data[16] + overruns sdl_data
675 * we MUST use sdl_len here or we'll truncate data.
676 * - Solaris has no sdl_len, but sdl_data[244]
677 * presumably, it's not going to run past that, so sizeof()
679 * a nonzero ifnlen from rta_getsdlname() means sdl is valid
681 ifp
->ll_type
= ZEBRA_LLT_UNKNOWN
;
682 ifp
->hw_addr_len
= 0;
684 #ifdef HAVE_STRUCT_SOCKADDR_DL_SDL_LEN
685 memcpy(&((struct zebra_if
*)ifp
->info
)->sdl
, sdl
,
688 memcpy(&((struct zebra_if
*)ifp
->info
)->sdl
, sdl
,
689 sizeof(struct sockaddr_dl
));
690 #endif /* HAVE_STRUCT_SOCKADDR_DL_SDL_LEN */
692 ifp
->ll_type
= sdl_to_zebra_link_type(sdl
->sdl_type
);
693 if (sdl
->sdl_alen
<= sizeof(ifp
->hw_addr
)) {
694 memcpy(ifp
->hw_addr
, LLADDR(sdl
),
696 ifp
->hw_addr_len
= sdl
->sdl_alen
;
703 * Interface structure exists. Adjust stored flags from
704 * notification. If interface has up->down or down->up
705 * transition, call state change routines (to adjust routes,
706 * notify routing daemons, etc.). (Other flag changes are stored
707 * but apparently do not trigger action.)
710 if (ifp
->ifindex
!= ifm
->ifm_index
) {
712 "%s: index mismatch, ifname %s, ifp index %d, "
714 __func__
, ifp
->name
, ifp
->ifindex
,
719 #ifdef HAVE_BSD_IFI_LINK_STATE /* translate BSD kernel msg for link-state */
720 bsd_linkdetect_translate(ifm
);
721 #endif /* HAVE_BSD_IFI_LINK_STATE */
723 /* update flags and handle operative->inoperative transition, if
725 if_flags_update(ifp
, ifm
->ifm_flags
);
727 #ifndef RTM_IFANNOUNCE
728 if (!if_is_up(ifp
)) {
729 /* No RTM_IFANNOUNCE on this platform, so we can never
730 * distinguish between ~IFF_UP and delete. We must
732 * it has been deleted.
733 * Eg, Solaris will not notify us of unplumb.
735 * XXX: Fixme - this should be runtime detected
736 * So that a binary compiled on a system with IFANNOUNCE
737 * will still behave correctly if run on a platform
740 if_delete_update(ifp
);
742 #endif /* RTM_IFANNOUNCE */
744 #if defined(__bsdi__)
748 #endif /* __bsdi__ */
753 #ifdef HAVE_NET_RT_IFLIST
754 ifp
->stats
= ifm
->ifm_data
;
755 #endif /* HAVE_NET_RT_IFLIST */
756 ifp
->speed
= ifm
->ifm_data
.ifi_baudrate
/ 1000000;
758 if (IS_ZEBRA_DEBUG_KERNEL
)
759 zlog_debug("%s: interface %s index %d", __func__
, ifp
->name
,
765 /* Address read from struct ifa_msghdr. */
766 static void ifam_read_mesg(struct ifa_msghdr
*ifm
, union sockunion
*addr
,
767 union sockunion
*mask
, union sockunion
*brd
,
768 char *ifname
, short *ifnlen
)
772 union sockunion gateway
;
776 pnt
= (caddr_t
)(ifm
+ 1);
777 end
= ((caddr_t
)ifm
) + ifm
->ifam_msglen
;
779 /* Be sure structure is cleared */
780 memset(mask
, 0, sizeof(union sockunion
));
781 memset(addr
, 0, sizeof(union sockunion
));
782 memset(brd
, 0, sizeof(union sockunion
));
783 memset(&dst
, 0, sizeof(union sockunion
));
784 memset(&gateway
, 0, sizeof(union sockunion
));
786 /* We fetch each socket variable into sockunion. */
787 for (maskbit
= 1; maskbit
; maskbit
<<= 1) {
788 if ((maskbit
& ifm
->ifam_addrs
) == 0)
793 pnt
+= rta_get(pnt
, &dst
, sizeof(dst
));
796 pnt
+= rta_get(pnt
, &gateway
, sizeof(gateway
));
799 pnt
+= rta_getattr(pnt
, mask
, sizeof(*mask
));
802 pnt
+= rta_getsdlname(pnt
, ifname
, ifnlen
);
805 pnt
+= rta_get(pnt
, addr
, sizeof(*addr
));
808 pnt
+= rta_get(pnt
, brd
, sizeof(*brd
));
812 pnt
+= rta_get(pnt
, NULL
, 0);
817 zlog_warn("%s: overflow detected (pnt:%p end:%p)",
823 if (IS_ZEBRA_DEBUG_KERNEL
) {
824 switch (sockunion_family(addr
)) {
827 char buf
[4][INET6_ADDRSTRLEN
];
829 (sockunion_family(addr
) == AF_INET
)
830 ? ip_masklen(mask
->sin
.sin_addr
)
831 : ip6_masklen(mask
->sin6
.sin6_addr
);
833 "%s: ifindex %d, ifname %s, ifam_addrs {%s}, "
834 "ifam_flags 0x%x, addr %s/%d broad %s dst %s "
836 __func__
, ifm
->ifam_index
,
837 (ifnlen
? ifname
: "(nil)"),
838 rtatostr(ifm
->ifam_addrs
, fbuf
, sizeof(fbuf
)),
840 sockunion2str(addr
, buf
[0], sizeof(buf
[0])),
842 sockunion2str(brd
, buf
[1], sizeof(buf
[1])),
843 sockunion2str(&dst
, buf
[2], sizeof(buf
[2])),
844 sockunion2str(&gateway
, buf
[2],
848 zlog_debug("%s: ifindex %d, ifname %s, ifam_addrs {%s}",
849 __func__
, ifm
->ifam_index
,
850 (ifnlen
? ifname
: "(nil)"),
851 rtatostr(ifm
->ifam_addrs
, fbuf
,
857 /* Assert read up end point matches to end point */
858 pnt
= (caddr_t
)ROUNDUP((size_t)pnt
);
859 if (pnt
!= (caddr_t
)ROUNDUP((size_t)end
))
860 zlog_debug("ifam_read() doesn't read all socket data");
863 /* Interface's address information get. */
864 int ifam_read(struct ifa_msghdr
*ifam
)
866 struct interface
*ifp
= NULL
;
867 union sockunion addr
, mask
, brd
;
868 char ifname
[INTERFACE_NAMSIZ
];
873 ifname
[0] = ifname
[INTERFACE_NAMSIZ
- 1] = '\0';
875 /* Allocate and read address information. */
876 ifam_read_mesg(ifam
, &addr
, &mask
, &brd
, ifname
, &ifnlen
);
878 if ((ifp
= if_lookup_by_index(ifam
->ifam_index
, VRF_DEFAULT
)) == NULL
) {
879 flog_warn(EC_ZEBRA_UNKNOWN_INTERFACE
,
880 "%s: no interface for ifname %s, index %d", __func__
,
881 ifname
, ifam
->ifam_index
);
885 if (ifnlen
&& strncmp(ifp
->name
, ifname
, INTERFACE_NAMSIZ
))
888 /* N.B. The info in ifa_msghdr does not tell us whether the RTA_BRD
889 field contains a broadcast address or a peer address, so we are
891 rely upon the interface type. */
892 if (if_is_pointopoint(ifp
))
893 SET_FLAG(flags
, ZEBRA_IFA_PEER
);
896 /* it might seem cute to grab the interface metric here, however
897 * we're processing an address update message, and so some systems
898 * (e.g. FBSD) dont bother to fill in ifam_metric. Disabled, but left
899 * in deliberately, as comment.
901 ifp
->metric
= ifam
->ifam_metric
;
904 /* Add connected address. */
905 switch (sockunion_family(&addr
)) {
907 if (ifam
->ifam_type
== RTM_NEWADDR
)
908 connected_add_ipv4(ifp
, flags
, &addr
.sin
.sin_addr
,
909 ip_masklen(mask
.sin
.sin_addr
),
911 (isalias
? ifname
: NULL
),
914 connected_delete_ipv4(ifp
, flags
, &addr
.sin
.sin_addr
,
915 ip_masklen(mask
.sin
.sin_addr
),
919 /* Unset interface index from link-local address when IPv6 stack
921 if (IN6_IS_ADDR_LINKLOCAL(&addr
.sin6
.sin6_addr
)) {
922 SET_IN6_LINKLOCAL_IFINDEX(addr
.sin6
.sin6_addr
, 0);
925 if (ifam
->ifam_type
== RTM_NEWADDR
)
926 connected_add_ipv6(ifp
, flags
, &addr
.sin6
.sin6_addr
,
928 ip6_masklen(mask
.sin6
.sin6_addr
),
929 (isalias
? ifname
: NULL
),
932 connected_delete_ipv6(ifp
, &addr
.sin6
.sin6_addr
, NULL
,
933 ip6_masklen(mask
.sin6
.sin6_addr
));
936 /* Unsupported family silently ignore... */
940 /* Check interface flag for implicit up of the interface. */
944 /* In addition to lacking IFANNOUNCE, on SUNOS IFF_UP is strange.
945 * See comments for SUNOS_5 in interface.c::if_flags_mangle.
947 * Here we take care of case where the real IFF_UP was previously
948 * unset (as kept in struct zebra_if.primary_state) and the mangled
949 * IFF_UP (ie IFF_UP set || listcount(connected) has now transitioned
950 * to unset due to the lost non-primary address having DELADDR'd.
952 * we must delete the interface, because in between here and next
953 * event for this interface-name the administrator could unplumb
954 * and replumb the interface.
957 if_delete_update(ifp
);
963 /* Interface function for reading kernel routing table information. */
964 static int rtm_read_mesg(struct rt_msghdr
*rtm
, union sockunion
*dest
,
965 union sockunion
*mask
, union sockunion
*gate
,
966 char *ifname
, short *ifnlen
)
971 /* Pnt points out socket data start point. */
972 pnt
= (caddr_t
)(rtm
+ 1);
973 end
= ((caddr_t
)rtm
) + rtm
->rtm_msglen
;
975 /* rt_msghdr version check. */
976 if (rtm
->rtm_version
!= RTM_VERSION
)
977 flog_warn(EC_ZEBRA_RTM_VERSION_MISMATCH
,
978 "Routing message version different %d should be %d."
979 "This may cause problem\n",
980 rtm
->rtm_version
, RTM_VERSION
);
982 /* Be sure structure is cleared */
983 memset(dest
, 0, sizeof(union sockunion
));
984 memset(gate
, 0, sizeof(union sockunion
));
985 memset(mask
, 0, sizeof(union sockunion
));
987 /* We fetch each socket variable into sockunion. */
988 /* We fetch each socket variable into sockunion. */
989 for (maskbit
= 1; maskbit
; maskbit
<<= 1) {
990 if ((maskbit
& rtm
->rtm_addrs
) == 0)
995 pnt
+= rta_get(pnt
, dest
, sizeof(*dest
));
998 pnt
+= rta_get(pnt
, gate
, sizeof(*gate
));
1001 pnt
+= rta_getattr(pnt
, mask
, sizeof(*mask
));
1004 pnt
+= rta_getsdlname(pnt
, ifname
, ifnlen
);
1008 pnt
+= rta_get(pnt
, NULL
, 0);
1013 zlog_warn("%s: overflow detected (pnt:%p end:%p)",
1014 __func__
, pnt
, end
);
1019 /* If there is netmask information set it's family same as
1020 destination family*/
1021 if (rtm
->rtm_addrs
& RTA_NETMASK
)
1022 mask
->sa
.sa_family
= dest
->sa
.sa_family
;
1024 /* Assert read up to the end of pointer. */
1026 zlog_debug("rtm_read() doesn't read all socket data.");
1028 return rtm
->rtm_flags
;
1031 void rtm_read(struct rt_msghdr
*rtm
)
1034 uint8_t zebra_flags
;
1035 union sockunion dest
, mask
, gate
;
1036 char ifname
[INTERFACE_NAMSIZ
+ 1];
1040 ifindex_t ifindex
= 0;
1046 /* Read destination and netmask and gateway from rtm message
1048 flags
= rtm_read_mesg(rtm
, &dest
, &mask
, &gate
, ifname
, &ifnlen
);
1049 if (!(flags
& RTF_DONE
))
1051 if (IS_ZEBRA_DEBUG_KERNEL
)
1052 zlog_debug("%s: got rtm of type %d (%s) addrs {%s}", __func__
,
1054 lookup_msg(rtm_type_str
, rtm
->rtm_type
, NULL
),
1055 rtatostr(rtm
->rtm_addrs
, fbuf
, sizeof(fbuf
)));
1057 #ifdef RTF_CLONED /*bsdi, netbsd 1.6*/
1058 if (flags
& RTF_CLONED
)
1061 #ifdef RTF_WASCLONED /*freebsd*/
1062 if (flags
& RTF_WASCLONED
)
1066 if ((rtm
->rtm_type
== RTM_ADD
|| rtm
->rtm_type
== RTM_CHANGE
)
1067 && !(flags
& RTF_UP
))
1070 /* This is connected route. */
1071 if (!(flags
& RTF_GATEWAY
))
1074 if (flags
& RTF_PROTO1
)
1075 SET_FLAG(zebra_flags
, ZEBRA_FLAG_SELFROUTE
);
1077 memset(&nh
, 0, sizeof(nh
));
1079 nh
.vrf_id
= VRF_DEFAULT
;
1080 /* This is a reject or blackhole route */
1081 if (flags
& RTF_REJECT
) {
1082 nh
.type
= NEXTHOP_TYPE_BLACKHOLE
;
1083 nh
.bh_type
= BLACKHOLE_REJECT
;
1084 } else if (flags
& RTF_BLACKHOLE
) {
1085 nh
.type
= NEXTHOP_TYPE_BLACKHOLE
;
1086 nh
.bh_type
= BLACKHOLE_NULL
;
1090 * Ignore our own messages.
1092 if (rtm
->rtm_type
!= RTM_GET
&& rtm
->rtm_pid
== pid
)
1095 if (dest
.sa
.sa_family
== AF_INET
) {
1098 p
.u
.prefix4
= dest
.sin
.sin_addr
;
1099 if (flags
& RTF_HOST
)
1100 p
.prefixlen
= IPV4_MAX_PREFIXLEN
;
1102 p
.prefixlen
= ip_masklen(mask
.sin
.sin_addr
);
1105 nh
.type
= NEXTHOP_TYPE_IPV4
;
1106 nh
.gate
.ipv4
= gate
.sin
.sin_addr
;
1108 } else if (dest
.sa
.sa_family
== AF_INET6
) {
1110 p
.family
= AF_INET6
;
1111 p
.u
.prefix6
= dest
.sin6
.sin6_addr
;
1112 if (flags
& RTF_HOST
)
1113 p
.prefixlen
= IPV6_MAX_PREFIXLEN
;
1115 p
.prefixlen
= ip6_masklen(mask
.sin6
.sin6_addr
);
1118 if (IN6_IS_ADDR_LINKLOCAL(&gate
.sin6
.sin6_addr
)) {
1119 ifindex
= IN6_LINKLOCAL_IFINDEX(gate
.sin6
.sin6_addr
);
1120 SET_IN6_LINKLOCAL_IFINDEX(gate
.sin6
.sin6_addr
, 0);
1125 nh
.type
= ifindex
? NEXTHOP_TYPE_IPV6_IFINDEX
1126 : NEXTHOP_TYPE_IPV6
;
1127 nh
.gate
.ipv6
= gate
.sin6
.sin6_addr
;
1128 nh
.ifindex
= ifindex
;
1134 * CHANGE: delete the old prefix, we have no further information
1135 * to specify the route really
1137 if (rtm
->rtm_type
== RTM_CHANGE
)
1138 rib_delete(afi
, SAFI_UNICAST
, VRF_DEFAULT
, ZEBRA_ROUTE_KERNEL
,
1139 0, zebra_flags
, &p
, NULL
, NULL
, 0, 0, 0, true);
1140 if (rtm
->rtm_type
== RTM_GET
|| rtm
->rtm_type
== RTM_ADD
1141 || rtm
->rtm_type
== RTM_CHANGE
)
1142 rib_add(afi
, SAFI_UNICAST
, VRF_DEFAULT
, ZEBRA_ROUTE_KERNEL
, 0,
1143 zebra_flags
, &p
, NULL
, &nh
, 0, 0, 0, 0, 0);
1145 rib_delete(afi
, SAFI_UNICAST
, VRF_DEFAULT
, ZEBRA_ROUTE_KERNEL
,
1146 0, zebra_flags
, &p
, NULL
, &nh
, 0, 0, 0, true);
1149 /* Interface function for the kernel routing table updates. Support
1150 * for RTM_CHANGE will be needed.
1151 * Exported only for rt_socket.c
1153 int rtm_write(int message
, union sockunion
*dest
, union sockunion
*mask
,
1154 union sockunion
*gate
, union sockunion
*mpls
, unsigned int index
,
1155 enum blackhole_type bh_type
, int metric
)
1159 struct interface
*ifp
;
1161 /* Sequencial number of routing message. */
1162 static int msg_seq
= 0;
1164 /* Struct of rt_msghdr and buffer for storing socket's data. */
1166 struct rt_msghdr rtm
;
1170 if (dplane_routing_sock
< 0)
1171 return ZEBRA_ERR_EPERM
;
1173 /* Clear and set rt_msghdr values */
1174 memset(&msg
, 0, sizeof(struct rt_msghdr
));
1175 msg
.rtm
.rtm_version
= RTM_VERSION
;
1176 msg
.rtm
.rtm_type
= message
;
1177 msg
.rtm
.rtm_seq
= msg_seq
++;
1178 msg
.rtm
.rtm_addrs
= RTA_DST
;
1179 msg
.rtm
.rtm_addrs
|= RTA_GATEWAY
;
1180 msg
.rtm
.rtm_flags
= RTF_UP
;
1182 msg
.rtm
.rtm_flags
|= RTF_MPATH
;
1183 msg
.rtm
.rtm_fmask
= RTF_MPLS
;
1185 msg
.rtm
.rtm_index
= index
;
1188 msg
.rtm
.rtm_rmx
.rmx_hopcount
= metric
;
1189 msg
.rtm
.rtm_inits
|= RTV_HOPCOUNT
;
1192 ifp
= if_lookup_by_index(index
, VRF_DEFAULT
);
1194 if (gate
&& (message
== RTM_ADD
|| message
== RTM_CHANGE
))
1195 msg
.rtm
.rtm_flags
|= RTF_GATEWAY
;
1197 /* When RTF_CLONING is unavailable on BSD, should we set some
1198 * other flag instead?
1201 if (!gate
&& (message
== RTM_ADD
|| message
== RTM_CHANGE
) && ifp
1202 && (ifp
->flags
& IFF_POINTOPOINT
) == 0)
1203 msg
.rtm
.rtm_flags
|= RTF_CLONING
;
1204 #endif /* RTF_CLONING */
1206 /* If no protocol specific gateway is specified, use link
1207 address for gateway. */
1210 char dest_buf
[INET_ADDRSTRLEN
] = "NULL",
1211 mask_buf
[INET_ADDRSTRLEN
] = "255.255.255.255";
1213 inet_ntop(AF_INET
, &dest
->sin
.sin_addr
,
1214 dest_buf
, INET_ADDRSTRLEN
);
1216 inet_ntop(AF_INET
, &mask
->sin
.sin_addr
,
1217 mask_buf
, INET_ADDRSTRLEN
);
1219 EC_ZEBRA_RTM_NO_GATEWAY
,
1220 "%s: %s/%s: gate == NULL and no gateway found for ifindex %d",
1221 __func__
, dest_buf
, mask_buf
, index
);
1224 gate
= (union sockunion
*)&((struct zebra_if
*)ifp
->info
)->sdl
;
1228 msg
.rtm
.rtm_addrs
|= RTA_NETMASK
;
1229 else if (message
== RTM_ADD
|| message
== RTM_CHANGE
)
1230 msg
.rtm
.rtm_flags
|= RTF_HOST
;
1234 msg
.rtm
.rtm_addrs
|= RTA_SRC
;
1235 msg
.rtm
.rtm_flags
|= RTF_MPLS
;
1237 if (mpls
->smpls
.smpls_label
1238 != htonl(MPLS_LABEL_IMPLICIT_NULL
<< MPLS_LABEL_OFFSET
))
1239 msg
.rtm
.rtm_mpls
= MPLS_OP_PUSH
;
1243 /* Tagging route with flags */
1244 msg
.rtm
.rtm_flags
|= (RTF_PROTO1
);
1247 case BLACKHOLE_UNSPEC
:
1249 case BLACKHOLE_REJECT
:
1250 msg
.rtm
.rtm_flags
|= RTF_REJECT
;
1253 msg
.rtm
.rtm_flags
|= RTF_BLACKHOLE
;
1258 #define SOCKADDRSET(X, R) \
1259 if (msg.rtm.rtm_addrs & (R)) { \
1260 int len = SAROUNDUP(X); \
1261 memcpy(pnt, (caddr_t)(X), len); \
1265 pnt
= (caddr_t
)msg
.buf
;
1267 /* Write each socket data into rtm message buffer */
1268 SOCKADDRSET(dest
, RTA_DST
);
1269 SOCKADDRSET(gate
, RTA_GATEWAY
);
1270 SOCKADDRSET(mask
, RTA_NETMASK
);
1272 SOCKADDRSET(mpls
, RTA_SRC
);
1275 msg
.rtm
.rtm_msglen
= pnt
- (caddr_t
)&msg
;
1277 ret
= write(dplane_routing_sock
, &msg
, msg
.rtm
.rtm_msglen
);
1279 if (ret
!= msg
.rtm
.rtm_msglen
) {
1280 if (errno
== EEXIST
)
1281 return ZEBRA_ERR_RTEXIST
;
1282 if (errno
== ENETUNREACH
)
1283 return ZEBRA_ERR_RTUNREACH
;
1285 return ZEBRA_ERR_RTNOEXIST
;
1287 flog_err_sys(EC_LIB_SOCKET
, "%s: write : %s (%d)", __func__
,
1288 safe_strerror(errno
), errno
);
1289 return ZEBRA_ERR_KERNEL
;
1291 return ZEBRA_ERR_NOERROR
;
1296 #include "zebra/zserv.h"
1298 /* For debug purpose. */
1299 static void rtmsg_debug(struct rt_msghdr
*rtm
)
1303 zlog_debug("Kernel: Len: %d Type: %s", rtm
->rtm_msglen
,
1304 lookup_msg(rtm_type_str
, rtm
->rtm_type
, NULL
));
1305 rtm_flag_dump(rtm
->rtm_flags
);
1306 zlog_debug("Kernel: message seq %d", rtm
->rtm_seq
);
1307 zlog_debug("Kernel: pid %lld, rtm_addrs {%s}", (long long)rtm
->rtm_pid
,
1308 rtatostr(rtm
->rtm_addrs
, fbuf
, sizeof(fbuf
)));
1311 /* This is pretty gross, better suggestions welcome -- mhandler */
1314 #define RTAX_MAX RTA_NUMBITS
1317 #endif /* RTA_NUMBITS */
1318 #endif /* RTAX_MAX */
1320 /* Kernel routing table and interface updates via routing socket. */
1321 static int kernel_read(struct thread
*thread
)
1325 struct rt_msghdr
*rtm
;
1328 * This must be big enough for any message the kernel might send.
1329 * Rather than determining how many sockaddrs of what size might be
1330 * in each particular message, just use RTAX_MAX of sockaddr_storage
1331 * for each. Note that the sockaddrs must be after each message
1332 * definition, or rather after whichever happens to be the largest,
1333 * since the buffer needs to be big enough for a message and the
1334 * sockaddrs together.
1337 /* Routing information. */
1339 struct rt_msghdr rtm
;
1340 struct sockaddr_storage addr
[RTAX_MAX
];
1343 /* Interface information. */
1345 struct if_msghdr ifm
;
1346 struct sockaddr_storage addr
[RTAX_MAX
];
1349 /* Interface address information. */
1351 struct ifa_msghdr ifa
;
1352 struct sockaddr_storage addr
[RTAX_MAX
];
1355 #ifdef RTM_IFANNOUNCE
1356 /* Interface arrival/departure */
1358 struct if_announcemsghdr ifan
;
1359 struct sockaddr_storage addr
[RTAX_MAX
];
1361 #endif /* RTM_IFANNOUNCE */
1365 /* Fetch routing socket. */
1366 sock
= THREAD_FD(thread
);
1368 nbytes
= read(sock
, &buf
, sizeof buf
);
1371 if (nbytes
< 0 && errno
!= EWOULDBLOCK
&& errno
!= EAGAIN
)
1372 flog_err_sys(EC_LIB_SOCKET
, "routing socket error: %s",
1373 safe_strerror(errno
));
1377 thread_add_read(zrouter
.master
, kernel_read
, NULL
, sock
, NULL
);
1379 if (IS_ZEBRA_DEBUG_KERNEL
)
1380 rtmsg_debug(&buf
.r
.rtm
);
1385 * Ensure that we didn't drop any data, so that processing routines
1386 * can assume they have the whole message.
1388 if (rtm
->rtm_msglen
!= nbytes
) {
1390 "kernel_read: rtm->rtm_msglen %d, nbytes %d, type %d\n",
1391 rtm
->rtm_msglen
, nbytes
, rtm
->rtm_type
);
1395 switch (rtm
->rtm_type
) {
1402 ifm_read(&buf
.im
.ifm
);
1406 ifam_read(&buf
.ia
.ifa
);
1408 #ifdef RTM_IFANNOUNCE
1409 case RTM_IFANNOUNCE
:
1410 ifan_read(&buf
.ian
.ifan
);
1412 #endif /* RTM_IFANNOUNCE */
1414 if (IS_ZEBRA_DEBUG_KERNEL
)
1415 zlog_debug("Unprocessed RTM_type: %d", rtm
->rtm_type
);
1421 /* Make routing socket. */
1422 static void routing_socket(struct zebra_ns
*zns
)
1424 frr_elevate_privs(&zserv_privs
) {
1425 routing_sock
= ns_socket(AF_ROUTE
, SOCK_RAW
, 0, zns
->ns_id
);
1427 dplane_routing_sock
=
1428 ns_socket(AF_ROUTE
, SOCK_RAW
, 0, zns
->ns_id
);
1431 if (routing_sock
< 0) {
1432 flog_err_sys(EC_LIB_SOCKET
, "Can't init kernel routing socket");
1436 if (dplane_routing_sock
< 0) {
1437 flog_err_sys(EC_LIB_SOCKET
,
1438 "Can't init kernel dataplane routing socket");
1442 /* XXX: Socket should be NONBLOCK, however as we currently
1443 * discard failed writes, this will lead to inconsistencies.
1444 * For now, socket must be blocking.
1446 /*if (fcntl (routing_sock, F_SETFL, O_NONBLOCK) < 0)
1447 zlog_warn ("Can't set O_NONBLOCK to routing socket");*/
1449 /* kernel_read needs rewrite. */
1450 thread_add_read(zrouter
.master
, kernel_read
, NULL
, routing_sock
, NULL
);
1453 /* Exported interface function. This function simply calls
1454 routing_socket (). */
1455 void kernel_init(struct zebra_ns
*zns
)
1457 routing_socket(zns
);
1460 void kernel_terminate(struct zebra_ns
*zns
, bool complete
)
1465 #endif /* !HAVE_NETLINK */