xref: /freebsd/tools/tools/ifpifa/ifpifa.c (revision 42249ef2)
1 /*-
2  * Copyright (c) 2012 maksim yevmenkin <emax@freebsd.org>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted providing that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
16  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
18  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
22  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
23  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
24  * POSSIBILITY OF SUCH DAMAGE.
25  */
26 
27 /* gcc -Wall -ggdb ifpifa.c -lkvm -o ifpifa */
28 
29 #include <sys/types.h>
30 #include <sys/callout.h>
31 #include <sys/cdefs.h>
32 #include <sys/param.h>
33 #include <sys/protosw.h>
34 #include <sys/queue.h>
35 #include <sys/socket.h>
36 #include <sys/socketvar.h>
37 
38 #include <net/if.h>
39 #include <net/if_var.h>
40 #include <net/if_dl.h>
41 #include <net/if_types.h>
42 #include <net/ethernet.h>
43 #include <netinet/in.h>
44 #include <netinet/in_var.h>
45 #include <arpa/inet.h>
46 
47 #include <err.h>
48 #include <fcntl.h>
49 #include <kvm.h>
50 #include <limits.h>
51 #include <nlist.h>
52 #include <stdio.h>
53 #include <stdlib.h>
54 #include <string.h>
55 
56 __FBSDID("$FreeBSD$");
57 
58 static struct nlist	nl[] = {
59 #define N_IFNET         0
60         { .n_name = "_ifnet", },
61 	{ .n_name = NULL, },
62 };
63 
64 static int
65 kread(kvm_t *kd, u_long addr, char *buffer, int size)
66 {
67 	if (kd == NULL || buffer == NULL)
68 		return (-1);
69 
70 	if (kvm_read(kd, addr, buffer, size) != size) {
71 		warnx("kvm_read: %s", kvm_geterr(kd));
72 		return (-1);
73 	}
74 
75 	return (0);
76 }
77 
78 int
79 main(void)
80 {
81 	kvm_t *kd;
82 	char errbuf[_POSIX2_LINE_MAX];
83 	u_long ifnetaddr, ifnetaddr_next;
84 	u_long ifaddraddr, ifaddraddr_next;
85         struct ifnet ifnet;
86         struct ifnethead ifnethead;
87         union {
88 		struct ifaddr ifa;
89 		struct in_ifaddr in;
90 		struct in6_ifaddr in6;
91         } ifaddr;
92 	union {
93 		struct sockaddr	*sa;
94 		struct sockaddr_dl *sal;
95 		struct sockaddr_in *sa4;
96 		struct sockaddr_in6 *sa6;
97 	} sa;
98 	char addr[INET6_ADDRSTRLEN];
99 
100 	kd = kvm_openfiles(NULL, NULL, NULL, O_RDONLY, errbuf);
101 	if (kd == NULL) {
102 		warnx("kvm_openfiles: %s", errbuf);
103 		exit(0);
104 	}
105 
106 	if (kvm_nlist(kd, nl) < 0) {
107                 warnx("kvm_nlist: %s", kvm_geterr(kd));
108                 goto out;
109         }
110 
111 	if (nl[N_IFNET].n_type == 0) {
112 		warnx("kvm_nlist: no namelist");
113 		goto out;
114 	}
115 
116 	if (kread(kd, nl[N_IFNET].n_value,
117 		  (char *) &ifnethead, sizeof(ifnethead)) != 0)
118 		goto out;
119 
120 	for (ifnetaddr = (u_long) TAILQ_FIRST(&ifnethead);
121 	     ifnetaddr != 0;
122 	     ifnetaddr = ifnetaddr_next) {
123 		if (kread(kd, ifnetaddr, (char *) &ifnet, sizeof(ifnet)) != 0)
124 			goto out;
125 		ifnetaddr_next = (u_long) TAILQ_NEXT(&ifnet, if_link);
126 
127 		printf("%s\n", ifnet.if_xname);
128 
129 		for (ifaddraddr = (u_long) TAILQ_FIRST(&ifnet.if_addrhead);
130 		     ifaddraddr != 0;
131 		     ifaddraddr = ifaddraddr_next) {
132 			if (kread(kd, ifaddraddr,
133 				  (char *) &ifaddr, sizeof(ifaddr)) != 0)
134 				goto out;
135 
136 			ifaddraddr_next = (u_long)
137 				TAILQ_NEXT(&ifaddr.ifa, ifa_link);
138 
139 			sa.sa = (struct sockaddr *)(
140 				(unsigned char *) ifaddr.ifa.ifa_addr -
141 				(unsigned char *) ifaddraddr +
142 				(unsigned char *) &ifaddr);
143 
144 			switch (sa.sa->sa_family) {
145 			case AF_LINK:
146 				switch (sa.sal->sdl_type) {
147 				case IFT_ETHER:
148 				case IFT_FDDI:
149 	     				ether_ntoa_r((struct ether_addr * )
150 						LLADDR(sa.sal), addr);
151 					break;
152 
153 				case IFT_LOOP:
154 					strcpy(addr, "loopback");
155 					break;
156 
157 				default:
158 					snprintf(addr, sizeof(addr),
159 						 "<Link type %#x>",
160 						sa.sal->sdl_type);
161 					break;
162 				}
163 				break;
164 
165 			case AF_INET:
166 				inet_ntop(AF_INET, &sa.sa4->sin_addr,
167 					addr, sizeof(addr));
168 				break;
169 
170 			case AF_INET6:
171 				inet_ntop(AF_INET6, &sa.sa6->sin6_addr,
172 					addr, sizeof(addr));
173 				break;
174 
175 			default:
176 				snprintf(addr, sizeof(addr), "family=%d",
177 					sa.sa->sa_family);
178 				break;
179 			}
180 
181 			printf("\t%s ifa_refcnt=%u\n",
182 				addr, ifaddr.ifa.ifa_refcnt);
183 		}
184 	}
185 out:
186 	kvm_close(kd);
187 
188 	return (0);
189 }
190 
191