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