xref: /dragonfly/usr.bin/netstat/inet6.c (revision 0bb9290e)
1 /*	BSDI inet.c,v 2.3 1995/10/24 02:19:29 prb Exp	*/
2 /*
3  * Copyright (c) 1983, 1988, 1993
4  *	The Regents of the University of California.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by the University of
17  *	California, Berkeley and its contributors.
18  * 4. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  *
34  * $FreeBSD: src/usr.bin/netstat/inet6.c,v 1.3.2.11 2001/09/17 14:53:17 ru Exp $
35  * $DragonFly: src/usr.bin/netstat/inet6.c,v 1.7 2006/05/21 03:43:47 dillon Exp $
36  *
37  * @(#)inet6.c	8.4 (Berkeley) 4/20/94
38  */
39 
40 #ifdef INET6
41 #define _KERNEL_STRUCTURES
42 #include <sys/param.h>
43 #include <sys/socket.h>
44 #include <sys/socketvar.h>
45 #include <sys/ioctl.h>
46 #include <sys/mbuf.h>
47 #include <sys/protosw.h>
48 #include <sys/sysctl.h>
49 
50 #include <net/route.h>
51 #include <net/if.h>
52 #include <net/if_var.h>
53 #include <netinet/in.h>
54 #include <netinet/ip6.h>
55 #include <netinet/icmp6.h>
56 #include <netinet/in_systm.h>
57 #include <netinet6/in6_pcb.h>
58 #include <netinet6/in6_var.h>
59 #include <netinet6/ip6_var.h>
60 #include <netinet6/pim6_var.h>
61 #include <netinet6/raw_ip6.h>
62 
63 #include <arpa/inet.h>
64 #include <netdb.h>
65 #include <errno.h>
66 
67 #include <stdio.h>
68 #include <string.h>
69 #include <unistd.h>
70 #include "netstat.h"
71 
72 struct	socket sockb;
73 
74 char	*inet6name (struct in6_addr *);
75 void	inet6print (struct in6_addr *, int, char *, int);
76 
77 static char ntop_buf[INET6_ADDRSTRLEN];
78 
79 static	char *ip6nh[] = {
80 	"hop by hop",
81 	"ICMP",
82 	"IGMP",
83 	"#3",
84 	"IP",
85 	"#5",
86 	"TCP",
87 	"#7",
88 	"#8",
89 	"#9",
90 	"#10",
91 	"#11",
92 	"#12",
93 	"#13",
94 	"#14",
95 	"#15",
96 	"#16",
97 	"UDP",
98 	"#18",
99 	"#19",
100 	"#20",
101 	"#21",
102 	"IDP",
103 	"#23",
104 	"#24",
105 	"#25",
106 	"#26",
107 	"#27",
108 	"#28",
109 	"TP",
110 	"#30",
111 	"#31",
112 	"#32",
113 	"#33",
114 	"#34",
115 	"#35",
116 	"#36",
117 	"#37",
118 	"#38",
119 	"#39",
120 	"#40",
121 	"IP6",
122 	"#42",
123 	"routing",
124 	"fragment",
125 	"#45",
126 	"#46",
127 	"#47",
128 	"#48",
129 	"#49",
130 	"ESP",
131 	"AH",
132 	"#52",
133 	"#53",
134 	"#54",
135 	"#55",
136 	"#56",
137 	"#57",
138 	"ICMP6",
139 	"no next header",
140 	"destination option",
141 	"#61",
142 	"#62",
143 	"#63",
144 	"#64",
145 	"#65",
146 	"#66",
147 	"#67",
148 	"#68",
149 	"#69",
150 	"#70",
151 	"#71",
152 	"#72",
153 	"#73",
154 	"#74",
155 	"#75",
156 	"#76",
157 	"#77",
158 	"#78",
159 	"#79",
160 	"ISOIP",
161 	"#81",
162 	"#82",
163 	"#83",
164 	"#84",
165 	"#85",
166 	"#86",
167 	"#87",
168 	"#88",
169 	"OSPF",
170 	"#80",
171 	"#91",
172 	"#92",
173 	"#93",
174 	"#94",
175 	"#95",
176 	"#96",
177 	"Ethernet",
178 	"#98",
179 	"#99",
180 	"#100",
181 	"#101",
182 	"#102",
183 	"PIM",
184 	"#104",
185 	"#105",
186 	"#106",
187 	"#107",
188 	"#108",
189 	"#109",
190 	"#110",
191 	"#111",
192 	"#112",
193 	"#113",
194 	"#114",
195 	"#115",
196 	"#116",
197 	"#117",
198 	"#118",
199 	"#119",
200 	"#120",
201 	"#121",
202 	"#122",
203 	"#123",
204 	"#124",
205 	"#125",
206 	"#126",
207 	"#127",
208 	"#128",
209 	"#129",
210 	"#130",
211 	"#131",
212 	"#132",
213 	"#133",
214 	"#134",
215 	"#135",
216 	"#136",
217 	"#137",
218 	"#138",
219 	"#139",
220 	"#140",
221 	"#141",
222 	"#142",
223 	"#143",
224 	"#144",
225 	"#145",
226 	"#146",
227 	"#147",
228 	"#148",
229 	"#149",
230 	"#150",
231 	"#151",
232 	"#152",
233 	"#153",
234 	"#154",
235 	"#155",
236 	"#156",
237 	"#157",
238 	"#158",
239 	"#159",
240 	"#160",
241 	"#161",
242 	"#162",
243 	"#163",
244 	"#164",
245 	"#165",
246 	"#166",
247 	"#167",
248 	"#168",
249 	"#169",
250 	"#170",
251 	"#171",
252 	"#172",
253 	"#173",
254 	"#174",
255 	"#175",
256 	"#176",
257 	"#177",
258 	"#178",
259 	"#179",
260 	"#180",
261 	"#181",
262 	"#182",
263 	"#183",
264 	"#184",
265 	"#185",
266 	"#186",
267 	"#187",
268 	"#188",
269 	"#189",
270 	"#180",
271 	"#191",
272 	"#192",
273 	"#193",
274 	"#194",
275 	"#195",
276 	"#196",
277 	"#197",
278 	"#198",
279 	"#199",
280 	"#200",
281 	"#201",
282 	"#202",
283 	"#203",
284 	"#204",
285 	"#205",
286 	"#206",
287 	"#207",
288 	"#208",
289 	"#209",
290 	"#210",
291 	"#211",
292 	"#212",
293 	"#213",
294 	"#214",
295 	"#215",
296 	"#216",
297 	"#217",
298 	"#218",
299 	"#219",
300 	"#220",
301 	"#221",
302 	"#222",
303 	"#223",
304 	"#224",
305 	"#225",
306 	"#226",
307 	"#227",
308 	"#228",
309 	"#229",
310 	"#230",
311 	"#231",
312 	"#232",
313 	"#233",
314 	"#234",
315 	"#235",
316 	"#236",
317 	"#237",
318 	"#238",
319 	"#239",
320 	"#240",
321 	"#241",
322 	"#242",
323 	"#243",
324 	"#244",
325 	"#245",
326 	"#246",
327 	"#247",
328 	"#248",
329 	"#249",
330 	"#250",
331 	"#251",
332 	"#252",
333 	"#253",
334 	"#254",
335 	"#255",
336 };
337 
338 /*
339  * Dump IP6 statistics structure.
340  */
341 void
342 ip6_stats(u_long off __unused, char *name, int af __unused)
343 {
344 	struct ip6stat ip6stat;
345 	int first, i;
346 	int mib[4];
347 	size_t len;
348 
349 	mib[0] = CTL_NET;
350 	mib[1] = PF_INET6;
351 	mib[2] = IPPROTO_IPV6;
352 	mib[3] = IPV6CTL_STATS;
353 
354 	len = sizeof ip6stat;
355 	memset(&ip6stat, 0, len);
356 	if (sysctl(mib, 4, &ip6stat, &len, (void *)0, 0) < 0)
357 		return;
358 	printf("%s:\n", name);
359 
360 #define	p(f, m) if (ip6stat.f || sflag <= 1) \
361     printf(m, (unsigned long long)ip6stat.f, plural(ip6stat.f))
362 #define	p1a(f, m) if (ip6stat.f || sflag <= 1) \
363     printf(m, (unsigned long long)ip6stat.f)
364 
365 	p(ip6s_total, "\t%llu total packet%s received\n");
366 	p1a(ip6s_toosmall, "\t%llu with size smaller than minimum\n");
367 	p1a(ip6s_tooshort, "\t%llu with data size < data length\n");
368 	p1a(ip6s_badoptions, "\t%llu with bad options\n");
369 	p1a(ip6s_badvers, "\t%llu with incorrect version number\n");
370 	p(ip6s_fragments, "\t%llu fragment%s received\n");
371 	p(ip6s_fragdropped, "\t%llu fragment%s dropped (dup or out of space)\n");
372 	p(ip6s_fragtimeout, "\t%llu fragment%s dropped after timeout\n");
373 	p(ip6s_fragoverflow, "\t%llu fragment%s that exceeded limit\n");
374 	p(ip6s_reassembled, "\t%llu packet%s reassembled ok\n");
375 	p(ip6s_delivered, "\t%llu packet%s for this host\n");
376 	p(ip6s_forward, "\t%llu packet%s forwarded\n");
377 	p(ip6s_cantforward, "\t%llu packet%s not forwardable\n");
378 	p(ip6s_redirectsent, "\t%llu redirect%s sent\n");
379 	p(ip6s_localout, "\t%llu packet%s sent from this host\n");
380 	p(ip6s_rawout, "\t%llu packet%s sent with fabricated ip header\n");
381 	p(ip6s_odropped, "\t%llu output packet%s dropped due to no bufs, etc.\n");
382 	p(ip6s_noroute, "\t%llu output packet%s discarded due to no route\n");
383 	p(ip6s_fragmented, "\t%llu output datagram%s fragmented\n");
384 	p(ip6s_ofragments, "\t%llu fragment%s created\n");
385 	p(ip6s_cantfrag, "\t%llu datagram%s that can't be fragmented\n");
386 	p(ip6s_badscope, "\t%llu packet%s that violated scope rules\n");
387 	p(ip6s_notmember, "\t%llu multicast packet%s which we don't join\n");
388 	for (first = 1, i = 0; i < 256; i++)
389 		if (ip6stat.ip6s_nxthist[i] != 0) {
390 			if (first) {
391 				printf("\tInput histogram:\n");
392 				first = 0;
393 			}
394 			printf("\t\t%s: %llu\n", ip6nh[i],
395 			    (unsigned long long)ip6stat.ip6s_nxthist[i]);
396 		}
397 	printf("\tMbuf statistics:\n");
398 	printf("\t\t%llu one mbuf\n", (unsigned long long)ip6stat.ip6s_m1);
399 	for (first = 1, i = 0; i < 32; i++) {
400 		char ifbuf[IFNAMSIZ];
401 		if (ip6stat.ip6s_m2m[i] != 0) {
402 			if (first) {
403 				printf("\t\ttwo or more mbuf:\n");
404 				first = 0;
405 			}
406 			printf("\t\t\t%s= %llu\n",
407 			    if_indextoname(i, ifbuf),
408 			    (unsigned long long)ip6stat.ip6s_m2m[i]);
409 		}
410 	}
411 	printf("\t\t%llu one ext mbuf\n",
412 	    (unsigned long long)ip6stat.ip6s_mext1);
413 	printf("\t\t%llu two or more ext mbuf\n",
414 	    (unsigned long long)ip6stat.ip6s_mext2m);
415 	p(ip6s_exthdrtoolong,
416 	    "\t%llu packet%s whose headers are not continuous\n");
417 	p(ip6s_nogif, "\t%llu tunneling packet%s that can't find gif\n");
418 	p(ip6s_toomanyhdr,
419 	    "\t%llu packet%s discarded due to too may headers\n");
420 
421 	/* for debugging source address selection */
422 #define PRINT_SCOPESTAT(s,i) do {\
423 		switch(i) { /* XXX hardcoding in each case */\
424 		case 1:\
425 			p(s, "\t\t%llu node-local%s\n");\
426 			break;\
427 		case 2:\
428 			p(s,"\t\t%llu link-local%s\n");\
429 			break;\
430 		case 5:\
431 			p(s,"\t\t%llu site-local%s\n");\
432 			break;\
433 		case 14:\
434 			p(s,"\t\t%llu global%s\n");\
435 			break;\
436 		default:\
437 			printf("\t\t%llu addresses scope=%x\n",\
438 			    (unsigned long long)ip6stat.s, i);\
439 		}\
440 	} while (0);
441 
442 	p(ip6s_sources_none,
443 	  "\t%llu failure%s of source address selection\n");
444 	for (first = 1, i = 0; i < 16; i++) {
445 		if (ip6stat.ip6s_sources_sameif[i]) {
446 			if (first) {
447 				printf("\tsource addresses on an outgoing I/F\n");
448 				first = 0;
449 			}
450 			PRINT_SCOPESTAT(ip6s_sources_sameif[i], i);
451 		}
452 	}
453 	for (first = 1, i = 0; i < 16; i++) {
454 		if (ip6stat.ip6s_sources_otherif[i]) {
455 			if (first) {
456 				printf("\tsource addresses on a non-outgoing I/F\n");
457 				first = 0;
458 			}
459 			PRINT_SCOPESTAT(ip6s_sources_otherif[i], i);
460 		}
461 	}
462 	for (first = 1, i = 0; i < 16; i++) {
463 		if (ip6stat.ip6s_sources_samescope[i]) {
464 			if (first) {
465 				printf("\tsource addresses of same scope\n");
466 				first = 0;
467 			}
468 			PRINT_SCOPESTAT(ip6s_sources_samescope[i], i);
469 		}
470 	}
471 	for (first = 1, i = 0; i < 16; i++) {
472 		if (ip6stat.ip6s_sources_otherscope[i]) {
473 			if (first) {
474 				printf("\tsource addresses of a different scope\n");
475 				first = 0;
476 			}
477 			PRINT_SCOPESTAT(ip6s_sources_otherscope[i], i);
478 		}
479 	}
480 	for (first = 1, i = 0; i < 16; i++) {
481 		if (ip6stat.ip6s_sources_deprecated[i]) {
482 			if (first) {
483 				printf("\tdeprecated source addresses\n");
484 				first = 0;
485 			}
486 			PRINT_SCOPESTAT(ip6s_sources_deprecated[i], i);
487 		}
488 	}
489 
490 	p1a(ip6s_forward_cachehit, "\t%llu forward cache hit\n");
491 	p1a(ip6s_forward_cachemiss, "\t%llu forward cache miss\n");
492 #undef p
493 #undef p1a
494 }
495 
496 /*
497  * Dump IPv6 per-interface statistics based on RFC 2465.
498  */
499 void
500 ip6_ifstats(char *ifname)
501 {
502 	struct in6_ifreq ifr;
503 	int s;
504 #define	p(f, m) if (ifr.ifr_ifru.ifru_stat.f || sflag <= 1) \
505     printf(m, (unsigned long long)ifr.ifr_ifru.ifru_stat.f, plural(ifr.ifr_ifru.ifru_stat.f))
506 #define	p_5(f, m) if (ifr.ifr_ifru.ifru_stat.f || sflag <= 1) \
507     printf(m, (unsigned long long)ip6stat.f)
508 
509 	if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
510 		perror("Warning: socket(AF_INET6)");
511 		return;
512 	}
513 
514 	strcpy(ifr.ifr_name, ifname);
515 	printf("ip6 on %s:\n", ifr.ifr_name);
516 
517 	if (ioctl(s, SIOCGIFSTAT_IN6, (char *)&ifr) < 0) {
518 		perror("Warning: ioctl(SIOCGIFSTAT_IN6)");
519 		goto end;
520 	}
521 
522 	p(ifs6_in_receive, "\t%llu total input datagram%s\n");
523 	p(ifs6_in_hdrerr, "\t%llu datagram%s with invalid header received\n");
524 	p(ifs6_in_toobig, "\t%llu datagram%s exceeded MTU received\n");
525 	p(ifs6_in_noroute, "\t%llu datagram%s with no route received\n");
526 	p(ifs6_in_addrerr, "\t%llu datagram%s with invalid dst received\n");
527 	p(ifs6_in_protounknown, "\t%llu datagram%s with unknown proto received\n");
528 	p(ifs6_in_truncated, "\t%llu truncated datagram%s received\n");
529 	p(ifs6_in_discard, "\t%llu input datagram%s discarded\n");
530 	p(ifs6_in_deliver,
531 	  "\t%llu datagram%s delivered to an upper layer protocol\n");
532 	p(ifs6_out_forward, "\t%llu datagram%s forwarded to this interface\n");
533 	p(ifs6_out_request,
534 	  "\t%llu datagram%s sent from an upper layer protocol\n");
535 	p(ifs6_out_discard, "\t%llu total discarded output datagram%s\n");
536 	p(ifs6_out_fragok, "\t%llu output datagram%s fragmented\n");
537 	p(ifs6_out_fragfail, "\t%llu output datagram%s failed on fragment\n");
538 	p(ifs6_out_fragcreat, "\t%llu output datagram%s succeeded on fragment\n");
539 	p(ifs6_reass_reqd, "\t%llu incoming datagram%s fragmented\n");
540 	p(ifs6_reass_ok, "\t%llu datagram%s reassembled\n");
541 	p(ifs6_reass_fail, "\t%llu datagram%s failed on reassembling\n");
542 	p(ifs6_in_mcast, "\t%llu multicast datagram%s received\n");
543 	p(ifs6_out_mcast, "\t%llu multicast datagram%s sent\n");
544 
545   end:
546 	close(s);
547 
548 #undef p
549 #undef p_5
550 }
551 
552 static	char *icmp6names[] = {
553 	"#0",
554 	"unreach",
555 	"packet too big",
556 	"time exceed",
557 	"parameter problem",
558 	"#5",
559 	"#6",
560 	"#7",
561 	"#8",
562 	"#9",
563 	"#10",
564 	"#11",
565 	"#12",
566 	"#13",
567 	"#14",
568 	"#15",
569 	"#16",
570 	"#17",
571 	"#18",
572 	"#19",
573 	"#20",
574 	"#21",
575 	"#22",
576 	"#23",
577 	"#24",
578 	"#25",
579 	"#26",
580 	"#27",
581 	"#28",
582 	"#29",
583 	"#30",
584 	"#31",
585 	"#32",
586 	"#33",
587 	"#34",
588 	"#35",
589 	"#36",
590 	"#37",
591 	"#38",
592 	"#39",
593 	"#40",
594 	"#41",
595 	"#42",
596 	"#43",
597 	"#44",
598 	"#45",
599 	"#46",
600 	"#47",
601 	"#48",
602 	"#49",
603 	"#50",
604 	"#51",
605 	"#52",
606 	"#53",
607 	"#54",
608 	"#55",
609 	"#56",
610 	"#57",
611 	"#58",
612 	"#59",
613 	"#60",
614 	"#61",
615 	"#62",
616 	"#63",
617 	"#64",
618 	"#65",
619 	"#66",
620 	"#67",
621 	"#68",
622 	"#69",
623 	"#70",
624 	"#71",
625 	"#72",
626 	"#73",
627 	"#74",
628 	"#75",
629 	"#76",
630 	"#77",
631 	"#78",
632 	"#79",
633 	"#80",
634 	"#81",
635 	"#82",
636 	"#83",
637 	"#84",
638 	"#85",
639 	"#86",
640 	"#87",
641 	"#88",
642 	"#89",
643 	"#80",
644 	"#91",
645 	"#92",
646 	"#93",
647 	"#94",
648 	"#95",
649 	"#96",
650 	"#97",
651 	"#98",
652 	"#99",
653 	"#100",
654 	"#101",
655 	"#102",
656 	"#103",
657 	"#104",
658 	"#105",
659 	"#106",
660 	"#107",
661 	"#108",
662 	"#109",
663 	"#110",
664 	"#111",
665 	"#112",
666 	"#113",
667 	"#114",
668 	"#115",
669 	"#116",
670 	"#117",
671 	"#118",
672 	"#119",
673 	"#120",
674 	"#121",
675 	"#122",
676 	"#123",
677 	"#124",
678 	"#125",
679 	"#126",
680 	"#127",
681 	"echo",
682 	"echo reply",
683 	"multicast listener query",
684 	"multicast listener report",
685 	"multicast listener done",
686 	"router solicitation",
687 	"router advertisement",
688 	"neighbor solicitation",
689 	"neighbor advertisement",
690 	"redirect",
691 	"router renumbering",
692 	"node information request",
693 	"node information reply",
694 	"inverse neighbor solicitation",
695 	"inverse neighbor advertisement",
696 	"#143",
697 	"#144",
698 	"#145",
699 	"#146",
700 	"#147",
701 	"#148",
702 	"#149",
703 	"#150",
704 	"#151",
705 	"#152",
706 	"#153",
707 	"#154",
708 	"#155",
709 	"#156",
710 	"#157",
711 	"#158",
712 	"#159",
713 	"#160",
714 	"#161",
715 	"#162",
716 	"#163",
717 	"#164",
718 	"#165",
719 	"#166",
720 	"#167",
721 	"#168",
722 	"#169",
723 	"#170",
724 	"#171",
725 	"#172",
726 	"#173",
727 	"#174",
728 	"#175",
729 	"#176",
730 	"#177",
731 	"#178",
732 	"#179",
733 	"#180",
734 	"#181",
735 	"#182",
736 	"#183",
737 	"#184",
738 	"#185",
739 	"#186",
740 	"#187",
741 	"#188",
742 	"#189",
743 	"#180",
744 	"#191",
745 	"#192",
746 	"#193",
747 	"#194",
748 	"#195",
749 	"#196",
750 	"#197",
751 	"#198",
752 	"#199",
753 	"#200",
754 	"#201",
755 	"#202",
756 	"#203",
757 	"#204",
758 	"#205",
759 	"#206",
760 	"#207",
761 	"#208",
762 	"#209",
763 	"#210",
764 	"#211",
765 	"#212",
766 	"#213",
767 	"#214",
768 	"#215",
769 	"#216",
770 	"#217",
771 	"#218",
772 	"#219",
773 	"#220",
774 	"#221",
775 	"#222",
776 	"#223",
777 	"#224",
778 	"#225",
779 	"#226",
780 	"#227",
781 	"#228",
782 	"#229",
783 	"#230",
784 	"#231",
785 	"#232",
786 	"#233",
787 	"#234",
788 	"#235",
789 	"#236",
790 	"#237",
791 	"#238",
792 	"#239",
793 	"#240",
794 	"#241",
795 	"#242",
796 	"#243",
797 	"#244",
798 	"#245",
799 	"#246",
800 	"#247",
801 	"#248",
802 	"#249",
803 	"#250",
804 	"#251",
805 	"#252",
806 	"#253",
807 	"#254",
808 	"#255",
809 };
810 
811 /*
812  * Dump ICMP6 statistics.
813  */
814 void
815 icmp6_stats(u_long off __unused, char *name, int af __unused)
816 {
817 	struct icmp6stat icmp6stat;
818 	int i, first;
819 	int mib[4];
820 	size_t len;
821 
822 	mib[0] = CTL_NET;
823 	mib[1] = PF_INET6;
824 	mib[2] = IPPROTO_ICMPV6;
825 	mib[3] = ICMPV6CTL_STATS;
826 
827 	len = sizeof icmp6stat;
828 	memset(&icmp6stat, 0, len);
829 	if (sysctl(mib, 4, &icmp6stat, &len, (void *)0, 0) < 0)
830 		return;
831 	printf("%s:\n", name);
832 
833 #define	p(f, m) if (icmp6stat.f || sflag <= 1) \
834     printf(m, (unsigned long long)icmp6stat.f, plural(icmp6stat.f))
835 #define p_5(f, m) printf(m, (unsigned long long)icmp6stat.f)
836 
837 	p(icp6s_error, "\t%llu call%s to icmp_error\n");
838 	p(icp6s_canterror,
839 	    "\t%llu error%s not generated because old message was icmp error or so\n");
840 	p(icp6s_toofreq,
841 	  "\t%llu error%s not generated because rate limitation\n");
842 #define NELEM (sizeof(icmp6stat.icp6s_outhist)/sizeof(icmp6stat.icp6s_outhist[0]))
843 	for (first = 1, i = 0; i < NELEM; i++)
844 		if (icmp6stat.icp6s_outhist[i] != 0) {
845 			if (first) {
846 				printf("\tOutput histogram:\n");
847 				first = 0;
848 			}
849 			printf("\t\t%s: %llu\n", icmp6names[i],
850 			    (unsigned long long)icmp6stat.icp6s_outhist[i]);
851 		}
852 #undef NELEM
853 	p(icp6s_badcode, "\t%llu message%s with bad code fields\n");
854 	p(icp6s_tooshort, "\t%llu message%s < minimum length\n");
855 	p(icp6s_checksum, "\t%llu bad checksum%s\n");
856 	p(icp6s_badlen, "\t%llu message%s with bad length\n");
857 #define NELEM (sizeof(icmp6stat.icp6s_inhist)/sizeof(icmp6stat.icp6s_inhist[0]))
858 	for (first = 1, i = 0; i < NELEM; i++)
859 		if (icmp6stat.icp6s_inhist[i] != 0) {
860 			if (first) {
861 				printf("\tInput histogram:\n");
862 				first = 0;
863 			}
864 			printf("\t\t%s: %llu\n", icmp6names[i],
865 			    (unsigned long long)icmp6stat.icp6s_inhist[i]);
866 		}
867 #undef NELEM
868 	printf("\tHistogram of error messages to be generated:\n");
869 	p_5(icp6s_odst_unreach_noroute, "\t\t%llu no route\n");
870 	p_5(icp6s_odst_unreach_admin, "\t\t%llu administratively prohibited\n");
871 	p_5(icp6s_odst_unreach_beyondscope, "\t\t%llu beyond scope\n");
872 	p_5(icp6s_odst_unreach_addr, "\t\t%llu address unreachable\n");
873 	p_5(icp6s_odst_unreach_noport, "\t\t%llu port unreachable\n");
874 	p_5(icp6s_opacket_too_big, "\t\t%llu packet too big\n");
875 	p_5(icp6s_otime_exceed_transit, "\t\t%llu time exceed transit\n");
876 	p_5(icp6s_otime_exceed_reassembly, "\t\t%llu time exceed reassembly\n");
877 	p_5(icp6s_oparamprob_header, "\t\t%llu erroneous header field\n");
878 	p_5(icp6s_oparamprob_nextheader, "\t\t%llu unrecognized next header\n");
879 	p_5(icp6s_oparamprob_option, "\t\t%llu unrecognized option\n");
880 	p_5(icp6s_oredirect, "\t\t%llu redirect\n");
881 	p_5(icp6s_ounknown, "\t\t%llu unknown\n");
882 
883 	p(icp6s_reflect, "\t%llu message response%s generated\n");
884 	p(icp6s_nd_toomanyopt, "\t%llu message%s with too many ND options\n");
885 	p(icp6s_nd_badopt, "\t%qu message%s with bad ND options\n");
886 	p(icp6s_badns, "\t%qu bad neighbor solicitation message%s\n");
887 	p(icp6s_badna, "\t%qu bad neighbor advertisement message%s\n");
888 	p(icp6s_badrs, "\t%qu bad router solicitation message%s\n");
889 	p(icp6s_badra, "\t%qu bad router advertisement message%s\n");
890 	p(icp6s_badredirect, "\t%qu bad redirect message%s\n");
891 	p(icp6s_pmtuchg, "\t%llu path MTU change%s\n");
892 #undef p
893 #undef p_5
894 }
895 
896 /*
897  * Dump ICMPv6 per-interface statistics based on RFC 2466.
898  */
899 void
900 icmp6_ifstats(char *ifname)
901 {
902 	struct in6_ifreq ifr;
903 	int s;
904 #define	p(f, m) if (ifr.ifr_ifru.ifru_icmp6stat.f || sflag <= 1) \
905     printf(m, (unsigned long long)ifr.ifr_ifru.ifru_icmp6stat.f, plural(ifr.ifr_ifru.ifru_icmp6stat.f))
906 
907 	if ((s = socket(AF_INET6, SOCK_DGRAM, 0)) < 0) {
908 		perror("Warning: socket(AF_INET6)");
909 		return;
910 	}
911 
912 	strcpy(ifr.ifr_name, ifname);
913 	printf("icmp6 on %s:\n", ifr.ifr_name);
914 
915 	if (ioctl(s, SIOCGIFSTAT_ICMP6, (char *)&ifr) < 0) {
916 		perror("Warning: ioctl(SIOCGIFSTAT_ICMP6)");
917 		goto end;
918 	}
919 
920 	p(ifs6_in_msg, "\t%llu total input message%s\n");
921 	p(ifs6_in_error, "\t%llu total input error message%s\n");
922 	p(ifs6_in_dstunreach, "\t%llu input destination unreachable error%s\n");
923 	p(ifs6_in_adminprohib, "\t%llu input administratively prohibited error%s\n");
924 	p(ifs6_in_timeexceed, "\t%llu input time exceeded error%s\n");
925 	p(ifs6_in_paramprob, "\t%llu input parameter problem error%s\n");
926 	p(ifs6_in_pkttoobig, "\t%llu input packet too big error%s\n");
927 	p(ifs6_in_echo, "\t%llu input echo request%s\n");
928 	p(ifs6_in_echoreply, "\t%llu input echo reply%s\n");
929 	p(ifs6_in_routersolicit, "\t%llu input router solicitation%s\n");
930 	p(ifs6_in_routeradvert, "\t%llu input router advertisement%s\n");
931 	p(ifs6_in_neighborsolicit, "\t%llu input neighbor solicitation%s\n");
932 	p(ifs6_in_neighboradvert, "\t%llu input neighbor advertisement%s\n");
933 	p(ifs6_in_redirect, "\t%llu input redirect%s\n");
934 	p(ifs6_in_mldquery, "\t%llu input MLD query%s\n");
935 	p(ifs6_in_mldreport, "\t%llu input MLD report%s\n");
936 	p(ifs6_in_mlddone, "\t%llu input MLD done%s\n");
937 
938 	p(ifs6_out_msg, "\t%llu total output message%s\n");
939 	p(ifs6_out_error, "\t%llu total output error message%s\n");
940 	p(ifs6_out_dstunreach, "\t%llu output destination unreachable error%s\n");
941 	p(ifs6_out_adminprohib, "\t%llu output administratively prohibited error%s\n");
942 	p(ifs6_out_timeexceed, "\t%llu output time exceeded error%s\n");
943 	p(ifs6_out_paramprob, "\t%llu output parameter problem error%s\n");
944 	p(ifs6_out_pkttoobig, "\t%llu output packet too big error%s\n");
945 	p(ifs6_out_echo, "\t%llu output echo request%s\n");
946 	p(ifs6_out_echoreply, "\t%llu output echo reply%s\n");
947 	p(ifs6_out_routersolicit, "\t%llu output router solicitation%s\n");
948 	p(ifs6_out_routeradvert, "\t%llu output router advertisement%s\n");
949 	p(ifs6_out_neighborsolicit, "\t%llu output neighbor solicitation%s\n");
950 	p(ifs6_out_neighboradvert, "\t%llu output neighbor advertisement%s\n");
951 	p(ifs6_out_redirect, "\t%llu output redirect%s\n");
952 	p(ifs6_out_mldquery, "\t%llu output MLD query%s\n");
953 	p(ifs6_out_mldreport, "\t%llu output MLD report%s\n");
954 	p(ifs6_out_mlddone, "\t%llu output MLD done%s\n");
955 
956   end:
957 	close(s);
958 #undef p
959 }
960 
961 /*
962  * Dump PIM statistics structure.
963  */
964 void
965 pim6_stats(u_long off __unused, char *name, int af __unused)
966 {
967 	struct pim6stat pim6stat;
968 
969 	if (off == 0)
970 		return;
971 	kread(off, (char *)&pim6stat, sizeof(pim6stat));
972 	printf("%s:\n", name);
973 
974 #define	p(f, m) if (pim6stat.f || sflag <= 1) \
975     printf(m, (unsigned long long)pim6stat.f, plural(pim6stat.f))
976 	p(pim6s_rcv_total, "\t%llu message%s received\n");
977 	p(pim6s_rcv_tooshort, "\t%llu message%s received with too few bytes\n");
978 	p(pim6s_rcv_badsum, "\t%llu message%s received with bad checksum\n");
979 	p(pim6s_rcv_badversion, "\t%llu message%s received with bad version\n");
980 	p(pim6s_rcv_registers, "\t%llu register%s received\n");
981 	p(pim6s_rcv_badregisters, "\t%llu bad register%s received\n");
982 	p(pim6s_snd_registers, "\t%llu register%s sent\n");
983 #undef p
984 }
985 
986 /*
987  * Dump raw ip6 statistics structure.
988  */
989 void
990 rip6_stats(u_long off __unused, char *name, int af __unused)
991 {
992 	struct rip6stat rip6stat;
993 	u_quad_t delivered;
994 	int mib[4];
995 	size_t l;
996 
997 	mib[0] = CTL_NET;
998 	mib[1] = PF_INET6;
999 	mib[2] = IPPROTO_IPV6;
1000 	mib[3] = IPV6CTL_RIP6STATS;
1001 	l = sizeof(rip6stat);
1002 	if (sysctl(mib, 4, &rip6stat, &l, NULL, 0) < 0) {
1003 		if (errno != ENOENT)
1004 			perror("Warning: sysctl(net.inet6.ip6.rip6stats)");
1005 		return;
1006 	}
1007 
1008 	printf("%s:\n", name);
1009 
1010 #define	p(f, m) if (rip6stat.f || sflag <= 1) \
1011     printf(m, (unsigned long long)rip6stat.f, plural(rip6stat.f))
1012 	p(rip6s_ipackets, "\t%llu message%s received\n");
1013 	p(rip6s_isum, "\t%llu checksum calcuration%s on inbound\n");
1014 	p(rip6s_badsum, "\t%llu message%s with bad checksum\n");
1015 	p(rip6s_nosock, "\t%llu message%s dropped due to no socket\n");
1016 	p(rip6s_nosockmcast,
1017 	    "\t%llu multicast message%s dropped due to no socket\n");
1018 	p(rip6s_fullsock,
1019 	    "\t%llu message%s dropped due to full socket buffers\n");
1020 	delivered = rip6stat.rip6s_ipackets -
1021 		    rip6stat.rip6s_badsum -
1022 		    rip6stat.rip6s_nosock -
1023 		    rip6stat.rip6s_nosockmcast -
1024 		    rip6stat.rip6s_fullsock;
1025 	if (delivered || sflag <= 1)
1026 		printf("\t%llu delivered\n", (unsigned long long)delivered);
1027 	p(rip6s_opackets, "\t%llu datagram%s output\n");
1028 #undef p
1029 }
1030 
1031 /*
1032  * Pretty print an Internet address (net address + port).
1033  * Take numeric_addr and numeric_port into consideration.
1034  */
1035 #define GETSERVBYPORT6(port, proto, ret)\
1036 {\
1037 	if (strcmp((proto), "tcp6") == 0)\
1038 		(ret) = getservbyport((int)(port), "tcp");\
1039 	else if (strcmp((proto), "udp6") == 0)\
1040 		(ret) = getservbyport((int)(port), "udp");\
1041 	else\
1042 		(ret) = getservbyport((int)(port), (proto));\
1043 };
1044 
1045 void
1046 inet6print(struct in6_addr *in6, int port, char *proto, int numeric)
1047 {
1048 	struct servent *sp = 0;
1049 	char line[80], *cp;
1050 	int width;
1051 
1052 	sprintf(line, "%.*s.", Wflag ? 39 :
1053 		(Aflag && !numeric) ? 12 : 16, inet6name(in6));
1054 	cp = strchr(line, '\0');
1055 	if (!numeric && port)
1056 		GETSERVBYPORT6(port, proto, sp);
1057 	if (sp || port == 0)
1058 		sprintf(cp, "%.8s", sp ? sp->s_name : "*");
1059 	else
1060 		sprintf(cp, "%d", ntohs((u_short)port));
1061         width = Wflag ? 45 : Aflag ? 17 : 21;
1062 	printf("%-*.*s ", width, width, line);
1063 }
1064 
1065 /*
1066  * Construct an Internet address representation.
1067  * If the numeric_addr has been supplied, give
1068  * numeric value, otherwise try for symbolic name.
1069  */
1070 
1071 char *
1072 inet6name(struct in6_addr *in6p)
1073 {
1074 	char *cp;
1075 	static char line[50];
1076 	struct hostent *hp;
1077 	static char domain[MAXHOSTNAMELEN];
1078 	static int first = 1;
1079 
1080 	if (first && !numeric_addr) {
1081 		first = 0;
1082 		if (gethostname(domain, MAXHOSTNAMELEN) == 0 &&
1083 		    (cp = strchr(domain, '.')))
1084 			(void) strcpy(domain, cp + 1);
1085 		else
1086 			domain[0] = 0;
1087 	}
1088 	cp = 0;
1089 	if (!numeric_addr && !IN6_IS_ADDR_UNSPECIFIED(in6p)) {
1090 		hp = gethostbyaddr((char *)in6p, sizeof(*in6p), AF_INET6);
1091 		if (hp) {
1092 			if ((cp = strchr(hp->h_name, '.')) &&
1093 			    !strcmp(cp + 1, domain))
1094 				*cp = 0;
1095 			cp = hp->h_name;
1096 		}
1097 	}
1098 	if (IN6_IS_ADDR_UNSPECIFIED(in6p))
1099 		strcpy(line, "*");
1100 	else if (cp)
1101 		strcpy(line, cp);
1102 	else
1103 		sprintf(line, "%s",
1104 			inet_ntop(AF_INET6, (void *)in6p, ntop_buf,
1105 				sizeof(ntop_buf)));
1106 	return (line);
1107 }
1108 #endif /*INET6*/
1109