Home | History | Annotate | Line # | Download | only in netstat
inet.c revision 1.114
      1 /*	$NetBSD: inet.c,v 1.114 2021/10/30 11:23:07 nia Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1983, 1988, 1993
      5  *	The 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 #if 0
     35 static char sccsid[] = "from: @(#)inet.c	8.4 (Berkeley) 4/20/94";
     36 #else
     37 __RCSID("$NetBSD: inet.c,v 1.114 2021/10/30 11:23:07 nia Exp $");
     38 #endif
     39 #endif /* not lint */
     40 
     41 #define	_CALLOUT_PRIVATE	/* for defs in sys/callout.h */
     42 
     43 #include <sys/param.h>
     44 #include <sys/queue.h>
     45 #include <sys/socket.h>
     46 #include <sys/socketvar.h>
     47 #include <sys/mbuf.h>
     48 #include <sys/protosw.h>
     49 #include <sys/sysctl.h>
     50 
     51 #include <net/if_arp.h>
     52 #include <net/route.h>
     53 #include <netinet/in.h>
     54 #include <netinet/in_systm.h>
     55 #include <netinet/ip.h>
     56 #include <netinet/in_pcb.h>
     57 #define ICMP_STRINGS
     58 #include <netinet/ip_icmp.h>
     59 
     60 #ifdef INET6
     61 #include <netinet/ip6.h>
     62 #endif
     63 
     64 #include <netinet/icmp_var.h>
     65 #include <netinet/igmp_var.h>
     66 #include <netinet/ip_var.h>
     67 #include <netinet/pim_var.h>
     68 #include <netinet/tcp.h>
     69 #include <netinet/tcp_seq.h>
     70 #define TCPSTATES
     71 #include <netinet/tcp_fsm.h>
     72 #define	TCPTIMERS
     73 #include <netinet/tcp_timer.h>
     74 #include <netinet/tcp_var.h>
     75 #include <netinet/tcp_debug.h>
     76 #include <netinet/udp.h>
     77 #include <netinet/ip_carp.h>
     78 #include <netinet/udp_var.h>
     79 #include <netinet/tcp_vtw.h>
     80 
     81 #include <arpa/inet.h>
     82 #include <kvm.h>
     83 #include <netdb.h>
     84 #include <stdio.h>
     85 #include <string.h>
     86 #include <unistd.h>
     87 #include <stdlib.h>
     88 #include <err.h>
     89 #include <util.h>
     90 #include <errno.h>
     91 
     92 #include "netstat.h"
     93 #include "vtw.h"
     94 #include "prog_ops.h"
     95 
     96 char	*inetname(struct in_addr *);
     97 void	inetprint(struct in_addr *, u_int16_t, const char *, int);
     98 
     99 void	print_vtw_v4(const vtw_t *);
    100 
    101 /*
    102  * Print a summary of connections related to an Internet
    103  * protocol.  For TCP, also give state of connection.
    104  * Listening processes (aflag) are suppressed unless the
    105  * -a (all) flag is specified.
    106  */
    107 static int width;
    108 static int compact;
    109 
    110 /* VTW-related variables. */
    111 static struct timeval now;
    112 
    113 static void
    114 protoprhdr(void)
    115 {
    116 	printf("Active Internet connections");
    117 	if (aflag)
    118 		printf(" (including servers)");
    119 	putchar('\n');
    120 	if (Aflag)
    121 		printf("%-8.8s ", "PCB");
    122 	printf(
    123 	    Vflag ? "%-5.5s %-6.6s %-6.6s %s%-*.*s %-*.*s %-13.13s Expires\n"
    124 	          : "%-5.5s %-6.6s %-6.6s %s%-*.*s %-*.*s %s\n",
    125 		"Proto", "Recv-Q", "Send-Q", compact ? "" : " ",
    126 		width, width, "Local Address",
    127 		width, width, "Foreign Address",
    128 		"State");
    129 }
    130 
    131 static void
    132 protopr0(intptr_t ppcb, u_long rcv_sb_cc, u_long snd_sb_cc,
    133 	 struct in_addr *laddr, u_int16_t lport,
    134 	 struct in_addr *faddr, u_int16_t fport,
    135 	 short t_state, const char *name, int inp_flags,
    136 	 const struct timeval *expires)
    137 {
    138 	static const char *shorttcpstates[] = {
    139 		"CLOSED",	"LISTEN",	"SYNSEN",	"SYSRCV",
    140 		"ESTABL",	"CLWAIT",	"FWAIT1",	"CLOSNG",
    141 		"LASTAK",	"FWAIT2",	"TMWAIT",
    142 	};
    143 	int istcp;
    144 
    145 	istcp = strcmp(name, "tcp") == 0;
    146 
    147 	if (Aflag) {
    148 		printf("%8" PRIxPTR " ", ppcb);
    149 	}
    150 	printf("%-5.5s %6ld %6ld%s", name, rcv_sb_cc, snd_sb_cc,
    151 	       compact ? "" : " ");
    152 	if (numeric_port) {
    153 		inetprint(laddr, lport, name, 1);
    154 		inetprint(faddr, fport, name, 1);
    155 	} else if (inp_flags & INP_ANONPORT) {
    156 		inetprint(laddr, lport, name, 1);
    157 		inetprint(faddr, fport, name, 0);
    158 	} else {
    159 		inetprint(laddr, lport, name, 0);
    160 		inetprint(faddr, fport, name, 0);
    161 	}
    162 	if (istcp) {
    163 		if (t_state < 0 || t_state >= TCP_NSTATES)
    164 			printf(" %d", t_state);
    165 		else
    166 			printf(" %s", compact ? shorttcpstates[t_state] :
    167 			       tcpstates[t_state]);
    168 	}
    169 	if (Vflag && expires != NULL) {
    170 		if (expires->tv_sec == 0 && expires->tv_usec == -1)
    171 			printf(" reclaimed");
    172 		else {
    173 			struct timeval delta;
    174 
    175 			timersub(expires, &now, &delta);
    176 			printf(" %.3fms",
    177 			    delta.tv_sec * 1000.0 + delta.tv_usec / 1000.0);
    178 		}
    179 	}
    180 	putchar('\n');
    181 }
    182 
    183 static void
    184 dbg_printf(const char *fmt, ...)
    185 {
    186 	return;
    187 }
    188 
    189 void
    190 print_vtw_v4(const vtw_t *vtw)
    191 {
    192 	const vtw_v4_t *v4 = (const vtw_v4_t *)vtw;
    193 	struct timeval delta;
    194 	struct in_addr la, fa;
    195 	char buf[2][32];
    196 	static const struct timeval zero = {.tv_sec = 0, .tv_usec = 0};
    197 
    198 	la.s_addr = v4->laddr;
    199 	fa.s_addr = v4->faddr;
    200 
    201 	snprintf(&buf[0][0], 32, "%s", inet_ntoa(la));
    202 	snprintf(&buf[1][0], 32, "%s", inet_ntoa(fa));
    203 
    204 	timersub(&vtw->expire, &now, &delta);
    205 
    206 	if (vtw->expire.tv_sec == 0 && vtw->expire.tv_usec == -1) {
    207 		dbg_printf("%15.15s:%d %15.15s:%d reclaimed\n"
    208 		    ,buf[0], ntohs(v4->lport)
    209 		    ,buf[1], ntohs(v4->fport));
    210 		if (!(Vflag && vflag))
    211 			return;
    212 	} else if (vtw->expire.tv_sec == 0)
    213 		return;
    214 	else if (timercmp(&delta, &zero, <) && !(Vflag && vflag)) {
    215 		dbg_printf("%15.15s:%d %15.15s:%d expired\n"
    216 		    ,buf[0], ntohs(v4->lport)
    217 		    ,buf[1], ntohs(v4->fport));
    218 		return;
    219 	} else {
    220 		dbg_printf("%15.15s:%d %15.15s:%d expires in %.3fms\n"
    221 		    ,buf[0], ntohs(v4->lport)
    222 		    ,buf[1], ntohs(v4->fport)
    223 		    ,delta.tv_sec * 1000.0 + delta.tv_usec / 1000.0);
    224 	}
    225 	protopr0(0, 0, 0,
    226 		 &la, v4->lport,
    227 		 &fa, v4->fport,
    228 		 TCPS_TIME_WAIT, "tcp", 0, &vtw->expire);
    229 }
    230 
    231 struct kinfo_pcb *
    232 getpcblist_sysctl(const char *name, size_t *len) {
    233 	int mib[8];
    234 	size_t namelen = 0, size = 0;
    235 	char *mibname = NULL;
    236 	struct kinfo_pcb *pcblist;
    237 
    238 	memset(mib, 0, sizeof(mib));
    239 
    240 	if (asprintf(&mibname, "net.inet%s.%s.pcblist", name + 3, name) == -1)
    241 		err(1, "asprintf");
    242 
    243 	/* get dynamic pcblist node */
    244 	if (prog_sysctlnametomib(mibname, mib, &namelen) == -1) {
    245 		if (errno == ENOENT) {
    246 			*len = 0;
    247 			return NULL;
    248 		}
    249 
    250 		err(1, "sysctlnametomib: %s", mibname);
    251 	}
    252 
    253 	free(mibname);
    254 
    255 	if (prog_sysctl(mib, __arraycount(mib), NULL, &size, NULL, 0) == -1)
    256 		err(1, "sysctl (query)");
    257 
    258 	if ((pcblist = malloc(size)) == NULL)
    259 		err(1, "malloc");
    260 	memset(pcblist, 0, size);
    261 
    262 	mib[6] = sizeof(*pcblist);
    263 	mib[7] = size / sizeof(*pcblist);
    264 
    265 	if (prog_sysctl(mib, __arraycount(mib), pcblist, &size, NULL, 0) == -1)
    266 		err(1, "sysctl (copy)");
    267 
    268 	*len = size / sizeof(*pcblist);
    269 	return pcblist;
    270 
    271 }
    272 
    273 static struct kinfo_pcb *
    274 getpcblist_kmem(u_long off, const char *name, size_t *len) {
    275 	struct inpcbtable table;
    276 	struct inpcb_hdr *next, *prev;
    277 	struct inpcb inpcb;
    278 	struct tcpcb tcpcb;
    279 	struct socket sockb;
    280 	int istcp = strcmp(name, "tcp") == 0;
    281 	struct kinfo_pcb *pcblist;
    282 	size_t size = 100, i;
    283 	struct sockaddr_in sin;
    284 	struct inpcbqueue *head;
    285 
    286 	if (off == 0) {
    287 		*len = 0;
    288 		return NULL;
    289 	}
    290 
    291 	kread(off, (char *)&table, sizeof table);
    292 	head = &table.inpt_queue;
    293 	next = TAILQ_FIRST(head);
    294 	prev = TAILQ_END(head);
    295 
    296 	pcblist = NULL;
    297 	if (reallocarr(&pcblist, size, sizeof(*pcblist)) != 0)
    298 		err(1, "reallocarr");
    299 
    300 	i = 0;
    301 	while (next != TAILQ_END(head)) {
    302 		kread((u_long)next, (char *)&inpcb, sizeof inpcb);
    303 		prev = next;
    304 		next = TAILQ_NEXT(&inpcb, inp_queue);
    305 
    306 		if (inpcb.inp_af != AF_INET)
    307 			continue;
    308 
    309 		kread((u_long)inpcb.inp_socket, (char *)&sockb, sizeof(sockb));
    310 		if (istcp) {
    311 			kread((u_long)inpcb.inp_ppcb,
    312 			    (char *)&tcpcb, sizeof (tcpcb));
    313 		}
    314 		pcblist[i].ki_ppcbaddr =
    315 		    istcp ? (uintptr_t) inpcb.inp_ppcb : (uintptr_t) prev;
    316 		pcblist[i].ki_rcvq = (uint64_t)sockb.so_rcv.sb_cc;
    317 		pcblist[i].ki_sndq = (uint64_t)sockb.so_snd.sb_cc;
    318 
    319 		sin.sin_addr = inpcb.inp_laddr;
    320 		sin.sin_port = inpcb.inp_lport;
    321 		memcpy(&pcblist[i].ki_s, &sin, sizeof(sin));
    322 		sin.sin_addr = inpcb.inp_faddr;
    323 		sin.sin_port = inpcb.inp_fport;
    324 		memcpy(&pcblist[i].ki_d, &sin, sizeof(sin));
    325 		pcblist[i].ki_tstate = tcpcb.t_state;
    326 		pcblist[i].ki_pflags = inpcb.inp_flags;
    327 		if (i++ == size) {
    328 			size += 100;
    329 			if (reallocarr(&pcblist, size, sizeof(*pcblist)) != 0)
    330 				err(1, "reallocarr");
    331 		}
    332 	}
    333 	*len = i;
    334 	return pcblist;
    335 }
    336 
    337 void
    338 protopr(u_long off, const char *name)
    339 {
    340 	static int first = 1;
    341 	struct kinfo_pcb *pcblist;
    342 	size_t i, len;
    343 
    344 	compact = 0;
    345 	if (Aflag) {
    346 		if (!numeric_addr)
    347 			width = 18;
    348 		else {
    349 			width = 21;
    350 			compact = 1;
    351 		}
    352 	} else
    353 		width = 22;
    354 
    355 	if (use_sysctl)
    356 		pcblist = getpcblist_sysctl(name, &len);
    357 	else
    358 		pcblist = getpcblist_kmem(off, name, &len);
    359 
    360 	for (i = 0; i < len; i++) {
    361 		struct sockaddr_in src, dst;
    362 
    363 		memcpy(&src, &pcblist[i].ki_s, sizeof(src));
    364 		memcpy(&dst, &pcblist[i].ki_d, sizeof(dst));
    365 
    366 		if (!aflag &&
    367 		    inet_lnaof(dst.sin_addr) == INADDR_ANY)
    368 			continue;
    369 
    370 		if (first) {
    371 			protoprhdr();
    372 			first = 0;
    373 		}
    374 		protopr0((intptr_t) pcblist[i].ki_ppcbaddr,
    375 			 pcblist[i].ki_rcvq, pcblist[i].ki_sndq,
    376 			 &src.sin_addr, src.sin_port,
    377 			 &dst.sin_addr, dst.sin_port,
    378 			 pcblist[i].ki_tstate, name,
    379 			 pcblist[i].ki_pflags, NULL);
    380 	}
    381 
    382 	free(pcblist);
    383 
    384 	if (strcmp(name, "tcp") == 0) {
    385 		struct timeval t;
    386 		timebase(&t);
    387 		gettimeofday(&now, NULL);
    388 		timersub(&now, &t, &now);
    389 		show_vtw_v4(print_vtw_v4);
    390 	}
    391 }
    392 
    393 /*
    394  * Dump TCP statistics structure.
    395  */
    396 void
    397 tcp_stats(u_long off, const char *name)
    398 {
    399 	uint64_t tcpstat[TCP_NSTATS];
    400 
    401 	if (use_sysctl) {
    402 		size_t size = sizeof(tcpstat);
    403 
    404 		if (prog_sysctlbyname("net.inet.tcp.stats", tcpstat, &size,
    405 				 NULL, 0) == -1 && errno != ENOMEM)
    406 			return;
    407 	} else {
    408 		warnx("%s stats not available via KVM.", name);
    409 		return;
    410 	}
    411 
    412 	printf ("%s:\n", name);
    413 
    414 #define	ps(f, m) if (tcpstat[f] || sflag <= 1) \
    415     printf(m, tcpstat[f])
    416 #define	p(f, m) if (tcpstat[f] || sflag <= 1) \
    417     printf(m, tcpstat[f], plural(tcpstat[f]))
    418 #define	p2(f1, f2, m) if (tcpstat[f1] || tcpstat[f2] || sflag <= 1) \
    419     printf(m, tcpstat[f1], plural(tcpstat[f1]), \
    420     tcpstat[f2], plural(tcpstat[f2]))
    421 #define	p2s(f1, f2, m) if (tcpstat[f1] || tcpstat[f2] || sflag <= 1) \
    422     printf(m, tcpstat[f1], plural(tcpstat[f1]), \
    423     tcpstat[f2])
    424 #define	p3(f, m) if (tcpstat[f] || sflag <= 1) \
    425     printf(m, tcpstat[f], plurales(tcpstat[f]))
    426 
    427 	p(TCP_STAT_SNDTOTAL, "\t%" PRIu64 " packet%s sent\n");
    428 	p2(TCP_STAT_SNDPACK,TCP_STAT_SNDBYTE,
    429 		"\t\t%" PRIu64 " data packet%s (%" PRIu64 " byte%s)\n");
    430 	p2(TCP_STAT_SNDREXMITPACK, TCP_STAT_SNDREXMITBYTE,
    431 		"\t\t%" PRIu64 " data packet%s (%" PRIu64 " byte%s) retransmitted\n");
    432 	p2s(TCP_STAT_SNDACKS, TCP_STAT_DELACK,
    433 		"\t\t%" PRIu64 " ack-only packet%s (%" PRIu64 " delayed)\n");
    434 	p(TCP_STAT_SNDURG, "\t\t%" PRIu64 " URG only packet%s\n");
    435 	p(TCP_STAT_SNDPROBE, "\t\t%" PRIu64 " window probe packet%s\n");
    436 	p(TCP_STAT_SNDWINUP, "\t\t%" PRIu64 " window update packet%s\n");
    437 	p(TCP_STAT_SNDCTRL, "\t\t%" PRIu64 " control packet%s\n");
    438 	p(TCP_STAT_SELFQUENCH,
    439 	    "\t\t%" PRIu64 " send attempt%s resulted in self-quench\n");
    440 	p(TCP_STAT_RCVTOTAL, "\t%" PRIu64 " packet%s received\n");
    441 	p2(TCP_STAT_RCVACKPACK, TCP_STAT_RCVACKBYTE,
    442 		"\t\t%" PRIu64 " ack%s (for %" PRIu64 " byte%s)\n");
    443 	p(TCP_STAT_RCVDUPACK, "\t\t%" PRIu64 " duplicate ack%s\n");
    444 	p(TCP_STAT_RCVACKTOOMUCH, "\t\t%" PRIu64 " ack%s for unsent data\n");
    445 	p2(TCP_STAT_RCVPACK, TCP_STAT_RCVBYTE,
    446 		"\t\t%" PRIu64 " packet%s (%" PRIu64 " byte%s) received in-sequence\n");
    447 	p2(TCP_STAT_RCVDUPPACK, TCP_STAT_RCVDUPBYTE,
    448 		"\t\t%" PRIu64 " completely duplicate packet%s (%" PRIu64 " byte%s)\n");
    449 	p(TCP_STAT_PAWSDROP, "\t\t%" PRIu64 " old duplicate packet%s\n");
    450 	p2(TCP_STAT_RCVPARTDUPPACK, TCP_STAT_RCVPARTDUPBYTE,
    451 		"\t\t%" PRIu64 " packet%s with some dup. data (%" PRIu64 " byte%s duped)\n");
    452 	p2(TCP_STAT_RCVOOPACK, TCP_STAT_RCVOOBYTE,
    453 		"\t\t%" PRIu64 " out-of-order packet%s (%" PRIu64 " byte%s)\n");
    454 	p2(TCP_STAT_RCVPACKAFTERWIN, TCP_STAT_RCVBYTEAFTERWIN,
    455 		"\t\t%" PRIu64 " packet%s (%" PRIu64 " byte%s) of data after window\n");
    456 	p(TCP_STAT_RCVWINPROBE, "\t\t%" PRIu64 " window probe%s\n");
    457 	p(TCP_STAT_RCVWINUPD, "\t\t%" PRIu64 " window update packet%s\n");
    458 	p(TCP_STAT_RCVAFTERCLOSE, "\t\t%" PRIu64 " packet%s received after close\n");
    459 	p(TCP_STAT_RCVBADSUM, "\t\t%" PRIu64 " discarded for bad checksum%s\n");
    460 	p(TCP_STAT_RCVBADOFF, "\t\t%" PRIu64 " discarded for bad header offset field%s\n");
    461 	ps(TCP_STAT_RCVSHORT, "\t\t%" PRIu64 " discarded because packet too short\n");
    462 	p(TCP_STAT_CONNATTEMPT, "\t%" PRIu64 " connection request%s\n");
    463 	p(TCP_STAT_ACCEPTS, "\t%" PRIu64 " connection accept%s\n");
    464 	p(TCP_STAT_CONNECTS,
    465 		"\t%" PRIu64 " connection%s established (including accepts)\n");
    466 	p2(TCP_STAT_CLOSED, TCP_STAT_DROPS,
    467 		"\t%" PRIu64 " connection%s closed (including %" PRIu64 " drop%s)\n");
    468 	p(TCP_STAT_CONNDROPS, "\t%" PRIu64 " embryonic connection%s dropped\n");
    469 	p(TCP_STAT_DELAYED_FREE, "\t%" PRIu64 " delayed free%s of tcpcb\n");
    470 	p2(TCP_STAT_RTTUPDATED, TCP_STAT_SEGSTIMED,
    471 		"\t%" PRIu64 " segment%s updated rtt (of %" PRIu64 " attempt%s)\n");
    472 	p(TCP_STAT_REXMTTIMEO, "\t%" PRIu64 " retransmit timeout%s\n");
    473 	p(TCP_STAT_TIMEOUTDROP,
    474 		"\t\t%" PRIu64 " connection%s dropped by rexmit timeout\n");
    475 	p2(TCP_STAT_PERSISTTIMEO, TCP_STAT_PERSISTDROPS,
    476 	   "\t%" PRIu64 " persist timeout%s (resulting in %" PRIu64 " dropped "
    477 		"connection%s)\n");
    478 	p(TCP_STAT_KEEPTIMEO, "\t%" PRIu64 " keepalive timeout%s\n");
    479 	p(TCP_STAT_KEEPPROBE, "\t\t%" PRIu64 " keepalive probe%s sent\n");
    480 	p(TCP_STAT_KEEPDROPS, "\t\t%" PRIu64 " connection%s dropped by keepalive\n");
    481 	p(TCP_STAT_PREDACK, "\t%" PRIu64 " correct ACK header prediction%s\n");
    482 	p(TCP_STAT_PREDDAT, "\t%" PRIu64 " correct data packet header prediction%s\n");
    483 	p3(TCP_STAT_PCBHASHMISS, "\t%" PRIu64 " PCB hash miss%s\n");
    484 	ps(TCP_STAT_NOPORT, "\t%" PRIu64 " dropped due to no socket\n");
    485 	p(TCP_STAT_CONNSDRAINED, "\t%" PRIu64 " connection%s drained due to memory "
    486 		"shortage\n");
    487 	p(TCP_STAT_PMTUBLACKHOLE, "\t%" PRIu64 " PMTUD blackhole%s detected\n");
    488 
    489 	p(TCP_STAT_BADSYN, "\t%" PRIu64 " bad connection attempt%s\n");
    490 	ps(TCP_STAT_SC_ADDED, "\t%" PRIu64 " SYN cache entries added\n");
    491 	p(TCP_STAT_SC_COLLISIONS, "\t\t%" PRIu64 " hash collision%s\n");
    492 	ps(TCP_STAT_SC_COMPLETED, "\t\t%" PRIu64 " completed\n");
    493 	ps(TCP_STAT_SC_ABORTED, "\t\t%" PRIu64 " aborted (no space to build PCB)\n");
    494 	ps(TCP_STAT_SC_TIMED_OUT, "\t\t%" PRIu64 " timed out\n");
    495 	ps(TCP_STAT_SC_OVERFLOWED, "\t\t%" PRIu64 " dropped due to overflow\n");
    496 	ps(TCP_STAT_SC_BUCKETOVERFLOW, "\t\t%" PRIu64 " dropped due to bucket overflow\n");
    497 	ps(TCP_STAT_SC_RESET, "\t\t%" PRIu64 " dropped due to RST\n");
    498 	ps(TCP_STAT_SC_UNREACH, "\t\t%" PRIu64 " dropped due to ICMP unreachable\n");
    499 	ps(TCP_STAT_SC_DELAYED_FREE, "\t\t%" PRIu64 " delayed free of SYN cache "
    500 		"entries\n");
    501 	p(TCP_STAT_SC_RETRANSMITTED, "\t%" PRIu64 " SYN,ACK%s retransmitted\n");
    502 	p(TCP_STAT_SC_DUPESYN, "\t%" PRIu64 " duplicate SYN%s received for entries "
    503 		"already in the cache\n");
    504 	p(TCP_STAT_SC_DROPPED, "\t%" PRIu64 " SYN%s dropped (no route or no space)\n");
    505 	p(TCP_STAT_BADSIG, "\t%" PRIu64 " packet%s with bad signature\n");
    506 	p(TCP_STAT_GOODSIG, "\t%" PRIu64 " packet%s with good signature\n");
    507 
    508 	p(TCP_STAT_ECN_SHS, "\t%" PRIu64 " successful ECN handshake%s\n");
    509 	p(TCP_STAT_ECN_CE, "\t%" PRIu64 " packet%s with ECN CE bit\n");
    510 	p(TCP_STAT_ECN_ECT, "\t%" PRIu64 " packet%s ECN ECT(0) bit\n");
    511 #undef p
    512 #undef ps
    513 #undef p2
    514 #undef p2s
    515 #undef p3
    516 	show_vtw_stats();
    517 }
    518 
    519 /*
    520  * Dump UDP statistics structure.
    521  */
    522 void
    523 udp_stats(u_long off, const char *name)
    524 {
    525 	uint64_t udpstat[UDP_NSTATS];
    526 	u_quad_t delivered;
    527 
    528 	if (use_sysctl) {
    529 		size_t size = sizeof(udpstat);
    530 
    531 		if (prog_sysctlbyname("net.inet.udp.stats", udpstat, &size,
    532 				 NULL, 0) == -1 && errno != ENOMEM)
    533 			return;
    534 	} else {
    535 		warnx("%s stats not available via KVM.", name);
    536 		return;
    537 	}
    538 
    539 	printf ("%s:\n", name);
    540 
    541 #define	ps(f, m) if (udpstat[f] || sflag <= 1) \
    542     printf(m, udpstat[f])
    543 #define	p(f, m) if (udpstat[f] || sflag <= 1) \
    544     printf(m, udpstat[f], plural(udpstat[f]))
    545 #define	p3(f, m) if (udpstat[f] || sflag <= 1) \
    546     printf(m, udpstat[f], plurales(udpstat[f]))
    547 
    548 	p(UDP_STAT_IPACKETS, "\t%" PRIu64 " datagram%s received\n");
    549 	ps(UDP_STAT_HDROPS, "\t%" PRIu64 " with incomplete header\n");
    550 	ps(UDP_STAT_BADLEN, "\t%" PRIu64 " with bad data length field\n");
    551 	ps(UDP_STAT_BADSUM, "\t%" PRIu64 " with bad checksum\n");
    552 	ps(UDP_STAT_NOPORT, "\t%" PRIu64 " dropped due to no socket\n");
    553 	p(UDP_STAT_NOPORTBCAST,
    554 	  "\t%" PRIu64 " broadcast/multicast datagram%s dropped due to no socket\n");
    555 	ps(UDP_STAT_FULLSOCK, "\t%" PRIu64 " dropped due to full socket buffers\n");
    556 	delivered = udpstat[UDP_STAT_IPACKETS] -
    557 		    udpstat[UDP_STAT_HDROPS] -
    558 		    udpstat[UDP_STAT_BADLEN] -
    559 		    udpstat[UDP_STAT_BADSUM] -
    560 		    udpstat[UDP_STAT_NOPORT] -
    561 		    udpstat[UDP_STAT_NOPORTBCAST] -
    562 		    udpstat[UDP_STAT_FULLSOCK];
    563 	if (delivered || sflag <= 1)
    564 		printf("\t%" PRIu64 " delivered\n", delivered);
    565 	p3(UDP_STAT_PCBHASHMISS, "\t%" PRIu64 " PCB hash miss%s\n");
    566 	p(UDP_STAT_OPACKETS, "\t%" PRIu64 " datagram%s output\n");
    567 
    568 #undef ps
    569 #undef p
    570 #undef p3
    571 }
    572 
    573 /*
    574  * Dump IP statistics structure.
    575  */
    576 void
    577 ip_stats(u_long off, const char *name)
    578 {
    579 	uint64_t ipstat[IP_NSTATS];
    580 
    581 	if (use_sysctl) {
    582 		size_t size = sizeof(ipstat);
    583 
    584 		if (prog_sysctlbyname("net.inet.ip.stats", ipstat, &size,
    585 				 NULL, 0) == -1 && errno != ENOMEM)
    586 			return;
    587 	} else {
    588 		warnx("%s stats not available via KVM.", name);
    589 		return;
    590 	}
    591 
    592 	printf("%s:\n", name);
    593 
    594 #define	ps(f, m) if (ipstat[f] || sflag <= 1) \
    595     printf(m, ipstat[f])
    596 #define	p(f, m) if (ipstat[f] || sflag <= 1) \
    597     printf(m, ipstat[f], plural(ipstat[f]))
    598 
    599 	p(IP_STAT_TOTAL, "\t%" PRIu64 " total packet%s received\n");
    600 	p(IP_STAT_BADSUM, "\t%" PRIu64 " bad header checksum%s\n");
    601 	ps(IP_STAT_TOOSMALL, "\t%" PRIu64 " with size smaller than minimum\n");
    602 	ps(IP_STAT_TOOSHORT, "\t%" PRIu64 " with data size < data length\n");
    603 	ps(IP_STAT_TOOLONG, "\t%" PRIu64 " with length > max ip packet size\n");
    604 	ps(IP_STAT_BADHLEN, "\t%" PRIu64 " with header length < data size\n");
    605 	ps(IP_STAT_BADLEN, "\t%" PRIu64 " with data length < header length\n");
    606 	ps(IP_STAT_BADOPTIONS, "\t%" PRIu64 " with bad options\n");
    607 	ps(IP_STAT_BADVERS, "\t%" PRIu64 " with incorrect version number\n");
    608 	p(IP_STAT_FRAGMENTS, "\t%" PRIu64 " fragment%s received\n");
    609 	p(IP_STAT_FRAGDROPPED, "\t%" PRIu64 " fragment%s dropped (dup or out of space)\n");
    610 	p(IP_STAT_RCVMEMDROP, "\t%" PRIu64 " fragment%s dropped (out of ipqent)\n");
    611 	p(IP_STAT_BADFRAGS, "\t%" PRIu64 " malformed fragment%s dropped\n");
    612 	p(IP_STAT_FRAGTIMEOUT, "\t%" PRIu64 " fragment%s dropped after timeout\n");
    613 	p(IP_STAT_REASSEMBLED, "\t%" PRIu64 " packet%s reassembled ok\n");
    614 	p(IP_STAT_DELIVERED, "\t%" PRIu64 " packet%s for this host\n");
    615 	p(IP_STAT_NOPROTO, "\t%" PRIu64 " packet%s for unknown/unsupported protocol\n");
    616 	p(IP_STAT_FORWARD, "\t%" PRIu64 " packet%s forwarded");
    617 	p(IP_STAT_FASTFORWARD, " (%" PRIu64 " packet%s fast forwarded)");
    618 	if (ipstat[IP_STAT_FORWARD] || sflag <= 1)
    619 		putchar('\n');
    620 	p(IP_STAT_CANTFORWARD, "\t%" PRIu64 " packet%s not forwardable\n");
    621 	p(IP_STAT_REDIRECTSENT, "\t%" PRIu64 " redirect%s sent\n");
    622 	p(IP_STAT_NOGIF, "\t%" PRIu64 " packet%s no matching gif found\n");
    623 	p(IP_STAT_NOIPSEC, "\t%" PRIu64 " packet%s no matching ipsecif found\n");
    624 	p(IP_STAT_LOCALOUT, "\t%" PRIu64 " packet%s sent from this host\n");
    625 	p(IP_STAT_RAWOUT, "\t%" PRIu64 " packet%s sent with fabricated ip header\n");
    626 	p(IP_STAT_ODROPPED, "\t%" PRIu64 " output packet%s dropped due to no bufs, etc.\n");
    627 	p(IP_STAT_NOROUTE, "\t%" PRIu64 " output packet%s discarded due to no route\n");
    628 	p(IP_STAT_FRAGMENTED, "\t%" PRIu64 " output datagram%s fragmented\n");
    629 	p(IP_STAT_OFRAGMENTS, "\t%" PRIu64 " fragment%s created\n");
    630 	p(IP_STAT_CANTFRAG, "\t%" PRIu64 " datagram%s that can't be fragmented\n");
    631 	p(IP_STAT_BADADDR, "\t%" PRIu64 " datagram%s with bad address in header\n");
    632 	p(IP_STAT_PFILDROP_IN, "\t%" PRIu64 " input packet%s dropped by pfil\n");
    633 	p(IP_STAT_PFILDROP_OUT, "\t%" PRIu64 " output packet%s dropped by pfil\n");
    634 	p(IP_STAT_IPSECDROP_IN, "\t%" PRIu64 " input packet%s dropped by IPsec\n");
    635 	p(IP_STAT_IPSECDROP_OUT, "\t%" PRIu64 " output packet%s dropped by IPsec\n");
    636 	p(IP_STAT_IFDROP, "\t%" PRIu64 " input packet%s dropped due to interface state\n");
    637 	p(IP_STAT_TIMXCEED, "\t%" PRIu64 " packet%s dropped due to TTL exceeded\n");
    638 	p(IP_STAT_IFNOADDR, "\t%" PRIu64 " output packet%s dropped (no IP address)\n");
    639 	p(IP_STAT_RTREJECT, "\t%" PRIu64 " output packet%s discarded due to reject route\n");
    640 	p(IP_STAT_BCASTDENIED, "\t%" PRIu64 " output packet%s dropped (broadcast prohibited)\n");
    641 #undef ps
    642 #undef p
    643 }
    644 
    645 /*
    646  * Dump ICMP statistics.
    647  */
    648 void
    649 icmp_stats(u_long off, const char *name)
    650 {
    651 	uint64_t icmpstat[ICMP_NSTATS];
    652 	int i, first;
    653 
    654 	if (use_sysctl) {
    655 		size_t size = sizeof(icmpstat);
    656 
    657 		if (prog_sysctlbyname("net.inet.icmp.stats", icmpstat, &size,
    658 				 NULL, 0) == -1 && errno != ENOMEM)
    659 			return;
    660 	} else {
    661 		warnx("%s stats not available via KVM.", name);
    662 		return;
    663 	}
    664 
    665 	printf("%s:\n", name);
    666 
    667 #define	p(f, m) if (icmpstat[f] || sflag <= 1) \
    668     printf(m, icmpstat[f], plural(icmpstat[f]))
    669 
    670 	p(ICMP_STAT_ERROR, "\t%" PRIu64 " call%s to icmp_error\n");
    671 	p(ICMP_STAT_OLDICMP,
    672 	    "\t%" PRIu64 " error%s not generated because old message was icmp\n");
    673 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    674 		if (icmpstat[ICMP_STAT_OUTHIST + i] != 0) {
    675 			if (first) {
    676 				printf("\tOutput histogram:\n");
    677 				first = 0;
    678 			}
    679 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    680 			   icmpstat[ICMP_STAT_OUTHIST + i]);
    681 		}
    682 	p(ICMP_STAT_BADCODE, "\t%" PRIu64 " message%s with bad code fields\n");
    683 	p(ICMP_STAT_TOOSHORT, "\t%" PRIu64 " message%s < minimum length\n");
    684 	p(ICMP_STAT_CHECKSUM, "\t%" PRIu64 " bad checksum%s\n");
    685 	p(ICMP_STAT_BADLEN, "\t%" PRIu64 " message%s with bad length\n");
    686 	p(ICMP_STAT_BMCASTECHO, "\t%" PRIu64 " multicast echo request%s ignored\n");
    687 	p(ICMP_STAT_BMCASTTSTAMP, "\t%" PRIu64 " multicast timestamp request%s ignored\n");
    688 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    689 		if (icmpstat[ICMP_STAT_INHIST + i] != 0) {
    690 			if (first) {
    691 				printf("\tInput histogram:\n");
    692 				first = 0;
    693 			}
    694 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    695 			    icmpstat[ICMP_STAT_INHIST + i]);
    696 		}
    697 	p(ICMP_STAT_REFLECT, "\t%" PRIu64 " message response%s generated\n");
    698 	p(ICMP_STAT_PMTUCHG, "\t%" PRIu64 " path MTU change%s\n");
    699 #undef p
    700 }
    701 
    702 /*
    703  * Dump IGMP statistics structure.
    704  */
    705 void
    706 igmp_stats(u_long off, const char *name)
    707 {
    708 	uint64_t igmpstat[IGMP_NSTATS];
    709 
    710 	if (use_sysctl) {
    711 		size_t size = sizeof(igmpstat);
    712 
    713 		if (prog_sysctlbyname("net.inet.igmp.stats", igmpstat, &size,
    714 				 NULL, 0) == -1 && errno != ENOMEM)
    715 			return;
    716 	} else {
    717 		warnx("%s stats not available via KVM.", name);
    718 		return;
    719 	}
    720 
    721 	printf("%s:\n", name);
    722 
    723 #define	p(f, m) if (igmpstat[f] || sflag <= 1) \
    724     printf(m, igmpstat[f], plural(igmpstat[f]))
    725 #define	py(f, m) if (igmpstat[f] || sflag <= 1) \
    726     printf(m, igmpstat[f], igmpstat[f] != 1 ? "ies" : "y")
    727 	p(IGMP_STAT_RCV_TOTAL, "\t%" PRIu64 " message%s received\n");
    728         p(IGMP_STAT_RCV_TOOSHORT, "\t%" PRIu64 " message%s received with too few bytes\n");
    729         p(IGMP_STAT_RCV_BADSUM, "\t%" PRIu64 " message%s received with bad checksum\n");
    730         py(IGMP_STAT_RCV_QUERIES, "\t%" PRIu64 " membership quer%s received\n");
    731         py(IGMP_STAT_RCV_BADQUERIES, "\t%" PRIu64 " membership quer%s received with invalid field(s)\n");
    732         p(IGMP_STAT_RCV_REPORTS, "\t%" PRIu64 " membership report%s received\n");
    733         p(IGMP_STAT_RCV_BADREPORTS, "\t%" PRIu64 " membership report%s received with invalid field(s)\n");
    734         p(IGMP_STAT_RCV_OURREPORTS, "\t%" PRIu64 " membership report%s received for groups to which we belong\n");
    735         p(IGMP_STAT_SND_REPORTS, "\t%" PRIu64 " membership report%s sent\n");
    736 #undef p
    737 #undef py
    738 }
    739 
    740 /*
    741  * Dump CARP statistics structure.
    742  */
    743 void
    744 carp_stats(u_long off, const char *name)
    745 {
    746 	uint64_t carpstat[CARP_NSTATS];
    747 
    748 	if (use_sysctl) {
    749 		size_t size = sizeof(carpstat);
    750 
    751 		if (prog_sysctlbyname("net.inet.carp.stats", carpstat, &size,
    752 				 NULL, 0) == -1 && errno != ENOMEM)
    753 			return;
    754 	} else {
    755 		warnx("%s stats not available via KVM.", name);
    756 		return;
    757 	}
    758 
    759 	printf("%s:\n", name);
    760 
    761 #define p(f, m) if (carpstat[f] || sflag <= 1) \
    762 	printf(m, carpstat[f], plural(carpstat[f]))
    763 #define p2(f, m) if (carpstat[f] || sflag <= 1) \
    764 	printf(m, carpstat[f])
    765 
    766 	p(CARP_STAT_IPACKETS, "\t%" PRIu64 " packet%s received (IPv4)\n");
    767 	p(CARP_STAT_IPACKETS6, "\t%" PRIu64 " packet%s received (IPv6)\n");
    768 	p(CARP_STAT_BADIF,
    769 	    "\t\t%" PRIu64 " packet%s discarded for bad interface\n");
    770 	p(CARP_STAT_BADTTL,
    771 	    "\t\t%" PRIu64 " packet%s discarded for wrong TTL\n");
    772 	p(CARP_STAT_HDROPS, "\t\t%" PRIu64 " packet%s shorter than header\n");
    773 	p(CARP_STAT_BADSUM, "\t\t%" PRIu64
    774 		" packet%s discarded for bad checksum\n");
    775 	p(CARP_STAT_BADVER,
    776 	    "\t\t%" PRIu64 " packet%s discarded with a bad version\n");
    777 	p2(CARP_STAT_BADLEN,
    778 	    "\t\t%" PRIu64 " discarded because packet was too short\n");
    779 	p(CARP_STAT_BADAUTH,
    780 	    "\t\t%" PRIu64 " packet%s discarded for bad authentication\n");
    781 	p(CARP_STAT_BADVHID, "\t\t%" PRIu64 " packet%s discarded for bad vhid\n");
    782 	p(CARP_STAT_BADADDRS, "\t\t%" PRIu64
    783 		" packet%s discarded because of a bad address list\n");
    784 	p(CARP_STAT_OPACKETS, "\t%" PRIu64 " packet%s sent (IPv4)\n");
    785 	p(CARP_STAT_OPACKETS6, "\t%" PRIu64 " packet%s sent (IPv6)\n");
    786 	p2(CARP_STAT_ONOMEM,
    787 	    "\t\t%" PRIu64 " send failed due to mbuf memory error\n");
    788 #undef p
    789 #undef p2
    790 }
    791 
    792 /*
    793  * Dump PIM statistics structure.
    794  */
    795 void
    796 pim_stats(u_long off, const char *name)
    797 {
    798 	struct pimstat pimstat;
    799 
    800 	if (off == 0)
    801 		return;
    802 	if (kread(off, (char *)&pimstat, sizeof (pimstat)) != 0) {
    803 		/* XXX: PIM is probably not enabled in the kernel */
    804 		return;
    805 	}
    806 
    807 	printf("%s:\n", name);
    808 
    809 #define	p(f, m) if (pimstat.f || sflag <= 1) \
    810 	printf(m, pimstat.f, plural(pimstat.f))
    811 
    812 	p(pims_rcv_total_msgs, "\t%" PRIu64 " message%s received\n");
    813 	p(pims_rcv_total_bytes, "\t%" PRIu64 " byte%s received\n");
    814 	p(pims_rcv_tooshort, "\t%" PRIu64 " message%s received with too few bytes\n");
    815         p(pims_rcv_badsum, "\t%" PRIu64 " message%s received with bad checksum\n");
    816 	p(pims_rcv_badversion, "\t%" PRIu64 " message%s received with bad version\n");
    817 	p(pims_rcv_registers_msgs, "\t%" PRIu64 " data register message%s received\n");
    818 	p(pims_rcv_registers_bytes, "\t%" PRIu64 " data register byte%s received\n");
    819 	p(pims_rcv_registers_wrongiif, "\t%" PRIu64 " data register message%s received on wrong iif\n");
    820 	p(pims_rcv_badregisters, "\t%" PRIu64 " bad register%s received\n");
    821 	p(pims_snd_registers_msgs, "\t%" PRIu64 " data register message%s sent\n");
    822 	p(pims_snd_registers_bytes, "\t%" PRIu64 " data register byte%s sent\n");
    823 #undef p
    824 }
    825 
    826 /*
    827  * Dump the ARP statistics structure.
    828  */
    829 void
    830 arp_stats(u_long off, const char *name)
    831 {
    832 	uint64_t arpstat[ARP_NSTATS];
    833 
    834 	if (use_sysctl) {
    835 		size_t size = sizeof(arpstat);
    836 
    837 		if (prog_sysctlbyname("net.inet.arp.stats", arpstat, &size,
    838 				 NULL, 0) == -1 && errno != ENOMEM)
    839 			return;
    840 	} else {
    841 		warnx("%s stats not available via KVM.", name);
    842 		return;
    843 	}
    844 
    845 	printf("%s:\n", name);
    846 
    847 #define	ps(f, m) if (arpstat[f] || sflag <= 1) \
    848     printf(m, arpstat[f])
    849 #define	p(f, m) if (arpstat[f] || sflag <= 1) \
    850     printf(m, arpstat[f], plural(arpstat[f]))
    851 
    852 	p(ARP_STAT_SNDTOTAL, "\t%" PRIu64 " packet%s sent\n");
    853 	p(ARP_STAT_SNDREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    854 	p(ARP_STAT_SENDREQUEST, "\t\t%" PRIu64 " request packet%s\n");
    855 
    856 	p(ARP_STAT_RCVTOTAL, "\t%" PRIu64 " packet%s received\n");
    857 	p(ARP_STAT_RCVREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    858 	p(ARP_STAT_RCVREQUEST, "\t\t%" PRIu64 " valid request packet%s\n");
    859 	p(ARP_STAT_RCVMCAST, "\t\t%" PRIu64 " broadcast/multicast packet%s\n");
    860 	p(ARP_STAT_RCVBADPROTO, "\t\t%" PRIu64 " packet%s with unknown protocol type\n");
    861 	p(ARP_STAT_RCVBADLEN, "\t\t%" PRIu64 " packet%s with bad (short) length\n");
    862 	p(ARP_STAT_RCVZEROTPA, "\t\t%" PRIu64 " packet%s with null target IP address\n");
    863 	p(ARP_STAT_RCVZEROSPA, "\t\t%" PRIu64 " packet%s with null source IP address\n");
    864 	ps(ARP_STAT_RCVNOINT, "\t\t%" PRIu64 " could not be mapped to an interface\n");
    865 	p(ARP_STAT_RCVLOCALSHA, "\t\t%" PRIu64 " packet%s sourced from a local hardware "
    866 	    "address\n");
    867 	p(ARP_STAT_RCVBCASTSHA, "\t\t%" PRIu64 " packet%s with a broadcast "
    868 	    "source hardware address\n");
    869 	p(ARP_STAT_RCVLOCALSPA, "\t\t%" PRIu64 " duplicate%s for a local IP address\n");
    870 	p(ARP_STAT_RCVOVERPERM, "\t\t%" PRIu64 " attempt%s to overwrite a static entry\n");
    871 	p(ARP_STAT_RCVOVERINT, "\t\t%" PRIu64 " packet%s received on wrong interface\n");
    872 	p(ARP_STAT_RCVOVER, "\t\t%" PRIu64 " entry%s overwritten\n");
    873 	p(ARP_STAT_RCVLENCHG, "\t\t%" PRIu64 " change%s in hardware address length\n");
    874 
    875 	p(ARP_STAT_DFRTOTAL, "\t%" PRIu64 " packet%s deferred pending ARP resolution\n");
    876 	ps(ARP_STAT_DFRSENT, "\t\t%" PRIu64 " sent\n");
    877 	ps(ARP_STAT_DFRDROPPED, "\t\t%" PRIu64 " dropped\n");
    878 
    879 	p(ARP_STAT_ALLOCFAIL, "\t%" PRIu64 " failure%s to allocate llinfo\n");
    880 
    881 #undef ps
    882 #undef p
    883 }
    884 
    885 /*
    886  * Pretty print an Internet address (net address + port).
    887  * Take numeric_addr and numeric_port into consideration.
    888  */
    889 void
    890 inetprint(struct in_addr *in, uint16_t port, const char *proto,
    891 	  int port_numeric)
    892 {
    893 	struct servent *sp = 0;
    894 	char line[80], *cp;
    895 	size_t space;
    896 
    897 	(void)snprintf(line, sizeof line, "%.*s.",
    898 	    (Aflag && !numeric_addr) ? 12 : 16, inetname(in));
    899 	cp = strchr(line, '\0');
    900 	if (!port_numeric && port)
    901 		sp = getservbyport((int)port, proto);
    902 	space = sizeof line - (cp-line);
    903 	if (sp || port == 0)
    904 		(void)snprintf(cp, space, "%s", sp ? sp->s_name : "*");
    905 	else
    906 		(void)snprintf(cp, space, "%u", ntohs(port));
    907 	(void)printf(" %-*.*s", width, width, line);
    908 }
    909 
    910 /*
    911  * Construct an Internet address representation.
    912  * If numeric_addr has been supplied, give
    913  * numeric value, otherwise try for symbolic name.
    914  */
    915 char *
    916 inetname(struct in_addr *inp)
    917 {
    918 	char *cp;
    919 	static char line[50];
    920 	struct hostent *hp;
    921 	struct netent *np;
    922 	static char domain[MAXHOSTNAMELEN + 1];
    923 	static int first = 1;
    924 
    925 	if (first && !numeric_addr) {
    926 		first = 0;
    927 		if (gethostname(domain, sizeof domain) == 0) {
    928 			domain[sizeof(domain) - 1] = '\0';
    929 			if ((cp = strchr(domain, '.')))
    930 				(void) strlcpy(domain, cp + 1, sizeof(domain));
    931 			else
    932 				domain[0] = 0;
    933 		} else
    934 			domain[0] = 0;
    935 	}
    936 	cp = 0;
    937 	if (!numeric_addr && inp->s_addr != INADDR_ANY) {
    938 		int net = inet_netof(*inp);
    939 		int lna = inet_lnaof(*inp);
    940 
    941 		if (lna == INADDR_ANY) {
    942 			np = getnetbyaddr(net, AF_INET);
    943 			if (np)
    944 				cp = np->n_name;
    945 		}
    946 		if (cp == 0) {
    947 			hp = gethostbyaddr((char *)inp, sizeof (*inp), AF_INET);
    948 			if (hp) {
    949 				if ((cp = strchr(hp->h_name, '.')) &&
    950 				    !strcmp(cp + 1, domain))
    951 					*cp = 0;
    952 				cp = hp->h_name;
    953 			}
    954 		}
    955 	}
    956 	if (inp->s_addr == INADDR_ANY)
    957 		strlcpy(line, "*", sizeof line);
    958 	else if (cp)
    959 		strlcpy(line, cp, sizeof line);
    960 	else {
    961 		inp->s_addr = ntohl(inp->s_addr);
    962 #define C(x)	((x) & 0xff)
    963 		(void)snprintf(line, sizeof line, "%u.%u.%u.%u",
    964 		    C(inp->s_addr >> 24), C(inp->s_addr >> 16),
    965 		    C(inp->s_addr >> 8), C(inp->s_addr));
    966 #undef C
    967 	}
    968 	return (line);
    969 }
    970 
    971 /*
    972  * Dump the contents of a TCP PCB.
    973  */
    974 void
    975 tcp_dump(u_long off, const char *name, u_long pcbaddr)
    976 {
    977 	callout_impl_t *ci;
    978 	struct tcpcb tcpcb;
    979 	int i, hardticks;
    980 	struct kinfo_pcb *pcblist;
    981 	size_t j, len;
    982 
    983 	if (use_sysctl)
    984 		pcblist = getpcblist_sysctl(name, &len);
    985 	else
    986 		pcblist = getpcblist_kmem(off, name, &len);
    987 
    988 	for (j = 0; j < len; j++)
    989 		if (pcblist[j].ki_ppcbaddr == pcbaddr)
    990 			break;
    991 	free(pcblist);
    992 
    993 	if (j == len)
    994 		errx(1, "0x%lx is not a valid pcb address", pcbaddr);
    995 
    996 	kread(pcbaddr, (char *)&tcpcb, sizeof(tcpcb));
    997 	hardticks = get_hardticks();
    998 
    999 	printf("TCP Protocol Control Block at 0x%08lx:\n\n", pcbaddr);
   1000 
   1001 	printf("Timers:\n");
   1002 	for (i = 0; i < TCPT_NTIMERS; i++) {
   1003 		char buf[128];
   1004 		ci = (callout_impl_t *)&tcpcb.t_timer[i];
   1005 		snprintb(buf, sizeof(buf), CALLOUT_FMT, ci->c_flags);
   1006 		printf("\t%s\t%s", tcptimers[i], buf);
   1007 		if (ci->c_flags & CALLOUT_PENDING)
   1008 			printf("\t%d\n", ci->c_time - hardticks);
   1009 		else
   1010 			printf("\n");
   1011 	}
   1012 	printf("\n\n");
   1013 
   1014 	if (tcpcb.t_state < 0 || tcpcb.t_state >= TCP_NSTATES)
   1015 		printf("State: %d", tcpcb.t_state);
   1016 	else
   1017 		printf("State: %s", tcpstates[tcpcb.t_state]);
   1018 	printf(", flags 0x%x, inpcb 0x%lx, in6pcb 0x%lx\n\n", tcpcb.t_flags,
   1019 	    (u_long)tcpcb.t_inpcb, (u_long)tcpcb.t_in6pcb);
   1020 
   1021 	printf("rxtshift %d, rxtcur %d, dupacks %d\n", tcpcb.t_rxtshift,
   1022 	    tcpcb.t_rxtcur, tcpcb.t_dupacks);
   1023         printf("peermss %u, ourmss %u, segsz %u, segqlen %u\n\n",
   1024 	    tcpcb.t_peermss, tcpcb.t_ourmss, tcpcb.t_segsz, tcpcb.t_segqlen);
   1025 
   1026 	printf("snd_una %u, snd_nxt %u, snd_up %u\n",
   1027 	    tcpcb.snd_una, tcpcb.snd_nxt, tcpcb.snd_up);
   1028 	printf("snd_wl1 %u, snd_wl2 %u, iss %u, snd_wnd %lu\n\n",
   1029 	    tcpcb.snd_wl1, tcpcb.snd_wl2, tcpcb.iss, tcpcb.snd_wnd);
   1030 
   1031 	printf("rcv_wnd %lu, rcv_nxt %u, rcv_up %u, irs %u\n\n",
   1032 	    tcpcb.rcv_wnd, tcpcb.rcv_nxt, tcpcb.rcv_up, tcpcb.irs);
   1033 
   1034 	printf("rcv_adv %u, snd_max %u, snd_cwnd %lu, snd_ssthresh %lu\n",
   1035 	    tcpcb.rcv_adv, tcpcb.snd_max, tcpcb.snd_cwnd, tcpcb.snd_ssthresh);
   1036 
   1037 	printf("rcvtime %u, rtttime %u, rtseq %u, srtt %d, rttvar %d, "
   1038 	    "rttmin %d, max_sndwnd %lu\n\n", tcpcb.t_rcvtime, tcpcb.t_rtttime,
   1039 	    tcpcb.t_rtseq, tcpcb.t_srtt, tcpcb.t_rttvar, tcpcb.t_rttmin,
   1040 	    tcpcb.max_sndwnd);
   1041 
   1042 	printf("oobflags %d, iobc %d, softerror %d\n\n", tcpcb.t_oobflags,
   1043 	    tcpcb.t_iobc, tcpcb.t_softerror);
   1044 
   1045 	printf("snd_scale %d, rcv_scale %d, req_r_scale %d, req_s_scale %d\n",
   1046 	    tcpcb.snd_scale, tcpcb.rcv_scale, tcpcb.request_r_scale,
   1047 	    tcpcb.requested_s_scale);
   1048 	printf("ts_recent %u, ts_regent_age %d, last_ack_sent %u\n",
   1049 	    tcpcb.ts_recent, tcpcb.ts_recent_age, tcpcb.last_ack_sent);
   1050 }
   1051