reactos/apps/utils/net/ipconfig/ipconfig.c

   1 /*
   2  * ReactOS Win32 Applications
   3  * Copyright (C) 2005 ReactOS Team
   4  *
   5  * COPYRIGHT:   See COPYING in the top level directory
   6  * PROJECT:     ReactOS arp utility
   7  * FILE:        apps/utils/net/ipconfig/ipconfig.c
   8  * PURPOSE:
   9  * PROGRAMMERS: Ged Murphy (gedmurphy@gmail.com)
  10  * REVISIONS:
  11  *   GM 14/09/05 Created
  12  *
  13  */
  14 /*
  15  * TODO:
  16  * fix renew / release
  17  * implement flushdns, registerdns, displaydns, showclassid, setclassid
  18  * allow globbing on adapter names
  19  */
  20 #define WIN32_LEAN_AND_MEAN
  21 #include <windows.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <time.h>
  25 #include <tchar.h>
  26 #include <string.h>
  27 #include <ctype.h>
  28 #include <winsock2.h>
  29 #include <iphlpapi.h>
  30
  31 #define UNICODE
  32 #define _UNICODE
  33
  34
  35
  36 LPCTSTR GetNodeTypeName(UINT NodeType)
  37 {
  38     switch (NodeType) {
  39         case 1: return _T("Broadcast");
  40         case 2: return _T("Peer To Peer");
  41         case 4: return _T("Mixed");
  42         case 8: return _T("Hybrid");
  43         default : return _T("unknown");
  44     }
  45 }
  46
  47 LPCTSTR GetInterfaceTypeName(UINT InterfaceType)
  48 {
  49     switch (InterfaceType) {
  50         case MIB_IF_TYPE_OTHER:     return _T("Other Type Of Adapter");
  51         case MIB_IF_TYPE_ETHERNET:  return _T("Ethernet Adapter");
  52         case MIB_IF_TYPE_TOKENRING: return _T("Token Ring Adapter");
  53         case MIB_IF_TYPE_FDDI:      return _T("FDDI Adapter");
  54         case MIB_IF_TYPE_PPP:       return _T("PPP Adapter");
  55         case MIB_IF_TYPE_LOOPBACK:  return _T("Loopback Adapter");
  56         case MIB_IF_TYPE_SLIP:      return _T("SLIP Adapter");
  57         default: return _T("unknown");
  58     }
  59 }
  60
  61 /* print MAC address */
  62 PTCHAR PrintMacAddr(PBYTE Mac)
  63 {
  64     static TCHAR MacAddr[20];
  65
  66     _stprintf(MacAddr, _T("%02x-%02x-%02x-%02x-%02x-%02x"),
  67         Mac[0], Mac[1], Mac[2], Mac[3], Mac[4],  Mac[5]);
  68
  69     return MacAddr;
  70 }
  71
  72 DWORD DoFormatMessage(DWORD ErrorCode)
  73 {
  74     LPVOID lpMsgBuf;
  75     DWORD RetVal;
  76
  77     if ((RetVal = FormatMessage(
  78             FORMAT_MESSAGE_ALLOCATE_BUFFER |
  79             FORMAT_MESSAGE_FROM_SYSTEM |
  80             FORMAT_MESSAGE_IGNORE_INSERTS,
  81             NULL,
  82             ErrorCode,
  83             MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), /* Default language */
  84             (LPTSTR) &lpMsgBuf,
  85             0,
  86             NULL ))) {
  87         _tprintf(_T("%s"), (LPTSTR)lpMsgBuf);
  88
  89         LocalFree(lpMsgBuf);
  90         /* return number of TCHAR's stored in output buffer
  91          * excluding '\0' - as FormatMessage does*/
  92         return RetVal;
  93     }
  94     else
  95         return 0;
  96 }
  97
  98 INT ShowInfo(BOOL bAll)
  99 {
 100     PIP_ADAPTER_INFO pAdapterInfo = NULL;
 101     PIP_ADAPTER_INFO pAdapter = NULL;
 102     ULONG    adaptOutBufLen;
 103
 104     PFIXED_INFO pFixedInfo;
 105     ULONG    netOutBufLen;
 106     PIP_ADDR_STRING pIPAddr = NULL;
 107
 108         DWORD ErrRet = 0;
 109
 110     /* assign memory for call to GetNetworkParams */
 111     pFixedInfo = (FIXED_INFO *) GlobalAlloc( GPTR, sizeof( FIXED_INFO ) );
 112     netOutBufLen = sizeof(FIXED_INFO);
 113
 114     /* assign memory for call to GetAdapterInfo */
 115     pAdapterInfo = (IP_ADAPTER_INFO *) malloc( sizeof(IP_ADAPTER_INFO) );
 116     adaptOutBufLen = sizeof(IP_ADAPTER_INFO);
 117
 118     /* set required buffer size */
 119     if(GetNetworkParams(pFixedInfo, &netOutBufLen) == ERROR_BUFFER_OVERFLOW)
 120         {
 121         GlobalFree(pFixedInfo);
 122         pFixedInfo = (FIXED_INFO *) GlobalAlloc(GPTR, netOutBufLen);
 123     }
 124
 125     /* set required buffer size */
 126     if (GetAdaptersInfo( pAdapterInfo, &adaptOutBufLen) == ERROR_BUFFER_OVERFLOW)
 127         {
 128        free(pAdapterInfo);
 129        pAdapterInfo = (IP_ADAPTER_INFO *) malloc (adaptOutBufLen);
 130     }
 131
 132     if ((ErrRet = GetAdaptersInfo(pAdapterInfo, &adaptOutBufLen)) != NO_ERROR)
 133         {
 134                 _tprintf(_T("GetAdaptersInfo failed : "));
 135                 DoFormatMessage(ErrRet);
 136                 return EXIT_FAILURE;
 137         }
 138
 139     if ((ErrRet = GetNetworkParams(pFixedInfo, &netOutBufLen)) != NO_ERROR)
 140         {
 141                 _tprintf(_T("GetNetworkParams failed : "));
 142                 DoFormatMessage(ErrRet);
 143                 return EXIT_FAILURE;
 144         }
 145
 146     pAdapter = pAdapterInfo;
 147
 148     _tprintf(_T("\nReactOS IP Configuration\n\n"));
 149
 150     if (bAll)
 151     {
 152         _tprintf(_T("\tHost Name . . . . . . . . . . . . : %s\n"), pFixedInfo->HostName);
 153         _tprintf(_T("\tPrimary DNS Suffix. . . . . . . . : \n"));
 154         _tprintf(_T("\tNode Type . . . . . . . . . . . . : %s\n"), GetNodeTypeName(pFixedInfo->NodeType));
 155         if (pFixedInfo->EnableRouting)
 156             _tprintf(_T("\tIP Routing Enabled. . . . . . . . : Yes\n"));
 157         else
 158             _tprintf(_T("\tIP Routing Enabled. . . . . . . . : No\n"));
 159         if (pAdapter->HaveWins)
 160             _tprintf(_T("\tWINS Proxy enabled. . . . . . . . : Yes\n"));
 161         else
 162             _tprintf(_T("\tWINS Proxy enabled. . . . . . . . : No\n"));
 163         _tprintf(_T("\tDNS Suffix Search List. . . . . . : %s\n"), pFixedInfo->DomainName);
 164     }
 165
 166         while (pAdapter)
 167         {
 168
 169         _tprintf(_T("\n%s ...... : \n\n"), GetInterfaceTypeName(pAdapter->Type));
 170
 171         /* check if the adapter is connected to the media */
 172         if (_tcscmp(pAdapter->IpAddressList.IpAddress.String, "0.0.0.0") == 0)
 173         {
 174             _tprintf(_T("\tMedia State . . . . . . . . . . . : Media disconnected\n"));
 175             pAdapter = pAdapter->Next;
 176             continue;
 177         }
 178
 179         _tprintf(_T("\tConnection-specific DNS Suffix. . : %s\n"), pFixedInfo->DomainName);
 180
 181         if (bAll)
 182         {
 183             _tprintf(_T("\tDescription . . . . . . . . . . . : %s\n"), pAdapter->Description);
 184             _tprintf(_T("\tPhysical Address. . . . . . . . . : %s\n"), PrintMacAddr(pAdapter->Address));
 185             if (pAdapter->DhcpEnabled)
 186                 _tprintf(_T("\tDHCP Enabled. . . . . . . . . . . : Yes\n"));
 187             else
 188                 _tprintf(_T("\tDHCP Enabled. . . . . . . . . . . : No\n"));
 189             _tprintf(_T("\tAutoconfiguration Enabled . . . . : \n"));
 190         }
 191
 192         _tprintf(_T("\tIP Address. . . . . . . . . . . . : %s\n"), pAdapter->IpAddressList.IpAddress.String);
 193         _tprintf(_T("\tSubnet Mask . . . . . . . . . . . : %s\n"), pAdapter->IpAddressList.IpMask.String);
 194         _tprintf(_T("\tDefault Gateway . . . . . . . . . : %s\n"), pAdapter->GatewayList.IpAddress.String);
 195
 196         if (bAll)
 197         {
 198             if (pAdapter->DhcpEnabled)
 199                _tprintf(_T("\tDHCP Server . . . . . . . . . . . : %s\n"), pAdapter->DhcpServer.IpAddress.String);
 200
 201             _tprintf(_T("\tDNS Servers . . . . . . . . . . . : "));
 202             _tprintf(_T("%s\n"), pFixedInfo->DnsServerList.IpAddress.String);
 203             pIPAddr = pFixedInfo -> DnsServerList.Next;
 204             while (pIPAddr)
 205             {
 206                 _tprintf(_T("\t\t\t\t\t    %s\n"), pIPAddr ->IpAddress.String );
 207                 pIPAddr = pIPAddr ->Next;
 208             }
 209             if (pAdapter->HaveWins)
 210             {
 211                 _tprintf(_T("\tPrimary WINS Server . . . . . . . : %s\n"), pAdapter->PrimaryWinsServer.IpAddress.String);
 212                 _tprintf(_T("\tSecondard WINS Server . . . . . . : %s\n"), pAdapter->SecondaryWinsServer.IpAddress.String);
 213             }
 214             if (pAdapter->DhcpEnabled)
 215             {
 216                 _tprintf(_T("\tLease Obtained. . . . . . . . . . : %s"), _tasctime(localtime(&pAdapter->LeaseObtained)));
 217                 _tprintf(_T("\tLease Expires . . . . . . . . . . : %s"), _tasctime(localtime(&pAdapter->LeaseExpires)));
 218             }
 219         }
 220         _tprintf(_T("\n"));
 221
 222                 pAdapter = pAdapter->Next;
 223
 224     }
 225
 226     return 0;
 227 }
 228
 229 INT Release(TCHAR Index)
 230 {
 231     IP_ADAPTER_INDEX_MAP AdapterInfo;
 232     DWORD dwRetVal = 0;
 233
 234     /* if interface is not given, query GetInterfaceInfo */
 235     if (Index == (TCHAR)NULL)
 236     {
 237         PIP_INTERFACE_INFO pInfo;
 238         ULONG ulOutBufLen;
 239         pInfo = (IP_INTERFACE_INFO *) malloc(sizeof(IP_INTERFACE_INFO));
 240         ulOutBufLen = 0;
 241
 242         /* Make an initial call to GetInterfaceInfo to get
 243          * the necessary size into the ulOutBufLen variable */
 244         if ( GetInterfaceInfo(pInfo, &ulOutBufLen) == ERROR_INSUFFICIENT_BUFFER)
 245         {
 246             GlobalFree(pInfo);
 247             pInfo = (IP_INTERFACE_INFO *) malloc (ulOutBufLen);
 248         }
 249
 250         /* Make a second call to GetInterfaceInfo to get the actual data we want */
 251         if ((dwRetVal = GetInterfaceInfo(pInfo, &ulOutBufLen)) == NO_ERROR )
 252         {
 253             AdapterInfo = pInfo->Adapter[0];
 254             _tprintf(_T("name - %S\n"), pInfo->Adapter[0].Name);
 255         }
 256         else
 257         {
 258             _tprintf(_T("\nGetInterfaceInfo failed : "));
 259             DoFormatMessage(dwRetVal);
 260         }
 261     }
 262     else
 263     {
 264         ;
 265         /* we need to be able to release connections by name with support for globbing
 266          * i.e. ipconfig /release Eth* will release all cards starting with Eth...
 267          *      ipconfig /release *con* will release all cards with 'con' in their name
 268          */
 269     }
 270
 271
 272     /* Call IpReleaseAddress to release the IP address on the specified adapter. */
 273     if ((dwRetVal = IpReleaseAddress(&AdapterInfo)) != NO_ERROR)
 274     {
 275         _tprintf(_T("\nAn error occured while releasing interface %s : "), _T("*name*"));
 276         DoFormatMessage(dwRetVal);
 277     }
 278     return 0;
 279 }
 280
 281
 282
 283
 284 INT Renew(TCHAR Index)
 285 {
 286     IP_ADAPTER_INDEX_MAP AdapterInfo;
 287     DWORD dwRetVal = 0;
 288
 289     /* if interface is not given, query GetInterfaceInfo */
 290     if (Index == (TCHAR)NULL)
 291     {
 292         PIP_INTERFACE_INFO pInfo;
 293         ULONG ulOutBufLen;
 294         pInfo = (IP_INTERFACE_INFO *) malloc(sizeof(IP_INTERFACE_INFO));
 295         ulOutBufLen = 0;
 296
 297         /* Make an initial call to GetInterfaceInfo to get
 298          * the necessary size into the ulOutBufLen variable */
 299         if ( GetInterfaceInfo(pInfo, &ulOutBufLen) == ERROR_INSUFFICIENT_BUFFER)
 300         {
 301             GlobalFree(pInfo);
 302             pInfo = (IP_INTERFACE_INFO *) malloc (ulOutBufLen);
 303         }
 304
 305         /* Make a second call to GetInterfaceInfo to get the actual data we want */
 306         if ((dwRetVal = GetInterfaceInfo(pInfo, &ulOutBufLen)) == NO_ERROR )
 307         {
 308             AdapterInfo = pInfo->Adapter[0];
 309             _tprintf(_T("name - %S\n"), pInfo->Adapter[0].Name);
 310         } else {
 311             _tprintf(_T("\nGetInterfaceInfo failed : "));
 312             DoFormatMessage(dwRetVal);
 313         }
 314     }
 315     else
 316     {
 317         ;
 318         /* we need to be able to renew connections by name with support for globbing
 319          * i.e. ipconfig /renew Eth* will renew all cards starting with Eth...
 320          *      ipconfig /renew *con* will renew all cards with 'con' in their name
 321          */
 322     }
 323
 324
 325     /* Call IpRenewAddress to renew the IP address on the specified adapter. */
 326     if ((dwRetVal = IpRenewAddress(&AdapterInfo)) != NO_ERROR)
 327     {
 328         _tprintf(_T("\nAn error occured while renew interface %s : "), _T("*name*"));
 329         DoFormatMessage(dwRetVal);
 330     }
 331     return 0;
 332 }
 333
 334 /* temp func for testing purposes */
 335 VOID Info()
 336 {
 337      // Declare and initialize variables
 338     PIP_INTERFACE_INFO pInfo;
 339     ULONG ulOutBufLen;
 340     DWORD dwRetVal;
 341
 342     pInfo = (IP_INTERFACE_INFO *) malloc( sizeof(IP_INTERFACE_INFO) );
 343     ulOutBufLen = sizeof(IP_INTERFACE_INFO);
 344     dwRetVal = 0;
 345
 346
 347     // Make an initial call to GetInterfaceInfo to get
 348     // the necessary size in the ulOutBufLen variable
 349     if ( GetInterfaceInfo(pInfo, &ulOutBufLen) == ERROR_INSUFFICIENT_BUFFER)
 350     {
 351         free(pInfo);
 352         pInfo = (IP_INTERFACE_INFO *) malloc (ulOutBufLen);
 353     }
 354
 355     // Make a second call to GetInterfaceInfo to get
 356     // the actual data we need
 357     if ((dwRetVal = GetInterfaceInfo(pInfo, &ulOutBufLen)) == NO_ERROR )
 358     {
 359         int i;
 360         for (i=0; i<pInfo->NumAdapters; i++)
 361         {
 362             printf("\tAdapter Name: %S\n", pInfo->Adapter[i].Name);
 363             printf("\tAdapter Index: %ld\n", pInfo->Adapter[i].Index);
 364             printf("\tNum Adapters: %ld\n", pInfo->NumAdapters);
 365         }
 366     }
 367     else
 368     {
 369         printf("GetInterfaceInfo failed.\n");
 370         DoFormatMessage(dwRetVal);
 371     }
 372 }
 373
 374
 375 VOID Usage(VOID)
 376 {
 377     _tprintf(_T("\nUSAGE:\n"
 378     "    ipconfig [/? | /all | /renew [adapter] | /release [adapter] |\n"
 379     "              /flushdns | /displaydns | /registerdns |\n"
 380     "              /showclassid adapter |\n"
 381     "              /setclassid adapter [classid] ]\n"
 382     "\n"
 383     "where\n"
 384     "    adapter         Connection name\n"
 385     "                   (wildcard characters * and ? allowed, see examples)\n"
 386     "\n"
 387     "    Options:\n"
 388     "       /?           Display this help message\n"
 389     "       /all         Display full configuration information.\n"
 390     "       /release     Release the IP address for the specified adapter.\n"
 391     "       /renew       Renew the IP address for the specified adapter.\n"
 392     "       /flushdns    Purges the DNS Resolver cache.\n"
 393     "       /registerdns Refreshes all DHCP leases and re-registers DNS names.\n"
 394     "       /displaydns  Display the contents of the DNS Resolver Cache.\n"
 395     "       /showclassid Displays all the dhcp class IDs allowed for adapter.\n"
 396     "       /setclassid  Modifies the dhcp class id.\n"
 397     "\n"
 398     "The default is to display only the IP address, subnet mask and\n"
 399     "default gateway for each adapter bound to TCP/IP.\n"
 400     "\n"
 401     "For Release and Renew, if no adapter name is specified, then the IP address\n"
 402     "leases for all adapters bound to TCP/IP will be released or renewed.\n"
 403     "\n"
 404     "For Setclassid, if no ClassId is specified, then the ClassId is removed.\n"
 405     "\n"
 406     "Examples:\n"
 407     "    > ipconfig                   ... Show information.\n"
 408     "    > ipconfig /all              ... Show detailed information\n"
 409     "    > ipconfig /renew            ... renew all adapters\n"
 410     "    > ipconfig /renew EL*        ... renew any connection that has its\n"
 411     "                                     name starting with EL\n"
 412     "    > ipconfig /release *Con*    ... release all matching connections,\n"
 413     "                                     eg. \"Local Area Connection 1\" or\n"
 414     "                                         \"Local Area Connection 2\"\n"));
 415 }
 416
 417 int main(int argc, char *argv[])
 418 {
 419     BOOL DoUsage=FALSE;
 420     BOOL DoAll=FALSE;
 421     BOOL DoRelease=FALSE;
 422     BOOL DoRenew=FALSE;
 423     BOOL DoFlushdns=FALSE;
 424     BOOL DoRegisterdns=FALSE;
 425     BOOL DoDisplaydns=FALSE;
 426     BOOL DoShowclassid=FALSE;
 427     BOOL DoSetclassid=FALSE;
 428
 429     /* Parse command line for options we have been given. */
 430     if ( (argc > 1)&&(argv[1][0]=='/') )
 431     {
 432         if( !_tcsicmp( &argv[1][1], _T("?") ))
 433         {
 434             DoUsage = TRUE;
 435         }
 436         else if( !_tcsnicmp( &argv[1][1], _T("ALL"), _tcslen(&argv[1][1]) ))
 437         {
 438            DoAll = TRUE;
 439         }
 440         else if( !_tcsnicmp( &argv[1][1], _T("RELEASE"), _tcslen(&argv[1][1]) ))
 441         {
 442             DoRelease = TRUE;
 443         }
 444         else if( ! _tcsnicmp( &argv[1][1], _T("RENEW"), _tcslen(&argv[1][1]) ))
 445         {
 446             DoRenew = TRUE;
 447         }
 448         else if( ! _tcsnicmp( &argv[1][1], _T("FLUSHDNS"), _tcslen(&argv[1][1]) ))
 449         {
 450             DoFlushdns = TRUE;
 451         }
 452         else if( ! _tcsnicmp( &argv[1][1], _T("FLUSHREGISTERDNS"), _tcslen(&argv[1][1]) ))
 453         {
 454             DoRegisterdns = TRUE;
 455         }
 456         else if( ! _tcsnicmp( &argv[1][1], _T("DISPLAYDNS"), _tcslen(&argv[1][1]) ))
 457         {
 458             DoDisplaydns = TRUE;
 459         }
 460         else if( ! _tcsnicmp( &argv[1][1], _T("SHOWCLASSID"), _tcslen(&argv[1][1]) ))
 461         {
 462             DoShowclassid = TRUE;
 463         }
 464         else if( ! _tcsnicmp( &argv[1][1], _T("SETCLASSID"), _tcslen(&argv[1][1]) ))
 465         {
 466             DoSetclassid = TRUE;
 467         }
 468     }
 469
 470     switch (argc)
 471     {
 472         case 1:  /* Default behaviour if no options are given*/
 473             ShowInfo(FALSE);
 474             break;
 475         case 2:  /* Process all the options that take no paramiters */
 476             if (DoUsage)
 477                 Usage();
 478             else if (DoAll)
 479                 ShowInfo(TRUE);
 480             else if (DoRelease)
 481                 Release((TCHAR)NULL);
 482             else if (DoRenew)
 483                 Renew((TCHAR)NULL);
 484             else if (DoFlushdns)
 485                 _tprintf(_T("\nSorry /flushdns is not implemented yet\n"));
 486             else if (DoRegisterdns)
 487                 _tprintf(_T("\nSorry /registerdns is not implemented yet\n"));
 488             else if (DoDisplaydns)
 489                 _tprintf(_T("\nSorry /displaydns is not implemented yet\n"));
 490             else
 491                 Usage();
 492             break;
 493         case 3: /* Process all the options that can have 1 paramiters */
 494             if (DoRelease)
 495                 _tprintf(_T("\nSorry /release [adapter] is not implemented yet\n"));
 496                 //Release(argv[2]);
 497             else if (DoRenew)
 498                 _tprintf(_T("\nSorry /renew [adapter] is not implemented yet\n"));
 499             else if (DoShowclassid)
 500                 _tprintf(_T("\nSorry /showclassid adapter is not implemented yet\n"));
 501             else if (DoSetclassid)
 502                 _tprintf(_T("\nSorry /setclassid adapter is not implemented yet\n"));
 503             else
 504                 Usage();
 505             break;
 506         case 4:  /* Process all the options that can have 2 paramiters */
 507             if (DoSetclassid)
 508                 _tprintf(_T("\nSorry /setclassid adapter [classid]is not implemented yet\n"));
 509             else
 510                 Usage();
 511             break;
 512         default:
 513             Usage();
 514     }
 515
 516     return 0;
 517 }