Home | History | Annotate | Line # | Download | only in netstat
main.c revision 1.65
      1 /*	$NetBSD: main.c,v 1.65 2008/04/15 16:06:28 thorpej Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1983, 1988, 1993
      5  *	Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 #ifndef lint
     34 __COPYRIGHT("@(#) Copyright (c) 1983, 1988, 1993\n\
     35 	Regents of the University of California.  All rights reserved.\n");
     36 #endif /* not lint */
     37 
     38 #ifndef lint
     39 #if 0
     40 static char sccsid[] = "from: @(#)main.c	8.4 (Berkeley) 3/1/94";
     41 #else
     42 __RCSID("$NetBSD: main.c,v 1.65 2008/04/15 16:06:28 thorpej Exp $");
     43 #endif
     44 #endif /* not lint */
     45 
     46 #include <sys/param.h>
     47 #include <sys/file.h>
     48 #include <sys/protosw.h>
     49 #include <sys/socket.h>
     50 
     51 #include <net/if.h>
     52 #include <netinet/in.h>
     53 
     54 #include <ctype.h>
     55 #include <err.h>
     56 #include <errno.h>
     57 #include <kvm.h>
     58 #include <limits.h>
     59 #include <netdb.h>
     60 #include <nlist.h>
     61 #include <paths.h>
     62 #include <stdio.h>
     63 #include <stdlib.h>
     64 #include <string.h>
     65 #include <unistd.h>
     66 #include "netstat.h"
     67 
     68 struct nlist nl[] = {
     69 #define	N_MBSTAT	0
     70 	{ "_mbstat" },
     71 #define	N_IPSTAT	1
     72 	{ "_ipstat" },
     73 #define	N_TCBTABLE	2
     74 	{ "_tcbtable" },
     75 #define	N_TCPSTAT	3
     76 	{ "_tcpstat" },
     77 #define	N_UDBTABLE	4
     78 	{ "_udbtable" },
     79 #define	N_UDPSTAT	5
     80 	{ "_udpstat" },
     81 #define	N_IFNET		6
     82 	{ "_ifnet" },
     83 #define	N_IMP		7
     84 	{ "_imp_softc" },
     85 #define	N_ICMPSTAT	8
     86 	{ "_icmpstat" },
     87 #define	N_RTSTAT	9
     88 	{ "_rtstat" },
     89 #define	N_UNIXSW	10
     90 	{ "_unixsw" },
     91 #define N_IDP		11
     92 	{ "_nspcb"},
     93 #define N_IDPSTAT	12
     94 	{ "_idpstat"},
     95 #define N_SPPSTAT	13
     96 	{ "_spp_istat"},
     97 #define N_NSERR		14
     98 	{ "_ns_errstat"},
     99 #define	N_CLNPSTAT	15
    100 	{ "_clnp_stat"},
    101 #define	IN_NOTUSED	16
    102 	{ "_tp_inpcb" },
    103 #define	ISO_TP		17
    104 	{ "_tp_refinfo" },
    105 #define	N_TPSTAT	18
    106 	{ "_tp_stat" },
    107 #define	N_ESISSTAT	19
    108 	{ "_esis_stat"},
    109 #define N_NIMP		20
    110 	{ "_nimp"},
    111 #define N_RTREE		21
    112 	{ "_rt_tables"},
    113 #define N_CLTP		22
    114 	{ "_cltb"},
    115 #define N_CLTPSTAT	23
    116 	{ "_cltpstat"},
    117 #define	N_NFILE		24
    118 	{ "_nfile" },
    119 #define	N_FILE		25
    120 	{ "_file" },
    121 #define N_IGMPSTAT	26
    122 	{ "_igmpstat" },
    123 #define N_MRTPROTO	27
    124 	{ "_ip_mrtproto" },
    125 #define N_MRTSTAT	28
    126 	{ "_mrtstat" },
    127 #define N_MFCHASHTBL	29
    128 	{ "_mfchashtbl" },
    129 #define	N_MFCHASH	30
    130 	{ "_mfchash" },
    131 #define N_VIFTABLE	31
    132 	{ "_viftable" },
    133 #define N_MSIZE		32
    134 	{ "_msize" },
    135 #define N_MCLBYTES	33
    136 	{ "_mclbytes" },
    137 #define N_DDPSTAT	34
    138 	{ "_ddpstat"},
    139 #define N_DDPCB		35
    140 	{ "_ddpcb"},
    141 #define N_MBPOOL	36
    142 	{ "_mbpool" },
    143 #define N_MCLPOOL	37
    144 	{ "_mclpool" },
    145 #define N_DIVPCB	38
    146 	{ "_divcb"},
    147 #define N_DIVSTAT	39
    148 	{ "_divstat"},
    149 #define N_IP6STAT	40
    150 	{ "_ip6stat" },
    151 #define N_TCP6STAT	41
    152 	{ "_tcp6stat" },
    153 #define N_UDP6STAT	42
    154 	{ "_udp6stat" },
    155 #define N_ICMP6STAT	43
    156 	{ "_icmp6stat" },
    157 #define N_IPSECSTAT	44
    158 	{ "_ipsecstat" },
    159 #define N_IPSEC6STAT	45
    160 	{ "_ipsec6stat" },
    161 #define N_PIM6STAT	46
    162 	{ "_pim6stat" },
    163 #define N_MRT6PROTO	47
    164 	{ "_ip6_mrtproto" },
    165 #define N_MRT6STAT	48
    166 	{ "_mrt6stat" },
    167 #define N_MF6CTABLE	49
    168 	{ "_mf6ctable" },
    169 #define N_MIF6TABLE	50
    170 	{ "_mif6table" },
    171 #define N_PFKEYSTAT	51
    172 	{ "_pfkeystat" },
    173 #define N_ARPSTAT	52
    174 	{ "_arpstat" },
    175 #define N_RIP6STAT	53
    176 	{ "_rip6stat" },
    177 #define	N_ARPINTRQ	54
    178 	{ "_arpintrq" },
    179 #define	N_IPINTRQ	55
    180 	{ "_ipintrq" },
    181 #define	N_IP6INTRQ	56
    182 	{ "_ip6intrq" },
    183 #define	N_ATINTRQ1	57
    184 	{ "_atintrq1" },
    185 #define	N_ATINTRQ2	58
    186 	{ "_atintrq2" },
    187 #define	N_NSINTRQ	59
    188 	{ "_nsintrq" },
    189 #define	N_CLNLINTRQ	60
    190 	{ "_clnlintrq" },
    191 #define	N_LLCINTRQ	61
    192 	{ "_llcintrq" },
    193 #define	N_HDINTRQ	62
    194 	{ "_hdintrq" },
    195 #define	N_NATMINTRQ	63
    196 	{ "_natmintrq" },
    197 #define	N_PPPOEDISCINQ	64
    198 	{ "_ppoediscinq" },
    199 #define	N_PPPOEINQ	65
    200 	{ "_ppoeinq" },
    201 #define	N_PKINTRQ	66
    202 	{ "_pkintrq" },
    203 #define	N_HARDCLOCK_TICKS 67
    204 	{ "_hardclock_ticks" },
    205 #define N_PIMSTAT	68
    206 	{ "_pimstat" },
    207 #define N_CARPSTAT	69
    208 	{ "_carpstats" },
    209 	{ "" },
    210 };
    211 
    212 struct protox {
    213 	u_char	pr_index;		/* index into nlist of cb head */
    214 	u_char	pr_sindex;		/* index into nlist of stat block */
    215 	u_char	pr_wanted;		/* 1 if wanted, 0 otherwise */
    216 	void	(*pr_cblocks)		/* control blocks printing routine */
    217 			__P((u_long, char *));
    218 	void	(*pr_stats)		/* statistics printing routine */
    219 			__P((u_long, char *));
    220 	void	(*pr_istats)
    221 			__P((char *));	/* per/if statistics printing routine */
    222 	void	(*pr_dump)		/* PCB state dump routine */
    223 			__P((u_long));
    224 	char	*pr_name;		/* well-known name */
    225 } protox[] = {
    226 	{ N_TCBTABLE,	N_TCPSTAT,	1,	protopr,
    227 	  tcp_stats,	NULL,		tcp_dump,	"tcp" },
    228 	{ N_UDBTABLE,	N_UDPSTAT,	1,	protopr,
    229 	  udp_stats,	NULL,		0,	"udp" },
    230 	{ -1,		N_IPSTAT,	1,	0,
    231 	  ip_stats,	NULL,		0,	"ip" },
    232 	{ -1,		N_ICMPSTAT,	1,	0,
    233 	  icmp_stats,	NULL,		0,	"icmp" },
    234 	{ -1,		N_IGMPSTAT,	1,	0,
    235 	  igmp_stats,	NULL,		0,	"igmp" },
    236 	{ -1,		N_CARPSTAT,	1,	0,
    237 	  carp_stats,	NULL,		0,	"carp" },
    238 #ifdef IPSEC
    239 	{ -1,		N_IPSECSTAT,	1,	0,
    240 	  ipsec_switch,	NULL,		0,	"ipsec" },
    241 #endif
    242 	{ -1,		N_PIMSTAT,	1,	0,
    243 	  pim_stats,	NULL,		0,	"pim" },
    244 	{ -1,		-1,		0,	0,
    245 	  0,		NULL,		0,	0 }
    246 };
    247 
    248 #ifdef INET6
    249 struct protox ip6protox[] = {
    250 	{ -1,		N_IP6STAT,	1,	0,
    251 	  ip6_stats,	ip6_ifstats,	0,	"ip6" },
    252 	{ -1,		N_ICMP6STAT,	1,	0,
    253 	  icmp6_stats,	icmp6_ifstats,	0,	"icmp6" },
    254 #ifdef TCP6
    255 	{ N_TCBTABLE,	N_TCP6STAT,	1,	ip6protopr,
    256 	  tcp6_stats,	NULL,		tcp6_dump,	"tcp6" },
    257 #else
    258 	{ N_TCBTABLE,	N_TCP6STAT,	1,	ip6protopr,
    259 	  tcp_stats,	NULL,		tcp_dump,	"tcp6" },
    260 #endif
    261 	{ N_UDBTABLE,	N_UDP6STAT,	1,	ip6protopr,
    262 	  udp6_stats,	NULL,		0,	"udp6" },
    263 #ifdef IPSEC
    264 	{ -1,		N_IPSEC6STAT,	1,	0,
    265 	  ipsec_switch,	NULL,		0,	"ipsec6" },
    266 #endif
    267 	{ -1,		N_PIM6STAT,	1,	0,
    268 	  pim6_stats,	NULL,		0,	"pim6" },
    269 	{ -1,		N_RIP6STAT,	1,	0,
    270 	  rip6_stats,	NULL,		0,	"rip6" },
    271 	{ -1,		-1,		0,	0,
    272 	  0,		NULL,		0,	0 }
    273 };
    274 #endif
    275 
    276 struct protox arpprotox[] = {
    277 	{ -1,		N_ARPSTAT,	1,	0,
    278 	  arp_stats,	NULL,		0,	"arp" },
    279 	{ -1,		-1,		0,	0,
    280 	  0,		NULL,		0,	0 }
    281 };
    282 
    283 #ifdef IPSEC
    284 struct protox pfkeyprotox[] = {
    285 	{ -1,		N_PFKEYSTAT,	1,	0,
    286 	  pfkey_stats,	NULL,		0,	"pfkey" },
    287 	{ -1,		-1,		0,	0,
    288 	  0,		NULL,		0,	0 }
    289 };
    290 #endif
    291 
    292 #ifndef SMALL
    293 struct protox atalkprotox[] = {
    294 	{ N_DDPCB,	N_DDPSTAT,	1,	atalkprotopr,
    295 	  ddp_stats,	NULL,		0,	"ddp" },
    296 	{ -1,		-1,		0,	0,
    297 	  0,		NULL,		0 }
    298 };
    299 
    300 #ifdef NS
    301 struct protox nsprotox[] = {
    302 	{ N_IDP,	N_IDPSTAT,	1,	nsprotopr,
    303 	  idp_stats,	NULL,		0,	"idp" },
    304 	{ N_IDP,	N_SPPSTAT,	1,	nsprotopr,
    305 	  spp_stats,	NULL,		0,	"spp" },
    306 	{ -1,		N_NSERR,	1,	0,
    307 	  nserr_stats,	NULL,		0,	"ns_err" },
    308 	{ -1,		-1,		0,	0,
    309 	  0,		NULL,		0 }
    310 };
    311 #endif
    312 
    313 struct protox isoprotox[] = {
    314 	{ ISO_TP,	N_TPSTAT,	1,	iso_protopr,
    315 	  tp_stats,	NULL,		0,	"tp" },
    316 	{ N_CLTP,	N_CLTPSTAT,	1,	iso_protopr,
    317 	  cltp_stats,	NULL,		0,	"cltp" },
    318 	{ -1,		N_CLNPSTAT,	1,	 0,
    319 	  clnp_stats,	NULL,		0,	"clnp"},
    320 	{ -1,		N_ESISSTAT,	1,	 0,
    321 	  esis_stats,	NULL,		0,	"esis"},
    322 	{ -1,		-1,		0,	0,
    323 	  0,		NULL,		0,	0 }
    324 };
    325 #endif
    326 
    327 struct protox *protoprotox[] = { protox,
    328 #ifdef INET6
    329 				 ip6protox,
    330 #endif
    331 				 arpprotox,
    332 #ifdef IPSEC
    333 				 pfkeyprotox,
    334 #endif
    335 #ifndef SMALL
    336 				 atalkprotox,
    337 #ifdef NS
    338 				 nsprotox,
    339 #endif
    340 				 isoprotox,
    341 #endif
    342 				 NULL };
    343 
    344 const struct softintrq {
    345 	const char *siq_name;
    346 	int siq_index;
    347 } softintrq[] = {
    348 	{ "arpintrq", N_ARPINTRQ },
    349 	{ "ipintrq", N_IPINTRQ },
    350 	{ "ip6intrq", N_IP6INTRQ },
    351 	{ "atintrq1", N_ATINTRQ1 },
    352 	{ "atintrq2", N_ATINTRQ2 },
    353 #ifdef NS
    354 	{ "nsintrq", N_NSINTRQ },
    355 #endif
    356 	{ "clnlintrq", N_CLNLINTRQ },
    357 	{ "llcintrq", N_LLCINTRQ },
    358 	{ "hdintrq", N_HDINTRQ },
    359 	{ "natmintrq", N_NATMINTRQ },
    360 	{ "ppoediscinq", N_PPPOEDISCINQ },
    361 	{ "ppoeinq", N_PPPOEINQ },
    362 	{ "pkintrq", N_PKINTRQ },
    363 	{ NULL, -1 },
    364 };
    365 
    366 int main __P((int, char *[]));
    367 static void printproto __P((struct protox *, char *));
    368 static void print_softintrq __P((void));
    369 static void usage __P((void));
    370 static struct protox *name2protox __P((char *));
    371 static struct protox *knownname __P((char *));
    372 static void prepare(char *, char *, struct protox *tp);
    373 
    374 kvm_t *kvmd;
    375 gid_t egid;
    376 
    377 void
    378 prepare(char *nlistf, char *memf, struct protox *tp)
    379 {
    380 	char buf[_POSIX2_LINE_MAX];
    381 
    382 	/*
    383 	 * Try to figure out if we can use sysctl or not.
    384 	 */
    385 	if (nlistf != NULL && memf != NULL) {
    386 		/* If we have -M and -N, we're not dealing with live memory. */
    387 		use_sysctl = 0;
    388 	} else if (qflag ||
    389 		   rflag ||
    390 		   iflag ||
    391 #ifndef SMALL
    392 		   gflag ||
    393 		   (pflag && tp->pr_sindex == N_DDPSTAT) ||
    394 #ifdef NS
    395 		   (pflag && tp->pr_sindex == N_IDPSTAT) ||
    396 		   (pflag && tp->pr_sindex == N_SPPSTAT) ||
    397 		   (pflag && tp->pr_sindex == N_NSERR) ||
    398 #endif
    399 		   (pflag && tp->pr_sindex == N_TPSTAT) ||
    400 		   (pflag && tp->pr_sindex == N_CLTPSTAT) ||
    401 		   (pflag && tp->pr_sindex == N_CLNPSTAT) ||
    402 		   (pflag && tp->pr_sindex == N_ESISSTAT) ||
    403 #endif
    404 		   (pflag && tp->pr_sindex == N_PIMSTAT) ||
    405 #ifdef IPSEC
    406 		   (pflag && tp->pr_sindex == N_IPSECSTAT) ||
    407 		   (pflag && tp->pr_sindex == N_PFKEYSTAT) ||
    408 #ifdef INET6
    409 		   (pflag && tp->pr_sindex == N_IPSEC6STAT) ||
    410 #endif
    411 #endif
    412 		   Pflag) {
    413 		/* These flags are not yet supported via sysctl(3). */
    414 		use_sysctl = 0;
    415 	} else {
    416 		/* We can use sysctl(3). */
    417 		use_sysctl = 1;
    418 	}
    419 
    420 	if (!use_sysctl) {
    421 		(void)setegid(egid);
    422 		kvmd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf);
    423 		(void)setgid(getgid());
    424 		if (kvmd == NULL)
    425 			err(1, "kvm error: %s", buf);
    426 
    427 		if (kvm_nlist(kvmd, nl) < 0 || nl[0].n_type == 0) {
    428 			if (nlistf)
    429 				errx(1, "%s: no namelist", nlistf);
    430 			else
    431 				errx(1, "no namelist");
    432 		}
    433 	} else
    434 		(void)setgid(getgid());
    435 }
    436 
    437 int
    438 main(argc, argv)
    439 	int argc;
    440 	char *argv[];
    441 {
    442 	struct protoent *p;
    443 	struct protox *tp;	/* for printing cblocks & stats */
    444 	int ch;
    445 	char *nlistf = NULL, *memf = NULL;
    446 	char *cp;
    447 	u_long pcbaddr;
    448 
    449 	egid = getegid();
    450 	(void)setegid(getgid());
    451 	tp = NULL;
    452 	af = AF_UNSPEC;
    453 	pcbaddr = 0;
    454 
    455 	while ((ch = getopt(argc, argv,
    456 	    "AabBdf:ghI:LliM:mN:nP:p:qrsStuvw:")) != -1)
    457 		switch (ch) {
    458 		case 'A':
    459 			Aflag = 1;
    460 			break;
    461 		case 'a':
    462 			aflag = 1;
    463 			break;
    464 		case 'b':
    465 			bflag = 1;
    466 			break;
    467 		case 'B':
    468 			Bflag = 1;
    469 			break;
    470 		case 'd':
    471 			dflag = 1;
    472 			break;
    473 		case 'f':
    474 #ifdef NS
    475 			if (strcmp(optarg, "ns") == 0) {
    476 				af = AF_NS;
    477 				break;
    478 			}
    479 #endif
    480 			if (strcmp(optarg, "inet") == 0)
    481 				af = AF_INET;
    482 			else if (strcmp(optarg, "inet6") == 0)
    483 				af = AF_INET6;
    484 			else if (strcmp(optarg, "arp") == 0)
    485 				af = AF_ARP;
    486 			else if (strcmp(optarg, "pfkey") == 0)
    487 				af = PF_KEY;
    488 			else if (strcmp(optarg, "unix") == 0
    489 			    || strcmp(optarg, "local") == 0)
    490 				af = AF_LOCAL;
    491 			else if (strcmp(optarg, "iso") == 0)
    492 				af = AF_ISO;
    493 			else if (strcmp(optarg, "atalk") == 0)
    494 				af = AF_APPLETALK;
    495 			else
    496 				errx(1, "%s: unknown address family",
    497 				    optarg);
    498 			break;
    499 #ifndef SMALL
    500 		case 'g':
    501 			gflag = 1;
    502 			break;
    503 #endif
    504 		case 'I':
    505 			iflag = 1;
    506 			interface = optarg;
    507 			break;
    508 		case 'i':
    509 			iflag = 1;
    510 			break;
    511 		case 'L':
    512 			Lflag = 1;
    513 			break;
    514 		case 'l':
    515 			lflag = 1;
    516 			break;
    517 		case 'M':
    518 			memf = optarg;
    519 			break;
    520 		case 'm':
    521 			mflag = 1;
    522 			break;
    523 		case 'N':
    524 			nlistf = optarg;
    525 			break;
    526 		case 'n':
    527 			numeric_addr = numeric_port = nflag = 1;
    528 			break;
    529 		case 'P':
    530 			errno = 0;
    531 			pcbaddr = strtoul(optarg, &cp, 16);
    532 			if (*cp != '\0' || errno == ERANGE)
    533 				errx(1, "invalid PCB address %s",
    534 				    optarg);
    535 			Pflag = 1;
    536 			break;
    537 		case 'p':
    538 			if ((tp = name2protox(optarg)) == NULL)
    539 				errx(1, "%s: unknown or uninstrumented protocol",
    540 				    optarg);
    541 			pflag = 1;
    542 			break;
    543 		case 'q':
    544 			qflag = 1;
    545 			break;
    546 		case 'r':
    547 			rflag = 1;
    548 			break;
    549 		case 's':
    550 			++sflag;
    551 			break;
    552 		case 'S':
    553 			numeric_addr = 1;
    554 			break;
    555 		case 't':
    556 			tflag = 1;
    557 			break;
    558 		case 'u':
    559 			af = AF_LOCAL;
    560 			break;
    561 		case 'v':
    562 			vflag++;
    563 			break;
    564 		case 'w':
    565 			interval = atoi(optarg);
    566 			iflag = 1;
    567 			break;
    568 		case '?':
    569 		default:
    570 			usage();
    571 		}
    572 	argv += optind;
    573 	argc -= optind;
    574 
    575 #define	BACKWARD_COMPATIBILITY
    576 #ifdef	BACKWARD_COMPATIBILITY
    577 	if (*argv) {
    578 		if (isdigit((unsigned char)**argv)) {
    579 			interval = atoi(*argv);
    580 			if (interval <= 0)
    581 				usage();
    582 			++argv;
    583 			iflag = 1;
    584 		}
    585 		if (*argv) {
    586 			nlistf = *argv;
    587 			if (*++argv)
    588 				memf = *argv;
    589 		}
    590 	}
    591 #endif
    592 
    593 	prepare(nlistf, memf, tp);
    594 
    595 #ifndef SMALL
    596 	if (Bflag) {
    597 		if (sflag)
    598 			bpf_stats();
    599 		else
    600 			bpf_dump(interface);
    601 		exit(0);
    602 	}
    603 #endif
    604 
    605 	if (mflag) {
    606 		mbpr(nl[N_MBSTAT].n_value,  nl[N_MSIZE].n_value,
    607 		    nl[N_MCLBYTES].n_value, nl[N_MBPOOL].n_value,
    608 		    nl[N_MCLPOOL].n_value);
    609 		exit(0);
    610 	}
    611 	if (Pflag) {
    612 		if (tp == NULL) {
    613 			/* Default to TCP. */
    614 			tp = name2protox("tcp");
    615 		}
    616 		if (tp->pr_dump)
    617 			(*tp->pr_dump)(pcbaddr);
    618 		else
    619 			printf("%s: no PCB dump routine\n", tp->pr_name);
    620 		exit(0);
    621 	}
    622 	if (pflag) {
    623 		if (iflag && tp->pr_istats)
    624 			intpr(interval, nl[N_IFNET].n_value, tp->pr_istats);
    625 		else if (tp->pr_stats)
    626 			(*tp->pr_stats)(nl[tp->pr_sindex].n_value,
    627 				tp->pr_name);
    628 		else
    629 			printf("%s: no stats routine\n", tp->pr_name);
    630 		exit(0);
    631 	}
    632 	if (qflag) {
    633 		print_softintrq();
    634 		exit(0);
    635 	}
    636 	/*
    637 	 * Keep file descriptors open to avoid overhead
    638 	 * of open/close on each call to get* routines.
    639 	 */
    640 	sethostent(1);
    641 	setnetent(1);
    642 	if (iflag) {
    643 		if (af != AF_UNSPEC)
    644 			goto protostat;
    645 
    646 		intpr(interval, nl[N_IFNET].n_value, NULL);
    647 		exit(0);
    648 	}
    649 	if (rflag) {
    650 		if (sflag)
    651 			rt_stats(use_sysctl ? 0 : nl[N_RTSTAT].n_value);
    652 		else {
    653 			if (use_sysctl)
    654 				p_rttables(af);
    655 			else
    656 				routepr(nl[N_RTREE].n_value);
    657 		}
    658 		exit(0);
    659 	}
    660 #ifndef SMALL
    661 	if (gflag) {
    662 		if (sflag) {
    663 			if (af == AF_INET || af == AF_UNSPEC)
    664 				mrt_stats(nl[N_MRTPROTO].n_value,
    665 					  nl[N_MRTSTAT].n_value);
    666 #ifdef INET6
    667 			if (af == AF_INET6 || af == AF_UNSPEC)
    668 				mrt6_stats(nl[N_MRT6PROTO].n_value,
    669 					   nl[N_MRT6STAT].n_value);
    670 #endif
    671 		}
    672 		else {
    673 			if (af == AF_INET || af == AF_UNSPEC)
    674 				mroutepr(nl[N_MRTPROTO].n_value,
    675 					 nl[N_MFCHASHTBL].n_value,
    676 					 nl[N_MFCHASH].n_value,
    677 					 nl[N_VIFTABLE].n_value);
    678 #ifdef INET6
    679 			if (af == AF_INET6 || af == AF_UNSPEC)
    680 				mroute6pr(nl[N_MRT6PROTO].n_value,
    681 					  nl[N_MF6CTABLE].n_value,
    682 					  nl[N_MIF6TABLE].n_value);
    683 #endif
    684 		}
    685 		exit(0);
    686 	}
    687 #endif
    688   protostat:
    689 	if (af == AF_INET || af == AF_UNSPEC) {
    690 		setprotoent(1);
    691 		setservent(1);
    692 		/* ugh, this is O(MN) ... why do we do this? */
    693 		while ((p = getprotoent()) != NULL) {
    694 			for (tp = protox; tp->pr_name; tp++)
    695 				if (strcmp(tp->pr_name, p->p_name) == 0)
    696 					break;
    697 			if (tp->pr_name == 0 || tp->pr_wanted == 0)
    698 				continue;
    699 			printproto(tp, p->p_name);
    700 			tp->pr_wanted = 0;
    701 		}
    702 		endprotoent();
    703 		for (tp = protox; tp->pr_name; tp++)
    704 			if (tp->pr_wanted)
    705 				printproto(tp, tp->pr_name);
    706 	}
    707 #ifdef INET6
    708 	if (af == AF_INET6 || af == AF_UNSPEC)
    709 		for (tp = ip6protox; tp->pr_name; tp++)
    710 			printproto(tp, tp->pr_name);
    711 #endif
    712 	if (af == AF_ARP || af == AF_UNSPEC)
    713 		for (tp = arpprotox; tp->pr_name; tp++)
    714 			printproto(tp, tp->pr_name);
    715 #ifdef IPSEC
    716 	if (af == PF_KEY || af == AF_UNSPEC)
    717 		for (tp = pfkeyprotox; tp->pr_name; tp++)
    718 			printproto(tp, tp->pr_name);
    719 #endif
    720 #ifndef SMALL
    721 	if (af == AF_APPLETALK || af == AF_UNSPEC)
    722 		for (tp = atalkprotox; tp->pr_name; tp++)
    723 			printproto(tp, tp->pr_name);
    724 #ifdef NS
    725 	if (af == AF_NS || af == AF_UNSPEC)
    726 		for (tp = nsprotox; tp->pr_name; tp++)
    727 			printproto(tp, tp->pr_name);
    728 #endif
    729 	if (af == AF_ISO || af == AF_UNSPEC)
    730 		for (tp = isoprotox; tp->pr_name; tp++)
    731 			printproto(tp, tp->pr_name);
    732 	if ((af == AF_LOCAL || af == AF_UNSPEC) && !sflag)
    733 		unixpr(nl[N_UNIXSW].n_value);
    734 #endif
    735 	exit(0);
    736 }
    737 
    738 /*
    739  * Print out protocol statistics or control blocks (per sflag).
    740  * If the interface was not specifically requested, and the symbol
    741  * is not in the namelist, ignore this one.
    742  */
    743 static void
    744 printproto(tp, name)
    745 	struct protox *tp;
    746 	char *name;
    747 {
    748 	void (*pr) __P((u_long, char *));
    749 	u_long off;
    750 
    751 	if (sflag) {
    752 		if (iflag) {
    753 			if (tp->pr_istats)
    754 				intpr(interval, nl[N_IFNET].n_value,
    755 				      tp->pr_istats);
    756 			return;
    757 		}
    758 		else {
    759 			pr = tp->pr_stats;
    760 			off = nl[tp->pr_sindex].n_value;
    761 		}
    762 	} else {
    763 		pr = tp->pr_cblocks;
    764 		off = nl[tp->pr_index].n_value;
    765 	}
    766 	if (pr != NULL && ((off || af != AF_UNSPEC) || use_sysctl)) {
    767 		(*pr)(off, name);
    768 	}
    769 }
    770 
    771 /*
    772  * Print softintrq status.
    773  */
    774 void
    775 print_softintrq()
    776 {
    777 	struct ifqueue intrq, *ifq = &intrq;
    778 	const struct softintrq *siq;
    779 	u_long off;
    780 
    781 	for (siq = softintrq; siq->siq_name != NULL; siq++) {
    782 		off = nl[siq->siq_index].n_value;
    783 		if (off == 0)
    784 			continue;
    785 
    786 		kread(off, (char *)ifq, sizeof(*ifq));
    787 		printf("%s:\n", siq->siq_name);
    788 		printf("\tqueue length: %d\n", ifq->ifq_len);
    789 		printf("\tmaximum queue length: %d\n", ifq->ifq_maxlen);
    790 		printf("\tpackets dropped: %d\n", ifq->ifq_drops);
    791 	}
    792 }
    793 
    794 /*
    795  * Read kernel memory, return 0 on success.
    796  */
    797 int
    798 kread(addr, buf, size)
    799 	u_long addr;
    800 	char *buf;
    801 	int size;
    802 {
    803 
    804 	if (kvm_read(kvmd, addr, buf, size) != size) {
    805 		warnx("%s", kvm_geterr(kvmd));
    806 		return (-1);
    807 	}
    808 	return (0);
    809 }
    810 
    811 char *
    812 plural(n)
    813 	int n;
    814 {
    815 
    816 	return (n != 1 ? "s" : "");
    817 }
    818 
    819 char *
    820 plurales(n)
    821 	int n;
    822 {
    823 
    824 	return (n != 1 ? "es" : "");
    825 }
    826 
    827 int
    828 get_hardticks(void)
    829 {
    830 	int hardticks;
    831 
    832 	kread(nl[N_HARDCLOCK_TICKS].n_value, (char *)&hardticks,
    833 	    sizeof(hardticks));
    834 	return (hardticks);
    835 }
    836 
    837 /*
    838  * Find the protox for the given "well-known" name.
    839  */
    840 static struct protox *
    841 knownname(name)
    842 	char *name;
    843 {
    844 	struct protox **tpp, *tp;
    845 
    846 	for (tpp = protoprotox; *tpp; tpp++)
    847 		for (tp = *tpp; tp->pr_name; tp++)
    848 			if (strcmp(tp->pr_name, name) == 0)
    849 				return (tp);
    850 	return (NULL);
    851 }
    852 
    853 /*
    854  * Find the protox corresponding to name.
    855  */
    856 static struct protox *
    857 name2protox(name)
    858 	char *name;
    859 {
    860 	struct protox *tp;
    861 	char **alias;			/* alias from p->aliases */
    862 	struct protoent *p;
    863 
    864 	/*
    865 	 * Try to find the name in the list of "well-known" names. If that
    866 	 * fails, check if name is an alias for an Internet protocol.
    867 	 */
    868 	if ((tp = knownname(name)) != NULL)
    869 		return (tp);
    870 
    871 	setprotoent(1);			/* make protocol lookup cheaper */
    872 	while ((p = getprotoent()) != NULL) {
    873 		/* assert: name not same as p->name */
    874 		for (alias = p->p_aliases; *alias; alias++)
    875 			if (strcmp(name, *alias) == 0) {
    876 				endprotoent();
    877 				return (knownname(p->p_name));
    878 			}
    879 	}
    880 	endprotoent();
    881 	return (NULL);
    882 }
    883 
    884 static void
    885 usage()
    886 {
    887 	const char *progname = getprogname();
    888 
    889 	(void)fprintf(stderr,
    890 "usage: %s [-Aan] [-f address_family] [-M core] [-N system]\n", progname);
    891 	(void)fprintf(stderr,
    892 "       %s [-bdgiLmnqrsSv] [-f address_family] [-M core] [-N system]\n",
    893 	progname);
    894 	(void)fprintf(stderr,
    895 "       %s [-dn] [-I interface] [-M core] [-N system] [-w wait]\n", progname);
    896 	(void)fprintf(stderr,
    897 "       %s [-p protocol] [-M core] [-N system]\n", progname);
    898 	(void)fprintf(stderr,
    899 "       %s [-p protocol] [-M core] [-N system] -P pcbaddr\n", progname);
    900 	(void)fprintf(stderr,
    901 "       %s [-p protocol] [-i] [-I Interface] \n", progname);
    902 	(void)fprintf(stderr,
    903 "       %s [-s] [-f address_family] [-i] [-I Interface]\n", progname);
    904 	(void)fprintf(stderr,
    905 "       %s [-s] [-B] [-I interface]\n", progname);
    906 	exit(1);
    907 }
    908