xref: /netbsd/usr.bin/netstat/mroute6.c (revision c4a72b64)
1 /*	$NetBSD: mroute6.c,v 1.10 2002/07/03 07:35:40 itojun Exp $	*/
2 
3 /*
4  * Copyright (C) 1998 WIDE Project.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the project nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 /*
33  * Copyright (c) 1989 Stephen Deering
34  * Copyright (c) 1992, 1993
35  *	The Regents of the University of California.  All rights reserved.
36  *
37  * This code is derived from software contributed to Berkeley by
38  * Stephen Deering of Stanford University.
39  *
40  * Redistribution and use in source and binary forms, with or without
41  * modification, are permitted provided that the following conditions
42  * are met:
43  * 1. Redistributions of source code must retain the above copyright
44  *    notice, this list of conditions and the following disclaimer.
45  * 2. Redistributions in binary form must reproduce the above copyright
46  *    notice, this list of conditions and the following disclaimer in the
47  *    documentation and/or other materials provided with the distribution.
48  * 3. All advertising materials mentioning features or use of this software
49  *    must display the following acknowledgement:
50  *	This product includes software developed by the University of
51  *	California, Berkeley and its contributors.
52  * 4. Neither the name of the University nor the names of its contributors
53  *    may be used to endorse or promote products derived from this software
54  *    without specific prior written permission.
55  *
56  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
57  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
58  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
59  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
60  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
61  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
62  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
63  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
64  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
65  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
66  * SUCH DAMAGE.
67  *
68  *	@(#)mroute.c	8.2 (Berkeley) 4/28/95
69  */
70 
71 #include <sys/param.h>
72 #include <sys/queue.h>
73 #include <sys/socket.h>
74 #include <sys/socketvar.h>
75 #include <sys/protosw.h>
76 
77 #include <net/if.h>
78 
79 #include <netinet/in.h>
80 
81 #define _KERNEL 1
82 #include <netinet6/ip6_mroute.h>
83 #undef _KERNEL
84 
85 #include <stdio.h>
86 #include "netstat.h"
87 
88 #ifdef INET6
89 
90 #define	WID_ORG	(lflag ? 39 : (numeric_addr ? 29 : 18)) /* width of origin column */
91 #define	WID_GRP	(lflag ? 18 : (numeric_addr ? 16 : 18)) /* width of group column */
92 
93 void
94 mroute6pr(mrpaddr, mfcaddr, mifaddr)
95 	u_long mrpaddr, mfcaddr, mifaddr;
96 {
97 	u_int mrtproto;
98 	struct mf6c *mf6ctable[MF6CTBLSIZ], *mfcp;
99 	struct mif6 mif6table[MAXMIFS];
100 	struct mf6c mfc;
101 	struct rtdetq rte, *rtep;
102 	register struct mif6 *mifp;
103 	register mifi_t mifi;
104 	register int i;
105 	register int banner_printed;
106 	register int saved_numeric_addr;
107 	mifi_t maxmif = 0;
108 	int waitings;
109 
110 	if (mrpaddr == 0) {
111 		printf("mroute6pr: symbol not in namelist\n");
112 		return;
113 	}
114 
115 	kread(mrpaddr, (char *)&mrtproto, sizeof(mrtproto));
116 	switch (mrtproto) {
117 	case 0:
118 		printf("no IPv6 multicast routing compiled into this system\n");
119 		return;
120 
121 	case IPPROTO_PIM:
122 		break;
123 
124 	default:
125 		printf("IPv6 multicast routing protocol %u, unknown\n",
126 		    mrtproto);
127 		return;
128 	}
129 
130 	if (mfcaddr == 0) {
131 		printf("mf6ctable: symbol not in namelist\n");
132 		return;
133 	}
134 	if (mifaddr == 0) {
135 		printf("miftable: symbol not in namelist\n");
136 		return;
137 	}
138 
139 	saved_numeric_addr = numeric_addr;
140 	numeric_addr = 1;
141 
142 	kread(mifaddr, (char *)&mif6table, sizeof(mif6table));
143 	banner_printed = 0;
144 	for (mifi = 0, mifp = mif6table; mifi < MAXMIFS; ++mifi, ++mifp) {
145 		struct ifnet ifnet;
146 		char ifname[IFNAMSIZ];
147 
148 		if (mifp->m6_ifp == NULL)
149 			continue;
150 
151 		kread((u_long)mifp->m6_ifp, (char *)&ifnet, sizeof(ifnet));
152 		maxmif = mifi;
153 		if (!banner_printed) {
154 			printf("\nIPv6 Multicast Interface Table\n"
155 			    " Mif   Rate   PhyIF   Pkts-In   Pkts-Out\n");
156 			banner_printed = 1;
157 		}
158 
159 		printf("  %2u   %4d", mifi, mifp->m6_rate_limit);
160 		printf("   %5s", (mifp->m6_flags & MIFF_REGISTER) ?
161 		    "reg0" : if_indextoname(ifnet.if_index, ifname));
162 
163 		printf(" %9llu  %9llu\n", (unsigned long long)mifp->m6_pkt_in,
164 		    (unsigned long long)mifp->m6_pkt_out);
165 	}
166 	if (!banner_printed)
167 		printf("\nIPv6 Multicast Interface Table is empty\n");
168 
169 	kread(mfcaddr, (char *)&mf6ctable, sizeof(mf6ctable));
170 	banner_printed = 0;
171 	for (i = 0; i < MF6CTBLSIZ; ++i) {
172 		mfcp = mf6ctable[i];
173 		while(mfcp) {
174 			kread((u_long)mfcp, (char *)&mfc, sizeof(mfc));
175 			if (!banner_printed) {
176 				printf ("\nIPv6 Multicast Forwarding Cache\n");
177 				printf(" %-*.*s %-*.*s %s",
178 				    WID_ORG, WID_ORG, "Origin",
179 				    WID_GRP, WID_GRP, "Group",
180 				    "  Packets Waits In-Mif  Out-Mifs\n");
181 				banner_printed = 1;
182 			}
183 
184 			printf(" %-*.*s", WID_ORG, WID_ORG,
185 			    routename6(&mfc.mf6c_origin));
186 			printf(" %-*.*s", WID_GRP, WID_GRP,
187 			    routename6(&mfc.mf6c_mcastgrp));
188 			printf(" %9llu", (unsigned long long)mfc.mf6c_pkt_cnt);
189 
190 			for (waitings = 0, rtep = mfc.mf6c_stall; rtep; ) {
191 				waitings++;
192 				kread((u_long)rtep, (char *)&rte, sizeof(rte));
193 				rtep = rte.next;
194 			}
195 			printf("   %3d", waitings);
196 
197 			if (mfc.mf6c_parent == MF6C_INCOMPLETE_PARENT)
198 				printf("  ---   ");
199 			else
200 				printf("  %3d   ", mfc.mf6c_parent);
201 			for (mifi = 0; mifi <= MAXMIFS; mifi++) {
202 				if (IF_ISSET(mifi, &mfc.mf6c_ifset))
203 					printf(" %u", mifi);
204 			}
205 			printf("\n");
206 
207 			mfcp = mfc.mf6c_next;
208 		}
209 	}
210 	if (!banner_printed)
211 		printf("\nIPv6 Multicast Routing Table is empty\n");
212 
213 	printf("\n");
214 	numeric_addr = saved_numeric_addr;
215 }
216 
217 void
218 mrt6_stats(mrpaddr, mstaddr)
219 	u_long mrpaddr, mstaddr;
220 {
221 #define	p(f, m) printf(m, (unsigned long long)mrtstat.f, plural(mrtstat.f))
222 #define	pes(f, m) printf(m, (unsigned long long)mrtstat.f, plurales(mrtstat.f))
223 	u_int mrtproto;
224 	struct mrt6stat mrtstat;
225 
226 	if (mrpaddr == 0) {
227 		printf("mrt6_stats: symbol not in namelist\n");
228 		return;
229 	}
230 
231 	kread(mrpaddr, (char *)&mrtproto, sizeof(mrtproto));
232 	switch (mrtproto) {
233 	case 0:
234 		printf("no IPv6 multicast routing compiled into this system\n");
235 		return;
236 
237 	case IPPROTO_PIM:
238 		break;
239 
240 	default:
241 		printf("IPv6 multicast routing protocol %u, unknown\n",
242 			mrtproto);
243 		return;
244 	}
245 
246 	if (mstaddr == 0) {
247 		printf("mrt6_stats: symbol not in namelist\n");
248 		return;
249 	}
250 
251 	kread(mstaddr, (char *)&mrtstat, sizeof(mrtstat));
252 	printf("multicast forwarding:\n");
253 	p(mrt6s_mfc_lookups, " %10llu multicast forwarding cache lookup%s\n");
254 	pes(mrt6s_mfc_misses, " %10llu multicast forwarding cache miss%s\n");
255 	p(mrt6s_upcalls, " %10llu upcall%s to mrouted\n");
256 	p(mrt6s_upq_ovflw, " %10llu upcall queue overflow%s\n");
257 	p(mrt6s_upq_sockfull,
258 	    " %10llu upcall%s dropped due to full socket buffer\n");
259 	p(mrt6s_cache_cleanups, " %10llu cache cleanup%s\n");
260 	p(mrt6s_no_route, " %10llu datagram%s with no route for origin\n");
261 	p(mrt6s_bad_tunnel, " %10llu datagram%s arrived with bad tunneling\n");
262 	p(mrt6s_cant_tunnel, " %10llu datagram%s could not be tunneled\n");
263 	p(mrt6s_wrong_if, " %10llu datagram%s arrived on wrong interface\n");
264 	p(mrt6s_drop_sel, " %10llu datagram%s selectively dropped\n");
265 	p(mrt6s_q_overflow,
266 	    " %10llu datagram%s dropped due to queue overflow\n");
267 	p(mrt6s_pkt2large, " %10llu datagram%s dropped for being too large\n");
268 #undef p
269 #undef pes
270 }
271 #endif /*INET6*/
272