security-and-privacy/gnupg
security-and-privacy/gnupg
1
0
Fork 0
mirror of git://git.gnupg.org/gnupg.git synced 2025-07-03 22:56:33 +02:00
Code Activity

Finished jnlib port to CE.

Browse source
This commit is contained in:
Werner Koch 2010-03-01 12:49:17 +00:00
parent 2cf687cb3e
commit 30a4096fbb
5 changed files with 219 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

134
jnlib/w32-reg.c
View file

@ -28,8 +28,10 @@
#include <windows.h>
#include "libjnlib-config.h"
#include "utf8conv.h"
#include "w32help.h"
static HKEY
get_root_key(const char *root)
{
@ -62,6 +64,70 @@ get_root_key(const char *root)
char *
read_w32_registry_string (const char *root, const char *dir, const char *name)
{
#ifdef HAVE_W32CE_SYSTEM
HKEY root_key, key_handle;
DWORD n1, nbytes, type;
char *result = NULL;
wchar_t *wdir, *wname;
if ( !(root_key = get_root_key(root) ) )
return NULL;
wdir = utf8_to_wchar (dir);
if (!wdir)
return NULL;
if (RegOpenKeyEx (root_key, wdir, 0, KEY_READ, &key_handle) )
{
if (root)
{
jnlib_free (wdir);
return NULL; /* No need for a RegClose, so return immediately. */
}
/* It seems to be common practise to fall back to HKLM. */
if (RegOpenKeyEx (HKEY_LOCAL_MACHINE, wdir, 0, KEY_READ, &key_handle) )
{
jnlib_free (wdir);
return NULL; /* Still no need for a RegClose. */
}
}
jnlib_free (wdir);
if (name)
{
wname = utf8_to_wchar (name);
if (!wname)
goto leave;
}
else
wname = NULL;
nbytes = 2;
if (RegQueryValueEx (key_handle, wname, 0, NULL, NULL, &nbytes))
goto leave;
result = jnlib_malloc ((n1=nbytes+2));
if (!result)
goto leave;
if (RegQueryValueEx (key_handle, wname, 0, &type, result, &n1))
{
jnlib_free (result);
result = NULL;
goto leave;
}
result[nbytes] = 0; /* Make sure it is a string. */
result[nbytes+1] = 0;
if (type == REG_SZ || type == REG_EXPAND_SZ)
{
wchar_t *tmp = (void*)result;
result = wchar_to_utf8 (tmp);
jnlib_free (tmp);
}
leave:
jnlib_free (wname);
RegCloseKey (key_handle);
return result;
#else /*!HAVE_W32CE_SYSTEM*/
HKEY root_key, key_handle;
DWORD n1, nbytes, type;
char *result = NULL;
@ -69,7 +135,7 @@ read_w32_registry_string (const char *root, const char *dir, const char *name)
if ( !(root_key = get_root_key(root) ) )
return NULL;
if ( RegOpenKeyEx( root_key, dir, 0, KEY_READ, &key_handle ) )
if (RegOpenKeyEx (root_key, dir, 0, KEY_READ, &key_handle) )
{
if (root)
return NULL; /* No need for a RegClose, so return immediately. */
@ -142,15 +208,79 @@ read_w32_registry_string (const char *root, const char *dir, const char *name)
leave:
RegCloseKey (key_handle);
return result;
#endif /*!HAVE_W32CE_SYSTEM*/
}
/* Note: This code is not well tested. However, it is not used in
GnuPG. */
int
write_w32_registry_string (const char *root, const char *dir,
const char *name, const char *value)
{
HKEY root_key, reg_key;
#ifdef HAVE_W32CE_SYSTEM
wchar_t *wdir, *wname, *wvalue;
DWORD disp;
if ( !(root_key = get_root_key(root) ) )
return -1;
wdir = utf8_to_wchar (dir);
if (!wdir)
return -1;
if (RegOpenKeyEx (root_key, wdir, 0, 0, &reg_key))
{
jnlib_free (wdir);
return -1;
}
jnlib_free (wdir);
if (name)
{
wname = utf8_to_wchar (name);
if (!wname)
return -1;
}
else
wname = NULL;
wvalue = utf8_to_wchar (value);
if (wvalue)
{
jnlib_free (wname);
return -1;
}
if (RegSetValueEx (reg_key, wname, 0, REG_SZ,
(BYTE *)wvalue, wcslen (wvalue)) != ERROR_SUCCESS )
{
if (RegCreateKeyEx (root_key, wname, 0, NULL, 0, 0, NULL,
&reg_key, &disp) != ERROR_SUCCESS)
{
RegCloseKey(reg_key);
jnlib_free (wname);
jnlib_free (wvalue);
return -1;
}
if (RegSetValueEx (reg_key, wname, 0, REG_SZ,
(BYTE *)wvalue, wcslen (wvalue)) != ERROR_SUCCESS )
{
RegCloseKey(reg_key);
jnlib_free (wname);
jnlib_free (wvalue);
return -1;
}
}
jnlib_free (wname);
jnlib_free (wvalue);
RegCloseKey (reg_key);
return 0;
#else /*!HAVE_W32CE_SYSTEM*/
if ( !(root_key = get_root_key(root) ) )
return -1;
@ -175,8 +305,8 @@ write_w32_registry_string (const char *root, const char *dir,
}
RegCloseKey (reg_key);
return 0;
#endif /*!HAVE_W32CE_SYSTEM*/
}
#endif /*HAVE_W32_SYSTEM*/