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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  */
  20
  21 #include <assert.h>
  22 #include <stdarg.h>
  23 #include "wine/test.h"
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winreg.h"
  27 #include "winerror.h"
  28
  29 static HKEY hkey_main;
  30
  31 static const char * sTestpath1 = "%LONGSYSTEMVAR%\\subdir1";
  32 static const char * sTestpath2 = "%FOO%\\subdir1";
  33
  34 /* delete key and all its subkeys */
  35 static DWORD delete_key( HKEY hkey )
  36 {
  37     char name[MAX_PATH];
  38     DWORD ret;
  39
  40     while (!(ret = RegEnumKeyA(hkey, 0, name, sizeof(name))))
  41     {
  42         HKEY tmp;
  43         if (!(ret = RegOpenKeyExA( hkey, name, 0, KEY_ENUMERATE_SUB_KEYS, &tmp )))
  44         {
  45             ret = delete_key( tmp );
  46             RegCloseKey( tmp );
  47         }
  48         if (ret) break;
  49     }
  50     if (ret != ERROR_NO_MORE_ITEMS) return ret;
  51     RegDeleteKeyA( hkey, "" );
  52     return 0;
  53 }
  54
  55 static void setup_main_key(void)
  56 {
  57     if (RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkey_main )) delete_key( hkey_main );
  58
  59     assert (!RegCreateKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkey_main ));
  60 }
  61
  62 static void create_test_entries(void)
  63 {
  64     DWORD qw[2] = { 0x12345678, 0x87654321 };
  65
  66     SetEnvironmentVariableA("LONGSYSTEMVAR", "bar");
  67     SetEnvironmentVariableA("FOO", "ImARatherLongButIndeedNeededString");
  68
  69     ok(!RegSetValueExA(hkey_main,"Test1",0,REG_EXPAND_SZ, sTestpath1, strlen(sTestpath1)+1),
  70         "RegSetValueExA failed\n");
  71     ok(!RegSetValueExA(hkey_main,"Test2",0,REG_SZ, sTestpath1, strlen(sTestpath1)+1),
  72         "RegSetValueExA failed\n");
  73     ok(!RegSetValueExA(hkey_main,"Test3",0,REG_EXPAND_SZ, sTestpath2, strlen(sTestpath2)+1),
  74         "RegSetValueExA failed\n");
  75     ok(!RegSetValueExA(hkey_main,"DWORD",0,REG_DWORD, (PVOID)qw, 4),
  76         "RegSetValueExA failed\n");
  77     ok(!RegSetValueExA(hkey_main,"BIN32",0,REG_BINARY, (PVOID)qw, 4),
  78         "RegSetValueExA failed\n");
  79     ok(!RegSetValueExA(hkey_main,"BIN64",0,REG_BINARY, (PVOID)qw, 8),
  80         "RegSetValueExA failed\n");
  81 }
  82
  83 static void test_enum_value(void)
  84 {
  85     DWORD res;
  86     HKEY test_key;
  87     char value[20], data[20];
  88     WCHAR valueW[20], dataW[20];
  89     DWORD val_count, data_count, type;
  90     static const WCHAR foobarW[] = {'f','o','o','b','a','r',0};
  91     static const WCHAR testW[] = {'T','e','s','t',0};
  92     static const WCHAR xxxW[] = {'x','x','x','x','x','x','x','x',0};
  93
  94     /* create the working key for new 'Test' value */
  95     res = RegCreateKeyA( hkey_main, "TestKey", &test_key );
  96     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", res);
  97
  98     /* check NULL data with zero length */
  99     res = RegSetValueExA( test_key, "Test", 0, REG_SZ, NULL, 0 );
 100     if (GetVersion() & 0x80000000)
 101         ok( res == ERROR_INVALID_PARAMETER, "RegSetValueExA returned %ld\n", res );
 102     else
 103         ok( !res, "RegSetValueExA returned %ld\n", res );
 104     res = RegSetValueExA( test_key, "Test", 0, REG_EXPAND_SZ, NULL, 0 );
 105     ok( ERROR_SUCCESS == res || ERROR_INVALID_PARAMETER == res, "RegSetValueExA returned %ld\n", res );
 106     res = RegSetValueExA( test_key, "Test", 0, REG_BINARY, NULL, 0 );
 107     ok( ERROR_SUCCESS == res || ERROR_INVALID_PARAMETER == res, "RegSetValueExA returned %ld\n", res );
 108
 109     res = RegSetValueExA( test_key, "Test", 0, REG_SZ, (BYTE *)"foobar", 7 );
 110     ok( res == 0, "RegSetValueExA failed error %ld\n", res );
 111
 112     /* overflow both name and data */
 113     val_count = 2;
 114     data_count = 2;
 115     type = 1234;
 116     strcpy( value, "xxxxxxxxxx" );
 117     strcpy( data, "xxxxxxxxxx" );
 118     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, data, &data_count );
 119     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 120     ok( val_count == 2, "val_count set to %ld\n", val_count );
 121     ok( data_count == 7, "data_count set to %ld instead of 7\n", data_count );
 122     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 123     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 124     ok( !strcmp( data, "xxxxxxxxxx" ), "data set to '%s'\n", data );
 125
 126     /* overflow name */
 127     val_count = 3;
 128     data_count = 20;
 129     type = 1234;
 130     strcpy( value, "xxxxxxxxxx" );
 131     strcpy( data, "xxxxxxxxxx" );
 132     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, data, &data_count );
 133     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 134     /* Win9x returns 2 as specified by MSDN but NT returns 3... */
 135     ok( val_count == 2 || val_count == 3, "val_count set to %ld\n", val_count );
 136     ok( data_count == 7, "data_count set to %ld instead of 7\n", data_count );
 137     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 138 #if 0
 139     /* v5.1.2600.0 (XP Home) does not touch value or data in this case */
 140     ok( !strcmp( value, "Te" ), "value set to '%s' instead of 'Te'\n", value );
 141     ok( !strcmp( data, "foobar" ), "data set to '%s' instead of 'foobar'\n", data );
 142 #endif
 143
 144     /* overflow empty name */
 145     val_count = 0;
 146     data_count = 20;
 147     type = 1234;
 148     strcpy( value, "xxxxxxxxxx" );
 149     strcpy( data, "xxxxxxxxxx" );
 150     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, data, &data_count );
 151     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 152     ok( val_count == 0, "val_count set to %ld\n", val_count );
 153     ok( data_count == 7, "data_count set to %ld instead of 7\n", data_count );
 154     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 155     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 156 #if 0
 157     /* v5.1.2600.0 (XP Home) does not touch data in this case */
 158     ok( !strcmp( data, "foobar" ), "data set to '%s' instead of 'foobar'\n", data );
 159 #endif
 160
 161     /* overflow data */
 162     val_count = 20;
 163     data_count = 2;
 164     type = 1234;
 165     strcpy( value, "xxxxxxxxxx" );
 166     strcpy( data, "xxxxxxxxxx" );
 167     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, data, &data_count );
 168     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 169     ok( val_count == 20, "val_count set to %ld\n", val_count );
 170     ok( data_count == 7, "data_count set to %ld instead of 7\n", data_count );
 171     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 172     ok( !strcmp( value, "xxxxxxxxxx" ), "value set to '%s'\n", value );
 173     ok( !strcmp( data, "xxxxxxxxxx" ), "data set to '%s'\n", data );
 174
 175     /* no overflow */
 176     val_count = 20;
 177     data_count = 20;
 178     type = 1234;
 179     strcpy( value, "xxxxxxxxxx" );
 180     strcpy( data, "xxxxxxxxxx" );
 181     res = RegEnumValueA( test_key, 0, value, &val_count, NULL, &type, data, &data_count );
 182     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", res );
 183     ok( val_count == 4, "val_count set to %ld instead of 4\n", val_count );
 184     ok( data_count == 7, "data_count set to %ld instead of 7\n", data_count );
 185     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 186     ok( !strcmp( value, "Test" ), "value is '%s' instead of Test\n", value );
 187     ok( !strcmp( data, "foobar" ), "data is '%s' instead of foobar\n", data );
 188
 189     /* Unicode tests */
 190
 191     SetLastError(0);
 192     res = RegSetValueExW( test_key, testW, 0, REG_SZ, (const BYTE *)foobarW, 7*sizeof(WCHAR) );
 193     if (res==0 && GetLastError()==ERROR_CALL_NOT_IMPLEMENTED)
 194         return;
 195     ok( res == 0, "RegSetValueExW failed error %ld\n", res );
 196
 197     /* overflow both name and data */
 198     val_count = 2;
 199     data_count = 2;
 200     type = 1234;
 201     memcpy( valueW, xxxW, sizeof(xxxW) );
 202     memcpy( dataW, xxxW, sizeof(xxxW) );
 203     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 204     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 205     ok( val_count == 2, "val_count set to %ld\n", val_count );
 206     ok( data_count == 7*sizeof(WCHAR), "data_count set to %ld instead of 7*sizeof(WCHAR)\n", data_count );
 207     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 208     ok( !memcmp( valueW, xxxW, sizeof(xxxW) ), "value modified\n" );
 209     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 210
 211     /* overflow name */
 212     val_count = 3;
 213     data_count = 20;
 214     type = 1234;
 215     memcpy( valueW, xxxW, sizeof(xxxW) );
 216     memcpy( dataW, xxxW, sizeof(xxxW) );
 217     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 218     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 219     ok( val_count == 3, "val_count set to %ld\n", val_count );
 220     ok( data_count == 7*sizeof(WCHAR), "data_count set to %ld instead of 7*sizeof(WCHAR)\n", data_count );
 221     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 222     ok( !memcmp( valueW, xxxW, sizeof(xxxW) ), "value modified\n" );
 223     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 224
 225     /* overflow data */
 226     val_count = 20;
 227     data_count = 2;
 228     type = 1234;
 229     memcpy( valueW, xxxW, sizeof(xxxW) );
 230     memcpy( dataW, xxxW, sizeof(xxxW) );
 231     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 232     ok( res == ERROR_MORE_DATA, "expected ERROR_MORE_DATA, got %ld\n", res );
 233     ok( val_count == 4, "val_count set to %ld instead of 4\n", val_count );
 234     ok( data_count == 7*sizeof(WCHAR), "data_count set to %ld instead of 7*sizeof(WCHAR)\n", data_count );
 235     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 236     ok( !memcmp( valueW, testW, sizeof(testW) ), "value is not 'Test'\n" );
 237     ok( !memcmp( dataW, xxxW, sizeof(xxxW) ), "data modified\n" );
 238
 239     /* no overflow */
 240     val_count = 20;
 241     data_count = 20;
 242     type = 1234;
 243     memcpy( valueW, xxxW, sizeof(xxxW) );
 244     memcpy( dataW, xxxW, sizeof(xxxW) );
 245     res = RegEnumValueW( test_key, 0, valueW, &val_count, NULL, &type, (BYTE*)dataW, &data_count );
 246     ok( res == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", res );
 247     ok( val_count == 4, "val_count set to %ld instead of 4\n", val_count );
 248     ok( data_count == 7*sizeof(WCHAR), "data_count set to %ld instead of 7*sizeof(WCHAR)\n", data_count );
 249     ok( type == REG_SZ, "type %ld is not REG_SZ\n", type );
 250     ok( !memcmp( valueW, testW, sizeof(testW) ), "value is not 'Test'\n" );
 251     ok( !memcmp( dataW, foobarW, sizeof(foobarW) ), "data is not 'foobar'\n" );
 252 }
 253
 254 static void test_query_value_ex(void)
 255 {
 256     DWORD ret;
 257     DWORD size;
 258     DWORD type;
 259
 260     ret = RegQueryValueExA(hkey_main, "Test2", NULL, &type, NULL, &size);
 261     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 262     ok(size == strlen(sTestpath1) + 1, "(%ld,%ld)\n", (DWORD)strlen(sTestpath1) + 1, size);
 263     ok(type == REG_SZ, "type %ld is not REG_SZ\n", type);
 264 }
 265
 266 static void test_get_value(void)
 267 {
 268     HMODULE hadvapi32;
 269     DWORD (WINAPI *pRegGetValueA)(HKEY,LPCSTR,LPCSTR,DWORD,LPDWORD,PVOID,LPDWORD);
 270
 271     DWORD ret;
 272     DWORD size;
 273     DWORD type;
 274     DWORD dw, qw[2];
 275     CHAR buf[80];
 276     CHAR expanded[] = "bar\\subdir1";
 277
 278     /* This function was introduced with Windows 2003 SP1 */
 279     hadvapi32 = LoadLibraryA("advapi32.dll");
 280     if(!hadvapi32)
 281     {
 282         ok(0, "error=%ld\n", GetLastError());
 283         return;
 284     }
 285     pRegGetValueA = (PVOID)GetProcAddress(hadvapi32, "RegGetValueA");
 286     if(!pRegGetValueA)
 287         return;
 288
 289     /* Query REG_DWORD using RRF_RT_REG_DWORD (ok) */
 290     size = type = dw = 0xdeadbeef;
 291     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_DWORD, &type, &dw, &size);
 292     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 293     ok(size == 4, "size=%ld\n", size);
 294     ok(type == REG_DWORD, "type=%ld\n", type);
 295     ok(dw == 0x12345678, "dw=%ld\n", dw);
 296
 297     /* Query by subkey-name */
 298     ret = pRegGetValueA(HKEY_CURRENT_USER, "Software\\Wine\\Test", "DWORD", RRF_RT_REG_DWORD, NULL, NULL, NULL);
 299     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 300
 301     /* Query REG_DWORD using RRF_RT_REG_BINARY (restricted) */
 302     size = type = dw = 0xdeadbeef;
 303     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_BINARY, &type, &dw, &size);
 304     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%ld\n", ret);
 305     /* Although the function failed all values are retrieved */
 306     ok(size == 4, "size=%ld\n", size);
 307     ok(type == REG_DWORD, "type=%ld\n", type);
 308     ok(dw == 0x12345678, "dw=%ld\n", dw);
 309
 310     /* Test RRF_ZEROONFAILURE */
 311     type = dw = 0xdeadbeef; size = 4;
 312     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_REG_SZ|RRF_ZEROONFAILURE, &type, &dw, &size);
 313     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%ld\n", ret);
 314     /* Again all values are retrieved ... */
 315     ok(size == 4, "size=%ld\n", size);
 316     ok(type == REG_DWORD, "type=%ld\n", type);
 317     /* ... except the buffer, which is zeroed out */
 318     ok(dw == 0, "dw=%ld\n", dw);
 319
 320     /* Query REG_DWORD using RRF_RT_DWORD (ok) */
 321     size = type = dw = 0xdeadbeef;
 322     ret = pRegGetValueA(hkey_main, NULL, "DWORD", RRF_RT_DWORD, &type, &dw, &size);
 323     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 324     ok(size == 4, "size=%ld\n", size);
 325     ok(type == REG_DWORD, "type=%ld\n", type);
 326     ok(dw == 0x12345678, "dw=%ld\n", dw);
 327
 328     /* Query 32-bit REG_BINARY using RRF_RT_DWORD (ok) */
 329     size = type = dw = 0xdeadbeef;
 330     ret = pRegGetValueA(hkey_main, NULL, "BIN32", RRF_RT_DWORD, &type, &dw, &size);
 331     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 332     ok(size == 4, "size=%ld\n", size);
 333     ok(type == REG_BINARY, "type=%ld\n", type);
 334     ok(dw == 0x12345678, "dw=%ld\n", dw);
 335
 336     /* Query 64-bit REG_BINARY using RRF_RT_DWORD (type mismatch) */
 337     qw[0] = qw[1] = size = type = 0xdeadbeef;
 338     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_DWORD, &type, qw, &size);
 339     ok(ret == ERROR_DATATYPE_MISMATCH, "ret=%ld\n", ret);
 340     ok(size == 8, "size=%ld\n", size);
 341     ok(type == REG_BINARY, "type=%ld\n", type);
 342     ok(qw[0] == 0x12345678 &&
 343        qw[1] == 0x87654321, "qw={%ld,%ld}\n", qw[0], qw[1]);
 344
 345     /* Query 64-bit REG_BINARY using 32-bit buffer (buffer too small) */
 346     type = dw = 0xdeadbeef; size = 4;
 347     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_REG_BINARY, &type, &dw, &size);
 348     ok(ret == ERROR_MORE_DATA, "ret=%ld\n", ret);
 349     ok(dw == 0xdeadbeef, "dw=%ld\n", dw);
 350     ok(size == 8, "size=%ld\n", size);
 351
 352     /* Query 64-bit REG_BINARY using RRF_RT_QWORD (ok) */
 353     qw[0] = qw[1] = size = type = 0xdeadbeef;
 354     ret = pRegGetValueA(hkey_main, NULL, "BIN64", RRF_RT_QWORD, &type, qw, &size);
 355     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 356     ok(size == 8, "size=%ld\n", size);
 357     ok(type == REG_BINARY, "type=%ld\n", type);
 358     ok(qw[0] == 0x12345678 &&
 359        qw[1] == 0x87654321, "qw={%ld,%ld}\n", qw[0], qw[1]);
 360
 361     /* This silly behaviour is not documented but since expanding REG_EXPAND_SZ
 362      * values is one the two major features (with type restrictions being the
 363      * other one) of this function and it doesn't work as one might expect we
 364      * better test it... */
 365
 366     /* RRF_RT_REG_EXPAND_SZ without RRF_NOEXPAND is not allowed */
 367     ret = pRegGetValueA(hkey_main, NULL, "Test1", RRF_RT_REG_EXPAND_SZ, NULL, NULL, NULL);
 368     ok(ret == ERROR_INVALID_PARAMETER, "ret=%ld\n", ret);
 369     /* Instead you have to use RRF_RT_REG_SZ to expand a REG_EXPAND_SZ */
 370     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 371     ret = pRegGetValueA(hkey_main, NULL, "Test1", RRF_RT_REG_SZ, &type, buf, &size);
 372     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 373 #if 0
 374     /* At least v5.2.3790.1830 (2003 SP1) returns the unexpanded length + 1 here. */
 375     ok(size == strlen(expanded)+1, "strlen(expanded)=%ld size=%ld\n", strlen(expanded), size);
 376 #endif
 377     ok(type == REG_SZ, "type=%ld\n", type);
 378     ok(!strcmp(expanded, buf), "expanded=\"%s\" buf=\"%s\"\n", expanded, buf);
 379
 380     /* Query REG_SZ using RRF_RT_REG_SZ (should not expand it) */
 381     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 382     ret = pRegGetValueA(hkey_main, NULL, "Test2", RRF_RT_REG_SZ, &type, buf, &size);
 383     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 384     ok(size == strlen(sTestpath1)+1, "strlen(sTestpath1)=%d size=%ld\n", strlen(sTestpath1), size);
 385     ok(type == REG_SZ, "type=%ld\n", type);
 386     ok(!strcmp(sTestpath1, buf), "sTestpath=\"%s\" buf=\"%s\"\n", sTestpath1, buf);
 387
 388     /* With RRF_RT_REG_SZ however, RRF_NOEXPAND is not allowed */
 389     ret = pRegGetValueA(hkey_main, NULL, "Test1", RRF_RT_REG_SZ|RRF_NOEXPAND, NULL, NULL, NULL);
 390     ok(ret == ERROR_UNSUPPORTED_TYPE, "ret=%ld\n", ret);
 391     /* So we use RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND to get the unexpanded REG_EXPAND_SZ */
 392     buf[0] = 0; type = 0xdeadbeef; size = sizeof(buf);
 393     ret = pRegGetValueA(hkey_main, NULL, "Test1", RRF_RT_REG_EXPAND_SZ|RRF_NOEXPAND, &type, buf, &size);
 394     ok(ret == ERROR_SUCCESS, "ret=%ld\n", ret);
 395     ok(size == strlen(sTestpath1)+1, "strlen(sTestpath1)=%d size=%ld\n", strlen(sTestpath1), size);
 396     ok(type == REG_EXPAND_SZ, "type=%ld\n", type);
 397     ok(!strcmp(sTestpath1, buf), "sTestpath=\"%s\" buf=\"%s\"\n", sTestpath1, buf);
 398 }
 399
 400 static void test_reg_open_key(void)
 401 {
 402     DWORD ret = 0;
 403     HKEY hkResult = NULL;
 404     HKEY hkPreserve = NULL;
 405
 406     /* successful open */
 407     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkResult);
 408     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 409     ok(hkResult != NULL, "expected hkResult != NULL\n");
 410     hkPreserve = hkResult;
 411
 412     /* these tests fail on Win9x, but we want to be compatible with NT, so
 413      * run them if we can */
 414     if (!(GetVersion() & 0x80000000))
 415     {
 416         /* open same key twice */
 417         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkResult);
 418         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 419         ok(hkResult != hkPreserve, "epxected hkResult != hkPreserve\n");
 420         ok(hkResult != NULL, "hkResult != NULL\n");
 421         RegCloseKey(hkResult);
 422
 423         /* open nonexistent key
 424         * check that hkResult is set to NULL
 425         */
 426         hkResult = hkPreserve;
 427         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Nonexistent", &hkResult);
 428         ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %ld\n", ret);
 429         ok(hkResult == NULL, "expected hkResult == NULL\n");
 430
 431         /* open the same nonexistent key again to make sure the key wasn't created */
 432         hkResult = hkPreserve;
 433         ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Nonexistent", &hkResult);
 434         ok(ret == ERROR_FILE_NOT_FOUND, "expected ERROR_FILE_NOT_FOUND, got %ld\n", ret);
 435         ok(hkResult == NULL, "expected hkResult == NULL\n");
 436
 437         /* send in NULL lpSubKey
 438         * check that hkResult receives the value of hKey
 439         */
 440         hkResult = hkPreserve;
 441         ret = RegOpenKeyA(HKEY_CURRENT_USER, NULL, &hkResult);
 442         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 443         ok(hkResult == HKEY_CURRENT_USER, "expected hkResult == HKEY_CURRENT_USER\n");
 444
 445         /* send empty-string in lpSubKey */
 446         hkResult = hkPreserve;
 447         ret = RegOpenKeyA(HKEY_CURRENT_USER, "", &hkResult);
 448         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 449         ok(hkResult == HKEY_CURRENT_USER, "expected hkResult == HKEY_CURRENT_USER\n");
 450
 451         /* send in NULL lpSubKey and NULL hKey
 452         * hkResult is set to NULL
 453         */
 454         hkResult = hkPreserve;
 455         ret = RegOpenKeyA(NULL, NULL, &hkResult);
 456         ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 457         ok(hkResult == NULL, "expected hkResult == NULL\n");
 458     }
 459
 460     /* only send NULL hKey
 461      * the value of hkResult remains unchanged
 462      */
 463     hkResult = hkPreserve;
 464     ret = RegOpenKeyA(NULL, "Software\\Wine\\Test", &hkResult);
 465     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_BADKEY, /* Windows 95 returns BADKEY */
 466        "expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %ld\n", ret);
 467     ok(hkResult == hkPreserve, "expected hkResult == hkPreserve\n");
 468     RegCloseKey(hkResult);
 469
 470     /* send in NULL hkResult */
 471     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", NULL);
 472     ok(ret == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %ld\n", ret);
 473 }
 474
 475 static void test_reg_create_key(void)
 476 {
 477     LONG ret;
 478     HKEY hkey1, hkey2;
 479     ret = RegCreateKeyExA(hkey_main, "Subkey1", 0, NULL, 0, KEY_NOTIFY, NULL, &hkey1, NULL);
 480     ok(!ret, "RegCreateKeyExA failed with error %ld\n", ret);
 481     /* should succeed: all versions of Windows ignore the access rights
 482      * to the parent handle */
 483     ret = RegCreateKeyExA(hkey1, "Subkey2", 0, NULL, 0, KEY_SET_VALUE, NULL, &hkey2, NULL);
 484     ok(!ret, "RegCreateKeyExA failed with error %ld\n", ret);
 485
 486     /* clean up */
 487     RegDeleteKey(hkey2, NULL);
 488     RegDeleteKey(hkey1, NULL);
 489 }
 490
 491 static void test_reg_close_key(void)
 492 {
 493     DWORD ret = 0;
 494     HKEY hkHandle;
 495
 496     /* successfully close key
 497      * hkHandle remains changed after call to RegCloseKey
 498      */
 499     ret = RegOpenKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hkHandle);
 500     ret = RegCloseKey(hkHandle);
 501     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 502
 503     /* try to close the key twice */
 504     ret = RegCloseKey(hkHandle); /* Windows 95 doesn't mind. */
 505     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_SUCCESS,
 506        "expected ERROR_INVALID_HANDLE or ERROR_SUCCESS, got %ld\n", ret);
 507
 508     /* try to close a NULL handle */
 509     ret = RegCloseKey(NULL);
 510     ok(ret == ERROR_INVALID_HANDLE || ret == ERROR_BADKEY, /* Windows 95 returns BADKEY */
 511        "expected ERROR_INVALID_HANDLE or ERROR_BADKEY, got %ld\n", ret);
 512 }
 513
 514 static void test_reg_delete_key(void)
 515 {
 516     DWORD ret;
 517
 518     ret = RegDeleteKey(hkey_main, NULL);
 519     ok(ret == ERROR_INVALID_PARAMETER || ret == ERROR_ACCESS_DENIED,
 520        "expected ERROR_INVALID_PARAMETER or ERROR_ACCESS_DENIED, got %ld\n", ret);
 521 }
 522
 523 static void test_reg_save_key(void)
 524 {
 525     DWORD ret;
 526
 527     ret = RegSaveKey(hkey_main, "saved_key", NULL);
 528     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 529 }
 530
 531 static void test_reg_load_key(void)
 532 {
 533     DWORD ret;
 534     HKEY hkHandle;
 535
 536     ret = RegLoadKey(HKEY_LOCAL_MACHINE, "Test", "saved_key");
 537     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 538
 539     ret = RegOpenKey(HKEY_LOCAL_MACHINE, "Test", &hkHandle);
 540     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 541
 542     RegCloseKey(hkHandle);
 543 }
 544
 545 static void test_reg_unload_key(void)
 546 {
 547     DWORD ret;
 548
 549     ret = RegUnLoadKey(HKEY_LOCAL_MACHINE, "Test");
 550     ok(ret == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %ld\n", ret);
 551
 552     DeleteFile("saved_key");
 553 }
 554
 555 static BOOL set_privileges(LPCSTR privilege, BOOL set)
 556 {
 557     TOKEN_PRIVILEGES tp;
 558     HANDLE hToken;
 559     LUID luid;
 560
 561     if (!OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES, &hToken))
 562         return FALSE;
 563
 564     if(!LookupPrivilegeValue(NULL, privilege, &luid))
 565     {
 566         CloseHandle(hToken);
 567         return FALSE;
 568     }
 569
 570     tp.PrivilegeCount = 1;
 571     tp.Privileges[0].Luid = luid;
 572
 573     if (set)
 574         tp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
 575     else
 576         tp.Privileges[0].Attributes = 0;
 577
 578     AdjustTokenPrivileges(hToken, FALSE, &tp, sizeof(TOKEN_PRIVILEGES), NULL, NULL);
 579     if (GetLastError() != ERROR_SUCCESS)
 580     {
 581         CloseHandle(hToken);
 582         return FALSE;
 583     }
 584
 585     CloseHandle(hToken);
 586     return TRUE;
 587 }
 588
 589 START_TEST(registry)
 590 {
 591     setup_main_key();
 592     create_test_entries();
 593     test_enum_value();
 594     test_query_value_ex();
 595     test_get_value();
 596     test_reg_open_key();
 597     test_reg_create_key();
 598     test_reg_close_key();
 599     test_reg_delete_key();
 600
 601     /* SaveKey/LoadKey require the SE_BACKUP_NAME privilege to be set */
 602     if (set_privileges(SE_BACKUP_NAME, TRUE) &&
 603         set_privileges(SE_RESTORE_NAME, TRUE))
 604     {
 605         test_reg_save_key();
 606         test_reg_load_key();
 607         test_reg_unload_key();
 608
 609         set_privileges(SE_BACKUP_NAME, FALSE);
 610         set_privileges(SE_RESTORE_NAME, FALSE);
 611     }
 612
 613     /* cleanup */
 614     delete_key( hkey_main );
 615 }