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