git.oblomov.eu Git - wine/blob - dlls/iphlpapi/iphlpapi_main.c

   1 /*
   2  * iphlpapi dll implementation
   3  *
   4  * Copyright (C) 2003,2006 Juan Lang
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdarg.h>
  24 #include <stdlib.h>
  25 #include <sys/types.h>
  26 #ifdef HAVE_NETINET_IN_H
  27 # include <netinet/in.h>
  28 #endif
  29 #ifdef HAVE_ARPA_INET_H
  30 # include <arpa/inet.h>
  31 #endif
  32 #ifdef HAVE_ARPA_NAMESER_H
  33 # include <arpa/nameser.h>
  34 #endif
  35 #ifdef HAVE_RESOLV_H
  36 # include <resolv.h>
  37 #endif
  38
  39 #define NONAMELESSUNION
  40 #define NONAMELESSSTRUCT
  41 #include "windef.h"
  42 #include "winbase.h"
  43 #include "winreg.h"
  44 #define USE_WS_PREFIX
  45 #include "winsock2.h"
  46 #include "winternl.h"
  47 #include "ws2ipdef.h"
  48 #include "iphlpapi.h"
  49 #include "ifenum.h"
  50 #include "ipstats.h"
  51 #include "ipifcons.h"
  52 #include "fltdefs.h"
  53
  54 #include "wine/debug.h"
  55
  56 WINE_DEFAULT_DEBUG_CHANNEL(iphlpapi);
  57
  58 #ifndef IF_NAMESIZE
  59 #define IF_NAMESIZE 16
  60 #endif
  61
  62 #ifndef INADDR_NONE
  63 #define INADDR_NONE ~0UL
  64 #endif
  65
  66 /* call res_init() just once because of a bug in Mac OS X 10.4 */
  67 /* Call once per thread on systems that have per-thread _res. */
  68 static void initialise_resolver(void)
  69 {
  70     if ((_res.options & RES_INIT) == 0)
  71         res_init();
  72 }
  73
  74 BOOL WINAPI DllMain (HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
  75 {
  76   switch (fdwReason) {
  77     case DLL_PROCESS_ATTACH:
  78       DisableThreadLibraryCalls( hinstDLL );
  79       break;
  80
  81     case DLL_PROCESS_DETACH:
  82       break;
  83   }
  84   return TRUE;
  85 }
  86
  87 /******************************************************************
  88  *    AddIPAddress (IPHLPAPI.@)
  89  *
  90  * Add an IP address to an adapter.
  91  *
  92  * PARAMS
  93  *  Address     [In]  IP address to add to the adapter
  94  *  IpMask      [In]  subnet mask for the IP address
  95  *  IfIndex     [In]  adapter index to add the address
  96  *  NTEContext  [Out] Net Table Entry (NTE) context for the IP address
  97  *  NTEInstance [Out] NTE instance for the IP address
  98  *
  99  * RETURNS
 100  *  Success: NO_ERROR
 101  *  Failure: error code from winerror.h
 102  *
 103  * FIXME
 104  *  Stub. Currently returns ERROR_NOT_SUPPORTED.
 105  */
 106 DWORD WINAPI AddIPAddress(IPAddr Address, IPMask IpMask, DWORD IfIndex, PULONG NTEContext, PULONG NTEInstance)
 107 {
 108   FIXME(":stub\n");
 109   return ERROR_NOT_SUPPORTED;
 110 }
 111
 112
 113 /******************************************************************
 114  *    AllocateAndGetIfTableFromStack (IPHLPAPI.@)
 115  *
 116  * Get table of local interfaces.
 117  * Like GetIfTable(), but allocate the returned table from heap.
 118  *
 119  * PARAMS
 120  *  ppIfTable [Out] pointer into which the MIB_IFTABLE is
 121  *                  allocated and returned.
 122  *  bOrder    [In]  whether to sort the table
 123  *  heap      [In]  heap from which the table is allocated
 124  *  flags     [In]  flags to HeapAlloc
 125  *
 126  * RETURNS
 127  *  ERROR_INVALID_PARAMETER if ppIfTable is NULL, whatever
 128  *  GetIfTable() returns otherwise.
 129  */
 130 DWORD WINAPI AllocateAndGetIfTableFromStack(PMIB_IFTABLE *ppIfTable,
 131  BOOL bOrder, HANDLE heap, DWORD flags)
 132 {
 133   DWORD ret;
 134
 135   TRACE("ppIfTable %p, bOrder %d, heap %p, flags 0x%08x\n", ppIfTable,
 136         bOrder, heap, flags);
 137   if (!ppIfTable)
 138     ret = ERROR_INVALID_PARAMETER;
 139   else {
 140     DWORD dwSize = 0;
 141
 142     ret = GetIfTable(*ppIfTable, &dwSize, bOrder);
 143     if (ret == ERROR_INSUFFICIENT_BUFFER) {
 144       *ppIfTable = HeapAlloc(heap, flags, dwSize);
 145       ret = GetIfTable(*ppIfTable, &dwSize, bOrder);
 146     }
 147   }
 148   TRACE("returning %d\n", ret);
 149   return ret;
 150 }
 151
 152
 153 static int IpAddrTableSorter(const void *a, const void *b)
 154 {
 155   int ret;
 156
 157   if (a && b)
 158     ret = ((const MIB_IPADDRROW*)a)->dwAddr - ((const MIB_IPADDRROW*)b)->dwAddr;
 159   else
 160     ret = 0;
 161   return ret;
 162 }
 163
 164
 165 /******************************************************************
 166  *    AllocateAndGetIpAddrTableFromStack (IPHLPAPI.@)
 167  *
 168  * Get interface-to-IP address mapping table.
 169  * Like GetIpAddrTable(), but allocate the returned table from heap.
 170  *
 171  * PARAMS
 172  *  ppIpAddrTable [Out] pointer into which the MIB_IPADDRTABLE is
 173  *                      allocated and returned.
 174  *  bOrder        [In]  whether to sort the table
 175  *  heap          [In]  heap from which the table is allocated
 176  *  flags         [In]  flags to HeapAlloc
 177  *
 178  * RETURNS
 179  *  ERROR_INVALID_PARAMETER if ppIpAddrTable is NULL, other error codes on
 180  *  failure, NO_ERROR on success.
 181  */
 182 DWORD WINAPI AllocateAndGetIpAddrTableFromStack(PMIB_IPADDRTABLE *ppIpAddrTable,
 183  BOOL bOrder, HANDLE heap, DWORD flags)
 184 {
 185   DWORD ret;
 186
 187   TRACE("ppIpAddrTable %p, bOrder %d, heap %p, flags 0x%08x\n",
 188    ppIpAddrTable, bOrder, heap, flags);
 189   ret = getIPAddrTable(ppIpAddrTable, heap, flags);
 190   if (!ret && bOrder)
 191     qsort((*ppIpAddrTable)->table, (*ppIpAddrTable)->dwNumEntries,
 192      sizeof(MIB_IPADDRROW), IpAddrTableSorter);
 193   TRACE("returning %d\n", ret);
 194   return ret;
 195 }
 196
 197
 198 /******************************************************************
 199  *    CancelIPChangeNotify (IPHLPAPI.@)
 200  *
 201  * Cancel a previous notification created by NotifyAddrChange or
 202  * NotifyRouteChange.
 203  *
 204  * PARAMS
 205  *  overlapped [In]  overlapped structure that notifies the caller
 206  *
 207  * RETURNS
 208  *  Success: TRUE
 209  *  Failure: FALSE
 210  *
 211  * FIXME
 212  *  Stub, returns FALSE.
 213  */
 214 BOOL WINAPI CancelIPChangeNotify(LPOVERLAPPED overlapped)
 215 {
 216   FIXME("(overlapped %p): stub\n", overlapped);
 217   return FALSE;
 218 }
 219
 220
 221
 222 /******************************************************************
 223  *    CreateIpForwardEntry (IPHLPAPI.@)
 224  *
 225  * Create a route in the local computer's IP table.
 226  *
 227  * PARAMS
 228  *  pRoute [In] new route information
 229  *
 230  * RETURNS
 231  *  Success: NO_ERROR
 232  *  Failure: error code from winerror.h
 233  *
 234  * FIXME
 235  *  Stub, always returns NO_ERROR.
 236  */
 237 DWORD WINAPI CreateIpForwardEntry(PMIB_IPFORWARDROW pRoute)
 238 {
 239   FIXME("(pRoute %p): stub\n", pRoute);
 240   /* could use SIOCADDRT, not sure I want to */
 241   return 0;
 242 }
 243
 244
 245 /******************************************************************
 246  *    CreateIpNetEntry (IPHLPAPI.@)
 247  *
 248  * Create entry in the ARP table.
 249  *
 250  * PARAMS
 251  *  pArpEntry [In] new ARP entry
 252  *
 253  * RETURNS
 254  *  Success: NO_ERROR
 255  *  Failure: error code from winerror.h
 256  *
 257  * FIXME
 258  *  Stub, always returns NO_ERROR.
 259  */
 260 DWORD WINAPI CreateIpNetEntry(PMIB_IPNETROW pArpEntry)
 261 {
 262   FIXME("(pArpEntry %p)\n", pArpEntry);
 263   /* could use SIOCSARP on systems that support it, not sure I want to */
 264   return 0;
 265 }
 266
 267
 268 /******************************************************************
 269  *    CreateProxyArpEntry (IPHLPAPI.@)
 270  *
 271  * Create a Proxy ARP (PARP) entry for an IP address.
 272  *
 273  * PARAMS
 274  *  dwAddress [In] IP address for which this computer acts as a proxy.
 275  *  dwMask    [In] subnet mask for dwAddress
 276  *  dwIfIndex [In] interface index
 277  *
 278  * RETURNS
 279  *  Success: NO_ERROR
 280  *  Failure: error code from winerror.h
 281  *
 282  * FIXME
 283  *  Stub, returns ERROR_NOT_SUPPORTED.
 284  */
 285 DWORD WINAPI CreateProxyArpEntry(DWORD dwAddress, DWORD dwMask, DWORD dwIfIndex)
 286 {
 287   FIXME("(dwAddress 0x%08x, dwMask 0x%08x, dwIfIndex 0x%08x): stub\n",
 288    dwAddress, dwMask, dwIfIndex);
 289   return ERROR_NOT_SUPPORTED;
 290 }
 291
 292
 293 /******************************************************************
 294  *    DeleteIPAddress (IPHLPAPI.@)
 295  *
 296  * Delete an IP address added with AddIPAddress().
 297  *
 298  * PARAMS
 299  *  NTEContext [In] NTE context from AddIPAddress();
 300  *
 301  * RETURNS
 302  *  Success: NO_ERROR
 303  *  Failure: error code from winerror.h
 304  *
 305  * FIXME
 306  *  Stub, returns ERROR_NOT_SUPPORTED.
 307  */
 308 DWORD WINAPI DeleteIPAddress(ULONG NTEContext)
 309 {
 310   FIXME("(NTEContext %d): stub\n", NTEContext);
 311   return ERROR_NOT_SUPPORTED;
 312 }
 313
 314
 315 /******************************************************************
 316  *    DeleteIpForwardEntry (IPHLPAPI.@)
 317  *
 318  * Delete a route.
 319  *
 320  * PARAMS
 321  *  pRoute [In] route to delete
 322  *
 323  * RETURNS
 324  *  Success: NO_ERROR
 325  *  Failure: error code from winerror.h
 326  *
 327  * FIXME
 328  *  Stub, returns NO_ERROR.
 329  */
 330 DWORD WINAPI DeleteIpForwardEntry(PMIB_IPFORWARDROW pRoute)
 331 {
 332   FIXME("(pRoute %p): stub\n", pRoute);
 333   /* could use SIOCDELRT, not sure I want to */
 334   return 0;
 335 }
 336
 337
 338 /******************************************************************
 339  *    DeleteIpNetEntry (IPHLPAPI.@)
 340  *
 341  * Delete an ARP entry.
 342  *
 343  * PARAMS
 344  *  pArpEntry [In] ARP entry to delete
 345  *
 346  * RETURNS
 347  *  Success: NO_ERROR
 348  *  Failure: error code from winerror.h
 349  *
 350  * FIXME
 351  *  Stub, returns NO_ERROR.
 352  */
 353 DWORD WINAPI DeleteIpNetEntry(PMIB_IPNETROW pArpEntry)
 354 {
 355   FIXME("(pArpEntry %p): stub\n", pArpEntry);
 356   /* could use SIOCDARP on systems that support it, not sure I want to */
 357   return 0;
 358 }
 359
 360
 361 /******************************************************************
 362  *    DeleteProxyArpEntry (IPHLPAPI.@)
 363  *
 364  * Delete a Proxy ARP entry.
 365  *
 366  * PARAMS
 367  *  dwAddress [In] IP address for which this computer acts as a proxy.
 368  *  dwMask    [In] subnet mask for dwAddress
 369  *  dwIfIndex [In] interface index
 370  *
 371  * RETURNS
 372  *  Success: NO_ERROR
 373  *  Failure: error code from winerror.h
 374  *
 375  * FIXME
 376  *  Stub, returns ERROR_NOT_SUPPORTED.
 377  */
 378 DWORD WINAPI DeleteProxyArpEntry(DWORD dwAddress, DWORD dwMask, DWORD dwIfIndex)
 379 {
 380   FIXME("(dwAddress 0x%08x, dwMask 0x%08x, dwIfIndex 0x%08x): stub\n",
 381    dwAddress, dwMask, dwIfIndex);
 382   return ERROR_NOT_SUPPORTED;
 383 }
 384
 385
 386 /******************************************************************
 387  *    EnableRouter (IPHLPAPI.@)
 388  *
 389  * Turn on ip forwarding.
 390  *
 391  * PARAMS
 392  *  pHandle     [In/Out]
 393  *  pOverlapped [In/Out] hEvent member should contain a valid handle.
 394  *
 395  * RETURNS
 396  *  Success: ERROR_IO_PENDING
 397  *  Failure: error code from winerror.h
 398  *
 399  * FIXME
 400  *  Stub, returns ERROR_NOT_SUPPORTED.
 401  */
 402 DWORD WINAPI EnableRouter(HANDLE * pHandle, OVERLAPPED * pOverlapped)
 403 {
 404   FIXME("(pHandle %p, pOverlapped %p): stub\n", pHandle, pOverlapped);
 405   /* could echo "1" > /proc/net/sys/net/ipv4/ip_forward, not sure I want to
 406      could map EACCESS to ERROR_ACCESS_DENIED, I suppose
 407    */
 408   return ERROR_NOT_SUPPORTED;
 409 }
 410
 411
 412 /******************************************************************
 413  *    FlushIpNetTable (IPHLPAPI.@)
 414  *
 415  * Delete all ARP entries of an interface
 416  *
 417  * PARAMS
 418  *  dwIfIndex [In] interface index
 419  *
 420  * RETURNS
 421  *  Success: NO_ERROR
 422  *  Failure: error code from winerror.h
 423  *
 424  * FIXME
 425  *  Stub, returns ERROR_NOT_SUPPORTED.
 426  */
 427 DWORD WINAPI FlushIpNetTable(DWORD dwIfIndex)
 428 {
 429   FIXME("(dwIfIndex 0x%08x): stub\n", dwIfIndex);
 430   /* this flushes the arp cache of the given index */
 431   return ERROR_NOT_SUPPORTED;
 432 }
 433
 434
 435 /******************************************************************
 436  *    GetAdapterIndex (IPHLPAPI.@)
 437  *
 438  * Get interface index from its name.
 439  *
 440  * PARAMS
 441  *  AdapterName [In]  unicode string with the adapter name
 442  *  IfIndex     [Out] returns found interface index
 443  *
 444  * RETURNS
 445  *  Success: NO_ERROR
 446  *  Failure: error code from winerror.h
 447  */
 448 DWORD WINAPI GetAdapterIndex(LPWSTR AdapterName, PULONG IfIndex)
 449 {
 450   char adapterName[MAX_ADAPTER_NAME];
 451   unsigned int i;
 452   DWORD ret;
 453
 454   TRACE("(AdapterName %p, IfIndex %p)\n", AdapterName, IfIndex);
 455   /* The adapter name is guaranteed not to have any unicode characters, so
 456    * this translation is never lossy */
 457   for (i = 0; i < sizeof(adapterName) - 1 && AdapterName[i]; i++)
 458     adapterName[i] = (char)AdapterName[i];
 459   adapterName[i] = '\0';
 460   ret = getInterfaceIndexByName(adapterName, IfIndex);
 461   TRACE("returning %d\n", ret);
 462   return ret;
 463 }
 464
 465
 466 /******************************************************************
 467  *    GetAdaptersInfo (IPHLPAPI.@)
 468  *
 469  * Get information about adapters.
 470  *
 471  * PARAMS
 472  *  pAdapterInfo [Out] buffer for adapter infos
 473  *  pOutBufLen   [In]  length of output buffer
 474  *
 475  * RETURNS
 476  *  Success: NO_ERROR
 477  *  Failure: error code from winerror.h
 478  */
 479 DWORD WINAPI GetAdaptersInfo(PIP_ADAPTER_INFO pAdapterInfo, PULONG pOutBufLen)
 480 {
 481   DWORD ret;
 482
 483   TRACE("pAdapterInfo %p, pOutBufLen %p\n", pAdapterInfo, pOutBufLen);
 484   if (!pOutBufLen)
 485     ret = ERROR_INVALID_PARAMETER;
 486   else {
 487     DWORD numNonLoopbackInterfaces = getNumNonLoopbackInterfaces();
 488
 489     if (numNonLoopbackInterfaces > 0) {
 490       DWORD numIPAddresses = getNumIPAddresses();
 491       ULONG size;
 492
 493       /* This may slightly overestimate the amount of space needed, because
 494        * the IP addresses include the loopback address, but it's easier
 495        * to make sure there's more than enough space than to make sure there's
 496        * precisely enough space.
 497        */
 498       size = sizeof(IP_ADAPTER_INFO) * numNonLoopbackInterfaces;
 499       size += numIPAddresses  * sizeof(IP_ADDR_STRING);
 500       if (!pAdapterInfo || *pOutBufLen < size) {
 501         *pOutBufLen = size;
 502         ret = ERROR_BUFFER_OVERFLOW;
 503       }
 504       else {
 505         InterfaceIndexTable *table = NULL;
 506         PMIB_IPADDRTABLE ipAddrTable = NULL;
 507         PMIB_IPFORWARDTABLE routeTable = NULL;
 508
 509         ret = getIPAddrTable(&ipAddrTable, GetProcessHeap(), 0);
 510         if (!ret)
 511           ret = AllocateAndGetIpForwardTableFromStack(&routeTable, FALSE, GetProcessHeap(), 0);
 512         if (!ret)
 513           table = getNonLoopbackInterfaceIndexTable();
 514         if (table) {
 515           size = sizeof(IP_ADAPTER_INFO) * table->numIndexes;
 516           size += ipAddrTable->dwNumEntries * sizeof(IP_ADDR_STRING);
 517           if (*pOutBufLen < size) {
 518             *pOutBufLen = size;
 519             ret = ERROR_INSUFFICIENT_BUFFER;
 520           }
 521           else {
 522             DWORD ndx;
 523             HKEY hKey;
 524             BOOL winsEnabled = FALSE;
 525             IP_ADDRESS_STRING primaryWINS, secondaryWINS;
 526             PIP_ADDR_STRING nextIPAddr = (PIP_ADDR_STRING)((LPBYTE)pAdapterInfo
 527              + numNonLoopbackInterfaces * sizeof(IP_ADAPTER_INFO));
 528
 529             memset(pAdapterInfo, 0, size);
 530             /* @@ Wine registry key: HKCU\Software\Wine\Network */
 531             if (RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Network",
 532              &hKey) == ERROR_SUCCESS) {
 533               DWORD size = sizeof(primaryWINS.String);
 534               unsigned long addr;
 535
 536               RegQueryValueExA(hKey, "WinsServer", NULL, NULL,
 537                (LPBYTE)primaryWINS.String, &size);
 538               addr = inet_addr(primaryWINS.String);
 539               if (addr != INADDR_NONE && addr != INADDR_ANY)
 540                 winsEnabled = TRUE;
 541               size = sizeof(secondaryWINS.String);
 542               RegQueryValueExA(hKey, "BackupWinsServer", NULL, NULL,
 543                (LPBYTE)secondaryWINS.String, &size);
 544               addr = inet_addr(secondaryWINS.String);
 545               if (addr != INADDR_NONE && addr != INADDR_ANY)
 546                 winsEnabled = TRUE;
 547               RegCloseKey(hKey);
 548             }
 549             for (ndx = 0; ndx < table->numIndexes; ndx++) {
 550               PIP_ADAPTER_INFO ptr = &pAdapterInfo[ndx];
 551               DWORD i;
 552               PIP_ADDR_STRING currentIPAddr = &ptr->IpAddressList;
 553               BOOL firstIPAddr = TRUE;
 554
 555               /* on Win98 this is left empty, but whatever */
 556               getInterfaceNameByIndex(table->indexes[ndx], ptr->AdapterName);
 557               getInterfaceNameByIndex(table->indexes[ndx], ptr->Description);
 558               ptr->AddressLength = sizeof(ptr->Address);
 559               getInterfacePhysicalByIndex(table->indexes[ndx],
 560                &ptr->AddressLength, ptr->Address, &ptr->Type);
 561               ptr->Index = table->indexes[ndx];
 562               for (i = 0; i < ipAddrTable->dwNumEntries; i++) {
 563                 if (ipAddrTable->table[i].dwIndex == ptr->Index) {
 564                   if (firstIPAddr) {
 565                     toIPAddressString(ipAddrTable->table[i].dwAddr,
 566                      ptr->IpAddressList.IpAddress.String);
 567                     toIPAddressString(ipAddrTable->table[i].dwMask,
 568                      ptr->IpAddressList.IpMask.String);
 569                     firstIPAddr = FALSE;
 570                   }
 571                   else {
 572                     currentIPAddr->Next = nextIPAddr;
 573                     currentIPAddr = nextIPAddr;
 574                     toIPAddressString(ipAddrTable->table[i].dwAddr,
 575                      currentIPAddr->IpAddress.String);
 576                     toIPAddressString(ipAddrTable->table[i].dwMask,
 577                      currentIPAddr->IpMask.String);
 578                     nextIPAddr++;
 579                   }
 580                 }
 581               }
 582               /* Find first router through this interface, which we'll assume
 583                * is the default gateway for this adapter */
 584               for (i = 0; i < routeTable->dwNumEntries; i++)
 585                 if (routeTable->table[i].dwForwardIfIndex == ptr->Index
 586                  && routeTable->table[i].u1.ForwardType ==
 587                  MIB_IPROUTE_TYPE_INDIRECT)
 588                   toIPAddressString(routeTable->table[i].dwForwardNextHop,
 589                    ptr->GatewayList.IpAddress.String);
 590               if (winsEnabled) {
 591                 ptr->HaveWins = TRUE;
 592                 memcpy(ptr->PrimaryWinsServer.IpAddress.String,
 593                  primaryWINS.String, sizeof(primaryWINS.String));
 594                 memcpy(ptr->SecondaryWinsServer.IpAddress.String,
 595                  secondaryWINS.String, sizeof(secondaryWINS.String));
 596               }
 597               if (ndx < table->numIndexes - 1)
 598                 ptr->Next = &pAdapterInfo[ndx + 1];
 599               else
 600                 ptr->Next = NULL;
 601
 602               ptr->DhcpEnabled = TRUE;
 603             }
 604             ret = NO_ERROR;
 605           }
 606           HeapFree(GetProcessHeap(), 0, table);
 607         }
 608         else
 609           ret = ERROR_OUTOFMEMORY;
 610         HeapFree(GetProcessHeap(), 0, routeTable);
 611         HeapFree(GetProcessHeap(), 0, ipAddrTable);
 612       }
 613     }
 614     else
 615       ret = ERROR_NO_DATA;
 616   }
 617   TRACE("returning %d\n", ret);
 618   return ret;
 619 }
 620
 621 static DWORD typeFromMibType(DWORD mib_type)
 622 {
 623     switch (mib_type)
 624     {
 625     case MIB_IF_TYPE_ETHERNET:  return IF_TYPE_ETHERNET_CSMACD;
 626     case MIB_IF_TYPE_TOKENRING: return IF_TYPE_ISO88025_TOKENRING;
 627     case MIB_IF_TYPE_PPP:       return IF_TYPE_PPP;
 628     case MIB_IF_TYPE_LOOPBACK:  return IF_TYPE_SOFTWARE_LOOPBACK;
 629     default:                    return IF_TYPE_OTHER;
 630     }
 631 }
 632
 633 static NET_IF_CONNECTION_TYPE connectionTypeFromMibType(DWORD mib_type)
 634 {
 635     switch (mib_type)
 636     {
 637     case MIB_IF_TYPE_PPP:       return NET_IF_CONNECTION_DEMAND;
 638     case MIB_IF_TYPE_SLIP:      return NET_IF_CONNECTION_DEMAND;
 639     default:                    return NET_IF_CONNECTION_DEDICATED;
 640     }
 641 }
 642
 643 static ULONG v4addressesFromIndex(IF_INDEX index, DWORD **addrs, ULONG *num_addrs)
 644 {
 645     ULONG ret, i, j;
 646     MIB_IPADDRTABLE *at;
 647
 648     *num_addrs = 0;
 649     if ((ret = getIPAddrTable(&at, GetProcessHeap(), 0))) return ret;
 650     for (i = 0; i < at->dwNumEntries; i++)
 651     {
 652         if (at->table[i].dwIndex == index) (*num_addrs)++;
 653     }
 654     if (!(*addrs = HeapAlloc(GetProcessHeap(), 0, *num_addrs * sizeof(DWORD))))
 655     {
 656         HeapFree(GetProcessHeap(), 0, at);
 657         return ERROR_OUTOFMEMORY;
 658     }
 659     for (i = 0, j = 0; i < at->dwNumEntries; i++)
 660     {
 661         if (at->table[i].dwIndex == index) (*addrs)[j++] = at->table[i].dwAddr;
 662     }
 663     HeapFree(GetProcessHeap(), 0, at);
 664     return ERROR_SUCCESS;
 665 }
 666
 667 static char *debugstr_ipv4(const in_addr_t *in_addr, char *buf)
 668 {
 669     const BYTE *addrp;
 670     char *p = buf;
 671
 672     for (addrp = (const BYTE *)in_addr;
 673      addrp - (const BYTE *)in_addr < sizeof(*in_addr);
 674      addrp++)
 675     {
 676         if (addrp == (const BYTE *)in_addr + sizeof(*in_addr) - 1)
 677             sprintf(p, "%d", *addrp);
 678         else
 679             p += sprintf(p, "%d.", *addrp);
 680     }
 681     return buf;
 682 }
 683
 684 static char *debugstr_ipv6(const struct WS_sockaddr_in6 *sin, char *buf)
 685 {
 686     const IN6_ADDR *addr = &sin->sin6_addr;
 687     char *p = buf;
 688     int i;
 689     BOOL in_zero = FALSE;
 690
 691     for (i = 0; i < 7; i++)
 692     {
 693         if (!addr->u.Word[i])
 694         {
 695             if (i == 0)
 696                 *p++ = ':';
 697             if (!in_zero)
 698             {
 699                 *p++ = ':';
 700                 in_zero = TRUE;
 701             }
 702         }
 703         else
 704         {
 705             p += sprintf(p, "%x:", ntohs(addr->u.Word[i]));
 706             in_zero = FALSE;
 707         }
 708     }
 709     sprintf(p, "%x", ntohs(addr->u.Word[7]));
 710     return buf;
 711 }
 712
 713 static ULONG count_v4_gateways(DWORD index, PMIB_IPFORWARDTABLE routeTable)
 714 {
 715     DWORD i, num_gateways = 0;
 716
 717     for (i = 0; i < routeTable->dwNumEntries; i++)
 718     {
 719         if (routeTable->table[i].dwForwardIfIndex == index &&
 720             routeTable->table[i].u1.ForwardType == MIB_IPROUTE_TYPE_INDIRECT)
 721             num_gateways++;
 722     }
 723     return num_gateways;
 724 }
 725
 726 static PMIB_IPFORWARDROW findIPv4Gateway(DWORD index,
 727                                          PMIB_IPFORWARDTABLE routeTable)
 728 {
 729     DWORD i;
 730     PMIB_IPFORWARDROW row = NULL;
 731
 732     for (i = 0; !row && i < routeTable->dwNumEntries; i++)
 733     {
 734         if (routeTable->table[i].dwForwardIfIndex == index &&
 735             routeTable->table[i].u1.ForwardType == MIB_IPROUTE_TYPE_INDIRECT)
 736             row = &routeTable->table[i];
 737     }
 738     return row;
 739 }
 740
 741 static ULONG adapterAddressesFromIndex(ULONG family, ULONG flags, IF_INDEX index,
 742                                        IP_ADAPTER_ADDRESSES *aa, ULONG *size)
 743 {
 744     ULONG ret = ERROR_SUCCESS, i, num_v4addrs = 0, num_v4_gateways = 0, num_v6addrs = 0, total_size;
 745     DWORD *v4addrs = NULL;
 746     SOCKET_ADDRESS *v6addrs = NULL;
 747     PMIB_IPFORWARDTABLE routeTable = NULL;
 748
 749     if (family == WS_AF_INET)
 750     {
 751         if (!(flags & GAA_FLAG_SKIP_UNICAST))
 752             ret = v4addressesFromIndex(index, &v4addrs, &num_v4addrs);
 753         if (!ret && flags & GAA_FLAG_INCLUDE_ALL_GATEWAYS)
 754         {
 755             ret = AllocateAndGetIpForwardTableFromStack(&routeTable, FALSE,
 756                                                         GetProcessHeap(), 0);
 757             if (!ret)
 758                 num_v4_gateways = count_v4_gateways(index, routeTable);
 759         }
 760     }
 761     else if (family == WS_AF_INET6)
 762     {
 763         if (!(flags & GAA_FLAG_SKIP_UNICAST))
 764             ret = v6addressesFromIndex(index, &v6addrs, &num_v6addrs);
 765     }
 766     else if (family == WS_AF_UNSPEC)
 767     {
 768         if (!(flags & GAA_FLAG_SKIP_UNICAST))
 769             ret = v4addressesFromIndex(index, &v4addrs, &num_v4addrs);
 770         if (!ret && flags & GAA_FLAG_INCLUDE_ALL_GATEWAYS)
 771         {
 772             ret = AllocateAndGetIpForwardTableFromStack(&routeTable, FALSE,
 773                                                         GetProcessHeap(), 0);
 774             if (!ret)
 775                 num_v4_gateways = count_v4_gateways(index, routeTable);
 776         }
 777         if (!ret && !(flags & GAA_FLAG_SKIP_UNICAST))
 778             ret = v6addressesFromIndex(index, &v6addrs, &num_v6addrs);
 779     }
 780     else
 781     {
 782         FIXME("address family %u unsupported\n", family);
 783         ret = ERROR_NO_DATA;
 784     }
 785     if (ret)
 786     {
 787         HeapFree(GetProcessHeap(), 0, routeTable);
 788         return ret;
 789     }
 790
 791     total_size = sizeof(IP_ADAPTER_ADDRESSES);
 792     total_size += IF_NAMESIZE;
 793     total_size += IF_NAMESIZE * sizeof(WCHAR);
 794     if (!(flags & GAA_FLAG_SKIP_FRIENDLY_NAME))
 795         total_size += IF_NAMESIZE * sizeof(WCHAR);
 796     total_size += sizeof(IP_ADAPTER_UNICAST_ADDRESS) * num_v4addrs;
 797     total_size += sizeof(struct sockaddr_in) * num_v4addrs;
 798     total_size += (sizeof(IP_ADAPTER_GATEWAY_ADDRESS) + sizeof(SOCKADDR_IN)) * num_v4_gateways;
 799     total_size += sizeof(IP_ADAPTER_UNICAST_ADDRESS) * num_v6addrs;
 800     total_size += sizeof(SOCKET_ADDRESS) * num_v6addrs;
 801     for (i = 0; i < num_v6addrs; i++)
 802         total_size += v6addrs[i].iSockaddrLength;
 803
 804     if (aa && *size >= total_size)
 805     {
 806         char name[IF_NAMESIZE], *ptr = (char *)aa + sizeof(IP_ADAPTER_ADDRESSES), *src;
 807         WCHAR *dst;
 808         DWORD buflen, type;
 809         INTERNAL_IF_OPER_STATUS status;
 810
 811         memset(aa, 0, sizeof(IP_ADAPTER_ADDRESSES));
 812         aa->u.s.Length  = sizeof(IP_ADAPTER_ADDRESSES);
 813         aa->u.s.IfIndex = index;
 814
 815         getInterfaceNameByIndex(index, name);
 816         memcpy(ptr, name, IF_NAMESIZE);
 817         aa->AdapterName = ptr;
 818         ptr += IF_NAMESIZE;
 819         if (!(flags & GAA_FLAG_SKIP_FRIENDLY_NAME))
 820         {
 821             aa->FriendlyName = (WCHAR *)ptr;
 822             for (src = name, dst = (WCHAR *)ptr; *src; src++, dst++)
 823                 *dst = *src;
 824             *dst++ = 0;
 825             ptr = (char *)dst;
 826         }
 827         aa->Description = (WCHAR *)ptr;
 828         for (src = name, dst = (WCHAR *)ptr; *src; src++, dst++)
 829             *dst = *src;
 830         *dst++ = 0;
 831         ptr = (char *)dst;
 832
 833         TRACE("%s: %d IPv4 addresses, %d IPv6 addresses:\n", name, num_v4addrs,
 834               num_v6addrs);
 835         if (num_v4_gateways)
 836         {
 837             PMIB_IPFORWARDROW adapterRow;
 838
 839             if ((adapterRow = findIPv4Gateway(index, routeTable)))
 840             {
 841                 PIP_ADAPTER_GATEWAY_ADDRESS gw;
 842                 PSOCKADDR_IN sin;
 843
 844                 gw = (PIP_ADAPTER_GATEWAY_ADDRESS)ptr;
 845                 aa->FirstGatewayAddress = gw;
 846
 847                 gw->u.s.Length = sizeof(IP_ADAPTER_GATEWAY_ADDRESS);
 848                 ptr += sizeof(IP_ADAPTER_GATEWAY_ADDRESS);
 849                 sin = (PSOCKADDR_IN)ptr;
 850                 sin->sin_family = AF_INET;
 851                 sin->sin_port = 0;
 852                 memcpy(&sin->sin_addr, &adapterRow->dwForwardNextHop,
 853                        sizeof(DWORD));
 854                 gw->Address.lpSockaddr = (LPSOCKADDR)sin;
 855                 gw->Address.iSockaddrLength = sizeof(SOCKADDR_IN);
 856                 gw->Next = NULL;
 857                 ptr += sizeof(SOCKADDR_IN);
 858             }
 859         }
 860         if (num_v4addrs)
 861         {
 862             IP_ADAPTER_UNICAST_ADDRESS *ua;
 863             struct sockaddr_in *sa;
 864             aa->Flags |= IP_ADAPTER_IPV4_ENABLED;
 865             ua = aa->FirstUnicastAddress = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 866             for (i = 0; i < num_v4addrs; i++)
 867             {
 868                 char addr_buf[16];
 869
 870                 memset(ua, 0, sizeof(IP_ADAPTER_UNICAST_ADDRESS));
 871                 ua->u.s.Length              = sizeof(IP_ADAPTER_UNICAST_ADDRESS);
 872                 ua->Address.iSockaddrLength = sizeof(struct sockaddr_in);
 873                 ua->Address.lpSockaddr      = (SOCKADDR *)((char *)ua + ua->u.s.Length);
 874
 875                 sa = (struct sockaddr_in *)ua->Address.lpSockaddr;
 876                 sa->sin_family      = AF_INET;
 877                 sa->sin_addr.s_addr = v4addrs[i];
 878                 sa->sin_port        = 0;
 879                 TRACE("IPv4 %d/%d: %s\n", i + 1, num_v4addrs,
 880                       debugstr_ipv4(&sa->sin_addr.s_addr, addr_buf));
 881
 882                 ptr += ua->u.s.Length + ua->Address.iSockaddrLength;
 883                 if (i < num_v4addrs - 1)
 884                 {
 885                     ua->Next = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 886                     ua = ua->Next;
 887                 }
 888             }
 889         }
 890         if (num_v6addrs)
 891         {
 892             IP_ADAPTER_UNICAST_ADDRESS *ua;
 893             struct WS_sockaddr_in6 *sa;
 894
 895             aa->Flags |= IP_ADAPTER_IPV6_ENABLED;
 896             if (aa->FirstUnicastAddress)
 897             {
 898                 for (ua = aa->FirstUnicastAddress; ua->Next; ua = ua->Next)
 899                     ;
 900                 ua->Next = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 901                 ua = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 902             }
 903             else
 904                 ua = aa->FirstUnicastAddress = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 905             for (i = 0; i < num_v6addrs; i++)
 906             {
 907                 char addr_buf[46];
 908
 909                 memset(ua, 0, sizeof(IP_ADAPTER_UNICAST_ADDRESS));
 910                 ua->u.s.Length              = sizeof(IP_ADAPTER_UNICAST_ADDRESS);
 911                 ua->Address.iSockaddrLength = v6addrs[i].iSockaddrLength;
 912                 ua->Address.lpSockaddr      = (SOCKADDR *)((char *)ua + ua->u.s.Length);
 913
 914                 sa = (struct WS_sockaddr_in6 *)ua->Address.lpSockaddr;
 915                 memcpy(sa, v6addrs[i].lpSockaddr, sizeof(*sa));
 916                 TRACE("IPv6 %d/%d: %s\n", i + 1, num_v6addrs,
 917                       debugstr_ipv6(sa, addr_buf));
 918
 919                 ptr += ua->u.s.Length + ua->Address.iSockaddrLength;
 920                 if (i < num_v6addrs - 1)
 921                 {
 922                     ua->Next = (IP_ADAPTER_UNICAST_ADDRESS *)ptr;
 923                     ua = ua->Next;
 924                 }
 925             }
 926         }
 927
 928         buflen = MAX_INTERFACE_PHYSADDR;
 929         getInterfacePhysicalByIndex(index, &buflen, aa->PhysicalAddress, &type);
 930         aa->PhysicalAddressLength = buflen;
 931         aa->IfType = typeFromMibType(type);
 932         aa->ConnectionType = connectionTypeFromMibType(type);
 933
 934         getInterfaceMtuByName(name, &aa->Mtu);
 935
 936         getInterfaceStatusByName(name, &status);
 937         if (status == MIB_IF_OPER_STATUS_OPERATIONAL) aa->OperStatus = IfOperStatusUp;
 938         else if (status == MIB_IF_OPER_STATUS_NON_OPERATIONAL) aa->OperStatus = IfOperStatusDown;
 939         else aa->OperStatus = IfOperStatusUnknown;
 940     }
 941     *size = total_size;
 942     HeapFree(GetProcessHeap(), 0, routeTable);
 943     HeapFree(GetProcessHeap(), 0, v6addrs);
 944     HeapFree(GetProcessHeap(), 0, v4addrs);
 945     return ERROR_SUCCESS;
 946 }
 947
 948 static ULONG get_dns_server_addresses(PIP_ADAPTER_DNS_SERVER_ADDRESS address, ULONG *len)
 949 {
 950     DWORD size;
 951
 952     initialise_resolver();
 953     /* FIXME: no support for IPv6 DNS server addresses.  Doing so requires
 954      * sizeof SOCKADDR_STORAGE instead, and using _res._u._ext.nsaddrs when
 955      * available.
 956      */
 957     size = _res.nscount * (sizeof(IP_ADAPTER_DNS_SERVER_ADDRESS) + sizeof(SOCKADDR));
 958     if (!address || *len < size)
 959     {
 960         *len = size;
 961         return ERROR_BUFFER_OVERFLOW;
 962     }
 963     *len = size;
 964     if (_res.nscount > 0)
 965     {
 966         PIP_ADAPTER_DNS_SERVER_ADDRESS addr;
 967         int i;
 968
 969         for (i = 0, addr = address; i < _res.nscount && addr;
 970              i++, addr = addr->Next)
 971         {
 972             SOCKADDR_IN *sin;
 973
 974             addr->Address.iSockaddrLength = sizeof(SOCKADDR);
 975             addr->Address.lpSockaddr =
 976              (LPSOCKADDR)((PBYTE)addr + sizeof(IP_ADAPTER_DNS_SERVER_ADDRESS));
 977             sin = (SOCKADDR_IN *)addr->Address.lpSockaddr;
 978             sin->sin_family = WS_AF_INET;
 979             sin->sin_port = _res.nsaddr_list[i].sin_port;
 980             memcpy(&sin->sin_addr, &_res.nsaddr_list[i].sin_addr, sizeof(sin->sin_addr));
 981             if (i == _res.nscount - 1)
 982                 addr->Next = NULL;
 983             else
 984                 addr->Next =
 985                  (PIP_ADAPTER_DNS_SERVER_ADDRESS)((PBYTE)addr +
 986                  sizeof(IP_ADAPTER_DNS_SERVER_ADDRESS) + sizeof(SOCKADDR));
 987         }
 988     }
 989     return ERROR_SUCCESS;
 990 }
 991
 992 static BOOL is_ip_address_string(const char *str)
 993 {
 994     struct in_addr in;
 995     int ret;
 996
 997     ret = inet_aton(str, &in);
 998     return ret != 0;
 999 }
1000
1001 static ULONG get_dns_suffix(WCHAR *suffix, ULONG *len)
1002 {
1003     ULONG size, i;
1004     char *found_suffix = NULL;
1005
1006     initialise_resolver();
1007     /* Always return a NULL-terminated string, even if it's empty. */
1008     size = sizeof(WCHAR);
1009     for (i = 0, found_suffix = NULL;
1010          !found_suffix && i < MAXDNSRCH + 1 && _res.dnsrch[i]; i++)
1011     {
1012         /* This uses a heuristic to select a DNS suffix:
1013          * the first, non-IP address string is selected.
1014          */
1015         if (!is_ip_address_string(_res.dnsrch[i]))
1016             found_suffix = _res.dnsrch[i];
1017     }
1018     if (found_suffix)
1019         size += strlen(found_suffix) * sizeof(WCHAR);
1020     if (!suffix || *len < size)
1021     {
1022         *len = size;
1023         return ERROR_BUFFER_OVERFLOW;
1024     }
1025     *len = size;
1026     if (found_suffix)
1027     {
1028         char *p;
1029
1030         for (p = found_suffix; *p; p++)
1031             *suffix++ = *p;
1032     }
1033     *suffix = 0;
1034     return ERROR_SUCCESS;
1035 }
1036
1037 ULONG WINAPI DECLSPEC_HOTPATCH GetAdaptersAddresses(ULONG family, ULONG flags, PVOID reserved,
1038                                                     PIP_ADAPTER_ADDRESSES aa, PULONG buflen)
1039 {
1040     InterfaceIndexTable *table;
1041     ULONG i, size, dns_server_size, dns_suffix_size, total_size, ret = ERROR_NO_DATA;
1042
1043     TRACE("(%d, %08x, %p, %p, %p)\n", family, flags, reserved, aa, buflen);
1044
1045     if (!buflen) return ERROR_INVALID_PARAMETER;
1046
1047     table = getInterfaceIndexTable();
1048     if (!table || !table->numIndexes)
1049     {
1050         HeapFree(GetProcessHeap(), 0, table);
1051         return ERROR_NO_DATA;
1052     }
1053     total_size = 0;
1054     for (i = 0; i < table->numIndexes; i++)
1055     {
1056         size = 0;
1057         if ((ret = adapterAddressesFromIndex(family, flags, table->indexes[i], NULL, &size)))
1058         {
1059             HeapFree(GetProcessHeap(), 0, table);
1060             return ret;
1061         }
1062         total_size += size;
1063     }
1064     if (!(flags & GAA_FLAG_SKIP_DNS_SERVER))
1065     {
1066         /* Since DNS servers aren't really per adapter, get enough space for a
1067          * single copy of them.
1068          */
1069         get_dns_server_addresses(NULL, &dns_server_size);
1070         total_size += dns_server_size;
1071     }
1072     /* Since DNS suffix also isn't really per adapter, get enough space for a
1073      * single copy of it.
1074      */
1075     get_dns_suffix(NULL, &dns_suffix_size);
1076     total_size += dns_suffix_size;
1077     if (aa && *buflen >= total_size)
1078     {
1079         ULONG bytes_left = size = total_size;
1080         PIP_ADAPTER_ADDRESSES first_aa = aa;
1081         PIP_ADAPTER_DNS_SERVER_ADDRESS firstDns;
1082         WCHAR *dnsSuffix;
1083
1084         for (i = 0; i < table->numIndexes; i++)
1085         {
1086             if ((ret = adapterAddressesFromIndex(family, flags, table->indexes[i], aa, &size)))
1087             {
1088                 HeapFree(GetProcessHeap(), 0, table);
1089                 return ret;
1090             }
1091             if (i < table->numIndexes - 1)
1092             {
1093                 aa->Next = (IP_ADAPTER_ADDRESSES *)((char *)aa + size);
1094                 aa = aa->Next;
1095                 size = bytes_left -= size;
1096             }
1097         }
1098         if (!(flags & GAA_FLAG_SKIP_DNS_SERVER))
1099         {
1100             firstDns = (PIP_ADAPTER_DNS_SERVER_ADDRESS)((BYTE *)first_aa + total_size - dns_server_size - dns_suffix_size);
1101             get_dns_server_addresses(firstDns, &dns_server_size);
1102             for (aa = first_aa; aa; aa = aa->Next)
1103             {
1104                 if (aa->IfType != IF_TYPE_SOFTWARE_LOOPBACK && aa->OperStatus == IfOperStatusUp)
1105                     aa->FirstDnsServerAddress = firstDns;
1106             }
1107         }
1108         aa = first_aa;
1109         dnsSuffix = (WCHAR *)((BYTE *)aa + total_size - dns_suffix_size);
1110         get_dns_suffix(dnsSuffix, &dns_suffix_size);
1111         for (; aa; aa = aa->Next)
1112         {
1113             if (aa->IfType != IF_TYPE_SOFTWARE_LOOPBACK && aa->OperStatus == IfOperStatusUp)
1114                 aa->DnsSuffix = dnsSuffix;
1115             else
1116                 aa->DnsSuffix = (WCHAR *)((BYTE*)dnsSuffix + dns_suffix_size - 2);
1117         }
1118         ret = ERROR_SUCCESS;
1119     }
1120     else
1121         ret = ERROR_BUFFER_OVERFLOW;
1122     *buflen = total_size;
1123
1124     TRACE("num adapters %u\n", table->numIndexes);
1125     HeapFree(GetProcessHeap(), 0, table);
1126     return ret;
1127 }
1128
1129 /******************************************************************
1130  *    GetBestInterface (IPHLPAPI.@)
1131  *
1132  * Get the interface, with the best route for the given IP address.
1133  *
1134  * PARAMS
1135  *  dwDestAddr     [In]  IP address to search the interface for
1136  *  pdwBestIfIndex [Out] found best interface
1137  *
1138  * RETURNS
1139  *  Success: NO_ERROR
1140  *  Failure: error code from winerror.h
1141  */
1142 DWORD WINAPI GetBestInterface(IPAddr dwDestAddr, PDWORD pdwBestIfIndex)
1143 {
1144     struct WS_sockaddr_in sa_in;
1145     memset(&sa_in, 0, sizeof(sa_in));
1146     sa_in.sin_family = AF_INET;
1147     sa_in.sin_addr.S_un.S_addr = dwDestAddr;
1148     return GetBestInterfaceEx((struct WS_sockaddr *)&sa_in, pdwBestIfIndex);
1149 }
1150
1151 /******************************************************************
1152  *    GetBestInterfaceEx (IPHLPAPI.@)
1153  *
1154  * Get the interface, with the best route for the given IP address.
1155  *
1156  * PARAMS
1157  *  dwDestAddr     [In]  IP address to search the interface for
1158  *  pdwBestIfIndex [Out] found best interface
1159  *
1160  * RETURNS
1161  *  Success: NO_ERROR
1162  *  Failure: error code from winerror.h
1163  */
1164 DWORD WINAPI GetBestInterfaceEx(struct WS_sockaddr *pDestAddr, PDWORD pdwBestIfIndex)
1165 {
1166   DWORD ret;
1167
1168   TRACE("pDestAddr %p, pdwBestIfIndex %p\n", pDestAddr, pdwBestIfIndex);
1169   if (!pDestAddr || !pdwBestIfIndex)
1170     ret = ERROR_INVALID_PARAMETER;
1171   else {
1172     MIB_IPFORWARDROW ipRow;
1173
1174     if (pDestAddr->sa_family == AF_INET) {
1175       ret = GetBestRoute(((struct WS_sockaddr_in *)pDestAddr)->sin_addr.S_un.S_addr, 0, &ipRow);
1176       if (ret == ERROR_SUCCESS)
1177         *pdwBestIfIndex = ipRow.dwForwardIfIndex;
1178     } else {
1179       FIXME("address family %d not supported\n", pDestAddr->sa_family);
1180       ret = ERROR_NOT_SUPPORTED;
1181     }
1182   }
1183   TRACE("returning %d\n", ret);
1184   return ret;
1185 }
1186
1187
1188 /******************************************************************
1189  *    GetBestRoute (IPHLPAPI.@)
1190  *
1191  * Get the best route for the given IP address.
1192  *
1193  * PARAMS
1194  *  dwDestAddr   [In]  IP address to search the best route for
1195  *  dwSourceAddr [In]  optional source IP address
1196  *  pBestRoute   [Out] found best route
1197  *
1198  * RETURNS
1199  *  Success: NO_ERROR
1200  *  Failure: error code from winerror.h
1201  */
1202 DWORD WINAPI GetBestRoute(DWORD dwDestAddr, DWORD dwSourceAddr, PMIB_IPFORWARDROW pBestRoute)
1203 {
1204   PMIB_IPFORWARDTABLE table;
1205   DWORD ret;
1206
1207   TRACE("dwDestAddr 0x%08x, dwSourceAddr 0x%08x, pBestRoute %p\n", dwDestAddr,
1208    dwSourceAddr, pBestRoute);
1209   if (!pBestRoute)
1210     return ERROR_INVALID_PARAMETER;
1211
1212   ret = AllocateAndGetIpForwardTableFromStack(&table, FALSE, GetProcessHeap(), 0);
1213   if (!ret) {
1214     DWORD ndx, matchedBits, matchedNdx = table->dwNumEntries;
1215
1216     for (ndx = 0, matchedBits = 0; ndx < table->dwNumEntries; ndx++) {
1217       if (table->table[ndx].u1.ForwardType != MIB_IPROUTE_TYPE_INVALID &&
1218        (dwDestAddr & table->table[ndx].dwForwardMask) ==
1219        (table->table[ndx].dwForwardDest & table->table[ndx].dwForwardMask)) {
1220         DWORD numShifts, mask;
1221
1222         for (numShifts = 0, mask = table->table[ndx].dwForwardMask;
1223          mask && mask & 1; mask >>= 1, numShifts++)
1224           ;
1225         if (numShifts > matchedBits) {
1226           matchedBits = numShifts;
1227           matchedNdx = ndx;
1228         }
1229         else if (!matchedBits) {
1230           matchedNdx = ndx;
1231         }
1232       }
1233     }
1234     if (matchedNdx < table->dwNumEntries) {
1235       memcpy(pBestRoute, &table->table[matchedNdx], sizeof(MIB_IPFORWARDROW));
1236       ret = ERROR_SUCCESS;
1237     }
1238     else {
1239       /* No route matches, which can happen if there's no default route. */
1240       ret = ERROR_HOST_UNREACHABLE;
1241     }
1242     HeapFree(GetProcessHeap(), 0, table);
1243   }
1244   TRACE("returning %d\n", ret);
1245   return ret;
1246 }
1247
1248
1249 /******************************************************************
1250  *    GetFriendlyIfIndex (IPHLPAPI.@)
1251  *
1252  * Get a "friendly" version of IfIndex, which is one that doesn't
1253  * have the top byte set.  Doesn't validate whether IfIndex is a valid
1254  * adapter index.
1255  *
1256  * PARAMS
1257  *  IfIndex [In] interface index to get the friendly one for
1258  *
1259  * RETURNS
1260  *  A friendly version of IfIndex.
1261  */
1262 DWORD WINAPI GetFriendlyIfIndex(DWORD IfIndex)
1263 {
1264   /* windows doesn't validate these, either, just makes sure the top byte is
1265      cleared.  I assume my ifenum module never gives an index with the top
1266      byte set. */
1267   TRACE("returning %d\n", IfIndex);
1268   return IfIndex;
1269 }
1270
1271
1272 /******************************************************************
1273  *    GetIfEntry (IPHLPAPI.@)
1274  *
1275  * Get information about an interface.
1276  *
1277  * PARAMS
1278  *  pIfRow [In/Out] In:  dwIndex of MIB_IFROW selects the interface.
1279  *                  Out: interface information
1280  *
1281  * RETURNS
1282  *  Success: NO_ERROR
1283  *  Failure: error code from winerror.h
1284  */
1285 DWORD WINAPI GetIfEntry(PMIB_IFROW pIfRow)
1286 {
1287   DWORD ret;
1288   char nameBuf[MAX_ADAPTER_NAME];
1289   char *name;
1290
1291   TRACE("pIfRow %p\n", pIfRow);
1292   if (!pIfRow)
1293     return ERROR_INVALID_PARAMETER;
1294
1295   name = getInterfaceNameByIndex(pIfRow->dwIndex, nameBuf);
1296   if (name) {
1297     ret = getInterfaceEntryByName(name, pIfRow);
1298     if (ret == NO_ERROR)
1299       ret = getInterfaceStatsByName(name, pIfRow);
1300   }
1301   else
1302     ret = ERROR_INVALID_DATA;
1303   TRACE("returning %d\n", ret);
1304   return ret;
1305 }
1306
1307
1308 static int IfTableSorter(const void *a, const void *b)
1309 {
1310   int ret;
1311
1312   if (a && b)
1313     ret = ((const MIB_IFROW*)a)->dwIndex - ((const MIB_IFROW*)b)->dwIndex;
1314   else
1315     ret = 0;
1316   return ret;
1317 }
1318
1319
1320 /******************************************************************
1321  *    GetIfTable (IPHLPAPI.@)
1322  *
1323  * Get a table of local interfaces.
1324  *
1325  * PARAMS
1326  *  pIfTable [Out]    buffer for local interfaces table
1327  *  pdwSize  [In/Out] length of output buffer
1328  *  bOrder   [In]     whether to sort the table
1329  *
1330  * RETURNS
1331  *  Success: NO_ERROR
1332  *  Failure: error code from winerror.h
1333  *
1334  * NOTES
1335  *  If pdwSize is less than required, the function will return
1336  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to the required byte
1337  *  size.
1338  *  If bOrder is true, the returned table will be sorted by interface index.
1339  */
1340 DWORD WINAPI GetIfTable(PMIB_IFTABLE pIfTable, PULONG pdwSize, BOOL bOrder)
1341 {
1342   DWORD ret;
1343
1344   TRACE("pIfTable %p, pdwSize %p, bOrder %d\n", pdwSize, pdwSize,
1345    (DWORD)bOrder);
1346   if (!pdwSize)
1347     ret = ERROR_INVALID_PARAMETER;
1348   else {
1349     DWORD numInterfaces = getNumInterfaces();
1350     ULONG size = sizeof(MIB_IFTABLE);
1351
1352     if (numInterfaces > 1)
1353       size += (numInterfaces - 1) * sizeof(MIB_IFROW);
1354     if (!pIfTable || *pdwSize < size) {
1355       *pdwSize = size;
1356       ret = ERROR_INSUFFICIENT_BUFFER;
1357     }
1358     else {
1359       InterfaceIndexTable *table = getInterfaceIndexTable();
1360
1361       if (table) {
1362         size = sizeof(MIB_IFTABLE);
1363         if (table->numIndexes > 1)
1364           size += (table->numIndexes - 1) * sizeof(MIB_IFROW);
1365         if (*pdwSize < size) {
1366           *pdwSize = size;
1367           ret = ERROR_INSUFFICIENT_BUFFER;
1368         }
1369         else {
1370           DWORD ndx;
1371
1372           *pdwSize = size;
1373           pIfTable->dwNumEntries = 0;
1374           for (ndx = 0; ndx < table->numIndexes; ndx++) {
1375             pIfTable->table[ndx].dwIndex = table->indexes[ndx];
1376             GetIfEntry(&pIfTable->table[ndx]);
1377             pIfTable->dwNumEntries++;
1378           }
1379           if (bOrder)
1380             qsort(pIfTable->table, pIfTable->dwNumEntries, sizeof(MIB_IFROW),
1381              IfTableSorter);
1382           ret = NO_ERROR;
1383         }
1384         HeapFree(GetProcessHeap(), 0, table);
1385       }
1386       else
1387         ret = ERROR_OUTOFMEMORY;
1388     }
1389   }
1390   TRACE("returning %d\n", ret);
1391   return ret;
1392 }
1393
1394
1395 /******************************************************************
1396  *    GetInterfaceInfo (IPHLPAPI.@)
1397  *
1398  * Get a list of network interface adapters.
1399  *
1400  * PARAMS
1401  *  pIfTable    [Out] buffer for interface adapters
1402  *  dwOutBufLen [Out] if buffer is too small, returns required size
1403  *
1404  * RETURNS
1405  *  Success: NO_ERROR
1406  *  Failure: error code from winerror.h
1407  *
1408  * BUGS
1409  *  MSDN states this should return non-loopback interfaces only.
1410  */
1411 DWORD WINAPI GetInterfaceInfo(PIP_INTERFACE_INFO pIfTable, PULONG dwOutBufLen)
1412 {
1413   DWORD ret;
1414
1415   TRACE("pIfTable %p, dwOutBufLen %p\n", pIfTable, dwOutBufLen);
1416   if (!dwOutBufLen)
1417     ret = ERROR_INVALID_PARAMETER;
1418   else {
1419     DWORD numInterfaces = getNumInterfaces();
1420     ULONG size = sizeof(IP_INTERFACE_INFO);
1421
1422     if (numInterfaces > 1)
1423       size += (numInterfaces - 1) * sizeof(IP_ADAPTER_INDEX_MAP);
1424     if (!pIfTable || *dwOutBufLen < size) {
1425       *dwOutBufLen = size;
1426       ret = ERROR_INSUFFICIENT_BUFFER;
1427     }
1428     else {
1429       InterfaceIndexTable *table = getInterfaceIndexTable();
1430
1431       if (table) {
1432         size = sizeof(IP_INTERFACE_INFO);
1433         if (table->numIndexes > 1)
1434           size += (table->numIndexes - 1) * sizeof(IP_ADAPTER_INDEX_MAP);
1435         if (*dwOutBufLen < size) {
1436           *dwOutBufLen = size;
1437           ret = ERROR_INSUFFICIENT_BUFFER;
1438         }
1439         else {
1440           DWORD ndx;
1441           char nameBuf[MAX_ADAPTER_NAME];
1442
1443           *dwOutBufLen = size;
1444           pIfTable->NumAdapters = 0;
1445           for (ndx = 0; ndx < table->numIndexes; ndx++) {
1446             const char *walker, *name;
1447             WCHAR *assigner;
1448
1449             pIfTable->Adapter[ndx].Index = table->indexes[ndx];
1450             name = getInterfaceNameByIndex(table->indexes[ndx], nameBuf);
1451             for (walker = name, assigner = pIfTable->Adapter[ndx].Name;
1452              walker && *walker &&
1453              assigner - pIfTable->Adapter[ndx].Name < MAX_ADAPTER_NAME - 1;
1454              walker++, assigner++)
1455               *assigner = *walker;
1456             *assigner = 0;
1457             pIfTable->NumAdapters++;
1458           }
1459           ret = NO_ERROR;
1460         }
1461         HeapFree(GetProcessHeap(), 0, table);
1462       }
1463       else
1464         ret = ERROR_OUTOFMEMORY;
1465     }
1466   }
1467   TRACE("returning %d\n", ret);
1468   return ret;
1469 }
1470
1471
1472 /******************************************************************
1473  *    GetIpAddrTable (IPHLPAPI.@)
1474  *
1475  * Get interface-to-IP address mapping table.
1476  *
1477  * PARAMS
1478  *  pIpAddrTable [Out]    buffer for mapping table
1479  *  pdwSize      [In/Out] length of output buffer
1480  *  bOrder       [In]     whether to sort the table
1481  *
1482  * RETURNS
1483  *  Success: NO_ERROR
1484  *  Failure: error code from winerror.h
1485  *
1486  * NOTES
1487  *  If pdwSize is less than required, the function will return
1488  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to the required byte
1489  *  size.
1490  *  If bOrder is true, the returned table will be sorted by the next hop and
1491  *  an assortment of arbitrary parameters.
1492  */
1493 DWORD WINAPI GetIpAddrTable(PMIB_IPADDRTABLE pIpAddrTable, PULONG pdwSize, BOOL bOrder)
1494 {
1495   DWORD ret;
1496
1497   TRACE("pIpAddrTable %p, pdwSize %p, bOrder %d\n", pIpAddrTable, pdwSize,
1498    (DWORD)bOrder);
1499   if (!pdwSize)
1500     ret = ERROR_INVALID_PARAMETER;
1501   else {
1502     PMIB_IPADDRTABLE table;
1503
1504     ret = getIPAddrTable(&table, GetProcessHeap(), 0);
1505     if (ret == NO_ERROR)
1506     {
1507       ULONG size = sizeof(MIB_IPADDRTABLE);
1508
1509       if (table->dwNumEntries > 1)
1510         size += (table->dwNumEntries - 1) * sizeof(MIB_IPADDRROW);
1511       if (!pIpAddrTable || *pdwSize < size) {
1512         *pdwSize = size;
1513         ret = ERROR_INSUFFICIENT_BUFFER;
1514       }
1515       else {
1516         *pdwSize = size;
1517         memcpy(pIpAddrTable, table, size);
1518         if (bOrder)
1519           qsort(pIpAddrTable->table, pIpAddrTable->dwNumEntries,
1520            sizeof(MIB_IPADDRROW), IpAddrTableSorter);
1521         ret = NO_ERROR;
1522       }
1523       HeapFree(GetProcessHeap(), 0, table);
1524     }
1525   }
1526   TRACE("returning %d\n", ret);
1527   return ret;
1528 }
1529
1530
1531 /******************************************************************
1532  *    GetIpForwardTable (IPHLPAPI.@)
1533  *
1534  * Get the route table.
1535  *
1536  * PARAMS
1537  *  pIpForwardTable [Out]    buffer for route table
1538  *  pdwSize         [In/Out] length of output buffer
1539  *  bOrder          [In]     whether to sort the table
1540  *
1541  * RETURNS
1542  *  Success: NO_ERROR
1543  *  Failure: error code from winerror.h
1544  *
1545  * NOTES
1546  *  If pdwSize is less than required, the function will return
1547  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to the required byte
1548  *  size.
1549  *  If bOrder is true, the returned table will be sorted by the next hop and
1550  *  an assortment of arbitrary parameters.
1551  */
1552 DWORD WINAPI GetIpForwardTable(PMIB_IPFORWARDTABLE pIpForwardTable, PULONG pdwSize, BOOL bOrder)
1553 {
1554     DWORD ret;
1555     PMIB_IPFORWARDTABLE table;
1556
1557     TRACE("pIpForwardTable %p, pdwSize %p, bOrder %d\n", pIpForwardTable, pdwSize, bOrder);
1558
1559     if (!pdwSize) return ERROR_INVALID_PARAMETER;
1560
1561     ret = AllocateAndGetIpForwardTableFromStack(&table, bOrder, GetProcessHeap(), 0);
1562     if (!ret) {
1563         DWORD size = FIELD_OFFSET( MIB_IPFORWARDTABLE, table[table->dwNumEntries] );
1564         if (!pIpForwardTable || *pdwSize < size) {
1565           *pdwSize = size;
1566           ret = ERROR_INSUFFICIENT_BUFFER;
1567         }
1568         else {
1569           *pdwSize = size;
1570           memcpy(pIpForwardTable, table, size);
1571         }
1572         HeapFree(GetProcessHeap(), 0, table);
1573     }
1574     TRACE("returning %d\n", ret);
1575     return ret;
1576 }
1577
1578
1579 /******************************************************************
1580  *    GetIpNetTable (IPHLPAPI.@)
1581  *
1582  * Get the IP-to-physical address mapping table.
1583  *
1584  * PARAMS
1585  *  pIpNetTable [Out]    buffer for mapping table
1586  *  pdwSize     [In/Out] length of output buffer
1587  *  bOrder      [In]     whether to sort the table
1588  *
1589  * RETURNS
1590  *  Success: NO_ERROR
1591  *  Failure: error code from winerror.h
1592  *
1593  * NOTES
1594  *  If pdwSize is less than required, the function will return
1595  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to the required byte
1596  *  size.
1597  *  If bOrder is true, the returned table will be sorted by IP address.
1598  */
1599 DWORD WINAPI GetIpNetTable(PMIB_IPNETTABLE pIpNetTable, PULONG pdwSize, BOOL bOrder)
1600 {
1601     DWORD ret;
1602     PMIB_IPNETTABLE table;
1603
1604     TRACE("pIpNetTable %p, pdwSize %p, bOrder %d\n", pIpNetTable, pdwSize, bOrder);
1605
1606     if (!pdwSize) return ERROR_INVALID_PARAMETER;
1607
1608     ret = AllocateAndGetIpNetTableFromStack( &table, bOrder, GetProcessHeap(), 0 );
1609     if (!ret) {
1610         DWORD size = FIELD_OFFSET( MIB_IPNETTABLE, table[table->dwNumEntries] );
1611         if (!pIpNetTable || *pdwSize < size) {
1612           *pdwSize = size;
1613           ret = ERROR_INSUFFICIENT_BUFFER;
1614         }
1615         else {
1616           *pdwSize = size;
1617           memcpy(pIpNetTable, table, size);
1618         }
1619         HeapFree(GetProcessHeap(), 0, table);
1620     }
1621     TRACE("returning %d\n", ret);
1622     return ret;
1623 }
1624
1625 /* Gets the DNS server list into the list beginning at list.  Assumes that
1626  * a single server address may be placed at list if *len is at least
1627  * sizeof(IP_ADDR_STRING) long.  Otherwise, list->Next is set to firstDynamic,
1628  * and assumes that all remaining DNS servers are contiguously located
1629  * beginning at firstDynamic.  On input, *len is assumed to be the total number
1630  * of bytes available for all DNS servers, and is ignored if list is NULL.
1631  * On return, *len is set to the total number of bytes required for all DNS
1632  * servers.
1633  * Returns ERROR_BUFFER_OVERFLOW if *len is insufficient,
1634  * ERROR_SUCCESS otherwise.
1635  */
1636 static DWORD get_dns_server_list(PIP_ADDR_STRING list,
1637  PIP_ADDR_STRING firstDynamic, DWORD *len)
1638 {
1639   DWORD size;
1640
1641   initialise_resolver();
1642   size = _res.nscount * sizeof(IP_ADDR_STRING);
1643   if (!list || *len < size) {
1644     *len = size;
1645     return ERROR_BUFFER_OVERFLOW;
1646   }
1647   *len = size;
1648   if (_res.nscount > 0) {
1649     PIP_ADDR_STRING ptr;
1650     int i;
1651
1652     for (i = 0, ptr = list; i < _res.nscount && ptr; i++, ptr = ptr->Next) {
1653       toIPAddressString(_res.nsaddr_list[i].sin_addr.s_addr,
1654        ptr->IpAddress.String);
1655       if (i == _res.nscount - 1)
1656         ptr->Next = NULL;
1657       else if (i == 0)
1658         ptr->Next = firstDynamic;
1659       else
1660         ptr->Next = (PIP_ADDR_STRING)((PBYTE)ptr + sizeof(IP_ADDR_STRING));
1661     }
1662   }
1663   return ERROR_SUCCESS;
1664 }
1665
1666 /******************************************************************
1667  *    GetNetworkParams (IPHLPAPI.@)
1668  *
1669  * Get the network parameters for the local computer.
1670  *
1671  * PARAMS
1672  *  pFixedInfo [Out]    buffer for network parameters
1673  *  pOutBufLen [In/Out] length of output buffer
1674  *
1675  * RETURNS
1676  *  Success: NO_ERROR
1677  *  Failure: error code from winerror.h
1678  *
1679  * NOTES
1680  *  If pOutBufLen is less than required, the function will return
1681  *  ERROR_INSUFFICIENT_BUFFER, and pOutBufLen will be set to the required byte
1682  *  size.
1683  */
1684 DWORD WINAPI GetNetworkParams(PFIXED_INFO pFixedInfo, PULONG pOutBufLen)
1685 {
1686   DWORD ret, size, serverListSize;
1687   LONG regReturn;
1688   HKEY hKey;
1689
1690   TRACE("pFixedInfo %p, pOutBufLen %p\n", pFixedInfo, pOutBufLen);
1691   if (!pOutBufLen)
1692     return ERROR_INVALID_PARAMETER;
1693
1694   get_dns_server_list(NULL, NULL, &serverListSize);
1695   size = sizeof(FIXED_INFO) + serverListSize - sizeof(IP_ADDR_STRING);
1696   if (!pFixedInfo || *pOutBufLen < size) {
1697     *pOutBufLen = size;
1698     return ERROR_BUFFER_OVERFLOW;
1699   }
1700
1701   memset(pFixedInfo, 0, size);
1702   size = sizeof(pFixedInfo->HostName);
1703   GetComputerNameExA(ComputerNameDnsHostname, pFixedInfo->HostName, &size);
1704   size = sizeof(pFixedInfo->DomainName);
1705   GetComputerNameExA(ComputerNameDnsDomain, pFixedInfo->DomainName, &size);
1706   get_dns_server_list(&pFixedInfo->DnsServerList,
1707    (PIP_ADDR_STRING)((BYTE *)pFixedInfo + sizeof(FIXED_INFO)),
1708    &serverListSize);
1709   /* Assume the first DNS server in the list is the "current" DNS server: */
1710   pFixedInfo->CurrentDnsServer = &pFixedInfo->DnsServerList;
1711   pFixedInfo->NodeType = HYBRID_NODETYPE;
1712   regReturn = RegOpenKeyExA(HKEY_LOCAL_MACHINE,
1713    "SYSTEM\\CurrentControlSet\\Services\\VxD\\MSTCP", 0, KEY_READ, &hKey);
1714   if (regReturn != ERROR_SUCCESS)
1715     regReturn = RegOpenKeyExA(HKEY_LOCAL_MACHINE,
1716      "SYSTEM\\CurrentControlSet\\Services\\NetBT\\Parameters", 0, KEY_READ,
1717      &hKey);
1718   if (regReturn == ERROR_SUCCESS)
1719   {
1720     DWORD size = sizeof(pFixedInfo->ScopeId);
1721
1722     RegQueryValueExA(hKey, "ScopeID", NULL, NULL, (LPBYTE)pFixedInfo->ScopeId, &size);
1723     RegCloseKey(hKey);
1724   }
1725
1726   /* FIXME: can check whether routing's enabled in /proc/sys/net/ipv4/ip_forward
1727      I suppose could also check for a listener on port 53 to set EnableDns */
1728   ret = NO_ERROR;
1729   TRACE("returning %d\n", ret);
1730   return ret;
1731 }
1732
1733
1734 /******************************************************************
1735  *    GetNumberOfInterfaces (IPHLPAPI.@)
1736  *
1737  * Get the number of interfaces.
1738  *
1739  * PARAMS
1740  *  pdwNumIf [Out] number of interfaces
1741  *
1742  * RETURNS
1743  *  NO_ERROR on success, ERROR_INVALID_PARAMETER if pdwNumIf is NULL.
1744  */
1745 DWORD WINAPI GetNumberOfInterfaces(PDWORD pdwNumIf)
1746 {
1747   DWORD ret;
1748
1749   TRACE("pdwNumIf %p\n", pdwNumIf);
1750   if (!pdwNumIf)
1751     ret = ERROR_INVALID_PARAMETER;
1752   else {
1753     *pdwNumIf = getNumInterfaces();
1754     ret = NO_ERROR;
1755   }
1756   TRACE("returning %d\n", ret);
1757   return ret;
1758 }
1759
1760
1761 /******************************************************************
1762  *    GetPerAdapterInfo (IPHLPAPI.@)
1763  *
1764  * Get information about an adapter corresponding to an interface.
1765  *
1766  * PARAMS
1767  *  IfIndex         [In]     interface info
1768  *  pPerAdapterInfo [Out]    buffer for per adapter info
1769  *  pOutBufLen      [In/Out] length of output buffer
1770  *
1771  * RETURNS
1772  *  Success: NO_ERROR
1773  *  Failure: error code from winerror.h
1774  */
1775 DWORD WINAPI GetPerAdapterInfo(ULONG IfIndex, PIP_PER_ADAPTER_INFO pPerAdapterInfo, PULONG pOutBufLen)
1776 {
1777   ULONG bytesNeeded = sizeof(IP_PER_ADAPTER_INFO), serverListSize = 0;
1778   DWORD ret = NO_ERROR;
1779
1780   TRACE("(IfIndex %d, pPerAdapterInfo %p, pOutBufLen %p)\n", IfIndex, pPerAdapterInfo, pOutBufLen);
1781
1782   if (!pOutBufLen) return ERROR_INVALID_PARAMETER;
1783
1784   if (!isIfIndexLoopback(IfIndex)) {
1785     get_dns_server_list(NULL, NULL, &serverListSize);
1786     if (serverListSize > sizeof(IP_ADDR_STRING))
1787       bytesNeeded += serverListSize - sizeof(IP_ADDR_STRING);
1788   }
1789   if (!pPerAdapterInfo || *pOutBufLen < bytesNeeded)
1790   {
1791     *pOutBufLen = bytesNeeded;
1792     return ERROR_BUFFER_OVERFLOW;
1793   }
1794
1795   memset(pPerAdapterInfo, 0, bytesNeeded);
1796   if (!isIfIndexLoopback(IfIndex)) {
1797     ret = get_dns_server_list(&pPerAdapterInfo->DnsServerList,
1798      (PIP_ADDR_STRING)((PBYTE)pPerAdapterInfo + sizeof(IP_PER_ADAPTER_INFO)),
1799      &serverListSize);
1800     /* Assume the first DNS server in the list is the "current" DNS server: */
1801     pPerAdapterInfo->CurrentDnsServer = &pPerAdapterInfo->DnsServerList;
1802   }
1803   return ret;
1804 }
1805
1806
1807 /******************************************************************
1808  *    GetRTTAndHopCount (IPHLPAPI.@)
1809  *
1810  * Get round-trip time (RTT) and hop count.
1811  *
1812  * PARAMS
1813  *
1814  *  DestIpAddress [In]  destination address to get the info for
1815  *  HopCount      [Out] retrieved hop count
1816  *  MaxHops       [In]  maximum hops to search for the destination
1817  *  RTT           [Out] RTT in milliseconds
1818  *
1819  * RETURNS
1820  *  Success: TRUE
1821  *  Failure: FALSE
1822  *
1823  * FIXME
1824  *  Stub, returns FALSE.
1825  */
1826 BOOL WINAPI GetRTTAndHopCount(IPAddr DestIpAddress, PULONG HopCount, ULONG MaxHops, PULONG RTT)
1827 {
1828   FIXME("(DestIpAddress 0x%08x, HopCount %p, MaxHops %d, RTT %p): stub\n",
1829    DestIpAddress, HopCount, MaxHops, RTT);
1830   return FALSE;
1831 }
1832
1833
1834 /******************************************************************
1835  *    GetTcpTable (IPHLPAPI.@)
1836  *
1837  * Get the table of active TCP connections.
1838  *
1839  * PARAMS
1840  *  pTcpTable [Out]    buffer for TCP connections table
1841  *  pdwSize   [In/Out] length of output buffer
1842  *  bOrder    [In]     whether to order the table
1843  *
1844  * RETURNS
1845  *  Success: NO_ERROR
1846  *  Failure: error code from winerror.h
1847  *
1848  * NOTES
1849  *  If pdwSize is less than required, the function will return
1850  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to
1851  *  the required byte size.
1852  *  If bOrder is true, the returned table will be sorted, first by
1853  *  local address and port number, then by remote address and port
1854  *  number.
1855  */
1856 DWORD WINAPI GetTcpTable(PMIB_TCPTABLE pTcpTable, PDWORD pdwSize, BOOL bOrder)
1857 {
1858     TRACE("pTcpTable %p, pdwSize %p, bOrder %d\n", pTcpTable, pdwSize, bOrder);
1859     return GetExtendedTcpTable(pTcpTable, pdwSize, bOrder, AF_INET, TCP_TABLE_BASIC_ALL, 0);
1860 }
1861
1862 /******************************************************************
1863  *    GetExtendedTcpTable (IPHLPAPI.@)
1864  */
1865 DWORD WINAPI GetExtendedTcpTable(PVOID pTcpTable, PDWORD pdwSize, BOOL bOrder,
1866                                  ULONG ulAf, TCP_TABLE_CLASS TableClass, ULONG Reserved)
1867 {
1868     DWORD ret, size;
1869     void *table;
1870
1871     TRACE("pTcpTable %p, pdwSize %p, bOrder %d, ulAf %u, TableClass %u, Reserved %u\n",
1872            pTcpTable, pdwSize, bOrder, ulAf, TableClass, Reserved);
1873
1874     if (!pdwSize) return ERROR_INVALID_PARAMETER;
1875
1876     if (ulAf != AF_INET ||
1877         (TableClass != TCP_TABLE_BASIC_ALL && TableClass != TCP_TABLE_OWNER_PID_ALL))
1878     {
1879         FIXME("ulAf = %u, TableClass = %u not supported\n", ulAf, TableClass);
1880         return ERROR_NOT_SUPPORTED;
1881     }
1882     if ((ret = build_tcp_table(TableClass, &table, bOrder, GetProcessHeap(), 0, &size)))
1883         return ret;
1884
1885     if (!pTcpTable || *pdwSize < size)
1886     {
1887         *pdwSize = size;
1888         ret = ERROR_INSUFFICIENT_BUFFER;
1889     }
1890     else
1891     {
1892         *pdwSize = size;
1893         memcpy(pTcpTable, table, size);
1894     }
1895     HeapFree(GetProcessHeap(), 0, table);
1896     return ret;
1897 }
1898
1899 /******************************************************************
1900  *    GetUdpTable (IPHLPAPI.@)
1901  *
1902  * Get a table of active UDP connections.
1903  *
1904  * PARAMS
1905  *  pUdpTable [Out]    buffer for UDP connections table
1906  *  pdwSize   [In/Out] length of output buffer
1907  *  bOrder    [In]     whether to order the table
1908  *
1909  * RETURNS
1910  *  Success: NO_ERROR
1911  *  Failure: error code from winerror.h
1912  *
1913  * NOTES
1914  *  If pdwSize is less than required, the function will return
1915  *  ERROR_INSUFFICIENT_BUFFER, and *pdwSize will be set to the
1916  *  required byte size.
1917  *  If bOrder is true, the returned table will be sorted, first by
1918  *  local address, then by local port number.
1919  */
1920 DWORD WINAPI GetUdpTable(PMIB_UDPTABLE pUdpTable, PDWORD pdwSize, BOOL bOrder)
1921 {
1922     return GetExtendedUdpTable(pUdpTable, pdwSize, bOrder, AF_INET, UDP_TABLE_BASIC, 0);
1923 }
1924
1925 /******************************************************************
1926  *    GetExtendedUdpTable (IPHLPAPI.@)
1927  */
1928 DWORD WINAPI GetExtendedUdpTable(PVOID pUdpTable, PDWORD pdwSize, BOOL bOrder,
1929                                  ULONG ulAf, UDP_TABLE_CLASS TableClass, ULONG Reserved)
1930 {
1931     DWORD ret, size;
1932     void *table;
1933
1934     TRACE("pUdpTable %p, pdwSize %p, bOrder %d, ulAf %u, TableClass %u, Reserved %u\n",
1935            pUdpTable, pdwSize, bOrder, ulAf, TableClass, Reserved);
1936
1937     if (!pdwSize) return ERROR_INVALID_PARAMETER;
1938
1939     if (ulAf != AF_INET ||
1940         (TableClass != UDP_TABLE_BASIC && TableClass != UDP_TABLE_OWNER_PID &&
1941          TableClass != UDP_TABLE_OWNER_MODULE))
1942     {
1943         FIXME("ulAf = %u, TableClass = %u not supported\n", ulAf, TableClass);
1944         return ERROR_NOT_SUPPORTED;
1945     }
1946     if (TableClass == UDP_TABLE_OWNER_MODULE)
1947         FIXME("UDP_TABLE_OWNER_MODULE not fully supported\n");
1948
1949     if ((ret = build_udp_table(TableClass, &table, bOrder, GetProcessHeap(), 0, &size)))
1950         return ret;
1951
1952     if (!pUdpTable || *pdwSize < size)
1953     {
1954         *pdwSize = size;
1955         ret = ERROR_INSUFFICIENT_BUFFER;
1956     }
1957     else
1958     {
1959         *pdwSize = size;
1960         memcpy(pUdpTable, table, size);
1961     }
1962     HeapFree(GetProcessHeap(), 0, table);
1963     return ret;
1964 }
1965
1966 /******************************************************************
1967  *    GetUniDirectionalAdapterInfo (IPHLPAPI.@)
1968  *
1969  * This is a Win98-only function to get information on "unidirectional"
1970  * adapters.  Since this is pretty nonsensical in other contexts, it
1971  * never returns anything.
1972  *
1973  * PARAMS
1974  *  pIPIfInfo   [Out] buffer for adapter infos
1975  *  dwOutBufLen [Out] length of the output buffer
1976  *
1977  * RETURNS
1978  *  Success: NO_ERROR
1979  *  Failure: error code from winerror.h
1980  *
1981  * FIXME
1982  *  Stub, returns ERROR_NOT_SUPPORTED.
1983  */
1984 DWORD WINAPI GetUniDirectionalAdapterInfo(PIP_UNIDIRECTIONAL_ADAPTER_ADDRESS pIPIfInfo, PULONG dwOutBufLen)
1985 {
1986   TRACE("pIPIfInfo %p, dwOutBufLen %p\n", pIPIfInfo, dwOutBufLen);
1987   /* a unidirectional adapter?? not bloody likely! */
1988   return ERROR_NOT_SUPPORTED;
1989 }
1990
1991
1992 /******************************************************************
1993  *    IpReleaseAddress (IPHLPAPI.@)
1994  *
1995  * Release an IP obtained through DHCP,
1996  *
1997  * PARAMS
1998  *  AdapterInfo [In] adapter to release IP address
1999  *
2000  * RETURNS
2001  *  Success: NO_ERROR
2002  *  Failure: error code from winerror.h
2003  *
2004  * NOTES
2005  *  Since GetAdaptersInfo never returns adapters that have DHCP enabled,
2006  *  this function does nothing.
2007  *
2008  * FIXME
2009  *  Stub, returns ERROR_NOT_SUPPORTED.
2010  */
2011 DWORD WINAPI IpReleaseAddress(PIP_ADAPTER_INDEX_MAP AdapterInfo)
2012 {
2013   FIXME("Stub AdapterInfo %p\n", AdapterInfo);
2014   return ERROR_NOT_SUPPORTED;
2015 }
2016
2017
2018 /******************************************************************
2019  *    IpRenewAddress (IPHLPAPI.@)
2020  *
2021  * Renew an IP obtained through DHCP.
2022  *
2023  * PARAMS
2024  *  AdapterInfo [In] adapter to renew IP address
2025  *
2026  * RETURNS
2027  *  Success: NO_ERROR
2028  *  Failure: error code from winerror.h
2029  *
2030  * NOTES
2031  *  Since GetAdaptersInfo never returns adapters that have DHCP enabled,
2032  *  this function does nothing.
2033  *
2034  * FIXME
2035  *  Stub, returns ERROR_NOT_SUPPORTED.
2036  */
2037 DWORD WINAPI IpRenewAddress(PIP_ADAPTER_INDEX_MAP AdapterInfo)
2038 {
2039   FIXME("Stub AdapterInfo %p\n", AdapterInfo);
2040   return ERROR_NOT_SUPPORTED;
2041 }
2042
2043
2044 /******************************************************************
2045  *    NotifyAddrChange (IPHLPAPI.@)
2046  *
2047  * Notify caller whenever the ip-interface map is changed.
2048  *
2049  * PARAMS
2050  *  Handle     [Out] handle usable in asynchronous notification
2051  *  overlapped [In]  overlapped structure that notifies the caller
2052  *
2053  * RETURNS
2054  *  Success: NO_ERROR
2055  *  Failure: error code from winerror.h
2056  *
2057  * FIXME
2058  *  Stub, returns ERROR_NOT_SUPPORTED.
2059  */
2060 DWORD WINAPI NotifyAddrChange(PHANDLE Handle, LPOVERLAPPED overlapped)
2061 {
2062   FIXME("(Handle %p, overlapped %p): stub\n", Handle, overlapped);
2063   if (Handle) *Handle = INVALID_HANDLE_VALUE;
2064   if (overlapped) ((IO_STATUS_BLOCK *) overlapped)->u.Status = STATUS_PENDING;
2065   return ERROR_IO_PENDING;
2066 }
2067
2068
2069 /******************************************************************
2070  *    NotifyRouteChange (IPHLPAPI.@)
2071  *
2072  * Notify caller whenever the ip routing table is changed.
2073  *
2074  * PARAMS
2075  *  Handle     [Out] handle usable in asynchronous notification
2076  *  overlapped [In]  overlapped structure that notifies the caller
2077  *
2078  * RETURNS
2079  *  Success: NO_ERROR
2080  *  Failure: error code from winerror.h
2081  *
2082  * FIXME
2083  *  Stub, returns ERROR_NOT_SUPPORTED.
2084  */
2085 DWORD WINAPI NotifyRouteChange(PHANDLE Handle, LPOVERLAPPED overlapped)
2086 {
2087   FIXME("(Handle %p, overlapped %p): stub\n", Handle, overlapped);
2088   return ERROR_NOT_SUPPORTED;
2089 }
2090
2091
2092 /******************************************************************
2093  *    SendARP (IPHLPAPI.@)
2094  *
2095  * Send an ARP request.
2096  *
2097  * PARAMS
2098  *  DestIP     [In]     attempt to obtain this IP
2099  *  SrcIP      [In]     optional sender IP address
2100  *  pMacAddr   [Out]    buffer for the mac address
2101  *  PhyAddrLen [In/Out] length of the output buffer
2102  *
2103  * RETURNS
2104  *  Success: NO_ERROR
2105  *  Failure: error code from winerror.h
2106  *
2107  * FIXME
2108  *  Stub, returns ERROR_NOT_SUPPORTED.
2109  */
2110 DWORD WINAPI SendARP(IPAddr DestIP, IPAddr SrcIP, PULONG pMacAddr, PULONG PhyAddrLen)
2111 {
2112   FIXME("(DestIP 0x%08x, SrcIP 0x%08x, pMacAddr %p, PhyAddrLen %p): stub\n",
2113    DestIP, SrcIP, pMacAddr, PhyAddrLen);
2114   return ERROR_NOT_SUPPORTED;
2115 }
2116
2117
2118 /******************************************************************
2119  *    SetIfEntry (IPHLPAPI.@)
2120  *
2121  * Set the administrative status of an interface.
2122  *
2123  * PARAMS
2124  *  pIfRow [In] dwAdminStatus member specifies the new status.
2125  *
2126  * RETURNS
2127  *  Success: NO_ERROR
2128  *  Failure: error code from winerror.h
2129  *
2130  * FIXME
2131  *  Stub, returns ERROR_NOT_SUPPORTED.
2132  */
2133 DWORD WINAPI SetIfEntry(PMIB_IFROW pIfRow)
2134 {
2135   FIXME("(pIfRow %p): stub\n", pIfRow);
2136   /* this is supposed to set an interface administratively up or down.
2137      Could do SIOCSIFFLAGS and set/clear IFF_UP, but, not sure I want to, and
2138      this sort of down is indistinguishable from other sorts of down (e.g. no
2139      link). */
2140   return ERROR_NOT_SUPPORTED;
2141 }
2142
2143
2144 /******************************************************************
2145  *    SetIpForwardEntry (IPHLPAPI.@)
2146  *
2147  * Modify an existing route.
2148  *
2149  * PARAMS
2150  *  pRoute [In] route with the new information
2151  *
2152  * RETURNS
2153  *  Success: NO_ERROR
2154  *  Failure: error code from winerror.h
2155  *
2156  * FIXME
2157  *  Stub, returns NO_ERROR.
2158  */
2159 DWORD WINAPI SetIpForwardEntry(PMIB_IPFORWARDROW pRoute)
2160 {
2161   FIXME("(pRoute %p): stub\n", pRoute);
2162   /* this is to add a route entry, how's it distinguishable from
2163      CreateIpForwardEntry?
2164      could use SIOCADDRT, not sure I want to */
2165   return 0;
2166 }
2167
2168
2169 /******************************************************************
2170  *    SetIpNetEntry (IPHLPAPI.@)
2171  *
2172  * Modify an existing ARP entry.
2173  *
2174  * PARAMS
2175  *  pArpEntry [In] ARP entry with the new information
2176  *
2177  * RETURNS
2178  *  Success: NO_ERROR
2179  *  Failure: error code from winerror.h
2180  *
2181  * FIXME
2182  *  Stub, returns NO_ERROR.
2183  */
2184 DWORD WINAPI SetIpNetEntry(PMIB_IPNETROW pArpEntry)
2185 {
2186   FIXME("(pArpEntry %p): stub\n", pArpEntry);
2187   /* same as CreateIpNetEntry here, could use SIOCSARP, not sure I want to */
2188   return 0;
2189 }
2190
2191
2192 /******************************************************************
2193  *    SetIpStatistics (IPHLPAPI.@)
2194  *
2195  * Toggle IP forwarding and det the default TTL value.
2196  *
2197  * PARAMS
2198  *  pIpStats [In] IP statistics with the new information
2199  *
2200  * RETURNS
2201  *  Success: NO_ERROR
2202  *  Failure: error code from winerror.h
2203  *
2204  * FIXME
2205  *  Stub, returns NO_ERROR.
2206  */
2207 DWORD WINAPI SetIpStatistics(PMIB_IPSTATS pIpStats)
2208 {
2209   FIXME("(pIpStats %p): stub\n", pIpStats);
2210   return 0;
2211 }
2212
2213
2214 /******************************************************************
2215  *    SetIpTTL (IPHLPAPI.@)
2216  *
2217  * Set the default TTL value.
2218  *
2219  * PARAMS
2220  *  nTTL [In] new TTL value
2221  *
2222  * RETURNS
2223  *  Success: NO_ERROR
2224  *  Failure: error code from winerror.h
2225  *
2226  * FIXME
2227  *  Stub, returns NO_ERROR.
2228  */
2229 DWORD WINAPI SetIpTTL(UINT nTTL)
2230 {
2231   FIXME("(nTTL %d): stub\n", nTTL);
2232   /* could echo nTTL > /proc/net/sys/net/ipv4/ip_default_ttl, not sure I
2233      want to.  Could map EACCESS to ERROR_ACCESS_DENIED, I suppose */
2234   return 0;
2235 }
2236
2237
2238 /******************************************************************
2239  *    SetTcpEntry (IPHLPAPI.@)
2240  *
2241  * Set the state of a TCP connection.
2242  *
2243  * PARAMS
2244  *  pTcpRow [In] specifies connection with new state
2245  *
2246  * RETURNS
2247  *  Success: NO_ERROR
2248  *  Failure: error code from winerror.h
2249  *
2250  * FIXME
2251  *  Stub, returns NO_ERROR.
2252  */
2253 DWORD WINAPI SetTcpEntry(PMIB_TCPROW pTcpRow)
2254 {
2255   FIXME("(pTcpRow %p): stub\n", pTcpRow);
2256   return 0;
2257 }
2258
2259
2260 /******************************************************************
2261  *    UnenableRouter (IPHLPAPI.@)
2262  *
2263  * Decrement the IP-forwarding reference count. Turn off IP-forwarding
2264  * if it reaches zero.
2265  *
2266  * PARAMS
2267  *  pOverlapped     [In/Out] should be the same as in EnableRouter()
2268  *  lpdwEnableCount [Out]    optional, receives reference count
2269  *
2270  * RETURNS
2271  *  Success: NO_ERROR
2272  *  Failure: error code from winerror.h
2273  *
2274  * FIXME
2275  *  Stub, returns ERROR_NOT_SUPPORTED.
2276  */
2277 DWORD WINAPI UnenableRouter(OVERLAPPED * pOverlapped, LPDWORD lpdwEnableCount)
2278 {
2279   FIXME("(pOverlapped %p, lpdwEnableCount %p): stub\n", pOverlapped,
2280    lpdwEnableCount);
2281   /* could echo "0" > /proc/net/sys/net/ipv4/ip_forward, not sure I want to
2282      could map EACCESS to ERROR_ACCESS_DENIED, I suppose
2283    */
2284   return ERROR_NOT_SUPPORTED;
2285 }
2286
2287 /******************************************************************
2288  *    PfCreateInterface (IPHLPAPI.@)
2289  */
2290 DWORD WINAPI PfCreateInterface(DWORD dwName, PFFORWARD_ACTION inAction, PFFORWARD_ACTION outAction,
2291         BOOL bUseLog, BOOL bMustBeUnique, INTERFACE_HANDLE *ppInterface)
2292 {
2293     FIXME("(%d %d %d %x %x %p) stub\n", dwName, inAction, outAction, bUseLog, bMustBeUnique, ppInterface);
2294     return ERROR_CALL_NOT_IMPLEMENTED;
2295 }
2296
2297 /******************************************************************
2298  *    GetTcpTable2 (IPHLPAPI.@)
2299  */
2300 ULONG WINAPI GetTcpTable2(PMIB_TCPTABLE2 table, PULONG size, BOOL order)
2301 {
2302     FIXME("pTcpTable2 %p, pdwSize %p, bOrder %d: stub\n", table, size, order);
2303     return ERROR_NOT_SUPPORTED;
2304 }
2305
2306 /******************************************************************
2307  *    GetTcp6Table (IPHLPAPI.@)
2308  */
2309 ULONG WINAPI GetTcp6Table(PMIB_TCP6TABLE table, PULONG size, BOOL order)
2310 {
2311     FIXME("pTcp6Table %p, size %p, order %d: stub\n", table, size, order);
2312     return ERROR_NOT_SUPPORTED;
2313 }
2314
2315 /******************************************************************
2316  *    GetTcp6Table2 (IPHLPAPI.@)
2317  */
2318 ULONG WINAPI GetTcp6Table2(PMIB_TCP6TABLE2 table, PULONG size, BOOL order)
2319 {
2320     FIXME("pTcp6Table2 %p, size %p, order %d: stub\n", table, size, order);
2321     return ERROR_NOT_SUPPORTED;
2322 }