src/util/os_network.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2004, 2005, 2006 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 2, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19
  20 */
  21
  22 /**
  23  * @file util/os_network.c
  24  * @brief function to determine available network interfaces
  25  * @author Nils Durner
  26  * @author Heikki Lindholm
  27  * @author Jake Dust
  28  */
  29
  30 #include "platform.h"
  31 #include "gnunet_common.h"
  32 #include "gnunet_os_lib.h"
  33
  34 /**
  35  * @brief Enumerate all network interfaces
  36  *
  37  * @param proc the callback function
  38  * @param proc_cls closure for proc
  39  */
  40 void
  41 GNUNET_OS_network_interfaces_list (GNUNET_OS_NetworkInterfaceProcessor proc,
  42                                    void *proc_cls)
  43 {
  44 #ifdef MINGW
  45   PMIB_IFTABLE pTable;
  46   PMIB_IPADDRTABLE pAddrTable;
  47   DWORD dwIfIdx, dwExternalNIC;
  48   IPAddr theIP;
  49
  50   /* Determine our external NIC  */
  51   theIP = inet_addr ("192.0.34.166");   /* www.example.com */
  52   if ((!GNGetBestInterface) ||
  53       (GNGetBestInterface (theIP, &dwExternalNIC) != NO_ERROR))
  54   {
  55     dwExternalNIC = 0;
  56   }
  57
  58   /* Enumerate NICs */
  59   EnumNICs (&pTable, &pAddrTable);
  60
  61   if (pTable)
  62   {
  63     for (dwIfIdx = 0; dwIfIdx <= pTable->dwNumEntries; dwIfIdx++)
  64     {
  65       char szEntry[1001];
  66       DWORD dwIP = 0;
  67       PIP_ADAPTER_INFO pAdapterInfo;
  68       PIP_ADAPTER_INFO pAdapter = NULL;
  69       DWORD dwRetVal = 0;
  70
  71       /* Get IP-Address */
  72       int i;
  73
  74       for (i = 0; i < pAddrTable->dwNumEntries; i++)
  75       {
  76         if (pAddrTable->table[i].dwIndex == pTable->table[dwIfIdx].dwIndex)
  77         {
  78           dwIP = pAddrTable->table[i].dwAddr;
  79           break;
  80         }
  81       }
  82
  83       if (dwIP)
  84       {
  85         BYTE bPhysAddr[MAXLEN_PHYSADDR];
  86         char *pszIfName = NULL;
  87         char dst[INET_ADDRSTRLEN];
  88         struct sockaddr_in sa;
  89
  90         /* Get friendly interface name */
  91         pAdapterInfo = (IP_ADAPTER_INFO *) malloc (sizeof (IP_ADAPTER_INFO));
  92         ULONG ulOutBufLen = sizeof (IP_ADAPTER_INFO);
  93
  94         /* Make an initial call to GetAdaptersInfo to get
  95          * the necessary size into the ulOutBufLen variable */
  96         if (GGetAdaptersInfo (pAdapterInfo, &ulOutBufLen) ==
  97             ERROR_BUFFER_OVERFLOW)
  98         {
  99           free (pAdapterInfo);
 100           pAdapterInfo = (IP_ADAPTER_INFO *) malloc (ulOutBufLen);
 101         }
 102
 103         if ((dwRetVal =
 104              GGetAdaptersInfo (pAdapterInfo, &ulOutBufLen)) == NO_ERROR)
 105         {
 106           pAdapter = pAdapterInfo;
 107           while (pAdapter)
 108           {
 109             if (pTable->table[dwIfIdx].dwIndex == pAdapter->Index)
 110             {
 111               char szKey[251];
 112               long lLen = 250;
 113
 114               sprintf (szKey,
 115                        "SYSTEM\\CurrentControlSet\\Control\\Network\\"
 116                        "{4D36E972-E325-11CE-BFC1-08002BE10318}\\%s\\Connection",
 117                        pAdapter->AdapterName);
 118               pszIfName = (char *) malloc (251);
 119               if (QueryRegistry
 120                   (HKEY_LOCAL_MACHINE, szKey, "Name", pszIfName,
 121                    &lLen) != ERROR_SUCCESS)
 122               {
 123                 free (pszIfName);
 124                 pszIfName = NULL;
 125               }
 126             }
 127             pAdapter = pAdapter->Next;
 128           }
 129         }
 130         free (pAdapterInfo);
 131
 132         /* Set entry */
 133         memset (bPhysAddr, 0, MAXLEN_PHYSADDR);
 134         memcpy (bPhysAddr, pTable->table[dwIfIdx].bPhysAddr,
 135                 pTable->table[dwIfIdx].dwPhysAddrLen);
 136
 137         snprintf (szEntry, 1000, "%s (%s - %I64u)",
 138                   pszIfName ? pszIfName : (char *) pTable->
 139                   table[dwIfIdx].bDescr, inet_ntop (AF_INET, &dwIP, dst,
 140                                                     INET_ADDRSTRLEN),
 141                   *((unsigned long long *) bPhysAddr));
 142         szEntry[1000] = 0;
 143
 144         if (pszIfName)
 145           free (pszIfName);
 146
 147         sa.sin_family = AF_INET;
 148 #if HAVE_SOCKADDR_IN_SIN_LEN
 149         sa.sin_len = (u_char) sizeof (struct sockaddr_in);
 150 #endif
 151         sa.sin_addr.S_un.S_addr = dwIP;
 152
 153         if (GNUNET_OK !=
 154             proc (proc_cls, szEntry,
 155                   pTable->table[dwIfIdx].dwIndex == dwExternalNIC,
 156                   (const struct sockaddr *) &sa, sizeof (sa)))
 157           break;
 158       }
 159     }
 160     GlobalFree (pAddrTable);
 161     GlobalFree (pTable);
 162   }
 163
 164   return;
 165
 166 #elif HAVE_GETIFADDRS && HAVE_FREEIFADDRS
 167
 168   struct ifaddrs *ifa_first;
 169   struct ifaddrs *ifa_ptr;
 170   socklen_t alen;
 171
 172   if (getifaddrs (&ifa_first) == 0)
 173   {
 174     for (ifa_ptr = ifa_first; ifa_ptr != NULL; ifa_ptr = ifa_ptr->ifa_next)
 175     {
 176       if (ifa_ptr->ifa_name != NULL && ifa_ptr->ifa_addr != NULL &&
 177           (ifa_ptr->ifa_flags & IFF_UP) != 0)
 178       {
 179         if ((ifa_ptr->ifa_addr->sa_family != AF_INET) &&
 180             (ifa_ptr->ifa_addr->sa_family != AF_INET6))
 181           continue;
 182         if (ifa_ptr->ifa_addr->sa_family == AF_INET)
 183           alen = sizeof (struct sockaddr_in);
 184         else
 185           alen = sizeof (struct sockaddr_in6);
 186         if (GNUNET_OK !=
 187             proc (proc_cls, ifa_ptr->ifa_name,
 188                   0 == strcmp (ifa_ptr->ifa_name, GNUNET_DEFAULT_INTERFACE),
 189                   ifa_ptr->ifa_addr, alen))
 190           break;
 191       }
 192     }
 193     freeifaddrs (ifa_first);
 194   }
 195 #else
 196   char line[1024];
 197   const char *start;
 198   char ifc[12];
 199   char addrstr[128];
 200   FILE *f;
 201   int have_ifc;
 202   struct sockaddr_in a4;
 203   struct sockaddr_in6 a6;
 204   struct in_addr v4;
 205   struct in6_addr v6;
 206
 207   if (system ("ifconfig -a > /dev/null 2> /dev/null"))
 208     if (system ("/sbin/ifconfig -a > /dev/null 2> /dev/null") == 0)
 209       f = popen ("/sbin/ifconfig -a 2> /dev/null", "r");
 210     else
 211       f = NULL;
 212   else
 213     f = popen ("ifconfig -a 2> /dev/null", "r");
 214   if (!f)
 215   {
 216     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING |
 217                               GNUNET_ERROR_TYPE_BULK, "popen", "ifconfig");
 218     return;
 219   }
 220
 221   have_ifc = GNUNET_NO;
 222   ifc[11] = '\0';
 223   while (NULL != fgets (line, sizeof (line), f))
 224   {
 225     if (strlen (line) == 0)
 226     {
 227       have_ifc = GNUNET_NO;
 228       continue;
 229     }
 230     if (!isspace (line[0]))
 231     {
 232       have_ifc = (1 == SSCANF (line, "%11s", ifc)) ? GNUNET_YES : GNUNET_NO;
 233       /* would end with ':' on OSX, fix it! */
 234       if (ifc[strlen (ifc) - 1] == ':')
 235         ifc[strlen (ifc) - 1] = '\0';
 236       continue;
 237     }
 238     if (!have_ifc)
 239       continue;                 /* strange input, hope for the best */
 240     start = line;
 241     while (('\0' != *start) && (isspace (*start)))
 242       start++;
 243     if (                        /* Linux */
 244          (1 == SSCANF (start, "inet addr:%127s", addrstr)) ||
 245          (1 == SSCANF (start, "inet6 addr:%127s", addrstr)) ||
 246          /* Solaris, OS X */
 247          (1 == SSCANF (start, "inet %127s", addrstr)) ||
 248          (1 == SSCANF (start, "inet6 %127s", addrstr)))
 249     {
 250       /* IPv4 */
 251       if (1 == inet_pton (AF_INET, addrstr, &v4))
 252       {
 253         memset (&a4, 0, sizeof (a4));
 254         a4.sin_family = AF_INET;
 255 #if HAVE_SOCKADDR_IN_SIN_LEN
 256         a4.sin_len = (u_char) sizeof (struct sockaddr_in);
 257 #endif
 258         a4.sin_addr = v4;
 259         if (GNUNET_OK !=
 260             proc (proc_cls, ifc, 0 == strcmp (ifc, GNUNET_DEFAULT_INTERFACE),
 261                   (const struct sockaddr *) &a4, sizeof (a4)))
 262           break;
 263         continue;
 264       }
 265       /* IPv6 */
 266       if (1 == inet_pton (AF_INET6, addrstr, &v6))
 267       {
 268         memset (&a6, 0, sizeof (a6));
 269         a6.sin6_family = AF_INET6;
 270 #if HAVE_SOCKADDR_IN_SIN_LEN
 271         a6.sin6_len = (u_char) sizeof (struct sockaddr_in6);
 272 #endif
 273         a6.sin6_addr = v6;
 274         if (GNUNET_OK !=
 275             proc (proc_cls, ifc, 0 == strcmp (ifc, GNUNET_DEFAULT_INTERFACE),
 276                   (const struct sockaddr *) &a6, sizeof (a6)))
 277           break;
 278         continue;
 279       }
 280     }
 281   }
 282   pclose (f);
 283 #endif
 284 }
 285
 286
 287 /* end of os_network.c */