2 Unix SMB/CIFS implementation.
4 local testing of registry library - hives
6 Copyright (C) Jelmer Vernooij 2005-2007
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include "lib/registry/registry.h"
25 #include "torture/torture.h"
26 #include "librpc/gen_ndr/winreg.h"
27 #include "system/filesys.h"
28 #include "param/param.h"
29 #include "libcli/security/security.h"
31 static bool test_del_nonexistant_key(struct torture_context *tctx,
32 const void *test_data)
34 const struct hive_key *root = (const struct hive_key *)test_data;
35 WERROR error = hive_key_del(root, "bla");
36 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
37 "invalid return code");
42 static bool test_keyinfo_root(struct torture_context *tctx,
43 const void *test_data)
45 uint32_t num_subkeys, num_values;
46 const struct hive_key *root = (const struct hive_key *)test_data;
49 /* This is a new backend. There should be no subkeys and no
51 error = hive_key_get_info(tctx, root, NULL, &num_subkeys, &num_values,
52 NULL, NULL, NULL, NULL);
53 torture_assert_werr_ok(tctx, error, "reg_key_num_subkeys()");
55 torture_assert_int_equal(tctx, num_subkeys, 0,
56 "New key has non-zero subkey count");
58 torture_assert_werr_ok(tctx, error, "reg_key_num_values");
60 torture_assert_int_equal(tctx, num_values, 0,
61 "New key has non-zero value count");
66 static bool test_keyinfo_nums(struct torture_context *tctx, void *test_data)
68 uint32_t num_subkeys, num_values;
69 struct hive_key *root = (struct hive_key *)test_data;
71 struct hive_key *subkey;
74 error = hive_key_add_name(tctx, root, "Nested Keyll", NULL,
76 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
78 error = hive_key_set_value(root, "Answer", REG_DWORD,
79 data_blob_talloc(tctx, &data, sizeof(data)));
80 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
82 /* This is a new backend. There should be no subkeys and no
84 error = hive_key_get_info(tctx, root, NULL, &num_subkeys, &num_values,
85 NULL, NULL, NULL, NULL);
86 torture_assert_werr_ok(tctx, error, "reg_key_num_subkeys()");
88 torture_assert_int_equal(tctx, num_subkeys, 1, "subkey count");
90 torture_assert_werr_ok(tctx, error, "reg_key_num_values");
92 torture_assert_int_equal(tctx, num_values, 1, "value count");
97 static bool test_add_subkey(struct torture_context *tctx,
98 const void *test_data)
101 struct hive_key *subkey;
102 const struct hive_key *root = (const struct hive_key *)test_data;
103 TALLOC_CTX *mem_ctx = tctx;
105 error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
107 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
109 error = hive_key_del(root, "Nested Key");
110 torture_assert_werr_ok(tctx, error, "reg_key_del");
115 static bool test_del_recursive(struct torture_context *tctx,
116 const void *test_data)
119 struct hive_key *subkey;
120 struct hive_key *subkey2;
121 const struct hive_key *root = (const struct hive_key *)test_data;
122 TALLOC_CTX *mem_ctx = tctx;
125 /* Create a new key under the root */
126 error = hive_key_add_name(mem_ctx, root, "Parent Key", NULL,
128 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
130 /* Create a new key under "Parent Key" */
131 error = hive_key_add_name(mem_ctx, subkey, "Child Key", NULL,
133 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
135 /* Create a new value under "Child Key" */
136 error = hive_key_set_value(subkey2, "Answer Recursive", REG_DWORD,
137 data_blob_talloc(mem_ctx, &data, sizeof(data)));
138 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
140 /* Deleting "Parent Key" will also delete "Child Key" and the value. */
141 error = hive_key_del(root, "Parent Key");
142 torture_assert_werr_ok(tctx, error, "hive_key_del");
147 static bool test_flush_key(struct torture_context *tctx, void *test_data)
149 struct hive_key *root = (struct hive_key *)test_data;
151 torture_assert_werr_ok(tctx, hive_key_flush(root), "flush key");
156 static bool test_del_key(struct torture_context *tctx, const void *test_data)
159 struct hive_key *subkey;
160 const struct hive_key *root = (const struct hive_key *)test_data;
161 TALLOC_CTX *mem_ctx = tctx;
163 error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
165 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
167 error = hive_key_del(root, "Nested Key");
168 torture_assert_werr_ok(tctx, error, "reg_key_del");
170 error = hive_key_del(root, "Nested Key");
171 torture_assert_werr_equal(tctx, error, WERR_BADFILE, "reg_key_del");
176 static bool test_set_value(struct torture_context *tctx,
177 const void *test_data)
180 struct hive_key *subkey;
181 const struct hive_key *root = (const struct hive_key *)test_data;
182 TALLOC_CTX *mem_ctx = tctx;
185 error = hive_key_add_name(mem_ctx, root, "YA Nested Key", NULL,
187 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
189 error = hive_key_set_value(subkey, "Answer", REG_DWORD,
190 data_blob_talloc(mem_ctx, &data, sizeof(data)));
191 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
196 static bool test_get_value(struct torture_context *tctx, const void *test_data)
199 struct hive_key *subkey;
200 const struct hive_key *root = (const struct hive_key *)test_data;
201 TALLOC_CTX *mem_ctx = tctx;
206 error = hive_key_add_name(mem_ctx, root, "EYA Nested Key", NULL,
208 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
210 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &value);
211 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
212 "getting missing value");
214 error = hive_key_set_value(subkey, "Answer", REG_DWORD,
215 data_blob_talloc(mem_ctx, &data, sizeof(data)));
216 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
218 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &value);
219 torture_assert_werr_ok(tctx, error, "getting value");
221 torture_assert_int_equal(tctx, value.length, 4, "value length");
222 torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
224 torture_assert_mem_equal(tctx, &data, value.data, sizeof(uint32_t),
230 static bool test_del_value(struct torture_context *tctx, const void *test_data)
233 struct hive_key *subkey;
234 const struct hive_key *root = (const struct hive_key *)test_data;
235 TALLOC_CTX *mem_ctx = tctx;
240 error = hive_key_add_name(mem_ctx, root, "EEYA Nested Key", NULL,
242 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
244 error = hive_key_set_value(subkey, "Answer", REG_DWORD,
245 data_blob_talloc(mem_ctx, &data, sizeof(data)));
246 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
248 error = hive_key_del_value(subkey, "Answer");
249 torture_assert_werr_ok(tctx, error, "deleting value");
251 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &value);
252 torture_assert_werr_equal(tctx, error, WERR_BADFILE, "getting value");
254 error = hive_key_del_value(subkey, "Answer");
255 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
261 static bool test_list_values(struct torture_context *tctx,
262 const void *test_data)
265 struct hive_key *subkey;
266 const struct hive_key *root = (const struct hive_key *)test_data;
267 TALLOC_CTX *mem_ctx = tctx;
273 error = hive_key_add_name(mem_ctx, root, "AYAYA Nested Key", NULL,
275 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
277 error = hive_key_set_value(subkey, "Answer", REG_DWORD,
278 data_blob_talloc(mem_ctx, &data, sizeof(data)));
279 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
281 error = hive_get_value_by_index(mem_ctx, subkey, 0, &name,
283 torture_assert_werr_ok(tctx, error, "getting value");
285 torture_assert_str_equal(tctx, name, "Answer", "value name");
287 torture_assert_int_equal(tctx, value.length, 4, "value length");
288 torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
291 torture_assert_int_equal(tctx, data, IVAL(value.data, 0), "value data");
293 error = hive_get_value_by_index(mem_ctx, subkey, 1, &name,
295 torture_assert_werr_equal(tctx, error, WERR_NO_MORE_ITEMS,
296 "getting missing value");
301 static bool test_hive_security(struct torture_context *tctx, const void *_data)
303 struct hive_key *subkey = NULL;
304 const struct hive_key *root = _data;
306 struct security_descriptor *osd, *nsd;
308 osd = security_descriptor_dacl_create(tctx,
311 SID_NT_AUTHENTICATED_USERS,
312 SEC_ACE_TYPE_ACCESS_ALLOWED,
314 SEC_ACE_FLAG_OBJECT_INHERIT,
318 error = hive_key_add_name(tctx, root, "SecurityKey", NULL,
320 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
322 error = hive_get_sec_desc(tctx, subkey, &nsd);
323 torture_assert_werr_ok (tctx, error, "getting security descriptor");
325 torture_assert(tctx, security_descriptor_equal(osd, nsd),
326 "security descriptor changed!");
328 /* Create a fresh security descriptor */
330 osd = security_descriptor_dacl_create(tctx,
333 SID_NT_AUTHENTICATED_USERS,
334 SEC_ACE_TYPE_ACCESS_ALLOWED,
336 SEC_ACE_FLAG_OBJECT_INHERIT,
339 error = hive_set_sec_desc(subkey, osd);
340 torture_assert_werr_ok(tctx, error, "setting security descriptor");
342 error = hive_get_sec_desc(tctx, subkey, &nsd);
343 torture_assert_werr_ok (tctx, error, "getting security descriptor");
345 torture_assert(tctx, security_descriptor_equal(osd, nsd),
346 "security descriptor changed!");
351 static void tcase_add_tests(struct torture_tcase *tcase)
353 torture_tcase_add_simple_test_const(tcase, "del_nonexistant_key",
354 test_del_nonexistant_key);
355 torture_tcase_add_simple_test_const(tcase, "add_subkey",
357 torture_tcase_add_simple_test(tcase, "flush_key",
359 /* test_del_recursive() test must run before test_keyinfo_root().
360 test_keyinfo_root() checks the number of subkeys, which verifies
361 the recursive delete worked properly. */
362 torture_tcase_add_simple_test_const(tcase, "del_recursive",
364 torture_tcase_add_simple_test_const(tcase, "get_info",
366 torture_tcase_add_simple_test(tcase, "get_info_nums",
368 torture_tcase_add_simple_test_const(tcase, "set_value",
370 torture_tcase_add_simple_test_const(tcase, "get_value",
372 torture_tcase_add_simple_test_const(tcase, "list_values",
374 torture_tcase_add_simple_test_const(tcase, "del_key",
376 torture_tcase_add_simple_test_const(tcase, "del_value",
378 torture_tcase_add_simple_test_const(tcase, "check hive security",
382 static bool hive_setup_dir(struct torture_context *tctx, void **data)
384 struct hive_key *key;
389 status = torture_temp_dir(tctx, "hive-dir", &dirname);
390 if (!NT_STATUS_IS_OK(status))
395 error = reg_create_directory(tctx, dirname, &key);
396 if (!W_ERROR_IS_OK(error)) {
397 fprintf(stderr, "Unable to initialize dir hive\n");
406 static bool hive_setup_ldb(struct torture_context *tctx, void **data)
408 struct hive_key *key;
413 status = torture_temp_dir(tctx, "hive-ldb", &dirname);
414 if (!NT_STATUS_IS_OK(status))
419 error = reg_open_ldb_file(tctx, dirname, NULL, NULL, tctx->lp_ctx, &key);
420 if (!W_ERROR_IS_OK(error)) {
421 fprintf(stderr, "Unable to initialize ldb hive\n");
430 static bool hive_setup_regf(struct torture_context *tctx, void **data)
432 struct hive_key *key;
437 status = torture_temp_dir(tctx, "hive-regf", &dirname);
438 if (!NT_STATUS_IS_OK(status))
443 error = reg_create_regf_file(tctx, lp_iconv_convenience(tctx->lp_ctx),
445 if (!W_ERROR_IS_OK(error)) {
446 fprintf(stderr, "Unable to create new regf file\n");
455 static bool test_dir_refuses_null_location(struct torture_context *tctx)
457 torture_assert_werr_equal(tctx, WERR_INVALID_PARAM,
458 reg_open_directory(NULL, NULL, NULL),
459 "reg_open_directory accepts NULL location");
463 struct torture_suite *torture_registry_hive(TALLOC_CTX *mem_ctx)
465 struct torture_tcase *tcase;
466 struct torture_suite *suite = torture_suite_create(mem_ctx, "HIVE");
468 torture_suite_add_simple_test(suite, "dir-refuses-null-location",
469 test_dir_refuses_null_location);
471 tcase = torture_suite_add_tcase(suite, "dir");
472 torture_tcase_set_fixture(tcase, hive_setup_dir, NULL);
473 tcase_add_tests(tcase);
475 tcase = torture_suite_add_tcase(suite, "ldb");
476 torture_tcase_set_fixture(tcase, hive_setup_ldb, NULL);
477 tcase_add_tests(tcase);
479 tcase = torture_suite_add_tcase(suite, "regf");
480 torture_tcase_set_fixture(tcase, hive_setup_regf, NULL);
481 tcase_add_tests(tcase);