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