xref: /netbsd/usr.bin/netstat/if.c (revision d87bcd35)
1 /*	$NetBSD: if.c,v 1.109 2022/12/28 18:34:33 mrg 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.109 2022/12/28 18:34:33 mrg Exp $");
38 #endif
39 #endif /* not lint */
40 
41 #include <sys/param.h>
42 #include <sys/types.h>
43 #include <sys/protosw.h>
44 #include <sys/socket.h>
45 #include <sys/time.h>
46 #include <sys/sysctl.h>
47 #include <sys/ioctl.h>
48 
49 #include <net/if.h>
50 #include <net/if_dl.h>
51 #include <net/if_types.h>
52 #include <net/route.h>
53 #include <netinet/in.h>
54 #include <netinet/in_var.h>
55 #include <arpa/inet.h>
56 
57 #include <kvm.h>
58 #include <signal.h>
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62 #include <unistd.h>
63 #include <netdb.h>
64 #include <err.h>
65 
66 #include "netstat.h"
67 #include "rtutil.h"
68 #include "prog_ops.h"
69 
70 #define	MAXIF	100
71 
72 #define HUMBUF_SIZE 7
73 
74 struct	iftot {
75 	char ift_name[IFNAMSIZ];	/* interface name */
76 	uint64_t ift_ip;		/* input packets */
77 	uint64_t ift_ib;		/* input bytes */
78 	uint64_t ift_ie;		/* input errors */
79 	uint64_t ift_iq;		/* input drops */
80 	uint64_t ift_op;		/* output packets */
81 	uint64_t ift_ob;		/* output bytes */
82 	uint64_t ift_oe;		/* output errors */
83 	uint64_t ift_oq;		/* output drops */
84 	uint64_t ift_co;		/* collisions */
85 };
86 
87 struct if_data_ext {
88 	uint64_t ifi_oqdrops;
89 };
90 
91 static void set_lines(void);
92 static void print_addr(const int, struct sockaddr *, struct sockaddr **,
93     struct if_data *, struct ifnet *, struct if_data_ext *);
94 static void sidewaysintpr(u_int, u_long);
95 
96 static void iftot_banner(struct iftot *);
97 static void iftot_print_sum(struct iftot *, struct iftot *);
98 static void iftot_print(struct iftot *, struct iftot *);
99 
100 static void catchalarm(int);
101 static void get_rtaddrs(int, struct sockaddr *, struct sockaddr **);
102 static void fetchifs(void);
103 
104 static int if_data_ext_get(const char *, struct if_data_ext *);
105 static void intpr_sysctl(void);
106 static void intpr_kvm(u_long, void (*)(const char *));
107 
108 struct iftot iftot[MAXIF], ip_cur, ip_old, sum_cur, sum_old;
109 static sig_atomic_t signalled;		/* set when alarm goes off */
110 
111 static unsigned redraw_lines = 21;
112 
113 static void
set_lines(void)114 set_lines(void)
115 {
116 	static bool first = true;
117 	struct ttysize ts;
118 
119 	if (!first)
120 		return;
121 	first = false;
122 	if (ioctl(STDOUT_FILENO, TIOCGSIZE, &ts) != -1 && ts.ts_lines)
123 		redraw_lines = ts.ts_lines - 3;
124 }
125 
126 
127 /*
128  * Print a description of the network interfaces.
129  * NOTE: ifnetaddr is the location of the kernel global "ifnet",
130  * which is a TAILQ_HEAD.
131  */
132 void
intpr(int interval,u_long ifnetaddr,void (* pfunc)(const char *))133 intpr(int interval, u_long ifnetaddr, void (*pfunc)(const char *))
134 {
135 
136 	if (interval) {
137 		sidewaysintpr((unsigned)interval, ifnetaddr);
138 		return;
139 	}
140 
141 	if (use_sysctl)
142 		intpr_sysctl();
143 	else
144 		intpr_kvm(ifnetaddr, pfunc);
145 }
146 
147 static void
intpr_header(void)148 intpr_header(void)
149 {
150 
151 	if (!sflag && !pflag) {
152 		if (bflag) {
153 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
154 			    "%10.10s %10.10s",
155 			    "Name", "Mtu", "Network", "Address",
156 			    "Ibytes", "Obytes");
157 		} else {
158 			printf("%-5.5s %-5.5s %-13.13s %-17.17s "
159 			    "%8.8s %5.5s",
160 			    "Name", "Mtu", "Network", "Address", "Ipkts", "Ierrs");
161 			if (dflag)
162 				printf(" %6.6s", "Idrops");
163 			printf(" %8.8s %5.5s %5.5s",
164 			    "Opkts", "Oerrs", "Colls");
165 		}
166 		if (dflag)
167 			printf(" %6.6s", "Odrops");
168 		if (tflag)
169 			printf(" %4.4s", "Time");
170 		putchar('\n');
171 	}
172 }
173 
174 int
if_data_ext_get(const char * ifname,struct if_data_ext * dext)175 if_data_ext_get(const char *ifname, struct if_data_ext *dext)
176 {
177 	char namebuf[1024];
178 	size_t len;
179 	uint64_t drops;
180 
181 	/* For sysctl */
182 	snprintf(namebuf, sizeof(namebuf),
183 	    "net.interfaces.%s.sndq.drops", ifname);
184 	len = sizeof(drops);
185 	if (sysctlbyname(namebuf, &drops, &len, NULL, 0) == -1) {
186 		warn("%s", namebuf);
187 		dext->ifi_oqdrops = 0;
188 		return -1;
189 	} else
190 		dext->ifi_oqdrops = drops;
191 
192 	return 0;
193 }
194 
195 static void
intpr_sysctl(void)196 intpr_sysctl(void)
197 {
198 	struct if_msghdr *ifm;
199 	int mib[6] = { CTL_NET, AF_ROUTE, 0, 0, NET_RT_IFLIST, 0 };
200 	static char *buf = NULL;
201 	static size_t olen;
202 	char *next, *lim, *cp;
203 	struct rt_msghdr *rtm;
204 	struct ifa_msghdr *ifam;
205 	struct if_data *ifd = NULL;
206 	struct sockaddr *sa, *rti_info[RTAX_MAX];
207 	struct sockaddr_dl *sdl;
208 	uint64_t total = 0;
209 	size_t len;
210 	int did = 1, rtax = 0, n;
211 	char name[IFNAMSIZ + 1];	/* + 1 for `*' */
212 	char origname[IFNAMSIZ];	/* without `*' */
213 	int ifindex = 0;
214 
215 	if (prog_sysctl(mib, 6, NULL, &len, NULL, 0) == -1)
216 		err(1, "sysctl");
217 	if (len > olen) {
218 		free(buf);
219 		if ((buf = malloc(len)) == NULL)
220 			err(1, NULL);
221 		olen = len;
222 	}
223 	if (prog_sysctl(mib, 6, buf, &len, NULL, 0) == -1)
224 		err(1, "sysctl");
225 
226 	intpr_header();
227 
228 	lim = buf + len;
229 	for (next = buf; next < lim; next += rtm->rtm_msglen) {
230 		struct if_data_ext dext;
231 
232 		rtm = (struct rt_msghdr *)next;
233 		if (rtm->rtm_version != RTM_VERSION)
234 			continue;
235 		switch (rtm->rtm_type) {
236 		case RTM_IFINFO:
237 			total = 0;
238 			ifm = (struct if_msghdr *)next;
239 			ifd = &ifm->ifm_data;
240 
241 			sa = (struct sockaddr *)(ifm + 1);
242 			get_rtaddrs(ifm->ifm_addrs, sa, rti_info);
243 
244 			sdl = (struct sockaddr_dl *)rti_info[RTAX_IFP];
245 			if (sdl == NULL || sdl->sdl_family != AF_LINK)
246 				continue;
247 
248 			bzero(name, sizeof(name));
249 			if (sdl->sdl_nlen >= IFNAMSIZ)
250 				memcpy(name, sdl->sdl_data, IFNAMSIZ - 1);
251 			else if (sdl->sdl_nlen > 0)
252 				memcpy(name, sdl->sdl_data, sdl->sdl_nlen);
253 
254 			if (interface != NULL && strcmp(name, interface) != 0)
255 				continue;
256 
257 			ifindex = sdl->sdl_index;
258 
259 			/* Keep the original name */
260 			strcpy(origname, name);
261 
262 			/* Mark inactive interfaces with a '*' */
263 			cp = strchr(name, '\0');
264 			if ((ifm->ifm_flags & IFF_UP) == 0) {
265 				*cp++ = '*';
266 				*cp = '\0';
267 			}
268 
269 			if (qflag) {
270 				total = ifd->ifi_ibytes + ifd->ifi_obytes +
271 				    ifd->ifi_ipackets + ifd->ifi_ierrors +
272 				    ifd->ifi_opackets + ifd->ifi_oerrors +
273 				    ifd->ifi_collisions;
274 				if (dflag)
275 					total += ifd->ifi_iqdrops;
276 				if (total == 0)
277 					continue;
278 			}
279 			/* Skip the first one */
280 			if (did) {
281 				did = 0;
282 				continue;
283 			}
284 			rtax = RTAX_IFP;
285 			break;
286 		case RTM_NEWADDR:
287 			if (qflag && total == 0)
288 				continue;
289 			if (interface != NULL && strcmp(name, interface) != 0)
290 				continue;
291 			ifam = (struct ifa_msghdr *)next;
292 			if ((ifam->ifam_addrs & (RTA_NETMASK | RTA_IFA |
293 			    RTA_BRD)) == 0)
294 				break;
295 
296 			sa = (struct sockaddr *)(ifam + 1);
297 
298 			get_rtaddrs(ifam->ifam_addrs, sa, rti_info);
299 			rtax = RTAX_IFA;
300 			did = 1;
301 			break;
302 		default:
303 			continue;
304 		}
305 		if (vflag)
306 			n = strlen(name) < 5 ? 5 : strlen(name);
307 		else
308 			n = 5;
309 
310 		printf("%-*.*s %-5" PRIu64 " ", n, n, name, ifd->ifi_mtu);
311 		if (dflag)
312 			if_data_ext_get(origname, &dext);
313 
314 		print_addr(ifindex, rti_info[rtax], rti_info, ifd,
315 		    NULL, dflag ? &dext : NULL);
316 	}
317 }
318 
319 union ifaddr_u {
320 	struct ifaddr ifa;
321 	struct in_ifaddr in;
322 #ifdef INET6
323 	struct in6_ifaddr in6;
324 #endif /* INET6 */
325 };
326 
327 static void
ifname_to_ifdata(int s,const char * ifname,struct if_data * const ifd)328 ifname_to_ifdata(int s, const char *ifname, struct if_data * const ifd)
329 {
330 	struct ifdatareq ifdr;
331 
332 	memset(ifd, 0, sizeof(*ifd));
333 	strlcpy(ifdr.ifdr_name, ifname, sizeof(ifdr.ifdr_name));
334 	if (ioctl(s, SIOCGIFDATA, &ifdr) != 0)
335 		return;
336 	memcpy(ifd, &ifdr.ifdr_data, sizeof(ifdr.ifdr_data));
337 }
338 
339 static void
intpr_kvm(u_long ifnetaddr,void (* pfunc)(const char *))340 intpr_kvm(u_long ifnetaddr, void (*pfunc)(const char *))
341 {
342 	struct ifnet ifnet;
343 	struct if_data ifd;
344 	union ifaddr_u ifaddr;
345 	u_long ifaddraddr;
346 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
347 	char name[IFNAMSIZ + 1];	/* + 1 for `*' */
348 	int s;
349 
350 	if (ifnetaddr == 0) {
351 		printf("ifnet: symbol not defined\n");
352 		return;
353 	}
354 
355 	/*
356 	 * Find the pointer to the first ifnet structure.  Replace
357 	 * the pointer to the TAILQ_HEAD with the actual pointer
358 	 * to the first list element.
359 	 */
360 	if (kread(ifnetaddr, (char *)&ifhead, sizeof ifhead))
361 		return;
362 	ifnetaddr = (u_long)ifhead.tqh_first;
363 
364 	if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
365 		return;
366 
367 	intpr_header();
368 
369 	ifaddraddr = 0;
370 	while (ifnetaddr || ifaddraddr) {
371 		char *cp;
372 		int n;
373 
374 		if (ifaddraddr == 0) {
375 			if (kread(ifnetaddr, (char *)&ifnet, sizeof ifnet))
376 				return;
377 			memmove(name, ifnet.if_xname, IFNAMSIZ);
378 			name[IFNAMSIZ - 1] = '\0';	/* sanity */
379 			ifnetaddr = (u_long)ifnet.if_list.tqe_next;
380 			if (interface != NULL && strcmp(name, interface) != 0)
381 				continue;
382 			cp = strchr(name, '\0');
383 
384 			if (pfunc) {
385 				(*pfunc)(name);
386 				continue;
387 			}
388 
389 			if ((ifnet.if_flags & IFF_UP) == 0)
390 				*cp++ = '*';
391 			*cp = '\0';
392 			ifaddraddr = (u_long)ifnet.if_addrlist.tqh_first;
393 		}
394 		if (vflag)
395 			n = strlen(name) < 5 ? 5 : strlen(name);
396 		else
397 			n = 5;
398 		printf("%-*.*s %-5llu ", n, n, name,
399 		    (unsigned long long)ifnet.if_mtu);
400 		if (ifaddraddr == 0) {
401 			printf("%-13.13s ", "none");
402 			printf("%-17.17s ", "none");
403 		} else {
404 			struct sockaddr *sa;
405 
406 			if (kread(ifaddraddr, (char *)&ifaddr, sizeof ifaddr))
407 			{
408 				ifaddraddr = 0;
409 				continue;
410 			}
411 #define CP(x) ((char *)(x))
412 			cp = (CP(ifaddr.ifa.ifa_addr) - CP(ifaddraddr)) +
413 			    CP(&ifaddr);
414 			sa = (struct sockaddr *)cp;
415 			ifname_to_ifdata(s, name, &ifd);
416 			print_addr(ifnet.if_index, sa, (void *)&ifaddr,
417 			    &ifd, &ifnet, NULL);
418 		}
419 		ifaddraddr = (u_long)ifaddr.ifa.ifa_list.tqe_next;
420 	}
421 	close(s);
422 }
423 
424 static void
mc_print(const int ifindex,const size_t ias,const char * oid,int * mcast_oids,void (* pr)(const void *))425 mc_print(const int ifindex, const size_t ias, const char *oid, int *mcast_oids,
426     void (*pr)(const void *))
427 {
428 	uint8_t *mcast_addrs, *p;
429 	const size_t incr = 2 * ias + sizeof(uint32_t);
430 	size_t len;
431 
432 	if (mcast_oids[0] == 0) {
433 		size_t oidlen = 4;
434 		if (sysctlnametomib(oid, mcast_oids, &oidlen) == -1) {
435 			warnx("'%s' not found", oid);
436 			return;
437 		}
438 		if (oidlen != 3) {
439 			warnx("Wrong OID path for '%s'", oid);
440 			return;
441 		}
442 	}
443 
444 	if (mcast_oids[3] == ifindex)
445 		return;
446 	mcast_oids[3] = ifindex;
447 
448 	mcast_addrs = asysctl(mcast_oids, 4, &len);
449 	if (mcast_addrs == NULL && len != 0) {
450 		warn("failed to read '%s'", oid);
451 		return;
452 	}
453 	if (len) {
454 		p = mcast_addrs;
455 		while (len >= incr) {
456 			(*pr)((p + ias));
457 			p += incr;
458 			len -= incr;
459 		}
460 	}
461 	free(mcast_addrs);
462 }
463 
464 #ifdef INET6
465 static void
ia6_print(const struct in6_addr * ia)466 ia6_print(const struct in6_addr *ia)
467 {
468 	struct sockaddr_in6 as6;
469 	char hbuf[NI_MAXHOST];		/* for getnameinfo() */
470 	int n;
471 
472 	memset(&as6, 0, sizeof(as6));
473 	as6.sin6_len = sizeof(struct sockaddr_in6);
474 	as6.sin6_family = AF_INET6;
475 	as6.sin6_addr = *ia;
476 	inet6_getscopeid(&as6, INET6_IS_ADDR_MC_LINKLOCAL);
477 	if (getnameinfo((struct sockaddr *)&as6, as6.sin6_len, hbuf,
478 	    sizeof(hbuf), NULL, 0, NI_NUMERICHOST) != 0) {
479 		strlcpy(hbuf, "??", sizeof(hbuf));
480 	}
481 	if (vflag)
482 		n = strlen(hbuf) < 17 ? 17 : strlen(hbuf);
483 	else
484 		n = 17;
485 	printf("\n%25s %-*.*s ", "", n, n, hbuf);
486 }
487 
488 static void
mc6_print(const int ifindex)489 mc6_print(const int ifindex)
490 {
491 	static int mcast_oids[4];
492 
493 	mc_print(ifindex, sizeof(struct in6_addr), "net.inet6.multicast",
494 	    mcast_oids, (void (*)(const void *))ia6_print);
495 }
496 #endif
497 
498 static void
ia4_print(const struct in_addr * ia)499 ia4_print(const struct in_addr *ia)
500 {
501 	printf("\n%25s %-17.17s ", "", routename4(ia->s_addr, nflag));
502 }
503 
504 static void
mc4_print(const int ifindex)505 mc4_print(const int ifindex)
506 {
507 	static int mcast_oids[4];
508 
509 	mc_print(ifindex, sizeof(struct in_addr), "net.inet.multicast",
510 	    mcast_oids, (void (*)(const void *))ia4_print);
511 }
512 
513 static void
print_addr(const int ifindex,struct sockaddr * sa,struct sockaddr ** rtinfo,struct if_data * ifd,struct ifnet * ifnet,struct if_data_ext * dext)514 print_addr(const int ifindex, struct sockaddr *sa, struct sockaddr **rtinfo,
515     struct if_data *ifd, struct ifnet *ifnet, struct if_data_ext *dext)
516 {
517 	char hexsep = '.';		/* for hexprint */
518 	static const char hexfmt[] = "%02x%c";	/* for hexprint */
519 	char hbuf[NI_MAXHOST];		/* for getnameinfo() */
520 #ifdef INET6
521 	const int niflag = NI_NUMERICHOST;
522 	struct sockaddr_in6 *sin6, *netmask6;
523 #endif
524 	struct sockaddr_in netmask;
525 	struct sockaddr_in *sin;
526 	char *cp;
527 	int n, m;
528 
529 	switch (sa->sa_family) {
530 	case AF_UNSPEC:
531 		printf("%-13.13s ", "none");
532 		printf("%-17.17s ", "none");
533 		break;
534 	case AF_INET:
535 		sin = (struct sockaddr_in *)sa;
536 		if (use_sysctl) {
537 			netmask =
538 			    *((struct sockaddr_in *)rtinfo[RTAX_NETMASK]);
539 		} else {
540 			struct in_ifaddr *ifaddr_in = (void *)rtinfo;
541 			netmask.sin_addr.s_addr = ifaddr_in->ia_subnetmask;
542 		}
543 		cp = netname4(sin, &netmask, nflag);
544 		if (vflag)
545 			n = strlen(cp) < 13 ? 13 : strlen(cp);
546 		else
547 			n = 13;
548 		printf("%-*.*s ", n, n, cp);
549 		cp = routename4(sin->sin_addr.s_addr, nflag);
550 		if (vflag)
551 			n = strlen(cp) < 17 ? 17 : strlen(cp);
552 		else
553 			n = 17;
554 		printf("%-*.*s ", n, n, cp);
555 
556 		if (!aflag)
557 			break;
558 		if (ifnet) {
559 			u_long multiaddr;
560 			struct in_multi inm;
561 			union ifaddr_u *ifaddr = (union ifaddr_u *)rtinfo;
562 
563 			multiaddr = (u_long)ifaddr->in.ia_multiaddrs.lh_first;
564 			while (multiaddr != 0) {
565 				kread(multiaddr, (char *)&inm, sizeof inm);
566 				ia4_print(&inm.inm_addr);
567 				multiaddr = (u_long)inm.inm_list.le_next;
568 			}
569 		} else
570 			mc4_print(ifindex);
571 		break;
572 #ifdef INET6
573 	case AF_INET6:
574 		sin6 = (struct sockaddr_in6 *)sa;
575 		inet6_getscopeid(sin6, INET6_IS_ADDR_LINKLOCAL);
576 #ifdef __KAME__
577 		if (!vflag)
578 			sin6->sin6_scope_id = 0;
579 #endif
580 
581 		if (use_sysctl)
582 			netmask6 = (struct sockaddr_in6 *)rtinfo[RTAX_NETMASK];
583 		else {
584 			struct in6_ifaddr *ifaddr_in6 = (void *)rtinfo;
585 			netmask6 = &ifaddr_in6->ia_prefixmask;
586 		}
587 
588 		cp = netname6(sin6, netmask6, nflag);
589 		if (vflag)
590 			n = strlen(cp) < 13 ? 13 : strlen(cp);
591 		else
592 			n = 13;
593 		printf("%-*.*s ", n, n, cp);
594 		if (getnameinfo((struct sockaddr *)sin6,
595 				sin6->sin6_len,
596 				hbuf, sizeof(hbuf), NULL, 0,
597 				niflag) != 0) {
598 			strlcpy(hbuf, "?", sizeof(hbuf));
599 		}
600 		cp = hbuf;
601 		if (vflag)
602 			n = strlen(cp) < 17 ? 17 : strlen(cp);
603 		else
604 			n = 17;
605 		printf("%-*.*s ", n, n, cp);
606 
607 		if (!aflag)
608 			break;
609 		if (ifnet) {
610 			u_long multiaddr;
611 			struct in6_multi inm;
612 			union ifaddr_u *ifaddr = (union ifaddr_u *)rtinfo;
613 
614 			multiaddr = (u_long)ifaddr->in6._ia6_multiaddrs.lh_first;
615 			while (multiaddr != 0) {
616 				kread(multiaddr, (char *)&inm, sizeof inm);
617 				ia6_print(&inm.in6m_addr);
618 				multiaddr = (u_long)inm.in6m_entry.le_next;
619 			}
620 		} else
621 			mc6_print(ifindex);
622 		break;
623 #endif /*INET6*/
624 #ifndef SMALL
625 	case AF_APPLETALK:
626 		printf("atalk:%-7.7s ", atalk_print(sa, 0x10));
627 		printf("%-17.17s ", atalk_print(sa, 0x0b));
628 		break;
629 #endif
630 	case AF_LINK:
631 		printf("%-13.13s ", "<Link>");
632 		if (getnameinfo(sa, sa->sa_len,
633 		    hbuf, sizeof(hbuf), NULL, 0,
634 		    NI_NUMERICHOST) != 0) {
635 			strlcpy(hbuf, "?", sizeof(hbuf));
636 		}
637 		cp = hbuf;
638 		if (vflag)
639 			n = strlen(cp) < 17 ? 17 : strlen(cp);
640 		else
641 			n = 17;
642 		printf("%-*.*s ", n, n, cp);
643 		break;
644 
645 	default:
646 		m = printf("(%d)", sa->sa_family);
647 		for (cp = sa->sa_len + (char *)sa;
648 			--cp > sa->sa_data && (*cp == 0);) {}
649 		n = cp - sa->sa_data + 1;
650 		cp = sa->sa_data;
651 
652 		while (--n >= 0)
653 			m += printf(hexfmt, *cp++ & 0xff,
654 				    n > 0 ? hexsep : ' ');
655 		m = 32 - m;
656 		while (m-- > 0)
657 			putchar(' ');
658 		break;
659 	}
660 
661 	if (bflag) {
662 		char humbuf[HUMBUF_SIZE];
663 
664 		if (hflag && humanize_number(humbuf, sizeof(humbuf),
665 		    ifd->ifi_ibytes, "", HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
666 			printf("%10s ", humbuf);
667 		else
668 			printf("%10llu ", (unsigned long long)ifd->ifi_ibytes);
669 
670 		if (hflag && humanize_number(humbuf, sizeof(humbuf),
671 		    ifd->ifi_obytes, "", HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
672 			printf("%10s", humbuf);
673 		else
674 			printf("%10llu", (unsigned long long)ifd->ifi_obytes);
675 	} else {
676 		printf("%8llu %5llu",
677 			(unsigned long long)ifd->ifi_ipackets,
678 			(unsigned long long)ifd->ifi_ierrors);
679 		if (dflag)
680 			printf(" %6" PRIu64, ifd->ifi_iqdrops);
681 		printf(" %8llu %5llu %5llu",
682 			(unsigned long long)ifd->ifi_opackets,
683 			(unsigned long long)ifd->ifi_oerrors,
684 			(unsigned long long)ifd->ifi_collisions);
685 	}
686 	if (dflag)
687 		printf(" %6" PRIu64, ifnet ?
688 		    ifnet->if_snd.ifq_drops : dext->ifi_oqdrops);
689 	if (tflag)
690 		printf(" %4d", ifnet ? ifnet->if_timer : 0);
691 	putchar('\n');
692 }
693 
694 static void
iftot_banner(struct iftot * ift)695 iftot_banner(struct iftot *ift)
696 {
697 	if (bflag)
698 		printf("%7.7s in %8.8s %6.6s out %5.5s",
699 		    ift->ift_name, " ",
700 		    ift->ift_name, " ");
701 	else
702 		printf("%5.5s in %5.5s%5.5s out %5.5s %5.5s",
703 		    ift->ift_name, " ",
704 		    ift->ift_name, " ", " ");
705 	if (dflag)
706 		printf(" %5.5s", " ");
707 
708 	if (bflag)
709 		printf("  %7.7s in %8.8s %6.6s out %5.5s",
710 		    "total", " ", "total", " ");
711 	else
712 		printf("  %5.5s in %5.5s%5.5s out %5.5s %5.5s",
713 		    "total", " ", "total", " ", " ");
714 	if (dflag)
715 		printf(" %5.5s", " ");
716 	putchar('\n');
717 	if (bflag)
718 		printf("%10.10s %8.8s %10.10s %5.5s",
719 		    "bytes", " ", "bytes", " ");
720 	else
721 		printf("%8.8s %5.5s %8.8s %5.5s %5.5s",
722 		    "packets", "errs", "packets", "errs", "colls");
723 	if (dflag)
724 		printf(" %5.5s", "drops");
725 
726 	if (bflag)
727 		printf("  %10.10s %8.8s %10.10s %5.5s",
728 		    "bytes", " ", "bytes", " ");
729 	else
730 		printf("  %8.8s %5.5s %8.8s %5.5s %5.5s",
731 		    "packets", "errs", "packets", "errs", "colls");
732 	if (dflag)
733 		printf(" %5.5s", "drops");
734 	putchar('\n');
735 	fflush(stdout);
736 }
737 
738 static void
iftot_print(struct iftot * cur,struct iftot * old)739 iftot_print(struct iftot *cur, struct iftot *old)
740 {
741 	if (bflag)
742 		printf("%10" PRIu64 " %8.8s %10" PRIu64 " %5.5s",
743 		    cur->ift_ib - old->ift_ib, " ",
744 		    cur->ift_ob - old->ift_ob, " ");
745 	else
746 		printf("%8" PRIu64 " %5" PRIu64 " %8" PRIu64 " %5" PRIu64 " %5" PRIu64,
747 		    cur->ift_ip - old->ift_ip,
748 		    cur->ift_ie - old->ift_ie,
749 		    cur->ift_op - old->ift_op,
750 		    cur->ift_oe - old->ift_oe,
751 		    cur->ift_co - old->ift_co);
752 	if (dflag)
753 		printf(" %5" PRIu64, cur->ift_oq - old->ift_oq);
754 }
755 
756 static void
iftot_print_sum(struct iftot * cur,struct iftot * old)757 iftot_print_sum(struct iftot *cur, struct iftot *old)
758 {
759 	if (bflag)
760 		printf("  %10" PRIu64 " %8.8s %10" PRIu64 " %5.5s",
761 		    cur->ift_ib - old->ift_ib, " ",
762 		    cur->ift_ob - old->ift_ob, " ");
763 	else
764 		printf("  %8" PRIu64 " %5" PRIu64 " %8" PRIu64 " %5" PRIu64 " %5" PRIu64,
765 		    cur->ift_ip - old->ift_ip,
766 		    cur->ift_ie - old->ift_ie,
767 		    cur->ift_op - old->ift_op,
768 		    cur->ift_oe - old->ift_oe,
769 		    cur->ift_co - old->ift_co);
770 
771 	if (dflag)
772 		printf(" %5" PRIu64, cur->ift_oq - old->ift_oq);
773 }
774 
775 __dead static void
sidewaysintpr_sysctl(unsigned interval)776 sidewaysintpr_sysctl(unsigned interval)
777 {
778 	struct itimerval it;
779 	sigset_t emptyset;
780 	sigset_t noalrm;
781 	unsigned line;
782 
783 	set_lines();
784 
785 	fetchifs();
786 	if (ip_cur.ift_name[0] == '\0') {
787 		fprintf(stderr, "%s: %s: unknown interface\n",
788 		    getprogname(), interface);
789 		exit(1);
790 	}
791 
792 	sigemptyset(&emptyset);
793 	sigemptyset(&noalrm);
794 	sigaddset(&noalrm, SIGALRM);
795 	sigprocmask(SIG_SETMASK, &noalrm, NULL);
796 
797 	signalled = 0;
798 	(void)signal(SIGALRM, catchalarm);
799 
800 	it.it_interval.tv_sec = it.it_value.tv_sec = interval;
801 	it.it_interval.tv_usec = it.it_value.tv_usec = 0;
802 	setitimer(ITIMER_REAL, &it, NULL);
803 
804 banner:
805 	iftot_banner(&ip_cur);
806 
807 	line = 0;
808 	bzero(&ip_old, sizeof(ip_old));
809 	bzero(&sum_old, sizeof(sum_old));
810 loop:
811 	bzero(&sum_cur, sizeof(sum_cur));
812 
813 	fetchifs();
814 
815 	iftot_print(&ip_cur, &ip_old);
816 
817 	ip_old = ip_cur;
818 
819 	iftot_print_sum(&sum_cur, &sum_old);
820 
821 	sum_old = sum_cur;
822 
823 	putchar('\n');
824 	fflush(stdout);
825 	line++;
826 	if (signalled == 0)
827 		sigsuspend(&emptyset);
828 
829 	signalled = 0;
830 	if (line == redraw_lines)
831 		goto banner;
832 	goto loop;
833 	/*NOTREACHED*/
834 }
835 
836 static void
sidewaysintpr_kvm(unsigned interval,u_long off)837 sidewaysintpr_kvm(unsigned interval, u_long off)
838 {
839 	struct itimerval it;
840 	sigset_t emptyset;
841 	sigset_t noalrm;
842 	struct ifnet ifnet;
843 	struct if_data ifd;
844 	u_long firstifnet;
845 	struct iftot *ip, *total;
846 	unsigned line;
847 	struct iftot *lastif, *sum, *interesting;
848 	struct ifnet_head ifhead;	/* TAILQ_HEAD */
849 	int s;
850 
851 	set_lines();
852 
853 	/*
854 	 * Find the pointer to the first ifnet structure.  Replace
855 	 * the pointer to the TAILQ_HEAD with the actual pointer
856 	 * to the first list element.
857 	 */
858 	if (kread(off, (char *)&ifhead, sizeof ifhead))
859 		return;
860 	firstifnet = (u_long)ifhead.tqh_first;
861 
862 	if ((s = socket(AF_INET, SOCK_DGRAM, 0)) == -1)
863 		return;
864 
865 	lastif = iftot;
866 	sum = iftot + MAXIF - 1;
867 	total = sum - 1;
868 	interesting = (interface == NULL) ? iftot : NULL;
869 	for (off = firstifnet, ip = iftot; off;) {
870 		if (kread(off, (char *)&ifnet, sizeof ifnet))
871 			break;
872 		memset(ip->ift_name, 0, sizeof(ip->ift_name));
873 		snprintf(ip->ift_name, IFNAMSIZ, "%s", ifnet.if_xname);
874 		if (interface && strcmp(ifnet.if_xname, interface) == 0)
875 			interesting = ip;
876 		ip++;
877 		if (ip >= iftot + MAXIF - 2)
878 			break;
879 		off = (u_long)ifnet.if_list.tqe_next;
880 	}
881 	if (interesting == NULL) {
882 		fprintf(stderr, "%s: %s: unknown interface\n",
883 		    getprogname(), interface);
884 		exit(1);
885 	}
886 	lastif = ip;
887 
888 	sigemptyset(&emptyset);
889 	sigemptyset(&noalrm);
890 	sigaddset(&noalrm, SIGALRM);
891 	sigprocmask(SIG_SETMASK, &noalrm, NULL);
892 
893 	signalled = 0;
894 	(void)signal(SIGALRM, catchalarm);
895 
896 	it.it_interval.tv_sec = it.it_value.tv_sec = interval;
897 	it.it_interval.tv_usec = it.it_value.tv_usec = 0;
898 	setitimer(ITIMER_REAL, &it, NULL);
899 
900 banner:
901 	if (bflag)
902 		printf("%7.7s in %8.8s %6.6s out %5.5s",
903 		    interesting->ift_name, " ",
904 		    interesting->ift_name, " ");
905 	else
906 		printf("%5.5s in %5.5s%5.5s out %5.5s %5.5s",
907 		    interesting->ift_name, " ",
908 		    interesting->ift_name, " ", " ");
909 	if (dflag)
910 		printf(" %5.5s", " ");
911 	if (lastif - iftot > 0) {
912 		if (bflag)
913 			printf("  %7.7s in %8.8s %6.6s out %5.5s",
914 			    "total", " ", "total", " ");
915 		else
916 			printf("  %5.5s in %5.5s%5.5s out %5.5s %5.5s",
917 			    "total", " ", "total", " ", " ");
918 		if (dflag)
919 			printf(" %5.5s", " ");
920 	}
921 	for (ip = iftot; ip < iftot + MAXIF; ip++) {
922 		ip->ift_ip = 0;
923 		ip->ift_ib = 0;
924 		ip->ift_ie = 0;
925 		ip->ift_iq = 0;
926 		ip->ift_op = 0;
927 		ip->ift_ob = 0;
928 		ip->ift_oe = 0;
929 		ip->ift_oq = 0;
930 		ip->ift_co = 0;
931 	}
932 	putchar('\n');
933 	if (bflag)
934 		printf("%10.10s %8.8s %10.10s %5.5s",
935 		    "bytes", " ", "bytes", " ");
936 	else
937 		printf("%8.8s %5.5s %8.8s %5.5s %5.5s",
938 		    "packets", "errs", "packets", "errs", "colls");
939 	if (dflag)
940 		printf(" %5.5s", "drops");
941 	if (lastif - iftot > 0) {
942 		if (bflag)
943 			printf("  %10.10s %8.8s %10.10s %5.5s",
944 			    "bytes", " ", "bytes", " ");
945 		else
946 			printf("  %8.8s %5.5s %8.8s %5.5s %5.5s",
947 			    "packets", "errs", "packets", "errs", "colls");
948 		if (dflag)
949 			printf(" %5.5s", "drops");
950 	}
951 	putchar('\n');
952 	fflush(stdout);
953 	line = 0;
954 loop:
955 	sum->ift_ip = 0;
956 	sum->ift_ib = 0;
957 	sum->ift_ie = 0;
958 	sum->ift_iq = 0;
959 	sum->ift_op = 0;
960 	sum->ift_ob = 0;
961 	sum->ift_oe = 0;
962 	sum->ift_oq = 0;
963 	sum->ift_co = 0;
964 	for (off = firstifnet, ip = iftot; off && ip < lastif; ip++) {
965 		if (kread(off, (char *)&ifnet, sizeof ifnet)) {
966 			off = 0;
967 			continue;
968 		}
969 		ifname_to_ifdata(s, ip->ift_name, &ifd);
970 		if (ip == interesting) {
971 			if (bflag) {
972 				char humbuf[HUMBUF_SIZE];
973 
974 				if (hflag && humanize_number(humbuf,
975 				    sizeof(humbuf),
976 				    ifd.ifi_ibytes - ip->ift_ib, "",
977 				    HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
978 					printf("%10s %8.8s ", humbuf, " ");
979 				else
980 					printf("%10llu %8.8s ",
981 					    (unsigned long long)
982 					    (ifd.ifi_ibytes-ip->ift_ib), " ");
983 
984 				if (hflag && humanize_number(humbuf,
985 				    sizeof(humbuf),
986 				    ifd.ifi_obytes - ip->ift_ob, "",
987 				    HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
988 					printf("%10s %5.5s", humbuf, " ");
989 				else
990 					printf("%10llu %5.5s",
991 					    (unsigned long long)
992 					    (ifd.ifi_obytes-ip->ift_ob), " ");
993 			} else {
994 				printf("%8llu %5llu %8llu %5llu %5llu",
995 				    (unsigned long long)
996 					(ifd.ifi_ipackets - ip->ift_ip),
997 				    (unsigned long long)
998 					(ifd.ifi_ierrors - ip->ift_ie),
999 				    (unsigned long long)
1000 					(ifd.ifi_opackets - ip->ift_op),
1001 				    (unsigned long long)
1002 					(ifd.ifi_oerrors - ip->ift_oe),
1003 				    (unsigned long long)
1004 					(ifd.ifi_collisions - ip->ift_co));
1005 			}
1006 			if (dflag)
1007 				printf(" %5" PRIu64,
1008 					ifnet.if_snd.ifq_drops - ip->ift_oq);
1009 		}
1010 		ip->ift_ip = ifd.ifi_ipackets;
1011 		ip->ift_ib = ifd.ifi_ibytes;
1012 		ip->ift_ie = ifd.ifi_ierrors;
1013 		ip->ift_op = ifd.ifi_opackets;
1014 		ip->ift_ob = ifd.ifi_obytes;
1015 		ip->ift_oe = ifd.ifi_oerrors;
1016 		ip->ift_co = ifd.ifi_collisions;
1017 		ip->ift_oq = ifnet.if_snd.ifq_drops;
1018 		sum->ift_ip += ip->ift_ip;
1019 		sum->ift_ib += ip->ift_ib;
1020 		sum->ift_ie += ip->ift_ie;
1021 		sum->ift_op += ip->ift_op;
1022 		sum->ift_ob += ip->ift_ob;
1023 		sum->ift_oe += ip->ift_oe;
1024 		sum->ift_co += ip->ift_co;
1025 		sum->ift_oq += ip->ift_oq;
1026 		off = (u_long)ifnet.if_list.tqe_next;
1027 	}
1028 	if (lastif - iftot > 0) {
1029 		if (bflag) {
1030 			char humbuf[HUMBUF_SIZE];
1031 
1032 			if (hflag && humanize_number(humbuf,
1033 			    sizeof(humbuf), sum->ift_ib - total->ift_ib, "",
1034 			    HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
1035 				printf("  %10s %8.8s ", humbuf, " ");
1036 			else
1037 				printf("  %10llu %8.8s ",
1038 				    (unsigned long long)
1039 				    (sum->ift_ib - total->ift_ib), " ");
1040 
1041 			if (hflag && humanize_number(humbuf,
1042 			    sizeof(humbuf), sum->ift_ob -  total->ift_ob, "",
1043 			    HN_AUTOSCALE, HN_NOSPACE | HN_B) > 0)
1044 				printf("%10s %5.5s", humbuf, " ");
1045 			else
1046 				printf("%10llu %5.5s",
1047 				    (unsigned long long)
1048 				    (sum->ift_ob - total->ift_ob), " ");
1049 		} else {
1050 			printf("  %8llu %5llu %8llu %5llu %5llu",
1051 			    (unsigned long long)
1052 				(sum->ift_ip - total->ift_ip),
1053 			    (unsigned long long)
1054 				(sum->ift_ie - total->ift_ie),
1055 			    (unsigned long long)
1056 				(sum->ift_op - total->ift_op),
1057 			    (unsigned long long)
1058 				(sum->ift_oe - total->ift_oe),
1059 			    (unsigned long long)
1060 				(sum->ift_co - total->ift_co));
1061 		}
1062 		if (dflag)
1063 			printf(" %5llu",
1064 			    (unsigned long long)(sum->ift_oq - total->ift_oq));
1065 	}
1066 	*total = *sum;
1067 	putchar('\n');
1068 	fflush(stdout);
1069 	line++;
1070 	if (signalled == 0)
1071 		sigsuspend(&emptyset);
1072 
1073 	signalled = 0;
1074 	if (line == redraw_lines)
1075 		goto banner;
1076 	goto loop;
1077 	/*NOTREACHED*/
1078 }
1079 
1080 /*
1081  * Print a running summary of interface statistics.
1082  * Repeat display every interval seconds, showing statistics
1083  * collected over that interval.  Assumes that interval is non-zero.
1084  * First line printed at top of screen is always cumulative.
1085  */
1086 static void
sidewaysintpr(unsigned int interval,u_long off)1087 sidewaysintpr(unsigned int interval, u_long off)
1088 {
1089 
1090 	if (use_sysctl)
1091 		sidewaysintpr_sysctl(interval);
1092 	else
1093 		sidewaysintpr_kvm(interval, off);
1094 }
1095 
1096 /*
1097  * Called if an interval expires before sidewaysintpr has completed a loop.
1098  * Sets a flag to not wait for the alarm.
1099  */
1100 static void
catchalarm(int signo)1101 catchalarm(int signo)
1102 {
1103 
1104 	signalled = true;
1105 }
1106 
1107 static void
get_rtaddrs(int addrs,struct sockaddr * sa,struct sockaddr ** rti_info)1108 get_rtaddrs(int addrs, struct sockaddr *sa, struct sockaddr **rti_info)
1109 {
1110 	int i;
1111 
1112 	for (i = 0; i < RTAX_MAX; i++) {
1113 		if (addrs & (1 << i)) {
1114 			rti_info[i] = sa;
1115 			sa = (struct sockaddr *)((char *)(sa) +
1116 			    RT_ROUNDUP(sa->sa_len));
1117 		} else
1118 			rti_info[i] = NULL;
1119 	}
1120 }
1121 
1122 static void
fetchifs(void)1123 fetchifs(void)
1124 {
1125 	struct if_msghdr *ifm;
1126 	int mib[6] = { CTL_NET, AF_ROUTE, 0, 0, NET_RT_IFLIST, 0 };
1127 	struct rt_msghdr *rtm;
1128 	struct if_data *ifd = NULL;
1129 	struct sockaddr *sa, *rti_info[RTAX_MAX];
1130 	struct sockaddr_dl *sdl;
1131 	static char *buf = NULL;
1132 	static size_t olen;
1133 	struct if_data_ext dext;
1134 	char *next, *lim;
1135 	char name[IFNAMSIZ];
1136 	size_t len;
1137 
1138 	if (prog_sysctl(mib, 6, NULL, &len, NULL, 0) == -1)
1139 		err(1, "sysctl");
1140 	if (len > olen) {
1141 		free(buf);
1142 		if ((buf = malloc(len)) == NULL)
1143 			err(1, NULL);
1144 		olen = len;
1145 	}
1146 	if (prog_sysctl(mib, 6, buf, &len, NULL, 0) == -1)
1147 		err(1, "sysctl");
1148 
1149 	memset(&dext, 0, sizeof(dext));
1150 	lim = buf + len;
1151 	for (next = buf; next < lim; next += rtm->rtm_msglen) {
1152 		rtm = (struct rt_msghdr *)next;
1153 		if (rtm->rtm_version != RTM_VERSION)
1154 			continue;
1155 		switch (rtm->rtm_type) {
1156 		case RTM_IFINFO:
1157 			ifm = (struct if_msghdr *)next;
1158 			ifd = &ifm->ifm_data;
1159 
1160 			sa = (struct sockaddr *)(ifm + 1);
1161 			get_rtaddrs(ifm->ifm_addrs, sa, rti_info);
1162 
1163 			sdl = (struct sockaddr_dl *)rti_info[RTAX_IFP];
1164 			if (sdl == NULL || sdl->sdl_family != AF_LINK)
1165 				continue;
1166 			bzero(name, sizeof(name));
1167 			if (sdl->sdl_nlen >= IFNAMSIZ)
1168 				memcpy(name, sdl->sdl_data, IFNAMSIZ - 1);
1169 			else if (sdl->sdl_nlen > 0)
1170 				memcpy(name, sdl->sdl_data, sdl->sdl_nlen);
1171 
1172 			if_data_ext_get(name, &dext);
1173 
1174 			if ((interface != NULL && !strcmp(name, interface)) ||
1175 			    (interface == NULL &&
1176 			    ((ip_cur.ift_ib + ip_cur.ift_ob) == 0 ||
1177 			     (ip_cur.ift_ib + ip_cur.ift_ob <
1178 			     ifd->ifi_ibytes + ifd->ifi_obytes)))) {
1179 				strlcpy(ip_cur.ift_name, name,
1180 				    sizeof(ip_cur.ift_name));
1181 				ip_cur.ift_ip = ifd->ifi_ipackets;
1182 				ip_cur.ift_ib = ifd->ifi_ibytes;
1183 				ip_cur.ift_ie = ifd->ifi_ierrors;
1184 				ip_cur.ift_op = ifd->ifi_opackets;
1185 				ip_cur.ift_ob = ifd->ifi_obytes;
1186 				ip_cur.ift_oe = ifd->ifi_oerrors;
1187 				ip_cur.ift_co = ifd->ifi_collisions;
1188 				ip_cur.ift_iq = ifd->ifi_iqdrops;
1189 				ip_cur.ift_oq = dext.ifi_oqdrops;
1190 			}
1191 
1192 			sum_cur.ift_ip += ifd->ifi_ipackets;
1193 			sum_cur.ift_ib += ifd->ifi_ibytes;
1194 			sum_cur.ift_ie += ifd->ifi_ierrors;
1195 			sum_cur.ift_op += ifd->ifi_opackets;
1196 			sum_cur.ift_ob += ifd->ifi_obytes;
1197 			sum_cur.ift_oe += ifd->ifi_oerrors;
1198 			sum_cur.ift_co += ifd->ifi_collisions;
1199 			sum_cur.ift_iq += ifd->ifi_iqdrops;
1200 			sum_cur.ift_oq += dext.ifi_oqdrops;
1201 			break;
1202 		}
1203 	}
1204 
1205 	/*
1206 	 * If we picked an interface, be sure to keep using it for the rest
1207 	 * of this instance.
1208 	 */
1209 	if (interface == NULL)
1210 		interface = ip_cur.ift_name;
1211 }
1212