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