fixes
[oweals/gnunet.git] / 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  * @param callback the callback function
37  */
38 void
39 GNUNET_OS_network_interfaces_list (GNUNET_OS_NetworkInterfaceProcessor proc,
40                                    void *cls)
41 {
42 #ifdef MINGW
43   PMIB_IFTABLE pTable;
44   PMIB_IPADDRTABLE pAddrTable;
45   DWORD dwIfIdx, dwExternalNIC;
46   IPAddr theIP;
47
48   /* Determine our external NIC  */
49   theIP = inet_addr ("192.0.34.166");   /* www.example.com */
50   if ((!GNGetBestInterface) ||
51       (GNGetBestInterface (theIP, &dwExternalNIC) != NO_ERROR))
52     {
53       dwExternalNIC = 0;
54     }
55
56   /* Enumerate NICs */
57   EnumNICs (&pTable, &pAddrTable);
58
59   if (pTable)
60     {
61       for (dwIfIdx = 0; dwIfIdx <= pTable->dwNumEntries; dwIfIdx++)
62         {
63           char szEntry[1001];
64           DWORD dwIP = 0;
65           int iItm;
66           PIP_ADAPTER_INFO pAdapterInfo;
67           PIP_ADAPTER_INFO pAdapter = NULL;
68           DWORD dwRetVal = 0;
69
70           /* Get IP-Address */
71           int i;
72           for (i = 0; i < pAddrTable->dwNumEntries; i++)
73             {
74               if (pAddrTable->table[i].dwIndex ==
75                   pTable->table[dwIfIdx].dwIndex)
76                 {
77                   dwIP = pAddrTable->table[i].dwAddr;
78                   break;
79                 }
80             }
81
82           if (dwIP)
83             {
84               BYTE bPhysAddr[MAXLEN_PHYSADDR];
85               char *pszIfName = NULL;
86               char dst[INET_ADDRSTRLEN];
87
88               /* Get friendly interface name */
89               pAdapterInfo =
90                 (IP_ADAPTER_INFO *) malloc (sizeof (IP_ADAPTER_INFO));
91               ULONG ulOutBufLen = sizeof (IP_ADAPTER_INFO);
92
93               /* Make an initial call to GetAdaptersInfo to get
94                  the necessary size into the ulOutBufLen variable */
95               if (GGetAdaptersInfo (pAdapterInfo, &ulOutBufLen) ==
96                   ERROR_BUFFER_OVERFLOW)
97                 {
98                   free (pAdapterInfo);
99                   pAdapterInfo = (IP_ADAPTER_INFO *) malloc (ulOutBufLen);
100                 }
101
102               if ((dwRetVal =
103                    GGetAdaptersInfo (pAdapterInfo, &ulOutBufLen)) == NO_ERROR)
104                 {
105                   pAdapter = pAdapterInfo;
106                   while (pAdapter)
107                     {
108                       if (pTable->table[dwIfIdx].dwIndex == pAdapter->Index)
109                         {
110                           char szKey[251];
111                           long lLen = 250;
112
113                           sprintf (szKey,
114                                    "SYSTEM\\CurrentControlSet\\Control\\Network\\"
115                                    "{4D36E972-E325-11CE-BFC1-08002BE10318}\\%s\\Connection",
116                                    pAdapter->AdapterName);
117                           pszIfName = (char *) malloc (251);
118                           if (QueryRegistry
119                               (HKEY_LOCAL_MACHINE, szKey, "Name", pszIfName,
120                                &lLen) != ERROR_SUCCESS)
121                             {
122                               free (pszIfName);
123                               pszIfName = NULL;
124                             }
125                         }
126                       pAdapter = pAdapter->Next;
127                     }
128                 }
129               free (pAdapterInfo);
130
131               /* Set entry */
132               memset (bPhysAddr, 0, MAXLEN_PHYSADDR);
133               memcpy (bPhysAddr,
134                       pTable->table[dwIfIdx].bPhysAddr,
135                       pTable->table[dwIfIdx].dwPhysAddrLen);
136
137               snprintf (szEntry, 1000, "%s (%s - %I64u)",
138                         pszIfName ? pszIfName : (char *)
139                         pTable->table[dwIfIdx].bDescr, inet_ntop (AF_INET,
140                                                                   &dwIP, dst,
141                                                                   INET_ADDRSTRLEN),
142                         *((unsigned long long *) bPhysAddr));
143               szEntry[1000] = 0;
144
145               if (pszIfName)
146                 free (pszIfName);
147
148               if (GNUNET_OK !=
149                   proc (cls,
150                         szEntry,
151                         pAddrTable->table[dwIfIdx].dwIndex == dwExternalNIC,
152                         NULL /* FIXME: pass actual IP address! */ ,
153                         0))
154                 break;
155             }
156         }
157       GlobalFree (pAddrTable);
158       GlobalFree (pTable);
159     }
160
161   return GNUNET_YES;
162
163 #elif HAVE_GETIFADDRS && HAVE_FREEIFADDRS
164
165   struct ifaddrs *ifa_first;
166   struct ifaddrs *ifa_ptr;
167   socklen_t alen;
168
169   if (getifaddrs (&ifa_first) == 0)
170     {
171       for (ifa_ptr = ifa_first; ifa_ptr != NULL; ifa_ptr = ifa_ptr->ifa_next)
172         {
173           if (ifa_ptr->ifa_name != NULL &&
174               ifa_ptr->ifa_addr != NULL && (ifa_ptr->ifa_flags & IFF_UP) != 0)
175             {
176               if ((ifa_ptr->ifa_addr->sa_family != AF_INET) &&
177                   (ifa_ptr->ifa_addr->sa_family != AF_INET6))
178                 continue;
179               if (ifa_ptr->ifa_addr->sa_family == AF_INET)
180                 alen = sizeof (struct sockaddr_in);
181               else
182                 alen = sizeof (struct sockaddr_in6);
183               if (GNUNET_OK != proc (cls,
184                                      ifa_ptr->ifa_name,
185                                      0 == strcmp (ifa_ptr->ifa_name,
186                                                   GNUNET_DEFAULT_INTERFACE),
187                                      ifa_ptr->ifa_addr, alen))
188                 break;
189             }
190         }
191       freeifaddrs (ifa_first);
192     }
193 #else
194   char line[1024];
195   const char *start;
196   char ifc[12];
197   char addrstr[128];
198   FILE *f;
199   int have_ifc;
200   struct sockaddr_in a4;
201   struct sockaddr_in6 a6;
202   struct in_addr v4;
203   struct in6_addr v6;
204
205   if (system ("ifconfig -a > /dev/null 2> /dev/null"))
206     if (system ("/sbin/ifconfig -a > /dev/null 2> /dev/null") == 0)
207       f = popen ("/sbin/ifconfig -a 2> /dev/null", "r");
208     else
209       f = NULL;
210   else
211     f = popen ("ifconfig -a 2> /dev/null", "r");
212   if (!f)
213     {
214       GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING |
215                                 GNUNET_ERROR_TYPE_BULK, "popen", "ifconfig");
216       return;
217     }
218
219   have_ifc = GNUNET_NO;
220   ifc[11] = '\0';
221   while (NULL != fgets (line, sizeof (line), f))
222     {
223       if (strlen (line) == 0)
224         {
225           have_ifc = GNUNET_NO;
226           continue;
227         }
228       if (!isspace (line[0]))
229         {
230           have_ifc =
231             (1 == SSCANF (line, "%11s", ifc)) ? GNUNET_YES : GNUNET_NO;
232           /* would end with ':' on OSX, fix it! */
233           if (ifc[strlen (ifc) - 1] == ':')
234             ifc[strlen (ifc) - 1] = '\0';
235           continue;
236         }
237       if (!have_ifc)
238         continue;               /* strange input, hope for the best */
239       start = line;
240       while (('\0' != *start) && (isspace (*start)))
241         start++;
242       if (                      /* Linux */
243            (1 == SSCANF (start, "inet addr:%127s", addrstr)) ||
244            (1 == SSCANF (start, "inet6 addr:%127s", addrstr)) ||
245            /* Solaris, OS X */
246            (1 == SSCANF (start, "inet %127s", addrstr)) ||
247            (1 == SSCANF (start, "inet6 %127s", addrstr)))
248         {
249           /* IPv4 */
250           if (1 == inet_pton (AF_INET, addrstr, &v4))
251             {
252               memset (&a4, 0, sizeof (a4));
253               a4.sin_family = AF_INET;
254               a4.sin_addr = v4;
255               if (GNUNET_OK !=
256                   proc (cls,
257                         ifc,
258                         0 == strcmp (ifc, GNUNET_DEFAULT_INTERFACE),
259                         (const struct sockaddr *) &a4, sizeof (a4)))
260                 break;
261               continue;
262             }
263           /* IPv6 */
264           if (1 == inet_pton (AF_INET6, addrstr, &v6))
265             {
266               memset (&a6, 0, sizeof (a6));
267               a6.sin6_family = AF_INET6;
268               a6.sin6_addr = v6;
269               fprintf (stderr, "procing %s\n", addrstr);
270               if (GNUNET_OK !=
271                   proc (cls,
272                         ifc,
273                         0 == strcmp (ifc, GNUNET_DEFAULT_INTERFACE),
274                         (const struct sockaddr *) &a6, sizeof (a6)))
275                 break;
276               continue;
277             }
278         }
279     }
280   pclose (f);
281 #endif
282 }
283
284
285 /* end of os_network.c */