xref: /reactos/dll/cpl/sysdm/hardprof.c (revision 1734f297) 
1 /*
2  * PROJECT:     ReactOS System Control Panel Applet
3  * LICENSE:     GPL - See COPYING in the top level directory
4  * FILE:        dll/cpl/sysdm/hardprof.c
5  * PURPOSE:     Modify hardware profiles
6  * COPYRIGHT:   Copyright 2006 Ged Murphy <gedmurphy@gmail.com>
7  *
8  */
9 
10 #include "precomp.h"
11 
12 #include <debug.h>
13 
14 #define PROFILE_NAME_LENGTH 80
15 
16 typedef struct _PROFILE
17 {
18     WCHAR szFriendlyName[PROFILE_NAME_LENGTH];
19     WCHAR szName[5];
20     DWORD dwProfileNumber;
21     DWORD dwPreferenceOrder;
22 } PROFILE, *PPROFILE;
23 
24 typedef struct _PROFILEDATA
25 {
26     DWORD dwProfileCount;
27     DWORD dwLastProfile;
28     DWORD dwSelectedProfile;
29     DWORD dwSelectedProfileIndex;
30     PPROFILE pProfiles;
31 } PROFILEDATA, *PPROFILEDATA;
32 
33 typedef struct _PROFILENAMES
34 {
35     WCHAR szSourceName[PROFILE_NAME_LENGTH];
36     WCHAR szDestinationName[PROFILE_NAME_LENGTH];
37     PPROFILEDATA pProfileData;
38 } PROFILENAMES, *PPROFILENAMES;
39 
40 
41 static
42 VOID
43 UpdateButtons(
44     HWND hwndDlg,
45     PPROFILEDATA pProfileData)
46 {
47     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFPROP), (pProfileData->dwSelectedProfileIndex != (DWORD)-1) ? TRUE : FALSE);
48     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFCOPY), (pProfileData->dwSelectedProfileIndex != (DWORD)-1) ? TRUE : FALSE);
49     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFRENAME), (pProfileData->dwSelectedProfileIndex != (DWORD)-1) ? TRUE : FALSE);
50     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFDEL), (pProfileData->dwSelectedProfileIndex != (DWORD)-1) ? TRUE : FALSE);
51 
52     if (pProfileData->dwProfileCount < 2)
53     {
54         EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFUP), FALSE);
55         EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFDWN), FALSE);
56     }
57     else
58     {
59         EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFUP),
60                      (pProfileData->dwSelectedProfileIndex > 0) ? TRUE : FALSE);
61         EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFDWN),
62                      (pProfileData->dwSelectedProfileIndex < pProfileData->dwProfileCount - 1) ? TRUE : FALSE);
63     }
64 }
65 
66 
67 static
68 BOOL
69 IsProfileNameInUse(
70     PPROFILENAMES pProfileNames,
71     BOOL bIgnoreCurrent)
72 {
73     DWORD i;
74 
75     for (i = 0; i < pProfileNames->pProfileData->dwProfileCount; i++)
76     {
77         if (bIgnoreCurrent == TRUE && i == pProfileNames->pProfileData->dwSelectedProfileIndex)
78             continue;
79 
80         if (wcscmp(pProfileNames->pProfileData->pProfiles[i].szFriendlyName, pProfileNames->szDestinationName) == 0)
81             return TRUE;
82     }
83 
84     return FALSE;
85 }
86 
87 
88 static
89 INT_PTR
90 CALLBACK
91 CopyProfileDlgProc(
92     HWND hwndDlg,
93     UINT uMsg,
94     WPARAM wParam,
95     LPARAM lParam)
96 {
97     PPROFILENAMES pProfileNames;
98 
99     pProfileNames = (PPROFILENAMES)GetWindowLongPtr(hwndDlg, DWLP_USER);
100 
101     switch (uMsg)
102     {
103         case WM_INITDIALOG:
104             SetWindowLongPtr(hwndDlg, DWLP_USER, lParam);
105             pProfileNames = (PPROFILENAMES)lParam;
106 
107             /* Set the old name */
108             SetDlgItemText(hwndDlg, IDC_COPYPROFILEFROM, pProfileNames->szSourceName);
109 
110             /* Set the new name */
111             SendDlgItemMessageW(hwndDlg, IDC_COPYPROFILETO, EM_SETLIMITTEXT, PROFILE_NAME_LENGTH - 1, 0);
112             SetDlgItemText(hwndDlg, IDC_COPYPROFILETO, pProfileNames->szDestinationName);
113             break;
114 
115         case WM_COMMAND:
116             switch (LOWORD(wParam))
117             {
118                 case IDOK:
119                     GetDlgItemText(hwndDlg,
120                                    IDC_COPYPROFILETO,
121                                    pProfileNames->szDestinationName,
122                                    PROFILE_NAME_LENGTH);
123                     if (IsProfileNameInUse(pProfileNames, FALSE))
124                     {
125                         ResourceMessageBox(hApplet,
126                                            hwndDlg,
127                                            MB_OK | MB_ICONERROR,
128                                            IDS_HWPROFILE_WARNING,
129                                            IDS_HWPROFILE_ALREADY_IN_USE);
130                     }
131                     else
132                     {
133                         EndDialog(hwndDlg, IDOK);
134                     }
135                     return TRUE;
136 
137                 case IDCANCEL:
138                     EndDialog(hwndDlg, IDCANCEL);
139                     return TRUE;
140             }
141             break;
142     }
143 
144     return FALSE;
145 }
146 
147 
148 static
149 VOID
150 CopyHardwareProfile(
151     HWND hwndDlg,
152     PPROFILEDATA pProfileData)
153 {
154     PROFILENAMES ProfileNames;
155     PPROFILE pProfile, pNewProfiles, pNewProfile;
156     WCHAR szBuffer[80];
157 
158     pProfile = &pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex];
159 
160     LoadStringW(hApplet, IDS_HWPROFILE_PROFILE, szBuffer, sizeof(szBuffer) / sizeof(WCHAR));
161 
162     wcscpy(ProfileNames.szSourceName, pProfile->szFriendlyName);
163     swprintf(ProfileNames.szDestinationName, L"%s %lu", szBuffer, pProfileData->dwProfileCount);
164 
165     ProfileNames.pProfileData = pProfileData;
166 
167     if (DialogBoxParam(hApplet,
168                        MAKEINTRESOURCE(IDD_COPYPROFILE),
169                        hwndDlg,
170                        CopyProfileDlgProc,
171                        (LPARAM)&ProfileNames) != IDOK)
172         return;
173 
174     /* Apply new name only if it has been changed */
175     if (wcscmp(ProfileNames.szSourceName, ProfileNames.szDestinationName) == 0)
176         return;
177 
178     /* Allocate memory for the new profile */
179     pNewProfiles = HeapReAlloc(GetProcessHeap(),
180                                HEAP_ZERO_MEMORY,
181                                pProfileData->pProfiles,
182                                (pProfileData->dwProfileCount + 1) * sizeof(PROFILE));
183     if (pNewProfiles == NULL)
184     {
185         DPRINT1("HeapReAlloc() failed!\n");
186         return;
187     }
188 
189     pProfileData->dwProfileCount++;
190     pProfileData->pProfiles = pNewProfiles;
191 
192     pNewProfile = &pProfileData->pProfiles[pProfileData->dwProfileCount - 1];
193 
194     CopyMemory(pNewProfile, pProfile, sizeof(PROFILE));
195 
196     wcscpy(pNewProfile->szFriendlyName, ProfileNames.szDestinationName);
197 
198     pNewProfile->dwProfileNumber = ++pProfileData->dwLastProfile;
199     swprintf(pNewProfile->szName, L"%04lu", pNewProfile->dwProfileNumber);
200 
201     pNewProfile->dwPreferenceOrder = pNewProfile->dwProfileNumber;
202 
203     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_ADDSTRING, 0, (LPARAM)pNewProfile->szFriendlyName);
204 
205     UpdateButtons(hwndDlg, pProfileData);
206 }
207 
208 
209 static
210 INT_PTR
211 CALLBACK
212 RenameProfileDlgProc(
213     HWND hwndDlg,
214     UINT uMsg,
215     WPARAM wParam,
216     LPARAM lParam)
217 {
218     PPROFILENAMES pProfileNames;
219 
220     pProfileNames = (PPROFILENAMES)GetWindowLongPtr(hwndDlg, DWLP_USER);
221 
222     switch (uMsg)
223     {
224         case WM_INITDIALOG:
225             SetWindowLongPtr(hwndDlg, DWLP_USER, lParam);
226             pProfileNames = (PPROFILENAMES)lParam;
227 
228             /* Set the old name */
229             SetDlgItemText(hwndDlg, IDC_RENPROFEDITFROM, pProfileNames->szSourceName);
230 
231             /* Set the new name */
232             SendDlgItemMessageW(hwndDlg, IDC_RENPROFEDITTO, EM_SETLIMITTEXT, PROFILE_NAME_LENGTH - 1, 0);
233             SetDlgItemText(hwndDlg, IDC_RENPROFEDITTO, pProfileNames->szDestinationName);
234             break;
235 
236         case WM_COMMAND:
237             switch (LOWORD(wParam))
238             {
239                 case IDOK:
240                     GetDlgItemText(hwndDlg,
241                                    IDC_RENPROFEDITTO,
242                                    pProfileNames->szDestinationName,
243                                    PROFILE_NAME_LENGTH);
244                     if (IsProfileNameInUse(pProfileNames, TRUE))
245                     {
246                         ResourceMessageBox(hApplet,
247                                            hwndDlg,
248                                            MB_OK | MB_ICONERROR,
249                                            IDS_HWPROFILE_WARNING,
250                                            IDS_HWPROFILE_ALREADY_IN_USE);
251                     }
252                     else
253                     {
254                         EndDialog(hwndDlg, IDOK);
255                     }
256                     return TRUE;
257 
258                 case IDCANCEL:
259                     EndDialog(hwndDlg, IDCANCEL);
260                     return TRUE;
261             }
262             break;
263     }
264 
265     return FALSE;
266 }
267 
268 
269 static
270 VOID
271 RenameHardwareProfile(
272     HWND hwndDlg,
273     PPROFILEDATA pProfileData)
274 {
275     PROFILENAMES ProfileNames;
276     PPROFILE pProfile;
277     WCHAR szBuffer[80];
278 
279     pProfile = &pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex];
280 
281     LoadStringW(hApplet, IDS_HWPROFILE_PROFILE, szBuffer, sizeof(szBuffer) / sizeof(WCHAR));
282 
283     wcscpy(ProfileNames.szSourceName, pProfile->szFriendlyName);
284     swprintf(ProfileNames.szDestinationName, L"%s %lu", szBuffer, pProfileData->dwProfileCount);
285 
286     ProfileNames.pProfileData = pProfileData;
287 
288     if (DialogBoxParam(hApplet,
289                        MAKEINTRESOURCE(IDD_RENAMEPROFILE),
290                        hwndDlg,
291                        RenameProfileDlgProc,
292                        (LPARAM)&ProfileNames) != IDOK)
293         return;
294 
295     /* Apply new name only if it has been changed */
296     if (wcscmp(pProfile->szFriendlyName, ProfileNames.szDestinationName) == 0)
297         return;
298 
299     /* Replace the profile name in the profile list */
300     wcscpy(pProfile->szFriendlyName, ProfileNames.szDestinationName);
301 
302     /* Replace the profile name in the listbox */
303     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_DELETESTRING, pProfileData->dwSelectedProfileIndex, 0);
304     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_INSERTSTRING, pProfileData->dwSelectedProfileIndex, (LPARAM)pProfile->szFriendlyName);
305 }
306 
307 
308 static
309 VOID
310 DeleteHardwareProfile(
311     HWND hwndDlg,
312     PPROFILEDATA pProfileData)
313 {
314     PPROFILE pProfiles;
315     PPROFILE pProfile;
316 
317     pProfile = &pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex];
318 
319     if (ResourceMessageBox(hApplet,
320                            hwndDlg,
321                            MB_YESNO | MB_ICONQUESTION,
322                            IDS_HWPROFILE_CONFIRM_DELETE_TITLE,
323                            IDS_HWPROFILE_CONFIRM_DELETE,
324                            pProfile->szFriendlyName) != IDYES)
325     {
326         return;
327     }
328 
329     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_DELETESTRING, pProfileData->dwSelectedProfileIndex, 0);
330 
331     if (pProfileData->dwSelectedProfileIndex != pProfileData->dwProfileCount - 1)
332     {
333         RtlMoveMemory(&pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex],
334                       &pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex + 1],
335                       (pProfileData->dwProfileCount - pProfileData->dwSelectedProfileIndex - 1) * sizeof(PROFILE));
336     }
337     else
338     {
339         pProfileData->dwSelectedProfileIndex--;
340     }
341 
342     pProfiles = HeapReAlloc(GetProcessHeap(),
343                             HEAP_ZERO_MEMORY,
344                             pProfileData->pProfiles,
345                             (pProfileData->dwProfileCount - 1) * sizeof(PROFILE));
346     if (pProfiles == NULL)
347     {
348         DPRINT1("HeapReAlloc() failed!\n");
349         return;
350     }
351 
352     pProfileData->dwProfileCount--;
353     pProfileData->pProfiles = pProfiles;
354 
355     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_SETCURSEL, pProfileData->dwSelectedProfileIndex, 0);
356 
357     UpdateButtons(hwndDlg, pProfileData);
358 }
359 
360 
361 static
362 VOID
363 MoveHardwareProfile(
364     HWND hwndDlg,
365     PPROFILEDATA pProfileData,
366     BOOL bMoveUp)
367 {
368     PROFILE TempProfile;
369     PPROFILE pSrcProfile, pDstProfile;
370     DWORD dwSrcIndex, dwDstIndex;
371 
372     dwSrcIndex = pProfileData->dwSelectedProfileIndex;
373     dwDstIndex = bMoveUp ? (dwSrcIndex - 1) : (dwSrcIndex + 1);
374 
375     pSrcProfile = &pProfileData->pProfiles[dwSrcIndex];
376     pDstProfile = &pProfileData->pProfiles[dwDstIndex];
377 
378     CopyMemory(&TempProfile, pDstProfile, sizeof(PROFILE));
379     CopyMemory(pDstProfile, pSrcProfile, sizeof(PROFILE));
380     CopyMemory(pSrcProfile, &TempProfile, sizeof(PROFILE));
381 
382     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_DELETESTRING, dwSrcIndex, 0);
383     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_INSERTSTRING, dwDstIndex, (LPARAM)pDstProfile->szFriendlyName);
384 
385     pProfileData->dwSelectedProfileIndex = dwDstIndex;
386     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_SETCURSEL, pProfileData->dwSelectedProfileIndex, 0);
387 
388     UpdateButtons(hwndDlg, pProfileData);
389 }
390 
391 
392 static
393 INT_PTR
394 CALLBACK
395 HardwareProfilePropertiesDlgProc(
396     HWND hwndDlg,
397     UINT uMsg,
398     WPARAM wParam,
399     LPARAM lParam)
400 {
401     UNREFERENCED_PARAMETER(hwndDlg);
402     UNREFERENCED_PARAMETER(lParam);
403     UNREFERENCED_PARAMETER(wParam);
404 
405     switch (uMsg)
406     {
407         case WM_INITDIALOG:
408             return TRUE;
409 
410     }
411 
412     return FALSE;
413 }
414 
415 static int CALLBACK
416 PropSheetProc(HWND hwndDlg, UINT uMsg, LPARAM lParam)
417 {
418     // NOTE: This callback is needed to set large icon correctly.
419     HICON hIcon;
420     switch (uMsg)
421     {
422         case PSCB_INITIALIZED:
423         {
424             hIcon = LoadIconW(hApplet, MAKEINTRESOURCEW(IDI_HARDPROF));
425             SendMessageW(hwndDlg, WM_SETICON, ICON_BIG, (LPARAM)hIcon);
426             break;
427         }
428     }
429     return 0;
430 }
431 
432 static
433 VOID
434 HardwareProfileProperties(
435     HWND hwndDlg,
436     PPROFILEDATA pProfileData)
437 {
438     HPROPSHEETPAGE hpsp;
439     PROPSHEETHEADER psh;
440     PROPSHEETPAGE psp;
441 
442     ZeroMemory(&psp, sizeof(psp));
443     psp.dwSize = sizeof(psp);
444     psp.dwFlags = PSP_DEFAULT;
445     psp.hInstance = hApplet;
446     psp.pszTemplate = MAKEINTRESOURCE(IDD_HARDWAREPROFILE);
447     psp.pfnDlgProc = HardwareProfilePropertiesDlgProc;
448 
449     hpsp = CreatePropertySheetPage(&psp);
450     if (hpsp == NULL)
451     {
452         return;
453     }
454 
455     ZeroMemory(&psh, sizeof(PROPSHEETHEADER));
456     psh.dwSize = sizeof(PROPSHEETHEADER);
457     psh.dwFlags = PSH_PROPTITLE | PSH_USEICONID | PSH_USECALLBACK;
458     psh.hwndParent = hwndDlg;
459     psh.hInstance = hApplet;
460     psh.pszIcon = MAKEINTRESOURCEW(IDI_HARDPROF);
461     psh.pszCaption = pProfileData->pProfiles[pProfileData->dwSelectedProfileIndex].szFriendlyName;
462     psh.nPages = 1;
463     psh.nStartPage = 0;
464     psh.phpage = &hpsp;
465     psh.pfnCallback = PropSheetProc;
466 
467     PropertySheet(&psh);
468 }
469 
470 
471 static
472 DWORD
473 GetUserWaitInterval(VOID)
474 {
475     DWORD dwWaitInterval = 30;
476     DWORD dwSize;
477     HKEY hKey;
478 
479     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
480                       L"System\\CurrentControlSet\\Control\\IDConfigDB",
481                       0,
482                       KEY_QUERY_VALUE,
483                       &hKey))
484         return dwWaitInterval;
485 
486     dwSize = sizeof(DWORD);
487     RegQueryValueExW(hKey,
488                      L"UserWaitInterval",
489                      NULL,
490                      NULL,
491                      (LPBYTE)&dwWaitInterval,
492                      &dwSize);
493 
494     RegCloseKey(hKey);
495 
496     return dwWaitInterval;
497 }
498 
499 
500 static
501 VOID
502 SetUserWaitInterval(DWORD dwWaitInterval)
503 {
504     HKEY hKey;
505 
506     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
507                       L"System\\CurrentControlSet\\Control\\IDConfigDB",
508                       0,
509                       KEY_SET_VALUE,
510                       &hKey))
511         return;
512 
513     RegSetValueExW(hKey,
514                    L"UserWaitInterval",
515                    0,
516                    REG_DWORD,
517                    (LPBYTE)&dwWaitInterval,
518                    sizeof(DWORD));
519 
520     RegCloseKey(hKey);
521 }
522 
523 
524 static
525 BOOL
526 GetProfileCount(LPDWORD lpProfileCount)
527 {
528     HKEY hKey;
529     LONG lError;
530 
531     *lpProfileCount = 0;
532 
533     lError = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
534                            L"System\\CurrentControlSet\\Control\\IDConfigDB\\Hardware Profiles",
535                            0,
536                            KEY_READ,
537                            &hKey);
538     if (lError != ERROR_SUCCESS)
539         return FALSE;
540 
541     lError = RegQueryInfoKeyW(hKey, NULL, NULL, NULL, lpProfileCount,
542                               NULL, NULL, NULL, NULL, NULL, NULL, NULL);
543 
544     RegCloseKey(hKey);
545 
546     if (lError != ERROR_SUCCESS)
547         return FALSE;
548 
549     return TRUE;
550 }
551 
552 
553 static
554 VOID
555 GetProfile(
556     HWND hwndDlg,
557     HKEY hKey,
558     LPWSTR lpName,
559     DWORD dwProfileNumber,
560     PPROFILE pProfile)
561 {
562     HKEY hProfileKey;
563     DWORD dwSize;
564     LONG lError;
565 
566     lError = RegOpenKeyExW(hKey,
567                            lpName,
568                            0,
569                            KEY_READ,
570                            &hProfileKey);
571     if (lError != ERROR_SUCCESS)
572         return;
573 
574     dwSize = PROFILE_NAME_LENGTH * sizeof(WCHAR);
575     lError = RegQueryValueExW(hProfileKey,
576                               L"FriendlyName",
577                               NULL,
578                               NULL,
579                               (LPBYTE)pProfile->szFriendlyName,
580                               &dwSize);
581     if (lError == ERROR_SUCCESS)
582     {
583         DPRINT1("Profile: %S\n", pProfile->szFriendlyName);
584     }
585 
586     dwSize = sizeof(DWORD);
587     lError = RegQueryValueExW(hProfileKey,
588                               L"PreferenceOrder",
589                               NULL,
590                               NULL,
591                               (LPBYTE)&pProfile->dwPreferenceOrder,
592                               &dwSize);
593     if (lError == ERROR_SUCCESS)
594     {
595         DPRINT1("PreferenceOrder: %lu\n", pProfile->dwPreferenceOrder);
596     }
597 
598     pProfile->dwProfileNumber = dwProfileNumber;
599 
600     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFLSTBOX, LB_ADDSTRING, 0, (LPARAM)pProfile->szFriendlyName);
601 
602     RegCloseKey(hProfileKey);
603 }
604 
605 
606 static
607 BOOL
608 GetProfiles(HWND hwndDlg)
609 {
610     PPROFILEDATA pProfileData;
611     WCHAR szName[8];
612     DWORD dwNameLength;
613     DWORD dwProfileNumber;
614     DWORD dwIndex = 0;
615     HKEY hKey;
616     LONG lError;
617 
618     pProfileData = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(PROFILEDATA));
619     if (pProfileData == NULL)
620         return FALSE;
621 
622     pProfileData->dwLastProfile = (DWORD)-1;
623     pProfileData->dwSelectedProfileIndex = (DWORD)-1;
624 
625     if (!GetProfileCount(&pProfileData->dwProfileCount))
626     {
627         HeapFree(GetProcessHeap(), 0, pProfileData);
628         return FALSE;
629     }
630 
631     pProfileData->pProfiles = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
632                                         pProfileData->dwProfileCount * sizeof(PROFILE));
633     if (pProfileData->pProfiles == NULL)
634     {
635         HeapFree(GetProcessHeap(), 0, pProfileData);
636         return FALSE;
637     }
638 
639     SetWindowLongPtr(hwndDlg, DWLP_USER, (LONG_PTR)pProfileData);
640 
641     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
642                       L"System\\CurrentControlSet\\Control\\IDConfigDB\\Hardware Profiles",
643                       0,
644                       KEY_READ,
645                       &hKey) != ERROR_SUCCESS)
646         return FALSE;
647 
648     for (dwIndex = 0; dwIndex < pProfileData->dwProfileCount; dwIndex++)
649     {
650         dwNameLength = 8;
651         lError = RegEnumKeyExW(hKey,
652                                dwIndex,
653                                szName,
654                                &dwNameLength,
655                                NULL,
656                                NULL,
657                                NULL,
658                                NULL);
659         if (lError != ERROR_SUCCESS)
660             break;
661 
662         dwProfileNumber = wcstoul(szName, NULL, 10);
663         DPRINT("Profile name: %S\n", szName);
664         DPRINT("Profile number: %lu\n", dwProfileNumber);
665 
666         if ((pProfileData->dwLastProfile == (DWORD)-1) ||
667             (pProfileData->dwLastProfile < dwProfileNumber))
668             pProfileData->dwLastProfile = dwProfileNumber;
669 
670         DPRINT("Last Profile number: %lu\n", pProfileData->dwLastProfile);
671 
672         GetProfile(hwndDlg, hKey, szName, dwProfileNumber, &pProfileData->pProfiles[dwIndex]);
673     }
674 
675     RegCloseKey(hKey);
676 
677     return TRUE;
678 }
679 
680 
681 static
682 BOOL
683 OnInitHardProfDialog(HWND hwndDlg)
684 {
685     DWORD dwWaitInterval;
686 
687     DPRINT("OnInitHardProfDialog()\n");
688 
689     SendMessage(GetDlgItem(hwndDlg, IDC_HRDPROFUP),
690                 BM_SETIMAGE,(WPARAM)IMAGE_ICON,
691                 (LPARAM)(HANDLE)LoadIcon(hApplet, MAKEINTRESOURCE(IDI_UP)));
692     SendMessage(GetDlgItem(hwndDlg, IDC_HRDPROFDWN),
693                 BM_SETIMAGE,(WPARAM)IMAGE_ICON,
694                 (LPARAM)(HANDLE)LoadIcon(hApplet, MAKEINTRESOURCE(IDI_DOWN)));
695 
696     if (!GetProfiles(hwndDlg))
697         return FALSE;
698 
699     SendDlgItemMessageW(hwndDlg, IDC_HRDPROFUPDWN, UDM_SETRANGE, (WPARAM)0, (LPARAM)MAKELONG((SHORT)500, 0));
700 
701     dwWaitInterval = GetUserWaitInterval();
702     if (dwWaitInterval == (DWORD)-1)
703     {
704         CheckDlgButton(hwndDlg, IDC_HRDPROFWAIT, BST_CHECKED);
705         SendDlgItemMessageW(hwndDlg, IDC_HRDPROFUPDWN, UDM_SETPOS, 0, 30);
706         EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFEDIT), FALSE);
707     }
708     else
709     {
710         CheckDlgButton(hwndDlg, IDC_HRDPROFSELECT, BST_CHECKED);
711         SendDlgItemMessageW(hwndDlg, IDC_HRDPROFUPDWN, UDM_SETPOS, 0, dwWaitInterval);
712     }
713 
714     return TRUE;
715 }
716 
717 
718 static
719 VOID
720 OnOk(HWND hwndDlg)
721 {
722     DWORD dwWaitInterval;
723 
724     if (IsDlgButtonChecked(hwndDlg, IDC_HRDPROFWAIT) == BST_CHECKED)
725     {
726         dwWaitInterval = (DWORD)-1;
727     }
728     else
729     {
730         dwWaitInterval = LOWORD(SendDlgItemMessageW(hwndDlg, IDC_HRDPROFUPDWN, UDM_GETPOS, 0, 0));
731     }
732 
733     SetUserWaitInterval(dwWaitInterval);
734 }
735 
736 
737 /* Property page dialog callback */
738 INT_PTR
739 CALLBACK
740 HardProfDlgProc(HWND hwndDlg,
741                 UINT uMsg,
742                 WPARAM wParam,
743                 LPARAM lParam)
744 {
745     PPROFILEDATA pProfileData;
746 
747     UNREFERENCED_PARAMETER(lParam);
748     UNREFERENCED_PARAMETER(wParam);
749     UNREFERENCED_PARAMETER(hwndDlg);
750 
751     pProfileData = (PPROFILEDATA)GetWindowLongPtr(hwndDlg, DWLP_USER);
752 
753     switch (uMsg)
754     {
755         case WM_INITDIALOG:
756             return OnInitHardProfDialog(hwndDlg);
757 
758         case WM_DESTROY:
759             if (pProfileData != NULL)
760             {
761                 if (pProfileData->pProfiles != NULL)
762                     HeapFree(GetProcessHeap(), 0, pProfileData->pProfiles);
763                 HeapFree(GetProcessHeap(), 0, pProfileData);
764             }
765             break;
766 
767         case WM_COMMAND:
768             switch (LOWORD(wParam))
769             {
770                 case IDC_HRDPROFPROP:
771                     HardwareProfileProperties(hwndDlg, pProfileData);
772                     break;
773 
774                 case IDC_HRDPROFCOPY:
775                     CopyHardwareProfile(hwndDlg, pProfileData);
776                     break;
777 
778                 case IDC_HRDPROFRENAME:
779                     RenameHardwareProfile(hwndDlg, pProfileData);
780                     break;
781 
782                 case IDC_HRDPROFDEL:
783                     DeleteHardwareProfile(hwndDlg, pProfileData);
784                     break;
785 
786                 case IDC_HRDPROFUP:
787                     MoveHardwareProfile(hwndDlg, pProfileData, TRUE);
788                     break;
789 
790                 case IDC_HRDPROFDWN:
791                     MoveHardwareProfile(hwndDlg, pProfileData, FALSE);
792                     break;
793 
794                 case IDC_HRDPROFWAIT:
795                     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFEDIT), FALSE);
796                     return TRUE;
797 
798                 case IDC_HRDPROFSELECT:
799                     EnableWindow(GetDlgItem(hwndDlg, IDC_HRDPROFEDIT), TRUE);
800                     return TRUE;
801 
802                 case IDC_HRDPROFLSTBOX:
803                     if (HIWORD(wParam) == LBN_SELCHANGE)
804                     {
805                         pProfileData->dwSelectedProfileIndex = (DWORD)SendDlgItemMessage(hwndDlg, IDC_HRDPROFLSTBOX, LB_GETCURSEL, 0, 0);
806                         UpdateButtons(hwndDlg, pProfileData);
807                     }
808                     return TRUE;
809 
810                 case IDOK:
811                     OnOk(hwndDlg);
812 
813                 case IDCANCEL:
814                     EndDialog(hwndDlg, LOWORD(wParam));
815                     return TRUE;
816             }
817             break;
818     }
819 
820     return FALSE;
821 }
822