Home | History | Annotate | Line # | Download | only in netstat
inet6.c revision 1.74
      1 /*	$NetBSD: inet6.c,v 1.74 2020/04/23 00:24:16 joerg Exp $	*/
      2 /*	BSDI inet.c,v 2.3 1995/10/24 02:19:29 prb Exp	*/
      3 
      4 /*
      5  * Copyright (C) 1995, 1996, 1997, 1998, and 1999 WIDE Project.
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. Neither the name of the project nor the names of its contributors
     17  *    may be used to endorse or promote products derived from this software
     18  *    without specific prior written permission.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
     21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
     24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     30  * SUCH DAMAGE.
     31  */
     32 
     33 /*
     34  * Copyright (c) 1983, 1988, 1993
     35  *	The Regents of the University of California.  All rights reserved.
     36  *
     37  * Redistribution and use in source and binary forms, with or without
     38  * modification, are permitted provided that the following conditions
     39  * are met:
     40  * 1. Redistributions of source code must retain the above copyright
     41  *    notice, this list of conditions and the following disclaimer.
     42  * 2. Redistributions in binary form must reproduce the above copyright
     43  *    notice, this list of conditions and the following disclaimer in the
     44  *    documentation and/or other materials provided with the distribution.
     45  * 3. Neither the name of the University nor the names of its contributors
     46  *    may be used to endorse or promote products derived from this software
     47  *    without specific prior written permission.
     48  *
     49  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     50  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     51  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     52  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     53  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     54  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     55  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     56  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     57  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     58  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     59  * SUCH DAMAGE.
     60  */
     61 
     62 #include <sys/cdefs.h>
     63 #ifndef lint
     64 #if 0
     65 static char sccsid[] = "@(#)inet.c	8.4 (Berkeley) 4/20/94";
     66 #else
     67 __RCSID("$NetBSD: inet6.c,v 1.74 2020/04/23 00:24:16 joerg Exp $");
     68 #endif
     69 #endif /* not lint */
     70 
     71 #define _CALLOUT_PRIVATE
     72 
     73 #include <sys/param.h>
     74 #include <sys/socket.h>
     75 #include <sys/socketvar.h>
     76 #include <sys/ioctl.h>
     77 #include <sys/mbuf.h>
     78 #include <sys/protosw.h>
     79 #include <sys/sysctl.h>
     80 
     81 #include <net/route.h>
     82 #include <net/if.h>
     83 #include <netinet/in.h>
     84 #include <netinet/ip6.h>
     85 #include <netinet/icmp6.h>
     86 #include <netinet/in_systm.h>
     87 #ifndef TCP6
     88 #include <netinet/ip.h>
     89 #include <netinet/ip_var.h>
     90 #endif
     91 #include <netinet6/ip6_var.h>
     92 #include <netinet6/in6_pcb.h>
     93 #include <netinet6/in6_var.h>
     94 #ifdef TCP6
     95 #include <netinet/tcp6.h>
     96 #include <netinet/tcp6_seq.h>
     97 #define TCP6STATES
     98 #include <netinet/tcp6_fsm.h>
     99 #define TCP6TIMERS
    100 #include <netinet/tcp6_timer.h>
    101 #include <netinet/tcp6_var.h>
    102 #include <netinet/tcp6_debug.h>
    103 #else
    104 #define TCP6T_NTIMERS	TCPT_NTIMERS
    105 #define tcp6timers tcptimers
    106 #define tcp6states tcpstates
    107 #define TCP6_NSTATES	TCP_NSTATES
    108 #define tcp6cb tcpcb
    109 #include <netinet/tcp.h>
    110 #include <netinet/tcp_seq.h>
    111 #include <netinet/tcp_fsm.h>
    112 extern const char * const tcpstates[];
    113 extern const char * const tcptimers[];
    114 #include <netinet/tcp_timer.h>
    115 #include <netinet/tcp_var.h>
    116 #include <netinet/tcp_debug.h>
    117 #endif /*TCP6*/
    118 #include <netinet6/udp6.h>
    119 #include <netinet6/udp6_var.h>
    120 #include <netinet6/pim6_var.h>
    121 #include <netinet6/raw_ip6.h>
    122 #include <netinet/tcp_vtw.h>
    123 
    124 #include <arpa/inet.h>
    125 #if 0
    126 #include "gethostbyname2.h"
    127 #endif
    128 #include <netdb.h>
    129 
    130 #include <err.h>
    131 #include <errno.h>
    132 #include <kvm.h>
    133 #include <stdio.h>
    134 #include <stdlib.h>
    135 #include <string.h>
    136 #include <unistd.h>
    137 #include <util.h>
    138 #include "netstat.h"
    139 #include "vtw.h"
    140 #include "prog_ops.h"
    141 
    142 #ifdef INET6
    143 
    144 struct	in6pcb in6pcb;
    145 #ifdef TCP6
    146 struct	tcp6cb tcp6cb;
    147 #else
    148 struct	tcpcb tcpcb;
    149 #endif
    150 
    151 char	*inet6name(const struct in6_addr *);
    152 void	inet6print(const struct in6_addr *, int, const char *);
    153 void	print_vtw_v6(const vtw_t *);
    154 
    155 /*
    156  * Print a summary of connections related to an Internet
    157  * protocol.  For TCP, also give state of connection.
    158  * Listening processes (aflag) are suppressed unless the
    159  * -a (all) flag is specified.
    160  */
    161 static int width;
    162 static int compact;
    163 
    164 /* VTW-related variables. */
    165 static struct timeval now;
    166 
    167 static void
    168 ip6protoprhdr(void)
    169 {
    170 
    171 	printf("Active Internet6 connections");
    172 
    173 	if (aflag)
    174 		printf(" (including servers)");
    175 	putchar('\n');
    176 
    177 	if (Aflag) {
    178 		printf("%-8.8s ", "PCB");
    179 		width = 18;
    180 	}
    181 	printf(
    182 	    Vflag ? "%-5.5s %-6.6s %-6.6s  %*.*s %*.*s %-13.13s Expires\n"
    183 	          : "%-5.5s %-6.6s %-6.6s  %*.*s %*.*s %s\n",
    184 	    "Proto", "Recv-Q", "Send-Q",
    185 	    -width, width, "Local Address",
    186 	    -width, width, "Foreign Address", "(state)");
    187 }
    188 
    189 static void
    190 ip6protopr0(intptr_t ppcb, u_long rcv_sb_cc, u_long snd_sb_cc,
    191 	const struct in6_addr *laddr, u_int16_t lport,
    192 	const struct in6_addr *faddr, u_int16_t fport,
    193 	short t_state, const char *name, const struct timeval *expires)
    194 {
    195 	static const char *shorttcpstates[] = {
    196 		"CLOSED",       "LISTEN",       "SYNSEN",       "SYSRCV",
    197 		"ESTABL",       "CLWAIT",       "FWAIT1",       "CLOSNG",
    198 		"LASTAK",       "FWAIT2",       "TMWAIT",
    199 	};
    200 	int istcp;
    201 
    202 	istcp = strcmp(name, "tcp6") == 0;
    203 	if (Aflag)
    204 		printf("%8" PRIxPTR " ", ppcb);
    205 
    206 	printf("%-5.5s %6ld %6ld%s", name, rcv_sb_cc, snd_sb_cc,
    207 	    compact ? "" : " ");
    208 
    209 	inet6print(laddr, (int)lport, name);
    210 	inet6print(faddr, (int)fport, name);
    211 	if (istcp) {
    212 #ifdef TCP6
    213 		if (t_state < 0 || t_state >= TCP6_NSTATES)
    214 			printf(" %d", t_state);
    215 		else
    216 			printf(" %s", tcp6states[t_state]);
    217 #else
    218 		if (t_state < 0 || t_state >= TCP_NSTATES)
    219 			printf(" %d", t_state);
    220 		else
    221 			printf(" %s", compact ? shorttcpstates[t_state] :
    222 			    tcpstates[t_state]);
    223 #endif
    224 	}
    225 	if (Vflag && expires != NULL) {
    226 		if (expires->tv_sec == 0 && expires->tv_usec == -1)
    227 			printf(" reclaimed");
    228 		else {
    229 			struct timeval delta;
    230 
    231 			timersub(expires, &now, &delta);
    232 			printf(" %.3fms",
    233 			    delta.tv_sec * 1000.0 + delta.tv_usec / 1000.0);
    234 		}
    235 	}
    236 	putchar('\n');
    237 }
    238 
    239 static void
    240 dbg_printf(const char *fmt, ...)
    241 {
    242 	return;
    243 }
    244 
    245 void
    246 print_vtw_v6(const vtw_t *vtw)
    247 {
    248 	const vtw_v6_t *v6 = (const vtw_v6_t *)vtw;
    249 	struct timeval delta;
    250 	char buf[2][128];
    251 	static const struct timeval zero = {.tv_sec = 0, .tv_usec = 0};
    252 
    253 	inet_ntop(AF_INET6, &v6->laddr, buf[0], sizeof(buf[0]));
    254 	inet_ntop(AF_INET6, &v6->faddr, buf[1], sizeof(buf[1]));
    255 
    256 	timersub(&vtw->expire, &now, &delta);
    257 
    258 	if (vtw->expire.tv_sec == 0 && vtw->expire.tv_usec == -1) {
    259 		dbg_printf("%15.15s:%d %15.15s:%d reclaimed\n"
    260 		    ,buf[0], ntohs(v6->lport)
    261 		    ,buf[1], ntohs(v6->fport));
    262 		if (!(Vflag && vflag))
    263 			return;
    264 	} else if (vtw->expire.tv_sec == 0)
    265 		return;
    266 	else if (timercmp(&delta, &zero, <) && !(Vflag && vflag)) {
    267 		dbg_printf("%15.15s:%d %15.15s:%d expired\n"
    268 		    ,buf[0], ntohs(v6->lport)
    269 		    ,buf[1], ntohs(v6->fport));
    270 		return;
    271 	} else {
    272 		dbg_printf("%15.15s:%d %15.15s:%d expires in %.3fms\n"
    273 		    ,buf[0], ntohs(v6->lport)
    274 		    ,buf[1], ntohs(v6->fport)
    275 		    ,delta.tv_sec * 1000.0 + delta.tv_usec / 1000.0);
    276 	}
    277 	ip6protopr0(0, 0, 0,
    278 		 &v6->laddr, v6->lport,
    279 		 &v6->faddr, v6->fport,
    280 		 TCPS_TIME_WAIT, "tcp6", &vtw->expire);
    281 }
    282 
    283 
    284 static struct kinfo_pcb *
    285 getpcblist_kmem(u_long off, const char *name, size_t *len)
    286 {
    287 	struct socket sockb;
    288 	struct inpcbtable table;
    289 	struct inpcb_hdr *next, *prev;
    290 	int istcp = strcmp(name, "tcp6") == 0;
    291 	struct kinfo_pcb *pcblist;
    292 	size_t size = 100, i;
    293 	struct sockaddr_in6 sin6;
    294 	struct inpcbqueue *head;
    295 
    296 	if (off == 0) {
    297 		*len = 0;
    298 		return NULL;
    299 	}
    300 	kread(off, (char *)&table, sizeof (table));
    301 	head = &table.inpt_queue;
    302 	next = TAILQ_FIRST(head);
    303 	prev = TAILQ_END(head);
    304 
    305 	if ((pcblist = malloc(size * sizeof(*pcblist))) == NULL)
    306 		err(1, "malloc");
    307 
    308 	i = 0;
    309 	while (next != TAILQ_END(head)) {
    310 		kread((u_long)next, (char *)&in6pcb, sizeof in6pcb);
    311 		next = TAILQ_NEXT(&in6pcb, in6p_queue);
    312 		prev = next;
    313 
    314 		if (in6pcb.in6p_af != AF_INET6)
    315 			continue;
    316 
    317 		kread((u_long)in6pcb.in6p_socket, (char *)&sockb,
    318 		    sizeof (sockb));
    319 		if (istcp) {
    320 #ifdef TCP6
    321 			kread((u_long)in6pcb.in6p_ppcb,
    322 			    (char *)&tcp6cb, sizeof (tcp6cb));
    323 #else
    324 			kread((u_long)in6pcb.in6p_ppcb,
    325 			    (char *)&tcpcb, sizeof (tcpcb));
    326 #endif
    327 		}
    328 		pcblist[i].ki_ppcbaddr =
    329 		    istcp ? (uintptr_t) in6pcb.in6p_ppcb : (uintptr_t) prev;
    330 		pcblist[i].ki_rcvq = (uint64_t)sockb.so_rcv.sb_cc;
    331 		pcblist[i].ki_sndq = (uint64_t)sockb.so_snd.sb_cc;
    332 		sin6.sin6_addr = in6pcb.in6p_laddr;
    333 		sin6.sin6_port = in6pcb.in6p_lport;
    334 		memcpy(&pcblist[i].ki_s, &sin6, sizeof(sin6));
    335 		sin6.sin6_addr = in6pcb.in6p_faddr;
    336 		sin6.sin6_port = in6pcb.in6p_fport;
    337 		memcpy(&pcblist[i].ki_d, &sin6, sizeof(sin6));
    338 		pcblist[i].ki_tstate = tcpcb.t_state;
    339 		if (i++ == size) {
    340 			size += 100;
    341 			struct kinfo_pcb *n = realloc(pcblist,
    342 			    size * sizeof(*pcblist));
    343 			if (n == NULL)
    344 				err(1, "realloc");
    345 			pcblist = n;
    346 		}
    347 	}
    348 	*len = i;
    349 	return pcblist;
    350 }
    351 
    352 void
    353 ip6protopr(u_long off, const char *name)
    354 {
    355 	struct kinfo_pcb *pcblist;
    356 	size_t i, len;
    357 	static int first = 1;
    358 
    359 	compact = 0;
    360 	if (Aflag) {
    361 		if (!numeric_addr)
    362 			width = 18;
    363 		else {
    364 			width = 21;
    365 			compact = 1;
    366 		}
    367 	} else
    368 		width = 22;
    369 
    370 	if (use_sysctl)
    371 		pcblist = getpcblist_sysctl(name, &len);
    372 	else
    373 		pcblist = getpcblist_kmem(off, name, &len);
    374 
    375 	for (i = 0; i < len; i++) {
    376 		struct sockaddr_in6 src, dst;
    377 
    378 		memcpy(&src, &pcblist[i].ki_s, sizeof(src));
    379 		memcpy(&dst, &pcblist[i].ki_d, sizeof(dst));
    380 
    381 		if (!aflag && IN6_IS_ADDR_UNSPECIFIED(&dst.sin6_addr))
    382 			continue;
    383 
    384 		if (first) {
    385 			ip6protoprhdr();
    386 			first = 0;
    387 		}
    388 
    389 		ip6protopr0((intptr_t) pcblist[i].ki_ppcbaddr,
    390 		    pcblist[i].ki_rcvq, pcblist[i].ki_sndq,
    391 		    &src.sin6_addr, src.sin6_port,
    392 		    &dst.sin6_addr, dst.sin6_port,
    393 		    pcblist[i].ki_tstate, name, NULL);
    394 	}
    395 
    396 	free(pcblist);
    397 
    398 	if (strcmp(name, "tcp6") == 0) {
    399 		struct timeval t;
    400 		timebase(&t);
    401 		gettimeofday(&now, NULL);
    402 		timersub(&now, &t, &now);
    403 		show_vtw_v6(print_vtw_v6);
    404 	}
    405 }
    406 
    407 #ifdef TCP6
    408 /*
    409  * Dump TCP6 statistics structure.
    410  */
    411 void
    412 tcp6_stats(u_long off, const char *name)
    413 {
    414 	struct tcp6stat tcp6stat;
    415 
    416 	if (use_sysctl) {
    417 		size_t size = sizeof(tcp6stat);
    418 
    419 		if (prog_sysctlbyname("net.inet6.tcp6.stats", &tcp6stat, &size,
    420 		    NULL, 0) == -1)
    421 			return;
    422 	} else {
    423 		warnx("%s stats not available via KVM.", name);
    424 		return;
    425 	}
    426 
    427 	printf ("%s:\n", name);
    428 
    429 #define	p(f, m) if (tcp6stat.f || sflag <= 1) \
    430     printf(m, tcp6stat.f, plural(tcp6stat.f))
    431 #define	p2(f1, f2, m) if (tcp6stat.f1 || tcp6stat.f2 || sflag <= 1) \
    432     printf(m, tcp6stat.f1, plural(tcp6stat.f1), tcp6stat.f2, plural(tcp6stat.f2))
    433 #define	p3(f, m) if (tcp6stat.f || sflag <= 1) \
    434     printf(m, tcp6stat.f, plurales(tcp6stat.f))
    435 
    436 	p(tcp6s_sndtotal, "\t%ld packet%s sent\n");
    437 	p2(tcp6s_sndpack,tcp6s_sndbyte,
    438 		"\t\t%ld data packet%s (%ld byte%s)\n");
    439 	p2(tcp6s_sndrexmitpack, tcp6s_sndrexmitbyte,
    440 		"\t\t%ld data packet%s (%ld byte%s) retransmitted\n");
    441 	p2(tcp6s_sndacks, tcp6s_delack,
    442 		"\t\t%ld ack-only packet%s (%ld packet%s delayed)\n");
    443 	p(tcp6s_sndurg, "\t\t%ld URG only packet%s\n");
    444 	p(tcp6s_sndprobe, "\t\t%ld window probe packet%s\n");
    445 	p(tcp6s_sndwinup, "\t\t%ld window update packet%s\n");
    446 	p(tcp6s_sndctrl, "\t\t%ld control packet%s\n");
    447 	p(tcp6s_rcvtotal, "\t%ld packet%s received\n");
    448 	p2(tcp6s_rcvackpack, tcp6s_rcvackbyte, "\t\t%ld ack%s (for %ld byte%s)\n");
    449 	p(tcp6s_rcvdupack, "\t\t%ld duplicate ack%s\n");
    450 	p(tcp6s_rcvacktoomuch, "\t\t%ld ack%s for unsent data\n");
    451 	p2(tcp6s_rcvpack, tcp6s_rcvbyte,
    452 		"\t\t%ld packet%s (%ld byte%s) received in-sequence\n");
    453 	p2(tcp6s_rcvduppack, tcp6s_rcvdupbyte,
    454 		"\t\t%ld completely duplicate packet%s (%ld byte%s)\n");
    455 	p(tcp6s_pawsdrop, "\t\t%ld old duplicate packet%s\n");
    456 	p2(tcp6s_rcvpartduppack, tcp6s_rcvpartdupbyte,
    457 		"\t\t%ld packet%s with some dup. data (%ld byte%s duped)\n");
    458 	p2(tcp6s_rcvoopack, tcp6s_rcvoobyte,
    459 		"\t\t%ld out-of-order packet%s (%ld byte%s)\n");
    460 	p2(tcp6s_rcvpackafterwin, tcp6s_rcvbyteafterwin,
    461 		"\t\t%ld packet%s (%ld byte%s) of data after window\n");
    462 	p(tcp6s_rcvwinprobe, "\t\t%ld window probe%s\n");
    463 	p(tcp6s_rcvwinupd, "\t\t%ld window update packet%s\n");
    464 	p(tcp6s_rcvafterclose, "\t\t%ld packet%s received after close\n");
    465 	p(tcp6s_rcvbadsum, "\t\t%ld discarded for bad checksum%s\n");
    466 	p(tcp6s_rcvbadoff, "\t\t%ld discarded for bad header offset field%s\n");
    467 	p(tcp6s_rcvshort, "\t\t%ld discarded because packet%s too short\n");
    468 	p(tcp6s_connattempt, "\t%ld connection request%s\n");
    469 	p(tcp6s_accepts, "\t%ld connection accept%s\n");
    470 	p(tcp6s_badsyn, "\t%ld bad connection attempt%s\n");
    471 	p(tcp6s_connects, "\t%ld connection%s established (including accepts)\n");
    472 	p2(tcp6s_closed, tcp6s_drops,
    473 		"\t%ld connection%s closed (including %ld drop%s)\n");
    474 	p(tcp6s_conndrops, "\t%ld embryonic connection%s dropped\n");
    475 	p2(tcp6s_rttupdated, tcp6s_segstimed,
    476 		"\t%ld segment%s updated rtt (of %ld attempt%s)\n");
    477 	p(tcp6s_rexmttimeo, "\t%ld retransmit timeout%s\n");
    478 	p(tcp6s_timeoutdrop, "\t\t%ld connection%s dropped by rexmit timeout\n");
    479 	p(tcp6s_persisttimeo, "\t%ld persist timeout%s\n");
    480 	p(tcp6s_persistdrop, "\t%ld connection%s timed out in persist\n");
    481 	p(tcp6s_keeptimeo, "\t%ld keepalive timeout%s\n");
    482 	p(tcp6s_keepprobe, "\t\t%ld keepalive probe%s sent\n");
    483 	p(tcp6s_keepdrops, "\t\t%ld connection%s dropped by keepalive\n");
    484 	p(tcp6s_predack, "\t%ld correct ACK header prediction%s\n");
    485 	p(tcp6s_preddat, "\t%ld correct data packet header prediction%s\n");
    486 	p3(tcp6s_pcbcachemiss, "\t%ld PCB cache miss%s\n");
    487 #undef p
    488 #undef p2
    489 #undef p3
    490 }
    491 #endif
    492 
    493 /*
    494  * Dump UDP6 statistics structure.
    495  */
    496 void
    497 udp6_stats(u_long off, const char *name)
    498 {
    499 	uint64_t udp6stat[UDP6_NSTATS];
    500 	u_quad_t delivered;
    501 
    502 	if (use_sysctl) {
    503 		size_t size = sizeof(udp6stat);
    504 
    505 		if (prog_sysctlbyname("net.inet6.udp6.stats", udp6stat, &size,
    506 		    NULL, 0) == -1)
    507 			return;
    508 	} else {
    509 		warnx("%s stats not available via KVM.", name);
    510 		return;
    511 	}
    512 	printf("%s:\n", name);
    513 #define	p(f, m) if (udp6stat[f] || sflag <= 1) \
    514     printf(m, (unsigned long long)udp6stat[f], plural(udp6stat[f]))
    515 #define	p1(f, m) if (udp6stat[f] || sflag <= 1) \
    516     printf(m, (unsigned long long)udp6stat[f])
    517 	p(UDP6_STAT_IPACKETS, "\t%llu datagram%s received\n");
    518 	p1(UDP6_STAT_HDROPS, "\t%llu with incomplete header\n");
    519 	p1(UDP6_STAT_BADLEN, "\t%llu with bad data length field\n");
    520 	p1(UDP6_STAT_BADSUM, "\t%llu with bad checksum\n");
    521 	p1(UDP6_STAT_NOSUM, "\t%llu with no checksum\n");
    522 	p1(UDP6_STAT_NOPORT, "\t%llu dropped due to no socket\n");
    523 	p(UDP6_STAT_NOPORTMCAST,
    524 	    "\t%llu multicast datagram%s dropped due to no socket\n");
    525 	p1(UDP6_STAT_FULLSOCK, "\t%llu dropped due to full socket buffers\n");
    526 	delivered = udp6stat[UDP6_STAT_IPACKETS] -
    527 		    udp6stat[UDP6_STAT_HDROPS] -
    528 		    udp6stat[UDP6_STAT_BADLEN] -
    529 		    udp6stat[UDP6_STAT_BADSUM] -
    530 		    udp6stat[UDP6_STAT_NOPORT] -
    531 		    udp6stat[UDP6_STAT_NOPORTMCAST] -
    532 		    udp6stat[UDP6_STAT_FULLSOCK];
    533 	if (delivered || sflag <= 1)
    534 		printf("\t%llu delivered\n", (unsigned long long)delivered);
    535 	p(UDP6_STAT_OPACKETS, "\t%llu datagram%s output\n");
    536 #undef p
    537 #undef p1
    538 }
    539 
    540 static	const char *ip6nh[] = {
    541 /*0*/	"hop by hop",
    542 	"ICMP",
    543 	"IGMP",
    544 	NULL,
    545 	"IP",
    546 /*5*/	NULL,
    547 	"TCP",
    548 	NULL,
    549 	NULL,
    550 	NULL,
    551 /*10*/	NULL, NULL, NULL, NULL, NULL,
    552 /*15*/	NULL,
    553 	NULL,
    554 	"UDP",
    555 	NULL,
    556 	NULL,
    557 /*20*/	NULL,
    558 	NULL,
    559 	"IDP",
    560 	NULL,
    561 	NULL,
    562 /*25*/	NULL,
    563 	NULL,
    564 	NULL,
    565 	NULL,
    566 	NULL,
    567 /*30*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    568 /*40*/	NULL,
    569 	"IP6",
    570 	NULL,
    571 	"routing",
    572 	"fragment",
    573 /*45*/	NULL, NULL, NULL, NULL, NULL,
    574 /*50*/	"ESP",
    575 	"AH",
    576 	NULL,
    577 	NULL,
    578 	NULL,
    579 /*55*/	NULL,
    580 	NULL,
    581 	NULL,
    582 	"ICMP6",
    583 	"no next header",
    584 /*60*/	"destination option",
    585 	NULL,
    586 	NULL,
    587 	NULL,
    588 	NULL,
    589 /*65*/	NULL, NULL, NULL, NULL, NULL,
    590 /*70*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    591 /*80*/	NULL,
    592 	NULL,
    593 	NULL,
    594 	NULL,
    595 	NULL,
    596 	NULL,
    597 	NULL,
    598 	NULL,
    599 	NULL,
    600 	"OSPF",
    601 /*90*/	NULL, NULL, NULL, NULL, NULL,
    602 /*95*/	NULL,
    603 	NULL,
    604 	"Ethernet",
    605 	NULL,
    606 	NULL,
    607 /*100*/	NULL,
    608 	NULL,
    609 	NULL,
    610 	"PIM",
    611 	NULL,
    612 /*105*/	NULL, NULL, NULL, NULL, NULL,
    613 /*110*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    614 /*120*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    615 /*130*/	NULL,
    616 	NULL,
    617 	"SCTP",
    618 	NULL,
    619 	NULL,
    620 /*135*/	NULL, NULL, NULL, NULL, NULL,
    621 /*140*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    622 	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    623 /*160*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    624 	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    625 /*180*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    626 	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    627 /*200*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    628 	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    629 /*220*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    630 	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    631 /*240*/	NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
    632 	NULL, NULL, NULL, NULL, NULL, NULL,
    633 };
    634 
    635 /*
    636  * Dump IP6 statistics structure.
    637  */
    638 void
    639 ip6_stats(u_long off, const char *name)
    640 {
    641 	uint64_t ip6stat[IP6_NSTATS];
    642 	int first, i;
    643 	struct protoent *ep;
    644 	const char *n;
    645 
    646 	if (use_sysctl) {
    647 		size_t size = sizeof(ip6stat);
    648 
    649 		if (prog_sysctlbyname("net.inet6.ip6.stats", ip6stat, &size,
    650 		    NULL, 0) == -1)
    651 			return;
    652 	} else {
    653 		warnx("%s stats not available via KVM.", name);
    654 		return;
    655 	}
    656 	printf("%s:\n", name);
    657 
    658 #define	p(f, m) if (ip6stat[f] || sflag <= 1) \
    659     printf(m, (unsigned long long)ip6stat[f], plural(ip6stat[f]))
    660 #define	p1(f, m) if (ip6stat[f] || sflag <= 1) \
    661     printf(m, (unsigned long long)ip6stat[f])
    662 
    663 	p(IP6_STAT_TOTAL, "\t%llu total packet%s received\n");
    664 	p1(IP6_STAT_TOOSMALL, "\t%llu with size smaller than minimum\n");
    665 	p1(IP6_STAT_TOOSHORT, "\t%llu with data size < data length\n");
    666 	p1(IP6_STAT_BADOPTIONS, "\t%llu with bad options\n");
    667 	p1(IP6_STAT_BADVERS, "\t%llu with incorrect version number\n");
    668 	p(IP6_STAT_FRAGMENTS, "\t%llu fragment%s received\n");
    669 	p(IP6_STAT_FRAGDROPPED,
    670 	    "\t%llu fragment%s dropped (dup or out of space)\n");
    671 	p(IP6_STAT_FRAGTIMEOUT, "\t%llu fragment%s dropped after timeout\n");
    672 	p(IP6_STAT_FRAGOVERFLOW, "\t%llu fragment%s that exceeded limit\n");
    673 	p(IP6_STAT_REASSEMBLED, "\t%llu packet%s reassembled ok\n");
    674 	p(IP6_STAT_DELIVERED, "\t%llu packet%s for this host\n");
    675 	p(IP6_STAT_FORWARD, "\t%llu packet%s forwarded\n");
    676 	p(IP6_STAT_FASTFORWARD, "\t%llu packet%s fast forwarded\n");
    677 	p1(IP6_STAT_FASTFORWARDFLOWS, "\t%llu fast forward flows\n");
    678 	p(IP6_STAT_CANTFORWARD, "\t%llu packet%s not forwardable\n");
    679 	p(IP6_STAT_REDIRECTSENT, "\t%llu redirect%s sent\n");
    680 	p(IP6_STAT_LOCALOUT, "\t%llu packet%s sent from this host\n");
    681 	p(IP6_STAT_RAWOUT, "\t%llu packet%s sent with fabricated ip header\n");
    682 	p(IP6_STAT_ODROPPED,
    683 	    "\t%llu output packet%s dropped due to no bufs, etc.\n");
    684 	p(IP6_STAT_NOROUTE, "\t%llu output packet%s discarded due to no route\n");
    685 	p(IP6_STAT_FRAGMENTED, "\t%llu output datagram%s fragmented\n");
    686 	p(IP6_STAT_OFRAGMENTS, "\t%llu fragment%s created\n");
    687 	p(IP6_STAT_CANTFRAG, "\t%llu datagram%s that can't be fragmented\n");
    688 	p(IP6_STAT_BADSCOPE, "\t%llu packet%s that violated scope rules\n");
    689 	p(IP6_STAT_NOTMEMBER, "\t%llu multicast packet%s which we don't join\n");
    690 	for (first = 1, i = 0; i < 256; i++)
    691 		if (ip6stat[IP6_STAT_NXTHIST + i] != 0) {
    692 			if (first) {
    693 				printf("\tInput packet histogram:\n");
    694 				first = 0;
    695 			}
    696 			n = NULL;
    697 			if (ip6nh[i])
    698 				n = ip6nh[i];
    699 			else if ((ep = getprotobynumber(i)) != NULL)
    700 				n = ep->p_name;
    701 			if (n)
    702 				printf("\t\t%s: %llu\n", n,
    703 				    (unsigned long long)ip6stat[IP6_STAT_NXTHIST + i]);
    704 			else
    705 				printf("\t\t#%d: %llu\n", i,
    706 				    (unsigned long long)ip6stat[IP6_STAT_NXTHIST + i]);
    707 		}
    708 	printf("\tMbuf statistics:\n");
    709 	p(IP6_STAT_M1, "\t\t%llu one mbuf%s\n");
    710 	for (first = 1, i = 0; i < 32; i++) {
    711 		char ifbuf[IFNAMSIZ];
    712 		if (ip6stat[IP6_STAT_M2M + i] != 0) {
    713 			if (first) {
    714 				printf("\t\ttwo or more mbuf:\n");
    715 				first = 0;
    716 			}
    717 			printf("\t\t\t%s = %llu\n",
    718 			       if_indextoname(i, ifbuf),
    719 			       (unsigned long long)ip6stat[IP6_STAT_M2M + i]);
    720 		}
    721 	}
    722 	p(IP6_STAT_MEXT1, "\t\t%llu one ext mbuf%s\n");
    723 	p(IP6_STAT_MEXT2M, "\t\t%llu two or more ext mbuf%s\n");
    724 	p(IP6_STAT_EXTHDRTOOLONG,
    725 	    "\t%llu packet%s whose headers are not continuous\n");
    726 	p(IP6_STAT_NOGIF, "\t%llu tunneling packet%s that can't find gif\n");
    727 	p(IP6_STAT_TOOMANYHDR,
    728 	    "\t%llu packet%s discarded due to too many headers\n");
    729 
    730 	/* for debugging source address selection */
    731 #define PRINT_SCOPESTAT(s,i) do {\
    732 		switch(i) { /* XXX hardcoding in each case */\
    733 		case 1:\
    734 			p(s, "\t\t%llu node-local%s\n");\
    735 			break;\
    736 		case 2:\
    737 			p(s, "\t\t%llu link-local%s\n");\
    738 			break;\
    739 		case 5:\
    740 			p(s, "\t\t%llu site-local%s\n");\
    741 			break;\
    742 		case 14:\
    743 			p(s, "\t\t%llu global%s\n");\
    744 			break;\
    745 		default:\
    746 			printf("\t\t%llu addresses scope=%x\n",\
    747 			       (unsigned long long)ip6stat[s], i);\
    748 		}\
    749 	} while(/*CONSTCOND*/0);
    750 
    751 	p(IP6_STAT_SOURCES_NONE,
    752 	  "\t%llu failure%s of source address selection\n");
    753 	for (first = 1, i = 0; i < 16; i++) {
    754 		if (ip6stat[IP6_STAT_SOURCES_SAMEIF + i]) {
    755 			if (first) {
    756 				printf("\tsource addresses on an outgoing I/F\n");
    757 				first = 0;
    758 			}
    759 			PRINT_SCOPESTAT(IP6_STAT_SOURCES_SAMEIF + i, i);
    760 		}
    761 	}
    762 	for (first = 1, i = 0; i < 16; i++) {
    763 		if (ip6stat[IP6_STAT_SOURCES_OTHERIF + i]) {
    764 			if (first) {
    765 				printf("\tsource addresses on a non-outgoing I/F\n");
    766 				first = 0;
    767 			}
    768 			PRINT_SCOPESTAT(IP6_STAT_SOURCES_OTHERIF + i, i);
    769 		}
    770 	}
    771 	for (first = 1, i = 0; i < 16; i++) {
    772 		if (ip6stat[IP6_STAT_SOURCES_SAMESCOPE + i]) {
    773 			if (first) {
    774 				printf("\tsource addresses of same scope\n");
    775 				first = 0;
    776 			}
    777 			PRINT_SCOPESTAT(IP6_STAT_SOURCES_SAMESCOPE + i, i);
    778 		}
    779 	}
    780 	for (first = 1, i = 0; i < 16; i++) {
    781 		if (ip6stat[IP6_STAT_SOURCES_OTHERSCOPE + i]) {
    782 			if (first) {
    783 				printf("\tsource addresses of a different scope\n");
    784 				first = 0;
    785 			}
    786 			PRINT_SCOPESTAT(IP6_STAT_SOURCES_OTHERSCOPE + i, i);
    787 		}
    788 	}
    789 	for (first = 1, i = 0; i < 16; i++) {
    790 		if (ip6stat[IP6_STAT_SOURCES_DEPRECATED + i]) {
    791 			if (first) {
    792 				printf("\tdeprecated source addresses\n");
    793 				first = 0;
    794 			}
    795 			PRINT_SCOPESTAT(IP6_STAT_SOURCES_DEPRECATED + i, i);
    796 		}
    797 	}
    798 
    799 	p1(IP6_STAT_FORWARD_CACHEHIT, "\t%llu forward cache hit\n");
    800 	p1(IP6_STAT_FORWARD_CACHEMISS, "\t%llu forward cache miss\n");
    801 	p(IP6_STAT_PFILDROP_IN, "\t%llu input packet%s dropped by pfil\n");
    802 	p(IP6_STAT_PFILDROP_OUT, "\t%llu output packet%s dropped by pfil\n");
    803 #undef p
    804 #undef p1
    805 }
    806 
    807 /*
    808  * Dump IPv6 per-interface statistics based on RFC 2465.
    809  */
    810 void
    811 ip6_ifstats(const char *ifname)
    812 {
    813 	struct in6_ifreq ifr;
    814 	int s;
    815 #define	p(f, m) if (ifr.ifr_ifru.ifru_stat.f || sflag <= 1) \
    816     printf(m, (unsigned long long)ifr.ifr_ifru.ifru_stat.f, \
    817 	plural(ifr.ifr_ifru.ifru_stat.f))
    818 #define	p_5(f, m) if (ifr.ifr_ifru.ifru_stat.f || sflag <= 1) \
    819     printf(m, (unsigned long long)ip6stat.f)
    820 
    821 	if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
    822 		perror("Warning: socket(AF_INET6)");
    823 		return;
    824 	}
    825 
    826 	strncpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
    827 	printf("ip6 on %s:\n", ifname);
    828 
    829 	if (ioctl(s, SIOCGIFSTAT_IN6, (char *)&ifr) < 0) {
    830 		perror("Warning: ioctl(SIOCGIFSTAT_IN6)");
    831 		goto end;
    832 	}
    833 
    834 	p(ifs6_in_receive, "\t%llu total input datagram%s\n");
    835 	p(ifs6_in_hdrerr, "\t%llu datagram%s with invalid header received\n");
    836 	p(ifs6_in_toobig, "\t%llu datagram%s exceeded MTU received\n");
    837 	p(ifs6_in_noroute, "\t%llu datagram%s with no route received\n");
    838 	p(ifs6_in_addrerr, "\t%llu datagram%s with invalid dst received\n");
    839 	p(ifs6_in_truncated, "\t%llu truncated datagram%s received\n");
    840 	p(ifs6_in_protounknown, "\t%llu datagram%s with unknown proto received\n");
    841 	p(ifs6_in_discard, "\t%llu input datagram%s discarded\n");
    842 	p(ifs6_in_deliver,
    843 	  "\t%llu datagram%s delivered to an upper layer protocol\n");
    844 	p(ifs6_out_forward, "\t%llu datagram%s forwarded to this interface\n");
    845 	p(ifs6_out_request,
    846 	  "\t%llu datagram%s sent from an upper layer protocol\n");
    847 	p(ifs6_out_discard, "\t%llu total discarded output datagram%s\n");
    848 	p(ifs6_out_fragok, "\t%llu output datagram%s fragmented\n");
    849 	p(ifs6_out_fragfail, "\t%llu output datagram%s failed on fragment\n");
    850 	p(ifs6_out_fragcreat, "\t%llu output datagram%s succeeded on fragment\n");
    851 	p(ifs6_reass_reqd, "\t%llu incoming datagram%s fragmented\n");
    852 	p(ifs6_reass_ok, "\t%llu datagram%s reassembled\n");
    853 	p(ifs6_reass_fail, "\t%llu datagram%s failed on reassembling\n");
    854 	p(ifs6_in_mcast, "\t%llu multicast datagram%s received\n");
    855 	p(ifs6_out_mcast, "\t%llu multicast datagram%s sent\n");
    856 
    857   end:
    858 	close(s);
    859 
    860 #undef p
    861 #undef p_5
    862 }
    863 
    864 static	const char *icmp6names[256] = {
    865 	"#0",
    866 	"unreach",
    867 	"packet too big",
    868 	"time exceed",
    869 	"parameter problem",
    870 	"#5",
    871 	"#6",
    872 	"#7",
    873 	"#8",
    874 	"#9",
    875 	"#10",
    876 	"#11",
    877 	"#12",
    878 	"#13",
    879 	"#14",
    880 	"#15",
    881 	"#16",
    882 	"#17",
    883 	"#18",
    884 	"#19",
    885 	"#20",
    886 	"#21",
    887 	"#22",
    888 	"#23",
    889 	"#24",
    890 	"#25",
    891 	"#26",
    892 	"#27",
    893 	"#28",
    894 	"#29",
    895 	"#30",
    896 	"#31",
    897 	"#32",
    898 	"#33",
    899 	"#34",
    900 	"#35",
    901 	"#36",
    902 	"#37",
    903 	"#38",
    904 	"#39",
    905 	"#40",
    906 	"#41",
    907 	"#42",
    908 	"#43",
    909 	"#44",
    910 	"#45",
    911 	"#46",
    912 	"#47",
    913 	"#48",
    914 	"#49",
    915 	"#50",
    916 	"#51",
    917 	"#52",
    918 	"#53",
    919 	"#54",
    920 	"#55",
    921 	"#56",
    922 	"#57",
    923 	"#58",
    924 	"#59",
    925 	"#60",
    926 	"#61",
    927 	"#62",
    928 	"#63",
    929 	"#64",
    930 	"#65",
    931 	"#66",
    932 	"#67",
    933 	"#68",
    934 	"#69",
    935 	"#70",
    936 	"#71",
    937 	"#72",
    938 	"#73",
    939 	"#74",
    940 	"#75",
    941 	"#76",
    942 	"#77",
    943 	"#78",
    944 	"#79",
    945 	"#80",
    946 	"#81",
    947 	"#82",
    948 	"#83",
    949 	"#84",
    950 	"#85",
    951 	"#86",
    952 	"#87",
    953 	"#88",
    954 	"#89",
    955 	"#80",
    956 	"#91",
    957 	"#92",
    958 	"#93",
    959 	"#94",
    960 	"#95",
    961 	"#96",
    962 	"#97",
    963 	"#98",
    964 	"#99",
    965 	"#100",
    966 	"#101",
    967 	"#102",
    968 	"#103",
    969 	"#104",
    970 	"#105",
    971 	"#106",
    972 	"#107",
    973 	"#108",
    974 	"#109",
    975 	"#110",
    976 	"#111",
    977 	"#112",
    978 	"#113",
    979 	"#114",
    980 	"#115",
    981 	"#116",
    982 	"#117",
    983 	"#118",
    984 	"#119",
    985 	"#120",
    986 	"#121",
    987 	"#122",
    988 	"#123",
    989 	"#124",
    990 	"#125",
    991 	"#126",
    992 	"#127",
    993 	"echo",
    994 	"echo reply",
    995 	"multicast listener query",
    996 	"multicast listener report",
    997 	"multicast listener done",
    998 	"router solicitation",
    999 	"router advertisement",
   1000 	"neighbor solicitation",
   1001 	"neighbor advertisement",
   1002 	"redirect",
   1003 	"router renumbering",
   1004 	"node information request",
   1005 	"node information reply",
   1006 	"#141",
   1007 	"#142",
   1008 	"multicast listener report (v2)",
   1009 	"home agent discovery request",
   1010 	"home agent discovery reply",
   1011 	"mobile prefix solicitation",
   1012 	"mobile prefix advertisement",
   1013 	"#148",
   1014 	"#149",
   1015 	"#150",
   1016 	"multicast router advertisement",
   1017 	"multicast router solicitation",
   1018 	"multicast router termination",
   1019 	"#154",
   1020 	"#155",
   1021 	"#156",
   1022 	"#157",
   1023 	"#158",
   1024 	"#159",
   1025 	"#160",
   1026 	"#161",
   1027 	"#162",
   1028 	"#163",
   1029 	"#164",
   1030 	"#165",
   1031 	"#166",
   1032 	"#167",
   1033 	"#168",
   1034 	"#169",
   1035 	"#170",
   1036 	"#171",
   1037 	"#172",
   1038 	"#173",
   1039 	"#174",
   1040 	"#175",
   1041 	"#176",
   1042 	"#177",
   1043 	"#178",
   1044 	"#179",
   1045 	"#180",
   1046 	"#181",
   1047 	"#182",
   1048 	"#183",
   1049 	"#184",
   1050 	"#185",
   1051 	"#186",
   1052 	"#187",
   1053 	"#188",
   1054 	"#189",
   1055 	"#180",
   1056 	"#191",
   1057 	"#192",
   1058 	"#193",
   1059 	"#194",
   1060 	"#195",
   1061 	"#196",
   1062 	"#197",
   1063 	"#198",
   1064 	"#199",
   1065 	"#200",
   1066 	"#201",
   1067 	"#202",
   1068 	"#203",
   1069 	"#204",
   1070 	"#205",
   1071 	"#206",
   1072 	"#207",
   1073 	"#208",
   1074 	"#209",
   1075 	"#210",
   1076 	"#211",
   1077 	"#212",
   1078 	"#213",
   1079 	"#214",
   1080 	"#215",
   1081 	"#216",
   1082 	"#217",
   1083 	"#218",
   1084 	"#219",
   1085 	"#220",
   1086 	"#221",
   1087 	"#222",
   1088 	"#223",
   1089 	"#224",
   1090 	"#225",
   1091 	"#226",
   1092 	"#227",
   1093 	"#228",
   1094 	"#229",
   1095 	"#230",
   1096 	"#231",
   1097 	"#232",
   1098 	"#233",
   1099 	"#234",
   1100 	"#235",
   1101 	"#236",
   1102 	"#237",
   1103 	"#238",
   1104 	"#239",
   1105 	"#240",
   1106 	"#241",
   1107 	"#242",
   1108 	"#243",
   1109 	"#244",
   1110 	"#245",
   1111 	"#246",
   1112 	"#247",
   1113 	"#248",
   1114 	"#249",
   1115 	"#250",
   1116 	"#251",
   1117 	"#252",
   1118 	"#253",
   1119 	"#254",
   1120 	"#255",
   1121 };
   1122 
   1123 /*
   1124  * Dump ICMPv6 statistics.
   1125  */
   1126 void
   1127 icmp6_stats(u_long off, const char *name)
   1128 {
   1129 	uint64_t icmp6stat[ICMP6_NSTATS];
   1130 	int i, first;
   1131 
   1132 	if (use_sysctl) {
   1133 		size_t size = sizeof(icmp6stat);
   1134 
   1135 		if (prog_sysctlbyname("net.inet6.icmp6.stats", icmp6stat, &size,
   1136 		    NULL, 0) == -1)
   1137 			return;
   1138 	} else {
   1139 		warnx("%s stats not available via KVM.", name);
   1140 		return;
   1141 	}
   1142 
   1143 	printf("%s:\n", name);
   1144 
   1145 #define	p(f, m) if (icmp6stat[f] || sflag <= 1) \
   1146     printf(m, (unsigned long long)icmp6stat[f], plural(icmp6stat[f]))
   1147 #define p_oerr(f, m) if (icmp6stat[ICMP6_STAT_OUTERRHIST + f] || sflag <= 1) \
   1148     printf(m, (unsigned long long)icmp6stat[ICMP6_STAT_OUTERRHIST + f])
   1149 
   1150 	p(ICMP6_STAT_ERROR, "\t%llu call%s to icmp6_error\n");
   1151 	p(ICMP6_STAT_CANTERROR,
   1152 	    "\t%llu error%s not generated because old message was icmp6 or so\n");
   1153 	p(ICMP6_STAT_TOOFREQ,
   1154 	    "\t%llu error%s not generated because of rate limitation\n");
   1155 	for (first = 1, i = 0; i < 256; i++)
   1156 		if (icmp6stat[ICMP6_STAT_OUTHIST + i] != 0) {
   1157 			if (first) {
   1158 				printf("\tOutput packet histogram:\n");
   1159 				first = 0;
   1160 			}
   1161 			printf("\t\t%s: %llu\n", icmp6names[i],
   1162 			 (unsigned long long)icmp6stat[ICMP6_STAT_OUTHIST + i]);
   1163 		}
   1164 	p(ICMP6_STAT_BADCODE, "\t%llu message%s with bad code fields\n");
   1165 	p(ICMP6_STAT_TOOSHORT, "\t%llu message%s < minimum length\n");
   1166 	p(ICMP6_STAT_CHECKSUM, "\t%llu bad checksum%s\n");
   1167 	p(ICMP6_STAT_BADLEN, "\t%llu message%s with bad length\n");
   1168 	for (first = 1, i = 0; i < ICMP6_MAXTYPE; i++)
   1169 		if (icmp6stat[ICMP6_STAT_INHIST + i] != 0) {
   1170 			if (first) {
   1171 				printf("\tInput packet histogram:\n");
   1172 				first = 0;
   1173 			}
   1174 			printf("\t\t%s: %llu\n", icmp6names[i],
   1175 			  (unsigned long long)icmp6stat[ICMP6_STAT_INHIST + i]);
   1176 		}
   1177 	printf("\tHistogram of error messages to be generated:\n");
   1178 	p_oerr(ICMP6_ERRSTAT_DST_UNREACH_NOROUTE, "\t\t%llu no route\n");
   1179 	p_oerr(ICMP6_ERRSTAT_DST_UNREACH_ADMIN, "\t\t%llu administratively prohibited\n");
   1180 	p_oerr(ICMP6_ERRSTAT_DST_UNREACH_BEYONDSCOPE, "\t\t%llu beyond scope\n");
   1181 	p_oerr(ICMP6_ERRSTAT_DST_UNREACH_ADDR, "\t\t%llu address unreachable\n");
   1182 	p_oerr(ICMP6_ERRSTAT_DST_UNREACH_NOPORT, "\t\t%llu port unreachable\n");
   1183 	p_oerr(ICMP6_ERRSTAT_PACKET_TOO_BIG, "\t\t%llu packet too big\n");
   1184 	p_oerr(ICMP6_ERRSTAT_TIME_EXCEED_TRANSIT, "\t\t%llu time exceed transit\n");
   1185 	p_oerr(ICMP6_ERRSTAT_TIME_EXCEED_REASSEMBLY, "\t\t%llu time exceed reassembly\n");
   1186 	p_oerr(ICMP6_ERRSTAT_PARAMPROB_HEADER, "\t\t%llu erroneous header field\n");
   1187 	p_oerr(ICMP6_ERRSTAT_PARAMPROB_NEXTHEADER, "\t\t%llu unrecognized next header\n");
   1188 	p_oerr(ICMP6_ERRSTAT_PARAMPROB_OPTION, "\t\t%llu unrecognized option\n");
   1189 	p_oerr(ICMP6_ERRSTAT_REDIRECT, "\t\t%llu redirect\n");
   1190 	p_oerr(ICMP6_ERRSTAT_UNKNOWN, "\t\t%llu unknown\n");
   1191 
   1192 	p(ICMP6_STAT_REFLECT, "\t%llu message response%s generated\n");
   1193 	p(ICMP6_STAT_ND_TOOMANYOPT, "\t%llu message%s with too many ND options\n");
   1194 	p(ICMP6_STAT_ND_BADOPT, "\t%llu message%s with bad ND options\n");
   1195 	p(ICMP6_STAT_BADNS, "\t%llu bad neighbor solicitation message%s\n");
   1196 	p(ICMP6_STAT_BADNA, "\t%llu bad neighbor advertisement message%s\n");
   1197 	p(ICMP6_STAT_BADRS, "\t%llu bad router solicitation message%s\n");
   1198 	p(ICMP6_STAT_BADRA, "\t%llu bad router advertisement message%s\n");
   1199 	p(ICMP6_STAT_DROPPED_RAROUTE, "\t%llu router advertisement route%s dropped\n");
   1200 	p(ICMP6_STAT_BADREDIRECT, "\t%llu bad redirect message%s\n");
   1201 	p(ICMP6_STAT_PMTUCHG, "\t%llu path MTU change%s\n");
   1202 #undef p
   1203 #undef p_oerr
   1204 }
   1205 
   1206 /*
   1207  * Dump ICMPv6 per-interface statistics based on RFC 2466.
   1208  */
   1209 void
   1210 icmp6_ifstats(const char *ifname)
   1211 {
   1212 	struct in6_ifreq ifr;
   1213 	int s;
   1214 #define	p(f, m) if (ifr.ifr_ifru.ifru_icmp6stat.f || sflag <= 1) \
   1215     printf(m, (unsigned long long)ifr.ifr_ifru.ifru_icmp6stat.f, \
   1216 	plural(ifr.ifr_ifru.ifru_icmp6stat.f))
   1217 
   1218 	if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
   1219 		perror("Warning: socket(AF_INET6)");
   1220 		return;
   1221 	}
   1222 
   1223 	strncpy(ifr.ifr_name, ifname, sizeof(ifr.ifr_name));
   1224 	printf("icmp6 on %s:\n", ifname);
   1225 
   1226 	if (ioctl(s, SIOCGIFSTAT_ICMP6, (char *)&ifr) < 0) {
   1227 		perror("Warning: ioctl(SIOCGIFSTAT_ICMP6)");
   1228 		goto end;
   1229 	}
   1230 
   1231 	p(ifs6_in_msg, "\t%llu total input message%s\n");
   1232 	p(ifs6_in_error, "\t%llu total input error message%s\n");
   1233 	p(ifs6_in_dstunreach, "\t%llu input destination unreachable error%s\n");
   1234 	p(ifs6_in_adminprohib, "\t%llu input administratively prohibited error%s\n");
   1235 	p(ifs6_in_timeexceed, "\t%llu input time exceeded error%s\n");
   1236 	p(ifs6_in_paramprob, "\t%llu input parameter problem error%s\n");
   1237 	p(ifs6_in_pkttoobig, "\t%llu input packet too big error%s\n");
   1238 	p(ifs6_in_echo, "\t%llu input echo request%s\n");
   1239 	p(ifs6_in_echoreply, "\t%llu input echo reply%s\n");
   1240 	p(ifs6_in_routersolicit, "\t%llu input router solicitation%s\n");
   1241 	p(ifs6_in_routeradvert, "\t%llu input router advertisement%s\n");
   1242 	p(ifs6_in_neighborsolicit, "\t%llu input neighbor solicitation%s\n");
   1243 	p(ifs6_in_neighboradvert, "\t%llu input neighbor advertisement%s\n");
   1244 	p(ifs6_in_redirect, "\t%llu input redirect%s\n");
   1245 	p(ifs6_in_mldquery, "\t%llu input MLD query%s\n");
   1246 	p(ifs6_in_mldreport, "\t%llu input MLD report%s\n");
   1247 	p(ifs6_in_mlddone, "\t%llu input MLD done%s\n");
   1248 
   1249 	p(ifs6_out_msg, "\t%llu total output message%s\n");
   1250 	p(ifs6_out_error, "\t%llu total output error message%s\n");
   1251 	p(ifs6_out_dstunreach, "\t%llu output destination unreachable error%s\n");
   1252 	p(ifs6_out_adminprohib, "\t%llu output administratively prohibited error%s\n");
   1253 	p(ifs6_out_timeexceed, "\t%llu output time exceeded error%s\n");
   1254 	p(ifs6_out_paramprob, "\t%llu output parameter problem error%s\n");
   1255 	p(ifs6_out_pkttoobig, "\t%llu output packet too big error%s\n");
   1256 	p(ifs6_out_echo, "\t%llu output echo request%s\n");
   1257 	p(ifs6_out_echoreply, "\t%llu output echo reply%s\n");
   1258 	p(ifs6_out_routersolicit, "\t%llu output router solicitation%s\n");
   1259 	p(ifs6_out_routeradvert, "\t%llu output router advertisement%s\n");
   1260 	p(ifs6_out_neighborsolicit, "\t%llu output neighbor solicitation%s\n");
   1261 	p(ifs6_out_neighboradvert, "\t%llu output neighbor advertisement%s\n");
   1262 	p(ifs6_out_redirect, "\t%llu output redirect%s\n");
   1263 	p(ifs6_out_mldquery, "\t%llu output MLD query%s\n");
   1264 	p(ifs6_out_mldreport, "\t%llu output MLD report%s\n");
   1265 	p(ifs6_out_mlddone, "\t%llu output MLD done%s\n");
   1266 
   1267   end:
   1268 	close(s);
   1269 #undef p
   1270 }
   1271 
   1272 /*
   1273  * Dump PIM statistics structure.
   1274  */
   1275 void
   1276 pim6_stats(u_long off, const char *name)
   1277 {
   1278 	uint64_t pim6stat[PIM6_NSTATS];
   1279 
   1280 	if (use_sysctl) {
   1281 		size_t size = sizeof(pim6stat);
   1282 
   1283 		if (prog_sysctlbyname("net.inet6.pim6.stats", pim6stat, &size,
   1284 		    NULL, 0) == -1)
   1285 			return;
   1286         } else {
   1287 		warnx("%s stats not available via KVM.", name);
   1288 		return;
   1289 	}
   1290 	printf("%s:\n", name);
   1291 
   1292 #define	p(f, m) if (pim6stat[f] || sflag <= 1) \
   1293     printf(m, (unsigned long long)pim6stat[f], plural(pim6stat[f]))
   1294 	p(PIM6_STAT_RCV_TOTAL, "\t%llu message%s received\n");
   1295 	p(PIM6_STAT_RCV_TOOSHORT, "\t%llu message%s received with too few bytes\n");
   1296 	p(PIM6_STAT_RCV_BADSUM, "\t%llu message%s received with bad checksum\n");
   1297 	p(PIM6_STAT_RCV_BADVERSION, "\t%llu message%s received with bad version\n");
   1298 	p(PIM6_STAT_RCV_REGISTERS, "\t%llu register%s received\n");
   1299 	p(PIM6_STAT_RCV_BADREGISTERS, "\t%llu bad register%s received\n");
   1300 	p(PIM6_STAT_SND_REGISTERS, "\t%llu register%s sent\n");
   1301 #undef p
   1302 }
   1303 
   1304 /*
   1305  * Dump raw ip6 statistics structure.
   1306  */
   1307 void
   1308 rip6_stats(u_long off, const char *name)
   1309 {
   1310 	uint64_t rip6stat[RIP6_NSTATS];
   1311 	u_quad_t delivered;
   1312 
   1313 	if (use_sysctl) {
   1314 		size_t size = sizeof(rip6stat);
   1315 
   1316 		if (prog_sysctlbyname("net.inet6.raw6.stats", rip6stat, &size,
   1317 		    NULL, 0) == -1)
   1318 			return;
   1319 	} else {
   1320 		warnx("%s stats not available via KVM.", name);
   1321 		return;
   1322 	}
   1323 	printf("%s:\n", name);
   1324 
   1325 #define	p(f, m) if (rip6stat[f] || sflag <= 1) \
   1326     printf(m, (unsigned long long)rip6stat[f], plural(rip6stat[f]))
   1327 	p(RIP6_STAT_IPACKETS, "\t%llu message%s received\n");
   1328 	p(RIP6_STAT_ISUM, "\t%llu checksum calculation%s on inbound\n");
   1329 	p(RIP6_STAT_BADSUM, "\t%llu message%s with bad checksum\n");
   1330 	p(RIP6_STAT_NOSOCK, "\t%llu message%s dropped due to no socket\n");
   1331 	p(RIP6_STAT_NOSOCKMCAST,
   1332 	    "\t%llu multicast message%s dropped due to no socket\n");
   1333 	p(RIP6_STAT_FULLSOCK,
   1334 	    "\t%llu message%s dropped due to full socket buffers\n");
   1335 	delivered = rip6stat[RIP6_STAT_IPACKETS] -
   1336 		    rip6stat[RIP6_STAT_BADSUM] -
   1337 		    rip6stat[RIP6_STAT_NOSOCK] -
   1338 		    rip6stat[RIP6_STAT_NOSOCKMCAST] -
   1339 		    rip6stat[RIP6_STAT_FULLSOCK];
   1340 	if (delivered || sflag <= 1)
   1341 		printf("\t%llu delivered\n", (unsigned long long)delivered);
   1342 	p(RIP6_STAT_OPACKETS, "\t%llu datagram%s output\n");
   1343 #undef p
   1344 }
   1345 
   1346 /*
   1347  * Pretty print an Internet address (net address + port).
   1348  * Take numeric_addr and numeric_port into consideration.
   1349  */
   1350 void
   1351 inet6print(const struct in6_addr *in6, int port, const char *proto)
   1352 {
   1353 #define GETSERVBYPORT6(port, proto, ret)\
   1354 do {\
   1355 	if (strcmp((proto), "tcp6") == 0)\
   1356 		(ret) = getservbyport((int)(port), "tcp");\
   1357 	else if (strcmp((proto), "udp6") == 0)\
   1358 		(ret) = getservbyport((int)(port), "udp");\
   1359 	else\
   1360 		(ret) = getservbyport((int)(port), (proto));\
   1361 } while (0)
   1362 	struct servent *sp = 0;
   1363 	char line[80], *cp;
   1364 	int lwidth;
   1365 
   1366 	lwidth = Aflag ? 12 : 16;
   1367 	if (vflag && lwidth < (int)strlen(inet6name(in6)))
   1368 		lwidth = strlen(inet6name(in6));
   1369 	snprintf(line, sizeof(line), "%.*s.", lwidth, inet6name(in6));
   1370 	cp = strchr(line, '\0');
   1371 	if (!numeric_port && port)
   1372 		GETSERVBYPORT6(port, proto, sp);
   1373 	if (sp || port == 0)
   1374 		snprintf(cp, sizeof(line) - (cp - line),
   1375 		    "%s", sp ? sp->s_name : "*");
   1376 	else
   1377 		snprintf(cp, sizeof(line) - (cp - line),
   1378 		    "%d", ntohs((u_short)port));
   1379 	lwidth = Aflag ? 18 : 22;
   1380 	if (vflag && lwidth < (int)strlen(line))
   1381 		lwidth = strlen(line);
   1382 	printf(" %-*.*s", lwidth, lwidth, line);
   1383 }
   1384 
   1385 /*
   1386  * Construct an Internet address representation.
   1387  * If the numeric_addr has been supplied, give
   1388  * numeric value, otherwise try for symbolic name.
   1389  */
   1390 
   1391 char *
   1392 inet6name(const struct in6_addr *in6p)
   1393 {
   1394 	char *cp;
   1395 	static char line[NI_MAXHOST];
   1396 	struct hostent *hp;
   1397 	static char domain[MAXHOSTNAMELEN + 1];
   1398 	static int first = 1;
   1399 	char hbuf[NI_MAXHOST];
   1400 	struct sockaddr_in6 sin6;
   1401 	const int niflag = NI_NUMERICHOST;
   1402 
   1403 	if (first && !numeric_addr) {
   1404 		first = 0;
   1405 		if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
   1406 		    (cp = strchr(domain, '.')))
   1407 			(void) strlcpy(domain, cp + 1, sizeof(domain));
   1408 		else
   1409 			domain[0] = 0;
   1410 	}
   1411 	cp = 0;
   1412 	if (!numeric_addr && !IN6_IS_ADDR_UNSPECIFIED(in6p)) {
   1413 		hp = gethostbyaddr((const char *)in6p, sizeof(*in6p), AF_INET6);
   1414 		if (hp) {
   1415 			if ((cp = strchr(hp->h_name, '.')) &&
   1416 			    !strcmp(cp + 1, domain))
   1417 				*cp = 0;
   1418 			cp = hp->h_name;
   1419 		}
   1420 	}
   1421 	if (IN6_IS_ADDR_UNSPECIFIED(in6p))
   1422 		strlcpy(line, "*", sizeof(line));
   1423 	else if (cp)
   1424 		strlcpy(line, cp, sizeof(line));
   1425 	else {
   1426 		memset(&sin6, 0, sizeof(sin6));
   1427 		sin6.sin6_len = sizeof(sin6);
   1428 		sin6.sin6_family = AF_INET6;
   1429 		sin6.sin6_addr = *in6p;
   1430 		inet6_getscopeid(&sin6, INET6_IS_ADDR_LINKLOCAL|
   1431 		    INET6_IS_ADDR_MC_LINKLOCAL);
   1432 		if (getnameinfo((struct sockaddr *)&sin6, sin6.sin6_len,
   1433 				hbuf, sizeof(hbuf), NULL, 0, niflag) != 0)
   1434 			strlcpy(hbuf, "?", sizeof(hbuf));
   1435 		strlcpy(line, hbuf, sizeof(line));
   1436 	}
   1437 	return (line);
   1438 }
   1439 
   1440 /*
   1441  * Dump the contents of a TCP6 PCB.
   1442  */
   1443 void
   1444 tcp6_dump(u_long off, const char *name, u_long pcbaddr)
   1445 {
   1446 	callout_impl_t *ci;
   1447 	int i, hardticks;
   1448 	struct kinfo_pcb *pcblist;
   1449 #ifdef TCP6
   1450 #define mypcb tcp6cb
   1451 #else
   1452 #define mypcb tcpcb
   1453 #endif
   1454 	size_t j, len;
   1455 
   1456 	if (use_sysctl)
   1457 		pcblist = getpcblist_sysctl(name, &len);
   1458 	else
   1459 		pcblist = getpcblist_kmem(off, name, &len);
   1460 
   1461 	for (j = 0; j < len; j++)
   1462 		if (pcblist[j].ki_ppcbaddr == pcbaddr)
   1463 			break;
   1464 	free(pcblist);
   1465 
   1466 	if (j == len)
   1467 		errx(1, "0x%lx is not a valid pcb address", pcbaddr);
   1468 
   1469 	kread(pcbaddr, (char *)&mypcb, sizeof(mypcb));
   1470 	hardticks = get_hardticks();
   1471 
   1472 	printf("TCP Protocol Control Block at 0x%08lx:\n\n", pcbaddr);
   1473 	printf("Timers:\n");
   1474 	for (i = 0; i < TCP6T_NTIMERS; i++) {
   1475 		char buf[128];
   1476 		ci = (callout_impl_t *)&tcpcb.t_timer[i];
   1477 		snprintb(buf, sizeof(buf), CALLOUT_FMT, ci->c_flags);
   1478 		printf("\t%s\t%s", tcptimers[i], buf);
   1479 		if (ci->c_flags & CALLOUT_PENDING)
   1480 			printf("\t%d\n", ci->c_time - hardticks);
   1481 		else
   1482 			printf("\n");
   1483 	}
   1484 	printf("\n\n");
   1485 
   1486 	if (mypcb.t_state < 0 || mypcb.t_state >= TCP6_NSTATES)
   1487 		printf("State: %d", mypcb.t_state);
   1488 	else
   1489 		printf("State: %s", tcp6states[mypcb.t_state]);
   1490 	printf(", flags 0x%x, in6pcb 0x%lx\n\n", mypcb.t_flags,
   1491 	    (u_long)mypcb.t_in6pcb);
   1492 
   1493 	printf("rxtshift %d, rxtcur %d, dupacks %d\n", mypcb.t_rxtshift,
   1494 	    mypcb.t_rxtcur, mypcb.t_dupacks);
   1495 #ifdef TCP6
   1496 	printf("peermaxseg %u, maxseg %u, force %d\n\n", mypcb.t_peermaxseg,
   1497 	    mypcb.t_maxseg, mypcb.t_force);
   1498 #else
   1499         printf("peermss %u, ourmss %u, segsz %u, segqlen %u\n\n",
   1500 	    tcpcb.t_peermss, tcpcb.t_ourmss, tcpcb.t_segsz, tcpcb.t_segqlen);
   1501 #endif
   1502 
   1503 	printf("snd_una %u, snd_nxt %u, snd_up %u\n",
   1504 	    mypcb.snd_una, mypcb.snd_nxt, mypcb.snd_up);
   1505 	printf("snd_wl1 %u, snd_wl2 %u, iss %u, snd_wnd %llu\n\n",
   1506 	    mypcb.snd_wl1, mypcb.snd_wl2, mypcb.iss,
   1507 	    (unsigned long long)mypcb.snd_wnd);
   1508 
   1509 	printf("rcv_wnd %llu, rcv_nxt %u, rcv_up %u, irs %u\n\n",
   1510 	    (unsigned long long)mypcb.rcv_wnd, mypcb.rcv_nxt,
   1511 	    mypcb.rcv_up, mypcb.irs);
   1512 
   1513 	printf("rcv_adv %u, snd_max %u, snd_cwnd %llu, snd_ssthresh %llu\n",
   1514 	    mypcb.rcv_adv, mypcb.snd_max, (unsigned long long)mypcb.snd_cwnd,
   1515 	    (unsigned long long)mypcb.snd_ssthresh);
   1516 
   1517 #ifdef TCP6
   1518 	printf("idle %d, rtt %d, " mypcb.t_idle, mypcb.t_rtt);
   1519 #else
   1520 	printf("rcvtime %u, rtttime %u, ", tcpcb.t_rcvtime, tcpcb.t_rtttime);
   1521 #endif
   1522 
   1523 	printf("rtseq %u, srtt %d, rttvar %d, rttmin %d, "
   1524 	    "max_sndwnd %llu\n\n", mypcb.t_rtseq,
   1525 	    mypcb.t_srtt, mypcb.t_rttvar, mypcb.t_rttmin,
   1526 	    (unsigned long long)mypcb.max_sndwnd);
   1527 
   1528 	printf("oobflags %d, iobc %d, softerror %d\n\n", mypcb.t_oobflags,
   1529 	    mypcb.t_iobc, mypcb.t_softerror);
   1530 
   1531 	printf("snd_scale %d, rcv_scale %d, req_r_scale %d, req_s_scale %d\n",
   1532 	    mypcb.snd_scale, mypcb.rcv_scale, mypcb.request_r_scale,
   1533 	    mypcb.requested_s_scale);
   1534 	printf("ts_recent %u, ts_regent_age %d, last_ack_sent %u\n",
   1535 	    mypcb.ts_recent, mypcb.ts_recent_age, mypcb.last_ack_sent);
   1536 }
   1537 
   1538 #endif /*INET6*/
   1539