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