2 * Registry editing UI functions.
4 * Copyright (C) 2003 Dimitrie O. Paun
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.
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.
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 Street, Fifth Floor, Boston, MA 02110-1301 USA
23 typedef enum _EDIT_MODE
30 static const TCHAR
* editValueName
;
31 static TCHAR
* stringValueData
;
32 static PVOID binValueData
;
33 static DWORD dwordValueData
;
34 static DWORD valueDataLen
;
35 static EDIT_MODE dwordEditMode
= EDIT_MODE_HEX
;
37 void error(HWND hwnd
, INT resId
, ...)
45 hInstance
= GetModuleHandle(0);
47 if (!LoadString(hInstance
, IDS_ERROR
, title
, COUNT_OF(title
)))
48 _tcscpy(title
, _T("Error"));
50 if (!LoadString(hInstance
, resId
, errfmt
, COUNT_OF(errfmt
)))
51 _tcscpy(errfmt
, _T("Unknown error string!"));
54 _vsntprintf(errstr
, COUNT_OF(errstr
), errfmt
, ap
);
57 MessageBox(hwnd
, errstr
, title
, MB_OK
| MB_ICONERROR
);
60 static void error_code_messagebox(HWND hwnd
, DWORD error_code
)
65 static const TCHAR fallback
[] = TEXT("Error displaying error message.\n");
66 if (!LoadString(hInst
, IDS_ERROR
, title
, COUNT_OF(title
)))
67 lstrcpy(title
, TEXT("Error"));
68 status
= FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER
| FORMAT_MESSAGE_FROM_SYSTEM
,
69 NULL
, error_code
, 0, (LPTSTR
)&lpMsgBuf
, 0, NULL
);
71 lpMsgBuf
= (LPTSTR
)fallback
;
72 MessageBox(hwnd
, lpMsgBuf
, title
, MB_OK
| MB_ICONERROR
);
73 if (lpMsgBuf
!= fallback
)
77 void warning(HWND hwnd
, INT resId
, ...)
85 hInstance
= GetModuleHandle(0);
87 if (!LoadString(hInstance
, IDS_WARNING
, title
, COUNT_OF(title
)))
88 _tcscpy(title
, _T("Warning"));
90 if (!LoadString(hInstance
, resId
, errfmt
, COUNT_OF(errfmt
)))
91 _tcscpy(errfmt
, _T("Unknown error string!"));
94 _vsntprintf(errstr
, COUNT_OF(errstr
), errfmt
, ap
);
97 MessageBox(hwnd
, errstr
, title
, MB_OK
| MB_ICONSTOP
);
100 INT_PTR CALLBACK
modify_string_dlgproc(HWND hwndDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
106 UNREFERENCED_PARAMETER(lParam
);
110 if(editValueName
&& _tcscmp(editValueName
, _T("")))
112 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, editValueName
);
117 LoadString(hInst
, IDS_DEFAULT_VALUE_NAME
, buffer
, sizeof(buffer
)/sizeof(TCHAR
));
118 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, buffer
);
120 SetDlgItemText(hwndDlg
, IDC_VALUE_DATA
, stringValueData
);
121 SetFocus(GetDlgItem(hwndDlg
, IDC_VALUE_DATA
));
124 switch (LOWORD(wParam
))
127 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
129 if ((len
= GetWindowTextLength(hwndValue
)))
133 if ((valueData
= HeapReAlloc(GetProcessHeap(), 0, stringValueData
, (len
+ 1) * sizeof(TCHAR
))))
135 stringValueData
= valueData
;
136 if (!GetWindowText(hwndValue
, stringValueData
, len
+ 1))
137 *stringValueData
= 0;
142 if ((valueData
= HeapAlloc(GetProcessHeap(), 0, (len
+ 1) * sizeof(TCHAR
))))
144 stringValueData
= valueData
;
145 if (!GetWindowText(hwndValue
, stringValueData
, len
+ 1))
146 *stringValueData
= 0;
153 *stringValueData
= 0;
156 EndDialog(hwndDlg
, IDOK
);
159 EndDialog(hwndDlg
, IDCANCEL
);
167 INT_PTR CALLBACK
modify_multi_string_dlgproc(HWND hwndDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
173 UNREFERENCED_PARAMETER(lParam
);
177 if(editValueName
&& _tcscmp(editValueName
, _T("")))
179 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, editValueName
);
184 LoadString(hInst
, IDS_DEFAULT_VALUE_NAME
, buffer
, sizeof(buffer
)/sizeof(TCHAR
));
185 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, buffer
);
187 SetDlgItemText(hwndDlg
, IDC_VALUE_DATA
, stringValueData
);
188 SetFocus(GetDlgItem(hwndDlg
, IDC_VALUE_DATA
));
191 switch (LOWORD(wParam
))
194 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
196 if ((len
= GetWindowTextLength(hwndValue
)))
200 if ((valueData
= HeapReAlloc(GetProcessHeap(), 0, stringValueData
, (len
+ 1) * sizeof(TCHAR
))))
202 stringValueData
= valueData
;
203 if (!GetWindowText(hwndValue
, stringValueData
, len
+ 1))
204 *stringValueData
= 0;
209 if ((valueData
= HeapAlloc(GetProcessHeap(), 0, (len
+ 1) * sizeof(TCHAR
))))
211 stringValueData
= valueData
;
212 if (!GetWindowText(hwndValue
, stringValueData
, len
+ 1))
213 *stringValueData
= 0;
220 *stringValueData
= 0;
223 EndDialog(hwndDlg
, IDOK
);
226 EndDialog(hwndDlg
, IDCANCEL
);
234 LRESULT CALLBACK
DwordEditSubclassProc(HWND hwnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
238 oldwndproc
= (WNDPROC
)(LONG_PTR
)GetWindowLongPtr(hwnd
, GWL_USERDATA
);
243 if (dwordEditMode
== EDIT_MODE_DEC
)
245 if (isdigit((int) wParam
& 0xff) || iscntrl((int) wParam
& 0xff))
254 else if (dwordEditMode
== EDIT_MODE_HEX
)
256 if (isxdigit((int) wParam
& 0xff) || iscntrl((int) wParam
& 0xff))
271 return CallWindowProc(oldwndproc
, hwnd
, uMsg
, wParam
, lParam
);
275 INT_PTR CALLBACK
modify_dword_dlgproc(HWND hwndDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
279 TCHAR ValueString
[32];
284 UNREFERENCED_PARAMETER(lParam
);
288 dwordEditMode
= EDIT_MODE_HEX
;
290 /* subclass the edit control */
291 hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
);
292 oldproc
= (WNDPROC
)(LONG_PTR
)GetWindowLongPtr(hwndValue
, GWL_WNDPROC
);
293 SetWindowLongPtr(hwndValue
, GWL_USERDATA
, (DWORD_PTR
)oldproc
);
294 SetWindowLongPtr(hwndValue
, GWL_WNDPROC
, (DWORD_PTR
)DwordEditSubclassProc
);
296 if(editValueName
&& _tcscmp(editValueName
, _T("")))
298 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, editValueName
);
303 LoadString(hInst
, IDS_DEFAULT_VALUE_NAME
, buffer
, sizeof(buffer
)/sizeof(TCHAR
));
304 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, buffer
);
306 CheckRadioButton (hwndDlg
, IDC_FORMAT_HEX
, IDC_FORMAT_DEC
, IDC_FORMAT_HEX
);
307 _stprintf (ValueString
, _T("%lx"), dwordValueData
);
308 SetDlgItemText(hwndDlg
, IDC_VALUE_DATA
, ValueString
);
309 SetFocus(GetDlgItem(hwndDlg
, IDC_VALUE_DATA
));
313 switch (LOWORD(wParam
))
316 if (HIWORD(wParam
) == BN_CLICKED
&& dwordEditMode
== EDIT_MODE_DEC
)
318 dwordEditMode
= EDIT_MODE_HEX
;
319 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
321 if (GetWindowTextLength(hwndValue
))
323 if (GetWindowText(hwndValue
, ValueString
, 32))
325 Value
= _tcstoul (ValueString
, &Remainder
, 10);
329 _stprintf (ValueString
, _T("%lx"), Value
);
330 SetDlgItemText(hwndDlg
, IDC_VALUE_DATA
, ValueString
);
336 if (HIWORD(wParam
) == BN_CLICKED
&& dwordEditMode
== EDIT_MODE_HEX
)
338 dwordEditMode
= EDIT_MODE_DEC
;
339 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
341 if (GetWindowTextLength(hwndValue
))
343 if (GetWindowText(hwndValue
, ValueString
, 32))
345 Value
= _tcstoul (ValueString
, &Remainder
, 16);
349 _stprintf (ValueString
, _T("%lu"), Value
);
350 SetDlgItemText(hwndDlg
, IDC_VALUE_DATA
, ValueString
);
356 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
358 if (GetWindowTextLength(hwndValue
))
360 if (!GetWindowText(hwndValue
, ValueString
, 32))
362 EndDialog(hwndDlg
, IDCANCEL
);
366 Base
= (dwordEditMode
== EDIT_MODE_HEX
) ? 16 : 10;
367 dwordValueData
= _tcstoul (ValueString
, &Remainder
, Base
);
371 EndDialog(hwndDlg
, IDCANCEL
);
375 EndDialog(hwndDlg
, IDOK
);
379 EndDialog(hwndDlg
, IDCANCEL
);
387 INT_PTR CALLBACK
modify_binary_dlgproc(HWND hwndDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
392 UNREFERENCED_PARAMETER(lParam
);
396 if(editValueName
&& _tcscmp(editValueName
, _T("")))
398 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, editValueName
);
403 LoadString(hInst
, IDS_DEFAULT_VALUE_NAME
, buffer
, sizeof(buffer
)/sizeof(TCHAR
));
404 SetDlgItemText(hwndDlg
, IDC_VALUE_NAME
, buffer
);
406 hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
);
407 HexEdit_LoadBuffer(hwndValue
, binValueData
, valueDataLen
);
408 /* reset the hex edit control's font */
409 SendMessage(hwndValue
, WM_SETFONT
, 0, 0);
413 switch (LOWORD(wParam
))
416 if ((hwndValue
= GetDlgItem(hwndDlg
, IDC_VALUE_DATA
)))
418 len
= (UINT
) HexEdit_GetBufferSize(hwndValue
);
419 if (len
> 0 && binValueData
)
420 binValueData
= HeapReAlloc(GetProcessHeap(), 0, binValueData
, len
);
422 binValueData
= HeapAlloc(GetProcessHeap(), 0, len
+ 1);
423 HexEdit_CopyBuffer(hwndValue
, binValueData
, len
);
426 EndDialog(hwndDlg
, IDOK
);
429 EndDialog(hwndDlg
, IDCANCEL
);
437 BOOL
ModifyValue(HWND hwnd
, HKEY hKey
, LPCTSTR valueName
, BOOL EditBin
)
446 editValueName
= valueName
;
448 lRet
= RegQueryValueEx(hKey
, valueName
, 0, &type
, 0, &valueDataLen
);
449 if (lRet
!= ERROR_SUCCESS
&& (!_tcscmp(valueName
, _T("")) || valueName
== NULL
))
451 lRet
= ERROR_SUCCESS
; /* Allow editing of (Default) values which don't exist */
454 stringValueData
= NULL
;
458 if (lRet
!= ERROR_SUCCESS
)
460 error(hwnd
, IDS_BAD_VALUE
, valueName
);
464 if (EditBin
== FALSE
&& ((type
== REG_SZ
) || (type
== REG_EXPAND_SZ
)))
466 if (valueDataLen
> 0)
468 if (!(stringValueData
= HeapAlloc(GetProcessHeap(), 0, valueDataLen
)))
470 error(hwnd
, IDS_TOO_BIG_VALUE
, valueDataLen
);
473 lRet
= RegQueryValueEx(hKey
, valueName
, 0, 0, (LPBYTE
)stringValueData
, &valueDataLen
);
474 if (lRet
!= ERROR_SUCCESS
)
476 error(hwnd
, IDS_BAD_VALUE
, valueName
);
482 stringValueData
= NULL
;
485 if (DialogBox(0, MAKEINTRESOURCE(IDD_EDIT_STRING
), hwnd
, modify_string_dlgproc
) == IDOK
)
489 lRet
= RegSetValueEx(hKey
, valueName
, 0, type
, (LPBYTE
)stringValueData
, (DWORD
) (_tcslen(stringValueData
) + 1) * sizeof(TCHAR
));
493 lRet
= RegSetValueEx(hKey
, valueName
, 0, type
, NULL
, 0);
495 if (lRet
== ERROR_SUCCESS
)
499 else if (EditBin
== FALSE
&& type
== REG_MULTI_SZ
)
501 if (valueDataLen
> 0)
503 size_t llen
, listlen
, nl_len
;
504 LPTSTR src
, lines
= NULL
;
506 if (!(stringValueData
= HeapAlloc(GetProcessHeap(), 0, valueDataLen
)))
508 error(hwnd
, IDS_TOO_BIG_VALUE
, valueDataLen
);
511 lRet
= RegQueryValueEx(hKey
, valueName
, 0, 0, (LPBYTE
)stringValueData
, &valueDataLen
);
512 if (lRet
!= ERROR_SUCCESS
)
514 error(hwnd
, IDS_BAD_VALUE
, valueName
);
518 /* convert \0 to \r\n */
519 src
= stringValueData
;
520 nl_len
= _tcslen(_T("\r\n")) * sizeof(TCHAR
);
521 listlen
= sizeof(TCHAR
);
522 lines
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, listlen
+ sizeof(TCHAR
));
523 while(*src
!= _T('\0'))
528 listlen
+= (llen
* sizeof(TCHAR
)) + nl_len
;
529 lines
= HeapReAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, lines
, listlen
);
531 _tcscat(lines
, _T("\r\n"));
534 HeapFree(GetProcessHeap(), 0, stringValueData
);
535 stringValueData
= lines
;
539 stringValueData
= NULL
;
542 if (DialogBox(0, MAKEINTRESOURCE(IDD_EDIT_MULTI_STRING
), hwnd
, modify_multi_string_dlgproc
) == IDOK
)
546 /* convert \r\n to \0 */
547 BOOL EmptyLines
= FALSE
;
548 LPTSTR src
, lines
, nl
;
549 size_t linechars
, buflen
, c_nl
, dest
;
551 src
= stringValueData
;
552 buflen
= sizeof(TCHAR
);
553 lines
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, buflen
+ sizeof(TCHAR
));
554 c_nl
= _tcslen(_T("\r\n"));
556 while(*src
!= _T('\0'))
558 if((nl
= _tcsstr(src
, _T("\r\n"))))
560 linechars
= nl
- src
;
570 linechars
= _tcslen(src
);
574 buflen
+= ((linechars
+ 1) * sizeof(TCHAR
));
575 lines
= HeapReAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, lines
, buflen
);
576 memcpy((lines
+ dest
), src
, linechars
* sizeof(TCHAR
));
578 lines
[dest
++] = _T('\0');
584 src
+= linechars
+ (nl
!= NULL
? c_nl
: 0);
586 lines
[++dest
] = _T('\0');
590 warning(hwnd
, IDS_MULTI_SZ_EMPTY_STRING
);
593 lRet
= RegSetValueEx(hKey
, valueName
, 0, type
, (LPBYTE
)lines
, (DWORD
) buflen
);
594 HeapFree(GetProcessHeap(), 0, lines
);
598 lRet
= RegSetValueEx(hKey
, valueName
, 0, type
, NULL
, 0);
600 if (lRet
== ERROR_SUCCESS
)
604 else if (EditBin
== FALSE
&& type
== REG_DWORD
)
606 lRet
= RegQueryValueEx(hKey
, valueName
, 0, 0, (LPBYTE
)&dwordValueData
, &valueDataLen
);
607 if (lRet
!= ERROR_SUCCESS
)
609 error(hwnd
, IDS_BAD_VALUE
, valueName
);
613 if (DialogBox(0, MAKEINTRESOURCE(IDD_EDIT_DWORD
), hwnd
, modify_dword_dlgproc
) == IDOK
)
615 lRet
= RegSetValueEx(hKey
, valueName
, 0, type
, (LPBYTE
)&dwordValueData
, sizeof(DWORD
));
616 if (lRet
== ERROR_SUCCESS
)
620 else if (EditBin
== TRUE
|| type
== REG_NONE
|| type
== REG_BINARY
)
624 int len_vname
= lstrlen(valueName
);
628 if(!(u_valuename
= HeapAlloc(GetProcessHeap(), 0, (len_vname
+ 1) * sizeof(WCHAR
))))
630 error(hwnd
, IDS_TOO_BIG_VALUE
, len_vname
);
633 /* convert the ansi value name to an unicode string */
634 MultiByteToWideChar(CP_ACP
, 0, valueName
, -1, u_valuename
, len_vname
+ 1);
635 valueDataLen
*= sizeof(WCHAR
);
642 if(!(binValueData
= HeapAlloc(GetProcessHeap(), 0, valueDataLen
+ 1)))
644 error(hwnd
, IDS_TOO_BIG_VALUE
, valueDataLen
);
648 /* force to use the unicode version, so editing strings in binary mode is correct */
649 lRet
= RegQueryValueExW(hKey
,
655 0, 0, (LPBYTE
)binValueData
, &valueDataLen
);
656 if (lRet
!= ERROR_SUCCESS
)
658 HeapFree(GetProcessHeap(), 0, binValueData
);
661 HeapFree(GetProcessHeap(), 0, u_valuename
);
663 error(hwnd
, IDS_BAD_VALUE
, valueName
);
672 if (DialogBox(0, MAKEINTRESOURCE(IDD_EDIT_BIN_DATA
), hwnd
, modify_binary_dlgproc
) == IDOK
)
674 /* force to use the unicode version, so editing strings in binary mode is correct */
675 lRet
= RegSetValueExW(hKey
,
681 0, type
, (LPBYTE
)binValueData
, valueDataLen
);
682 if (lRet
== ERROR_SUCCESS
)
685 if(binValueData
!= NULL
)
686 HeapFree(GetProcessHeap(), 0, binValueData
);
689 HeapFree(GetProcessHeap(), 0, u_valuename
);
694 error(hwnd
, IDS_UNSUPPORTED_TYPE
, type
);
699 HeapFree(GetProcessHeap(), 0, stringValueData
);
700 stringValueData
= NULL
;
705 static LONG
CopyKey(HKEY hDestKey
, LPCTSTR lpDestSubKey
, HKEY hSrcKey
, LPCTSTR lpSrcSubKey
)
709 HKEY hDestSubKey
= NULL
;
710 HKEY hSrcSubKey
= NULL
;
711 DWORD dwIndex
, dwType
, cbName
, cbData
;
713 TCHAR szValueName
[256];
714 BYTE szValueData
[512];
718 /* open the source subkey, if specified */
721 lResult
= RegOpenKeyEx(hSrcKey
, lpSrcSubKey
, 0, KEY_ALL_ACCESS
, &hSrcSubKey
);
724 hSrcKey
= hSrcSubKey
;
727 /* create the destination subkey */
728 lResult
= RegCreateKeyEx(hDestKey
, lpDestSubKey
, 0, NULL
, 0, KEY_WRITE
, NULL
,
729 &hDestSubKey
, &dwDisposition
);
733 /* copy all subkeys */
737 cbName
= sizeof(szSubKey
) / sizeof(szSubKey
[0]);
738 lResult
= RegEnumKeyEx(hSrcKey
, dwIndex
++, szSubKey
, &cbName
, NULL
, NULL
, NULL
, &ft
);
739 if (lResult
== ERROR_SUCCESS
)
741 lResult
= CopyKey(hDestSubKey
, szSubKey
, hSrcKey
, szSubKey
);
746 while(lResult
== ERROR_SUCCESS
);
748 /* copy all subvalues */
752 cbName
= sizeof(szValueName
) / sizeof(szValueName
[0]);
753 cbData
= sizeof(szValueData
) / sizeof(szValueData
[0]);
754 lResult
= RegEnumValue(hSrcKey
, dwIndex
++, szValueName
, &cbName
, NULL
, &dwType
, szValueData
, &cbData
);
755 if (lResult
== ERROR_SUCCESS
)
757 lResult
= RegSetValueEx(hDestSubKey
, szValueName
, 0, dwType
, szValueData
, cbData
);
762 while(lResult
== ERROR_SUCCESS
);
764 lResult
= ERROR_SUCCESS
;
768 RegCloseKey(hSrcSubKey
);
770 RegCloseKey(hDestSubKey
);
771 if (lResult
!= ERROR_SUCCESS
)
772 SHDeleteKey(hDestKey
, lpDestSubKey
);
776 static LONG
MoveKey(HKEY hDestKey
, LPCTSTR lpDestSubKey
, HKEY hSrcKey
, LPCTSTR lpSrcSubKey
)
781 return ERROR_INVALID_FUNCTION
;
783 lResult
= CopyKey(hDestKey
, lpDestSubKey
, hSrcKey
, lpSrcSubKey
);
784 if (lResult
== ERROR_SUCCESS
)
785 SHDeleteKey(hSrcKey
, lpSrcSubKey
);
790 BOOL
DeleteKey(HWND hwnd
, HKEY hKeyRoot
, LPCTSTR keyPath
)
792 TCHAR msg
[128], caption
[128];
797 lRet
= RegOpenKeyEx(hKeyRoot
, keyPath
, 0, KEY_READ
|KEY_SET_VALUE
, &hKey
);
798 if (lRet
!= ERROR_SUCCESS
) {
799 error_code_messagebox(hwnd
, lRet
);
803 LoadString(hInst
, IDS_QUERY_DELETE_KEY_CONFIRM
, caption
, sizeof(caption
)/sizeof(TCHAR
));
804 LoadString(hInst
, IDS_QUERY_DELETE_KEY_ONE
, msg
, sizeof(msg
)/sizeof(TCHAR
));
806 if (MessageBox(g_pChildWnd
->hWnd
, msg
, caption
, MB_ICONQUESTION
| MB_YESNO
) != IDYES
)
809 lRet
= SHDeleteKey(hKeyRoot
, keyPath
);
810 if (lRet
!= ERROR_SUCCESS
) {
811 error(hwnd
, IDS_BAD_KEY
, keyPath
);
821 LONG
RenameKey(HKEY hKey
, LPCTSTR lpSubKey
, LPCTSTR lpNewName
)
824 LPTSTR lpNewSubKey
= NULL
;
830 s
= _tcsrchr(lpSubKey
, _T('\\'));
834 lpNewSubKey
= (LPTSTR
) HeapAlloc(GetProcessHeap(), 0, (s
- lpSubKey
+ _tcslen(lpNewName
) + 1) * sizeof(TCHAR
));
835 if (lpNewSubKey
!= NULL
)
837 memcpy(lpNewSubKey
, lpSubKey
, (s
- lpSubKey
) * sizeof(TCHAR
));
838 lstrcpy(lpNewSubKey
+ (s
- lpSubKey
), lpNewName
);
839 lpNewName
= lpNewSubKey
;
842 return ERROR_NOT_ENOUGH_MEMORY
;
845 Ret
= MoveKey(hKey
, lpNewName
, hKey
, lpSubKey
);
849 HeapFree(GetProcessHeap(), 0, lpNewSubKey
);
854 LONG
RenameValue(HKEY hKey
, LPCTSTR lpSubKey
, LPCTSTR lpDestValue
, LPCTSTR lpSrcValue
)
858 DWORD dwType
, cbData
;
863 lResult
= RegOpenKey(hKey
, lpSubKey
, &hSubKey
);
864 if (lResult
!= ERROR_SUCCESS
)
869 cbData
= sizeof(data
);
870 lResult
= RegQueryValueEx(hKey
, lpSrcValue
, NULL
, &dwType
, data
, &cbData
);
871 if (lResult
!= ERROR_SUCCESS
)
874 lResult
= RegSetValueEx(hKey
, lpDestValue
, 0, dwType
, data
, cbData
);
875 if (lResult
!= ERROR_SUCCESS
)
878 RegDeleteValue(hKey
, lpSrcValue
);
882 RegCloseKey(hSubKey
);
886 LONG
QueryStringValue(HKEY hKey
, LPCTSTR lpSubKey
, LPCTSTR lpValueName
, LPTSTR pszBuffer
, DWORD dwBufferLen
)
890 DWORD cbData
, dwType
;
894 lResult
= RegOpenKey(hKey
, lpSubKey
, &hSubKey
);
895 if (lResult
!= ERROR_SUCCESS
)
900 cbData
= (dwBufferLen
- 1) * sizeof(*pszBuffer
);
901 lResult
= RegQueryValueEx(hKey
, lpValueName
, NULL
, &dwType
, (LPBYTE
) pszBuffer
, &cbData
);
902 if (lResult
!= ERROR_SUCCESS
)
904 if (dwType
!= REG_SZ
)
910 pszBuffer
[cbData
/ sizeof(*pszBuffer
)] = _T('\0');
913 if (lResult
!= ERROR_SUCCESS
)
914 pszBuffer
[0] = _T('\0');
916 RegCloseKey(hSubKey
);
920 BOOL
GetKeyName(LPTSTR pszDest
, size_t iDestLength
, HKEY hRootKey
, LPCTSTR lpSubKey
)
924 if (hRootKey
== HKEY_CLASSES_ROOT
)
925 pszRootKey
= TEXT("HKEY_CLASSES_ROOT");
926 else if (hRootKey
== HKEY_CURRENT_USER
)
927 pszRootKey
= TEXT("HKEY_CURRENT_USER");
928 else if (hRootKey
== HKEY_LOCAL_MACHINE
)
929 pszRootKey
= TEXT("HKEY_LOCAL_MACHINE");
930 else if (hRootKey
== HKEY_USERS
)
931 pszRootKey
= TEXT("HKEY_USERS");
932 else if (hRootKey
== HKEY_CURRENT_CONFIG
)
933 pszRootKey
= TEXT("HKEY_CURRENT_CONFIG");
934 else if (hRootKey
== HKEY_DYN_DATA
)
935 pszRootKey
= TEXT("HKEY_DYN_DATA");
940 _sntprintf(pszDest
, iDestLength
, TEXT("%s\\%s"), pszRootKey
, lpSubKey
);
942 _sntprintf(pszDest
, iDestLength
, TEXT("%s"), pszRootKey
);