1 /* $NetBSD: main.c,v 1.66 2008/04/23 07:29:47 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.66 2008/04/23 07:29:47 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 Pflag) { 406 /* These flags are not yet supported via sysctl(3). */ 407 use_sysctl = 0; 408 } else { 409 /* We can use sysctl(3). */ 410 use_sysctl = 1; 411 } 412 413 if (!use_sysctl) { 414 (void)setegid(egid); 415 kvmd = kvm_openfiles(nlistf, memf, NULL, O_RDONLY, buf); 416 (void)setgid(getgid()); 417 if (kvmd == NULL) 418 err(1, "kvm error: %s", buf); 419 420 if (kvm_nlist(kvmd, nl) < 0 || nl[0].n_type == 0) { 421 if (nlistf) 422 errx(1, "%s: no namelist", nlistf); 423 else 424 errx(1, "no namelist"); 425 } 426 } else 427 (void)setgid(getgid()); 428 } 429 430 int 431 main(argc, argv) 432 int argc; 433 char *argv[]; 434 { 435 struct protoent *p; 436 struct protox *tp; /* for printing cblocks & stats */ 437 int ch; 438 char *nlistf = NULL, *memf = NULL; 439 char *cp; 440 u_long pcbaddr; 441 442 egid = getegid(); 443 (void)setegid(getgid()); 444 tp = NULL; 445 af = AF_UNSPEC; 446 pcbaddr = 0; 447 448 while ((ch = getopt(argc, argv, 449 "AabBdf:ghI:LliM:mN:nP:p:qrsStuvw:")) != -1) 450 switch (ch) { 451 case 'A': 452 Aflag = 1; 453 break; 454 case 'a': 455 aflag = 1; 456 break; 457 case 'b': 458 bflag = 1; 459 break; 460 case 'B': 461 Bflag = 1; 462 break; 463 case 'd': 464 dflag = 1; 465 break; 466 case 'f': 467 #ifdef NS 468 if (strcmp(optarg, "ns") == 0) { 469 af = AF_NS; 470 break; 471 } 472 #endif 473 if (strcmp(optarg, "inet") == 0) 474 af = AF_INET; 475 else if (strcmp(optarg, "inet6") == 0) 476 af = AF_INET6; 477 else if (strcmp(optarg, "arp") == 0) 478 af = AF_ARP; 479 else if (strcmp(optarg, "pfkey") == 0) 480 af = PF_KEY; 481 else if (strcmp(optarg, "unix") == 0 482 || strcmp(optarg, "local") == 0) 483 af = AF_LOCAL; 484 else if (strcmp(optarg, "iso") == 0) 485 af = AF_ISO; 486 else if (strcmp(optarg, "atalk") == 0) 487 af = AF_APPLETALK; 488 else 489 errx(1, "%s: unknown address family", 490 optarg); 491 break; 492 #ifndef SMALL 493 case 'g': 494 gflag = 1; 495 break; 496 #endif 497 case 'I': 498 iflag = 1; 499 interface = optarg; 500 break; 501 case 'i': 502 iflag = 1; 503 break; 504 case 'L': 505 Lflag = 1; 506 break; 507 case 'l': 508 lflag = 1; 509 break; 510 case 'M': 511 memf = optarg; 512 break; 513 case 'm': 514 mflag = 1; 515 break; 516 case 'N': 517 nlistf = optarg; 518 break; 519 case 'n': 520 numeric_addr = numeric_port = nflag = 1; 521 break; 522 case 'P': 523 errno = 0; 524 pcbaddr = strtoul(optarg, &cp, 16); 525 if (*cp != '\0' || errno == ERANGE) 526 errx(1, "invalid PCB address %s", 527 optarg); 528 Pflag = 1; 529 break; 530 case 'p': 531 if ((tp = name2protox(optarg)) == NULL) 532 errx(1, "%s: unknown or uninstrumented protocol", 533 optarg); 534 pflag = 1; 535 break; 536 case 'q': 537 qflag = 1; 538 break; 539 case 'r': 540 rflag = 1; 541 break; 542 case 's': 543 ++sflag; 544 break; 545 case 'S': 546 numeric_addr = 1; 547 break; 548 case 't': 549 tflag = 1; 550 break; 551 case 'u': 552 af = AF_LOCAL; 553 break; 554 case 'v': 555 vflag++; 556 break; 557 case 'w': 558 interval = atoi(optarg); 559 iflag = 1; 560 break; 561 case '?': 562 default: 563 usage(); 564 } 565 argv += optind; 566 argc -= optind; 567 568 #define BACKWARD_COMPATIBILITY 569 #ifdef BACKWARD_COMPATIBILITY 570 if (*argv) { 571 if (isdigit((unsigned char)**argv)) { 572 interval = atoi(*argv); 573 if (interval <= 0) 574 usage(); 575 ++argv; 576 iflag = 1; 577 } 578 if (*argv) { 579 nlistf = *argv; 580 if (*++argv) 581 memf = *argv; 582 } 583 } 584 #endif 585 586 prepare(nlistf, memf, tp); 587 588 #ifndef SMALL 589 if (Bflag) { 590 if (sflag) 591 bpf_stats(); 592 else 593 bpf_dump(interface); 594 exit(0); 595 } 596 #endif 597 598 if (mflag) { 599 mbpr(nl[N_MBSTAT].n_value, nl[N_MSIZE].n_value, 600 nl[N_MCLBYTES].n_value, nl[N_MBPOOL].n_value, 601 nl[N_MCLPOOL].n_value); 602 exit(0); 603 } 604 if (Pflag) { 605 if (tp == NULL) { 606 /* Default to TCP. */ 607 tp = name2protox("tcp"); 608 } 609 if (tp->pr_dump) 610 (*tp->pr_dump)(pcbaddr); 611 else 612 printf("%s: no PCB dump routine\n", tp->pr_name); 613 exit(0); 614 } 615 if (pflag) { 616 if (iflag && tp->pr_istats) 617 intpr(interval, nl[N_IFNET].n_value, tp->pr_istats); 618 else if (tp->pr_stats) 619 (*tp->pr_stats)(nl[tp->pr_sindex].n_value, 620 tp->pr_name); 621 else 622 printf("%s: no stats routine\n", tp->pr_name); 623 exit(0); 624 } 625 if (qflag) { 626 print_softintrq(); 627 exit(0); 628 } 629 /* 630 * Keep file descriptors open to avoid overhead 631 * of open/close on each call to get* routines. 632 */ 633 sethostent(1); 634 setnetent(1); 635 if (iflag) { 636 if (af != AF_UNSPEC) 637 goto protostat; 638 639 intpr(interval, nl[N_IFNET].n_value, NULL); 640 exit(0); 641 } 642 if (rflag) { 643 if (sflag) 644 rt_stats(use_sysctl ? 0 : nl[N_RTSTAT].n_value); 645 else { 646 if (use_sysctl) 647 p_rttables(af); 648 else 649 routepr(nl[N_RTREE].n_value); 650 } 651 exit(0); 652 } 653 #ifndef SMALL 654 if (gflag) { 655 if (sflag) { 656 if (af == AF_INET || af == AF_UNSPEC) 657 mrt_stats(nl[N_MRTPROTO].n_value, 658 nl[N_MRTSTAT].n_value); 659 #ifdef INET6 660 if (af == AF_INET6 || af == AF_UNSPEC) 661 mrt6_stats(nl[N_MRT6PROTO].n_value, 662 nl[N_MRT6STAT].n_value); 663 #endif 664 } 665 else { 666 if (af == AF_INET || af == AF_UNSPEC) 667 mroutepr(nl[N_MRTPROTO].n_value, 668 nl[N_MFCHASHTBL].n_value, 669 nl[N_MFCHASH].n_value, 670 nl[N_VIFTABLE].n_value); 671 #ifdef INET6 672 if (af == AF_INET6 || af == AF_UNSPEC) 673 mroute6pr(nl[N_MRT6PROTO].n_value, 674 nl[N_MF6CTABLE].n_value, 675 nl[N_MIF6TABLE].n_value); 676 #endif 677 } 678 exit(0); 679 } 680 #endif 681 protostat: 682 if (af == AF_INET || af == AF_UNSPEC) { 683 setprotoent(1); 684 setservent(1); 685 /* ugh, this is O(MN) ... why do we do this? */ 686 while ((p = getprotoent()) != NULL) { 687 for (tp = protox; tp->pr_name; tp++) 688 if (strcmp(tp->pr_name, p->p_name) == 0) 689 break; 690 if (tp->pr_name == 0 || tp->pr_wanted == 0) 691 continue; 692 printproto(tp, p->p_name); 693 tp->pr_wanted = 0; 694 } 695 endprotoent(); 696 for (tp = protox; tp->pr_name; tp++) 697 if (tp->pr_wanted) 698 printproto(tp, tp->pr_name); 699 } 700 #ifdef INET6 701 if (af == AF_INET6 || af == AF_UNSPEC) 702 for (tp = ip6protox; tp->pr_name; tp++) 703 printproto(tp, tp->pr_name); 704 #endif 705 if (af == AF_ARP || af == AF_UNSPEC) 706 for (tp = arpprotox; tp->pr_name; tp++) 707 printproto(tp, tp->pr_name); 708 #ifdef IPSEC 709 if (af == PF_KEY || af == AF_UNSPEC) 710 for (tp = pfkeyprotox; tp->pr_name; tp++) 711 printproto(tp, tp->pr_name); 712 #endif 713 #ifndef SMALL 714 if (af == AF_APPLETALK || af == AF_UNSPEC) 715 for (tp = atalkprotox; tp->pr_name; tp++) 716 printproto(tp, tp->pr_name); 717 #ifdef NS 718 if (af == AF_NS || af == AF_UNSPEC) 719 for (tp = nsprotox; tp->pr_name; tp++) 720 printproto(tp, tp->pr_name); 721 #endif 722 if (af == AF_ISO || af == AF_UNSPEC) 723 for (tp = isoprotox; tp->pr_name; tp++) 724 printproto(tp, tp->pr_name); 725 if ((af == AF_LOCAL || af == AF_UNSPEC) && !sflag) 726 unixpr(nl[N_UNIXSW].n_value); 727 #endif 728 exit(0); 729 } 730 731 /* 732 * Print out protocol statistics or control blocks (per sflag). 733 * If the interface was not specifically requested, and the symbol 734 * is not in the namelist, ignore this one. 735 */ 736 static void 737 printproto(tp, name) 738 struct protox *tp; 739 char *name; 740 { 741 void (*pr) __P((u_long, char *)); 742 u_long off; 743 744 if (sflag) { 745 if (iflag) { 746 if (tp->pr_istats) 747 intpr(interval, nl[N_IFNET].n_value, 748 tp->pr_istats); 749 return; 750 } 751 else { 752 pr = tp->pr_stats; 753 off = nl[tp->pr_sindex].n_value; 754 } 755 } else { 756 pr = tp->pr_cblocks; 757 off = nl[tp->pr_index].n_value; 758 } 759 if (pr != NULL && ((off || af != AF_UNSPEC) || use_sysctl)) { 760 (*pr)(off, name); 761 } 762 } 763 764 /* 765 * Print softintrq status. 766 */ 767 void 768 print_softintrq() 769 { 770 struct ifqueue intrq, *ifq = &intrq; 771 const struct softintrq *siq; 772 u_long off; 773 774 for (siq = softintrq; siq->siq_name != NULL; siq++) { 775 off = nl[siq->siq_index].n_value; 776 if (off == 0) 777 continue; 778 779 kread(off, (char *)ifq, sizeof(*ifq)); 780 printf("%s:\n", siq->siq_name); 781 printf("\tqueue length: %d\n", ifq->ifq_len); 782 printf("\tmaximum queue length: %d\n", ifq->ifq_maxlen); 783 printf("\tpackets dropped: %d\n", ifq->ifq_drops); 784 } 785 } 786 787 /* 788 * Read kernel memory, return 0 on success. 789 */ 790 int 791 kread(addr, buf, size) 792 u_long addr; 793 char *buf; 794 int size; 795 { 796 797 if (kvm_read(kvmd, addr, buf, size) != size) { 798 warnx("%s", kvm_geterr(kvmd)); 799 return (-1); 800 } 801 return (0); 802 } 803 804 char * 805 plural(n) 806 int n; 807 { 808 809 return (n != 1 ? "s" : ""); 810 } 811 812 char * 813 plurales(n) 814 int n; 815 { 816 817 return (n != 1 ? "es" : ""); 818 } 819 820 int 821 get_hardticks(void) 822 { 823 int hardticks; 824 825 kread(nl[N_HARDCLOCK_TICKS].n_value, (char *)&hardticks, 826 sizeof(hardticks)); 827 return (hardticks); 828 } 829 830 /* 831 * Find the protox for the given "well-known" name. 832 */ 833 static struct protox * 834 knownname(name) 835 char *name; 836 { 837 struct protox **tpp, *tp; 838 839 for (tpp = protoprotox; *tpp; tpp++) 840 for (tp = *tpp; tp->pr_name; tp++) 841 if (strcmp(tp->pr_name, name) == 0) 842 return (tp); 843 return (NULL); 844 } 845 846 /* 847 * Find the protox corresponding to name. 848 */ 849 static struct protox * 850 name2protox(name) 851 char *name; 852 { 853 struct protox *tp; 854 char **alias; /* alias from p->aliases */ 855 struct protoent *p; 856 857 /* 858 * Try to find the name in the list of "well-known" names. If that 859 * fails, check if name is an alias for an Internet protocol. 860 */ 861 if ((tp = knownname(name)) != NULL) 862 return (tp); 863 864 setprotoent(1); /* make protocol lookup cheaper */ 865 while ((p = getprotoent()) != NULL) { 866 /* assert: name not same as p->name */ 867 for (alias = p->p_aliases; *alias; alias++) 868 if (strcmp(name, *alias) == 0) { 869 endprotoent(); 870 return (knownname(p->p_name)); 871 } 872 } 873 endprotoent(); 874 return (NULL); 875 } 876 877 static void 878 usage() 879 { 880 const char *progname = getprogname(); 881 882 (void)fprintf(stderr, 883 "usage: %s [-Aan] [-f address_family] [-M core] [-N system]\n", progname); 884 (void)fprintf(stderr, 885 " %s [-bdgiLmnqrsSv] [-f address_family] [-M core] [-N system]\n", 886 progname); 887 (void)fprintf(stderr, 888 " %s [-dn] [-I interface] [-M core] [-N system] [-w wait]\n", progname); 889 (void)fprintf(stderr, 890 " %s [-p protocol] [-M core] [-N system]\n", progname); 891 (void)fprintf(stderr, 892 " %s [-p protocol] [-M core] [-N system] -P pcbaddr\n", progname); 893 (void)fprintf(stderr, 894 " %s [-p protocol] [-i] [-I Interface] \n", progname); 895 (void)fprintf(stderr, 896 " %s [-s] [-f address_family] [-i] [-I Interface]\n", progname); 897 (void)fprintf(stderr, 898 " %s [-s] [-B] [-I interface]\n", progname); 899 exit(1); 900 } 901