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 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * @(#)route.c 8.6 (Berkeley) 4/28/95
30 * $FreeBSD: src/usr.bin/netstat/route.c,v 1.41.2.14 2002/07/17 02:22:22 kbyanc Exp $
33 #include <sys/kinfo.h>
34 #include <sys/param.h>
35 #include <sys/socket.h>
38 #include <net/ethernet.h>
40 #include <net/if_var.h>
41 #include <net/if_dl.h>
42 #include <net/if_types.h>
43 #include <net/route.h>
45 #include <netinet/in.h>
46 #include <netipx/ipx.h>
47 #include <netgraph/socket/ng_socket.h>
49 #include <netproto/mpls/mpls.h>
51 #include <sys/sysctl.h>
53 #include <arpa/inet.h>
65 #define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))
68 /* alignment constraint for routing socket */
70 ((a) > 0 ? (1 + (((a) - 1) | (sizeof(long) - 1))) : sizeof(long))
71 #define ADVANCE(x, n) (x += ROUNDUP((n)->sa_len))
74 * Definitions for showing gateway flags.
85 { RTF_MODIFIED
, 'M' },
86 { RTF_DONE
, 'd' }, /* Completed -- for routing messages only */
88 { RTF_XRESOLVE
, 'X' },
93 { RTF_WASCLONED
,'W' },
94 { RTF_PRCLONING
,'c' },
96 { RTF_BLACKHOLE
,'B' },
97 { RTF_BROADCAST
,'b' },
103 long dummy
; /* Helps align structure. */
104 struct sockaddr u_sa
;
111 struct rtentry rtentry
;
112 struct radix_node rnode
;
113 struct radix_mask rmask
;
114 struct radix_node_head
*rt_tables
[AF_MAX
+1];
118 static struct sockaddr
*kgetsa (struct sockaddr
*);
119 static void size_cols (int ef
, struct radix_node
*rn
);
120 static void size_cols_tree (struct radix_node
*rn
);
121 static void size_cols_rtentry (struct rtentry
*rt
);
122 static void p_tree (struct radix_node
*);
123 static void p_rtnode (void);
124 static void ntreestuff (void);
125 static void np_rtentry (struct rt_msghdr
*);
126 static void p_sockaddr (struct sockaddr
*, struct sockaddr
*, int, int);
127 static const char *fmt_sockaddr (struct sockaddr
*sa
, struct sockaddr
*mask
,
129 static void p_flags (int, const char *);
130 static const char *fmt_flags(int f
);
131 static void p_rtentry (struct rtentry
*);
132 static u_long
forgemask (u_long
);
133 static void domask (char *, u_long
, u_long
);
134 static const char *labelops(struct rtentry
*);
137 * Print routing tables.
140 routepr(u_long rtree
)
142 struct radix_node_head
*rnh
, head
;
145 printf("Routing tables\n");
147 if (Aflag
== 0 && NewTree
) {
151 printf("rt_tables: symbol not in namelist\n");
158 rtree
+= cpuflag
* (AF_MAX
+ 1) * sizeof(void *);
160 if (kget(rtree
, rt_tables
) != 0)
162 for (i
= 0; i
<= AF_MAX
; i
++) {
163 if ((rnh
= rt_tables
[i
]) == NULL
)
165 if (kget(rnh
, head
) != 0)
167 if (i
== AF_UNSPEC
) {
168 if (Aflag
&& af
== 0) {
169 printf("Netmasks:\n");
170 p_tree(head
.rnh_treetop
);
172 } else if (af
== AF_UNSPEC
|| af
== i
) {
173 size_cols(i
, head
.rnh_treetop
);
177 p_tree(head
.rnh_treetop
);
184 * Print address family header before a section of the routing table.
197 afname
= "Internet6";
220 printf("\n%s:\n", afname
);
222 printf("\nProtocol Family %d:\n", af1
);
225 /* column widths; each followed by one space */
227 #define WID_DST_DEFAULT(af) 18 /* width of destination column */
228 #define WID_GW_DEFAULT(af) 18 /* width of gateway column */
229 #define WID_IF_DEFAULT(af) (Wflag ? 8 : 6) /* width of netif column */
231 #define WID_DST_DEFAULT(af) \
232 ((af) == AF_INET6 ? (numeric_addr ? 33: 18) : 18)
233 #define WID_GW_DEFAULT(af) \
234 ((af) == AF_INET6 ? (numeric_addr ? 29 : 18) : 18)
235 #define WID_IF_DEFAULT(af) ((af) == AF_INET6 ? 8 : (Wflag ? 8 :6))
240 static int wid_flags
;
245 static int wid_expire
;
246 static int wid_mplslops
;
248 static int wid_iwmax
;
252 size_cols(int ef
, struct radix_node
*rn
)
254 wid_dst
= WID_DST_DEFAULT(ef
);
255 wid_gw
= WID_GW_DEFAULT(ef
);
260 wid_if
= WID_IF_DEFAULT(ef
);
272 size_cols_tree(struct radix_node
*rn
)
275 if (kget(rn
, rnode
) != 0)
277 if (!(rnode
.rn_flags
& RNF_ACTIVE
))
279 if (rnode
.rn_bit
< 0) {
280 if ((rnode
.rn_flags
& RNF_ROOT
) == 0) {
281 if (kget(rn
, rtentry
) != 0)
283 size_cols_rtentry(&rtentry
);
285 if ((rn
= rnode
.rn_dupedkey
))
289 size_cols_tree(rnode
.rn_left
);
295 size_cols_rtentry(struct rtentry
*rt
)
297 static struct ifnet ifnet
, *lastif
;
298 struct rtentry parent
;
299 static char buffer
[100];
306 * Don't print protocol-cloned routes unless -a.
308 if (rt
->rt_flags
& RTF_WASCLONED
&& !aflag
) {
309 if (kget(rt
->rt_parent
, parent
) != 0)
311 if (parent
.rt_flags
& RTF_PRCLONING
)
315 bzero(&addr
, sizeof(addr
));
316 if ((sa
= kgetsa(rt_key(rt
))))
317 bcopy(sa
, &addr
, sa
->sa_len
);
318 bzero(&mask
, sizeof(mask
));
319 if (rt_mask(rt
) && (sa
= kgetsa(rt_mask(rt
))))
320 bcopy(sa
, &mask
, sa
->sa_len
);
321 bp
= fmt_sockaddr(&addr
.u_sa
, &mask
.u_sa
, rt
->rt_flags
);
323 wid_dst
= MAX(len
, wid_dst
);
325 bp
= fmt_sockaddr(kgetsa(rt
->rt_gateway
), NULL
, RTF_HOST
);
327 wid_gw
= MAX(len
, wid_gw
);
329 bp
= fmt_flags(rt
->rt_flags
);
331 wid_flags
= MAX(len
, wid_flags
);
333 if (addr
.u_sa
.sa_family
== AF_INET
|| Wflag
) {
334 len
= snprintf(buffer
, sizeof(buffer
), "%ld", rt
->rt_refcnt
);
335 wid_refs
= MAX(len
, wid_refs
);
336 len
= snprintf(buffer
, sizeof(buffer
), "%lu", rt
->rt_use
);
337 wid_use
= MAX(len
, wid_use
);
338 if (Wflag
&& rt
->rt_rmx
.rmx_mtu
!= 0) {
339 len
= snprintf(buffer
, sizeof(buffer
),
340 "%lu", rt
->rt_rmx
.rmx_mtu
);
341 wid_mtu
= MAX(len
, wid_mtu
);
345 if (rt
->rt_ifp
!= lastif
) {
346 if (kget(rt
->rt_ifp
, ifnet
) == 0)
347 len
= strlen(ifnet
.if_xname
);
351 wid_if
= MAX(len
, wid_if
);
353 if (rt
->rt_rmx
.rmx_expire
) {
357 rt
->rt_rmx
.rmx_expire
- time(NULL
)) > 0) {
358 snprintf(buffer
, sizeof(buffer
), "%d",
360 wid_expire
= MAX(len
, wid_expire
);
365 if (rt
->rt_shim
[0] != NULL
) {
366 len
= strlen(labelops(rt
));
367 wid_mplslops
= MAX(len
, wid_mplslops
);
370 if (rt
->rt_rmx
.rmx_msl
) {
371 len
= snprintf(buffer
, sizeof(buffer
),
372 "%lu", rt
->rt_rmx
.rmx_msl
);
373 wid_msl
= MAX(len
, wid_msl
);
375 if (rt
->rt_rmx
.rmx_iwmaxsegs
) {
376 len
= snprintf(buffer
, sizeof(buffer
),
377 "%lu", rt
->rt_rmx
.rmx_iwmaxsegs
);
378 wid_iwmax
= MAX(len
, wid_iwmax
);
380 if (rt
->rt_rmx
.rmx_iwcapsegs
) {
381 len
= snprintf(buffer
, sizeof(buffer
),
382 "%lu", rt
->rt_rmx
.rmx_iwcapsegs
);
383 wid_iw
= MAX(len
, wid_iw
);
390 * Print header for routing table columns.
397 printf("%-8.8s ","Address");
398 if (af1
== AF_INET
|| Wflag
) {
400 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*.*s "
401 "%*s %-*s%*s %*s %*s\n",
402 wid_dst
, wid_dst
, "Destination",
403 wid_gw
, wid_gw
, "Gateway",
404 wid_flags
, wid_flags
, "Flags",
405 wid_refs
, wid_refs
, "Refs",
406 wid_use
, wid_use
, "Use",
407 wid_mtu
, wid_mtu
, "Mtu",
408 wid_if
, wid_if
, "Netif",
409 wid_expire
, "Expire",
410 wid_mplslops
, "Labelops",
415 printf("%-*.*s %-*.*s %-*.*s %*.*s %*.*s %*.*s %*s\n",
416 wid_dst
, wid_dst
, "Destination",
417 wid_gw
, wid_gw
, "Gateway",
418 wid_flags
, wid_flags
, "Flags",
419 wid_refs
, wid_refs
, "Refs",
420 wid_use
, wid_use
, "Use",
421 wid_if
, wid_if
, "Netif",
422 wid_expire
, "Expire");
425 printf("%-*.*s %-*.*s %-*.*s %*.*s %*s\n",
426 wid_dst
, wid_dst
, "Destination",
427 wid_gw
, wid_gw
, "Gateway",
428 wid_flags
, wid_flags
, "Flags",
429 wid_if
, wid_if
, "Netif",
430 wid_expire
, "Expire");
434 static struct sockaddr
*
435 kgetsa(struct sockaddr
*dst
)
438 if (kget(dst
, pt_u
.u_sa
) != 0)
440 if (pt_u
.u_sa
.sa_len
> sizeof (pt_u
.u_sa
))
441 kread((u_long
)dst
, (char *)pt_u
.u_data
, pt_u
.u_sa
.sa_len
);
446 p_tree(struct radix_node
*rn
)
450 if (kget(rn
, rnode
) != 0)
452 if (!(rnode
.rn_flags
& RNF_ACTIVE
))
454 if (rnode
.rn_bit
< 0) {
456 printf("%-8.8lx ", (u_long
)rn
);
457 if (rnode
.rn_flags
& RNF_ROOT
) {
459 printf("(root node)%s",
460 rnode
.rn_dupedkey
? " =>\n" : "\n");
461 } else if (do_rtent
) {
462 if (kget(rn
, rtentry
) == 0) {
468 p_sockaddr(kgetsa((struct sockaddr
*)rnode
.rn_key
),
472 if ((rn
= rnode
.rn_dupedkey
))
475 if (Aflag
&& do_rtent
) {
476 printf("%-8.8lx ", (u_long
)rn
);
480 p_tree(rnode
.rn_left
);
490 struct radix_mask
*rm
= rnode
.rn_mklist
;
492 if (rnode
.rn_bit
< 0) {
495 p_sockaddr(kgetsa((struct sockaddr
*)rnode
.rn_mask
),
497 } else if (rm
== NULL
)
500 sprintf(nbuf
, "(%d)", rnode
.rn_bit
);
501 printf("%6.6s %8.8lx : %8.8lx", nbuf
, (u_long
)rnode
.rn_left
, (u_long
)rnode
.rn_right
);
504 if (kget(rm
, rmask
) != 0)
506 sprintf(nbuf
, " %d refs, ", rmask
.rm_refs
);
507 printf(" mk = %8.8lx {(%d),%s",
508 (u_long
)rm
, -1 - rmask
.rm_bit
, rmask
.rm_refs
? nbuf
: " ");
509 if (rmask
.rm_flags
& RNF_NORMAL
) {
510 struct radix_node rnode_aux
;
511 printf(" <normal>, ");
512 if (kget(rmask
.rm_leaf
, rnode_aux
) == 0)
513 p_sockaddr(kgetsa((struct sockaddr
*)rnode_aux
.rn_mask
),
516 p_sockaddr(NULL
, NULL
, 0, -1);
518 p_sockaddr(kgetsa((struct sockaddr
*)rmask
.rm_mask
),
521 if ((rm
= rmask
.rm_next
))
533 char *buf
, *next
, *lim
;
534 struct rt_msghdr
*rtm
;
540 mib
[4] = NET_RT_DUMP
;
548 if (sysctl(mib
, miblen
, NULL
, &needed
, NULL
, 0) < 0) {
549 err(1, "sysctl: net.route.0.0.dump estimate");
552 if ((buf
= malloc(needed
)) == NULL
) {
553 err(2, "malloc(%lu)", (unsigned long)needed
);
555 if (sysctl(mib
, miblen
, buf
, &needed
, NULL
, 0) < 0) {
556 err(1, "sysctl: net.route.0.0.dump");
559 for (next
= buf
; next
< lim
; next
+= rtm
->rtm_msglen
) {
560 rtm
= (struct rt_msghdr
*)next
;
566 np_rtentry(struct rt_msghdr
*rtm
)
568 struct sockaddr
*sa
= (struct sockaddr
*)(rtm
+ 1);
570 static int masks_done
, banner_printed
;
573 int af1
= 0, interesting
= RTF_UP
| RTF_GATEWAY
| RTF_HOST
;
576 /* for the moment, netmasks are skipped over */
577 if (!banner_printed
) {
578 printf("Netmasks:\n");
581 if (masks_done
== 0) {
582 if (rtm
->rtm_addrs
!= RTA_DST
) {
593 if (rtm
->rtm_addrs
== RTA_DST
)
594 p_sockaddr(sa
, NULL
, 0, 36);
596 p_sockaddr(sa
, NULL
, rtm
->rtm_flags
, 16);
597 sa
= (struct sockaddr
*)(ROUNDUP(sa
->sa_len
) + (char *)sa
);
598 p_sockaddr(sa
, NULL
, 0, 18);
600 p_flags(rtm
->rtm_flags
& interesting
, "%-6.6s ");
605 p_sockaddr(struct sockaddr
*sa
, struct sockaddr
*mask
, int flags
, int width
)
609 cp
= fmt_sockaddr(sa
, mask
, flags
);
615 printf("%-*s ", width
, cp
);
617 printf("%-*.*s ", width
, width
, cp
);
622 fmt_sockaddr(struct sockaddr
*sa
, struct sockaddr
*mask
, int flags
)
624 static char workbuf
[128];
625 const char *cp
= workbuf
;
630 switch(sa
->sa_family
) {
633 struct sockaddr_in
*sin
= (struct sockaddr_in
*)sa
;
635 if ((sin
->sin_addr
.s_addr
== INADDR_ANY
) &&
637 ntohl(((struct sockaddr_in
*)mask
)->sin_addr
.s_addr
)
640 else if (flags
& RTF_HOST
)
641 cp
= routename(sin
->sin_addr
.s_addr
);
643 cp
= netname(sin
->sin_addr
.s_addr
,
644 ntohl(((struct sockaddr_in
*)mask
)
647 cp
= netname(sin
->sin_addr
.s_addr
, 0L);
654 struct sockaddr_in6
*sa6
= (struct sockaddr_in6
*)sa
;
655 struct in6_addr
*in6
= &sa6
->sin6_addr
;
658 * XXX: This is a special workaround for KAME kernels.
659 * sin6_scope_id field of SA should be set in the future.
661 if (IN6_IS_ADDR_LINKLOCAL(in6
) ||
662 IN6_IS_ADDR_MC_LINKLOCAL(in6
)) {
663 /* XXX: override is ok? */
664 sa6
->sin6_scope_id
= (u_int32_t
)ntohs(*(u_short
*)&in6
->s6_addr
[2]);
665 *(u_short
*)&in6
->s6_addr
[2] = 0;
668 if (flags
& RTF_HOST
)
669 cp
= routename6(sa6
);
672 &((struct sockaddr_in6
*)mask
)->sin6_addr
);
674 cp
= netname6(sa6
, NULL
);
682 struct ipx_addr work
= ((struct sockaddr_ipx
*)sa
)->sipx_addr
;
683 if (ipx_nullnet(satoipx_addr(work
)))
691 printf("%s", ((struct sockaddr_ng
*)sa
)->sg_data
);
696 struct sockaddr_dl
*sdl
= (struct sockaddr_dl
*)sa
;
698 if (sdl
->sdl_nlen
== 0 && sdl
->sdl_alen
== 0 &&
700 (void) sprintf(workbuf
, "link#%d", sdl
->sdl_index
);
702 switch (sdl
->sdl_type
) {
707 if (sdl
->sdl_alen
== ETHER_ADDR_LEN
) {
708 cp
= ether_ntoa((struct ether_addr
*)
709 (sdl
->sdl_data
+ sdl
->sdl_nlen
));
722 struct sockaddr_mpls
*smpls
= (struct sockaddr_mpls
*)sa
;
724 (void) sprintf(workbuf
, "%d", ntohl(smpls
->smpls_label
));
730 u_char
*s
= (u_char
*)sa
->sa_data
, *slim
;
734 slim
= sa
->sa_len
+ (u_char
*) sa
;
735 cqlim
= cq
+ sizeof(workbuf
) - 6;
736 cq
+= sprintf(cq
, "(%d)", sa
->sa_family
);
737 while (s
< slim
&& cq
< cqlim
) {
738 cq
+= sprintf(cq
, " %02x", *s
++);
740 cq
+= sprintf(cq
, "%02x", *s
++);
750 p_flags(int f
, const char *format
)
752 printf(format
, fmt_flags(f
));
758 static char name
[33];
760 struct bits
*p
= bits
;
762 for (flags
= name
; p
->b_mask
; p
++)
770 p_rtentry(struct rtentry
*rt
)
772 static struct ifnet ifnet
, *lastif
;
773 struct rtentry parent
;
774 static char buffer
[128];
775 static char prettyname
[128];
780 * Don't print protocol-cloned routes unless -a.
782 if (rt
->rt_flags
& RTF_WASCLONED
&& !aflag
) {
783 if (kget(rt
->rt_parent
, parent
) != 0)
785 if (parent
.rt_flags
& RTF_PRCLONING
)
789 bzero(&addr
, sizeof(addr
));
790 if ((sa
= kgetsa(rt_key(rt
))))
791 bcopy(sa
, &addr
, sa
->sa_len
);
792 bzero(&mask
, sizeof(mask
));
793 if (rt_mask(rt
) && (sa
= kgetsa(rt_mask(rt
))))
794 bcopy(sa
, &mask
, sa
->sa_len
);
795 p_sockaddr(&addr
.u_sa
, &mask
.u_sa
, rt
->rt_flags
, wid_dst
);
796 p_sockaddr(kgetsa(rt
->rt_gateway
), NULL
, RTF_HOST
, wid_gw
);
797 snprintf(buffer
, sizeof(buffer
), "%%-%d.%ds ", wid_flags
, wid_flags
);
798 p_flags(rt
->rt_flags
, buffer
);
799 if (addr
.u_sa
.sa_family
== AF_INET
|| Wflag
) {
800 printf("%*ld %*lu ", wid_refs
, rt
->rt_refcnt
,
801 wid_use
, rt
->rt_use
);
803 if (rt
->rt_rmx
.rmx_mtu
!= 0)
804 printf("%*lu ", wid_mtu
, rt
->rt_rmx
.rmx_mtu
);
806 printf("%*s ", wid_mtu
, "");
810 if (rt
->rt_ifp
!= lastif
) {
811 if (kget(rt
->rt_ifp
, ifnet
) == 0)
812 strlcpy(prettyname
, ifnet
.if_xname
,
815 strlcpy(prettyname
, "---", sizeof(prettyname
));
818 printf("%*.*s", wid_if
, wid_if
, prettyname
);
819 if (rt
->rt_rmx
.rmx_expire
) {
823 rt
->rt_rmx
.rmx_expire
- time(NULL
)) > 0)
824 printf(" %*d", wid_expire
, (int)expire_time
);
826 printf("%*s ", wid_expire
, "");
828 printf("%*s ", wid_expire
, "");
830 if (rt
->rt_nodes
[0].rn_dupedkey
)
834 if (rt
->rt_shim
[0] != NULL
)
835 printf(" %-*s", wid_mplslops
, labelops(rt
));
837 printf(" %-*s", wid_mplslops
, "");
838 if (rt
->rt_rmx
.rmx_msl
!= 0)
839 printf(" %*lu", wid_msl
, rt
->rt_rmx
.rmx_msl
);
841 printf("%*s ", wid_msl
, "");
842 if (rt
->rt_rmx
.rmx_iwmaxsegs
!= 0)
843 printf(" %*lu", wid_iwmax
, rt
->rt_rmx
.rmx_iwmaxsegs
);
845 printf("%*s ", wid_iwmax
, "");
846 if (rt
->rt_rmx
.rmx_iwcapsegs
!= 0)
847 printf(" %*lu", wid_iw
, rt
->rt_rmx
.rmx_iwcapsegs
);
849 printf("%*s ", wid_iw
, "");
858 static char line
[MAXHOSTNAMELEN
];
863 hp
= gethostbyaddr(&in
, sizeof (struct in_addr
), AF_INET
);
866 trimdomain(cp
, strlen(cp
));
870 strncpy(line
, cp
, sizeof(line
) - 1);
871 line
[sizeof(line
) - 1] = '\0';
873 #define C(x) ((x) & 0xff)
875 sprintf(line
, "%lu.%lu.%lu.%lu",
876 C(in
>> 24), C(in
>> 16), C(in
>> 8), C(in
));
888 else if (IN_CLASSB(a
))
896 domask(char *dst
, u_long addr
, u_long mask
)
900 if (!mask
|| (forgemask(addr
) == mask
)) {
905 for (b
= 0; b
< 32; b
++)
906 if (mask
& (1 << b
)) {
910 for (bb
= b
+1; bb
< 32; bb
++)
911 if (!(mask
& (1 << bb
))) {
912 i
= -1; /* noncontig */
918 sprintf(dst
, "&0x%lx", mask
);
920 sprintf(dst
, "/%d", 32-i
);
924 * Return the name of the network whose address is given.
925 * The address is assumed to be that of a net or subnet, not a host.
928 netname(u_long in
, u_long mask
)
931 static char line
[MAXHOSTNAMELEN
];
932 struct netent
*np
= NULL
;
936 #define NSHIFT(m) ( \
937 (m) == IN_CLASSA_NET ? IN_CLASSA_NSHIFT : \
938 (m) == IN_CLASSB_NET ? IN_CLASSB_NSHIFT : \
939 (m) == IN_CLASSC_NET ? IN_CLASSC_NSHIFT : \
943 dmask
= forgemask(i
);
944 if (!numeric_addr
&& i
) {
945 np
= getnetbyaddr(i
>> NSHIFT(mask
), AF_INET
);
946 if (np
== NULL
&& mask
== 0)
947 np
= getnetbyaddr(i
>> NSHIFT(dmask
), AF_INET
);
950 trimdomain(cp
, strlen(cp
));
955 strncpy(line
, cp
, sizeof(line
) - 1);
956 line
[sizeof(line
) - 1] = '\0';
958 if (mask
<= IN_CLASSA_NET
&&
959 (i
& IN_CLASSA_HOST
) == 0) {
960 sprintf(line
, "%lu", C(i
>> 24));
961 } else if (mask
<= IN_CLASSB_NET
&&
962 (i
& IN_CLASSB_HOST
) == 0) {
963 sprintf(line
, "%lu.%lu",
964 C(i
>> 24), C(i
>> 16));
965 } else if (mask
<= IN_CLASSC_NET
&&
966 (i
& IN_CLASSC_HOST
) == 0) {
967 sprintf(line
, "%lu.%lu.%lu",
968 C(i
>> 24), C(i
>> 16), C(i
>> 8));
970 sprintf(line
, "%lu.%lu.%lu.%lu",
971 C(i
>> 24), C(i
>> 16), C(i
>> 8), C(i
));
974 domask(line
+ strlen(line
), i
, mask
);
980 netname6(struct sockaddr_in6
*sa6
, struct in6_addr
*mask
)
982 static char line
[MAXHOSTNAMELEN
];
983 u_char
*p
= (u_char
*)mask
;
985 int masklen
, illegal
= 0, flag
= NI_WITHSCOPEID
;
988 for (masklen
= 0, lim
= p
+ 16; p
< lim
; p
++) {
1022 fprintf(stderr
, "illegal prefixlen\n");
1027 if (masklen
== 0 && IN6_IS_ADDR_UNSPECIFIED(&sa6
->sin6_addr
))
1031 flag
|= NI_NUMERICHOST
;
1032 getnameinfo((struct sockaddr
*)sa6
, sa6
->sin6_len
, line
, sizeof(line
),
1036 sprintf(&line
[strlen(line
)], "/%d", masklen
);
1042 routename6(struct sockaddr_in6
*sa6
)
1044 static char line
[MAXHOSTNAMELEN
];
1045 int flag
= NI_WITHSCOPEID
;
1046 /* use local variable for safety */
1047 struct sockaddr_in6 sa6_local
;
1049 sa6_local
.sin6_family
= AF_INET6
;
1050 sa6_local
.sin6_len
= sizeof(sa6_local
);
1051 sa6_local
.sin6_addr
= sa6
->sin6_addr
;
1052 sa6_local
.sin6_scope_id
= sa6
->sin6_scope_id
;
1055 flag
|= NI_NUMERICHOST
;
1057 getnameinfo((struct sockaddr
*)&sa6_local
, sa6_local
.sin6_len
,
1058 line
, sizeof(line
), NULL
, 0, flag
);
1065 * Print routing statistics
1070 struct rtstatistics rts
;
1073 error
= kinfo_get_net_rtstatistics(&rts
);
1075 printf("routing: could not retrieve statistics\n");
1078 printf("routing:\n");
1080 #define p(f, m) if (rts.f || sflag <= 1) \
1081 printf(m, rts.f, plural(rts.f))
1083 p(rts_badredirect
, "\t%lu bad routing redirect%s\n");
1084 p(rts_dynamic
, "\t%lu dynamically created route%s\n");
1085 p(rts_newgateway
, "\t%lu new gateway%s due to redirects\n");
1086 p(rts_unreach
, "\t%lu destination%s found unreachable\n");
1087 p(rts_wildcard
, "\t%lu use%s of a wildcard route\n");
1092 ipx_print(struct sockaddr
*sa
)
1095 struct servent
*sp
= NULL
;
1096 const char *net
= "", *host
= "";
1099 struct ipx_addr work
= ((struct sockaddr_ipx
*)sa
)->sipx_addr
;
1100 static char mybuf
[50];
1101 char cport
[10], chost
[15], cnet
[15];
1103 port
= ntohs(work
.x_port
);
1105 if (ipx_nullnet(work
) && ipx_nullhost(work
)) {
1109 sprintf(mybuf
, "*.%s", sp
->s_name
);
1111 sprintf(mybuf
, "*.%x", port
);
1113 sprintf(mybuf
, "*.*");
1118 if (ipx_wildnet(work
))
1120 else if (ipx_nullnet(work
))
1123 q
= work
.x_net
.c_net
;
1124 sprintf(cnet
, "%02x%02x%02x%02x",
1125 q
[0], q
[1], q
[2], q
[3]);
1126 for (p
= cnet
; *p
== '0' && p
< cnet
+ 8; p
++)
1131 if (ipx_wildhost(work
))
1133 else if (ipx_nullhost(work
))
1136 q
= work
.x_host
.c_host
;
1137 sprintf(chost
, "%02x%02x%02x%02x%02x%02x",
1138 q
[0], q
[1], q
[2], q
[3], q
[4], q
[5]);
1139 for (p
= chost
; *p
== '0' && p
< chost
+ 12; p
++)
1145 if (strcmp(host
, "*") == 0)
1148 snprintf(cport
, sizeof(cport
),
1149 "%s%s", *host
? "." : "", sp
->s_name
);
1151 snprintf(cport
, sizeof(cport
),
1152 "%s%x", *host
? "." : "", port
);
1156 snprintf(mybuf
, sizeof(mybuf
), "%s.%s%s", net
, host
, cport
);
1161 ipx_phost(struct sockaddr
*sa
)
1163 struct sockaddr_ipx
*sipx
= (struct sockaddr_ipx
*)sa
;
1164 struct sockaddr_ipx work
;
1165 static union ipx_net ipx_zeronet
;
1169 work
.sipx_addr
.x_port
= 0;
1170 work
.sipx_addr
.x_net
= ipx_zeronet
;
1171 p
= ipx_print((struct sockaddr
*)&work
);
1172 if (strncmp("*.", p
, 2) == 0) p
+= 2;
1197 labelops(struct rtentry
*rt
)
1199 const char *lops
[] = { "push", "pop", "swap", "pop all" };
1200 static char buffer
[100];
1202 struct sockaddr_mpls
*smpls
;
1205 for (i
=0; i
<MPLS_MAXLOPS
; ++i
) {
1207 if (rt
->rt_shim
[i
] == NULL
)
1211 sizeof(buffer
) - (cp
- buffer
),
1214 smpls
= (struct sockaddr_mpls
*)kgetsa(rt
->rt_shim
[i
]);
1215 if (smpls
->smpls_op
!= MPLSLOP_POP
&&
1216 smpls
->smpls_op
!= MPLSLOP_POPALL
){
1218 sizeof(buffer
) - (cp
- buffer
),
1220 lops
[smpls
->smpls_op
- 1],
1221 ntohl(smpls
->smpls_label
));
1224 sizeof(buffer
) - (cp
- buffer
),
1226 lops
[smpls
->smpls_op
- 1]);