Home | History | Annotate | Line # | Download | only in netstat
inet.c revision 1.113
      1 /*	$NetBSD: inet.c,v 1.113 2020/08/28 07:23:48 ozaki-r 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.113 2020/08/28 07:23:48 ozaki-r 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 	if ((pcblist = malloc(size * sizeof(*pcblist))) == NULL)
    297 		err(1, "malloc");
    298 
    299 	i = 0;
    300 	while (next != TAILQ_END(head)) {
    301 		kread((u_long)next, (char *)&inpcb, sizeof inpcb);
    302 		prev = next;
    303 		next = TAILQ_NEXT(&inpcb, inp_queue);
    304 
    305 		if (inpcb.inp_af != AF_INET)
    306 			continue;
    307 
    308 		kread((u_long)inpcb.inp_socket, (char *)&sockb, sizeof(sockb));
    309 		if (istcp) {
    310 			kread((u_long)inpcb.inp_ppcb,
    311 			    (char *)&tcpcb, sizeof (tcpcb));
    312 		}
    313 		pcblist[i].ki_ppcbaddr =
    314 		    istcp ? (uintptr_t) inpcb.inp_ppcb : (uintptr_t) prev;
    315 		pcblist[i].ki_rcvq = (uint64_t)sockb.so_rcv.sb_cc;
    316 		pcblist[i].ki_sndq = (uint64_t)sockb.so_snd.sb_cc;
    317 
    318 		sin.sin_addr = inpcb.inp_laddr;
    319 		sin.sin_port = inpcb.inp_lport;
    320 		memcpy(&pcblist[i].ki_s, &sin, sizeof(sin));
    321 		sin.sin_addr = inpcb.inp_faddr;
    322 		sin.sin_port = inpcb.inp_fport;
    323 		memcpy(&pcblist[i].ki_d, &sin, sizeof(sin));
    324 		pcblist[i].ki_tstate = tcpcb.t_state;
    325 		pcblist[i].ki_pflags = inpcb.inp_flags;
    326 		if (i++ == size) {
    327 			size += 100;
    328 			struct kinfo_pcb *n = realloc(pcblist,
    329 			    size * sizeof(*pcblist));
    330 			if (n == NULL)
    331 				err(1, "realloc");
    332 			pcblist = n;
    333 		}
    334 	}
    335 	*len = i;
    336 	return pcblist;
    337 }
    338 
    339 void
    340 protopr(u_long off, const char *name)
    341 {
    342 	static int first = 1;
    343 	struct kinfo_pcb *pcblist;
    344 	size_t i, len;
    345 
    346 	compact = 0;
    347 	if (Aflag) {
    348 		if (!numeric_addr)
    349 			width = 18;
    350 		else {
    351 			width = 21;
    352 			compact = 1;
    353 		}
    354 	} else
    355 		width = 22;
    356 
    357 	if (use_sysctl)
    358 		pcblist = getpcblist_sysctl(name, &len);
    359 	else
    360 		pcblist = getpcblist_kmem(off, name, &len);
    361 
    362 	for (i = 0; i < len; i++) {
    363 		struct sockaddr_in src, dst;
    364 
    365 		memcpy(&src, &pcblist[i].ki_s, sizeof(src));
    366 		memcpy(&dst, &pcblist[i].ki_d, sizeof(dst));
    367 
    368 		if (!aflag &&
    369 		    inet_lnaof(dst.sin_addr) == INADDR_ANY)
    370 			continue;
    371 
    372 		if (first) {
    373 			protoprhdr();
    374 			first = 0;
    375 		}
    376 		protopr0((intptr_t) pcblist[i].ki_ppcbaddr,
    377 			 pcblist[i].ki_rcvq, pcblist[i].ki_sndq,
    378 			 &src.sin_addr, src.sin_port,
    379 			 &dst.sin_addr, dst.sin_port,
    380 			 pcblist[i].ki_tstate, name,
    381 			 pcblist[i].ki_pflags, NULL);
    382 	}
    383 
    384 	free(pcblist);
    385 
    386 	if (strcmp(name, "tcp") == 0) {
    387 		struct timeval t;
    388 		timebase(&t);
    389 		gettimeofday(&now, NULL);
    390 		timersub(&now, &t, &now);
    391 		show_vtw_v4(print_vtw_v4);
    392 	}
    393 }
    394 
    395 /*
    396  * Dump TCP statistics structure.
    397  */
    398 void
    399 tcp_stats(u_long off, const char *name)
    400 {
    401 	uint64_t tcpstat[TCP_NSTATS];
    402 
    403 	if (use_sysctl) {
    404 		size_t size = sizeof(tcpstat);
    405 
    406 		if (prog_sysctlbyname("net.inet.tcp.stats", tcpstat, &size,
    407 				 NULL, 0) == -1 && errno != ENOMEM)
    408 			return;
    409 	} else {
    410 		warnx("%s stats not available via KVM.", name);
    411 		return;
    412 	}
    413 
    414 	printf ("%s:\n", name);
    415 
    416 #define	ps(f, m) if (tcpstat[f] || sflag <= 1) \
    417     printf(m, tcpstat[f])
    418 #define	p(f, m) if (tcpstat[f] || sflag <= 1) \
    419     printf(m, tcpstat[f], plural(tcpstat[f]))
    420 #define	p2(f1, f2, m) if (tcpstat[f1] || tcpstat[f2] || sflag <= 1) \
    421     printf(m, tcpstat[f1], plural(tcpstat[f1]), \
    422     tcpstat[f2], plural(tcpstat[f2]))
    423 #define	p2s(f1, f2, m) if (tcpstat[f1] || tcpstat[f2] || sflag <= 1) \
    424     printf(m, tcpstat[f1], plural(tcpstat[f1]), \
    425     tcpstat[f2])
    426 #define	p3(f, m) if (tcpstat[f] || sflag <= 1) \
    427     printf(m, tcpstat[f], plurales(tcpstat[f]))
    428 
    429 	p(TCP_STAT_SNDTOTAL, "\t%" PRIu64 " packet%s sent\n");
    430 	p2(TCP_STAT_SNDPACK,TCP_STAT_SNDBYTE,
    431 		"\t\t%" PRIu64 " data packet%s (%" PRIu64 " byte%s)\n");
    432 	p2(TCP_STAT_SNDREXMITPACK, TCP_STAT_SNDREXMITBYTE,
    433 		"\t\t%" PRIu64 " data packet%s (%" PRIu64 " byte%s) retransmitted\n");
    434 	p2s(TCP_STAT_SNDACKS, TCP_STAT_DELACK,
    435 		"\t\t%" PRIu64 " ack-only packet%s (%" PRIu64 " delayed)\n");
    436 	p(TCP_STAT_SNDURG, "\t\t%" PRIu64 " URG only packet%s\n");
    437 	p(TCP_STAT_SNDPROBE, "\t\t%" PRIu64 " window probe packet%s\n");
    438 	p(TCP_STAT_SNDWINUP, "\t\t%" PRIu64 " window update packet%s\n");
    439 	p(TCP_STAT_SNDCTRL, "\t\t%" PRIu64 " control packet%s\n");
    440 	p(TCP_STAT_SELFQUENCH,
    441 	    "\t\t%" PRIu64 " send attempt%s resulted in self-quench\n");
    442 	p(TCP_STAT_RCVTOTAL, "\t%" PRIu64 " packet%s received\n");
    443 	p2(TCP_STAT_RCVACKPACK, TCP_STAT_RCVACKBYTE,
    444 		"\t\t%" PRIu64 " ack%s (for %" PRIu64 " byte%s)\n");
    445 	p(TCP_STAT_RCVDUPACK, "\t\t%" PRIu64 " duplicate ack%s\n");
    446 	p(TCP_STAT_RCVACKTOOMUCH, "\t\t%" PRIu64 " ack%s for unsent data\n");
    447 	p2(TCP_STAT_RCVPACK, TCP_STAT_RCVBYTE,
    448 		"\t\t%" PRIu64 " packet%s (%" PRIu64 " byte%s) received in-sequence\n");
    449 	p2(TCP_STAT_RCVDUPPACK, TCP_STAT_RCVDUPBYTE,
    450 		"\t\t%" PRIu64 " completely duplicate packet%s (%" PRIu64 " byte%s)\n");
    451 	p(TCP_STAT_PAWSDROP, "\t\t%" PRIu64 " old duplicate packet%s\n");
    452 	p2(TCP_STAT_RCVPARTDUPPACK, TCP_STAT_RCVPARTDUPBYTE,
    453 		"\t\t%" PRIu64 " packet%s with some dup. data (%" PRIu64 " byte%s duped)\n");
    454 	p2(TCP_STAT_RCVOOPACK, TCP_STAT_RCVOOBYTE,
    455 		"\t\t%" PRIu64 " out-of-order packet%s (%" PRIu64 " byte%s)\n");
    456 	p2(TCP_STAT_RCVPACKAFTERWIN, TCP_STAT_RCVBYTEAFTERWIN,
    457 		"\t\t%" PRIu64 " packet%s (%" PRIu64 " byte%s) of data after window\n");
    458 	p(TCP_STAT_RCVWINPROBE, "\t\t%" PRIu64 " window probe%s\n");
    459 	p(TCP_STAT_RCVWINUPD, "\t\t%" PRIu64 " window update packet%s\n");
    460 	p(TCP_STAT_RCVAFTERCLOSE, "\t\t%" PRIu64 " packet%s received after close\n");
    461 	p(TCP_STAT_RCVBADSUM, "\t\t%" PRIu64 " discarded for bad checksum%s\n");
    462 	p(TCP_STAT_RCVBADOFF, "\t\t%" PRIu64 " discarded for bad header offset field%s\n");
    463 	ps(TCP_STAT_RCVSHORT, "\t\t%" PRIu64 " discarded because packet too short\n");
    464 	p(TCP_STAT_CONNATTEMPT, "\t%" PRIu64 " connection request%s\n");
    465 	p(TCP_STAT_ACCEPTS, "\t%" PRIu64 " connection accept%s\n");
    466 	p(TCP_STAT_CONNECTS,
    467 		"\t%" PRIu64 " connection%s established (including accepts)\n");
    468 	p2(TCP_STAT_CLOSED, TCP_STAT_DROPS,
    469 		"\t%" PRIu64 " connection%s closed (including %" PRIu64 " drop%s)\n");
    470 	p(TCP_STAT_CONNDROPS, "\t%" PRIu64 " embryonic connection%s dropped\n");
    471 	p(TCP_STAT_DELAYED_FREE, "\t%" PRIu64 " delayed free%s of tcpcb\n");
    472 	p2(TCP_STAT_RTTUPDATED, TCP_STAT_SEGSTIMED,
    473 		"\t%" PRIu64 " segment%s updated rtt (of %" PRIu64 " attempt%s)\n");
    474 	p(TCP_STAT_REXMTTIMEO, "\t%" PRIu64 " retransmit timeout%s\n");
    475 	p(TCP_STAT_TIMEOUTDROP,
    476 		"\t\t%" PRIu64 " connection%s dropped by rexmit timeout\n");
    477 	p2(TCP_STAT_PERSISTTIMEO, TCP_STAT_PERSISTDROPS,
    478 	   "\t%" PRIu64 " persist timeout%s (resulting in %" PRIu64 " dropped "
    479 		"connection%s)\n");
    480 	p(TCP_STAT_KEEPTIMEO, "\t%" PRIu64 " keepalive timeout%s\n");
    481 	p(TCP_STAT_KEEPPROBE, "\t\t%" PRIu64 " keepalive probe%s sent\n");
    482 	p(TCP_STAT_KEEPDROPS, "\t\t%" PRIu64 " connection%s dropped by keepalive\n");
    483 	p(TCP_STAT_PREDACK, "\t%" PRIu64 " correct ACK header prediction%s\n");
    484 	p(TCP_STAT_PREDDAT, "\t%" PRIu64 " correct data packet header prediction%s\n");
    485 	p3(TCP_STAT_PCBHASHMISS, "\t%" PRIu64 " PCB hash miss%s\n");
    486 	ps(TCP_STAT_NOPORT, "\t%" PRIu64 " dropped due to no socket\n");
    487 	p(TCP_STAT_CONNSDRAINED, "\t%" PRIu64 " connection%s drained due to memory "
    488 		"shortage\n");
    489 	p(TCP_STAT_PMTUBLACKHOLE, "\t%" PRIu64 " PMTUD blackhole%s detected\n");
    490 
    491 	p(TCP_STAT_BADSYN, "\t%" PRIu64 " bad connection attempt%s\n");
    492 	ps(TCP_STAT_SC_ADDED, "\t%" PRIu64 " SYN cache entries added\n");
    493 	p(TCP_STAT_SC_COLLISIONS, "\t\t%" PRIu64 " hash collision%s\n");
    494 	ps(TCP_STAT_SC_COMPLETED, "\t\t%" PRIu64 " completed\n");
    495 	ps(TCP_STAT_SC_ABORTED, "\t\t%" PRIu64 " aborted (no space to build PCB)\n");
    496 	ps(TCP_STAT_SC_TIMED_OUT, "\t\t%" PRIu64 " timed out\n");
    497 	ps(TCP_STAT_SC_OVERFLOWED, "\t\t%" PRIu64 " dropped due to overflow\n");
    498 	ps(TCP_STAT_SC_BUCKETOVERFLOW, "\t\t%" PRIu64 " dropped due to bucket overflow\n");
    499 	ps(TCP_STAT_SC_RESET, "\t\t%" PRIu64 " dropped due to RST\n");
    500 	ps(TCP_STAT_SC_UNREACH, "\t\t%" PRIu64 " dropped due to ICMP unreachable\n");
    501 	ps(TCP_STAT_SC_DELAYED_FREE, "\t\t%" PRIu64 " delayed free of SYN cache "
    502 		"entries\n");
    503 	p(TCP_STAT_SC_RETRANSMITTED, "\t%" PRIu64 " SYN,ACK%s retransmitted\n");
    504 	p(TCP_STAT_SC_DUPESYN, "\t%" PRIu64 " duplicate SYN%s received for entries "
    505 		"already in the cache\n");
    506 	p(TCP_STAT_SC_DROPPED, "\t%" PRIu64 " SYN%s dropped (no route or no space)\n");
    507 	p(TCP_STAT_BADSIG, "\t%" PRIu64 " packet%s with bad signature\n");
    508 	p(TCP_STAT_GOODSIG, "\t%" PRIu64 " packet%s with good signature\n");
    509 
    510 	p(TCP_STAT_ECN_SHS, "\t%" PRIu64 " successful ECN handshake%s\n");
    511 	p(TCP_STAT_ECN_CE, "\t%" PRIu64 " packet%s with ECN CE bit\n");
    512 	p(TCP_STAT_ECN_ECT, "\t%" PRIu64 " packet%s ECN ECT(0) bit\n");
    513 #undef p
    514 #undef ps
    515 #undef p2
    516 #undef p2s
    517 #undef p3
    518 	show_vtw_stats();
    519 }
    520 
    521 /*
    522  * Dump UDP statistics structure.
    523  */
    524 void
    525 udp_stats(u_long off, const char *name)
    526 {
    527 	uint64_t udpstat[UDP_NSTATS];
    528 	u_quad_t delivered;
    529 
    530 	if (use_sysctl) {
    531 		size_t size = sizeof(udpstat);
    532 
    533 		if (prog_sysctlbyname("net.inet.udp.stats", udpstat, &size,
    534 				 NULL, 0) == -1 && errno != ENOMEM)
    535 			return;
    536 	} else {
    537 		warnx("%s stats not available via KVM.", name);
    538 		return;
    539 	}
    540 
    541 	printf ("%s:\n", name);
    542 
    543 #define	ps(f, m) if (udpstat[f] || sflag <= 1) \
    544     printf(m, udpstat[f])
    545 #define	p(f, m) if (udpstat[f] || sflag <= 1) \
    546     printf(m, udpstat[f], plural(udpstat[f]))
    547 #define	p3(f, m) if (udpstat[f] || sflag <= 1) \
    548     printf(m, udpstat[f], plurales(udpstat[f]))
    549 
    550 	p(UDP_STAT_IPACKETS, "\t%" PRIu64 " datagram%s received\n");
    551 	ps(UDP_STAT_HDROPS, "\t%" PRIu64 " with incomplete header\n");
    552 	ps(UDP_STAT_BADLEN, "\t%" PRIu64 " with bad data length field\n");
    553 	ps(UDP_STAT_BADSUM, "\t%" PRIu64 " with bad checksum\n");
    554 	ps(UDP_STAT_NOPORT, "\t%" PRIu64 " dropped due to no socket\n");
    555 	p(UDP_STAT_NOPORTBCAST,
    556 	  "\t%" PRIu64 " broadcast/multicast datagram%s dropped due to no socket\n");
    557 	ps(UDP_STAT_FULLSOCK, "\t%" PRIu64 " dropped due to full socket buffers\n");
    558 	delivered = udpstat[UDP_STAT_IPACKETS] -
    559 		    udpstat[UDP_STAT_HDROPS] -
    560 		    udpstat[UDP_STAT_BADLEN] -
    561 		    udpstat[UDP_STAT_BADSUM] -
    562 		    udpstat[UDP_STAT_NOPORT] -
    563 		    udpstat[UDP_STAT_NOPORTBCAST] -
    564 		    udpstat[UDP_STAT_FULLSOCK];
    565 	if (delivered || sflag <= 1)
    566 		printf("\t%" PRIu64 " delivered\n", delivered);
    567 	p3(UDP_STAT_PCBHASHMISS, "\t%" PRIu64 " PCB hash miss%s\n");
    568 	p(UDP_STAT_OPACKETS, "\t%" PRIu64 " datagram%s output\n");
    569 
    570 #undef ps
    571 #undef p
    572 #undef p3
    573 }
    574 
    575 /*
    576  * Dump IP statistics structure.
    577  */
    578 void
    579 ip_stats(u_long off, const char *name)
    580 {
    581 	uint64_t ipstat[IP_NSTATS];
    582 
    583 	if (use_sysctl) {
    584 		size_t size = sizeof(ipstat);
    585 
    586 		if (prog_sysctlbyname("net.inet.ip.stats", ipstat, &size,
    587 				 NULL, 0) == -1 && errno != ENOMEM)
    588 			return;
    589 	} else {
    590 		warnx("%s stats not available via KVM.", name);
    591 		return;
    592 	}
    593 
    594 	printf("%s:\n", name);
    595 
    596 #define	ps(f, m) if (ipstat[f] || sflag <= 1) \
    597     printf(m, ipstat[f])
    598 #define	p(f, m) if (ipstat[f] || sflag <= 1) \
    599     printf(m, ipstat[f], plural(ipstat[f]))
    600 
    601 	p(IP_STAT_TOTAL, "\t%" PRIu64 " total packet%s received\n");
    602 	p(IP_STAT_BADSUM, "\t%" PRIu64 " bad header checksum%s\n");
    603 	ps(IP_STAT_TOOSMALL, "\t%" PRIu64 " with size smaller than minimum\n");
    604 	ps(IP_STAT_TOOSHORT, "\t%" PRIu64 " with data size < data length\n");
    605 	ps(IP_STAT_TOOLONG, "\t%" PRIu64 " with length > max ip packet size\n");
    606 	ps(IP_STAT_BADHLEN, "\t%" PRIu64 " with header length < data size\n");
    607 	ps(IP_STAT_BADLEN, "\t%" PRIu64 " with data length < header length\n");
    608 	ps(IP_STAT_BADOPTIONS, "\t%" PRIu64 " with bad options\n");
    609 	ps(IP_STAT_BADVERS, "\t%" PRIu64 " with incorrect version number\n");
    610 	p(IP_STAT_FRAGMENTS, "\t%" PRIu64 " fragment%s received\n");
    611 	p(IP_STAT_FRAGDROPPED, "\t%" PRIu64 " fragment%s dropped (dup or out of space)\n");
    612 	p(IP_STAT_RCVMEMDROP, "\t%" PRIu64 " fragment%s dropped (out of ipqent)\n");
    613 	p(IP_STAT_BADFRAGS, "\t%" PRIu64 " malformed fragment%s dropped\n");
    614 	p(IP_STAT_FRAGTIMEOUT, "\t%" PRIu64 " fragment%s dropped after timeout\n");
    615 	p(IP_STAT_REASSEMBLED, "\t%" PRIu64 " packet%s reassembled ok\n");
    616 	p(IP_STAT_DELIVERED, "\t%" PRIu64 " packet%s for this host\n");
    617 	p(IP_STAT_NOPROTO, "\t%" PRIu64 " packet%s for unknown/unsupported protocol\n");
    618 	p(IP_STAT_FORWARD, "\t%" PRIu64 " packet%s forwarded");
    619 	p(IP_STAT_FASTFORWARD, " (%" PRIu64 " packet%s fast forwarded)");
    620 	if (ipstat[IP_STAT_FORWARD] || sflag <= 1)
    621 		putchar('\n');
    622 	p(IP_STAT_CANTFORWARD, "\t%" PRIu64 " packet%s not forwardable\n");
    623 	p(IP_STAT_REDIRECTSENT, "\t%" PRIu64 " redirect%s sent\n");
    624 	p(IP_STAT_NOGIF, "\t%" PRIu64 " packet%s no matching gif found\n");
    625 	p(IP_STAT_NOIPSEC, "\t%" PRIu64 " packet%s no matching ipsecif found\n");
    626 	p(IP_STAT_LOCALOUT, "\t%" PRIu64 " packet%s sent from this host\n");
    627 	p(IP_STAT_RAWOUT, "\t%" PRIu64 " packet%s sent with fabricated ip header\n");
    628 	p(IP_STAT_ODROPPED, "\t%" PRIu64 " output packet%s dropped due to no bufs, etc.\n");
    629 	p(IP_STAT_NOROUTE, "\t%" PRIu64 " output packet%s discarded due to no route\n");
    630 	p(IP_STAT_FRAGMENTED, "\t%" PRIu64 " output datagram%s fragmented\n");
    631 	p(IP_STAT_OFRAGMENTS, "\t%" PRIu64 " fragment%s created\n");
    632 	p(IP_STAT_CANTFRAG, "\t%" PRIu64 " datagram%s that can't be fragmented\n");
    633 	p(IP_STAT_BADADDR, "\t%" PRIu64 " datagram%s with bad address in header\n");
    634 	p(IP_STAT_PFILDROP_IN, "\t%" PRIu64 " input packet%s dropped by pfil\n");
    635 	p(IP_STAT_PFILDROP_OUT, "\t%" PRIu64 " output packet%s dropped by pfil\n");
    636 	p(IP_STAT_IPSECDROP_IN, "\t%" PRIu64 " input packet%s dropped by IPsec\n");
    637 	p(IP_STAT_IPSECDROP_OUT, "\t%" PRIu64 " output packet%s dropped by IPsec\n");
    638 	p(IP_STAT_IFDROP, "\t%" PRIu64 " input packet%s dropped due to interface state\n");
    639 	p(IP_STAT_TIMXCEED, "\t%" PRIu64 " packet%s dropped due to TTL exceeded\n");
    640 	p(IP_STAT_IFNOADDR, "\t%" PRIu64 " output packet%s dropped (no IP address)\n");
    641 	p(IP_STAT_RTREJECT, "\t%" PRIu64 " output packet%s discarded due to reject route\n");
    642 	p(IP_STAT_BCASTDENIED, "\t%" PRIu64 " output packet%s dropped (broadcast prohibited)\n");
    643 #undef ps
    644 #undef p
    645 }
    646 
    647 /*
    648  * Dump ICMP statistics.
    649  */
    650 void
    651 icmp_stats(u_long off, const char *name)
    652 {
    653 	uint64_t icmpstat[ICMP_NSTATS];
    654 	int i, first;
    655 
    656 	if (use_sysctl) {
    657 		size_t size = sizeof(icmpstat);
    658 
    659 		if (prog_sysctlbyname("net.inet.icmp.stats", icmpstat, &size,
    660 				 NULL, 0) == -1 && errno != ENOMEM)
    661 			return;
    662 	} else {
    663 		warnx("%s stats not available via KVM.", name);
    664 		return;
    665 	}
    666 
    667 	printf("%s:\n", name);
    668 
    669 #define	p(f, m) if (icmpstat[f] || sflag <= 1) \
    670     printf(m, icmpstat[f], plural(icmpstat[f]))
    671 
    672 	p(ICMP_STAT_ERROR, "\t%" PRIu64 " call%s to icmp_error\n");
    673 	p(ICMP_STAT_OLDICMP,
    674 	    "\t%" PRIu64 " error%s not generated because old message was icmp\n");
    675 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    676 		if (icmpstat[ICMP_STAT_OUTHIST + i] != 0) {
    677 			if (first) {
    678 				printf("\tOutput histogram:\n");
    679 				first = 0;
    680 			}
    681 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    682 			   icmpstat[ICMP_STAT_OUTHIST + i]);
    683 		}
    684 	p(ICMP_STAT_BADCODE, "\t%" PRIu64 " message%s with bad code fields\n");
    685 	p(ICMP_STAT_TOOSHORT, "\t%" PRIu64 " message%s < minimum length\n");
    686 	p(ICMP_STAT_CHECKSUM, "\t%" PRIu64 " bad checksum%s\n");
    687 	p(ICMP_STAT_BADLEN, "\t%" PRIu64 " message%s with bad length\n");
    688 	p(ICMP_STAT_BMCASTECHO, "\t%" PRIu64 " multicast echo request%s ignored\n");
    689 	p(ICMP_STAT_BMCASTTSTAMP, "\t%" PRIu64 " multicast timestamp request%s ignored\n");
    690 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    691 		if (icmpstat[ICMP_STAT_INHIST + i] != 0) {
    692 			if (first) {
    693 				printf("\tInput histogram:\n");
    694 				first = 0;
    695 			}
    696 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    697 			    icmpstat[ICMP_STAT_INHIST + i]);
    698 		}
    699 	p(ICMP_STAT_REFLECT, "\t%" PRIu64 " message response%s generated\n");
    700 	p(ICMP_STAT_PMTUCHG, "\t%" PRIu64 " path MTU change%s\n");
    701 #undef p
    702 }
    703 
    704 /*
    705  * Dump IGMP statistics structure.
    706  */
    707 void
    708 igmp_stats(u_long off, const char *name)
    709 {
    710 	uint64_t igmpstat[IGMP_NSTATS];
    711 
    712 	if (use_sysctl) {
    713 		size_t size = sizeof(igmpstat);
    714 
    715 		if (prog_sysctlbyname("net.inet.igmp.stats", igmpstat, &size,
    716 				 NULL, 0) == -1 && errno != ENOMEM)
    717 			return;
    718 	} else {
    719 		warnx("%s stats not available via KVM.", name);
    720 		return;
    721 	}
    722 
    723 	printf("%s:\n", name);
    724 
    725 #define	p(f, m) if (igmpstat[f] || sflag <= 1) \
    726     printf(m, igmpstat[f], plural(igmpstat[f]))
    727 #define	py(f, m) if (igmpstat[f] || sflag <= 1) \
    728     printf(m, igmpstat[f], igmpstat[f] != 1 ? "ies" : "y")
    729 	p(IGMP_STAT_RCV_TOTAL, "\t%" PRIu64 " message%s received\n");
    730         p(IGMP_STAT_RCV_TOOSHORT, "\t%" PRIu64 " message%s received with too few bytes\n");
    731         p(IGMP_STAT_RCV_BADSUM, "\t%" PRIu64 " message%s received with bad checksum\n");
    732         py(IGMP_STAT_RCV_QUERIES, "\t%" PRIu64 " membership quer%s received\n");
    733         py(IGMP_STAT_RCV_BADQUERIES, "\t%" PRIu64 " membership quer%s received with invalid field(s)\n");
    734         p(IGMP_STAT_RCV_REPORTS, "\t%" PRIu64 " membership report%s received\n");
    735         p(IGMP_STAT_RCV_BADREPORTS, "\t%" PRIu64 " membership report%s received with invalid field(s)\n");
    736         p(IGMP_STAT_RCV_OURREPORTS, "\t%" PRIu64 " membership report%s received for groups to which we belong\n");
    737         p(IGMP_STAT_SND_REPORTS, "\t%" PRIu64 " membership report%s sent\n");
    738 #undef p
    739 #undef py
    740 }
    741 
    742 /*
    743  * Dump CARP statistics structure.
    744  */
    745 void
    746 carp_stats(u_long off, const char *name)
    747 {
    748 	uint64_t carpstat[CARP_NSTATS];
    749 
    750 	if (use_sysctl) {
    751 		size_t size = sizeof(carpstat);
    752 
    753 		if (prog_sysctlbyname("net.inet.carp.stats", carpstat, &size,
    754 				 NULL, 0) == -1 && errno != ENOMEM)
    755 			return;
    756 	} else {
    757 		warnx("%s stats not available via KVM.", name);
    758 		return;
    759 	}
    760 
    761 	printf("%s:\n", name);
    762 
    763 #define p(f, m) if (carpstat[f] || sflag <= 1) \
    764 	printf(m, carpstat[f], plural(carpstat[f]))
    765 #define p2(f, m) if (carpstat[f] || sflag <= 1) \
    766 	printf(m, carpstat[f])
    767 
    768 	p(CARP_STAT_IPACKETS, "\t%" PRIu64 " packet%s received (IPv4)\n");
    769 	p(CARP_STAT_IPACKETS6, "\t%" PRIu64 " packet%s received (IPv6)\n");
    770 	p(CARP_STAT_BADIF,
    771 	    "\t\t%" PRIu64 " packet%s discarded for bad interface\n");
    772 	p(CARP_STAT_BADTTL,
    773 	    "\t\t%" PRIu64 " packet%s discarded for wrong TTL\n");
    774 	p(CARP_STAT_HDROPS, "\t\t%" PRIu64 " packet%s shorter than header\n");
    775 	p(CARP_STAT_BADSUM, "\t\t%" PRIu64
    776 		" packet%s discarded for bad checksum\n");
    777 	p(CARP_STAT_BADVER,
    778 	    "\t\t%" PRIu64 " packet%s discarded with a bad version\n");
    779 	p2(CARP_STAT_BADLEN,
    780 	    "\t\t%" PRIu64 " discarded because packet was too short\n");
    781 	p(CARP_STAT_BADAUTH,
    782 	    "\t\t%" PRIu64 " packet%s discarded for bad authentication\n");
    783 	p(CARP_STAT_BADVHID, "\t\t%" PRIu64 " packet%s discarded for bad vhid\n");
    784 	p(CARP_STAT_BADADDRS, "\t\t%" PRIu64
    785 		" packet%s discarded because of a bad address list\n");
    786 	p(CARP_STAT_OPACKETS, "\t%" PRIu64 " packet%s sent (IPv4)\n");
    787 	p(CARP_STAT_OPACKETS6, "\t%" PRIu64 " packet%s sent (IPv6)\n");
    788 	p2(CARP_STAT_ONOMEM,
    789 	    "\t\t%" PRIu64 " send failed due to mbuf memory error\n");
    790 #undef p
    791 #undef p2
    792 }
    793 
    794 /*
    795  * Dump PIM statistics structure.
    796  */
    797 void
    798 pim_stats(u_long off, const char *name)
    799 {
    800 	struct pimstat pimstat;
    801 
    802 	if (off == 0)
    803 		return;
    804 	if (kread(off, (char *)&pimstat, sizeof (pimstat)) != 0) {
    805 		/* XXX: PIM is probably not enabled in the kernel */
    806 		return;
    807 	}
    808 
    809 	printf("%s:\n", name);
    810 
    811 #define	p(f, m) if (pimstat.f || sflag <= 1) \
    812 	printf(m, pimstat.f, plural(pimstat.f))
    813 
    814 	p(pims_rcv_total_msgs, "\t%" PRIu64 " message%s received\n");
    815 	p(pims_rcv_total_bytes, "\t%" PRIu64 " byte%s received\n");
    816 	p(pims_rcv_tooshort, "\t%" PRIu64 " message%s received with too few bytes\n");
    817         p(pims_rcv_badsum, "\t%" PRIu64 " message%s received with bad checksum\n");
    818 	p(pims_rcv_badversion, "\t%" PRIu64 " message%s received with bad version\n");
    819 	p(pims_rcv_registers_msgs, "\t%" PRIu64 " data register message%s received\n");
    820 	p(pims_rcv_registers_bytes, "\t%" PRIu64 " data register byte%s received\n");
    821 	p(pims_rcv_registers_wrongiif, "\t%" PRIu64 " data register message%s received on wrong iif\n");
    822 	p(pims_rcv_badregisters, "\t%" PRIu64 " bad register%s received\n");
    823 	p(pims_snd_registers_msgs, "\t%" PRIu64 " data register message%s sent\n");
    824 	p(pims_snd_registers_bytes, "\t%" PRIu64 " data register byte%s sent\n");
    825 #undef p
    826 }
    827 
    828 /*
    829  * Dump the ARP statistics structure.
    830  */
    831 void
    832 arp_stats(u_long off, const char *name)
    833 {
    834 	uint64_t arpstat[ARP_NSTATS];
    835 
    836 	if (use_sysctl) {
    837 		size_t size = sizeof(arpstat);
    838 
    839 		if (prog_sysctlbyname("net.inet.arp.stats", arpstat, &size,
    840 				 NULL, 0) == -1 && errno != ENOMEM)
    841 			return;
    842 	} else {
    843 		warnx("%s stats not available via KVM.", name);
    844 		return;
    845 	}
    846 
    847 	printf("%s:\n", name);
    848 
    849 #define	ps(f, m) if (arpstat[f] || sflag <= 1) \
    850     printf(m, arpstat[f])
    851 #define	p(f, m) if (arpstat[f] || sflag <= 1) \
    852     printf(m, arpstat[f], plural(arpstat[f]))
    853 
    854 	p(ARP_STAT_SNDTOTAL, "\t%" PRIu64 " packet%s sent\n");
    855 	p(ARP_STAT_SNDREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    856 	p(ARP_STAT_SENDREQUEST, "\t\t%" PRIu64 " request packet%s\n");
    857 
    858 	p(ARP_STAT_RCVTOTAL, "\t%" PRIu64 " packet%s received\n");
    859 	p(ARP_STAT_RCVREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    860 	p(ARP_STAT_RCVREQUEST, "\t\t%" PRIu64 " valid request packet%s\n");
    861 	p(ARP_STAT_RCVMCAST, "\t\t%" PRIu64 " broadcast/multicast packet%s\n");
    862 	p(ARP_STAT_RCVBADPROTO, "\t\t%" PRIu64 " packet%s with unknown protocol type\n");
    863 	p(ARP_STAT_RCVBADLEN, "\t\t%" PRIu64 " packet%s with bad (short) length\n");
    864 	p(ARP_STAT_RCVZEROTPA, "\t\t%" PRIu64 " packet%s with null target IP address\n");
    865 	p(ARP_STAT_RCVZEROSPA, "\t\t%" PRIu64 " packet%s with null source IP address\n");
    866 	ps(ARP_STAT_RCVNOINT, "\t\t%" PRIu64 " could not be mapped to an interface\n");
    867 	p(ARP_STAT_RCVLOCALSHA, "\t\t%" PRIu64 " packet%s sourced from a local hardware "
    868 	    "address\n");
    869 	p(ARP_STAT_RCVBCASTSHA, "\t\t%" PRIu64 " packet%s with a broadcast "
    870 	    "source hardware address\n");
    871 	p(ARP_STAT_RCVLOCALSPA, "\t\t%" PRIu64 " duplicate%s for a local IP address\n");
    872 	p(ARP_STAT_RCVOVERPERM, "\t\t%" PRIu64 " attempt%s to overwrite a static entry\n");
    873 	p(ARP_STAT_RCVOVERINT, "\t\t%" PRIu64 " packet%s received on wrong interface\n");
    874 	p(ARP_STAT_RCVOVER, "\t\t%" PRIu64 " entry%s overwritten\n");
    875 	p(ARP_STAT_RCVLENCHG, "\t\t%" PRIu64 " change%s in hardware address length\n");
    876 
    877 	p(ARP_STAT_DFRTOTAL, "\t%" PRIu64 " packet%s deferred pending ARP resolution\n");
    878 	ps(ARP_STAT_DFRSENT, "\t\t%" PRIu64 " sent\n");
    879 	ps(ARP_STAT_DFRDROPPED, "\t\t%" PRIu64 " dropped\n");
    880 
    881 	p(ARP_STAT_ALLOCFAIL, "\t%" PRIu64 " failure%s to allocate llinfo\n");
    882 
    883 #undef ps
    884 #undef p
    885 }
    886 
    887 /*
    888  * Pretty print an Internet address (net address + port).
    889  * Take numeric_addr and numeric_port into consideration.
    890  */
    891 void
    892 inetprint(struct in_addr *in, uint16_t port, const char *proto,
    893 	  int port_numeric)
    894 {
    895 	struct servent *sp = 0;
    896 	char line[80], *cp;
    897 	size_t space;
    898 
    899 	(void)snprintf(line, sizeof line, "%.*s.",
    900 	    (Aflag && !numeric_addr) ? 12 : 16, inetname(in));
    901 	cp = strchr(line, '\0');
    902 	if (!port_numeric && port)
    903 		sp = getservbyport((int)port, proto);
    904 	space = sizeof line - (cp-line);
    905 	if (sp || port == 0)
    906 		(void)snprintf(cp, space, "%s", sp ? sp->s_name : "*");
    907 	else
    908 		(void)snprintf(cp, space, "%u", ntohs(port));
    909 	(void)printf(" %-*.*s", width, width, line);
    910 }
    911 
    912 /*
    913  * Construct an Internet address representation.
    914  * If numeric_addr has been supplied, give
    915  * numeric value, otherwise try for symbolic name.
    916  */
    917 char *
    918 inetname(struct in_addr *inp)
    919 {
    920 	char *cp;
    921 	static char line[50];
    922 	struct hostent *hp;
    923 	struct netent *np;
    924 	static char domain[MAXHOSTNAMELEN + 1];
    925 	static int first = 1;
    926 
    927 	if (first && !numeric_addr) {
    928 		first = 0;
    929 		if (gethostname(domain, sizeof domain) == 0) {
    930 			domain[sizeof(domain) - 1] = '\0';
    931 			if ((cp = strchr(domain, '.')))
    932 				(void) strlcpy(domain, cp + 1, sizeof(domain));
    933 			else
    934 				domain[0] = 0;
    935 		} else
    936 			domain[0] = 0;
    937 	}
    938 	cp = 0;
    939 	if (!numeric_addr && inp->s_addr != INADDR_ANY) {
    940 		int net = inet_netof(*inp);
    941 		int lna = inet_lnaof(*inp);
    942 
    943 		if (lna == INADDR_ANY) {
    944 			np = getnetbyaddr(net, AF_INET);
    945 			if (np)
    946 				cp = np->n_name;
    947 		}
    948 		if (cp == 0) {
    949 			hp = gethostbyaddr((char *)inp, sizeof (*inp), AF_INET);
    950 			if (hp) {
    951 				if ((cp = strchr(hp->h_name, '.')) &&
    952 				    !strcmp(cp + 1, domain))
    953 					*cp = 0;
    954 				cp = hp->h_name;
    955 			}
    956 		}
    957 	}
    958 	if (inp->s_addr == INADDR_ANY)
    959 		strlcpy(line, "*", sizeof line);
    960 	else if (cp)
    961 		strlcpy(line, cp, sizeof line);
    962 	else {
    963 		inp->s_addr = ntohl(inp->s_addr);
    964 #define C(x)	((x) & 0xff)
    965 		(void)snprintf(line, sizeof line, "%u.%u.%u.%u",
    966 		    C(inp->s_addr >> 24), C(inp->s_addr >> 16),
    967 		    C(inp->s_addr >> 8), C(inp->s_addr));
    968 #undef C
    969 	}
    970 	return (line);
    971 }
    972 
    973 /*
    974  * Dump the contents of a TCP PCB.
    975  */
    976 void
    977 tcp_dump(u_long off, const char *name, u_long pcbaddr)
    978 {
    979 	callout_impl_t *ci;
    980 	struct tcpcb tcpcb;
    981 	int i, hardticks;
    982 	struct kinfo_pcb *pcblist;
    983 	size_t j, len;
    984 
    985 	if (use_sysctl)
    986 		pcblist = getpcblist_sysctl(name, &len);
    987 	else
    988 		pcblist = getpcblist_kmem(off, name, &len);
    989 
    990 	for (j = 0; j < len; j++)
    991 		if (pcblist[j].ki_ppcbaddr == pcbaddr)
    992 			break;
    993 	free(pcblist);
    994 
    995 	if (j == len)
    996 		errx(1, "0x%lx is not a valid pcb address", pcbaddr);
    997 
    998 	kread(pcbaddr, (char *)&tcpcb, sizeof(tcpcb));
    999 	hardticks = get_hardticks();
   1000 
   1001 	printf("TCP Protocol Control Block at 0x%08lx:\n\n", pcbaddr);
   1002 
   1003 	printf("Timers:\n");
   1004 	for (i = 0; i < TCPT_NTIMERS; i++) {
   1005 		char buf[128];
   1006 		ci = (callout_impl_t *)&tcpcb.t_timer[i];
   1007 		snprintb(buf, sizeof(buf), CALLOUT_FMT, ci->c_flags);
   1008 		printf("\t%s\t%s", tcptimers[i], buf);
   1009 		if (ci->c_flags & CALLOUT_PENDING)
   1010 			printf("\t%d\n", ci->c_time - hardticks);
   1011 		else
   1012 			printf("\n");
   1013 	}
   1014 	printf("\n\n");
   1015 
   1016 	if (tcpcb.t_state < 0 || tcpcb.t_state >= TCP_NSTATES)
   1017 		printf("State: %d", tcpcb.t_state);
   1018 	else
   1019 		printf("State: %s", tcpstates[tcpcb.t_state]);
   1020 	printf(", flags 0x%x, inpcb 0x%lx, in6pcb 0x%lx\n\n", tcpcb.t_flags,
   1021 	    (u_long)tcpcb.t_inpcb, (u_long)tcpcb.t_in6pcb);
   1022 
   1023 	printf("rxtshift %d, rxtcur %d, dupacks %d\n", tcpcb.t_rxtshift,
   1024 	    tcpcb.t_rxtcur, tcpcb.t_dupacks);
   1025         printf("peermss %u, ourmss %u, segsz %u, segqlen %u\n\n",
   1026 	    tcpcb.t_peermss, tcpcb.t_ourmss, tcpcb.t_segsz, tcpcb.t_segqlen);
   1027 
   1028 	printf("snd_una %u, snd_nxt %u, snd_up %u\n",
   1029 	    tcpcb.snd_una, tcpcb.snd_nxt, tcpcb.snd_up);
   1030 	printf("snd_wl1 %u, snd_wl2 %u, iss %u, snd_wnd %lu\n\n",
   1031 	    tcpcb.snd_wl1, tcpcb.snd_wl2, tcpcb.iss, tcpcb.snd_wnd);
   1032 
   1033 	printf("rcv_wnd %lu, rcv_nxt %u, rcv_up %u, irs %u\n\n",
   1034 	    tcpcb.rcv_wnd, tcpcb.rcv_nxt, tcpcb.rcv_up, tcpcb.irs);
   1035 
   1036 	printf("rcv_adv %u, snd_max %u, snd_cwnd %lu, snd_ssthresh %lu\n",
   1037 	    tcpcb.rcv_adv, tcpcb.snd_max, tcpcb.snd_cwnd, tcpcb.snd_ssthresh);
   1038 
   1039 	printf("rcvtime %u, rtttime %u, rtseq %u, srtt %d, rttvar %d, "
   1040 	    "rttmin %d, max_sndwnd %lu\n\n", tcpcb.t_rcvtime, tcpcb.t_rtttime,
   1041 	    tcpcb.t_rtseq, tcpcb.t_srtt, tcpcb.t_rttvar, tcpcb.t_rttmin,
   1042 	    tcpcb.max_sndwnd);
   1043 
   1044 	printf("oobflags %d, iobc %d, softerror %d\n\n", tcpcb.t_oobflags,
   1045 	    tcpcb.t_iobc, tcpcb.t_softerror);
   1046 
   1047 	printf("snd_scale %d, rcv_scale %d, req_r_scale %d, req_s_scale %d\n",
   1048 	    tcpcb.snd_scale, tcpcb.rcv_scale, tcpcb.request_r_scale,
   1049 	    tcpcb.requested_s_scale);
   1050 	printf("ts_recent %u, ts_regent_age %d, last_ack_sent %u\n",
   1051 	    tcpcb.ts_recent, tcpcb.ts_recent_age, tcpcb.last_ack_sent);
   1052 }
   1053