xref: /freebsd/contrib/libpcap/fad-glifc.c (revision b0d29bc47dba79f6f38e67eabadfb4b32ffd9390)
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_list_t *devlistp, char *errbuf,
79     int (*check_usable)(const char *), get_if_flags_func get_flags_func)
80 {
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 		pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
101 		    errno, "socket: AF_INET");
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 		pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
111 		    errno, "socket: AF_INET6");
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 		pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
124 		    errno, "SIOCGLIFNUM");
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 		pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
137 		    errno, "malloc");
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 		pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
153 		    errno, "SIOCGLIFCONF");
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 		 * Skip entries that begin with "dummy".
169 		 * XXX - what are these?  Is this Linux-specific?
170 		 * Are there platforms on which we shouldn't do this?
171 		 */
172 		if (strncmp(ifrp->lifr_name, "dummy", 5) == 0)
173 			continue;
174 
175 		/*
176 		 * Can we capture on this device?
177 		 */
178 		if (!(*check_usable)(ifrp->lifr_name)) {
179 			/*
180 			 * No.
181 			 */
182 			continue;
183 		}
184 
185 		/*
186 		 * IPv6 or not?
187 		 */
188 		if (((struct sockaddr *)&ifrp->lifr_addr)->sa_family == AF_INET6)
189 			fd = fd6;
190 		else
191 			fd = fd4;
192 
193 		/*
194 		 * Get the flags for this interface.
195 		 */
196 		strncpy(ifrflags.lifr_name, ifrp->lifr_name,
197 		    sizeof(ifrflags.lifr_name));
198 		if (ioctl(fd, SIOCGLIFFLAGS, (char *)&ifrflags) < 0) {
199 			if (errno == ENXIO)
200 				continue;
201 			pcap_fmt_errmsg_for_errno(errbuf, PCAP_ERRBUF_SIZE,
202 			    errno, "SIOCGLIFFLAGS: %.*s",
203 			    (int)sizeof(ifrflags.lifr_name),
204 			    ifrflags.lifr_name);
205 			ret = -1;
206 			break;
207 		}
208 
209 		/*
210 		 * Get the netmask for this address on this interface.
211 		 */
212 		strncpy(ifrnetmask.lifr_name, ifrp->lifr_name,
213 		    sizeof(ifrnetmask.lifr_name));
214 		memcpy(&ifrnetmask.lifr_addr, &ifrp->lifr_addr,
215 		    sizeof(ifrnetmask.lifr_addr));
216 		if (ioctl(fd, SIOCGLIFNETMASK, (char *)&ifrnetmask) < 0) {
217 			if (errno == EADDRNOTAVAIL) {
218 				/*
219 				 * Not available.
220 				 */
221 				netmask = NULL;
222 			} else {
223 				pcap_fmt_errmsg_for_errno(errbuf,
224 				    PCAP_ERRBUF_SIZE, errno,
225 				    "SIOCGLIFNETMASK: %.*s",
226 				    (int)sizeof(ifrnetmask.lifr_name),
227 				    ifrnetmask.lifr_name);
228 				ret = -1;
229 				break;
230 			}
231 		} else
232 			netmask = (struct sockaddr *)&ifrnetmask.lifr_addr;
233 
234 		/*
235 		 * Get the broadcast address for this address on this
236 		 * interface (if any).
237 		 */
238 		if (ifrflags.lifr_flags & IFF_BROADCAST) {
239 			strncpy(ifrbroadaddr.lifr_name, ifrp->lifr_name,
240 			    sizeof(ifrbroadaddr.lifr_name));
241 			memcpy(&ifrbroadaddr.lifr_addr, &ifrp->lifr_addr,
242 			    sizeof(ifrbroadaddr.lifr_addr));
243 			if (ioctl(fd, SIOCGLIFBRDADDR,
244 			    (char *)&ifrbroadaddr) < 0) {
245 				if (errno == EADDRNOTAVAIL) {
246 					/*
247 					 * Not available.
248 					 */
249 					broadaddr = NULL;
250 				} else {
251 					pcap_fmt_errmsg_for_errno(errbuf,
252 					    PCAP_ERRBUF_SIZE, errno,
253 					    "SIOCGLIFBRDADDR: %.*s",
254 					    (int)sizeof(ifrbroadaddr.lifr_name),
255 					    ifrbroadaddr.lifr_name);
256 					ret = -1;
257 					break;
258 				}
259 			} else
260 				broadaddr = (struct sockaddr *)&ifrbroadaddr.lifr_broadaddr;
261 		} else {
262 			/*
263 			 * Not a broadcast interface, so no broadcast
264 			 * address.
265 			 */
266 			broadaddr = NULL;
267 		}
268 
269 		/*
270 		 * Get the destination address for this address on this
271 		 * interface (if any).
272 		 */
273 		if (ifrflags.lifr_flags & IFF_POINTOPOINT) {
274 			strncpy(ifrdstaddr.lifr_name, ifrp->lifr_name,
275 			    sizeof(ifrdstaddr.lifr_name));
276 			memcpy(&ifrdstaddr.lifr_addr, &ifrp->lifr_addr,
277 			    sizeof(ifrdstaddr.lifr_addr));
278 			if (ioctl(fd, SIOCGLIFDSTADDR,
279 			    (char *)&ifrdstaddr) < 0) {
280 				if (errno == EADDRNOTAVAIL) {
281 					/*
282 					 * Not available.
283 					 */
284 					dstaddr = NULL;
285 				} else {
286 					pcap_fmt_errmsg_for_errno(errbuf,
287 					    PCAP_ERRBUF_SIZE, errno,
288 					    "SIOCGLIFDSTADDR: %.*s",
289 					    (int)sizeof(ifrdstaddr.lifr_name),
290 					    ifrdstaddr.lifr_name);
291 					ret = -1;
292 					break;
293 				}
294 			} else
295 				dstaddr = (struct sockaddr *)&ifrdstaddr.lifr_dstaddr;
296 		} else
297 			dstaddr = NULL;
298 
299 #ifdef HAVE_SOLARIS
300 		/*
301 		 * If this entry has a colon followed by a number at
302 		 * the end, it's a logical interface.  Those are just
303 		 * the way you assign multiple IP addresses to a real
304 		 * interface, so an entry for a logical interface should
305 		 * be treated like the entry for the real interface;
306 		 * we do that by stripping off the ":" and the number.
307 		 */
308 		p = strchr(ifrp->lifr_name, ':');
309 		if (p != NULL) {
310 			/*
311 			 * We have a ":"; is it followed by a number?
312 			 */
313 			q = p + 1;
314 			while (isdigit((unsigned char)*q))
315 				q++;
316 			if (*q == '\0') {
317 				/*
318 				 * All digits after the ":" until the end.
319 				 * Strip off the ":" and everything after
320 				 * it.
321 				 */
322 				*p = '\0';
323 			}
324 		}
325 #endif
326 
327 		/*
328 		 * Add information for this address to the list.
329 		 */
330 		if (add_addr_to_if(devlistp, ifrp->lifr_name,
331 		    ifrflags.lifr_flags, get_flags_func,
332 		    (struct sockaddr *)&ifrp->lifr_addr,
333 		    sizeof (struct sockaddr_storage),
334 		    netmask, sizeof (struct sockaddr_storage),
335 		    broadaddr, sizeof (struct sockaddr_storage),
336 		    dstaddr, sizeof (struct sockaddr_storage), errbuf) < 0) {
337 			ret = -1;
338 			break;
339 		}
340 	}
341 	free(buf);
342 	(void)close(fd6);
343 	(void)close(fd4);
344 
345 	return (ret);
346 }
347