Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-29 02:25:17 +00:00
Code Issues Projects Releases Packages Wiki Activity

implemented RegSetKeyValueA/W

Browse source 
svn path=/trunk/; revision=17529
This commit is contained in:
Thomas Bluemel 2005-08-24 23:44:27 +00:00
parent 4782b7ce3e
commit 78bc5b9ab0
2 changed files with 134 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
reactos/lib/advapi32/advapi32.def
View file

@ -513,6 +513,8 @@ RegSaveKeyA@12
;RegSaveKeyExW ;RegSaveKeyExW
RegSaveKeyW@12 RegSaveKeyW@12
RegSetKeySecurity@12 RegSetKeySecurity@12
RegSetKeyValueA@24
RegSetKeyValueW@24
RegSetValueA@20 RegSetValueA@20
RegSetValueExA@24 RegSetValueExA@24
RegSetValueExW@24 RegSetValueExW@24

132
reactos/lib/advapi32/reg/reg.c
View file

@ -802,6 +802,138 @@ RegDeleteKeyValueA(IN HKEY hKey,
} }
/************************************************************************
* RegSetKeyValueW
*
* @implemented
*/
LONG STDCALL
RegSetKeyValueW(IN HKEY hKey,
IN LPCWSTR lpSubKey OPTIONAL,
IN LPCWSTR lpValueName OPTIONAL,
IN DWORD dwType,
IN LPCVOID lpData OPTIONAL,
IN DWORD cbData)
{
HANDLE KeyHandle, SubKeyHandle = NULL;
NTSTATUS Status;
LONG Ret;
Status = MapDefaultKey(&KeyHandle,
hKey);
if (!NT_SUCCESS(Status))
{
return RtlNtStatusToDosError(Status);
}
if (lpSubKey != NULL)
{
OBJECT_ATTRIBUTES ObjectAttributes;
UNICODE_STRING SubKeyName;
RtlInitUnicodeString(&SubKeyName,
(LPWSTR)lpSubKey);
InitializeObjectAttributes(&ObjectAttributes,
&SubKeyName,
OBJ_CASE_INSENSITIVE,
KeyHandle,
NULL);
Status = NtOpenKey(&SubKeyHandle,
KEY_SET_VALUE,
&ObjectAttributes);
if (!NT_SUCCESS(Status))
{
return RtlNtStatusToDosError(Status);
}
}
Ret = RegSetValueExW((SubKeyHandle != NULL) ? SubKeyHandle : KeyHandle,
lpValueName,
0,
dwType,
lpData,
cbData);
if (SubKeyHandle != NULL)
{
NtClose(SubKeyHandle);
}
return Ret;
}
/************************************************************************
* RegSetKeyValueA
*
* @implemented
*/
LONG STDCALL
RegSetKeyValueA(IN HKEY hKey,
IN LPCSTR lpSubKey OPTIONAL,
IN LPCSTR lpValueName OPTIONAL,
IN DWORD dwType,
IN LPCVOID lpData OPTIONAL,
IN DWORD cbData)
{
HANDLE KeyHandle, SubKeyHandle = NULL;
NTSTATUS Status;
LONG Ret;
Status = MapDefaultKey(&KeyHandle,
hKey);
if (!NT_SUCCESS(Status))
{
return RtlNtStatusToDosError(Status);
}
if (lpSubKey != NULL)
{
OBJECT_ATTRIBUTES ObjectAttributes;
UNICODE_STRING SubKeyName;
if (!RtlCreateUnicodeStringFromAsciiz(&SubKeyName,
(LPSTR)lpSubKey))
{
return RtlNtStatusToDosError(Status);
}
InitializeObjectAttributes(&ObjectAttributes,
&SubKeyName,
OBJ_CASE_INSENSITIVE,
KeyHandle,
NULL);
Status = NtOpenKey(&SubKeyHandle,
KEY_SET_VALUE,
&ObjectAttributes);
RtlFreeUnicodeString(&SubKeyName);
if (!NT_SUCCESS(Status))
{
return RtlNtStatusToDosError(Status);
}
}
Ret = RegSetValueExA((SubKeyHandle != NULL) ? SubKeyHandle : KeyHandle,
lpValueName,
0,
dwType,
lpData,
cbData);
if (SubKeyHandle != NULL)
{
NtClose(SubKeyHandle);
}
return Ret;
}
/************************************************************************ /************************************************************************
* RegDeleteValueA * RegDeleteValueA
* *