reactos/dll/cpl/ncpa/ncpa.c

   1 /*
   2  * Copyright 2004 Gero Kuehn
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18 /*
  19  * PROJECT:         ReactOS Network Control Panel
  20  * FILE:            lib/cpl/system/ncpa.c
  21  * PURPOSE:         ReactOS Network Control Panel
  22  * PROGRAMMER:      Gero Kuehn (reactos.filter@gkware.com)
  23  * UPDATE HISTORY:
  24  *      07-18-2004  Created
  25  */
  26
  27 /*
  28  * Read this first !
  29  *
  30  * This file contains a first attempt for reactos network configuration
  31  *
  32  *  - It is not complete.
  33  *  - It does not work the way it works on Windows.
  34  *
  35  * A lot of code that can be found here now, will probably be relocated into the OS core or some
  36  * protocol Co-Installers or Notify Objects later when all the required COM
  37  * and "netcfgx.dll" infrastructure (esp. headers and Interfaces) get implemented step by step.
  38  *
  39  * This code is only a first approach to provide a usable network configuration dialogs for
  40  * the new network support in Reactos.
  41  *
  42  * If you intend to extend this code by more, please contact me to avoid duplicate work.
  43  * There are already resources and code for TCP/IP configuration that are not
  44  * mature enough for committing them to CVS yet.
  45  */
  46
  47 #include <stdlib.h>
  48 #include <stdio.h>
  49 #include <stdarg.h>
  50 #include <tchar.h>
  51 #include <windows.h>
  52 #include <iphlpapi.h>
  53 #include <commctrl.h>
  54 #include <cpl.h>
  55
  56 #include <debug.h>
  57
  58 #include "resource.h"
  59 #include "ncpa.h"
  60
  61 #define NCF_VIRTUAL                     0x1
  62 #define NCF_SOFTWARE_ENUMERATED         0x2
  63 #define NCF_PHYSICAL                    0x4
  64 #define NCF_HIDDEN                      0x8
  65 #define NCF_NO_SERVICE                  0x10
  66 #define NCF_NOT_USER_REMOVABLE          0x20
  67 #define NCF_MULTIPORT_INSTANCED_ADAPTER 0x40
  68 #define NCF_HAS_UI                      0x80
  69 #define NCF_FILTER                      0x400
  70 #define NCF_NDIS_PROTOCOL               0x4000
  71
  72 typedef void (ENUMREGKEYCALLBACK)(void *pCookie,HKEY hBaseKey,TCHAR *pszSubKey);
  73
  74 static LONG CALLBACK DisplayApplet(VOID);
  75 static INT_PTR CALLBACK NetworkPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam);
  76 void DisplayTCPIPProperties(HWND hParent,IP_ADAPTER_INFO *pInfo);
  77
  78 HINSTANCE hApplet = 0;
  79
  80 /* Applets */
  81 static APPLET Applets[] =
  82 {
  83         {IDI_CPLSYSTEM, IDS_CPLSYSTEMNAME, IDS_CPLSYSTEMDESCRIPTION, DisplayApplet}
  84 };
  85
  86
  87 /* useful utilities */
  88 static VOID
  89 EnumRegKeys(ENUMREGKEYCALLBACK *pCallback,PVOID pCookie,HKEY hBaseKey,TCHAR *tpszRegPath)
  90 {
  91         HKEY hKey;
  92         INT i;
  93         LONG ret;
  94         TCHAR tpszName[MAX_PATH];
  95         DWORD dwNameLen = sizeof(tpszName);
  96
  97         if(RegOpenKeyEx(hBaseKey,tpszRegPath,0,KEY_ENUMERATE_SUB_KEYS,&hKey)!=ERROR_SUCCESS)
  98         {
  99                 DPRINT("EnumRegKeys failed (key not found): %S\n", tpszRegPath);
 100                 return;
 101         }
 102
 103         for(i=1;;i++)
 104         {
 105                 TCHAR pszNewPath[MAX_PATH];
 106                 ret = RegEnumKeyEx(hKey,i,tpszName,&dwNameLen,NULL,NULL,NULL,NULL);
 107                 if(ret != ERROR_SUCCESS)
 108                 {
 109                         DPRINT("EnumRegKeys: RegEnumKeyEx failed for %S (rc 0x%lx)\n", tpszName, ret);
 110                         break;
 111                 }
 112
 113                 _stprintf(pszNewPath,_T("%s\\%s"),tpszRegPath,tpszName);
 114                 DPRINT("EnumRegKeys: Calling user supplied enum function\n");
 115                 pCallback(pCookie,hBaseKey,pszNewPath);
 116
 117                 dwNameLen = sizeof(tpszName);
 118         }
 119
 120         RegCloseKey(hKey);
 121 }
 122
 123 void
 124 InitPropSheetPage(PROPSHEETPAGE *psp, WORD idDlg, DLGPROC DlgProc,LPARAM lParam)
 125 {
 126         ZeroMemory(psp, sizeof(PROPSHEETPAGE));
 127         psp->dwSize = sizeof(PROPSHEETPAGE);
 128         psp->dwFlags = PSP_DEFAULT;
 129         psp->hInstance = hApplet;
 130         psp->pszTemplate = MAKEINTRESOURCE(idDlg);
 131         psp->pfnDlgProc = DlgProc;
 132         psp->lParam = lParam;
 133 }
 134
 135
 136
 137 static BOOL
 138 FindNICClassKeyForCfgInstance(TCHAR *tpszCfgInst,TCHAR *tpszSubKeyOut)
 139 {
 140         int i;
 141         TCHAR tpszSubKey[MAX_PATH];
 142         TCHAR tpszCfgInst2[MAX_PATH];
 143         HKEY hKey;
 144         DWORD dwType,dwSize;
 145
 146         for (i = 0; i < 100; i++)
 147         {
 148                 _stprintf(tpszSubKey,_T("SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002BE10318}\\%04d"),i);
 149                 if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 150                         continue;
 151                 dwType = REG_SZ;
 152                 dwSize = sizeof(tpszCfgInst2);
 153                 if(RegQueryValueEx(hKey,_T("NetCfgInstanceId"),NULL,&dwType,(BYTE*)tpszCfgInst2,&dwSize)!=ERROR_SUCCESS) {
 154                         RegCloseKey(hKey);
 155                         continue;
 156                 }
 157                 RegCloseKey(hKey);
 158                 if(_tcscmp(tpszCfgInst,tpszCfgInst2)==0) {
 159                         _tcscpy(tpszSubKeyOut,tpszSubKey);
 160                         return TRUE;
 161                 }
 162         }
 163         return FALSE;
 164 }
 165
 166
 167 static void
 168 NICPropertyProtocolCallback(void *pCookie,HKEY hBaseKey,TCHAR *tpszSubKey)
 169 {
 170         HWND hwndDlg;
 171         DWORD dwCharacteristics;
 172         HKEY hKey,hNDIKey;
 173         DWORD dwType,dwSize;
 174         TCHAR tpszDescription[MAX_PATH];
 175         TCHAR tpszNotifyObjectCLSID[MAX_PATH];
 176         TCHAR *tpszSubKeyCopy;
 177         int nIndex;
 178
 179         UNREFERENCED_PARAMETER(hBaseKey);
 180
 181 //      CLSID CLSID_NotifObj;
 182 //      IUnknown *pUnk = NULL;
 183 //      INetCfgComponentControl *pNetCfg;
 184 //      INetCfgComponentPropertyUi *pNetCfgPropUI;
 185         hwndDlg = (HWND)pCookie;
 186
 187         if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 188                 return;
 189
 190         dwType = REG_DWORD;
 191         dwSize = sizeof(dwCharacteristics);
 192         if(RegQueryValueEx(hKey,_T("Characteristics"),NULL,&dwType,(BYTE*)&dwCharacteristics,&dwSize)!= ERROR_SUCCESS)
 193                 return;
 194
 195         if(dwCharacteristics & NCF_HIDDEN)
 196         {
 197                 RegCloseKey(hKey);
 198                 return;
 199         }
 200
 201         dwType = REG_SZ;
 202         dwSize = sizeof(tpszDescription);
 203         if(RegQueryValueEx(hKey,_T("Description"),NULL,&dwType,(BYTE*)tpszDescription,&dwSize)!= ERROR_SUCCESS)
 204                 return;
 205
 206         RegOpenKeyEx(hKey,_T("Ndi"),0,KEY_QUERY_VALUE,&hNDIKey);
 207         dwType = REG_SZ;
 208         dwSize = sizeof(tpszNotifyObjectCLSID);
 209         if(RegQueryValueEx(hNDIKey,_T("ClsId"),NULL,&dwType,(BYTE*)tpszNotifyObjectCLSID,&dwSize)!= ERROR_SUCCESS)
 210                 ;//return;
 211
 212         RegCloseKey(hNDIKey);
 213
 214         //
 215         // This code works on Windows... but not on Reactos
 216         //
 217
 218 //      CLSIDFromString(tpszNotifyObjectCLSID,&CLSID_NotifObj);
 219 //      CoCreateInstance(&CLSID_NotifObj,NULL,CLSCTX_INPROC_SERVER,&IID_IUnknown,(void**)&pUnk);
 220 //      pUnk->lpVtbl->QueryInterface(pUnk,&IID_INetCfgComponentControl,(void**)&pNetCfg);
 221 //      pUnk->lpVtbl->QueryInterface(pUnk,&IID_INetCfgComponentPropertyUi,(void**)&pNetCfgPropUI);
 222         {
 223                 /*
 224         HRESULT hr;
 225         hr = pNetCfg->lpVtbl->Initialize(pNetCfg,&NetCfgComponent,&NetCfg,FALSE);
 226         hr = pNetCfgPropUI->lpVtbl->QueryPropertyUi(pNetCfgPropUI,(INetCfg*)&NetCfg);
 227         hr = pNetCfgPropUI->lpVtbl->SetContext(pNetCfgPropUI,(INetCfg*)&NetCfgComponent);
 228         DWORD dwNumPages = 10;
 229         HPROPSHEETPAGE  *bOut = NULL;
 230         UINT nPages;
 231         hr = pNetCfgPropUI->MergePropPages(&dwNumPages,(BYTE**)&bOut,&nPages,GetDesktopWindow(),NULL);
 232         */
 233         }
 234
 235         RegCloseKey(hKey);
 236         nIndex = (int) SendDlgItemMessage(hwndDlg,IDC_COMPONENTSLIST,LB_ADDSTRING,0,(LPARAM)tpszDescription);
 237         tpszSubKeyCopy = _tcsdup(tpszSubKey);
 238         SendDlgItemMessage(hwndDlg,IDC_COMPONENTSLIST,LB_SETITEMDATA,nIndex,(LPARAM)tpszSubKeyCopy);
 239 }
 240
 241
 242
 243 static INT_PTR CALLBACK
 244 NICPropertyPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
 245 {
 246         PROPSHEETPAGE *pPage = (PROPSHEETPAGE *)GetWindowLongPtr(hwndDlg,GWL_USERDATA);
 247         switch(uMsg)
 248         {
 249         case WM_INITDIALOG:
 250                 {
 251                         TCHAR *tpszCfgInstanceID;
 252                         DWORD dwType,dwSize;
 253                         TCHAR tpszSubKey[MAX_PATH];
 254                         TCHAR tpszDisplayName[MAX_PATH];
 255                         HKEY hKey;
 256                         pPage = (PROPSHEETPAGE *)lParam;
 257                         tpszCfgInstanceID = (TCHAR*)pPage->lParam;
 258                         if(!FindNICClassKeyForCfgInstance(tpszCfgInstanceID,tpszSubKey))
 259                         {
 260                                 MessageBox(hwndDlg,_T("NIC Entry not found"),_T("Registry error"),MB_ICONSTOP);
 261                                 MessageBox(hwndDlg,tpszCfgInstanceID,tpszSubKey,MB_ICONSTOP);
 262                         }
 263
 264                         if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 265                                 return 0;
 266                         dwType = REG_SZ;
 267                         dwSize = sizeof(tpszDisplayName);
 268                         if(RegQueryValueEx(hKey,_T("DriverDesc"),NULL,&dwType,(BYTE*)tpszDisplayName,&dwSize)!= ERROR_SUCCESS)
 269                                 return 0;
 270                         RegCloseKey(hKey);
 271
 272                         SetDlgItemText(hwndDlg,IDC_NETCARDNAME,tpszDisplayName);
 273                         EnableWindow(GetDlgItem(hwndDlg,IDC_CONFIGURE),FALSE);
 274
 275                         SetWindowLongPtr(hwndDlg,GWL_USERDATA,(DWORD_PTR)lParam);
 276                         //SetDlgItemTextA(hwndDlg,IDC_NETCARDNAME,Info[pPage->lParam].Description);
 277                         EnumRegKeys(NICPropertyProtocolCallback,hwndDlg,HKEY_LOCAL_MACHINE,_T("System\\CurrentControlSet\\Control\\Network\\{4D36E975-E325-11CE-BFC1-08002BE10318}"));
 278
 279                         SendDlgItemMessage(hwndDlg, IDC_COMPONENTSLIST, LB_SETCURSEL, 0, 0);
 280                 }
 281                 break;
 282         case WM_COMMAND:
 283                 switch(LOWORD(wParam))
 284                 {
 285                 case IDC_COMPONENTSLIST:
 286                         if(HIWORD(wParam)==LBN_SELCHANGE)
 287                         {
 288                                 TCHAR *tpszSubKey;
 289                                 TCHAR tpszHelpKey[MAX_PATH];
 290                                 TCHAR tpszHelpText[MAX_PATH];
 291                                 HKEY hNDIKey;
 292                                 DWORD dwType,dwSize;
 293                                 HWND hListBox = GetDlgItem(hwndDlg,IDC_COMPONENTSLIST);
 294                                 tpszSubKey = (TCHAR*)SendMessage(hListBox,LB_GETITEMDATA,SendMessage(hListBox,LB_GETCURSEL,0,0),0);
 295                                 if(!tpszSubKey)
 296                                         break;
 297                                 _stprintf(tpszHelpKey,_T("%s\\Ndi"),tpszSubKey);
 298
 299                                 RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszHelpKey,0,KEY_QUERY_VALUE,&hNDIKey);
 300                                 dwType = REG_SZ;
 301                                 dwSize = sizeof(tpszHelpText);
 302                                 if(RegQueryValueEx(hNDIKey,_T("HelpText"),NULL,&dwType,(BYTE*)tpszHelpText,&dwSize)!= ERROR_SUCCESS)
 303                                         ;//return;
 304                                 RegCloseKey(hNDIKey);
 305
 306                                 SetDlgItemText(hwndDlg,IDC_DESCRIPTION,tpszHelpText);
 307
 308                         }
 309                         if(HIWORD(wParam)!=LBN_DBLCLK)
 310                                 break;
 311                         // drop though
 312                 case IDC_PROPERTIES:
 313                         {
 314                                 TCHAR *tpszSubKey = NULL;
 315                                 TCHAR tpszNDIKey[MAX_PATH];
 316                                 TCHAR tpszClsIDText[MAX_PATH];
 317                                 TCHAR *tpszTCPIPClsID = _T("{A907657F-6FDF-11D0-8EFB-00C04FD912B2}");
 318                                 HKEY hNDIKey;
 319                                 DWORD dwType,dwSize;
 320                                 HWND hListBox = GetDlgItem(hwndDlg,IDC_COMPONENTSLIST);
 321                                 int iListBoxIndex = (int) SendMessage(hListBox,LB_GETCURSEL,0,0);
 322                                 if(iListBoxIndex != LB_ERR)
 323                                         tpszSubKey = (TCHAR*)SendMessage(hListBox,LB_GETITEMDATA,iListBoxIndex,0);
 324                                 if(!tpszSubKey)
 325                                         break;
 326                                 _stprintf(tpszNDIKey,_T("%s\\Ndi"),tpszSubKey);
 327
 328                                 RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszNDIKey,0,KEY_QUERY_VALUE,&hNDIKey);
 329                                 dwSize = sizeof(tpszClsIDText);
 330                                 if(RegQueryValueEx(hNDIKey,_T("ClsId"),NULL,&dwType,(BYTE*)tpszClsIDText,&dwSize)!= ERROR_SUCCESS || dwType != REG_SZ)
 331                                         ;//return;
 332                                 RegCloseKey(hNDIKey);
 333
 334                                 if(_tcscmp(tpszTCPIPClsID,tpszClsIDText)==0)
 335                                 {
 336                                         IP_ADAPTER_INFO Adapters[64];
 337                                         IP_ADAPTER_INFO *pAdapter;
 338                                         TCHAR *tpszCfgInstanceID;
 339                                         DWORD dwSize = sizeof(Adapters);
 340                                         memset(&Adapters,0x00,sizeof(Adapters));
 341                                         if(GetAdaptersInfo(Adapters,&dwSize)!=ERROR_SUCCESS)
 342                                                 break;;
 343                                         pAdapter = Adapters;
 344                                         tpszCfgInstanceID = (TCHAR*)pPage->lParam;
 345                                         while(pAdapter)
 346                                         {
 347                                                 TCHAR tpszAdapterName[MAX_PATH];
 348                                                 swprintf(tpszAdapterName,L"%S",pAdapter->AdapterName);
 349                                                 DPRINT("IPHLPAPI returned: %S\n", tpszAdapterName);
 350                                                 if(_tcscmp(tpszAdapterName,tpszCfgInstanceID)==0)
 351                                                 {
 352                                                         DisplayTCPIPProperties(hwndDlg,pAdapter);
 353                                                         break;
 354                                                 } else
 355                                                 {
 356                                                         DPRINT("... which is not the TCPIP property sheet\n");
 357                                                 }
 358                                                 pAdapter = pAdapter->Next;
 359                                                 if(!pAdapter)
 360                                                 {
 361                                                         MessageBox(NULL,_T("If you see this, then the IPHLPAPI.DLL probably needs more work because GetAdaptersInfo did not return the expected data."),_T("Error"),MB_ICONSTOP);
 362                                                 }
 363                                         }
 364
 365                                 } else
 366                                 {
 367                                         MessageBox(NULL,_T("This control panel is incomplete.\r\nUsually, the \"Notify Object\" for this Network component should be invoked here. Reactos lacks the infrastructure to do this right now.\r\n- C++\r\n- DDK Headers for notify objects\r\n- clean header structure, that allow Windows-Compatible COM C++ Code"),_T("Error"),MB_ICONSTOP);
 368                                 }
 369
 370                         }
 371                         break;
 372                 }
 373                 break;
 374         }
 375         return FALSE;
 376 }
 377
 378
 379 static void
 380 DisplayNICProperties(HWND hParent,TCHAR *tpszCfgInstanceID)
 381 {
 382         PROPSHEETPAGE psp[1];
 383         PROPSHEETHEADER psh;
 384         TCHAR tpszSubKey[MAX_PATH];
 385         HKEY hKey;
 386         DWORD dwType = REG_SZ;
 387         TCHAR tpszName[MAX_PATH];
 388         DWORD dwSize = sizeof(tpszName);
 389
 390         // Get the "Name" for this Connection
 391         _stprintf(tpszSubKey,_T("System\\CurrentControlSet\\Control\\Network\\{4D36E972-E325-11CE-BFC1-08002BE10318}\\%s\\Connection"),tpszCfgInstanceID);
 392         if(RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 393                 return;
 394         if(RegQueryValueEx(hKey,_T("Name"),NULL,&dwType,(BYTE*)tpszName,&dwSize)!=ERROR_SUCCESS)
 395                 _stprintf(tpszName,_T("[ERROR]"));
 396         else
 397                 _tcscat(tpszName,_T(" Properties"));
 398         RegCloseKey(hKey);
 399
 400
 401         ZeroMemory(&psh, sizeof(PROPSHEETHEADER));
 402         psh.dwSize = sizeof(PROPSHEETHEADER);
 403         psh.dwFlags =  PSH_PROPSHEETPAGE | PSH_NOAPPLYNOW;
 404         psh.hwndParent = hParent;
 405         psh.hInstance = hApplet;
 406         psh.hIcon = LoadIcon(hApplet, MAKEINTRESOURCE(IDI_CPLSYSTEM));
 407         psh.pszCaption = tpszName;
 408         psh.nPages = sizeof(psp) / sizeof(PROPSHEETPAGE);
 409         psh.nStartPage = 0;
 410         psh.ppsp = psp;
 411         psh.pfnCallback = NULL;
 412
 413
 414         InitPropSheetPage(&psp[0], IDD_NETPROPERTIES, NICPropertyPageProc,(LPARAM)tpszCfgInstanceID);
 415         PropertySheet(&psh);
 416         return;
 417 }
 418
 419 static INT_PTR CALLBACK
 420 NICStatusPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
 421 {
 422         switch(uMsg)
 423         {
 424         case WM_INITDIALOG:
 425                 {
 426                         PROPSHEETPAGE *psp= (PROPSHEETPAGE *)lParam;
 427                         EnableWindow(GetDlgItem(hwndDlg,IDC_ENDISABLE),FALSE);
 428                         SetWindowLongPtr(hwndDlg,DWL_USER,(DWORD_PTR)psp->lParam);
 429                 }
 430                 break;
 431         case WM_COMMAND:
 432                 switch(LOWORD(wParam))
 433                 {
 434                 case IDC_PROPERTIES:
 435                         {
 436                                 TCHAR *tpszCfgInstance;
 437                                 tpszCfgInstance = (TCHAR*)GetWindowLong(hwndDlg,DWL_USER);
 438                                 DisplayNICProperties(hwndDlg,tpszCfgInstance);
 439                         }
 440                         break;
 441                 }
 442                 break;
 443         }
 444         return FALSE;
 445 }
 446
 447 static INT_PTR CALLBACK
 448 NICSupportPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
 449 {
 450
 451         switch(uMsg)
 452         {
 453         case WM_INITDIALOG:
 454                 {
 455                         TCHAR Buffer[64];
 456
 457                         PIP_ADAPTER_INFO pAdapterInfo = NULL;
 458                         ULONG    adaptOutBufLen;
 459
 460                         DWORD ErrRet = 0;
 461
 462                 pAdapterInfo = (IP_ADAPTER_INFO *) malloc( sizeof(IP_ADAPTER_INFO) );
 463                 adaptOutBufLen = sizeof(IP_ADAPTER_INFO);
 464
 465                     if (GetAdaptersInfo( pAdapterInfo, &adaptOutBufLen) == ERROR_BUFFER_OVERFLOW)
 466                         {
 467                        free(pAdapterInfo);
 468                        pAdapterInfo = (IP_ADAPTER_INFO *) malloc (adaptOutBufLen);
 469                     }
 470
 471                     if ((ErrRet = GetAdaptersInfo(pAdapterInfo, &adaptOutBufLen)) != NO_ERROR)
 472                         {
 473                                 MessageBox(hwndDlg, _T("error adapterinfo") ,_T("ncpa.cpl"),MB_ICONSTOP);
 474
 475                                 if (pAdapterInfo) free(pAdapterInfo);
 476                                 return FALSE;
 477                         }
 478
 479                         if (pAdapterInfo)
 480                         {
 481                                 /*FIXME: select the correct adapter info!!*/
 482                                 _stprintf(Buffer, _T("%S"), pAdapterInfo->IpAddressList.IpAddress.String);
 483                                 SendDlgItemMessage(hwndDlg, IDC_DETAILSIP, WM_SETTEXT, 0, (LPARAM)Buffer);
 484                                 _stprintf(Buffer, _T("%S"), pAdapterInfo->IpAddressList.IpMask.String);
 485                                 SendDlgItemMessage(hwndDlg, IDC_DETAILSSUBNET, WM_SETTEXT, 0, (LPARAM)Buffer);
 486                                 _stprintf(Buffer, _T("%S"), pAdapterInfo->GatewayList.IpAddress.String);
 487                                 SendDlgItemMessage(hwndDlg, IDC_DETAILSGATEWAY, WM_SETTEXT, 0, (LPARAM)Buffer);
 488
 489                                 free(pAdapterInfo);
 490                         }
 491
 492
 493
 494                 }
 495                 break;
 496         case WM_COMMAND:
 497                 switch(LOWORD(wParam))
 498                 {
 499                 case IDC_PROPERTIES:
 500                         {
 501                         }
 502                         break;
 503                 case IDC_DETAILS:
 504                         {
 505                                 MessageBox(hwndDlg,_T("not implemented: show detail window"),_T("ncpa.cpl"),MB_ICONSTOP);
 506                         }
 507                         break;
 508
 509                 }
 510                 break;
 511         }
 512         return FALSE;
 513 }
 514
 515
 516 static VOID
 517 DisplayNICStatus(HWND hParent,TCHAR *tpszCfgInstanceID)
 518 {
 519         PROPSHEETPAGE psp[2];
 520         PROPSHEETHEADER psh;
 521         TCHAR tpszSubKey[MAX_PATH];
 522         HKEY hKey;
 523         DWORD dwType = REG_SZ;
 524         TCHAR tpszName[MAX_PATH];
 525         DWORD dwSize = sizeof(tpszName);
 526
 527         // Get the "Name" for this Connection
 528         _stprintf(tpszSubKey,_T("System\\CurrentControlSet\\Control\\Network\\{4D36E972-E325-11CE-BFC1-08002BE10318}\\%s\\Connection"),tpszCfgInstanceID);
 529         if (RegOpenKeyEx(HKEY_LOCAL_MACHINE,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 530                 return;
 531
 532         if (RegQueryValueEx(hKey,_T("Name"),NULL,&dwType,(BYTE*)tpszName,&dwSize)!=ERROR_SUCCESS)
 533                 _stprintf(tpszName,_T("[ERROR]"));
 534                 //_stprintf(tpszName,_T("[ERROR]") _T(__FILE__) _T(" %d"),__LINE__ );
 535         else
 536                 _tcscat(tpszName,_T(" Status"));
 537         RegCloseKey(hKey);
 538
 539         ZeroMemory(&psh, sizeof(PROPSHEETHEADER));
 540         psh.dwSize = sizeof(PROPSHEETHEADER);
 541         psh.dwFlags =  PSH_PROPSHEETPAGE | PSH_NOAPPLYNOW;
 542         psh.hwndParent = hParent;
 543         psh.hInstance = hApplet;
 544         // FIX THESE REACTOS HEADERS !!!!!!!!!
 545         psh.hIcon = LoadIcon(hApplet, MAKEINTRESOURCE(IDI_CPLSYSTEM));
 546         psh.pszCaption = tpszName;//Caption;
 547         psh.nPages = sizeof(psp) / sizeof(PROPSHEETPAGE);
 548         psh.nStartPage = 0;
 549         psh.ppsp = psp;
 550         psh.pfnCallback = NULL;
 551
 552         InitPropSheetPage(&psp[0], IDD_CARDPROPERTIES, NICStatusPageProc, (LPARAM)tpszCfgInstanceID);
 553         InitPropSheetPage(&psp[1], IDD_CARDSUPPORT, NICSupportPageProc, (LPARAM)tpszCfgInstanceID);
 554
 555         PropertySheet(&psh);
 556         return;
 557 }
 558
 559 //
 560 // IPHLPAPI does not provide a list of all adapters
 561 //
 562 #if 0
 563 static VOID
 564 EnumAdapters(HWND hwndDlg)
 565 {
 566         TCHAR pszText[MAX_ADAPTER_NAME_LENGTH + 4];
 567         IP_ADAPTER_INFO *pInfo;
 568         ULONG size;
 569         INT nIndex;
 570
 571         size=sizeof(Info);
 572         if(GetAdaptersInfo(Info,&size)!=ERROR_SUCCESS)
 573         {
 574                 MessageBox(hwndDlg,L"IPHLPAPI.DLL failed to provide Adapter information",L"Error",MB_ICONSTOP);
 575                 return;
 576         }
 577
 578         pInfo = &Info[0];
 579         while(pInfo)
 580         {
 581                 swprintf(pszText,L"%S",Info[0].Description);
 582                 nIndex = SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_ADDSTRING,0,(LPARAM)pszText);
 583                 SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_SETITEMDATA,nIndex,(LPARAM)pInfo);
 584                 pInfo = pInfo->Next;
 585         }
 586 }
 587 #endif
 588
 589
 590
 591 static void
 592 NetAdapterCallback(void *pCookie,HKEY hBaseKey,TCHAR *tpszSubKey)
 593 {
 594         TCHAR tpszDisplayName[MAX_PATH];
 595         //TCHAR tpszDeviceID[MAX_PATH];
 596         TCHAR tpszCfgInstanceID[MAX_PATH];
 597         TCHAR *ptpszCfgInstanceID;
 598         HKEY hKey;
 599         DWORD dwType = REG_SZ;
 600         DWORD dwSize = sizeof(tpszDisplayName);
 601         int nIndex;
 602         HWND hwndDlg = (HWND)pCookie;
 603         DWORD dwCharacteristics;
 604
 605         DPRINT("NetAdapterCallback: %S\n", tpszSubKey);
 606
 607         if(RegOpenKeyEx(hBaseKey,tpszSubKey,0,KEY_QUERY_VALUE,&hKey)!=ERROR_SUCCESS)
 608                 return;
 609
 610         DPRINT("NetAdapterCallback: Reading Characteristics\n");
 611         dwType = REG_DWORD;
 612         dwSize = sizeof(dwCharacteristics);
 613         if(RegQueryValueEx(hKey,_T("Characteristics"),NULL,&dwType,(BYTE*)&dwCharacteristics,&dwSize)!=ERROR_SUCCESS)
 614                 dwCharacteristics = 0;
 615
 616         if (dwCharacteristics & NCF_HIDDEN)
 617                 return;
 618
 619         if (!(dwCharacteristics & NCF_VIRTUAL) && !(dwCharacteristics & NCF_PHYSICAL))
 620                 return;
 621
 622         DPRINT("NetAdapterCallback: Reading DriverDesc\n");
 623         dwType = REG_SZ;
 624         dwSize = sizeof(tpszDisplayName);
 625         if (RegQueryValueEx(hKey,_T("DriverDesc"),NULL,&dwType,(BYTE*)tpszDisplayName,&dwSize)!= ERROR_SUCCESS)
 626                 _tcscpy(tpszDisplayName,_T("Unnamed Adapter"));
 627
 628         // get the link to the Enum Subkey (currently unused)
 629         //dwType = REG_SZ;
 630         //dwSize = sizeof(tpszDeviceID);
 631         //if(RegQueryValueEx(hKey,_T("MatchingDeviceId"),NULL,&dwType,(BYTE*)tpszDeviceID,&dwSize) != ERROR_SUCCESS) {
 632         //      MessageBox(hwndDlg,_T("Missing MatchingDeviceId Entry"),_T("Registry Problem"),MB_ICONSTOP);
 633         //      return;
 634         //}
 635
 636         // get the card configuration GUID
 637         dwType = REG_SZ;
 638         dwSize = sizeof(tpszCfgInstanceID);
 639         if(RegQueryValueEx(hKey,_T("NetCfgInstanceId"),NULL,&dwType,(BYTE*)tpszCfgInstanceID,&dwSize) != ERROR_SUCCESS) {
 640                 MessageBox(hwndDlg,_T("Missing NetCfgInstanceId Entry"),_T("Registry Problem"),MB_ICONSTOP);
 641                 return;
 642         }
 643
 644         ptpszCfgInstanceID = _tcsdup(tpszCfgInstanceID);
 645         //
 646         // **TODO** **FIXME** TBD
 647         // At this point, we should verify, if the device listed here
 648         // really represents a device that is currently connected to the system
 649         //
 650         // How is this done properly ?
 651
 652
 653         nIndex = (int) SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_ADDSTRING,0,(LPARAM)tpszDisplayName);
 654         SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_SETITEMDATA,nIndex,(LPARAM)ptpszCfgInstanceID);
 655         RegCloseKey(hKey);
 656 }
 657
 658
 659 static void
 660 EnumAdapters(HWND hwndDlg)
 661 {
 662         LPTSTR lpRegPath = _T("SYSTEM\\CurrentControlSet\\Control\\Class\\{4D36E972-E325-11CE-BFC1-08002BE10318}");
 663
 664         EnumRegKeys(NetAdapterCallback,hwndDlg,HKEY_LOCAL_MACHINE,lpRegPath);
 665         return;
 666 }
 667
 668
 669 static INT_PTR CALLBACK
 670 NetworkPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
 671 {
 672         NMHDR* pnmh;
 673         int nIndex;
 674         switch(uMsg)
 675         {
 676         case WM_INITDIALOG:
 677                 {
 678                         EnableWindow(GetDlgItem(hwndDlg,IDC_ADD),FALSE);
 679                         EnableWindow(GetDlgItem(hwndDlg,IDC_REMOVE),FALSE);
 680
 681                         EnumAdapters(hwndDlg);
 682                         SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_SETCURSEL,0,0);
 683                 }
 684                 break;
 685
 686         case WM_NOTIFY:
 687                 pnmh=(NMHDR*)lParam;
 688                 switch(pnmh->code)
 689                 {
 690                 case PSN_APPLY:
 691                 case PSN_RESET:
 692                         while(SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETCOUNT,0,0)>0)
 693                         {
 694                                 TCHAR *tpszString;
 695
 696                                 tpszString = (TCHAR*)SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETITEMDATA,0,0);
 697                                 if(tpszString)
 698                                         free(tpszString);
 699                                 SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_DELETESTRING,0,0);
 700                         }
 701                         break;
 702                 }
 703                 break;
 704
 705         case WM_COMMAND:
 706                 switch(LOWORD(wParam))
 707                 {
 708                 case IDC_NETCARDLIST:
 709                         if(HIWORD(wParam)==LBN_DBLCLK) {
 710                                 nIndex = (int) SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETCURSEL,0,0);
 711                                 if(nIndex!=-1)
 712                                         DisplayNICStatus(hwndDlg,(TCHAR*)SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETITEMDATA,nIndex,0));
 713                         }
 714                         break;
 715
 716                 case IDC_PROPERTIES:
 717                         nIndex = (int) SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETCURSEL,0,0);
 718                         if(nIndex!=-1)
 719                                 DisplayNICStatus(hwndDlg,(TCHAR*)SendDlgItemMessage(hwndDlg,IDC_NETCARDLIST,LB_GETITEMDATA,nIndex,0));
 720                         break;
 721                 }
 722                 break;
 723         }
 724
 725         return FALSE;
 726 }
 727
 728
 729
 730 /* First Applet */
 731 static LONG CALLBACK
 732 DisplayApplet(VOID)
 733 {
 734         PROPSHEETPAGE psp[1];
 735         PROPSHEETHEADER psh = {0};
 736         TCHAR Caption[1024];
 737
 738         LoadString(hApplet, IDS_CPLSYSTEMNAME, Caption, sizeof(Caption) / sizeof(TCHAR));
 739
 740         psh.dwSize = sizeof(PROPSHEETHEADER);
 741         psh.dwFlags =  PSH_PROPSHEETPAGE;
 742         psh.hwndParent = NULL;
 743         psh.hInstance = hApplet;
 744         psh.hIcon = LoadIcon(hApplet, MAKEINTRESOURCE(IDI_CPLSYSTEM));
 745         psh.pszCaption = Caption;
 746         psh.nPages = sizeof(psp) / sizeof(PROPSHEETPAGE);
 747         psh.nStartPage = 0;
 748         psh.ppsp = psp;
 749         psh.pfnCallback = NULL;
 750
 751         InitPropSheetPage(&psp[0], IDD_PROPPAGENETWORK, NetworkPageProc,0);
 752
 753         return (LONG)(PropertySheet(&psh) != -1);
 754 }
 755
 756 /* Control Panel Callback */
 757 LONG CALLBACK
 758 CPlApplet(HWND hwndCPl, UINT uMsg, LPARAM lParam1, LPARAM lParam2)
 759 {
 760         UNREFERENCED_PARAMETER(hwndCPl);
 761         switch (uMsg)
 762         {
 763         case CPL_INIT:
 764                 {
 765                         return TRUE;
 766                 }
 767
 768         case CPL_GETCOUNT:
 769                 {
 770                         return sizeof(Applets)/sizeof(APPLET);
 771                 }
 772
 773         case CPL_INQUIRE:
 774                 {
 775                         CPLINFO *CPlInfo = (CPLINFO*)lParam2;
 776                         CPlInfo->lData = 0;
 777                         CPlInfo->idIcon = Applets[(int)lParam1].idIcon;
 778                         CPlInfo->idName = Applets[(int)lParam1].idName;
 779                         CPlInfo->idInfo = Applets[(int)lParam1].idDescription;
 780                         break;
 781                 }
 782
 783         case CPL_DBLCLK:
 784                 {
 785                         Applets[(int)lParam1].AppletProc();
 786                         break;
 787                 }
 788         }
 789
 790         return FALSE;
 791 }
 792
 793
 794 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD dwReason, LPVOID lpvReserved)
 795 {
 796         UNREFERENCED_PARAMETER(lpvReserved);
 797
 798         switch(dwReason)
 799         {
 800         case DLL_PROCESS_ATTACH:
 801         case DLL_THREAD_ATTACH:
 802                 hApplet = hinstDLL;
 803                 break;
 804         }
 805
 806         return TRUE;
 807 }
 808