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