git.oblomov.eu Git - wine/blob - dlls/advapi32/tests/registry.c

   1 /*
   2  * Unit tests for registry functions
   3  *
   4  * Copyright (c) 2002 Alexandre Julliard
   5  *
   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.
  10  *
  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.
  15  *
  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 St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <assert.h>
  22 #include <stdarg.h>
  23 #include <stdio.h>
  24 #include "wine/test.h"
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winreg.h"
  28 #include "winsvc.h"
  29 #include "winerror.h"
  30
  31 static HKEY hkey_main;
  32 static DWORD GLE;
  33
  34 static const char * sTestpath1 = "%LONGSYSTEMVAR%\\subdir1";
  35 static const char * sTestpath2 = "%FOO%\\subdir1";
  36
  37 static HMODULE hadvapi32;
  38 static DWORD (WINAPI *pRegGetValueA)(HKEY,LPCSTR,LPCSTR,DWORD,LPDWORD,PVOID,LPDWORD);
  39 static DWORD (WINAPI *pRegDeleteTreeA)(HKEY,LPCSTR);
  40
  41
  42
  43 /* Debugging functions from wine/libs/wine/debug.c */
  44
  45 /* allocate some tmp string space */
  46 /* FIXME: this is not 100% thread-safe */
  47 static char *get_temp_buffer( int size )
  48 {
  49     static char *list[32];
  50     static long pos;
  51     char *ret;
  52     int idx;
  53
  54     idx = ++pos % (sizeof(list)/sizeof(list[0]));
  55     if ((ret = realloc( list[idx], size ))) list[idx] = ret;
  56     return ret;
  57 }
  58
  59 static const char *wine_debugstr_an( const char *str, int n )
  60 {
  61     static const char hex[16] = "0123456789abcdef";
  62     char *dst, *res;
  63     size_t size;
  64
  65     if (!((ULONG_PTR)str >> 16))
  66     {
  67         if (!str) return "(null)";
  68         res = get_temp_buffer( 6 );
  69         sprintf( res, "#%04x", LOWORD(str) );
  70         return res;
  71     }
  72     if (n == -1) n = strlen(str);
  73     if (n < 0) n = 0;
  74     size = 10 + min( 300, n * 4 );
  75     dst = res = get_temp_buffer( size );
  76     *dst++ = '"';
  77     while (n-- > 0 && dst <= res + size - 9)
  78     {
  79         unsigned char c = *str++;
  80         switch (c)
  81         {
  82         case '\n': *dst++ = '\\'; *dst++ = 'n'; break;
  83         case '\r': *dst++ = '\\'; *dst++ = 'r'; break;
  84         case '\t': *dst++ = '\\'; *dst++ = 't'; break;
  85         case '"':  *dst++ = '\\'; *dst++ = '"'; break;
  86         case '\\': *dst++ = '\\'; *dst++ = '\\'; break;
  87         default:
  88             if (c >= ' ' && c <= 126)
  89                 *dst++ = c;
  90             else
  91             {
  92                 *dst++ = '\\';
  93                 *dst++ = 'x';
  94                 *dst++ = hex[(c >> 4) & 0x0f];
  95                 *dst++ = hex[c & 0x0f];
  96             }
  97         }
  98     }
  99     *dst++ = '"';
 100     if (n > 0)
 101     {
 102         *dst++ = '.';
 103         *dst++ = '.';
 104         *dst++ = '.';
 105     }
 106     *dst++ = 0;
 107     return res;
 108 }
 109
 110 static const char *wine_debugstr_wn( const WCHAR *str, int n )
 111 {
 112     char *dst, *res;
 113     size_t size;
 114
 115     if (!HIWORD(str))
 116     {
 117         if (!str) return "(null)";
 118         res = get_temp_buffer( 6 );
 119         sprintf( res, "#%04x", LOWORD(str) );
 120         return res;
 121     }
 122     if (n == -1) n = lstrlenW(str);
 123     if (n < 0) n = 0;
 124     size = 12 + min( 300, n * 5);
 125     dst = res = get_temp_buffer( n * 5 + 7 );
 126     *dst++ = 'L';
 127     *dst++ = '"';
 128     while (n-- > 0 && dst <= res + size - 10)
 129     {
 130         WCHAR c = *str++;
 131         switch (c)
 132         {
 133         case '\n': *dst++ = '\\'; *dst++ = 'n'; break;
 134         case '\r': *dst++ = '\\'; *dst++ = 'r'; break;
 135         case '\t': *dst++ = '\\'; *dst++ = 't'; break;
 136         case '"':  *dst++ = '\\'; *dst++ = '"'; break;
 137         case '\\': *dst++ = '\\'; *dst++ = '\\'; break;
 138         default:
 139             if (c >= ' ' && c <= 126)
 140                 *dst++ = (char)c;
 141             else
 142             {
 143                 *dst++ = '\\';
 144                 sprintf(dst,"%04x",c);
 145                 dst+=4;
 146             }
 147         }
 148     }
 149     *dst++ = '"';
 150     if (n > 0)
 151     {
 152         *dst++ = '.';
 153         *dst++ = '.';
 154         *dst++ = '.';
 155     }
 156     *dst = 0;
 157     return res;
 158 }
 159
 160
 161 #define ADVAPI32_GET_PROC(func) \
 162     p ## func = (void*)GetProcAddress(hadvapi32, #func);
 163
 164
 165 static void InitFunctionPtrs(void)
 166 {
 167     hadvapi32 = GetModuleHandleA("advapi32.dll");
 168
 169     /* This function was introduced with Windows 2003 SP1 */
 170     ADVAPI32_GET_PROC(RegGetValueA)
 171     ADVAPI32_GET_PROC(RegDeleteTreeA)
 172 }
 173
 174 /* delete key and all its subkeys */
 175 static DWORD delete_key( HKEY hkey )
 176 {
 177     char name[MAX_PATH];
 178     DWORD ret;
 179
 180     while (!(ret = RegEnumKeyA(hkey, 0, name, sizeof(name))))
 181     {
 182         HKEY tmp;
 183         if (!(ret = RegOpenKeyExA( hkey, name, 0, KEY_ENUMERATE_SUB_KEYS, &tmp )))
 184         {
 185             ret = delete_key( tmp );
 186             RegCloseKey( tmp );
 187         }
 188         if (ret) break;
 189     }
 190     if (ret != ERROR_NO_MORE_ITEMS) return ret;
 191     RegDeleteKeyA( hkey, "" );
 192     return 0;
 193 }
 194
 195 static void setup_main_key(void)
 196 {
 197     if (!RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkey_main )) delete_key( hkey_main );
 198
 199     assert (!RegCreateKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkey_main ));
 200 }
 201
 202 static void test_hkey_main_Value_A(LPCSTR name, LPCSTR string,
 203                                    DWORD full_byte_len)
 204 {
 205     DWORD ret, type, cbData;
 206     DWORD str_byte_len;
 207     LPSTR value;
 208     static const char nA[]={'N', 0};
 209
 210     type=0xdeadbeef;
 211     cbData=0xdeadbeef;
 212     /* When successful RegQueryValueExA() leaves GLE as is,
 213      * so we must reset it to detect unimplemented functions.
 214      */
 215     SetLastError(0xdeadbeef);
 216     ret = RegQueryValueExA(hkey_main, name, NULL, &type, NULL, &cbData);
 217     GLE = GetLastError();
 218     ok(ret == ERROR_SUCCESS, "RegQueryValueExA failed: %d, GLE=%d\n", ret, GLE);
 219     /* It is wrong for the Ansi version to not be implemented */
 220     ok(GLE == 0xdeadbeef, "RegQueryValueExA set GLE = %u\n", GLE);
 221     if(GLE == ERROR_CALL_NOT_IMPLEMENTED) return;
 222
 223     str_byte_len = (string ? lstrlenA(string) : 0) + 1;
 224     ok(type == REG_SZ, "RegQueryValueExA returned type %d\n", type);
 225     ok(cbData == full_byte_len || cbData == str_byte_len /* Win9x */,
 226         "cbData=%d instead of %d or %d\n", cbData, full_byte_len, str_byte_len);
 227
 228     value = HeapAlloc(GetProcessHeap(), 0, (cbData+2)*sizeof(*value));
 229     strcpy(value, nA);
 230     type=0xdeadbeef;
 231     ret = RegQueryValueExA(hkey_main, name, NULL, &type, (BYTE*)value, &cbData);
 232     GLE = GetLastError();
 233     ok(ret == ERROR_SUCCESS, "RegQueryValueExA failed: %d, GLE=%d\n", ret, GLE);
 234     if (!string)
 235     {
 236         /* When cbData == 0, RegQueryValueExA() should not modify the buffer */
 237         ok(strcmp(value, nA) == 0 || (cbData == 1 && *value == '\0') /* Win9x */,
 238            "RegQueryValueExA failed: '%s' != '%s'\n", value, string);
 239     }
 240     else
 241     {
 242         ok(memcmp(value, string, cbData) == 0, "RegQueryValueExA failed: %s/%d != %s/%d\n",
 243            wine_debugstr_an(value, cbData), cbData,
 244            wine_debugstr_an(string, full_byte_len), full_byte_len);
 245     }
 246     HeapFree(GetProcessHeap(), 0, value);
 247 }
 248
 249 static void test_hkey_main_Value_W(LPCWSTR name, LPCWSTR string,
 250                                    DWORD full_byte_len)
 251 {
 252     DWORD ret, type, cbData;
 253     LPWSTR value;
 254     static const WCHAR nW[]={'N', 0};
 255
 256     type=0xdeadbeef;
 257     cbData=0xdeadbeef;
 258     /* When successful RegQueryValueExW() leaves GLE as is,
 259      * so we must reset it to detect unimplemented functions.
 260      */
 261     SetLastError(0xdeadbeef);
 262     ret = RegQueryValueExW(hkey_main, name, NULL, &type, NULL, &cbData);
 263     GLE = GetLastError();
 264     ok(ret == ERROR_SUCCESS, "RegQueryValueExW failed: %d, GLE=%d\n", ret, GLE);
 265     if(GLE == ERROR_CALL_NOT_IMPLEMENTED)
 266     {
 267         win_skip("RegQueryValueExW() is not implemented\n");
 268         return;
 269     }
 270
 271     ok(type == REG_SZ, "RegQueryValueExW returned type %d\n", type);
 272     ok(cbData == full_byte_len,
 273         "cbData=%d instead of %d\n", cbData, full_byte_len);
 274
 275     value = HeapAlloc(GetProcessHeap(), 0, (cbData+2)*sizeof(*value));
 276     lstrcpyW(value, nW);
 277     type=0xdeadbeef;
 278     ret = RegQueryValueExW(hkey_main, name, NULL, &type, (BYTE*)value, &cbData);
 279     GLE = GetLastError();
 280     ok(ret == ERROR_SUCCESS, "RegQueryValueExW failed: %d, GLE=%d\n", ret, GLE);
 281     if (!string)
 282     {
 283         /* When cbData == 0, RegQueryValueExW() should not modify the buffer */
 284         string=nW;
 285     }
 286     ok(memcmp(value, string, cbData) == 0, "RegQueryValueExW failed: %s/%d != %s/%d\n",
 287        wine_debugstr_wn(value, cbData / sizeof(WCHAR)), cbData,
 288        wine_debugstr_wn(string, full_byte_len / sizeof(WCHAR)), full_byte_len);
 289     HeapFree(GetProcessHeap(), 0, value);
 290 }
 291
 292 static void test_set_value(void)
 293 {
 294     DWORD ret;
 295
 296     static const WCHAR name1W[] =   {'C','l','e','a','n','S','i','n','g','l','e','S','t','r','i','n','g', 0};
 297     static const WCHAR name2W[] =   {'S','o','m','e','I','n','t','r','a','Z','e','r','o','e','d','S','t','r','i','n','g', 0};
 298     static const WCHAR emptyW[] = {0};
 299     static const WCHAR string1W[] = {'T','h','i','s','N','e','v','e','r','B','r','e','a','k','s', 0};
 300     static const WCHAR string2W[] = {'T','h','i','s', 0 ,'B','r','e','a','k','s', 0 , 0 ,'A', 0 , 0 , 0 , 'L','o','t', 0 , 0 , 0 , 0, 0};
 301     static const WCHAR substring2W[] = {'T','h','i','s',0};
 302
 303     static const char name1A[] =   "CleanSingleString";
 304     static const char name2A[] =   "SomeIntraZeroedString";
 305     static const char emptyA[] = "";
 306     static const char string1A[] = "ThisNeverBreaks";
 307     static const char string2A[] = "This\0Breaks\0\0A\0\0\0Lot\0\0\0\0";
 308     static const char substring2A[] = "This";
 309
 310     if (0)
 311     {
 312         /* Crashes on NT4, Windows 2000 and XP SP1 */
 313         ret = RegSetValueA(hkey_main, NULL, REG_SZ, NULL, 0);
 314         ok(ret == ERROR_INVALID_PARAMETER, "RegSetValueA should have failed with ERROR_INVALID_PARAMETER instead of %d\n", ret);
 315     }
 316
 317     ret = RegSetValueA(hkey_main, NULL, REG_SZ, string1A, sizeof(string1A));
 318     ok(ret == ERROR_SUCCESS, "RegSetValueA failed: %d, GLE=%d\n", ret, GetLastError());
 319     test_hkey_main_Value_A(NULL, string1A, sizeof(string1A));
 320     test_hkey_main_Value_W(NULL, string1W, sizeof(string1W));
 321
 322     /* RegSetValueA ignores the size passed in */
 323     ret = RegSetValueA(hkey_main, NULL, REG_SZ, string1A, 4);
 324     ok(ret == ERROR_SUCCESS, "RegSetValueA failed: %d, GLE=%d\n", ret, GetLastError());
 325     test_hkey_main_Value_A(NULL, string1A, sizeof(string1A));
 326     test_hkey_main_Value_W(NULL, string1W, sizeof(string1W));
 327
 328     /* stops at first null */
 329     ret = RegSetValueA(hkey_main, NULL, REG_SZ, string2A, sizeof(string2A));
 330     ok(ret == ERROR_SUCCESS, "RegSetValueA failed: %d, GLE=%d\n", ret, GetLastError());
 331     test_hkey_main_Value_A(NULL, substring2A, sizeof(substring2A));
 332     test_hkey_main_Value_W(NULL, substring2W, sizeof(substring2W));
 333
 334     /* only REG_SZ is supported on NT*/
 335     ret = RegSetValueA(hkey_main, NULL, REG_BINARY, string2A, sizeof(string2A));
 336     /* NT: ERROR_INVALID_PARAMETER, 9x: ERROR_SUCCESS */
 337     ok(ret == ERROR_INVALID_PARAMETER || broken(ret == ERROR_SUCCESS),
 338         "got %d (expected ERROR_INVALID_PARAMETER or ERROR_SUCCESS)\n", ret);
 339
 340     ret = RegSetValueA(hkey_main, NULL, REG_EXPAND_SZ, string2A, sizeof(string2A));
 341     /* NT: ERROR_INVALID_PARAMETER, 9x: ERROR_SUCCESS */
 342     ok(ret == ERROR_INVALID_PARAMETER || broken(ret == ERROR_SUCCESS),
 343         "got %d (expected ERROR_INVALID_PARAMETER or ERROR_SUCCESS)\n", ret);
 344
 345     ret = RegSetValueA(hkey_main, NULL, REG_MULTI_SZ, string2A, sizeof(string2A));
 346     /* NT: ERROR_INVALID_PARAMETER, 9x: ERROR_SUCCESS */
 347     ok(ret == ERROR_INVALID_PARAMETER || broken(ret == ERROR_SUCCESS),
 348         "got %d (expected ERROR_INVALID_PARAMETER or ERROR_SUCCESS)\n", ret);
 349
 350     /* Test RegSetValueExA with a 'zero-byte' string (as Office 2003 does).
 351      * Surprisingly enough we're supposed to get zero bytes out of it.
 352      */
 353     ret = RegSetValueExA(hkey_main, name1A, 0, REG_SZ, (const BYTE *)emptyA, 0);
 354     ok(ret == ERROR_SUCCESS, "RegSetValueExA failed: %d, GLE=%d\n", ret, GetLastError());
 355     test_hkey_main_Value_A(name1A, NULL, 0);
 356     test_hkey_main_Value_W(name1W, NULL, 0);
 357
 358     /* test RegSetValueExA with an empty string */
 359     ret = RegSetValueExA(hkey_main, name1A, 0, REG_SZ, (const BYTE *)emptyA, sizeof(emptyA));
 360     ok(ret == ERROR_SUCCESS, "RegSetValueExA failed: %d, GLE=%d\n", ret, GetLastError());
 361     test_hkey_main_Value_A(name1A, emptyA, sizeof(emptyA));
 362     test_hkey_main_Value_W(name1W, emptyW, sizeof(emptyW));
 363
 364     /* test RegSetValueExA with off-by-one size */
 365     ret = RegSetValueExA(hkey_main, name1A, 0, REG_SZ, (const BYTE *)string1A, sizeof(string1A)-sizeof(string1A[0]));
 366     ok(ret == ERROR_SUCCESS, "RegSetValueExA failed: %d, GLE=%d\n", ret, GetLastError());
 367     test_hkey_main_Value_A(name1A, string1A, sizeof(string1A));
 368     test_hkey_main_Value_W(name1W, string1W, sizeof(string1W));
 369
 370     /* test RegSetValueExA with normal string */
 371     ret = RegSetValueExA(hkey_main, name1A, 0, REG_SZ, (const BYTE *)string1A, sizeof(string1A));
 372     ok(ret == ERROR_SUCCESS, "RegSetValueExA failed: %d, GLE=%d\n", ret, GetLastError());
 373     test_hkey_main_Value_A(name1A, string1A, sizeof(string1A));
 374     test_hkey_main_Value_W(name1W, string1W, sizeof(string1W));
 375
 376     /* test RegSetValueExA with intrazeroed string */
 377     ret = RegSetValueExA(hkey_main, name2A, 0, REG_SZ, (const BYTE *)string2A, sizeof(string2A));
 378     ok(ret == ERROR_SUCCESS, "RegSetValueExA failed: %d, GLE=%d\n", ret, GetLastError());
 379     test_hkey_main_Value_A(name2A, string2A, sizeof(string2A));
 380     test_hkey_main_Value_W(name2W, string2W, sizeof(string2W));
 381
 382     /* 9x doesn't support W-calls, so don't test them then */
 383     if(GLE == ERROR_CALL_NOT_IMPLEMENTED) return;
 384
 385     if (0)
 386     {
 387         /* Crashes on NT4, Windows 2000 and XP SP1 */
 388         ret = RegSetValueW(hkey_main, NULL, REG_SZ, NULL, 0);
 389         ok(ret == ERROR_INVALID_PARAMETER, "RegSetValueW should have failed with ERROR_INVALID_PARAMETER instead of %d\n", ret);
 390     }
 391
 392     ret = RegSetValueW(hkey_main, NULL, REG_SZ, string1W, sizeof(string1W));
 393     ok(ret == ERROR_SUCCESS, "RegSetValueW failed: %d, GLE=%d\n", ret, GetLastError());
 394     test_hkey_main_Value_A(NULL, string1A, sizeof(string1A));
 395     test_hkey_main_Value_W(NULL, string1W, sizeof(string1W));
 396
 397     /* RegSetValueA ignores the size passed in */
 398     ret = RegSetValueW(hkey_main, NULL, REG_SZ, string1W, 4 * sizeof(string1W[0]));
 399     ok(ret == ERROR_SUCCESS, "RegSetValueW failed: %d, GLE=%d\n", ret, GetLastError());
 400     test_hkey_main_Value_A(NULL, string1A, sizeof(string1A));
 401     test_hkey_main_Value_W(NULL, string1W, sizeof(string1W));
 402
 403     /* stops at first null */
 404     ret = RegSetValueW(hkey_main, NULL, REG_SZ, string2W, sizeof(string2W));
 405     ok(ret == ERROR_SUCCESS, "RegSetValueW failed: %d, GLE=%d\n", ret, GetLastError());
 406     test_hkey_main_Value_A(NULL, substring2A, sizeof(substring2A));
 407     test_hkey_main_Value_W(NULL, substring2W, sizeof(substring2W));
 408
 409     /* only REG_SZ is supported */
 410     ret = RegSetValueW(hkey_main, NULL, REG_BINARY, string2W, sizeof(string2W));
 411     ok(ret == ERROR_INVALID_PARAMETER, "RegSetValueW should have returned ERROR_INVALID_PARAMETER instead of %d\n", ret);
 412     ret = RegSetValueW(hkey_main, NULL, REG_EXPAND_SZ, string2W, sizeof(string2W));
 413     ok(ret == ERROR_INVALID_PARAMETER, "RegSetValueW should have returned ERROR_INVALID_PARAMETER instead of %d\n", ret);
 414     ret = RegSetValueW(hkey_main, NULL, REG_MULTI_SZ, string2W, sizeof(string2W));
 415     ok(ret == ERROR_INVALID_PARAMETER, "RegSetValueW should have returned ERROR_INVALID_PARAMETER instead of %d\n", ret);
 416
 417     /* test RegSetValueExW with off-by-one size */
 418     ret = RegSetValueExW(hkey_main, name1W, 0, REG_SZ, (const BYTE *)string1W, sizeof(string1W)-sizeof(string1W[0]));
 419     ok(ret == ERROR_SUCCESS, "RegSetValueExW failed: %d, GLE=%d\n", ret, GetLastError());
 420     test_hkey_main_Value_A(name1A, string1A, sizeof(string1A));
 421     test_hkey_main_Value_W(name1W, string1W, sizeof(string1W));
 422
 423     /* test RegSetValueExW with normal string */
 424     ret = RegSetValueExW(hkey_main, name1W, 0, REG_SZ, (const BYTE *)string1W, sizeof(string1W));
 425     ok(ret == ERROR_SUCCESS, "RegSetValueExW failed: %d, GLE=%d\n", ret, GetLastError());
 426     test_hkey_main_Value_A(name1A, string1A, sizeof(string1A));
 427     test_hkey_main_Value_W(name1W, string1W, sizeof(string1W));
 428
 429     /* test RegSetValueExW with intrazeroed string */
 430     ret = RegSetValueExW(hkey_main, name2W, 0, REG_SZ, (const BYTE *)string2W, sizeof(string2W));
 431     ok(ret == ERROR_SUCCESS, "RegSetValueExW failed: %d, GLE=%d\n", ret, GetLastError());
 432     test_hkey_main_Value_A(name2A, string2A, sizeof(string2A));
 433     test_hkey_main_Value_W(name2W, string2W, sizeof(string2W));
 434 }
 435
 436 static void create_test_entries(void)
 437 {
 438     static const DWORD qw[2] = { 0x12345678, 0x87654321 };
 439
 440     SetEnvironmentVariableA("LONGSYSTEMVAR", "bar");
 441     SetEnvironmentVariableA("FOO", "ImARatherLongButIndeedNeededString");
 442
 443     ok(!RegSetValueExA(hkey_main,"TP1_EXP_SZ",0,REG_EXPAND_SZ, (const BYTE *)sTestpath1, strlen(sTestpath1)+1),
 444         "RegSetValueExA failed\n");
 445     ok(!RegSetValueExA(hkey_main,"TP1_SZ",0,REG_SZ, (const BYTE *)sTestpath1, strlen(sTestpath1)+1),
 446         "RegSetValueExA failed\n");
 447     ok(!RegSetValueExA(hkey_main,"TP1_ZB_SZ",0,REG_SZ, (const BYTE *)"", 0),
 448        "RegSetValueExA failed\n");
 449     ok(!RegSetValueExA(hkey_main,"TP2_EXP_SZ",0,REG_EXPAND_SZ, (const BYTE *)sTestpath2, strlen(sTestpath2)+1),
 450         "RegSetValueExA failed\n");
 451     ok(!RegSetValueExA(hkey_main,"DWORD",0,REG_DWORD, (const BYTE *)qw, 4),
 452         "RegSetValueExA failed\n");
 453     ok(!RegSetValueExA(hkey_main,"BIN32",0,REG_BINARY, (const BYTE *)qw, 4),
 454         "RegSetValueExA failed\n");
 455     ok(!RegSetValueExA(hkey_main,"BIN64",0,REG_BINARY, (const BYTE *)qw, 8),
 456         "RegSetValueExA failed\n");
 457 }
 458
 459 static void test_enum_value(void)
 460 {
 461     DWORD res;
 462     HKEY test_key;
 463     char value[20], data[20];
 464     WCHAR valueW[20], dataW[20];
 465     DWORD val_count, data_count, type;
 466     static const WCHAR foobarW[] = {'f','o','o','b','a','r',0};
 467     static const WCHAR testW[] = {'T','e','s','t',0};
 468     static const WCHAR xxxW[] = {'x','x','x','x','x','x','x','x',0};
 469
 470     /* create the working key for new 'Test' value */
 471     res = RegCreateKeyA( hkey_main, "TestKey", &test_key );
 472     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", res);
 473
 474     /* check NULL data with zero length */
 475     res = RegSetValueExA( test_key, "Test", 0, REG_SZ, NULL, 0 );
 476     if (GetVersion() & 0x80000000)
 477         ok( res == ERROR_INVALID_PARAMETER, "RegSetValueExA returned %d\n", res );
 478     else
 479         ok( !res, "RegSetValueExA returned %d\n", res );
 480     res = RegSetValueExA( test_key, "Test", 0, REG_EXPAND_SZ, NULL, 0 );
 481     ok( ERROR_SUCCESS == res || ERROR_INVALID_PARAMETER == res, "RegSetValueExA returned %d\n", res );
 482     res = RegSetValueExA( test_key, "Test", 0, REG_BINARY, NULL, 0 );
 483     ok( ERROR_SUCCESS == res || ERROR_INVALID_PARAMETER == res, "RegSetValueExA returned %d\n", res );
 484
 485     res = RegSetValueExA( test_key, "Test", 0, REG_SZ, (const BYTE *)"foobar", 7 );
 486     ok( res == 0, "RegSetValueExA failed error %d\n", res );
 487
 488     /* overflow both name and data */
 489     val_count = 2;
 490     data_count = 2;
 491     type = 1234;
 492     strcpy( value, "xxxxxxxxxx" );
 493     strcpy( data, "xxxxxxxxxx" );
 494     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, (LPBYTE)data, &data_count );
 495     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 496     ok( val_count == 2, "val_count set to %d\n", val_count );
 497     ok( data_count == 7, "data_count set to %d instead of 7\n", data_count );
 498     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 499     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 500     ok( !strcmp( data, "xxxxxxxxxx" ), "data set to '%s'\n", data );
 501
 502     /* overflow name */
 503     val_count = 3;
 504     data_count = 20;
 505     type = 1234;
 506     strcpy( value, "xxxxxxxxxx" );
 507     strcpy( data, "xxxxxxxxxx" );
 508     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, (LPBYTE)data, &data_count );
 509     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 510     /* Win9x returns 2 as specified by MSDN but NT returns 3... */
 511     ok( val_count == 2 || val_count == 3, "val_count set to %d\n", val_count );
 512     ok( data_count == 7, "data_count set to %d instead of 7\n", data_count );
 513     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 514     /* v5.1.2600.0 (XP Home and Professional) does not touch value or data in this case */
 515     ok( !strcmp( value, "Te" ) || !strcmp( value, "xxxxxxxxxx" ),
 516         "value set to '%s' instead of 'Te' or 'xxxxxxxxxx'\n", value );
 517     ok( !strcmp( data, "foobar" ) || !strcmp( data, "xxxxxxx" ),
 518         "data set to '%s' instead of 'foobar' or 'xxxxxxx'\n", data );
 519
 520     /* overflow empty name */
 521     val_count = 0;
 522     data_count = 20;
 523     type = 1234;
 524     strcpy( value, "xxxxxxxxxx" );
 525     strcpy( data, "xxxxxxxxxx" );
 526     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, (LPBYTE)data, &data_count );
 527     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 528     ok( val_count == 0, "val_count set to %d\n", val_count );
 529     ok( data_count == 7, "data_count set to %d instead of 7\n", data_count );
 530     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 531     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 532     /* v5.1.2600.0 (XP Home and Professional) does not touch data in this case */
 533     ok( !strcmp( data, "foobar" ) || !strcmp( data, "xxxxxxx" ),
 534         "data set to '%s' instead of 'foobar' or 'xxxxxxx'\n", data );
 535
 536     /* overflow data */
 537     val_count = 20;
 538     data_count = 2;
 539     type = 1234;
 540     strcpy( value, "xxxxxxxxxx" );
 541     strcpy( data, "xxxxxxxxxx" );
 542     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, (LPBYTE)data, &data_count );
 543     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 544     ok( val_count == 20, "val_count set to %d\n", val_count );
 545     ok( data_count == 7, "data_count set to %d instead of 7\n", data_count );
 546     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 547     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 548     ok( !strcmp( data, "xxxxxxxxxx" ), "data set to '%s'\n", data );
 549
 550     /* no overflow */
 551     val_count = 20;
 552     data_count = 20;
 553     type = 1234;
 554     strcpy( value, "xxxxxxxxxx" );
 555     strcpy( data, "xxxxxxxxxx" );
 556     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, (LPBYTE)data, &data_count );
 557     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", res );
 558     ok( val_count == 4, "val_count set to %d instead of 4\n", val_count );
 559     ok( data_count == 7, "data_count set to %d instead of 7\n", data_count );
 560     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 561     ok( !strcmp( value, "Test" ), "value is '%s' instead of Test\n", value );
 562     ok( !strcmp( data, "foobar" ), "data is '%s' instead of foobar\n", data );
 563
 564     /* Unicode tests */
 565
 566     SetLastError(0xdeadbeef);
 567     res = RegSetValueExW( test_key, testW, 0, REG_SZ, (const BYTE *)foobarW, 7*sizeof(WCHAR) );
 568     if (res==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 569     {
 570         win_skip("RegSetValueExW is not implemented\n");
 571         goto cleanup;
 572     }
 573     ok( res == 0, "RegSetValueExW failed error %d\n", res );
 574
 575     /* overflow both name and data */
 576     val_count = 2;
 577     data_count = 2;
 578     type = 1234;
 579     memcpy( valueW, xxxW, sizeof(xxxW) );
 580     memcpy( dataW, xxxW, sizeof(xxxW) );
 581     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 582     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 583     ok( val_count == 2, "val_count set to %d\n", val_count );
 584     ok( data_count == 7*sizeof(WCHAR), "data_count set to %d instead of 7*sizeof(WCHAR)\n", data_count );
 585     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 586     ok( !memcmp( valueW, xxxW, sizeof(xxxW) ), "value modified\n" );
 587     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 588
 589     /* overflow name */
 590     val_count = 3;
 591     data_count = 20;
 592     type = 1234;
 593     memcpy( valueW, xxxW, sizeof(xxxW) );
 594     memcpy( dataW, xxxW, sizeof(xxxW) );
 595     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 596     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 597     ok( val_count == 3, "val_count set to %d\n", val_count );
 598     ok( data_count == 7*sizeof(WCHAR), "data_count set to %d instead of 7*sizeof(WCHAR)\n", data_count );
 599     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 600     ok( !memcmp( valueW, xxxW, sizeof(xxxW) ), "value modified\n" );
 601     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 602
 603     /* overflow data */
 604     val_count = 20;
 605     data_count = 2;
 606     type = 1234;
 607     memcpy( valueW, xxxW, sizeof(xxxW) );
 608     memcpy( dataW, xxxW, sizeof(xxxW) );
 609     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 610     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %d\n", res );
 611     ok( val_count == 4, "val_count set to %d instead of 4\n", val_count );
 612     ok( data_count == 7*sizeof(WCHAR), "data_count set to %d instead of 7*sizeof(WCHAR)\n", data_count );
 613     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 614     ok( !memcmp( valueW, testW, sizeof(testW) ), "value is not 'Test'\n" );
 615     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 616
 617     /* no overflow */
 618     val_count = 20;
 619     data_count = 20;
 620     type = 1234;
 621     memcpy( valueW, xxxW, sizeof(xxxW) );
 622     memcpy( dataW, xxxW, sizeof(xxxW) );
 623     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 624     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", res );
 625     ok( val_count == 4, "val_count set to %d instead of 4\n", val_count );
 626     ok( data_count == 7*sizeof(WCHAR), "data_count set to %d instead of 7*sizeof(WCHAR)\n", data_count );
 627     ok( type == REG_SZ, "type %d is not REG_SZ\n", type );
 628     ok( !memcmp( valueW, testW, sizeof(testW) ), "value is not 'Test'\n" );
 629     ok( !memcmp( dataW, foobarW, sizeof(foobarW) ), "data is not 'foobar'\n" );
 630
 631 cleanup:
 632     RegDeleteKeyA(test_key, "");
 633     RegCloseKey(test_key);
 634 }
 635
 636 static void test_query_value_ex(void)
 637 {
 638     DWORD ret;
 639     DWORD size;
 640     DWORD type;
 641     BYTE buffer[10];
 642
 643     ret = RegQueryValueExA(hkey_main, "TP1_SZ", NULL, &type, NULL, &size);
 644     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 645     ok(size == strlen(sTestpath1) + 1, "(%d,%d)\n", (DWORD)strlen(sTestpath1) + 1, size);
 646     ok(type == REG_SZ, "type %d is not REG_SZ\n", type);
 647
 648     type = 0xdeadbeef;
 649     size = 0xdeadbeef;
 650     ret = RegQueryValueExA(HKEY_CLASSES_ROOT, "Nonexistent Value", NULL, &type, NULL, &size);
 651     ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %d\n", ret);
 652     /* the type parameter is cleared on Win9x, but is set to a random value on
 653      * NT, so don't do that test there. The size parameter is left untouched on Win9x
 654      * but cleared on NT+, this can be tested on all platforms.
 655      */
 656     if (GetVersion() & 0x80000000)
 657     {
 658         ok(type == 0, "type should have been set to 0 instead of 0x%x\n", type);
 659         ok(size == 0xdeadbeef, "size should have been left untouched (0xdeadbeef)\n");
 660     }
 661     else
 662     {
 663         trace("test_query_value_ex: type set to: 0x%08x\n", type);
 664         ok(size == 0, "size should have been set to 0 instead of %d\n", size);
 665     }
 666
 667     size = sizeof(buffer);
 668     ret = RegQueryValueExA(HKEY_CLASSES_ROOT, "Nonexistent Value", NULL, &type, buffer, &size);
 669     ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %d\n", ret);
 670     ok(size == sizeof(buffer), "size shouldn't have been changed to %d\n", size);
 671
 672     size = 4;
 673     ret = RegQueryValueExA(hkey_main, "BIN32", NULL, &size, buffer, &size);
 674     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 675 }
 676
 677 static void test_get_value(void)
 678 {
 679     DWORD ret;
 680     DWORD size;
 681     DWORD type;
 682     DWORD dw, qw[2];
 683     CHAR buf[80];
 684     CHAR expanded[] = "bar\\subdir1";
 685     CHAR expanded2[] = "ImARatherLongButIndeedNeededString\\subdir1";
 686
 687     if(!pRegGetValueA)
 688     {
 689         win_skip("RegGetValue not available on this platform\n");
 690         return;
 691     }
 692
 693     /* Invalid parameter */
 694     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_DWORD, &type, &dw, NULL);
 695     ok(ret == ERROR_INVALID_PARAMETER, "ret=%d\n", ret);
 696
 697     /* Query REG_DWORD using RRF_RT_REG_DWORD (ok) */
 698     size = type = dw = 0xdeadbeef;
 699     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_DWORD, &type, &dw, &size);
 700     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 701     ok(size == 4, "size=%d\n", size);
 702     ok(type == REG_DWORD, "type=%d\n", type);
 703     ok(dw == 0x12345678, "dw=%d\n", dw);
 704
 705     /* Query by subkey-name */
 706     ret = pRegGetValueA(HKEY_CURRENT_USER, "Software\\Wine\\Test", "DWORD", RRF_RT_REG_DWORD, NULL, NULL, NULL);
 707     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 708
 709     /* Query REG_DWORD using RRF_RT_REG_BINARY (restricted) */
 710     size = type = dw = 0xdeadbeef;
 711     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_BINARY, &type, &dw, &size);
 712     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%d\n", ret);
 713     /* Although the function failed all values are retrieved */
 714     ok(size == 4, "size=%d\n", size);
 715     ok(type == REG_DWORD, "type=%d\n", type);
 716     ok(dw == 0x12345678, "dw=%d\n", dw);
 717
 718     /* Test RRF_ZEROONFAILURE */
 719     type = dw = 0xdeadbeef; size = 4;
 720     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_SZ|RRF_ZEROONFAILURE, &type, &dw, &size);
 721     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%d\n", ret);
 722     /* Again all values are retrieved ... */
 723     ok(size == 4, "size=%d\n", size);
 724     ok(type == REG_DWORD, "type=%d\n", type);
 725     /* ... except the buffer, which is zeroed out */
 726     ok(dw == 0, "dw=%d\n", dw);
 727
 728     /* Test RRF_ZEROONFAILURE with a NULL buffer... */
 729     type = size = 0xbadbeef;
 730     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_SZ|RRF_ZEROONFAILURE, &type, NULL, &size);
 731     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%d\n", ret);
 732     ok(size == 4, "size=%d\n", size);
 733     ok(type == REG_DWORD, "type=%d\n", type);
 734
 735     /* Query REG_DWORD using RRF_RT_DWORD (ok) */
 736     size = type = dw = 0xdeadbeef;
 737     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_DWORD, &type, &dw, &size);
 738     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 739     ok(size == 4, "size=%d\n", size);
 740     ok(type == REG_DWORD, "type=%d\n", type);
 741     ok(dw == 0x12345678, "dw=%d\n", dw);
 742
 743     /* Query 32-bit REG_BINARY using RRF_RT_DWORD (ok) */
 744     size = type = dw = 0xdeadbeef;
 745     ret = pRegGetValueA(hkey_main, NULL, "BIN32", RRF_RT_DWORD, &type, &dw, &size);
 746     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 747     ok(size == 4, "size=%d\n", size);
 748     ok(type == REG_BINARY, "type=%d\n", type);
 749     ok(dw == 0x12345678, "dw=%d\n", dw);
 750
 751     /* Query 64-bit REG_BINARY using RRF_RT_DWORD (type mismatch) */
 752     qw[0] = qw[1] = size = type = 0xdeadbeef;
 753     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_DWORD, &type, qw, &size);
 754     ok(ret == ERROR_DATATYPE_MISMATCH, "ret=%d\n", ret);
 755     ok(size == 8, "size=%d\n", size);
 756     ok(type == REG_BINARY, "type=%d\n", type);
 757     ok(qw[0] == 0x12345678 &&
 758        qw[1] == 0x87654321, "qw={%d,%d}\n", qw[0], qw[1]);
 759
 760     /* Query 64-bit REG_BINARY using 32-bit buffer (buffer too small) */
 761     type = dw = 0xdeadbeef; size = 4;
 762     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_REG_BINARY, &type, &dw, &size);
 763     ok(ret == ERROR_MORE_DATA, "ret=%d\n", ret);
 764     ok(dw == 0xdeadbeef, "dw=%d\n", dw);
 765     ok(size == 8, "size=%d\n", size);
 766
 767     /* Query 64-bit REG_BINARY using RRF_RT_QWORD (ok) */
 768     qw[0] = qw[1] = size = type = 0xdeadbeef;
 769     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_QWORD, &type, qw, &size);
 770     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 771     ok(size == 8, "size=%d\n", size);
 772     ok(type == REG_BINARY, "type=%d\n", type);
 773     ok(qw[0] == 0x12345678 &&
 774        qw[1] == 0x87654321, "qw={%d,%d}\n", qw[0], qw[1]);
 775
 776     /* Query REG_SZ using RRF_RT_REG_SZ (ok) */
 777     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 778     ret = pRegGetValueA(hkey_main, NULL, "TP1_SZ", RRF_RT_REG_SZ, &type, buf, &size);
 779     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 780     ok(size == strlen(sTestpath1)+1, "strlen(sTestpath1)=%d size=%d\n", lstrlenA(sTestpath1), size);
 781     ok(type == REG_SZ, "type=%d\n", type);
 782     ok(!strcmp(sTestpath1, buf), "sTestpath=\"%s\" buf=\"%s\"\n", sTestpath1, buf);
 783
 784     /* Query REG_SZ using RRF_RT_REG_SZ and no buffer (ok) */
 785     type = 0xdeadbeef; size = 0;
 786     ret = pRegGetValueA(hkey_main, NULL, "TP1_SZ", RRF_RT_REG_SZ, &type, NULL, &size);
 787     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 788     /* v5.2.3790.1830 (2003 SP1) returns sTestpath1 length + 2 here. */
 789     ok(size == strlen(sTestpath1)+1 || broken(size == strlen(sTestpath1)+2),
 790        "strlen(sTestpath1)=%d size=%d\n", lstrlenA(sTestpath1), size);
 791     ok(type == REG_SZ, "type=%d\n", type);
 792
 793     /* Query REG_SZ using RRF_RT_REG_SZ on a zero-byte value (ok) */
 794     strcpy(buf, sTestpath1);
 795     type = 0xdeadbeef;
 796     size = sizeof(buf);
 797     ret = pRegGetValueA(hkey_main, NULL, "TP1_ZB_SZ", RRF_RT_REG_SZ, &type, buf, &size);
 798     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 799     /* v5.2.3790.1830 (2003 SP1) returns sTestpath1 length + 2 here. */
 800     ok(size == 0 ||
 801        size == 1, /* win2k3 */
 802        "size=%d\n", size);
 803     ok(type == REG_SZ, "type=%d\n", type);
 804     ok(!strcmp(sTestpath1, buf) ||
 805        !strcmp(buf, ""),
 806        "Expected \"%s\" or \"\", got \"%s\"\n", sTestpath1, buf);
 807
 808     /* Query REG_SZ using RRF_RT_REG_SZ|RRF_NOEXPAND (ok) */
 809     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 810     ret = pRegGetValueA(hkey_main, NULL, "TP1_SZ", RRF_RT_REG_SZ|RRF_NOEXPAND, &type, buf, &size);
 811     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 812     ok(size == strlen(sTestpath1)+1, "strlen(sTestpath1)=%d size=%d\n", lstrlenA(sTestpath1), size);
 813     ok(type == REG_SZ, "type=%d\n", type);
 814     ok(!strcmp(sTestpath1, buf), "sTestpath=\"%s\" buf=\"%s\"\n", sTestpath1, buf);
 815
 816     /* Query REG_EXPAND_SZ using RRF_RT_REG_SZ and no buffer (ok, expands) */
 817     size = 0;
 818     ret = pRegGetValueA(hkey_main, NULL, "TP2_EXP_SZ", RRF_RT_REG_SZ, NULL, NULL, &size);
 819     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 820     ok((size == strlen(expanded2)+1) || /* win2k3 SP1 */
 821        (size == strlen(expanded2)+2) || /* win2k3 SP2 */
 822        (size == strlen(sTestpath2)+1),
 823         "strlen(expanded2)=%d, strlen(sTestpath2)=%d, size=%d\n", lstrlenA(expanded2), lstrlenA(sTestpath2), size);
 824
 825     /* Query REG_EXPAND_SZ using RRF_RT_REG_SZ (ok, expands) */
 826     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 827     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_REG_SZ, &type, buf, &size);
 828     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 829     /* At least v5.2.3790.1830 (2003 SP1) returns the unexpanded sTestpath1 length + 1 here. */
 830     ok(size == strlen(expanded)+1 || broken(size == strlen(sTestpath1)+1),
 831         "strlen(expanded)=%d, strlen(sTestpath1)=%d, size=%d\n", lstrlenA(expanded), lstrlenA(sTestpath1), size);
 832     ok(type == REG_SZ, "type=%d\n", type);
 833     ok(!strcmp(expanded, buf), "expanded=\"%s\" buf=\"%s\"\n", expanded, buf);
 834
 835     /* Query REG_EXPAND_SZ using RRF_RT_REG_SZ (ok, expands a lot) */
 836     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 837     ret = pRegGetValueA(hkey_main, NULL, "TP2_EXP_SZ", RRF_RT_REG_SZ, &type, buf, &size);
 838     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 839     /* At least v5.2.3790.1830 (2003 SP1) returns the unexpanded sTestpath2 length + 1 here. */
 840     ok(size == strlen(expanded2)+1 || broken(size == strlen(sTestpath2)+1),
 841         "strlen(expanded2)=%d, strlen(sTestpath1)=%d, size=%d\n", lstrlenA(expanded2), lstrlenA(sTestpath2), size);
 842     ok(type == REG_SZ, "type=%d\n", type);
 843     ok(!strcmp(expanded2, buf), "expanded2=\"%s\" buf=\"%s\"\n", expanded2, buf);
 844
 845     /* Query REG_EXPAND_SZ using RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND (ok, doesn't expand) */
 846     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 847     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND, &type, buf, &size);
 848     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 849     ok(size == strlen(sTestpath1)+1, "strlen(sTestpath1)=%d size=%d\n", lstrlenA(sTestpath1), size);
 850     ok(type == REG_EXPAND_SZ, "type=%d\n", type);
 851     ok(!strcmp(sTestpath1, buf), "sTestpath=\"%s\" buf=\"%s\"\n", sTestpath1, buf);
 852
 853     /* Query REG_EXPAND_SZ using RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND and no buffer (ok, doesn't expand) */
 854     size = 0xbadbeef;
 855     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND, NULL, NULL, &size);
 856     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 857     /* v5.2.3790.1830 (2003 SP1) returns sTestpath1 length + 2 here. */
 858     ok(size == strlen(sTestpath1)+1 || broken(size == strlen(sTestpath1)+2),
 859        "strlen(sTestpath1)=%d size=%d\n", lstrlenA(sTestpath1), size);
 860
 861     /* Query REG_EXPAND_SZ using RRF_RT_REG_SZ|RRF_NOEXPAND (type mismatch) */
 862     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_REG_SZ|RRF_NOEXPAND, NULL, NULL, NULL);
 863     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%d\n", ret);
 864
 865     /* Query REG_EXPAND_SZ using RRF_RT_REG_EXPAND_SZ (not allowed without RRF_NOEXPAND) */
 866     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_REG_EXPAND_SZ, NULL, NULL, NULL);
 867     ok(ret == ERROR_INVALID_PARAMETER, "ret=%d\n", ret);
 868
 869     /* Query REG_EXPAND_SZ using RRF_RT_ANY */
 870     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 871     ret = pRegGetValueA(hkey_main, NULL, "TP1_EXP_SZ", RRF_RT_ANY, &type, buf, &size);
 872     ok(ret == ERROR_SUCCESS, "ret=%d\n", ret);
 873     /* At least v5.2.3790.1830 (2003 SP1) returns the unexpanded sTestpath1 length + 1 here. */
 874     ok(size == strlen(expanded)+1 || broken(size == strlen(sTestpath1)+1),
 875         "strlen(expanded)=%d, strlen(sTestpath1)=%d, size=%d\n", lstrlenA(expanded), lstrlenA(sTestpath1), size);
 876     ok(type == REG_SZ, "type=%d\n", type);
 877     ok(!strcmp(expanded, buf), "expanded=\"%s\" buf=\"%s\"\n", expanded, buf);
 878 }
 879
 880 static void test_reg_open_key(void)
 881 {
 882     DWORD ret = 0;
 883     HKEY hkResult = NULL;
 884     HKEY hkPreserve = NULL;
 885
 886     /* successful open */
 887     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkResult);
 888     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 889     ok(hkResult != NULL, "expected hkResult != NULL\n");
 890     hkPreserve = hkResult;
 891
 892     /* these tests fail on Win9x, but we want to be compatible with NT, so
 893      * run them if we can */
 894     if (!(GetVersion() & 0x80000000))
 895     {
 896         /* open same key twice */
 897         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkResult);
 898         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 899         ok(hkResult != hkPreserve, "epxected hkResult != hkPreserve\n");
 900         ok(hkResult != NULL, "hkResult != NULL\n");
 901         RegCloseKey(hkResult);
 902
 903         /* open nonexistent key
 904         * check that hkResult is set to NULL
 905         */
 906         hkResult = hkPreserve;
 907         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Nonexistent", &hkResult);
 908         ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %d\n", ret);
 909         ok(hkResult == NULL, "expected hkResult == NULL\n");
 910
 911         /* open the same nonexistent key again to make sure the key wasn't created */
 912         hkResult = hkPreserve;
 913         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Nonexistent", &hkResult);
 914         ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %d\n", ret);
 915         ok(hkResult == NULL, "expected hkResult == NULL\n");
 916
 917         /* send in NULL lpSubKey
 918         * check that hkResult receives the value of hKey
 919         */
 920         hkResult = hkPreserve;
 921         ret = RegOpenKeyA(HKEY_CURRENT_USER, NULL, &hkResult);
 922         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 923         ok(hkResult == HKEY_CURRENT_USER, "expected hkResult == HKEY_CURRENT_USER\n");
 924
 925         /* send empty-string in lpSubKey */
 926         hkResult = hkPreserve;
 927         ret = RegOpenKeyA(HKEY_CURRENT_USER, "", &hkResult);
 928         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 929         ok(hkResult == HKEY_CURRENT_USER, "expected hkResult == HKEY_CURRENT_USER\n");
 930
 931         /* send in NULL lpSubKey and NULL hKey
 932         * hkResult is set to NULL
 933         */
 934         hkResult = hkPreserve;
 935         ret = RegOpenKeyA(NULL, NULL, &hkResult);
 936         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
 937         ok(hkResult == NULL, "expected hkResult == NULL\n");
 938     }
 939
 940     /* only send NULL hKey
 941      * the value of hkResult remains unchanged
 942      */
 943     hkResult = hkPreserve;
 944     ret = RegOpenKeyA(NULL, "Software\\Wine\\Test", &hkResult);
 945     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_BADKEY, /* Windows 95 returns BADKEY */
 946        "expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %d\n", ret);
 947     ok(hkResult == hkPreserve, "expected hkResult == hkPreserve\n");
 948     RegCloseKey(hkResult);
 949
 950     /* send in NULL hkResult */
 951     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", NULL);
 952     ok(ret == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %d\n", ret);
 953
 954     /*  beginning backslash character */
 955     ret = RegOpenKeyA(HKEY_CURRENT_USER, "\\Software\\Wine\\Test", &hkResult);
 956        ok(ret == ERROR_BAD_PATHNAME || /* NT/2k/XP */
 957            ret == ERROR_FILE_NOT_FOUND /* Win9x,ME */
 958            , "expected ERROR_BAD_PATHNAME or ERROR_FILE_NOT_FOUND, got %d\n", ret);
 959
 960     /* WOW64 flags */
 961     hkResult = NULL;
 962     ret = RegOpenKeyExA(HKEY_LOCAL_MACHINE, "Software", 0, KEY_READ|KEY_WOW64_32KEY, &hkResult);
 963     ok((ret == ERROR_SUCCESS && hkResult != NULL) || broken(ret == ERROR_ACCESS_DENIED /* NT4, win2k */),
 964         "RegOpenKeyEx with KEY_WOW64_32KEY failed (err=%u)\n", ret);
 965     RegCloseKey(hkResult);
 966
 967     hkResult = NULL;
 968     ret = RegOpenKeyExA(HKEY_LOCAL_MACHINE, "Software", 0, KEY_READ|KEY_WOW64_64KEY, &hkResult);
 969     ok((ret == ERROR_SUCCESS && hkResult != NULL) || broken(ret == ERROR_ACCESS_DENIED /* NT4, win2k */),
 970         "RegOpenKeyEx with KEY_WOW64_64KEY failed (err=%u)\n", ret);
 971     RegCloseKey(hkResult);
 972 }
 973
 974 static void test_reg_create_key(void)
 975 {
 976     LONG ret;
 977     HKEY hkey1, hkey2;
 978     ret = RegCreateKeyExA(hkey_main, "Subkey1", 0, NULL, 0, KEY_NOTIFY, NULL, &hkey1, NULL);
 979     ok(!ret, "RegCreateKeyExA failed with error %d\n", ret);
 980     /* should succeed: all versions of Windows ignore the access rights
 981      * to the parent handle */
 982     ret = RegCreateKeyExA(hkey1, "Subkey2", 0, NULL, 0, KEY_SET_VALUE, NULL, &hkey2, NULL);
 983     ok(!ret, "RegCreateKeyExA failed with error %d\n", ret);
 984
 985     /* clean up */
 986     RegDeleteKey(hkey2, "");
 987     RegDeleteKey(hkey1, "");
 988
 989     /*  beginning backslash character */
 990     ret = RegCreateKeyExA(hkey_main, "\\Subkey3", 0, NULL, 0, KEY_NOTIFY, NULL, &hkey1, NULL);
 991     if (!(GetVersion() & 0x80000000))
 992         ok(ret == ERROR_BAD_PATHNAME, "expected ERROR_BAD_PATHNAME, got %d\n", ret);
 993     else {
 994         ok(!ret, "RegCreateKeyExA failed with error %d\n", ret);
 995         RegDeleteKey(hkey1, NULL);
 996     }
 997
 998     /* WOW64 flags - open an existing key */
 999     hkey1 = NULL;
1000     ret = RegCreateKeyExA(HKEY_LOCAL_MACHINE, "Software", 0, NULL, 0, KEY_READ|KEY_WOW64_32KEY, NULL, &hkey1, NULL);
1001     ok((ret == ERROR_SUCCESS && hkey1 != NULL) || broken(ret == ERROR_ACCESS_DENIED /* NT4, win2k */),
1002         "RegOpenKeyEx with KEY_WOW64_32KEY failed (err=%u)\n", ret);
1003     RegCloseKey(hkey1);
1004
1005     hkey1 = NULL;
1006     ret = RegCreateKeyExA(HKEY_LOCAL_MACHINE, "Software", 0, NULL, 0, KEY_READ|KEY_WOW64_64KEY, NULL, &hkey1, NULL);
1007     ok((ret == ERROR_SUCCESS && hkey1 != NULL) || broken(ret == ERROR_ACCESS_DENIED /* NT4, win2k */),
1008         "RegOpenKeyEx with KEY_WOW64_64KEY failed (err=%u)\n", ret);
1009     RegCloseKey(hkey1);
1010 }
1011
1012 static void test_reg_close_key(void)
1013 {
1014     DWORD ret = 0;
1015     HKEY hkHandle;
1016
1017     /* successfully close key
1018      * hkHandle remains changed after call to RegCloseKey
1019      */
1020     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkHandle);
1021     ret = RegCloseKey(hkHandle);
1022     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
1023
1024     /* try to close the key twice */
1025     ret = RegCloseKey(hkHandle); /* Windows 95 doesn't mind. */
1026     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_SUCCESS,
1027        "expected ERROR_INVALID_HANDLE or ERROR_SUCCESS, got %d\n", ret);
1028
1029     /* try to close a NULL handle */
1030     ret = RegCloseKey(NULL);
1031     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_BADKEY, /* Windows 95 returns BADKEY */
1032        "expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %d\n", ret);
1033
1034     /* Check to see if we didn't potentially close our main handle, which could happen on win98 as
1035      * win98 doesn't give a new handle when the same key is opened.
1036      * Not re-opening will make some next tests fail.
1037      */
1038     if (hkey_main == hkHandle)
1039     {
1040         trace("The main handle is most likely closed, so re-opening\n");
1041         RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkey_main );
1042     }
1043 }
1044
1045 static void test_reg_delete_key(void)
1046 {
1047     DWORD ret;
1048
1049     ret = RegDeleteKey(hkey_main, NULL);
1050
1051     /* There is a bug in NT4 and W2K that doesn't check if the subkey is NULL. If
1052      * there are also no subkeys available it will delete the key pointed to by hkey_main.
1053      * Not re-creating will make some next tests fail.
1054      */
1055     if (ret == ERROR_SUCCESS)
1056     {
1057         trace("We are probably running on NT4 or W2K as the main key is deleted,"
1058             " re-creating the main key\n");
1059         setup_main_key();
1060     }
1061     else
1062         ok(ret == ERROR_INVALID_PARAMETER ||
1063            ret == ERROR_ACCESS_DENIED ||
1064            ret == ERROR_BADKEY, /* Win95 */
1065            "ret=%d\n", ret);
1066 }
1067
1068 static void test_reg_save_key(void)
1069 {
1070     DWORD ret;
1071
1072     ret = RegSaveKey(hkey_main, "saved_key", NULL);
1073     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
1074 }
1075
1076 static void test_reg_load_key(void)
1077 {
1078     DWORD ret;
1079     HKEY hkHandle;
1080
1081     ret = RegLoadKey(HKEY_LOCAL_MACHINE, "Test", "saved_key");
1082     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
1083
1084     ret = RegOpenKey(HKEY_LOCAL_MACHINE, "Test", &hkHandle);
1085     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
1086
1087     RegCloseKey(hkHandle);
1088 }
1089
1090 static void test_reg_unload_key(void)
1091 {
1092     DWORD ret;
1093
1094     ret = RegUnLoadKey(HKEY_LOCAL_MACHINE, "Test");
1095     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %d\n", ret);
1096
1097     DeleteFile("saved_key");
1098     DeleteFile("saved_key.LOG");
1099 }
1100
1101 static BOOL set_privileges(LPCSTR privilege, BOOL set)
1102 {
1103     TOKEN_PRIVILEGES tp;
1104     HANDLE hToken;
1105     LUID luid;
1106
1107     if (!OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES, &hToken))
1108         return FALSE;
1109
1110     if(!LookupPrivilegeValue(NULL, privilege, &luid))
1111     {
1112         CloseHandle(hToken);
1113         return FALSE;
1114     }
1115
1116     tp.PrivilegeCount = 1;
1117     tp.Privileges[0].Luid = luid;
1118
1119     if (set)
1120         tp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
1121     else
1122         tp.Privileges[0].Attributes = 0;
1123
1124     AdjustTokenPrivileges(hToken, FALSE, &tp, sizeof(TOKEN_PRIVILEGES), NULL, NULL);
1125     if (GetLastError() != ERROR_SUCCESS)
1126     {
1127         CloseHandle(hToken);
1128         return FALSE;
1129     }
1130
1131     CloseHandle(hToken);
1132     return TRUE;
1133 }
1134
1135 /* tests that show that RegConnectRegistry and
1136    OpenSCManager accept computer names without the
1137    \\ prefix (what MSDN says).   */
1138 static void test_regconnectregistry( void)
1139 {
1140     CHAR compName[MAX_COMPUTERNAME_LENGTH + 1];
1141     CHAR netwName[MAX_COMPUTERNAME_LENGTH + 3]; /* 2 chars for double backslash */
1142     DWORD len = sizeof(compName) ;
1143     BOOL ret;
1144     LONG retl;
1145     HKEY hkey;
1146     SC_HANDLE schnd;
1147
1148     SetLastError(0xdeadbeef);
1149     ret = GetComputerNameA(compName, &len);
1150     ok( ret, "GetComputerName failed err = %d\n", GetLastError());
1151     if( !ret) return;
1152
1153     lstrcpyA(netwName, "\\\\");
1154     lstrcpynA(netwName+2, compName, MAX_COMPUTERNAME_LENGTH + 1);
1155
1156     retl = RegConnectRegistryA( compName, HKEY_LOCAL_MACHINE, &hkey);
1157     ok( !retl ||
1158         retl == ERROR_DLL_INIT_FAILED ||
1159         retl == ERROR_BAD_NETPATH, /* some win2k */
1160         "RegConnectRegistryA failed err = %d\n", retl);
1161     if( !retl) RegCloseKey( hkey);
1162
1163     retl = RegConnectRegistryA( netwName, HKEY_LOCAL_MACHINE, &hkey);
1164     ok( !retl ||
1165         retl == ERROR_DLL_INIT_FAILED ||
1166         retl == ERROR_BAD_NETPATH, /* some win2k */
1167         "RegConnectRegistryA failed err = %d\n", retl);
1168     if( !retl) RegCloseKey( hkey);
1169
1170     SetLastError(0xdeadbeef);
1171     schnd = OpenSCManagerA( compName, NULL, GENERIC_READ);
1172     if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
1173     {
1174         win_skip("OpenSCManagerA is not implemented\n");
1175         return;
1176     }
1177
1178     ok( schnd != NULL, "OpenSCManagerA failed err = %d\n", GetLastError());
1179     CloseServiceHandle( schnd);
1180
1181     SetLastError(0xdeadbeef);
1182     schnd = OpenSCManagerA( netwName, NULL, GENERIC_READ);
1183     ok( schnd != NULL, "OpenSCManagerA failed err = %d\n", GetLastError());
1184     CloseServiceHandle( schnd);
1185
1186 }
1187
1188 static void test_reg_query_value(void)
1189 {
1190     HKEY subkey;
1191     CHAR val[MAX_PATH];
1192     WCHAR valW[5];
1193     LONG size, ret;
1194
1195     static const WCHAR expected[] = {'d','a','t','a',0};
1196
1197     ret = RegCreateKeyA(hkey_main, "subkey", &subkey);
1198     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1199
1200     ret = RegSetValueA(subkey, NULL, REG_SZ, "data", 4);
1201     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1202
1203     /* try an invalid hkey */
1204     SetLastError(0xdeadbeef);
1205     size = MAX_PATH;
1206     ret = RegQueryValueA((HKEY)0xcafebabe, "subkey", val, &size);
1207     ok(ret == ERROR_INVALID_HANDLE ||
1208        ret == ERROR_BADKEY || /* Windows 98 returns BADKEY */
1209        ret == ERROR_ACCESS_DENIED, /* non-admin winxp */
1210        "Expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %d\n", ret);
1211     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1212
1213     /* try a NULL hkey */
1214     SetLastError(0xdeadbeef);
1215     size = MAX_PATH;
1216     ret = RegQueryValueA(NULL, "subkey", val, &size);
1217     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_BADKEY, /* Windows 98 returns BADKEY */
1218        "Expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %d\n", ret);
1219     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1220
1221     /* try a NULL value */
1222     size = MAX_PATH;
1223     ret = RegQueryValueA(hkey_main, "subkey", NULL, &size);
1224     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1225     ok(size == 5, "Expected 5, got %d\n", size);
1226
1227     /* try a NULL size */
1228     SetLastError(0xdeadbeef);
1229     val[0] = '\0';
1230     ret = RegQueryValueA(hkey_main, "subkey", val, NULL);
1231     ok(ret == ERROR_INVALID_PARAMETER, "Expected ERROR_INVALID_PARAMETER, got %d\n", ret);
1232     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1233     ok(lstrlenA(val) == 0, "Expected val to be untouched, got %s\n", val);
1234
1235     /* try a NULL value and size */
1236     ret = RegQueryValueA(hkey_main, "subkey", NULL, NULL);
1237     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1238
1239     /* try a size too small */
1240     SetLastError(0xdeadbeef);
1241     val[0] = '\0';
1242     size = 1;
1243     ret = RegQueryValueA(hkey_main, "subkey", val, &size);
1244     ok(ret == ERROR_MORE_DATA, "Expected ERROR_MORE_DATA, got %d\n", ret);
1245     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1246     ok(lstrlenA(val) == 0, "Expected val to be untouched, got %s\n", val);
1247     ok(size == 5, "Expected 5, got %d\n", size);
1248
1249     /* successfully read the value using 'subkey' */
1250     size = MAX_PATH;
1251     ret = RegQueryValueA(hkey_main, "subkey", val, &size);
1252     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1253     ok(!lstrcmpA(val, "data"), "Expected 'data', got '%s'\n", val);
1254     ok(size == 5, "Expected 5, got %d\n", size);
1255
1256     /* successfully read the value using the subkey key */
1257     size = MAX_PATH;
1258     ret = RegQueryValueA(subkey, NULL, val, &size);
1259     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1260     ok(!lstrcmpA(val, "data"), "Expected 'data', got '%s'\n", val);
1261     ok(size == 5, "Expected 5, got %d\n", size);
1262
1263     /* unicode - try size too small */
1264     SetLastError(0xdeadbeef);
1265     valW[0] = '\0';
1266     size = 0;
1267     ret = RegQueryValueW(subkey, NULL, valW, &size);
1268     if (GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
1269     {
1270         win_skip("RegQueryValueW is not implemented\n");
1271         goto cleanup;
1272     }
1273     ok(ret == ERROR_MORE_DATA, "Expected ERROR_MORE_DATA, got %d\n", ret);
1274     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1275     ok(lstrlenW(valW) == 0, "Expected valW to be untouched\n");
1276     ok(size == sizeof(expected), "Got wrong size: %d\n", size);
1277
1278     /* unicode - try size in WCHARS */
1279     SetLastError(0xdeadbeef);
1280     size = sizeof(valW) / sizeof(WCHAR);
1281     ret = RegQueryValueW(subkey, NULL, valW, &size);
1282     ok(ret == ERROR_MORE_DATA, "Expected ERROR_MORE_DATA, got %d\n", ret);
1283     ok(GetLastError() == 0xdeadbeef, "Expected 0xdeadbeef, got %d\n", GetLastError());
1284     ok(lstrlenW(valW) == 0, "Expected valW to be untouched\n");
1285     ok(size == sizeof(expected), "Got wrong size: %d\n", size);
1286
1287     /* unicode - successfully read the value */
1288     size = sizeof(valW);
1289     ret = RegQueryValueW(subkey, NULL, valW, &size);
1290     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1291     ok(!lstrcmpW(valW, expected), "Got wrong value\n");
1292     ok(size == sizeof(expected), "Got wrong size: %d\n", size);
1293
1294     /* unicode - set the value without a NULL terminator */
1295     ret = RegSetValueW(subkey, NULL, REG_SZ, expected, sizeof(expected)-sizeof(WCHAR));
1296     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1297
1298     /* unicode - read the unterminated value, value is terminated for us */
1299     memset(valW, 'a', sizeof(valW));
1300     size = sizeof(valW);
1301     ret = RegQueryValueW(subkey, NULL, valW, &size);
1302     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1303     ok(!lstrcmpW(valW, expected), "Got wrong value\n");
1304     ok(size == sizeof(expected), "Got wrong size: %d\n", size);
1305
1306 cleanup:
1307     RegDeleteKeyA(subkey, "");
1308     RegCloseKey(subkey);
1309 }
1310
1311 static void test_reg_delete_tree(void)
1312 {
1313     CHAR buffer[MAX_PATH];
1314     HKEY subkey, subkey2;
1315     LONG size, ret;
1316
1317     if(!pRegDeleteTreeA) {
1318         win_skip("Skipping RegDeleteTreeA tests, function not present\n");
1319         return;
1320     }
1321
1322     ret = RegCreateKeyA(hkey_main, "subkey", &subkey);
1323     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1324     ret = RegCreateKeyA(subkey, "subkey2", &subkey2);
1325     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1326     ret = RegSetValueA(subkey, NULL, REG_SZ, "data", 4);
1327     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1328     ret = RegSetValueA(subkey2, NULL, REG_SZ, "data2", 5);
1329     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1330     ret = RegCloseKey(subkey2);
1331     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1332
1333     ret = pRegDeleteTreeA(subkey, "subkey2");
1334     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1335     ok(RegOpenKeyA(subkey, "subkey2", &subkey2),
1336         "subkey2 was not deleted\n");
1337     size = MAX_PATH;
1338     ok(!RegQueryValueA(subkey, NULL, buffer, &size),
1339         "Default value of subkey not longer present\n");
1340
1341     ret = RegCreateKeyA(subkey, "subkey2", &subkey2);
1342     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1343     ret = RegCloseKey(subkey2);
1344     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1345     ret = pRegDeleteTreeA(hkey_main, "subkey\\subkey2");
1346     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1347     ok(RegOpenKeyA(subkey, "subkey2", &subkey2),
1348         "subkey2 was not deleted\n");
1349     ok(!RegQueryValueA(subkey, NULL, buffer, &size),
1350         "Default value of subkey not longer present\n");
1351
1352     ret = RegCreateKeyA(subkey, "subkey2", &subkey2);
1353     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1354     ret = RegCloseKey(subkey2);
1355     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1356     ret = RegCreateKeyA(subkey, "subkey3", &subkey2);
1357     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1358     ret = RegCloseKey(subkey2);
1359     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1360     ret = RegSetValueA(subkey, "value", REG_SZ, "data2", 5);
1361     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1362     ret = pRegDeleteTreeA(subkey, NULL);
1363     ok(ret == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", ret);
1364     ok(!RegOpenKeyA(hkey_main, "subkey", &subkey),
1365         "subkey was deleted\n");
1366     ok(RegOpenKeyA(subkey, "subkey2", &subkey2),
1367         "subkey2 was not deleted\n");
1368     ok(RegOpenKeyA(subkey, "subkey3", &subkey2),
1369         "subkey3 was not deleted\n");
1370     size = MAX_PATH;
1371     ret = RegQueryValueA(subkey, NULL, buffer, &size);
1372     ok(ret == ERROR_SUCCESS,
1373         "Default value of subkey is not present\n");
1374     ok(!lstrlenA(buffer),
1375         "Expected length 0 got length %u(%s)\n", lstrlenA(buffer), buffer);
1376     size = MAX_PATH;
1377     ok(RegQueryValueA(subkey, "value", buffer, &size),
1378         "Value is still present\n");
1379
1380     ret = pRegDeleteTreeA(hkey_main, "not-here");
1381     ok(ret == ERROR_FILE_NOT_FOUND,
1382         "Expected ERROR_FILE_NOT_FOUND, got %d\n", ret);
1383 }
1384
1385 START_TEST(registry)
1386 {
1387     /* Load pointers for functions that are not available in all Windows versions */
1388     InitFunctionPtrs();
1389
1390     setup_main_key();
1391     test_set_value();
1392     create_test_entries();
1393     test_enum_value();
1394     test_query_value_ex();
1395     test_get_value();
1396     test_reg_open_key();
1397     test_reg_create_key();
1398     test_reg_close_key();
1399     test_reg_delete_key();
1400     test_reg_query_value();
1401
1402     /* SaveKey/LoadKey require the SE_BACKUP_NAME privilege to be set */
1403     if (set_privileges(SE_BACKUP_NAME, TRUE) &&
1404         set_privileges(SE_RESTORE_NAME, TRUE))
1405     {
1406         test_reg_save_key();
1407         test_reg_load_key();
1408         test_reg_unload_key();
1409
1410         set_privileges(SE_BACKUP_NAME, FALSE);
1411         set_privileges(SE_RESTORE_NAME, FALSE);
1412     }
1413
1414     test_reg_delete_tree();
1415
1416     /* cleanup */
1417     delete_key( hkey_main );
1418
1419     test_regconnectregistry();
1420 }