contrib/libpcap/fad-getad.c

   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 #ifndef lint
  36 static const char rcsid[] _U_ =
  37     "@(#) $Header: /tcpdump/master/libpcap/fad-getad.c,v 1.12 2007-09-14 00:44:55 guy Exp $ (LBL)";
  38 #endif
  39
  40 #ifdef HAVE_CONFIG_H
  41 #include "config.h"
  42 #endif
  43
  44 #include <sys/types.h>
  45 #include <sys/socket.h>
  46 #include <netinet/in.h>
  47
  48 #include <net/if.h>
  49
  50 #include <ctype.h>
  51 #include <errno.h>
  52 #include <stdio.h>
  53 #include <stdlib.h>
  54 #include <string.h>
  55 #include <ifaddrs.h>
  56
  57 #include "pcap-int.h"
  58
  59 #ifdef HAVE_OS_PROTO_H
  60 #include "os-proto.h"
  61 #endif
  62
  63 #ifdef AF_PACKET
  64 # ifdef HAVE_NETPACKET_PACKET_H
  65 /* Solaris 11 and later, Linux distributions with newer glibc */
  66 #  include <netpacket/packet.h>
  67 # else /* HAVE_NETPACKET_PACKET_H */
  68 /* LynxOS, Linux distributions with older glibc */
  69 # ifdef __Lynx__
  70 /* LynxOS */
  71 #  include <netpacket/if_packet.h>
  72 # else /* __Lynx__ */
  73 /* Linux */
  74 #  include <linux/types.h>
  75 #  include <linux/if_packet.h>
  76 # endif /* __Lynx__ */
  77 # endif /* HAVE_NETPACKET_PACKET_H */
  78 #endif /* AF_PACKET */
  79
  80 /*
  81  * This is fun.
  82  *
  83  * In older BSD systems, socket addresses were fixed-length, and
  84  * "sizeof (struct sockaddr)" gave the size of the structure.
  85  * All addresses fit within a "struct sockaddr".
  86  *
  87  * In newer BSD systems, the socket address is variable-length, and
  88  * there's an "sa_len" field giving the length of the structure;
  89  * this allows socket addresses to be longer than 2 bytes of family
  90  * and 14 bytes of data.
  91  *
  92  * Some commercial UNIXes use the old BSD scheme, some use the RFC 2553
  93  * variant of the old BSD scheme (with "struct sockaddr_storage" rather
  94  * than "struct sockaddr"), and some use the new BSD scheme.
  95  *
  96  * Some versions of GNU libc use neither scheme, but has an "SA_LEN()"
  97  * macro that determines the size based on the address family.  Other
  98  * versions don't have "SA_LEN()" (as it was in drafts of RFC 2553
  99  * but not in the final version).  On the latter systems, we explicitly
 100  * check the AF_ type to determine the length; we assume that on
 101  * all those systems we have "struct sockaddr_storage".
 102  */
 103 #ifndef SA_LEN
 104 #ifdef HAVE_SOCKADDR_SA_LEN
 105 #define SA_LEN(addr)    ((addr)->sa_len)
 106 #else /* HAVE_SOCKADDR_SA_LEN */
 107 #ifdef HAVE_SOCKADDR_STORAGE
 108 static size_t
 109 get_sa_len(struct sockaddr *addr)
 110 {
 111         switch (addr->sa_family) {
 112
 113 #ifdef AF_INET
 114         case AF_INET:
 115                 return (sizeof (struct sockaddr_in));
 116 #endif
 117
 118 #ifdef AF_INET6
 119         case AF_INET6:
 120                 return (sizeof (struct sockaddr_in6));
 121 #endif
 122
 123 #ifdef AF_PACKET
 124         case AF_PACKET:
 125                 return (sizeof (struct sockaddr_ll));
 126 #endif
 127
 128         default:
 129                 return (sizeof (struct sockaddr));
 130         }
 131 }
 132 #define SA_LEN(addr)    (get_sa_len(addr))
 133 #else /* HAVE_SOCKADDR_STORAGE */
 134 #define SA_LEN(addr)    (sizeof (struct sockaddr))
 135 #endif /* HAVE_SOCKADDR_STORAGE */
 136 #endif /* HAVE_SOCKADDR_SA_LEN */
 137 #endif /* SA_LEN */
 138
 139 /*
 140  * Get a list of all interfaces that are up and that we can open.
 141  * Returns -1 on error, 0 otherwise.
 142  * The list, as returned through "alldevsp", may be null if no interfaces
 143  * were up and could be opened.
 144  */
 145 int
 146 pcap_findalldevs_interfaces(pcap_if_t **alldevsp, char *errbuf)
 147 {
 148         pcap_if_t *devlist = NULL;
 149         struct ifaddrs *ifap, *ifa;
 150         struct sockaddr *addr, *netmask, *broadaddr, *dstaddr;
 151         size_t addr_size, broadaddr_size, dstaddr_size;
 152         int ret = 0;
 153         char *p, *q;
 154
 155         /*
 156          * Get the list of interface addresses.
 157          *
 158          * Note: this won't return information about interfaces
 159          * with no addresses; are there any such interfaces
 160          * that would be capable of receiving packets?
 161          * (Interfaces incapable of receiving packets aren't
 162          * very interesting from libpcap's point of view.)
 163          *
 164          * LAN interfaces will probably have link-layer
 165          * addresses; I don't know whether all implementations
 166          * of "getifaddrs()" now, or in the future, will return
 167          * those.
 168          */
 169         if (getifaddrs(&ifap) != 0) {
 170                 (void)snprintf(errbuf, PCAP_ERRBUF_SIZE,
 171                     "getifaddrs: %s", pcap_strerror(errno));
 172                 return (-1);
 173         }
 174         for (ifa = ifap; ifa != NULL; ifa = ifa->ifa_next) {
 175                 /*
 176                  * Is this interface up?
 177                  */
 178                 if (!(ifa->ifa_flags & IFF_UP)) {
 179                         /*
 180                          * No, so don't add it to the list.
 181                          */
 182                         continue;
 183                 }
 184
 185                 /*
 186                  * "ifa_addr" was apparently null on at least one
 187                  * interface on some system.
 188                  *
 189                  * "ifa_broadaddr" may be non-null even on
 190                  * non-broadcast interfaces, and was null on
 191                  * at least one OpenBSD 3.4 system on at least
 192                  * one interface with IFF_BROADCAST set.
 193                  *
 194                  * "ifa_dstaddr" was, on at least one FreeBSD 4.1
 195                  * system, non-null on a non-point-to-point
 196                  * interface.
 197                  *
 198                  * Therefore, we supply the address and netmask only
 199                  * if "ifa_addr" is non-null (if there's no address,
 200                  * there's obviously no netmask), and supply the
 201                  * broadcast and destination addresses if the appropriate
 202                  * flag is set *and* the appropriate "ifa_" entry doesn't
 203                  * evaluate to a null pointer.
 204                  */
 205                 if (ifa->ifa_addr != NULL) {
 206                         addr = ifa->ifa_addr;
 207                         addr_size = SA_LEN(addr);
 208                         netmask = ifa->ifa_netmask;
 209                 } else {
 210                         addr = NULL;
 211                         addr_size = 0;
 212                         netmask = NULL;
 213                 }
 214                 if (ifa->ifa_flags & IFF_BROADCAST &&
 215                     ifa->ifa_broadaddr != NULL) {
 216                         broadaddr = ifa->ifa_broadaddr;
 217                         broadaddr_size = SA_LEN(broadaddr);
 218                 } else {
 219                         broadaddr = NULL;
 220                         broadaddr_size = 0;
 221                 }
 222                 if (ifa->ifa_flags & IFF_POINTOPOINT &&
 223                     ifa->ifa_dstaddr != NULL) {
 224                         dstaddr = ifa->ifa_dstaddr;
 225                         dstaddr_size = SA_LEN(ifa->ifa_dstaddr);
 226                 } else {
 227                         dstaddr = NULL;
 228                         dstaddr_size = 0;
 229                 }
 230
 231                 /*
 232                  * If this entry has a colon followed by a number at
 233                  * the end, we assume it's a logical interface.  Those
 234                  * are just the way you assign multiple IP addresses to
 235                  * a real interface on Linux, so an entry for a logical
 236                  * interface should be treated like the entry for the
 237                  * real interface; we do that by stripping off the ":"
 238                  * and the number.
 239                  *
 240                  * XXX - should we do this only on Linux?
 241                  */
 242                 p = strchr(ifa->ifa_name, ':');
 243                 if (p != NULL) {
 244                         /*
 245                          * We have a ":"; is it followed by a number?
 246                          */
 247                         q = p + 1;
 248                         while (isdigit((unsigned char)*q))
 249                                 q++;
 250                         if (*q == '\0') {
 251                                 /*
 252                                  * All digits after the ":" until the end.
 253                                  * Strip off the ":" and everything after
 254                                  * it.
 255                                  */
 256                                *p = '\0';
 257                         }
 258                 }
 259
 260                 /*
 261                  * Add information for this address to the list.
 262                  */
 263                 if (add_addr_to_iflist(&devlist, ifa->ifa_name,
 264                     ifa->ifa_flags, addr, addr_size, netmask, addr_size,
 265                     broadaddr, broadaddr_size, dstaddr, dstaddr_size,
 266                     errbuf) < 0) {
 267                         ret = -1;
 268                         break;
 269                 }
 270         }
 271
 272         freeifaddrs(ifap);
 273
 274         if (ret == -1) {
 275                 /*
 276                  * We had an error; free the list we've been constructing.
 277                  */
 278                 if (devlist != NULL) {
 279                         pcap_freealldevs(devlist);
 280                         devlist = NULL;
 281                 }
 282         }
 283
 284         *alldevsp = devlist;
 285         return (ret);
 286 }