Home | History | Annotate | Line # | Download | only in netstat
inet.c revision 1.109.2.1
      1 /*	$NetBSD: inet.c,v 1.109.2.1 2019/08/19 15:56:49 martin 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.109.2.1 2019/08/19 15:56:49 martin 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)
    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)
    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)
    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_LOCALOUT, "\t%" PRIu64 " packet%s sent from this host\n");
    626 	p(IP_STAT_RAWOUT, "\t%" PRIu64 " packet%s sent with fabricated ip header\n");
    627 	p(IP_STAT_ODROPPED, "\t%" PRIu64 " output packet%s dropped due to no bufs, etc.\n");
    628 	p(IP_STAT_NOROUTE, "\t%" PRIu64 " output packet%s discarded due to no route\n");
    629 	p(IP_STAT_FRAGMENTED, "\t%" PRIu64 " output datagram%s fragmented\n");
    630 	p(IP_STAT_OFRAGMENTS, "\t%" PRIu64 " fragment%s created\n");
    631 	p(IP_STAT_CANTFRAG, "\t%" PRIu64 " datagram%s that can't be fragmented\n");
    632 	p(IP_STAT_BADADDR, "\t%" PRIu64 " datagram%s with bad address in header\n");
    633 	p(IP_STAT_PFILDROP_IN, "\t%" PRIu64 " input packet%s dropped by pfil\n");
    634 	p(IP_STAT_PFILDROP_OUT, "\t%" PRIu64 " output packet%s dropped by pfil\n");
    635 #undef ps
    636 #undef p
    637 }
    638 
    639 /*
    640  * Dump ICMP statistics.
    641  */
    642 void
    643 icmp_stats(u_long off, const char *name)
    644 {
    645 	uint64_t icmpstat[ICMP_NSTATS];
    646 	int i, first;
    647 
    648 	if (use_sysctl) {
    649 		size_t size = sizeof(icmpstat);
    650 
    651 		if (prog_sysctlbyname("net.inet.icmp.stats", icmpstat, &size,
    652 				 NULL, 0) == -1)
    653 			return;
    654 	} else {
    655 		warnx("%s stats not available via KVM.", name);
    656 		return;
    657 	}
    658 
    659 	printf("%s:\n", name);
    660 
    661 #define	p(f, m) if (icmpstat[f] || sflag <= 1) \
    662     printf(m, icmpstat[f], plural(icmpstat[f]))
    663 
    664 	p(ICMP_STAT_ERROR, "\t%" PRIu64 " call%s to icmp_error\n");
    665 	p(ICMP_STAT_OLDICMP,
    666 	    "\t%" PRIu64 " error%s not generated because old message was icmp\n");
    667 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    668 		if (icmpstat[ICMP_STAT_OUTHIST + i] != 0) {
    669 			if (first) {
    670 				printf("\tOutput histogram:\n");
    671 				first = 0;
    672 			}
    673 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    674 			   icmpstat[ICMP_STAT_OUTHIST + i]);
    675 		}
    676 	p(ICMP_STAT_BADCODE, "\t%" PRIu64 " message%s with bad code fields\n");
    677 	p(ICMP_STAT_TOOSHORT, "\t%" PRIu64 " message%s < minimum length\n");
    678 	p(ICMP_STAT_CHECKSUM, "\t%" PRIu64 " bad checksum%s\n");
    679 	p(ICMP_STAT_BADLEN, "\t%" PRIu64 " message%s with bad length\n");
    680 	p(ICMP_STAT_BMCASTECHO, "\t%" PRIu64 " multicast echo request%s ignored\n");
    681 	p(ICMP_STAT_BMCASTTSTAMP, "\t%" PRIu64 " multicast timestamp request%s ignored\n");
    682 	for (first = 1, i = 0; i < ICMP_MAXTYPE + 1; i++)
    683 		if (icmpstat[ICMP_STAT_INHIST + i] != 0) {
    684 			if (first) {
    685 				printf("\tInput histogram:\n");
    686 				first = 0;
    687 			}
    688 			printf("\t\t%s: %" PRIu64 "\n", icmp_type[i],
    689 			    icmpstat[ICMP_STAT_INHIST + i]);
    690 		}
    691 	p(ICMP_STAT_REFLECT, "\t%" PRIu64 " message response%s generated\n");
    692 	p(ICMP_STAT_PMTUCHG, "\t%" PRIu64 " path MTU change%s\n");
    693 #undef p
    694 }
    695 
    696 /*
    697  * Dump IGMP statistics structure.
    698  */
    699 void
    700 igmp_stats(u_long off, const char *name)
    701 {
    702 	uint64_t igmpstat[IGMP_NSTATS];
    703 
    704 	if (use_sysctl) {
    705 		size_t size = sizeof(igmpstat);
    706 
    707 		if (prog_sysctlbyname("net.inet.igmp.stats", igmpstat, &size,
    708 				 NULL, 0) == -1)
    709 			return;
    710 	} else {
    711 		warnx("%s stats not available via KVM.", name);
    712 		return;
    713 	}
    714 
    715 	printf("%s:\n", name);
    716 
    717 #define	p(f, m) if (igmpstat[f] || sflag <= 1) \
    718     printf(m, igmpstat[f], plural(igmpstat[f]))
    719 #define	py(f, m) if (igmpstat[f] || sflag <= 1) \
    720     printf(m, igmpstat[f], igmpstat[f] != 1 ? "ies" : "y")
    721 	p(IGMP_STAT_RCV_TOTAL, "\t%" PRIu64 " message%s received\n");
    722         p(IGMP_STAT_RCV_TOOSHORT, "\t%" PRIu64 " message%s received with too few bytes\n");
    723         p(IGMP_STAT_RCV_BADSUM, "\t%" PRIu64 " message%s received with bad checksum\n");
    724         py(IGMP_STAT_RCV_QUERIES, "\t%" PRIu64 " membership quer%s received\n");
    725         py(IGMP_STAT_RCV_BADQUERIES, "\t%" PRIu64 " membership quer%s received with invalid field(s)\n");
    726         p(IGMP_STAT_RCV_REPORTS, "\t%" PRIu64 " membership report%s received\n");
    727         p(IGMP_STAT_RCV_BADREPORTS, "\t%" PRIu64 " membership report%s received with invalid field(s)\n");
    728         p(IGMP_STAT_RCV_OURREPORTS, "\t%" PRIu64 " membership report%s received for groups to which we belong\n");
    729         p(IGMP_STAT_SND_REPORTS, "\t%" PRIu64 " membership report%s sent\n");
    730 #undef p
    731 #undef py
    732 }
    733 
    734 /*
    735  * Dump CARP statistics structure.
    736  */
    737 void
    738 carp_stats(u_long off, const char *name)
    739 {
    740 	uint64_t carpstat[CARP_NSTATS];
    741 
    742 	if (use_sysctl) {
    743 		size_t size = sizeof(carpstat);
    744 
    745 		if (prog_sysctlbyname("net.inet.carp.stats", carpstat, &size,
    746 				 NULL, 0) == -1)
    747 			return;
    748 	} else {
    749 		warnx("%s stats not available via KVM.", name);
    750 		return;
    751 	}
    752 
    753 	printf("%s:\n", name);
    754 
    755 #define p(f, m) if (carpstat[f] || sflag <= 1) \
    756 	printf(m, carpstat[f], plural(carpstat[f]))
    757 #define p2(f, m) if (carpstat[f] || sflag <= 1) \
    758 	printf(m, carpstat[f])
    759 
    760 	p(CARP_STAT_IPACKETS, "\t%" PRIu64 " packet%s received (IPv4)\n");
    761 	p(CARP_STAT_IPACKETS6, "\t%" PRIu64 " packet%s received (IPv6)\n");
    762 	p(CARP_STAT_BADIF,
    763 	    "\t\t%" PRIu64 " packet%s discarded for bad interface\n");
    764 	p(CARP_STAT_BADTTL,
    765 	    "\t\t%" PRIu64 " packet%s discarded for wrong TTL\n");
    766 	p(CARP_STAT_HDROPS, "\t\t%" PRIu64 " packet%s shorter than header\n");
    767 	p(CARP_STAT_BADSUM, "\t\t%" PRIu64
    768 		" packet%s discarded for bad checksum\n");
    769 	p(CARP_STAT_BADVER,
    770 	    "\t\t%" PRIu64 " packet%s discarded with a bad version\n");
    771 	p2(CARP_STAT_BADLEN,
    772 	    "\t\t%" PRIu64 " discarded because packet was too short\n");
    773 	p(CARP_STAT_BADAUTH,
    774 	    "\t\t%" PRIu64 " packet%s discarded for bad authentication\n");
    775 	p(CARP_STAT_BADVHID, "\t\t%" PRIu64 " packet%s discarded for bad vhid\n");
    776 	p(CARP_STAT_BADADDRS, "\t\t%" PRIu64
    777 		" packet%s discarded because of a bad address list\n");
    778 	p(CARP_STAT_OPACKETS, "\t%" PRIu64 " packet%s sent (IPv4)\n");
    779 	p(CARP_STAT_OPACKETS6, "\t%" PRIu64 " packet%s sent (IPv6)\n");
    780 	p2(CARP_STAT_ONOMEM,
    781 	    "\t\t%" PRIu64 " send failed due to mbuf memory error\n");
    782 #undef p
    783 #undef p2
    784 }
    785 
    786 /*
    787  * Dump PIM statistics structure.
    788  */
    789 void
    790 pim_stats(u_long off, const char *name)
    791 {
    792 	struct pimstat pimstat;
    793 
    794 	if (off == 0)
    795 		return;
    796 	if (kread(off, (char *)&pimstat, sizeof (pimstat)) != 0) {
    797 		/* XXX: PIM is probably not enabled in the kernel */
    798 		return;
    799 	}
    800 
    801 	printf("%s:\n", name);
    802 
    803 #define	p(f, m) if (pimstat.f || sflag <= 1) \
    804 	printf(m, pimstat.f, plural(pimstat.f))
    805 
    806 	p(pims_rcv_total_msgs, "\t%" PRIu64 " message%s received\n");
    807 	p(pims_rcv_total_bytes, "\t%" PRIu64 " byte%s received\n");
    808 	p(pims_rcv_tooshort, "\t%" PRIu64 " message%s received with too few bytes\n");
    809         p(pims_rcv_badsum, "\t%" PRIu64 " message%s received with bad checksum\n");
    810 	p(pims_rcv_badversion, "\t%" PRIu64 " message%s received with bad version\n");
    811 	p(pims_rcv_registers_msgs, "\t%" PRIu64 " data register message%s received\n");
    812 	p(pims_rcv_registers_bytes, "\t%" PRIu64 " data register byte%s received\n");
    813 	p(pims_rcv_registers_wrongiif, "\t%" PRIu64 " data register message%s received on wrong iif\n");
    814 	p(pims_rcv_badregisters, "\t%" PRIu64 " bad register%s received\n");
    815 	p(pims_snd_registers_msgs, "\t%" PRIu64 " data register message%s sent\n");
    816 	p(pims_snd_registers_bytes, "\t%" PRIu64 " data register byte%s sent\n");
    817 #undef p
    818 }
    819 
    820 /*
    821  * Dump the ARP statistics structure.
    822  */
    823 void
    824 arp_stats(u_long off, const char *name)
    825 {
    826 	uint64_t arpstat[ARP_NSTATS];
    827 
    828 	if (use_sysctl) {
    829 		size_t size = sizeof(arpstat);
    830 
    831 		if (prog_sysctlbyname("net.inet.arp.stats", arpstat, &size,
    832 				 NULL, 0) == -1)
    833 			return;
    834 	} else {
    835 		warnx("%s stats not available via KVM.", name);
    836 		return;
    837 	}
    838 
    839 	printf("%s:\n", name);
    840 
    841 #define	ps(f, m) if (arpstat[f] || sflag <= 1) \
    842     printf(m, arpstat[f])
    843 #define	p(f, m) if (arpstat[f] || sflag <= 1) \
    844     printf(m, arpstat[f], plural(arpstat[f]))
    845 
    846 	p(ARP_STAT_SNDTOTAL, "\t%" PRIu64 " packet%s sent\n");
    847 	p(ARP_STAT_SNDREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    848 	p(ARP_STAT_SENDREQUEST, "\t\t%" PRIu64 " request packet%s\n");
    849 
    850 	p(ARP_STAT_RCVTOTAL, "\t%" PRIu64 " packet%s received\n");
    851 	p(ARP_STAT_RCVREPLY, "\t\t%" PRIu64 " reply packet%s\n");
    852 	p(ARP_STAT_RCVREQUEST, "\t\t%" PRIu64 " valid request packet%s\n");
    853 	p(ARP_STAT_RCVMCAST, "\t\t%" PRIu64 " broadcast/multicast packet%s\n");
    854 	p(ARP_STAT_RCVBADPROTO, "\t\t%" PRIu64 " packet%s with unknown protocol type\n");
    855 	p(ARP_STAT_RCVBADLEN, "\t\t%" PRIu64 " packet%s with bad (short) length\n");
    856 	p(ARP_STAT_RCVZEROTPA, "\t\t%" PRIu64 " packet%s with null target IP address\n");
    857 	p(ARP_STAT_RCVZEROSPA, "\t\t%" PRIu64 " packet%s with null source IP address\n");
    858 	ps(ARP_STAT_RCVNOINT, "\t\t%" PRIu64 " could not be mapped to an interface\n");
    859 	p(ARP_STAT_RCVLOCALSHA, "\t\t%" PRIu64 " packet%s sourced from a local hardware "
    860 	    "address\n");
    861 	p(ARP_STAT_RCVBCASTSHA, "\t\t%" PRIu64 " packet%s with a broadcast "
    862 	    "source hardware address\n");
    863 	p(ARP_STAT_RCVLOCALSPA, "\t\t%" PRIu64 " duplicate%s for a local IP address\n");
    864 	p(ARP_STAT_RCVOVERPERM, "\t\t%" PRIu64 " attempt%s to overwrite a static entry\n");
    865 	p(ARP_STAT_RCVOVERINT, "\t\t%" PRIu64 " packet%s received on wrong interface\n");
    866 	p(ARP_STAT_RCVOVER, "\t\t%" PRIu64 " entry%s overwritten\n");
    867 	p(ARP_STAT_RCVLENCHG, "\t\t%" PRIu64 " change%s in hardware address length\n");
    868 
    869 	p(ARP_STAT_DFRTOTAL, "\t%" PRIu64 " packet%s deferred pending ARP resolution\n");
    870 	ps(ARP_STAT_DFRSENT, "\t\t%" PRIu64 " sent\n");
    871 	ps(ARP_STAT_DFRDROPPED, "\t\t%" PRIu64 " dropped\n");
    872 
    873 	p(ARP_STAT_ALLOCFAIL, "\t%" PRIu64 " failure%s to allocate llinfo\n");
    874 
    875 #undef ps
    876 #undef p
    877 }
    878 
    879 /*
    880  * Pretty print an Internet address (net address + port).
    881  * Take numeric_addr and numeric_port into consideration.
    882  */
    883 void
    884 inetprint(struct in_addr *in, uint16_t port, const char *proto,
    885 	  int port_numeric)
    886 {
    887 	struct servent *sp = 0;
    888 	char line[80], *cp;
    889 	size_t space;
    890 
    891 	(void)snprintf(line, sizeof line, "%.*s.",
    892 	    (Aflag && !numeric_addr) ? 12 : 16, inetname(in));
    893 	cp = strchr(line, '\0');
    894 	if (!port_numeric && port)
    895 		sp = getservbyport((int)port, proto);
    896 	space = sizeof line - (cp-line);
    897 	if (sp || port == 0)
    898 		(void)snprintf(cp, space, "%s", sp ? sp->s_name : "*");
    899 	else
    900 		(void)snprintf(cp, space, "%u", ntohs(port));
    901 	(void)printf(" %-*.*s", width, width, line);
    902 }
    903 
    904 /*
    905  * Construct an Internet address representation.
    906  * If numeric_addr has been supplied, give
    907  * numeric value, otherwise try for symbolic name.
    908  */
    909 char *
    910 inetname(struct in_addr *inp)
    911 {
    912 	char *cp;
    913 	static char line[50];
    914 	struct hostent *hp;
    915 	struct netent *np;
    916 	static char domain[MAXHOSTNAMELEN + 1];
    917 	static int first = 1;
    918 
    919 	if (first && !numeric_addr) {
    920 		first = 0;
    921 		if (gethostname(domain, sizeof domain) == 0) {
    922 			domain[sizeof(domain) - 1] = '\0';
    923 			if ((cp = strchr(domain, '.')))
    924 				(void) strlcpy(domain, cp + 1, sizeof(domain));
    925 			else
    926 				domain[0] = 0;
    927 		} else
    928 			domain[0] = 0;
    929 	}
    930 	cp = 0;
    931 	if (!numeric_addr && inp->s_addr != INADDR_ANY) {
    932 		int net = inet_netof(*inp);
    933 		int lna = inet_lnaof(*inp);
    934 
    935 		if (lna == INADDR_ANY) {
    936 			np = getnetbyaddr(net, AF_INET);
    937 			if (np)
    938 				cp = np->n_name;
    939 		}
    940 		if (cp == 0) {
    941 			hp = gethostbyaddr((char *)inp, sizeof (*inp), AF_INET);
    942 			if (hp) {
    943 				if ((cp = strchr(hp->h_name, '.')) &&
    944 				    !strcmp(cp + 1, domain))
    945 					*cp = 0;
    946 				cp = hp->h_name;
    947 			}
    948 		}
    949 	}
    950 	if (inp->s_addr == INADDR_ANY)
    951 		strlcpy(line, "*", sizeof line);
    952 	else if (cp)
    953 		strlcpy(line, cp, sizeof line);
    954 	else {
    955 		inp->s_addr = ntohl(inp->s_addr);
    956 #define C(x)	((x) & 0xff)
    957 		(void)snprintf(line, sizeof line, "%u.%u.%u.%u",
    958 		    C(inp->s_addr >> 24), C(inp->s_addr >> 16),
    959 		    C(inp->s_addr >> 8), C(inp->s_addr));
    960 #undef C
    961 	}
    962 	return (line);
    963 }
    964 
    965 /*
    966  * Dump the contents of a TCP PCB.
    967  */
    968 void
    969 tcp_dump(u_long off, const char *name, u_long pcbaddr)
    970 {
    971 	callout_impl_t *ci;
    972 	struct tcpcb tcpcb;
    973 	int i, hardticks;
    974 	struct kinfo_pcb *pcblist;
    975 	size_t j, len;
    976 
    977 	if (use_sysctl)
    978 		pcblist = getpcblist_sysctl(name, &len);
    979 	else
    980 		pcblist = getpcblist_kmem(off, name, &len);
    981 
    982 	for (j = 0; j < len; j++)
    983 		if (pcblist[j].ki_ppcbaddr == pcbaddr)
    984 			break;
    985 	free(pcblist);
    986 
    987 	if (j == len)
    988 		errx(1, "0x%lx is not a valid pcb address", pcbaddr);
    989 
    990 	kread(pcbaddr, (char *)&tcpcb, sizeof(tcpcb));
    991 	hardticks = get_hardticks();
    992 
    993 	printf("TCP Protocol Control Block at 0x%08lx:\n\n", pcbaddr);
    994 
    995 	printf("Timers:\n");
    996 	for (i = 0; i < TCPT_NTIMERS; i++) {
    997 		char buf[128];
    998 		ci = (callout_impl_t *)&tcpcb.t_timer[i];
    999 		snprintb(buf, sizeof(buf), CALLOUT_FMT, ci->c_flags);
   1000 		printf("\t%s\t%s", tcptimers[i], buf);
   1001 		if (ci->c_flags & CALLOUT_PENDING)
   1002 			printf("\t%d\n", ci->c_time - hardticks);
   1003 		else
   1004 			printf("\n");
   1005 	}
   1006 	printf("\n\n");
   1007 
   1008 	if (tcpcb.t_state < 0 || tcpcb.t_state >= TCP_NSTATES)
   1009 		printf("State: %d", tcpcb.t_state);
   1010 	else
   1011 		printf("State: %s", tcpstates[tcpcb.t_state]);
   1012 	printf(", flags 0x%x, inpcb 0x%lx, in6pcb 0x%lx\n\n", tcpcb.t_flags,
   1013 	    (u_long)tcpcb.t_inpcb, (u_long)tcpcb.t_in6pcb);
   1014 
   1015 	printf("rxtshift %d, rxtcur %d, dupacks %d\n", tcpcb.t_rxtshift,
   1016 	    tcpcb.t_rxtcur, tcpcb.t_dupacks);
   1017         printf("peermss %u, ourmss %u, segsz %u, segqlen %u\n\n",
   1018 	    tcpcb.t_peermss, tcpcb.t_ourmss, tcpcb.t_segsz, tcpcb.t_segqlen);
   1019 
   1020 	printf("snd_una %u, snd_nxt %u, snd_up %u\n",
   1021 	    tcpcb.snd_una, tcpcb.snd_nxt, tcpcb.snd_up);
   1022 	printf("snd_wl1 %u, snd_wl2 %u, iss %u, snd_wnd %lu\n\n",
   1023 	    tcpcb.snd_wl1, tcpcb.snd_wl2, tcpcb.iss, tcpcb.snd_wnd);
   1024 
   1025 	printf("rcv_wnd %lu, rcv_nxt %u, rcv_up %u, irs %u\n\n",
   1026 	    tcpcb.rcv_wnd, tcpcb.rcv_nxt, tcpcb.rcv_up, tcpcb.irs);
   1027 
   1028 	printf("rcv_adv %u, snd_max %u, snd_cwnd %lu, snd_ssthresh %lu\n",
   1029 	    tcpcb.rcv_adv, tcpcb.snd_max, tcpcb.snd_cwnd, tcpcb.snd_ssthresh);
   1030 
   1031 	printf("rcvtime %u, rtttime %u, rtseq %u, srtt %d, rttvar %d, "
   1032 	    "rttmin %d, max_sndwnd %lu\n\n", tcpcb.t_rcvtime, tcpcb.t_rtttime,
   1033 	    tcpcb.t_rtseq, tcpcb.t_srtt, tcpcb.t_rttvar, tcpcb.t_rttmin,
   1034 	    tcpcb.max_sndwnd);
   1035 
   1036 	printf("oobflags %d, iobc %d, softerror %d\n\n", tcpcb.t_oobflags,
   1037 	    tcpcb.t_iobc, tcpcb.t_softerror);
   1038 
   1039 	printf("snd_scale %d, rcv_scale %d, req_r_scale %d, req_s_scale %d\n",
   1040 	    tcpcb.snd_scale, tcpcb.rcv_scale, tcpcb.request_r_scale,
   1041 	    tcpcb.requested_s_scale);
   1042 	printf("ts_recent %u, ts_regent_age %d, last_ack_sent %u\n",
   1043 	    tcpcb.ts_recent, tcpcb.ts_recent_age, tcpcb.last_ack_sent);
   1044 }
   1045