gdi32: Use the get_clipped_rects helper in the blitting functions.
[wine/multimedia.git] / dlls / iphlpapi / ifenum.c
blob4f76d87bf269b37573fc0fb1f2be186d7ac2a2fe
1 /* Copyright (C) 2003,2006,2011 Juan Lang
3 * This library is free software; you can redistribute it and/or
4 * modify it under the terms of the GNU Lesser General Public
5 * License as published by the Free Software Foundation; either
6 * version 2.1 of the License, or (at your option) any later version.
8 * This library is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
11 * Lesser General Public License for more details.
13 * You should have received a copy of the GNU Lesser General Public
14 * License along with this library; if not, write to the Free Software
15 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
18 #include "config.h"
20 #include <stdarg.h>
21 #include <stdio.h>
22 #include <stdlib.h>
23 #include <string.h>
25 #ifdef HAVE_UNISTD_H
26 #include <unistd.h>
27 #endif
29 #include <sys/types.h>
30 #ifdef HAVE_SYS_PARAM_H
31 #include <sys/param.h>
32 #endif
34 #ifdef HAVE_SYS_SOCKET_H
35 #include <sys/socket.h>
36 #endif
38 #ifdef HAVE_NETINET_IN_H
39 #include <netinet/in.h>
40 #endif
42 #ifdef HAVE_ARPA_INET_H
43 #include <arpa/inet.h>
44 #endif
46 #ifdef HAVE_NET_IF_H
47 #include <net/if.h>
48 #endif
50 #ifdef HAVE_NET_IF_ARP_H
51 #include <net/if_arp.h>
52 #endif
54 #ifdef HAVE_NET_ROUTE_H
55 #include <net/route.h>
56 #endif
58 #ifdef HAVE_SYS_IOCTL_H
59 #include <sys/ioctl.h>
60 #endif
62 #ifdef HAVE_SYS_SYSCTL_H
63 #include <sys/sysctl.h>
64 #endif
66 #ifdef HAVE_SYS_SOCKIO_H
67 #include <sys/sockio.h>
68 #endif
70 #ifdef HAVE_NET_IF_DL_H
71 #include <net/if_dl.h>
72 #endif
74 #ifdef HAVE_NET_IF_TYPES_H
75 #include <net/if_types.h>
76 #endif
78 #ifdef HAVE_IFADDRS_H
79 #include <ifaddrs.h>
80 #endif
82 #include "ifenum.h"
83 #include "ws2ipdef.h"
85 #ifdef HAVE_STRUCT_SOCKADDR_SA_LEN
86 #define ifreq_len(ifr) \
87 max(sizeof(struct ifreq), sizeof((ifr)->ifr_name)+(ifr)->ifr_addr.sa_len)
88 #else
89 #define ifreq_len(ifr) sizeof(struct ifreq)
90 #endif
92 #ifndef ETH_ALEN
93 #define ETH_ALEN 6
94 #endif
96 #ifndef IF_NAMESIZE
97 #define IF_NAMESIZE 16
98 #endif
100 #ifndef INADDR_NONE
101 #define INADDR_NONE (~0U)
102 #endif
104 #define INITIAL_INTERFACES_ASSUMED 4
106 /* Functions */
108 static int isLoopbackInterface(int fd, const char *name)
110 int ret = 0;
112 if (name) {
113 struct ifreq ifr;
115 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
116 if (ioctl(fd, SIOCGIFFLAGS, &ifr) == 0)
117 ret = ifr.ifr_flags & IFF_LOOPBACK;
119 return ret;
122 /* The comments say MAX_ADAPTER_NAME is required, but really only IF_NAMESIZE
123 * bytes are necessary.
125 char *getInterfaceNameByIndex(IF_INDEX index, char *name)
127 return if_indextoname(index, name);
130 DWORD getInterfaceIndexByName(const char *name, IF_INDEX *index)
132 DWORD ret;
133 unsigned int idx;
135 if (!name)
136 return ERROR_INVALID_PARAMETER;
137 if (!index)
138 return ERROR_INVALID_PARAMETER;
139 idx = if_nametoindex(name);
140 if (idx) {
141 *index = idx;
142 ret = NO_ERROR;
144 else
145 ret = ERROR_INVALID_DATA;
146 return ret;
149 BOOL isIfIndexLoopback(ULONG idx)
151 BOOL ret = FALSE;
152 char name[IFNAMSIZ];
153 int fd;
155 getInterfaceNameByIndex(idx, name);
156 fd = socket(PF_INET, SOCK_DGRAM, 0);
157 if (fd != -1) {
158 ret = isLoopbackInterface(fd, name);
159 close(fd);
161 return ret;
164 DWORD getNumNonLoopbackInterfaces(void)
166 DWORD numInterfaces;
167 int fd = socket(PF_INET, SOCK_DGRAM, 0);
169 if (fd != -1) {
170 struct if_nameindex *indexes = if_nameindex();
172 if (indexes) {
173 struct if_nameindex *p;
175 for (p = indexes, numInterfaces = 0; p && p->if_name; p++)
176 if (!isLoopbackInterface(fd, p->if_name))
177 numInterfaces++;
178 if_freenameindex(indexes);
180 else
181 numInterfaces = 0;
182 close(fd);
184 else
185 numInterfaces = 0;
186 return numInterfaces;
189 DWORD getNumInterfaces(void)
191 DWORD numInterfaces;
192 struct if_nameindex *indexes = if_nameindex();
194 if (indexes) {
195 struct if_nameindex *p;
197 for (p = indexes, numInterfaces = 0; p && p->if_name; p++)
198 numInterfaces++;
199 if_freenameindex(indexes);
201 else
202 numInterfaces = 0;
203 return numInterfaces;
206 InterfaceIndexTable *getInterfaceIndexTable(void)
208 DWORD numInterfaces;
209 InterfaceIndexTable *ret;
210 struct if_nameindex *indexes = if_nameindex();
212 if (indexes) {
213 struct if_nameindex *p;
214 DWORD size = sizeof(InterfaceIndexTable);
216 for (p = indexes, numInterfaces = 0; p && p->if_name; p++)
217 numInterfaces++;
218 if (numInterfaces > 1)
219 size += (numInterfaces - 1) * sizeof(DWORD);
220 ret = HeapAlloc(GetProcessHeap(), 0, size);
221 if (ret) {
222 ret->numIndexes = 0;
223 for (p = indexes; p && p->if_name; p++)
224 ret->indexes[ret->numIndexes++] = p->if_index;
226 if_freenameindex(indexes);
228 else
229 ret = NULL;
230 return ret;
233 InterfaceIndexTable *getNonLoopbackInterfaceIndexTable(void)
235 DWORD numInterfaces;
236 InterfaceIndexTable *ret;
237 int fd = socket(PF_INET, SOCK_DGRAM, 0);
239 if (fd != -1) {
240 struct if_nameindex *indexes = if_nameindex();
242 if (indexes) {
243 struct if_nameindex *p;
244 DWORD size = sizeof(InterfaceIndexTable);
246 for (p = indexes, numInterfaces = 0; p && p->if_name; p++)
247 if (!isLoopbackInterface(fd, p->if_name))
248 numInterfaces++;
249 if (numInterfaces > 1)
250 size += (numInterfaces - 1) * sizeof(DWORD);
251 ret = HeapAlloc(GetProcessHeap(), 0, size);
252 if (ret) {
253 ret->numIndexes = 0;
254 for (p = indexes; p && p->if_name; p++)
255 if (!isLoopbackInterface(fd, p->if_name))
256 ret->indexes[ret->numIndexes++] = p->if_index;
258 if_freenameindex(indexes);
260 else
261 ret = NULL;
262 close(fd);
264 else
265 ret = NULL;
266 return ret;
269 static DWORD getInterfaceBCastAddrByName(const char *name)
271 DWORD ret = INADDR_ANY;
273 if (name) {
274 int fd = socket(PF_INET, SOCK_DGRAM, 0);
276 if (fd != -1) {
277 struct ifreq ifr;
279 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
280 if (ioctl(fd, SIOCGIFBRDADDR, &ifr) == 0)
281 memcpy(&ret, ifr.ifr_addr.sa_data + 2, sizeof(DWORD));
282 close(fd);
285 return ret;
288 static DWORD getInterfaceMaskByName(const char *name)
290 DWORD ret = INADDR_NONE;
292 if (name) {
293 int fd = socket(PF_INET, SOCK_DGRAM, 0);
295 if (fd != -1) {
296 struct ifreq ifr;
298 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
299 if (ioctl(fd, SIOCGIFNETMASK, &ifr) == 0)
300 memcpy(&ret, ifr.ifr_addr.sa_data + 2, sizeof(DWORD));
301 close(fd);
304 return ret;
307 #if defined (SIOCGIFHWADDR) && defined (HAVE_STRUCT_IFREQ_IFR_HWADDR)
308 static DWORD getInterfacePhysicalByName(const char *name, PDWORD len, PBYTE addr,
309 PDWORD type)
311 DWORD ret;
312 int fd;
314 if (!name || !len || !addr || !type)
315 return ERROR_INVALID_PARAMETER;
317 fd = socket(PF_INET, SOCK_DGRAM, 0);
318 if (fd != -1) {
319 struct ifreq ifr;
321 memset(&ifr, 0, sizeof(struct ifreq));
322 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
323 if ((ioctl(fd, SIOCGIFHWADDR, &ifr)))
324 ret = ERROR_INVALID_DATA;
325 else {
326 unsigned int addrLen;
328 switch (ifr.ifr_hwaddr.sa_family)
330 #ifdef ARPHRD_LOOPBACK
331 case ARPHRD_LOOPBACK:
332 addrLen = 0;
333 *type = MIB_IF_TYPE_LOOPBACK;
334 break;
335 #endif
336 #ifdef ARPHRD_ETHER
337 case ARPHRD_ETHER:
338 addrLen = ETH_ALEN;
339 *type = MIB_IF_TYPE_ETHERNET;
340 break;
341 #endif
342 #ifdef ARPHRD_FDDI
343 case ARPHRD_FDDI:
344 addrLen = ETH_ALEN;
345 *type = MIB_IF_TYPE_FDDI;
346 break;
347 #endif
348 #ifdef ARPHRD_IEEE802
349 case ARPHRD_IEEE802: /* 802.2 Ethernet && Token Ring, guess TR? */
350 addrLen = ETH_ALEN;
351 *type = MIB_IF_TYPE_TOKENRING;
352 break;
353 #endif
354 #ifdef ARPHRD_IEEE802_TR
355 case ARPHRD_IEEE802_TR: /* also Token Ring? */
356 addrLen = ETH_ALEN;
357 *type = MIB_IF_TYPE_TOKENRING;
358 break;
359 #endif
360 #ifdef ARPHRD_SLIP
361 case ARPHRD_SLIP:
362 addrLen = 0;
363 *type = MIB_IF_TYPE_SLIP;
364 break;
365 #endif
366 #ifdef ARPHRD_PPP
367 case ARPHRD_PPP:
368 addrLen = 0;
369 *type = MIB_IF_TYPE_PPP;
370 break;
371 #endif
372 default:
373 addrLen = min(MAX_INTERFACE_PHYSADDR, sizeof(ifr.ifr_hwaddr.sa_data));
374 *type = MIB_IF_TYPE_OTHER;
376 if (addrLen > *len) {
377 ret = ERROR_INSUFFICIENT_BUFFER;
378 *len = addrLen;
380 else {
381 if (addrLen > 0)
382 memcpy(addr, ifr.ifr_hwaddr.sa_data, addrLen);
383 /* zero out remaining bytes for broken implementations */
384 memset(addr + addrLen, 0, *len - addrLen);
385 *len = addrLen;
386 ret = NO_ERROR;
389 close(fd);
391 else
392 ret = ERROR_NO_MORE_FILES;
393 return ret;
395 #elif defined (SIOCGARP)
396 static DWORD getInterfacePhysicalByName(const char *name, PDWORD len, PBYTE addr,
397 PDWORD type)
399 DWORD ret;
400 int fd;
402 if (!name || !len || !addr || !type)
403 return ERROR_INVALID_PARAMETER;
405 fd = socket(PF_INET, SOCK_DGRAM, 0);
406 if (fd != -1) {
407 if (isLoopbackInterface(fd, name)) {
408 *type = MIB_IF_TYPE_LOOPBACK;
409 memset(addr, 0, *len);
410 *len = 0;
411 ret=NOERROR;
413 else {
414 struct arpreq arp;
415 struct sockaddr_in *saddr;
416 struct ifreq ifr;
418 /* get IP addr */
419 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
420 ioctl(fd, SIOCGIFADDR, &ifr);
421 memset(&arp, 0, sizeof(struct arpreq));
422 arp.arp_pa.sa_family = AF_INET;
423 saddr = (struct sockaddr_in *)&arp; /* proto addr is first member */
424 saddr->sin_family = AF_INET;
425 memcpy(&saddr->sin_addr.s_addr, ifr.ifr_addr.sa_data + 2, sizeof(DWORD));
426 if ((ioctl(fd, SIOCGARP, &arp)))
427 ret = ERROR_INVALID_DATA;
428 else {
429 /* FIXME: heh: who said it was ethernet? */
430 int addrLen = ETH_ALEN;
432 if (addrLen > *len) {
433 ret = ERROR_INSUFFICIENT_BUFFER;
434 *len = addrLen;
436 else {
437 if (addrLen > 0)
438 memcpy(addr, &arp.arp_ha.sa_data[0], addrLen);
439 /* zero out remaining bytes for broken implementations */
440 memset(addr + addrLen, 0, *len - addrLen);
441 *len = addrLen;
442 *type = MIB_IF_TYPE_ETHERNET;
443 ret = NO_ERROR;
447 close(fd);
449 else
450 ret = ERROR_NO_MORE_FILES;
452 return ret;
454 #elif defined (HAVE_SYS_SYSCTL_H) && defined (HAVE_NET_IF_DL_H)
455 static DWORD getInterfacePhysicalByName(const char *name, PDWORD len, PBYTE addr,
456 PDWORD type)
458 DWORD ret;
459 struct if_msghdr *ifm;
460 struct sockaddr_dl *sdl;
461 u_char *p, *buf;
462 size_t mibLen;
463 int mib[] = { CTL_NET, AF_ROUTE, 0, AF_LINK, NET_RT_IFLIST, 0 };
464 unsigned addrLen;
465 BOOL found = FALSE;
467 if (!name || !len || !addr || !type)
468 return ERROR_INVALID_PARAMETER;
470 if (sysctl(mib, 6, NULL, &mibLen, NULL, 0) < 0)
471 return ERROR_NO_MORE_FILES;
473 buf = HeapAlloc(GetProcessHeap(), 0, mibLen);
474 if (!buf)
475 return ERROR_NOT_ENOUGH_MEMORY;
477 if (sysctl(mib, 6, buf, &mibLen, NULL, 0) < 0) {
478 HeapFree(GetProcessHeap(), 0, buf);
479 return ERROR_NO_MORE_FILES;
482 ret = ERROR_INVALID_DATA;
483 for (p = buf; !found && p < buf + mibLen; p += ifm->ifm_msglen) {
484 ifm = (struct if_msghdr *)p;
485 sdl = (struct sockaddr_dl *)(ifm + 1);
487 if (ifm->ifm_type != RTM_IFINFO || (ifm->ifm_addrs & RTA_IFP) == 0)
488 continue;
490 if (sdl->sdl_family != AF_LINK || sdl->sdl_nlen == 0 ||
491 memcmp(sdl->sdl_data, name, max(sdl->sdl_nlen, strlen(name))) != 0)
492 continue;
494 found = TRUE;
495 addrLen = min(MAX_INTERFACE_PHYSADDR, sdl->sdl_alen);
496 if (addrLen > *len) {
497 ret = ERROR_INSUFFICIENT_BUFFER;
498 *len = addrLen;
500 else {
501 if (addrLen > 0)
502 memcpy(addr, LLADDR(sdl), addrLen);
503 /* zero out remaining bytes for broken implementations */
504 memset(addr + addrLen, 0, *len - addrLen);
505 *len = addrLen;
506 #if defined(HAVE_NET_IF_TYPES_H)
507 switch (sdl->sdl_type)
509 case IFT_ETHER:
510 *type = MIB_IF_TYPE_ETHERNET;
511 break;
512 case IFT_FDDI:
513 *type = MIB_IF_TYPE_FDDI;
514 break;
515 case IFT_ISO88024: /* Token Bus */
516 *type = MIB_IF_TYPE_TOKENRING;
517 break;
518 case IFT_ISO88025: /* Token Ring */
519 *type = MIB_IF_TYPE_TOKENRING;
520 break;
521 case IFT_PPP:
522 *type = MIB_IF_TYPE_PPP;
523 break;
524 case IFT_SLIP:
525 *type = MIB_IF_TYPE_SLIP;
526 break;
527 case IFT_LOOP:
528 *type = MIB_IF_TYPE_LOOPBACK;
529 break;
530 default:
531 *type = MIB_IF_TYPE_OTHER;
533 #else
534 /* default if we don't know */
535 *type = MIB_IF_TYPE_ETHERNET;
536 #endif
537 ret = NO_ERROR;
540 HeapFree(GetProcessHeap(), 0, buf);
541 return ret;
543 #endif
545 DWORD getInterfacePhysicalByIndex(IF_INDEX index, PDWORD len, PBYTE addr,
546 PDWORD type)
548 char nameBuf[IF_NAMESIZE];
549 char *name = getInterfaceNameByIndex(index, nameBuf);
551 if (name)
552 return getInterfacePhysicalByName(name, len, addr, type);
553 else
554 return ERROR_INVALID_DATA;
557 DWORD getInterfaceMtuByName(const char *name, PDWORD mtu)
559 DWORD ret;
560 int fd;
562 if (!name)
563 return ERROR_INVALID_PARAMETER;
564 if (!mtu)
565 return ERROR_INVALID_PARAMETER;
567 fd = socket(PF_INET, SOCK_DGRAM, 0);
568 if (fd != -1) {
569 struct ifreq ifr;
571 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
572 if ((ioctl(fd, SIOCGIFMTU, &ifr)))
573 ret = ERROR_INVALID_DATA;
574 else {
575 #ifndef __sun
576 *mtu = ifr.ifr_mtu;
577 #else
578 *mtu = ifr.ifr_metric;
579 #endif
580 ret = NO_ERROR;
582 close(fd);
584 else
585 ret = ERROR_NO_MORE_FILES;
586 return ret;
589 DWORD getInterfaceStatusByName(const char *name, INTERNAL_IF_OPER_STATUS *status)
591 DWORD ret;
592 int fd;
594 if (!name)
595 return ERROR_INVALID_PARAMETER;
596 if (!status)
597 return ERROR_INVALID_PARAMETER;
599 fd = socket(PF_INET, SOCK_DGRAM, 0);
600 if (fd != -1) {
601 struct ifreq ifr;
603 lstrcpynA(ifr.ifr_name, name, IFNAMSIZ);
604 if ((ioctl(fd, SIOCGIFFLAGS, &ifr)))
605 ret = ERROR_INVALID_DATA;
606 else {
607 if (ifr.ifr_flags & IFF_UP)
608 *status = MIB_IF_OPER_STATUS_OPERATIONAL;
609 else
610 *status = MIB_IF_OPER_STATUS_NON_OPERATIONAL;
611 ret = NO_ERROR;
613 close(fd);
615 else
616 ret = ERROR_NO_MORE_FILES;
617 return ret;
620 DWORD getInterfaceEntryByName(const char *name, PMIB_IFROW entry)
622 BYTE addr[MAX_INTERFACE_PHYSADDR];
623 DWORD ret, len = sizeof(addr), type;
625 if (!name)
626 return ERROR_INVALID_PARAMETER;
627 if (!entry)
628 return ERROR_INVALID_PARAMETER;
630 if (getInterfacePhysicalByName(name, &len, addr, &type) == NO_ERROR) {
631 WCHAR *assigner;
632 const char *walker;
634 memset(entry, 0, sizeof(MIB_IFROW));
635 for (assigner = entry->wszName, walker = name; *walker;
636 walker++, assigner++)
637 *assigner = *walker;
638 *assigner = 0;
639 getInterfaceIndexByName(name, &entry->dwIndex);
640 entry->dwPhysAddrLen = len;
641 memcpy(entry->bPhysAddr, addr, len);
642 memset(entry->bPhysAddr + len, 0, sizeof(entry->bPhysAddr) - len);
643 entry->dwType = type;
644 /* FIXME: how to calculate real speed? */
645 getInterfaceMtuByName(name, &entry->dwMtu);
646 /* lie, there's no "administratively down" here */
647 entry->dwAdminStatus = MIB_IF_ADMIN_STATUS_UP;
648 getInterfaceStatusByName(name, &entry->dwOperStatus);
649 /* punt on dwLastChange? */
650 entry->dwDescrLen = min(strlen(name), MAX_INTERFACE_DESCRIPTION - 1);
651 memcpy(entry->bDescr, name, entry->dwDescrLen);
652 entry->bDescr[entry->dwDescrLen] = '\0';
653 entry->dwDescrLen++;
654 ret = NO_ERROR;
656 else
657 ret = ERROR_INVALID_DATA;
658 return ret;
661 static DWORD getIPAddrRowByName(PMIB_IPADDRROW ipAddrRow, const char *ifName,
662 const struct sockaddr *sa)
664 DWORD ret, bcast;
666 ret = getInterfaceIndexByName(ifName, &ipAddrRow->dwIndex);
667 memcpy(&ipAddrRow->dwAddr, sa->sa_data + 2, sizeof(DWORD));
668 ipAddrRow->dwMask = getInterfaceMaskByName(ifName);
669 /* the dwBCastAddr member isn't the broadcast address, it indicates whether
670 * the interface uses the 1's broadcast address (1) or the 0's broadcast
671 * address (0).
673 bcast = getInterfaceBCastAddrByName(ifName);
674 ipAddrRow->dwBCastAddr = (bcast & ipAddrRow->dwMask) ? 1 : 0;
675 /* FIXME: hardcoded reasm size, not sure where to get it */
676 ipAddrRow->dwReasmSize = 65535;
677 ipAddrRow->unused1 = 0;
678 ipAddrRow->wType = 0;
679 return ret;
682 #ifdef HAVE_IFADDRS_H
684 /* Counts the IPv4 addresses in the system using the return value from
685 * getifaddrs, returning the count.
687 static DWORD countIPv4Addresses(struct ifaddrs *ifa)
689 DWORD numAddresses = 0;
691 for (; ifa; ifa = ifa->ifa_next)
692 if (ifa->ifa_addr && ifa->ifa_addr->sa_family == AF_INET)
693 numAddresses++;
694 return numAddresses;
697 DWORD getNumIPAddresses(void)
699 DWORD numAddresses = 0;
700 struct ifaddrs *ifa;
702 if (!getifaddrs(&ifa))
704 numAddresses = countIPv4Addresses(ifa);
705 freeifaddrs(ifa);
707 return numAddresses;
710 DWORD getIPAddrTable(PMIB_IPADDRTABLE *ppIpAddrTable, HANDLE heap, DWORD flags)
712 DWORD ret;
714 if (!ppIpAddrTable)
715 ret = ERROR_INVALID_PARAMETER;
716 else
718 struct ifaddrs *ifa;
720 if (!getifaddrs(&ifa))
722 DWORD size = sizeof(MIB_IPADDRTABLE);
723 DWORD numAddresses = countIPv4Addresses(ifa);
725 if (numAddresses > 1)
726 size += (numAddresses - 1) * sizeof(MIB_IPADDRROW);
727 *ppIpAddrTable = HeapAlloc(heap, flags, size);
728 if (*ppIpAddrTable)
730 DWORD i = 0;
731 struct ifaddrs *ifp;
733 ret = NO_ERROR;
734 (*ppIpAddrTable)->dwNumEntries = numAddresses;
735 for (ifp = ifa; !ret && ifp; ifp = ifp->ifa_next)
737 if (!ifp->ifa_addr || ifp->ifa_addr->sa_family != AF_INET)
738 continue;
740 ret = getIPAddrRowByName(&(*ppIpAddrTable)->table[i], ifp->ifa_name,
741 ifp->ifa_addr);
742 i++;
745 else
746 ret = ERROR_OUTOFMEMORY;
747 freeifaddrs(ifa);
749 else
750 ret = ERROR_INVALID_PARAMETER;
752 return ret;
755 ULONG v6addressesFromIndex(IF_INDEX index, SOCKET_ADDRESS **addrs, ULONG *num_addrs)
757 struct ifaddrs *ifa;
758 ULONG ret;
760 if (!getifaddrs(&ifa))
762 struct ifaddrs *p;
763 ULONG n;
764 char name[IFNAMSIZ];
766 getInterfaceNameByIndex(index, name);
767 for (p = ifa, n = 0; p; p = p->ifa_next)
768 if (p->ifa_addr && p->ifa_addr->sa_family == AF_INET6 &&
769 !strcmp(name, p->ifa_name))
770 n++;
771 if (n)
773 *addrs = HeapAlloc(GetProcessHeap(), 0, n * (sizeof(SOCKET_ADDRESS) +
774 sizeof(struct WS_sockaddr_in6)));
775 if (*addrs)
777 struct WS_sockaddr_in6 *next_addr = (struct WS_sockaddr_in6 *)(
778 (BYTE *)*addrs + n * sizeof(SOCKET_ADDRESS));
780 for (p = ifa, n = 0; p; p = p->ifa_next)
782 if (p->ifa_addr && p->ifa_addr->sa_family == AF_INET6 &&
783 !strcmp(name, p->ifa_name))
785 struct sockaddr_in6 *addr = (struct sockaddr_in6 *)p->ifa_addr;
787 next_addr->sin6_family = WS_AF_INET6;
788 next_addr->sin6_port = addr->sin6_port;
789 next_addr->sin6_flowinfo = addr->sin6_flowinfo;
790 memcpy(&next_addr->sin6_addr, &addr->sin6_addr,
791 sizeof(next_addr->sin6_addr));
792 next_addr->sin6_scope_id = addr->sin6_scope_id;
793 (*addrs)[n].lpSockaddr = (LPSOCKADDR)next_addr;
794 (*addrs)[n].iSockaddrLength = sizeof(struct WS_sockaddr_in6);
795 next_addr++;
796 n++;
799 *num_addrs = n;
800 ret = ERROR_SUCCESS;
802 else
803 ret = ERROR_OUTOFMEMORY;
805 else
807 *addrs = NULL;
808 *num_addrs = 0;
809 ret = ERROR_SUCCESS;
811 freeifaddrs(ifa);
813 else
814 ret = ERROR_NO_DATA;
815 return ret;
818 #else
820 /* Enumerates the IP addresses in the system using SIOCGIFCONF, returning
821 * the count to you in *pcAddresses. It also returns to you the struct ifconf
822 * used by the call to ioctl, so that you may process the addresses further.
823 * Free ifc->ifc_buf using HeapFree.
824 * Returns NO_ERROR on success, something else on failure.
826 static DWORD enumIPAddresses(PDWORD pcAddresses, struct ifconf *ifc)
828 DWORD ret;
829 int fd;
831 fd = socket(PF_INET, SOCK_DGRAM, 0);
832 if (fd != -1) {
833 int ioctlRet = 0;
834 DWORD guessedNumAddresses = 0, numAddresses = 0;
835 caddr_t ifPtr;
836 int lastlen;
838 ret = NO_ERROR;
839 ifc->ifc_len = 0;
840 ifc->ifc_buf = NULL;
841 /* there is no way to know the interface count beforehand,
842 so we need to loop again and again upping our max each time
843 until returned is constant across 2 calls */
844 do {
845 lastlen = ifc->ifc_len;
846 HeapFree(GetProcessHeap(), 0, ifc->ifc_buf);
847 if (guessedNumAddresses == 0)
848 guessedNumAddresses = INITIAL_INTERFACES_ASSUMED;
849 else
850 guessedNumAddresses *= 2;
851 ifc->ifc_len = sizeof(struct ifreq) * guessedNumAddresses;
852 ifc->ifc_buf = HeapAlloc(GetProcessHeap(), 0, ifc->ifc_len);
853 ioctlRet = ioctl(fd, SIOCGIFCONF, ifc);
854 } while ((ioctlRet == 0) && (ifc->ifc_len != lastlen));
856 if (ioctlRet == 0) {
857 ifPtr = ifc->ifc_buf;
858 while (ifPtr && ifPtr < ifc->ifc_buf + ifc->ifc_len) {
859 struct ifreq *ifr = (struct ifreq *)ifPtr;
861 if (ifr->ifr_addr.sa_family == AF_INET)
862 numAddresses++;
864 ifPtr += ifreq_len((struct ifreq *)ifPtr);
867 else
868 ret = ERROR_INVALID_PARAMETER; /* FIXME: map from errno to Win32 */
869 if (!ret)
870 *pcAddresses = numAddresses;
871 else
873 HeapFree(GetProcessHeap(), 0, ifc->ifc_buf);
874 ifc->ifc_buf = NULL;
876 close(fd);
878 else
879 ret = ERROR_NO_SYSTEM_RESOURCES;
880 return ret;
883 DWORD getNumIPAddresses(void)
885 DWORD numAddresses = 0;
886 struct ifconf ifc;
888 if (!enumIPAddresses(&numAddresses, &ifc))
889 HeapFree(GetProcessHeap(), 0, ifc.ifc_buf);
890 return numAddresses;
893 DWORD getIPAddrTable(PMIB_IPADDRTABLE *ppIpAddrTable, HANDLE heap, DWORD flags)
895 DWORD ret;
897 if (!ppIpAddrTable)
898 ret = ERROR_INVALID_PARAMETER;
899 else
901 DWORD numAddresses = 0;
902 struct ifconf ifc;
904 ret = enumIPAddresses(&numAddresses, &ifc);
905 if (!ret)
907 DWORD size = sizeof(MIB_IPADDRTABLE);
909 if (numAddresses > 1)
910 size += (numAddresses - 1) * sizeof(MIB_IPADDRROW);
911 *ppIpAddrTable = HeapAlloc(heap, flags, size);
912 if (*ppIpAddrTable) {
913 DWORD i = 0;
914 caddr_t ifPtr;
916 ret = NO_ERROR;
917 (*ppIpAddrTable)->dwNumEntries = numAddresses;
918 ifPtr = ifc.ifc_buf;
919 while (!ret && ifPtr && ifPtr < ifc.ifc_buf + ifc.ifc_len) {
920 struct ifreq *ifr = (struct ifreq *)ifPtr;
922 ifPtr += ifreq_len(ifr);
924 if (ifr->ifr_addr.sa_family != AF_INET)
925 continue;
927 ret = getIPAddrRowByName(&(*ppIpAddrTable)->table[i], ifr->ifr_name,
928 &ifr->ifr_addr);
929 i++;
932 else
933 ret = ERROR_OUTOFMEMORY;
934 HeapFree(GetProcessHeap(), 0, ifc.ifc_buf);
937 return ret;
940 ULONG v6addressesFromIndex(IF_INDEX index, SOCKET_ADDRESS **addrs, ULONG *num_addrs)
942 *addrs = NULL;
943 *num_addrs = 0;
944 return ERROR_SUCCESS;
947 #endif
949 char *toIPAddressString(unsigned int addr, char string[16])
951 if (string) {
952 struct in_addr iAddr;
954 iAddr.s_addr = addr;
955 /* extra-anal, just to make auditors happy */
956 lstrcpynA(string, inet_ntoa(iAddr), 16);
958 return string;