Home | History | Annotate | Line # | Download | only in netstat
route.c revision 1.78.2.1
      1  1.78.2.1      yamt /*	$NetBSD: route.c,v 1.78.2.1 2012/04/17 00:09:37 yamt Exp $	*/
      2      1.14   thorpej 
      3       1.1       cgd /*
      4      1.10   mycroft  * Copyright (c) 1983, 1988, 1993
      5      1.10   mycroft  *	The Regents of the University of California.  All rights reserved.
      6       1.1       cgd  *
      7       1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8       1.1       cgd  * modification, are permitted provided that the following conditions
      9       1.1       cgd  * are met:
     10       1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11       1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12       1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13       1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14       1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15      1.63       agc  * 3. Neither the name of the University nor the names of its contributors
     16       1.1       cgd  *    may be used to endorse or promote products derived from this software
     17       1.1       cgd  *    without specific prior written permission.
     18       1.1       cgd  *
     19       1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20       1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21       1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22       1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23       1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24       1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25       1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26       1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27       1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28       1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29       1.1       cgd  * SUCH DAMAGE.
     30       1.1       cgd  */
     31       1.1       cgd 
     32      1.23     lukem #include <sys/cdefs.h>
     33       1.1       cgd #ifndef lint
     34      1.14   thorpej #if 0
     35      1.14   thorpej static char sccsid[] = "from: @(#)route.c	8.3 (Berkeley) 3/9/94";
     36      1.14   thorpej #else
     37  1.78.2.1      yamt __RCSID("$NetBSD: route.c,v 1.78.2.1 2012/04/17 00:09:37 yamt Exp $");
     38      1.14   thorpej #endif
     39       1.1       cgd #endif /* not lint */
     40       1.1       cgd 
     41      1.70    dyoung #include <stdbool.h>
     42       1.1       cgd #include <sys/param.h>
     43      1.10   mycroft #include <sys/protosw.h>
     44       1.1       cgd #include <sys/socket.h>
     45       1.1       cgd #include <sys/mbuf.h>
     46      1.30       mrg #include <sys/un.h>
     47       1.1       cgd 
     48       1.1       cgd #include <net/if.h>
     49      1.10   mycroft #include <net/if_dl.h>
     50      1.10   mycroft #include <net/if_types.h>
     51       1.1       cgd #include <net/route.h>
     52       1.1       cgd #include <netinet/in.h>
     53      1.21  christos #include <netatalk/at.h>
     54      1.30       mrg #include <netiso/iso.h>
     55      1.75    kefren #include <netmpls/mpls.h>
     56       1.1       cgd 
     57      1.10   mycroft #include <sys/sysctl.h>
     58       1.4      paul 
     59      1.38    itojun #include <arpa/inet.h>
     60      1.38    itojun 
     61      1.29       mrg #include <err.h>
     62      1.66    rpaulo #include <kvm.h>
     63       1.1       cgd #include <netdb.h>
     64       1.1       cgd #include <stdio.h>
     65      1.10   mycroft #include <stdlib.h>
     66       1.1       cgd #include <string.h>
     67      1.10   mycroft #include <unistd.h>
     68      1.29       mrg 
     69      1.10   mycroft #include "netstat.h"
     70       1.1       cgd 
     71      1.10   mycroft #define kget(p, d) (kread((u_long)(p), (char *)&(d), sizeof (d)))
     72       1.1       cgd 
     73       1.1       cgd /*
     74      1.30       mrg  * XXX we put all of the sockaddr types in here to force the alignment
     75      1.30       mrg  * to be correct.
     76      1.30       mrg  */
     77      1.37    chopps static union sockaddr_union {
     78      1.10   mycroft 	struct	sockaddr u_sa;
     79      1.30       mrg 	struct	sockaddr_in u_in;
     80      1.30       mrg 	struct	sockaddr_un u_un;
     81      1.30       mrg 	struct	sockaddr_iso u_iso;
     82      1.30       mrg 	struct	sockaddr_at u_at;
     83      1.30       mrg 	struct	sockaddr_dl u_dl;
     84      1.10   mycroft 	u_short	u_data[128];
     85      1.38    itojun 	int u_dummy;		/* force word-alignment */
     86      1.10   mycroft } pt_u;
     87      1.10   mycroft 
     88      1.10   mycroft int	do_rtent = 0;
     89      1.10   mycroft struct	rtentry rtentry;
     90      1.10   mycroft struct	radix_node rnode;
     91      1.10   mycroft struct	radix_mask rmask;
     92      1.10   mycroft 
     93      1.69    dyoung static struct sockaddr *kgetsa(const struct sockaddr *);
     94      1.67      elad static void p_tree(struct radix_node *);
     95      1.67      elad static void p_rtnode(void);
     96      1.67      elad static void p_krtentry(struct rtentry *);
     97       1.3       cgd 
     98       1.3       cgd /*
     99       1.1       cgd  * Print routing tables.
    100       1.1       cgd  */
    101      1.10   mycroft void
    102  1.78.2.1      yamt routepr(u_long rtree)
    103       1.1       cgd {
    104      1.10   mycroft 	struct radix_node_head *rnh, head;
    105      1.73     lukem 	struct radix_node_head *rt_nodes[AF_MAX+1];
    106      1.10   mycroft 	int i;
    107       1.1       cgd 
    108       1.1       cgd 	printf("Routing tables\n");
    109      1.10   mycroft 
    110      1.67      elad 	if (rtree == 0) {
    111      1.67      elad 		printf("rt_tables: symbol not in namelist\n");
    112      1.67      elad 		return;
    113      1.67      elad 	}
    114      1.10   mycroft 
    115      1.73     lukem 	kget(rtree, rt_nodes);
    116      1.67      elad 	for (i = 0; i <= AF_MAX; i++) {
    117      1.73     lukem 		if ((rnh = rt_nodes[i]) == 0)
    118      1.67      elad 			continue;
    119      1.67      elad 		kget(rnh, head);
    120      1.67      elad 		if (i == AF_UNSPEC) {
    121      1.67      elad 			if (Aflag && (af == 0 || af == 0xff)) {
    122      1.67      elad 				printf("Netmasks:\n");
    123      1.10   mycroft 				p_tree(head.rnh_treetop);
    124      1.10   mycroft 			}
    125      1.67      elad 		} else if (af == AF_UNSPEC || af == i) {
    126      1.67      elad 			pr_family(i);
    127      1.67      elad 			do_rtent = 1;
    128      1.67      elad 			pr_rthdr(i, Aflag);
    129      1.67      elad 			p_tree(head.rnh_treetop);
    130       1.1       cgd 		}
    131       1.1       cgd 	}
    132       1.1       cgd }
    133       1.1       cgd 
    134      1.10   mycroft static struct sockaddr *
    135      1.69    dyoung kgetsa(const struct sockaddr *dst)
    136       1.1       cgd {
    137      1.10   mycroft 
    138       1.1       cgd 	kget(dst, pt_u.u_sa);
    139      1.10   mycroft 	if (pt_u.u_sa.sa_len > sizeof (pt_u.u_sa))
    140      1.10   mycroft 		kread((u_long)dst, (char *)pt_u.u_data, pt_u.u_sa.sa_len);
    141       1.1       cgd 	return (&pt_u.u_sa);
    142       1.1       cgd }
    143       1.1       cgd 
    144      1.10   mycroft static void
    145  1.78.2.1      yamt p_tree(struct radix_node *rn)
    146       1.1       cgd {
    147       1.1       cgd 
    148       1.1       cgd again:
    149       1.1       cgd 	kget(rn, rnode);
    150       1.1       cgd 	if (rnode.rn_b < 0) {
    151       1.1       cgd 		if (Aflag)
    152      1.21  christos 			printf("%-8.8lx ", (u_long) rn);
    153      1.10   mycroft 		if (rnode.rn_flags & RNF_ROOT) {
    154      1.10   mycroft 			if (Aflag)
    155      1.10   mycroft 				printf("(root node)%s",
    156       1.1       cgd 				    rnode.rn_dupedkey ? " =>\n" : "\n");
    157      1.10   mycroft 		} else if (do_rtent) {
    158       1.1       cgd 			kget(rn, rtentry);
    159      1.67      elad 			p_krtentry(&rtentry);
    160       1.1       cgd 			if (Aflag)
    161       1.1       cgd 				p_rtnode();
    162       1.1       cgd 		} else {
    163      1.73     lukem 			p_sockaddr(kgetsa((const struct sockaddr *)rnode.rn_key),
    164      1.16    mellon 			    NULL, 0, 44);
    165       1.1       cgd 			putchar('\n');
    166       1.1       cgd 		}
    167      1.21  christos 		if ((rn = rnode.rn_dupedkey) != NULL)
    168       1.1       cgd 			goto again;
    169       1.1       cgd 	} else {
    170       1.1       cgd 		if (Aflag && do_rtent) {
    171      1.21  christos 			printf("%-8.8lx ", (u_long) rn);
    172       1.1       cgd 			p_rtnode();
    173       1.1       cgd 		}
    174       1.1       cgd 		rn = rnode.rn_r;
    175       1.1       cgd 		p_tree(rnode.rn_l);
    176       1.1       cgd 		p_tree(rn);
    177       1.1       cgd 	}
    178       1.1       cgd }
    179       1.1       cgd 
    180      1.10   mycroft static void
    181  1.78.2.1      yamt p_rtnode(void)
    182       1.1       cgd {
    183      1.10   mycroft 	struct radix_mask *rm = rnode.rn_mklist;
    184      1.29       mrg 	char	nbuf[20];
    185       1.1       cgd 
    186       1.1       cgd 	if (rnode.rn_b < 0) {
    187       1.1       cgd 		if (rnode.rn_mask) {
    188       1.1       cgd 			printf("\t  mask ");
    189      1.73     lukem 			p_sockaddr(kgetsa((const struct sockaddr *)rnode.rn_mask),
    190      1.16    mellon 				    NULL, 0, -1);
    191       1.1       cgd 		} else if (rm == 0)
    192       1.1       cgd 			return;
    193       1.1       cgd 	} else {
    194      1.29       mrg 		(void)snprintf(nbuf, sizeof nbuf, "(%d)", rnode.rn_b);
    195      1.21  christos 		printf("%6.6s %8.8lx : %8.8lx", nbuf, (u_long) rnode.rn_l,
    196      1.21  christos 		    (u_long) rnode.rn_r);
    197       1.1       cgd 	}
    198       1.1       cgd 	while (rm) {
    199       1.1       cgd 		kget(rm, rmask);
    200      1.29       mrg 		(void)snprintf(nbuf, sizeof nbuf, " %d refs, ", rmask.rm_refs);
    201      1.21  christos 		printf(" mk = %8.8lx {(%d),%s", (u_long) rm,
    202      1.21  christos 		    -1 - rmask.rm_b, rmask.rm_refs ? nbuf : " ");
    203      1.16    mellon 		if (rmask.rm_flags & RNF_NORMAL) {
    204      1.16    mellon 			struct radix_node rnode_aux;
    205      1.16    mellon 			printf(" <normal>, ");
    206      1.16    mellon 			kget(rmask.rm_leaf, rnode_aux);
    207      1.73     lukem 			p_sockaddr(kgetsa((const struct sockaddr *)rnode_aux.rn_mask),
    208      1.16    mellon 				    NULL, 0, -1);
    209      1.16    mellon 		} else
    210      1.73     lukem 			p_sockaddr(kgetsa((const struct sockaddr *)rmask.rm_mask),
    211      1.29       mrg 			    NULL, 0, -1);
    212       1.1       cgd 		putchar('}');
    213      1.21  christos 		if ((rm = rmask.rm_mklist) != NULL)
    214       1.1       cgd 			printf(" ->");
    215       1.1       cgd 	}
    216       1.1       cgd 	putchar('\n');
    217       1.1       cgd }
    218       1.1       cgd 
    219  1.78.2.1      yamt static struct sockaddr *sockcopy(struct sockaddr *, union sockaddr_union *);
    220      1.35    chopps 
    221      1.35    chopps /*
    222      1.35    chopps  * copy a sockaddr into an allocated region, allocate at least sockaddr
    223      1.35    chopps  * bytes and zero unused
    224      1.35    chopps  */
    225      1.35    chopps static struct sockaddr *
    226  1.78.2.1      yamt sockcopy(struct sockaddr *sp, union sockaddr_union *dp)
    227      1.35    chopps {
    228      1.37    chopps 	int len;
    229      1.35    chopps 
    230      1.37    chopps 	if (sp == 0 || sp->sa_len == 0)
    231      1.37    chopps 		(void)memset(dp, 0, sizeof (*sp));
    232      1.37    chopps 	else {
    233      1.37    chopps 		len = (sp->sa_len >= sizeof (*sp)) ? sp->sa_len : sizeof (*sp);
    234      1.37    chopps 		(void)memcpy(dp, sp, len);
    235      1.37    chopps 	}
    236      1.37    chopps 	return ((struct sockaddr *)dp);
    237      1.35    chopps }
    238      1.35    chopps 
    239      1.10   mycroft static void
    240  1.78.2.1      yamt p_krtentry(struct rtentry *rt)
    241       1.4      paul {
    242      1.10   mycroft 	static struct ifnet ifnet, *lastif;
    243      1.37    chopps 	union sockaddr_union addr_un, mask_un;
    244      1.35    chopps 	struct sockaddr *addr, *mask;
    245      1.40        is 
    246      1.40        is 	if (Lflag && (rt->rt_flags & RTF_LLINFO))
    247      1.40        is 		return;
    248       1.4      paul 
    249      1.38    itojun 	memset(&addr_un, 0, sizeof(addr_un));
    250      1.38    itojun 	memset(&mask_un, 0, sizeof(mask_un));
    251      1.69    dyoung 	addr = sockcopy(kgetsa(rt_getkey(rt)), &addr_un);
    252      1.35    chopps 	if (rt_mask(rt))
    253      1.37    chopps 		mask = sockcopy(kgetsa(rt_mask(rt)), &mask_un);
    254      1.16    mellon 	else
    255      1.38    itojun 		mask = sockcopy(NULL, &mask_un);
    256      1.67      elad 	p_addr(addr, mask, rt->rt_flags);
    257      1.67      elad 	p_gwaddr(kgetsa(rt->rt_gateway), kgetsa(rt->rt_gateway)->sa_family);
    258      1.67      elad 	p_flags(rt->rt_flags, "%-6.6s ");
    259      1.76      matt 	printf("%6d %8"PRIu64" ", rt->rt_refcnt, rt->rt_use);
    260      1.13   thorpej 	if (rt->rt_rmx.rmx_mtu)
    261      1.76      matt 		printf("%6"PRIu64, rt->rt_rmx.rmx_mtu);
    262      1.13   thorpej 	else
    263      1.26       kml 		printf("%6s", "-");
    264      1.26       kml 	putchar((rt->rt_rmx.rmx_locks & RTV_MTU) ? 'L' : ' ');
    265      1.75    kefren 	if (tagflag == 1) {
    266      1.75    kefren 		if (rt->rt_tag != NULL) {
    267      1.78    kefren 			const struct sockaddr *tagsa = kgetsa(rt->rt_tag);
    268      1.78    kefren 			char *tagstr;
    269      1.78    kefren 
    270      1.78    kefren 			if (tagsa->sa_family == AF_MPLS) {
    271      1.78    kefren 				tagstr = mpls_ntoa(tagsa);
    272      1.78    kefren 				if (strlen(tagstr) < 7)
    273      1.78    kefren 					printf("%7s", tagstr);
    274      1.78    kefren 				else
    275      1.78    kefren 					printf("%s", tagstr);
    276      1.75    kefren 			}
    277      1.75    kefren 			else
    278      1.75    kefren 				printf("%7s", "-");
    279      1.75    kefren 		} else
    280      1.75    kefren 			printf("%7s", "-");
    281      1.75    kefren 	}
    282      1.10   mycroft 	if (rt->rt_ifp) {
    283      1.10   mycroft 		if (rt->rt_ifp != lastif) {
    284      1.10   mycroft 			kget(rt->rt_ifp, ifnet);
    285      1.10   mycroft 			lastif = rt->rt_ifp;
    286      1.10   mycroft 		}
    287      1.15   thorpej 		printf(" %.16s%s", ifnet.if_xname,
    288      1.10   mycroft 			rt->rt_nodes[0].rn_dupedkey ? " =>" : "");
    289       1.1       cgd 	}
    290      1.10   mycroft 	putchar('\n');
    291      1.34       kml  	if (vflag) {
    292      1.76      matt  		printf("\texpire   %10"PRId64"%c  recvpipe %10"PRIu64"%c  "
    293      1.76      matt 		       "sendpipe %10"PRIu64"%c\n",
    294      1.76      matt  			(int64_t)rt->rt_rmx.rmx_expire,
    295      1.34       kml  			(rt->rt_rmx.rmx_locks & RTV_EXPIRE) ? 'L' : ' ',
    296      1.34       kml  			rt->rt_rmx.rmx_recvpipe,
    297      1.34       kml  			(rt->rt_rmx.rmx_locks & RTV_RPIPE) ? 'L' : ' ',
    298      1.34       kml  			rt->rt_rmx.rmx_sendpipe,
    299      1.34       kml  			(rt->rt_rmx.rmx_locks & RTV_SPIPE) ? 'L' : ' ');
    300      1.76      matt  		printf("\tssthresh %10"PRIu64"%c  rtt      %10"PRIu64"%c  "
    301      1.76      matt 		       "rttvar   %10"PRIu64"%c\n",
    302      1.34       kml  			rt->rt_rmx.rmx_ssthresh,
    303      1.34       kml  			(rt->rt_rmx.rmx_locks & RTV_SSTHRESH) ? 'L' : ' ',
    304      1.34       kml  			rt->rt_rmx.rmx_rtt,
    305      1.34       kml  			(rt->rt_rmx.rmx_locks & RTV_RTT) ? 'L' : ' ',
    306      1.34       kml  			rt->rt_rmx.rmx_rttvar,
    307      1.34       kml 			(rt->rt_rmx.rmx_locks & RTV_RTTVAR) ? 'L' : ' ');
    308      1.76      matt  		printf("\thopcount %10"PRIu64"%c\n",
    309      1.54     enami  			rt->rt_rmx.rmx_hopcount,
    310      1.54     enami 			(rt->rt_rmx.rmx_locks & RTV_HOPCOUNT) ? 'L' : ' ');
    311      1.54     enami  	}
    312       1.1       cgd }
    313       1.1       cgd 
    314       1.1       cgd /*
    315       1.1       cgd  * Print routing statistics
    316       1.1       cgd  */
    317      1.10   mycroft void
    318  1.78.2.1      yamt rt_stats(u_long off)
    319       1.1       cgd {
    320      1.73     lukem 	struct rtstat rtstats;
    321       1.1       cgd 
    322      1.67      elad 	if (use_sysctl) {
    323      1.73     lukem 		size_t rtsize = sizeof(rtstats);
    324      1.67      elad 
    325      1.73     lukem 		if (sysctlbyname("net.route.stats", &rtstats, &rtsize,
    326      1.67      elad 		    NULL, 0) == -1)
    327      1.67      elad 			err(1, "rt_stats: sysctl");
    328      1.67      elad 	} else 	if (off == 0) {
    329       1.1       cgd 		printf("rtstat: symbol not in namelist\n");
    330       1.1       cgd 		return;
    331      1.67      elad 	} else
    332      1.73     lukem 		kread(off, (char *)&rtstats, sizeof(rtstats));
    333      1.67      elad 
    334       1.1       cgd 	printf("routing:\n");
    335      1.53    itojun 	printf("\t%llu bad routing redirect%s\n",
    336      1.73     lukem 		(unsigned long long)rtstats.rts_badredirect,
    337      1.73     lukem 		plural(rtstats.rts_badredirect));
    338      1.53    itojun 	printf("\t%llu dynamically created route%s\n",
    339      1.73     lukem 		(unsigned long long)rtstats.rts_dynamic,
    340      1.73     lukem 		plural(rtstats.rts_dynamic));
    341      1.53    itojun 	printf("\t%llu new gateway%s due to redirects\n",
    342      1.73     lukem 		(unsigned long long)rtstats.rts_newgateway,
    343      1.73     lukem 		plural(rtstats.rts_newgateway));
    344      1.53    itojun 	printf("\t%llu destination%s found unreachable\n",
    345      1.73     lukem 		(unsigned long long)rtstats.rts_unreach,
    346      1.73     lukem 		plural(rtstats.rts_unreach));
    347      1.53    itojun 	printf("\t%llu use%s of a wildcard route\n",
    348      1.73     lukem 		(unsigned long long)rtstats.rts_wildcard,
    349      1.73     lukem 		plural(rtstats.rts_wildcard));
    350       1.1       cgd }
    351      1.67      elad 
    352      1.10   mycroft void
    353  1.78.2.1      yamt upHex(char *p0)
    354       1.1       cgd {
    355      1.23     lukem 	char *p = p0;
    356       1.1       cgd 
    357      1.29       mrg 	for (; *p; p++)
    358      1.29       mrg 		switch (*p) {
    359      1.29       mrg 		case 'a':
    360      1.29       mrg 		case 'b':
    361      1.29       mrg 		case 'c':
    362      1.29       mrg 		case 'd':
    363      1.29       mrg 		case 'e':
    364      1.29       mrg 		case 'f':
    365      1.29       mrg 			*p += ('A' - 'a');
    366      1.29       mrg 		}
    367       1.1       cgd }
    368