xref: /freebsd/contrib/libpcap/fad-glifc.c (revision a0ee8cc636cd5c2374ec44ca71226564ea0bca95)
1 /* -*- Mode: c; tab-width: 8; indent-tabs-mode: 1; c-basic-offset: 8; -*- */
2 /*
3  * Copyright (c) 1994, 1995, 1996, 1997, 1998
4  *	The Regents of the University of California.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by the Computer Systems
17  *	Engineering Group at Lawrence Berkeley Laboratory.
18  * 4. Neither the name of the University nor of the Laboratory may be used
19  *    to endorse or promote products derived from this software without
20  *    specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #ifdef HAVE_CONFIG_H
36 #include "config.h"
37 #endif
38 
39 #include <sys/param.h>
40 #include <sys/file.h>
41 #include <sys/ioctl.h>
42 #include <sys/socket.h>
43 #ifdef HAVE_SYS_SOCKIO_H
44 #include <sys/sockio.h>
45 #endif
46 #include <sys/time.h>				/* concession to AIX */
47 
48 struct mbuf;		/* Squelch compiler warnings on some platforms for */
49 struct rtentry;		/* declarations in <net/if.h> */
50 #include <net/if.h>
51 #include <netinet/in.h>
52 
53 #include <ctype.h>
54 #include <errno.h>
55 #include <memory.h>
56 #include <stdio.h>
57 #include <stdlib.h>
58 #include <string.h>
59 #include <unistd.h>
60 
61 #include "pcap-int.h"
62 
63 #ifdef HAVE_OS_PROTO_H
64 #include "os-proto.h"
65 #endif
66 
67 /*
68  * Get a list of all interfaces that are up and that we can open.
69  * Returns -1 on error, 0 otherwise.
70  * The list, as returned through "alldevsp", may be null if no interfaces
71  * were up and could be opened.
72  *
73  * This is the implementation used on platforms that have SIOCGLIFCONF
74  * but don't have "getifaddrs()".  (Solaris 8 and later; we use
75  * SIOCGLIFCONF rather than SIOCGIFCONF in order to get IPv6 addresses.)
76  */
77 int
78 pcap_findalldevs_interfaces(pcap_if_t **alldevsp, char *errbuf)
79 {
80 	pcap_if_t *devlist = NULL;
81 	register int fd4, fd6, fd;
82 	register struct lifreq *ifrp, *ifend;
83 	struct lifnum ifn;
84 	struct lifconf ifc;
85 	char *buf = NULL;
86 	unsigned buf_size;
87 #ifdef HAVE_SOLARIS
88 	char *p, *q;
89 #endif
90 	struct lifreq ifrflags, ifrnetmask, ifrbroadaddr, ifrdstaddr;
91 	struct sockaddr *netmask, *broadaddr, *dstaddr;
92 	int ret = 0;
93 
94 	/*
95 	 * Create a socket from which to fetch the list of interfaces,
96 	 * and from which to fetch IPv4 information.
97 	 */
98 	fd4 = socket(AF_INET, SOCK_DGRAM, 0);
99 	if (fd4 < 0) {
100 		(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
101 		    "socket: %s", pcap_strerror(errno));
102 		return (-1);
103 	}
104 
105 	/*
106 	 * Create a socket from which to fetch IPv6 information.
107 	 */
108 	fd6 = socket(AF_INET6, SOCK_DGRAM, 0);
109 	if (fd6 < 0) {
110 		(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
111 		    "socket: %s", pcap_strerror(errno));
112 		(void)close(fd4);
113 		return (-1);
114 	}
115 
116 	/*
117 	 * How many entries will SIOCGLIFCONF return?
118 	 */
119 	ifn.lifn_family = AF_UNSPEC;
120 	ifn.lifn_flags = 0;
121 	ifn.lifn_count = 0;
122 	if (ioctl(fd4, SIOCGLIFNUM, (char *)&ifn) < 0) {
123 		(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
124 		    "SIOCGLIFNUM: %s", pcap_strerror(errno));
125 		(void)close(fd6);
126 		(void)close(fd4);
127 		return (-1);
128 	}
129 
130 	/*
131 	 * Allocate a buffer for those entries.
132 	 */
133 	buf_size = ifn.lifn_count * sizeof (struct lifreq);
134 	buf = malloc(buf_size);
135 	if (buf == NULL) {
136 		(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
137 		    "malloc: %s", pcap_strerror(errno));
138 		(void)close(fd6);
139 		(void)close(fd4);
140 		return (-1);
141 	}
142 
143 	/*
144 	 * Get the entries.
145 	 */
146 	ifc.lifc_len = buf_size;
147 	ifc.lifc_buf = buf;
148 	ifc.lifc_family = AF_UNSPEC;
149 	ifc.lifc_flags = 0;
150 	memset(buf, 0, buf_size);
151 	if (ioctl(fd4, SIOCGLIFCONF, (char *)&ifc) < 0) {
152 		(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
153 		    "SIOCGLIFCONF: %s", pcap_strerror(errno));
154 		(void)close(fd6);
155 		(void)close(fd4);
156 		free(buf);
157 		return (-1);
158 	}
159 
160 	/*
161 	 * Loop over the entries.
162 	 */
163 	ifrp = (struct lifreq *)buf;
164 	ifend = (struct lifreq *)(buf + ifc.lifc_len);
165 
166 	for (; ifrp < ifend; ifrp++) {
167 		/*
168 		 * IPv6 or not?
169 		 */
170 		if (((struct sockaddr *)&ifrp->lifr_addr)->sa_family == AF_INET6)
171 			fd = fd6;
172 		else
173 			fd = fd4;
174 
175 		/*
176 		 * Skip entries that begin with "dummy".
177 		 * XXX - what are these?  Is this Linux-specific?
178 		 * Are there platforms on which we shouldn't do this?
179 		 */
180 		if (strncmp(ifrp->lifr_name, "dummy", 5) == 0)
181 			continue;
182 
183 #ifdef HAVE_SOLARIS
184 		/*
185 		 * Skip entries that have a ":" followed by a number
186 		 * at the end - those are Solaris virtual interfaces
187 		 * on which you can't capture.
188 		 */
189 		p = strchr(ifrp->lifr_name, ':');
190 		if (p != NULL) {
191 			/*
192 			 * We have a ":"; is it followed by a number?
193 			 */
194 			while (isdigit((unsigned char)*p))
195 				p++;
196 			if (*p == '\0') {
197 				/*
198 				 * All digits after the ":" until the end.
199 				 */
200 				continue;
201 			}
202 		}
203 #endif
204 
205 		/*
206 		 * Get the flags for this interface.
207 		 */
208 		strncpy(ifrflags.lifr_name, ifrp->lifr_name,
209 		    sizeof(ifrflags.lifr_name));
210 		if (ioctl(fd, SIOCGLIFFLAGS, (char *)&ifrflags) < 0) {
211 			if (errno == ENXIO)
212 				continue;
213 			(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
214 			    "SIOCGLIFFLAGS: %.*s: %s",
215 			    (int)sizeof(ifrflags.lifr_name),
216 			    ifrflags.lifr_name,
217 			    pcap_strerror(errno));
218 			ret = -1;
219 			break;
220 		}
221 
222 		/*
223 		 * Get the netmask for this address on this interface.
224 		 */
225 		strncpy(ifrnetmask.lifr_name, ifrp->lifr_name,
226 		    sizeof(ifrnetmask.lifr_name));
227 		memcpy(&ifrnetmask.lifr_addr, &ifrp->lifr_addr,
228 		    sizeof(ifrnetmask.lifr_addr));
229 		if (ioctl(fd, SIOCGLIFNETMASK, (char *)&ifrnetmask) < 0) {
230 			if (errno == EADDRNOTAVAIL) {
231 				/*
232 				 * Not available.
233 				 */
234 				netmask = NULL;
235 			} else {
236 				(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
237 				    "SIOCGLIFNETMASK: %.*s: %s",
238 				    (int)sizeof(ifrnetmask.lifr_name),
239 				    ifrnetmask.lifr_name,
240 				    pcap_strerror(errno));
241 				ret = -1;
242 				break;
243 			}
244 		} else
245 			netmask = (struct sockaddr *)&ifrnetmask.lifr_addr;
246 
247 		/*
248 		 * Get the broadcast address for this address on this
249 		 * interface (if any).
250 		 */
251 		if (ifrflags.lifr_flags & IFF_BROADCAST) {
252 			strncpy(ifrbroadaddr.lifr_name, ifrp->lifr_name,
253 			    sizeof(ifrbroadaddr.lifr_name));
254 			memcpy(&ifrbroadaddr.lifr_addr, &ifrp->lifr_addr,
255 			    sizeof(ifrbroadaddr.lifr_addr));
256 			if (ioctl(fd, SIOCGLIFBRDADDR,
257 			    (char *)&ifrbroadaddr) < 0) {
258 				if (errno == EADDRNOTAVAIL) {
259 					/*
260 					 * Not available.
261 					 */
262 					broadaddr = NULL;
263 				} else {
264 					(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
265 					    "SIOCGLIFBRDADDR: %.*s: %s",
266 					    (int)sizeof(ifrbroadaddr.lifr_name),
267 					    ifrbroadaddr.lifr_name,
268 					    pcap_strerror(errno));
269 					ret = -1;
270 					break;
271 				}
272 			} else
273 				broadaddr = (struct sockaddr *)&ifrbroadaddr.lifr_broadaddr;
274 		} else {
275 			/*
276 			 * Not a broadcast interface, so no broadcast
277 			 * address.
278 			 */
279 			broadaddr = NULL;
280 		}
281 
282 		/*
283 		 * Get the destination address for this address on this
284 		 * interface (if any).
285 		 */
286 		if (ifrflags.lifr_flags & IFF_POINTOPOINT) {
287 			strncpy(ifrdstaddr.lifr_name, ifrp->lifr_name,
288 			    sizeof(ifrdstaddr.lifr_name));
289 			memcpy(&ifrdstaddr.lifr_addr, &ifrp->lifr_addr,
290 			    sizeof(ifrdstaddr.lifr_addr));
291 			if (ioctl(fd, SIOCGLIFDSTADDR,
292 			    (char *)&ifrdstaddr) < 0) {
293 				if (errno == EADDRNOTAVAIL) {
294 					/*
295 					 * Not available.
296 					 */
297 					dstaddr = NULL;
298 				} else {
299 					(void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
300 					    "SIOCGLIFDSTADDR: %.*s: %s",
301 					    (int)sizeof(ifrdstaddr.lifr_name),
302 					    ifrdstaddr.lifr_name,
303 					    pcap_strerror(errno));
304 					ret = -1;
305 					break;
306 				}
307 			} else
308 				dstaddr = (struct sockaddr *)&ifrdstaddr.lifr_dstaddr;
309 		} else
310 			dstaddr = NULL;
311 
312 #ifdef HAVE_SOLARIS
313 		/*
314 		 * If this entry has a colon followed by a number at
315 		 * the end, it's a logical interface.  Those are just
316 		 * the way you assign multiple IP addresses to a real
317 		 * interface, so an entry for a logical interface should
318 		 * be treated like the entry for the real interface;
319 		 * we do that by stripping off the ":" and the number.
320 		 */
321 		p = strchr(ifrp->lifr_name, ':');
322 		if (p != NULL) {
323 			/*
324 			 * We have a ":"; is it followed by a number?
325 			 */
326 			q = p + 1;
327 			while (isdigit((unsigned char)*q))
328 				q++;
329 			if (*q == '\0') {
330 				/*
331 				 * All digits after the ":" until the end.
332 				 * Strip off the ":" and everything after
333 				 * it.
334 				 */
335 				*p = '\0';
336 			}
337 		}
338 #endif
339 
340 		/*
341 		 * Add information for this address to the list.
342 		 */
343 		if (add_addr_to_iflist(&devlist, ifrp->lifr_name,
344 		    ifrflags.lifr_flags, (struct sockaddr *)&ifrp->lifr_addr,
345 		    sizeof (struct sockaddr_storage),
346 		    netmask, sizeof (struct sockaddr_storage),
347 		    broadaddr, sizeof (struct sockaddr_storage),
348 		    dstaddr, sizeof (struct sockaddr_storage), errbuf) < 0) {
349 			ret = -1;
350 			break;
351 		}
352 	}
353 	free(buf);
354 	(void)close(fd6);
355 	(void)close(fd4);
356 
357 	if (ret == -1) {
358 		/*
359 		 * We had an error; free the list we've been constructing.
360 		 */
361 		if (devlist != NULL) {
362 			pcap_freealldevs(devlist);
363 			devlist = NULL;
364 		}
365 	}
366 
367 	*alldevsp = devlist;
368 	return (ret);
369 }
370