xref: /netbsd-src/usr.bin/netstat/if.c (revision da9817918ec7e88db2912a2882967c7570a83f47)
1 /*	$NetBSD: if.c,v 1.63 2009/04/12 16:08:37 lukem Exp $	*/
2 
3 /*
4  * Copyright (c) 1983, 1988, 1993
5  *	The Regents of the University of California.  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 University 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 REGENTS 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 REGENTS 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 #include <sys/cdefs.h>
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "from: @(#)if.c	8.2 (Berkeley) 2/21/94";
36 #else
37 __RCSID("$NetBSD: if.c,v 1.63 2009/04/12 16:08:37 lukem Exp $");
38 #endif
39 #endif /* not lint */
40 
41 #include <sys/types.h>
42 #include <sys/protosw.h>
43 #include <sys/socket.h>
44 #include <sys/time.h>
45 
46 #include <net/if.h>
47 #include <net/if_dl.h>
48 #include <net/if_types.h>
49 #include <netinet/in.h>
50 #include <netinet/in_var.h>
51 #include <netiso/iso.h>
52 #include <netiso/iso_var.h>
53 #include <arpa/inet.h>
54 
55 #include <kvm.h>
56 #include <signal.h>
57 #include <stdio.h>
58 #include <stdlib.h>
59 #include <string.h>
60 #include <unistd.h>
61 #include <netdb.h>
62 
63 #include "netstat.h"
64 
65 #define	YES	1
66 #define	NO	0
67 
68 static void sidewaysintpr __P((u_int, u_long));
69 static void catchalarm __P((int));
70 
71 /*
72  * Print a description of the network interfaces.
73  * NOTE: ifnetaddr is the location of the kernel global "ifnet",
74  * which is a TAILQ_HEAD.
75  */
76 void
77 intpr(interval, ifnetaddr, pfunc)
78 	int interval;
79 	u_long ifnetaddr;
80 	void (*pfunc)(const char *);
81 {
82 	struct ifnet ifnet;
83 	union {
84 		struct ifaddr ifa;
85 		struct in_ifaddr in;
86 #ifdef INET6
87 		struct in6_ifaddr in6;
88 #endif /* INET6 */
89 		struct iso_ifaddr iso;
90 	} ifaddr;
91 	u_long ifaddraddr;
92 	struct sockaddr *sa;
93 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
94 	char name[IFNAMSIZ + 1];	/* + 1 for `*' */
95 	char hbuf[NI_MAXHOST];		/* for getnameinfo() */
96 #ifdef INET6
97 	const int niflag = NI_NUMERICHOST;
98 #endif
99 
100 	if (ifnetaddr == 0) {
101 		printf("ifnet: symbol not defined\n");
102 		return;
103 	}
104 	if (interval) {
105 		sidewaysintpr((unsigned)interval, ifnetaddr);
106 		return;
107 	}
108 
109 	/*
110 	 * Find the pointer to the first ifnet structure.  Replace
111 	 * the pointer to the TAILQ_HEAD with the actual pointer
112 	 * to the first list element.
113 	 */
114 	if (kread(ifnetaddr, (char *)&ifhead, sizeof ifhead))
115 		return;
116 	ifnetaddr = (u_long)ifhead.tqh_first;
117 
118 	if (!sflag & !pflag) {
119 		if (bflag) {
120 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
121 			       "%10.10s %10.10s",
122 			       "Name", "Mtu", "Network", "Address",
123 			       "Ibytes", "Obytes");
124 		} else {
125 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
126 			       "%8.8s %5.5s %8.8s %5.5s %5.5s",
127 			       "Name", "Mtu", "Network", "Address", "Ipkts", "Ierrs",
128 			       "Opkts", "Oerrs", "Colls");
129 		}
130 		if (tflag)
131 			printf(" %4.4s", "Time");
132 		if (dflag)
133 			printf(" %5.5s", "Drops");
134 		putchar('\n');
135 	}
136 	ifaddraddr = 0;
137 	while (ifnetaddr || ifaddraddr) {
138 		struct sockaddr_in *sin;
139 #ifdef INET6
140 		struct sockaddr_in6 *sin6;
141 #endif /* INET6 */
142 		char *cp;
143 		int n, m;
144 
145 		if (ifaddraddr == 0) {
146 			if (kread(ifnetaddr, (char *)&ifnet, sizeof ifnet))
147 				return;
148 			memmove(name, ifnet.if_xname, IFNAMSIZ);
149 			name[IFNAMSIZ - 1] = '\0';	/* sanity */
150 			ifnetaddr = (u_long)ifnet.if_list.tqe_next;
151 			if (interface != 0 && strcmp(name, interface) != 0)
152 				continue;
153 			cp = strchr(name, '\0');
154 
155 			if (pfunc) {
156 				(*pfunc)(name);
157 				continue;
158 			}
159 
160 			if ((ifnet.if_flags & IFF_UP) == 0)
161 				*cp++ = '*';
162 			*cp = '\0';
163 			ifaddraddr = (u_long)ifnet.if_addrlist.tqh_first;
164 		}
165 		if (vflag)
166 			n = strlen(name) < 5 ? 5 : strlen(name);
167 		else
168 			n = 5;
169 		printf("%-*.*s %-5llu ", n, n, name,
170 		    (unsigned long long)ifnet.if_mtu);
171 		if (ifaddraddr == 0) {
172 			printf("%-13.13s ", "none");
173 			printf("%-17.17s ", "none");
174 		} else {
175 			char hexsep = '.';		/* for hexprint */
176 			static const char hexfmt[] = "%02x%c";	/* for hexprint */
177 			if (kread(ifaddraddr, (char *)&ifaddr, sizeof ifaddr)) {
178 				ifaddraddr = 0;
179 				continue;
180 			}
181 #define CP(x) ((char *)(x))
182 			cp = (CP(ifaddr.ifa.ifa_addr) - CP(ifaddraddr)) +
183 			    CP(&ifaddr);
184 			sa = (struct sockaddr *)cp;
185 			switch (sa->sa_family) {
186 			case AF_UNSPEC:
187 				printf("%-13.13s ", "none");
188 				printf("%-17.17s ", "none");
189 				break;
190 			case AF_INET:
191 				sin = (struct sockaddr_in *)sa;
192 #ifdef notdef
193 				/*
194 				 * can't use inet_makeaddr because kernel
195 				 * keeps nets unshifted.
196 				 */
197 				in = inet_makeaddr(ifaddr.in.ia_subnet,
198 					INADDR_ANY);
199 				cp = netname4(in.s_addr,
200 					ifaddr.in.ia_subnetmask);
201 #else
202 				cp = netname4(ifaddr.in.ia_subnet,
203 					ifaddr.in.ia_subnetmask);
204 #endif
205 				if (vflag)
206 					n = strlen(cp) < 13 ? 13 : strlen(cp);
207 				else
208 					n = 13;
209 				printf("%-*.*s ", n, n, cp);
210 				cp = routename4(sin->sin_addr.s_addr);
211 				if (vflag)
212 					n = strlen(cp) < 17 ? 17 : strlen(cp);
213 				else
214 					n = 17;
215 				printf("%-*.*s ", n, n, cp);
216 				if (aflag) {
217 					u_long multiaddr;
218 					struct in_multi inm;
219 
220 					multiaddr = (u_long)
221 					    ifaddr.in.ia_multiaddrs.lh_first;
222 					while (multiaddr != 0) {
223 						kread(multiaddr, (char *)&inm,
224 						   sizeof inm);
225 						printf("\n%25s %-17.17s ", "",
226 						   routename4(
227 						      inm.inm_addr.s_addr));
228 						multiaddr =
229 						   (u_long)inm.inm_list.le_next;
230 					}
231 				}
232 				break;
233 #ifdef INET6
234 			case AF_INET6:
235 				sin6 = (struct sockaddr_in6 *)sa;
236 #ifdef __KAME__
237 				if (IN6_IS_ADDR_LINKLOCAL(&sin6->sin6_addr)) {
238 					sin6->sin6_scope_id =
239 						ntohs(*(u_int16_t *)
240 						  &sin6->sin6_addr.s6_addr[2]);
241 					/* too little width */
242 					if (!vflag)
243 						sin6->sin6_scope_id = 0;
244 					sin6->sin6_addr.s6_addr[2] = 0;
245 					sin6->sin6_addr.s6_addr[3] = 0;
246 				}
247 #endif
248 				cp = netname6(&ifaddr.in6.ia_addr,
249 					&ifaddr.in6.ia_prefixmask);
250 				if (vflag)
251 					n = strlen(cp) < 13 ? 13 : strlen(cp);
252 				else
253 					n = 13;
254 				printf("%-*.*s ", n, n, cp);
255 				if (getnameinfo((struct sockaddr *)sin6,
256 						sin6->sin6_len,
257 						hbuf, sizeof(hbuf), NULL, 0,
258 						niflag) != 0) {
259 					strlcpy(hbuf, "?", sizeof(hbuf));
260 				}
261 				cp = hbuf;
262 				if (vflag)
263 					n = strlen(cp) < 17 ? 17 : strlen(cp);
264 				else
265 					n = 17;
266 				printf("%-*.*s ", n, n, cp);
267 				if (aflag) {
268 					u_long multiaddr;
269 					struct in6_multi inm;
270 					struct sockaddr_in6 as6;
271 
272 					multiaddr = (u_long)
273 					    ifaddr.in6.ia6_multiaddrs.lh_first;
274 					while (multiaddr != 0) {
275 						kread(multiaddr, (char *)&inm,
276 						   sizeof inm);
277 						memset(&as6, 0, sizeof(as6));
278 						as6.sin6_len = sizeof(struct sockaddr_in6);
279 						as6.sin6_family = AF_INET6;
280 						as6.sin6_addr = inm.in6m_addr;
281 #ifdef __KAME__
282 						if (IN6_IS_ADDR_MC_LINKLOCAL(&as6.sin6_addr)) {
283 							as6.sin6_scope_id =
284 							    ntohs(*(u_int16_t *)
285 								&as6.sin6_addr.s6_addr[2]);
286 							as6.sin6_addr.s6_addr[2] = 0;
287 							as6.sin6_addr.s6_addr[3] = 0;
288 						}
289 #endif
290 						if (getnameinfo((struct sockaddr *)&as6,
291 						    as6.sin6_len, hbuf,
292 						    sizeof(hbuf), NULL, 0,
293 						    niflag) != 0) {
294 							strlcpy(hbuf, "??",
295 							    sizeof(hbuf));
296 						}
297 						cp = hbuf;
298 						if (vflag)
299 						    n = strlen(cp) < 17
300 							? 17 : strlen(cp);
301 						else
302 						    n = 17;
303 						printf("\n%25s %-*.*s ", "",
304 						    n, n, cp);
305 						multiaddr =
306 						   (u_long)inm.in6m_entry.le_next;
307 					}
308 				}
309 				break;
310 #endif /*INET6*/
311 #ifndef SMALL
312 			case AF_APPLETALK:
313 				printf("atalk:%-7.7s ",
314 				       atalk_print(sa,0x10));
315 				printf("%-17.17s ", atalk_print(sa,0x0b));
316 				break;
317 #endif
318 			case AF_LINK:
319 				printf("%-13.13s ", "<Link>");
320 				if (getnameinfo(sa, sa->sa_len,
321 				    hbuf, sizeof(hbuf), NULL, 0,
322 				    NI_NUMERICHOST) != 0) {
323 					strlcpy(hbuf, "?", sizeof(hbuf));
324 				}
325 				cp = hbuf;
326 				if (vflag)
327 					n = strlen(cp) < 17 ? 17 : strlen(cp);
328 				else
329 					n = 17;
330 				printf("%-*.*s ", n, n, cp);
331 				break;
332 
333 			default:
334 				m = printf("(%d)", sa->sa_family);
335 				for (cp = sa->sa_len + (char *)sa;
336 					--cp > sa->sa_data && (*cp == 0);) {}
337 				n = cp - sa->sa_data + 1;
338 				cp = sa->sa_data;
339 				while (--n >= 0)
340 					m += printf(hexfmt, *cp++ & 0xff,
341 						    n > 0 ? hexsep : ' ');
342 				m = 32 - m;
343 				while (m-- > 0)
344 					putchar(' ');
345 				break;
346 			}
347 			ifaddraddr = (u_long)ifaddr.ifa.ifa_list.tqe_next;
348 		}
349 		if (bflag) {
350 			printf("%10llu %10llu",
351 				(unsigned long long)ifnet.if_ibytes,
352 				(unsigned long long)ifnet.if_obytes);
353 		} else {
354 			printf("%8llu %5llu %8llu %5llu %5llu",
355 				(unsigned long long)ifnet.if_ipackets,
356 				(unsigned long long)ifnet.if_ierrors,
357 				(unsigned long long)ifnet.if_opackets,
358 				(unsigned long long)ifnet.if_oerrors,
359 				(unsigned long long)ifnet.if_collisions);
360 		}
361 		if (tflag)
362 			printf(" %4d", ifnet.if_timer);
363 		if (dflag)
364 			printf(" %5d", ifnet.if_snd.ifq_drops);
365 		putchar('\n');
366 	}
367 }
368 
369 #define	MAXIF	100
370 struct	iftot {
371 	char ift_name[IFNAMSIZ];	/* interface name */
372 	u_quad_t ift_ip;		/* input packets */
373 	u_quad_t ift_ib;		/* input bytes */
374 	u_quad_t ift_ie;		/* input errors */
375 	u_quad_t ift_op;		/* output packets */
376 	u_quad_t ift_ob;		/* output bytes */
377 	u_quad_t ift_oe;		/* output errors */
378 	u_quad_t ift_co;		/* collisions */
379 	int ift_dr;			/* drops */
380 } iftot[MAXIF];
381 
382 u_char	signalled;			/* set if alarm goes off "early" */
383 
384 /*
385  * Print a running summary of interface statistics.
386  * Repeat display every interval seconds, showing statistics
387  * collected over that interval.  Assumes that interval is non-zero.
388  * First line printed at top of screen is always cumulative.
389  */
390 static void
391 sidewaysintpr(interval, off)
392 	unsigned interval;
393 	u_long off;
394 {
395 	struct itimerval it;
396 	struct ifnet ifnet;
397 	u_long firstifnet;
398 	struct iftot *ip, *total;
399 	int line;
400 	struct iftot *lastif, *sum, *interesting;
401 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
402 	int oldmask;
403 
404 	/*
405 	 * Find the pointer to the first ifnet structure.  Replace
406 	 * the pointer to the TAILQ_HEAD with the actual pointer
407 	 * to the first list element.
408 	 */
409 	if (kread(off, (char *)&ifhead, sizeof ifhead))
410 		return;
411 	firstifnet = (u_long)ifhead.tqh_first;
412 
413 	lastif = iftot;
414 	sum = iftot + MAXIF - 1;
415 	total = sum - 1;
416 	interesting = (interface == NULL) ? iftot : NULL;
417 	for (off = firstifnet, ip = iftot; off;) {
418 		if (kread(off, (char *)&ifnet, sizeof ifnet))
419 			break;
420 		memset(ip->ift_name, 0, sizeof(ip->ift_name));
421 		snprintf(ip->ift_name, IFNAMSIZ, "%s", ifnet.if_xname);
422 		if (interface && strcmp(ifnet.if_xname, interface) == 0)
423 			interesting = ip;
424 		ip++;
425 		if (ip >= iftot + MAXIF - 2)
426 			break;
427 		off = (u_long)ifnet.if_list.tqe_next;
428 	}
429 	if (interesting == NULL) {
430 		fprintf(stderr, "%s: %s: unknown interface\n",
431 		    getprogname(), interface);
432 		exit(1);
433 	}
434 	lastif = ip;
435 
436 	(void)signal(SIGALRM, catchalarm);
437 	signalled = NO;
438 
439 	it.it_interval.tv_sec = it.it_value.tv_sec = interval;
440 	it.it_interval.tv_usec = it.it_value.tv_usec = 0;
441 	setitimer(ITIMER_REAL, &it, NULL);
442 
443 banner:
444 	if (bflag)
445 		printf("%7.7s in %8.8s %6.6s out %5.5s",
446 		    interesting->ift_name, " ",
447 		    interesting->ift_name, " ");
448 	else
449 		printf("%5.5s in %5.5s%5.5s out %5.5s %5.5s",
450 		    interesting->ift_name, " ",
451 		    interesting->ift_name, " ", " ");
452 	if (dflag)
453 		printf(" %5.5s", " ");
454 	if (lastif - iftot > 0) {
455 		if (bflag)
456 			printf("  %7.7s in %8.8s %6.6s out %5.5s",
457 			    "total", " ", "total", " ");
458 		else
459 			printf("  %5.5s in %5.5s%5.5s out %5.5s %5.5s",
460 			    "total", " ", "total", " ", " ");
461 		if (dflag)
462 			printf(" %5.5s", " ");
463 	}
464 	for (ip = iftot; ip < iftot + MAXIF; ip++) {
465 		ip->ift_ip = 0;
466 		ip->ift_ib = 0;
467 		ip->ift_ie = 0;
468 		ip->ift_op = 0;
469 		ip->ift_ob = 0;
470 		ip->ift_oe = 0;
471 		ip->ift_co = 0;
472 		ip->ift_dr = 0;
473 	}
474 	putchar('\n');
475 	if (bflag)
476 		printf("%10.10s %8.8s %10.10s %5.5s",
477 		    "bytes", " ", "bytes", " ");
478 	else
479 		printf("%8.8s %5.5s %8.8s %5.5s %5.5s",
480 		    "packets", "errs", "packets", "errs", "colls");
481 	if (dflag)
482 		printf(" %5.5s", "drops");
483 	if (lastif - iftot > 0) {
484 		if (bflag)
485 			printf("  %10.10s %8.8s %10.10s %5.5s",
486 			    "bytes", " ", "bytes", " ");
487 		else
488 			printf("  %8.8s %5.5s %8.8s %5.5s %5.5s",
489 			    "packets", "errs", "packets", "errs", "colls");
490 		if (dflag)
491 			printf(" %5.5s", "drops");
492 	}
493 	putchar('\n');
494 	fflush(stdout);
495 	line = 0;
496 loop:
497 	sum->ift_ip = 0;
498 	sum->ift_ib = 0;
499 	sum->ift_ie = 0;
500 	sum->ift_op = 0;
501 	sum->ift_ob = 0;
502 	sum->ift_oe = 0;
503 	sum->ift_co = 0;
504 	sum->ift_dr = 0;
505 	for (off = firstifnet, ip = iftot; off && ip < lastif; ip++) {
506 		if (kread(off, (char *)&ifnet, sizeof ifnet)) {
507 			off = 0;
508 			continue;
509 		}
510 		if (ip == interesting) {
511 			if (bflag) {
512 				printf("%10llu %8.8s %10llu %5.5s",
513 				    (unsigned long long)(ifnet.if_ibytes -
514 					ip->ift_ib), " ",
515 				    (unsigned long long)(ifnet.if_obytes -
516 					ip->ift_ob), " ");
517 			} else {
518 				printf("%8llu %5llu %8llu %5llu %5llu",
519 				    (unsigned long long)
520 					(ifnet.if_ipackets - ip->ift_ip),
521 				    (unsigned long long)
522 					(ifnet.if_ierrors - ip->ift_ie),
523 				    (unsigned long long)
524 					(ifnet.if_opackets - ip->ift_op),
525 				    (unsigned long long)
526 					(ifnet.if_oerrors - ip->ift_oe),
527 				    (unsigned long long)
528 					(ifnet.if_collisions - ip->ift_co));
529 			}
530 			if (dflag)
531 				printf(" %5llu",
532 				    (unsigned long long)
533 					(ifnet.if_snd.ifq_drops - ip->ift_dr));
534 		}
535 		ip->ift_ip = ifnet.if_ipackets;
536 		ip->ift_ib = ifnet.if_ibytes;
537 		ip->ift_ie = ifnet.if_ierrors;
538 		ip->ift_op = ifnet.if_opackets;
539 		ip->ift_ob = ifnet.if_obytes;
540 		ip->ift_oe = ifnet.if_oerrors;
541 		ip->ift_co = ifnet.if_collisions;
542 		ip->ift_dr = ifnet.if_snd.ifq_drops;
543 		sum->ift_ip += ip->ift_ip;
544 		sum->ift_ib += ip->ift_ib;
545 		sum->ift_ie += ip->ift_ie;
546 		sum->ift_op += ip->ift_op;
547 		sum->ift_ob += ip->ift_ob;
548 		sum->ift_oe += ip->ift_oe;
549 		sum->ift_co += ip->ift_co;
550 		sum->ift_dr += ip->ift_dr;
551 		off = (u_long)ifnet.if_list.tqe_next;
552 	}
553 	if (lastif - iftot > 0) {
554 		if (bflag) {
555 			printf("  %10llu %8.8s %10llu %5.5s",
556 			    (unsigned long long)
557 				(sum->ift_ib - total->ift_ib), " ",
558 			    (unsigned long long)
559 				(sum->ift_ob - total->ift_ob), " ");
560 		} else {
561 			printf("  %8llu %5llu %8llu %5llu %5llu",
562 			    (unsigned long long)
563 				(sum->ift_ip - total->ift_ip),
564 			    (unsigned long long)
565 				(sum->ift_ie - total->ift_ie),
566 			    (unsigned long long)
567 				(sum->ift_op - total->ift_op),
568 			    (unsigned long long)
569 				(sum->ift_oe - total->ift_oe),
570 			    (unsigned long long)
571 				(sum->ift_co - total->ift_co));
572 		}
573 		if (dflag)
574 			printf(" %5llu",
575 			    (unsigned long long)(sum->ift_dr - total->ift_dr));
576 	}
577 	*total = *sum;
578 	putchar('\n');
579 	fflush(stdout);
580 	line++;
581 	oldmask = sigblock(sigmask(SIGALRM));
582 	if (! signalled) {
583 		sigpause(0);
584 	}
585 	sigsetmask(oldmask);
586 	signalled = NO;
587 	if (line == 21)
588 		goto banner;
589 	goto loop;
590 	/*NOTREACHED*/
591 }
592 
593 /*
594  * Called if an interval expires before sidewaysintpr has completed a loop.
595  * Sets a flag to not wait for the alarm.
596  */
597 static void
598 catchalarm(signo)
599 	int signo;
600 {
601 
602 	signalled = YES;
603 }
604