2 * Copyright (c) 1983, 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)route.c 8.6 (Berkeley) 4/28/95
34 * $FreeBSD: src/usr.bin/netstat/route.c,v 1.41.2.14 2002/07/17 02:22:22 kbyanc Exp $
35 * $DragonFly: src/usr.bin/netstat/route.c,v 1.13 2008/07/07 22:02:10 nant Exp $
38 #include <sys/param.h>
39 #include <sys/socket.h>
42 #include <net/ethernet.h>
44 #include <net/if_var.h>
45 #include <net/if_dl.h>
46 #include <net/if_types.h>
47 #include <net/route.h>
49 #include <netinet/in.h>
50 #include <netipx/ipx.h>
51 #include <netatalk/at.h>
52 #include <netgraph/socket/ng_socket.h>
58 #include <netproto/mpls/mpls.h>
60 #include <sys/sysctl.h>
62 #include <arpa/inet.h>
74 #define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))
77 /* alignment constraint for routing socket */
79 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long))
80 #define ADVANCE(x, n) (x += ROUNDUP((n)->sa_len))
83 * Definitions for showing gateway flags.
94 { RTF_MODIFIED
, 'M' },
95 { RTF_DONE
, 'd' }, /* Completed -- for routing messages only */
97 { RTF_XRESOLVE
, 'X' },
102 { RTF_WASCLONED
,'W' },
103 { RTF_PRCLONING
,'c' },
105 { RTF_BLACKHOLE
,'B' },
106 { RTF_BROADCAST
,'b' },
107 { RTF_MPLSOPS
, 'm' },
112 long dummy
; /* Helps align structure. */
113 struct sockaddr u_sa
;
120 struct rtentry rtentry
;
121 struct radix_node rnode
;
122 struct radix_mask rmask
;
123 struct radix_node_head
*rt_tables
[AF_MAX
+1];
127 static struct sockaddr
*kgetsa (struct sockaddr
*);
128 static void size_cols (int ef
, struct radix_node
*rn
);
129 static void size_cols_tree (struct radix_node
*rn
);
130 static void size_cols_rtentry (struct rtentry
*rt
);
131 static void p_tree (struct radix_node
*);
132 static void p_rtnode (void);
133 static void ntreestuff (void);
134 static void np_rtentry (struct rt_msghdr
*);
135 static void p_sockaddr (struct sockaddr
*, struct sockaddr
*, int, int);
136 static const char *fmt_sockaddr (struct sockaddr
*sa
, struct sockaddr
*mask
,
138 static void p_flags (int, const char *);
139 static const char *fmt_flags(int f
);
140 static void p_rtentry (struct rtentry
*);
141 static u_long
forgemask (u_long
);
142 static void domask (char *, u_long
, u_long
);
143 static const char *labelops(struct rtentry
*);
146 * Print routing tables.
149 routepr(u_long rtree
)
151 struct radix_node_head
*rnh
, head
;
154 printf("Routing tables\n");
156 if (Aflag
== 0 && NewTree
) {
160 printf("rt_tables: symbol not in namelist\n");
167 rtree
+= cpuflag
* (AF_MAX
+ 1) * sizeof(void *);
169 kget(rtree
, rt_tables
);
170 for (i
= 0; i
<= AF_MAX
; i
++) {
171 if ((rnh
= rt_tables
[i
]) == 0)
174 if (i
== AF_UNSPEC
) {
175 if (Aflag
&& af
== 0) {
176 printf("Netmasks:\n");
177 p_tree(head
.rnh_treetop
);
179 } else if (af
== AF_UNSPEC
|| af
== i
) {
180 size_cols(i
, head
.rnh_treetop
);
184 p_tree(head
.rnh_treetop
);
191 * Print address family header before a section of the routing table.
204 afname
= "Internet6";
219 afname
= "AppleTalk";
235 printf("\n%s:\n", afname
);
237 printf("\nProtocol Family %d:\n", af1
);
240 /* column widths; each followed by one space */
242 #define WID_DST_DEFAULT(af) 18 /* width of destination column */
243 #define WID_GW_DEFAULT(af) 18 /* width of gateway column */
244 #define WID_IF_DEFAULT(af) (Wflag ? 8 : 6) /* width of netif column */
246 #define WID_DST_DEFAULT(af) \
247 ((af) == AF_INET6 ? (numeric_addr ? 33: 18) : 18)
248 #define WID_GW_DEFAULT(af) \
249 ((af) == AF_INET6 ? (numeric_addr ? 29 : 18) : 18)
250 #define WID_IF_DEFAULT(af) ((af) == AF_INET6 ? 8 : (Wflag ? 8 :6))
255 static int wid_flags
;
260 static int wid_expire
;
261 static int wid_mplslops
;
264 size_cols(int ef
, struct radix_node
*rn
)
266 wid_dst
= WID_DST_DEFAULT(ef
);
267 wid_gw
= WID_GW_DEFAULT(ef
);
272 wid_if
= WID_IF_DEFAULT(ef
);
281 size_cols_tree(struct radix_node
*rn
)
285 if (rnode
.rn_bit
< 0) {
286 if ((rnode
.rn_flags
& RNF_ROOT
) == 0) {
288 size_cols_rtentry(&rtentry
);
290 if ((rn
= rnode
.rn_dupedkey
))
294 size_cols_tree(rnode
.rn_left
);
300 size_cols_rtentry(struct rtentry
*rt
)
302 static struct ifnet ifnet
, *lastif
;
303 struct rtentry parent
;
304 static char buffer
[100];
311 * Don't print protocol-cloned routes unless -a.
313 if (rt
->rt_flags
& RTF_WASCLONED
&& !aflag
) {
314 kget(rt
->rt_parent
, parent
);
315 if (parent
.rt_flags
& RTF_PRCLONING
)
319 bzero(&addr
, sizeof(addr
));
320 if ((sa
= kgetsa(rt_key(rt
))))
321 bcopy(sa
, &addr
, sa
->sa_len
);
322 bzero(&mask
, sizeof(mask
));
323 if (rt_mask(rt
) && (sa
= kgetsa(rt_mask(rt
))))
324 bcopy(sa
, &mask
, sa
->sa_len
);
325 bp
= fmt_sockaddr(&addr
.u_sa
, &mask
.u_sa
, rt
->rt_flags
);
327 wid_dst
= MAX(len
, wid_dst
);
329 bp
= fmt_sockaddr(kgetsa(rt
->rt_gateway
), NULL
, RTF_HOST
);
331 wid_gw
= MAX(len
, wid_gw
);
333 bp
= fmt_flags(rt
->rt_flags
);
335 wid_flags
= MAX(len
, wid_flags
);
337 if (addr
.u_sa
.sa_family
== AF_INET
|| Wflag
) {
338 len
= snprintf(buffer
, sizeof(buffer
), "%ld", rt
->rt_refcnt
);
339 wid_refs
= MAX(len
, wid_refs
);
340 len
= snprintf(buffer
, sizeof(buffer
), "%lu", rt
->rt_use
);
341 wid_use
= MAX(len
, wid_use
);
342 if (Wflag
&& rt
->rt_rmx
.rmx_mtu
!= 0) {
343 len
= snprintf(buffer
, sizeof(buffer
),
344 "%lu", rt
->rt_rmx
.rmx_mtu
);
345 wid_mtu
= MAX(len
, wid_mtu
);
349 if (rt
->rt_ifp
!= lastif
) {
350 kget(rt
->rt_ifp
, ifnet
);
352 len
= strlen(ifnet
.if_xname
);
353 wid_if
= MAX(len
, wid_if
);
355 if (rt
->rt_rmx
.rmx_expire
) {
359 rt
->rt_rmx
.rmx_expire
- time(NULL
)) > 0) {
360 snprintf(buffer
, sizeof(buffer
), "%d",
362 wid_expire
= MAX(len
, wid_expire
);
366 if (rt
->rt_shim
[0] != NULL
)
367 len
= strlen(labelops(rt
));
368 wid_mplslops
= MAX(len
, wid_mplslops
);
373 * Print header for routing table columns.
380 printf("%-8.8s ","Address");
381 if (af1
== AF_INET
|| Wflag
) {
383 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*.*s %*s %-*s\n",
384 wid_dst
, wid_dst
, "Destination",
385 wid_gw
, wid_gw
, "Gateway",
386 wid_flags
, wid_flags
, "Flags",
387 wid_refs
, wid_refs
, "Refs",
388 wid_use
, wid_use
, "Use",
389 wid_mtu
, wid_mtu
, "Mtu",
390 wid_if
, wid_if
, "Netif",
391 wid_expire
, "Expire",
392 wid_mplslops
, "Labelops");
394 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*s\n",
395 wid_dst
, wid_dst
, "Destination",
396 wid_gw
, wid_gw
, "Gateway",
397 wid_flags
, wid_flags
, "Flags",
398 wid_refs
, wid_refs
, "Refs",
399 wid_use
, wid_use
, "Use",
400 wid_if
, wid_if
, "Netif",
401 wid_expire
, "Expire");
404 printf("%-*.*s %-*.*s %-*.*s %*.*s %*s\n",
405 wid_dst
, wid_dst
, "Destination",
406 wid_gw
, wid_gw
, "Gateway",
407 wid_flags
, wid_flags
, "Flags",
408 wid_if
, wid_if
, "Netif",
409 wid_expire
, "Expire");
413 static struct sockaddr
*
414 kgetsa(struct sockaddr
*dst
)
417 kget(dst
, pt_u
.u_sa
);
418 if (pt_u
.u_sa
.sa_len
> sizeof (pt_u
.u_sa
))
419 kread((u_long
)dst
, (char *)pt_u
.u_data
, pt_u
.u_sa
.sa_len
);
424 p_tree(struct radix_node
*rn
)
429 if (rnode
.rn_bit
< 0) {
431 printf("%-8.8lx ", (u_long
)rn
);
432 if (rnode
.rn_flags
& RNF_ROOT
) {
434 printf("(root node)%s",
435 rnode
.rn_dupedkey
? " =>\n" : "\n");
436 } else if (do_rtent
) {
442 p_sockaddr(kgetsa((struct sockaddr
*)rnode
.rn_key
),
446 if ((rn
= rnode
.rn_dupedkey
))
449 if (Aflag
&& do_rtent
) {
450 printf("%-8.8lx ", (u_long
)rn
);
454 p_tree(rnode
.rn_left
);
464 struct radix_mask
*rm
= rnode
.rn_mklist
;
466 if (rnode
.rn_bit
< 0) {
469 p_sockaddr(kgetsa((struct sockaddr
*)rnode
.rn_mask
),
474 sprintf(nbuf
, "(%d)", rnode
.rn_bit
);
475 printf("%6.6s %8.8lx : %8.8lx", nbuf
, (u_long
)rnode
.rn_left
, (u_long
)rnode
.rn_right
);
479 sprintf(nbuf
, " %d refs, ", rmask
.rm_refs
);
480 printf(" mk = %8.8lx {(%d),%s",
481 (u_long
)rm
, -1 - rmask
.rm_bit
, rmask
.rm_refs
? nbuf
: " ");
482 if (rmask
.rm_flags
& RNF_NORMAL
) {
483 struct radix_node rnode_aux
;
484 printf(" <normal>, ");
485 kget(rmask
.rm_leaf
, rnode_aux
);
486 p_sockaddr(kgetsa((struct sockaddr
*)rnode_aux
.rn_mask
),
489 p_sockaddr(kgetsa((struct sockaddr
*)rmask
.rm_mask
),
492 if ((rm
= rmask
.rm_next
))
504 char *buf
, *next
, *lim
;
505 struct rt_msghdr
*rtm
;
511 mib
[4] = NET_RT_DUMP
;
519 if (sysctl(mib
, miblen
, NULL
, &needed
, NULL
, 0) < 0) {
520 err(1, "sysctl: net.route.0.0.dump estimate");
523 if ((buf
= malloc(needed
)) == 0) {
524 err(2, "malloc(%lu)", (unsigned long)needed
);
526 if (sysctl(mib
, miblen
, buf
, &needed
, NULL
, 0) < 0) {
527 err(1, "sysctl: net.route.0.0.dump");
530 for (next
= buf
; next
< lim
; next
+= rtm
->rtm_msglen
) {
531 rtm
= (struct rt_msghdr
*)next
;
537 np_rtentry(struct rt_msghdr
*rtm
)
539 struct sockaddr
*sa
= (struct sockaddr
*)(rtm
+ 1);
541 static int masks_done
, banner_printed
;
544 int af1
= 0, interesting
= RTF_UP
| RTF_GATEWAY
| RTF_HOST
;
547 /* for the moment, netmasks are skipped over */
548 if (!banner_printed
) {
549 printf("Netmasks:\n");
552 if (masks_done
== 0) {
553 if (rtm
->rtm_addrs
!= RTA_DST
) {
564 if (rtm
->rtm_addrs
== RTA_DST
)
565 p_sockaddr(sa
, NULL
, 0, 36);
567 p_sockaddr(sa
, NULL
, rtm
->rtm_flags
, 16);
568 sa
= (struct sockaddr
*)(ROUNDUP(sa
->sa_len
) + (char *)sa
);
569 p_sockaddr(sa
, NULL
, 0, 18);
571 p_flags(rtm
->rtm_flags
& interesting
, "%-6.6s ");
576 p_sockaddr(struct sockaddr
*sa
, struct sockaddr
*mask
, int flags
, int width
)
580 cp
= fmt_sockaddr(sa
, mask
, flags
);
586 printf("%-*s ", width
, cp
);
588 printf("%-*.*s ", width
, width
, cp
);
593 fmt_sockaddr(struct sockaddr
*sa
, struct sockaddr
*mask
, int flags
)
595 static char workbuf
[128];
596 const char *cp
= workbuf
;
598 switch(sa
->sa_family
) {
601 struct sockaddr_in
*sin
= (struct sockaddr_in
*)sa
;
603 if ((sin
->sin_addr
.s_addr
== INADDR_ANY
) &&
605 ntohl(((struct sockaddr_in
*)mask
)->sin_addr
.s_addr
)
608 else if (flags
& RTF_HOST
)
609 cp
= routename(sin
->sin_addr
.s_addr
);
611 cp
= netname(sin
->sin_addr
.s_addr
,
612 ntohl(((struct sockaddr_in
*)mask
)
615 cp
= netname(sin
->sin_addr
.s_addr
, 0L);
622 struct sockaddr_in6
*sa6
= (struct sockaddr_in6
*)sa
;
623 struct in6_addr
*in6
= &sa6
->sin6_addr
;
626 * XXX: This is a special workaround for KAME kernels.
627 * sin6_scope_id field of SA should be set in the future.
629 if (IN6_IS_ADDR_LINKLOCAL(in6
) ||
630 IN6_IS_ADDR_MC_LINKLOCAL(in6
)) {
631 /* XXX: override is ok? */
632 sa6
->sin6_scope_id
= (u_int32_t
)ntohs(*(u_short
*)&in6
->s6_addr
[2]);
633 *(u_short
*)&in6
->s6_addr
[2] = 0;
636 if (flags
& RTF_HOST
)
637 cp
= routename6(sa6
);
640 &((struct sockaddr_in6
*)mask
)->sin6_addr
);
642 cp
= netname6(sa6
, NULL
);
650 struct ipx_addr work
= ((struct sockaddr_ipx
*)sa
)->sipx_addr
;
651 if (ipx_nullnet(satoipx_addr(work
)))
659 if (!(flags
& RTF_HOST
) && mask
)
660 cp
= atalk_print2(sa
,mask
,9);
662 cp
= atalk_print(sa
,11);
667 printf("%s", ((struct sockaddr_ng
*)sa
)->sg_data
);
678 struct sockaddr_dl
*sdl
= (struct sockaddr_dl
*)sa
;
680 if (sdl
->sdl_nlen
== 0 && sdl
->sdl_alen
== 0 &&
682 (void) sprintf(workbuf
, "link#%d", sdl
->sdl_index
);
684 switch (sdl
->sdl_type
) {
688 if (sdl
->sdl_alen
== ETHER_ADDR_LEN
) {
689 cp
= ether_ntoa((struct ether_addr
*)
690 (sdl
->sdl_data
+ sdl
->sdl_nlen
));
703 struct sockaddr_mpls
*smpls
= (struct sockaddr_mpls
*)sa
;
705 (void) sprintf(workbuf
, "%d", ntohl(smpls
->smpls_label
));
711 u_char
*s
= (u_char
*)sa
->sa_data
, *slim
;
715 slim
= sa
->sa_len
+ (u_char
*) sa
;
716 cqlim
= cq
+ sizeof(workbuf
) - 6;
717 cq
+= sprintf(cq
, "(%d)", sa
->sa_family
);
718 while (s
< slim
&& cq
< cqlim
) {
719 cq
+= sprintf(cq
, " %02x", *s
++);
721 cq
+= sprintf(cq
, "%02x", *s
++);
731 p_flags(int f
, const char *format
)
733 printf(format
, fmt_flags(f
));
739 static char name
[33];
741 struct bits
*p
= bits
;
743 for (flags
= name
; p
->b_mask
; p
++)
751 p_rtentry(struct rtentry
*rt
)
753 static struct ifnet ifnet
, *lastif
;
754 struct rtentry parent
;
755 static char buffer
[128];
756 static char prettyname
[128];
761 * Don't print protocol-cloned routes unless -a.
763 if (rt
->rt_flags
& RTF_WASCLONED
&& !aflag
) {
764 kget(rt
->rt_parent
, parent
);
765 if (parent
.rt_flags
& RTF_PRCLONING
)
769 bzero(&addr
, sizeof(addr
));
770 if ((sa
= kgetsa(rt_key(rt
))))
771 bcopy(sa
, &addr
, sa
->sa_len
);
772 bzero(&mask
, sizeof(mask
));
773 if (rt_mask(rt
) && (sa
= kgetsa(rt_mask(rt
))))
774 bcopy(sa
, &mask
, sa
->sa_len
);
775 p_sockaddr(&addr
.u_sa
, &mask
.u_sa
, rt
->rt_flags
, wid_dst
);
776 p_sockaddr(kgetsa(rt
->rt_gateway
), NULL
, RTF_HOST
, wid_gw
);
777 snprintf(buffer
, sizeof(buffer
), "%%-%d.%ds ", wid_flags
, wid_flags
);
778 p_flags(rt
->rt_flags
, buffer
);
779 if (addr
.u_sa
.sa_family
== AF_INET
|| Wflag
) {
780 printf("%*ld %*lu ", wid_refs
, rt
->rt_refcnt
,
781 wid_use
, rt
->rt_use
);
783 if (rt
->rt_rmx
.rmx_mtu
!= 0)
784 printf("%*lu ", wid_mtu
, rt
->rt_rmx
.rmx_mtu
);
786 printf("%*s ", wid_mtu
, "");
790 if (rt
->rt_ifp
!= lastif
) {
791 kget(rt
->rt_ifp
, ifnet
);
793 strlcpy(prettyname
, ifnet
.if_xname
, sizeof(prettyname
));
795 printf("%*.*s", wid_if
, wid_if
, prettyname
);
796 if (rt
->rt_rmx
.rmx_expire
) {
800 rt
->rt_rmx
.rmx_expire
- time(NULL
)) > 0)
801 printf(" %*d", wid_expire
, (int)expire_time
);
803 printf("%*s ", wid_expire
, "");
805 if (rt
->rt_nodes
[0].rn_dupedkey
)
809 if (rt
->rt_shim
[0] != NULL
)
810 printf(" %-*s", wid_mplslops
, labelops(rt
));
819 static char line
[MAXHOSTNAMELEN
];
824 hp
= gethostbyaddr(&in
, sizeof (struct in_addr
), AF_INET
);
827 trimdomain(cp
, strlen(cp
));
831 strncpy(line
, cp
, sizeof(line
) - 1);
832 line
[sizeof(line
) - 1] = '\0';
834 #define C(x) ((x) & 0xff)
836 sprintf(line
, "%lu.%lu.%lu.%lu",
837 C(in
>> 24), C(in
>> 16), C(in
>> 8), C(in
));
849 else if (IN_CLASSB(a
))
857 domask(char *dst
, u_long addr
, u_long mask
)
861 if (!mask
|| (forgemask(addr
) == mask
)) {
866 for (b
= 0; b
< 32; b
++)
867 if (mask
& (1 << b
)) {
871 for (bb
= b
+1; bb
< 32; bb
++)
872 if (!(mask
& (1 << bb
))) {
873 i
= -1; /* noncontig */
879 sprintf(dst
, "&0x%lx", mask
);
881 sprintf(dst
, "/%d", 32-i
);
885 * Return the name of the network whose address is given.
886 * The address is assumed to be that of a net or subnet, not a host.
889 netname(u_long in
, u_long mask
)
892 static char line
[MAXHOSTNAMELEN
];
893 struct netent
*np
= 0;
897 #define NSHIFT(m) ( \
898 (m) == IN_CLASSA_NET ? IN_CLASSA_NSHIFT : \
899 (m) == IN_CLASSB_NET ? IN_CLASSB_NSHIFT : \
900 (m) == IN_CLASSC_NET ? IN_CLASSC_NSHIFT : \
904 dmask
= forgemask(i
);
905 if (!numeric_addr
&& i
) {
906 np
= getnetbyaddr(i
>> NSHIFT(mask
), AF_INET
);
907 if (np
== NULL
&& mask
== 0)
908 np
= getnetbyaddr(i
>> NSHIFT(dmask
), AF_INET
);
911 trimdomain(cp
, strlen(cp
));
916 strncpy(line
, cp
, sizeof(line
) - 1);
917 line
[sizeof(line
) - 1] = '\0';
919 if (mask
<= IN_CLASSA_NET
&&
920 (i
& IN_CLASSA_HOST
) == 0) {
921 sprintf(line
, "%lu", C(i
>> 24));
922 } else if (mask
<= IN_CLASSB_NET
&&
923 (i
& IN_CLASSB_HOST
) == 0) {
924 sprintf(line
, "%lu.%lu",
925 C(i
>> 24), C(i
>> 16));
926 } else if (mask
<= IN_CLASSC_NET
&&
927 (i
& IN_CLASSC_HOST
) == 0) {
928 sprintf(line
, "%lu.%lu.%lu",
929 C(i
>> 24), C(i
>> 16), C(i
>> 8));
931 sprintf(line
, "%lu.%lu.%lu.%lu",
932 C(i
>> 24), C(i
>> 16), C(i
>> 8), C(i
));
935 domask(line
+ strlen(line
), i
, mask
);
941 netname6(struct sockaddr_in6
*sa6
, struct in6_addr
*mask
)
943 static char line
[MAXHOSTNAMELEN
];
944 u_char
*p
= (u_char
*)mask
;
946 int masklen
, illegal
= 0, flag
= NI_WITHSCOPEID
;
949 for (masklen
= 0, lim
= p
+ 16; p
< lim
; p
++) {
983 fprintf(stderr
, "illegal prefixlen\n");
988 if (masklen
== 0 && IN6_IS_ADDR_UNSPECIFIED(&sa6
->sin6_addr
))
992 flag
|= NI_NUMERICHOST
;
993 getnameinfo((struct sockaddr
*)sa6
, sa6
->sin6_len
, line
, sizeof(line
),
997 sprintf(&line
[strlen(line
)], "/%d", masklen
);
1003 routename6(struct sockaddr_in6
*sa6
)
1005 static char line
[MAXHOSTNAMELEN
];
1006 int flag
= NI_WITHSCOPEID
;
1007 /* use local variable for safety */
1008 struct sockaddr_in6 sa6_local
;
1010 sa6_local
.sin6_family
= AF_INET6
;
1011 sa6_local
.sin6_len
= sizeof(sa6_local
);
1012 sa6_local
.sin6_addr
= sa6
->sin6_addr
;
1013 sa6_local
.sin6_scope_id
= sa6
->sin6_scope_id
;
1016 flag
|= NI_NUMERICHOST
;
1018 getnameinfo((struct sockaddr
*)&sa6_local
, sa6_local
.sin6_len
,
1019 line
, sizeof(line
), NULL
, 0, flag
);
1026 * Print routing statistics
1031 struct rtstatistics rts
;
1034 error
= kinfo_get_net_rtstatistics(&rts
);
1036 printf("routing: could not retrieve statistics\n");
1039 printf("routing:\n");
1041 #define p(f, m) if (rts.f || sflag <= 1) \
1042 printf(m, rts.f, plural(rts.f))
1044 p(rts_badredirect
, "\t%lu bad routing redirect%s\n");
1045 p(rts_dynamic
, "\t%lu dynamically created route%s\n");
1046 p(rts_newgateway
, "\t%lu new gateway%s due to redirects\n");
1047 p(rts_unreach
, "\t%lu destination%s found unreachable\n");
1048 p(rts_wildcard
, "\t%lu use%s of a wildcard route\n");
1053 ipx_print(struct sockaddr
*sa
)
1056 struct servent
*sp
= 0;
1057 const char *net
= "", *host
= "";
1060 struct ipx_addr work
= ((struct sockaddr_ipx
*)sa
)->sipx_addr
;
1061 static char mybuf
[50];
1062 char cport
[10], chost
[15], cnet
[15];
1064 port
= ntohs(work
.x_port
);
1066 if (ipx_nullnet(work
) && ipx_nullhost(work
)) {
1070 sprintf(mybuf
, "*.%s", sp
->s_name
);
1072 sprintf(mybuf
, "*.%x", port
);
1074 sprintf(mybuf
, "*.*");
1079 if (ipx_wildnet(work
))
1081 else if (ipx_nullnet(work
))
1084 q
= work
.x_net
.c_net
;
1085 sprintf(cnet
, "%02x%02x%02x%02x",
1086 q
[0], q
[1], q
[2], q
[3]);
1087 for (p
= cnet
; *p
== '0' && p
< cnet
+ 8; p
++)
1092 if (ipx_wildhost(work
))
1094 else if (ipx_nullhost(work
))
1097 q
= work
.x_host
.c_host
;
1098 sprintf(chost
, "%02x%02x%02x%02x%02x%02x",
1099 q
[0], q
[1], q
[2], q
[3], q
[4], q
[5]);
1100 for (p
= chost
; *p
== '0' && p
< chost
+ 12; p
++)
1106 if (strcmp(host
, "*") == 0)
1109 snprintf(cport
, sizeof(cport
),
1110 "%s%s", *host
? "." : "", sp
->s_name
);
1112 snprintf(cport
, sizeof(cport
),
1113 "%s%x", *host
? "." : "", port
);
1117 snprintf(mybuf
, sizeof(mybuf
), "%s.%s%s", net
, host
, cport
);
1122 ipx_phost(struct sockaddr
*sa
)
1124 struct sockaddr_ipx
*sipx
= (struct sockaddr_ipx
*)sa
;
1125 struct sockaddr_ipx work
;
1126 static union ipx_net ipx_zeronet
;
1131 in
= work
.sipx_addr
;
1133 work
.sipx_addr
.x_port
= 0;
1134 work
.sipx_addr
.x_net
= ipx_zeronet
;
1135 p
= ipx_print((struct sockaddr
*)&work
);
1136 if (strncmp("*.", p
, 2) == 0) p
+= 2;
1142 short ns_nullh
[] = {0,0,0};
1143 short ns_bh
[] = {-1,-1,-1};
1146 ns_print(struct sockaddr
*sa
)
1148 struct sockaddr_ns
*sns
= (struct sockaddr_ns
*)sa
;
1149 struct ns_addr work
;
1150 union { union ns_net net_e
; u_long long_e
; } net
;
1152 static char mybuf
[50], cport
[10], chost
[25];
1156 work
= sns
->sns_addr
;
1157 port
= ntohs(work
.x_port
);
1159 net
.net_e
= work
.x_net
;
1160 if (ns_nullhost(work
) && net
.long_e
== 0) {
1162 sprintf(mybuf
, "*.%xH", port
);
1165 sprintf(mybuf
, "*.*");
1169 if (bcmp(ns_bh
, work
.x_host
.c_host
, 6) == 0) {
1171 } else if (bcmp(ns_nullh
, work
.x_host
.c_host
, 6) == 0) {
1174 q
= work
.x_host
.c_host
;
1175 sprintf(chost
, "%02x%02x%02x%02x%02x%02xH",
1176 q
[0], q
[1], q
[2], q
[3], q
[4], q
[5]);
1177 for (p
= chost
; *p
== '0' && p
< chost
+ 12; p
++)
1182 sprintf(cport
, ".%xH", htons(port
));
1186 sprintf(mybuf
,"%xH.%s%s", ntohl(net
.long_e
), host
, cport
);
1192 ns_phost(struct sockaddr
*sa
)
1194 struct sockaddr_ns
*sns
= (struct sockaddr_ns
*)sa
;
1195 struct sockaddr_ns work
;
1196 static union ns_net ns_zeronet
;
1200 work
.sns_addr
.x_port
= 0;
1201 work
.sns_addr
.x_net
= ns_zeronet
;
1203 p
= ns_print((struct sockaddr
*)&work
);
1204 if (strncmp("0H.", p
, 3) == 0)
1230 labelops(struct rtentry
*rt
)
1232 const char *lops
[] = { "push", "pop", "swap", "pop all" };
1233 static char buffer
[100];
1235 struct sockaddr_mpls
*smpls
;
1238 for (i
=0; i
<MPLS_MAXLOPS
; ++i
) {
1240 if (rt
->rt_shim
[i
] == NULL
)
1244 sizeof(buffer
) - (cp
- buffer
),
1247 smpls
= (struct sockaddr_mpls
*)kgetsa(rt
->rt_shim
[i
]);
1248 if (smpls
->smpls_op
!= MPLSLOP_POP
&&
1249 smpls
->smpls_op
!= MPLSLOP_POPALL
){
1251 sizeof(buffer
) - (cp
- buffer
),
1253 lops
[smpls
->smpls_op
- 1],
1254 ntohl(smpls
->smpls_label
));
1257 sizeof(buffer
) - (cp
- buffer
),
1259 lops
[smpls
->smpls_op
- 1]);