xref: /netbsd/usr.bin/netstat/mroute6.c (revision bf9ec67e)
1 /*	$NetBSD: mroute6.c,v 1.8 2001/05/28 04:22:56 assar 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 
118 	 case 0:
119 		 printf("no IPv6 multicast routing compiled into this system\n");
120 		 return;
121 
122 	 case IPPROTO_PIM:
123 		 break;
124 
125 	 default:
126 		 printf("IPv6 multicast routing protocol %u, unknown\n",
127 			mrtproto);
128 		 return;
129 	}
130 
131 	if (mfcaddr == 0) {
132 		printf("mf6ctable: symbol not in namelist\n");
133 		return;
134 	}
135 	if (mifaddr == 0) {
136 		printf("miftable: symbol not in namelist\n");
137 		return;
138 	}
139 
140 	saved_numeric_addr = numeric_addr;
141 	numeric_addr = 1;
142 
143 	kread(mifaddr, (char *)&mif6table, sizeof(mif6table));
144 	banner_printed = 0;
145 	for (mifi = 0, mifp = mif6table; mifi < MAXMIFS; ++mifi, ++mifp) {
146 		struct ifnet ifnet;
147 		char ifname[IFNAMSIZ];
148 
149 		if (mifp->m6_ifp == NULL)
150 			continue;
151 
152 		kread((u_long)mifp->m6_ifp, (char *)&ifnet, sizeof(ifnet));
153 		maxmif = mifi;
154 		if (!banner_printed) {
155 			printf("\nIPv6 Multicast Interface Table\n"
156 			       " Mif   Rate   PhyIF   "
157 			       "Pkts-In   Pkts-Out\n");
158 			banner_printed = 1;
159 		}
160 
161 		printf("  %2u   %4d",
162 		       mifi, mifp->m6_rate_limit);
163 		printf("   %5s", (mifp->m6_flags & MIFF_REGISTER) ?
164 		       "reg0" : if_indextoname(ifnet.if_index, ifname));
165 
166 		printf(" %9llu  %9llu\n", (unsigned long long)mifp->m6_pkt_in,
167 		    (unsigned long long)mifp->m6_pkt_out);
168 	}
169 	if (!banner_printed)
170 		printf("\nIPv6 Multicast Interface Table is empty\n");
171 
172 	kread(mfcaddr, (char *)&mf6ctable, sizeof(mf6ctable));
173 	banner_printed = 0;
174 	for (i = 0; i < MF6CTBLSIZ; ++i) {
175 		mfcp = mf6ctable[i];
176 		while(mfcp) {
177 			kread((u_long)mfcp, (char *)&mfc, sizeof(mfc));
178 			if (!banner_printed) {
179 				printf ("\nIPv6 Multicast Forwarding Cache\n");
180 				printf(" %-*.*s %-*.*s %s",
181 				       WID_ORG, WID_ORG, "Origin",
182 				       WID_GRP, WID_GRP, "Group",
183 				       "  Packets Waits In-Mif  Out-Mifs\n");
184 				banner_printed = 1;
185 			}
186 
187 			printf(" %-*.*s", WID_ORG, WID_ORG,
188 			       routename6(&mfc.mf6c_origin));
189 			printf(" %-*.*s", WID_GRP, WID_GRP,
190 			       routename6(&mfc.mf6c_mcastgrp));
191 			printf(" %9llu", (unsigned long long)mfc.mf6c_pkt_cnt);
192 
193 			for (waitings = 0, rtep = mfc.mf6c_stall; rtep; ) {
194 				waitings++;
195 				kread((u_long)rtep, (char *)&rte, sizeof(rte));
196 				rtep = rte.next;
197 			}
198 			printf("   %3d", waitings);
199 
200 			if (mfc.mf6c_parent == MF6C_INCOMPLETE_PARENT)
201 				printf("  ---   ");
202 			else
203 				printf("  %3d   ", mfc.mf6c_parent);
204 			for (mifi = 0; mifi <= MAXMIFS; mifi++) {
205 				if (IF_ISSET(mifi, &mfc.mf6c_ifset))
206 					printf(" %u", mifi);
207 			}
208 			printf("\n");
209 
210 			mfcp = mfc.mf6c_next;
211 		}
212 	}
213 	if (!banner_printed)
214 		printf("\nIPv6 Multicast Routing Table is empty\n");
215 
216 	printf("\n");
217 	numeric_addr = saved_numeric_addr;
218 }
219 
220 void
221 mrt6_stats(mrpaddr, mstaddr)
222 	u_long mrpaddr, mstaddr;
223 {
224 #define	p(f, m) printf(m, (unsigned long long)mrtstat.f, plural(mrtstat.f))
225 #define	pes(f, m) printf(m, (unsigned long long)mrtstat.f, plurales(mrtstat.f))
226 	u_int mrtproto;
227 	struct mrt6stat mrtstat;
228 
229 	if (mrpaddr == 0) {
230 		printf("mrt6_stats: symbol not in namelist\n");
231 		return;
232 	}
233 
234 	kread(mrpaddr, (char *)&mrtproto, sizeof(mrtproto));
235 	switch (mrtproto) {
236 	 case 0:
237 		 printf("no IPv6 multicast routing compiled into this system\n");
238 		 return;
239 
240 	 case IPPROTO_PIM:
241 		 break;
242 
243 	 default:
244 		 printf("IPv6 multicast routing protocol %u, unknown\n",
245 			mrtproto);
246 		 return;
247 	}
248 
249 	if (mstaddr == 0) {
250 		printf("mrt6_stats: symbol not in namelist\n");
251 		return;
252 	}
253 
254 	kread(mstaddr, (char *)&mrtstat, sizeof(mrtstat));
255 	printf("multicast forwarding:\n");
256 	p(mrt6s_mfc_lookups, " %10llu multicast forwarding cache lookup%s\n");
257 	pes(mrt6s_mfc_misses, " %10llu multicast forwarding cache miss%s\n");
258 	p(mrt6s_upcalls, " %10llu upcall%s to mrouted\n");
259 	p(mrt6s_upq_ovflw, " %10llu upcall llueue overflow%s\n");
260 	p(mrt6s_upq_sockfull,
261 	    " %10llu upcall%s dropped due to full socket buffer\n");
262 	p(mrt6s_cache_cleanups, " %10llu cache cleanup%s\n");
263 	p(mrt6s_no_route, " %10llu datagram%s with no route for origin\n");
264 	p(mrt6s_bad_tunnel, " %10llu datagram%s arrived with bad tunneling\n");
265 	p(mrt6s_cant_tunnel, " %10llu datagram%s could not be tunneled\n");
266 	p(mrt6s_wrong_if, " %10llu datagram%s arrived on wrong interface\n");
267 	p(mrt6s_drop_sel, " %10llu datagram%s selectively dropped\n");
268 	p(mrt6s_q_overflow,
269 	    " %10llu datagram%s dropped due to llueue overflow\n");
270 	p(mrt6s_pkt2large, " %10llu datagram%s dropped for being too large\n");
271 #undef p
272 #undef pes
273 }
274 #endif /*INET6*/
275