source: trunk/server/source4/lib/registry/tests/hive.c

Last change on this file was 745, checked in by Silvan Scherrer, 13 years ago

Samba Server: updated trunk to 3.6.0
File size: 14.4 KB
Line 
1/*
2 Unix SMB/CIFS implementation.
3
4 local testing of registry library - hives
5
6 Copyright (C) Jelmer Vernooij 2005-2007
7
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.
12
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.
17
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.
21*/
22
23#include "includes.h"
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"
30
31static bool test_del_nonexistant_key(struct torture_context *tctx,
32 const void *test_data)
33{
34 const struct hive_key *root = (const struct hive_key *)test_data;
35 WERROR error = hive_key_del(tctx, root, "bla");
36 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
37 "invalid return code");
38
39 return true;
40}
41
42static bool test_keyinfo_root(struct torture_context *tctx,
43 const void *test_data)
44{
45 uint32_t num_subkeys, num_values;
46 const struct hive_key *root = (const struct hive_key *)test_data;
47 WERROR error;
48
49 /* This is a new backend. There should be no subkeys and no
50 * values */
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()");
54
55 torture_assert_int_equal(tctx, num_subkeys, 0,
56 "New key has non-zero subkey count");
57
58 torture_assert_werr_ok(tctx, error, "reg_key_num_values");
59
60 torture_assert_int_equal(tctx, num_values, 0,
61 "New key has non-zero value count");
62
63 return true;
64}
65
66static bool test_keyinfo_nums(struct torture_context *tctx, void *test_data)
67{
68 uint32_t num_subkeys, num_values;
69 struct hive_key *root = (struct hive_key *)test_data;
70 WERROR error;
71 struct hive_key *subkey;
72 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
73 DATA_BLOB db = { d, 4 };
74
75 error = hive_key_add_name(tctx, root, "Nested Keyll", NULL,
76 NULL, &subkey);
77 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
78
79 error = hive_key_set_value(root, "Answer", REG_DWORD, db);
80 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
81
82 /* This is a new backend. There should be no subkeys and no
83 * values */
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()");
87
88 torture_assert_int_equal(tctx, num_subkeys, 1, "subkey count");
89
90 torture_assert_werr_ok(tctx, error, "reg_key_num_values");
91
92 torture_assert_int_equal(tctx, num_values, 1, "value count");
93
94 return true;
95}
96
97static bool test_add_subkey(struct torture_context *tctx,
98 const void *test_data)
99{
100 WERROR error;
101 struct hive_key *subkey;
102 const struct hive_key *root = (const struct hive_key *)test_data;
103 TALLOC_CTX *mem_ctx = tctx;
104
105 error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
106 NULL, &subkey);
107 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
108
109 error = hive_key_del(mem_ctx, root, "Nested Key");
110 torture_assert_werr_ok(tctx, error, "reg_key_del");
111
112 return true;
113}
114
115static bool test_del_recursive(struct torture_context *tctx,
116 const void *test_data)
117{
118 WERROR error;
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;
123 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
124 DATA_BLOB db = { d, 4 };
125
126 /* Create a new key under the root */
127 error = hive_key_add_name(mem_ctx, root, "Parent Key", NULL,
128 NULL, &subkey);
129 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
130
131 /* Create a new key under "Parent Key" */
132 error = hive_key_add_name(mem_ctx, subkey, "Child Key", NULL,
133 NULL, &subkey2);
134 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
135
136 /* Create a new value under "Child Key" */
137 error = hive_key_set_value(subkey2, "Answer Recursive", REG_DWORD, db);
138 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
139
140 /* Deleting "Parent Key" will also delete "Child Key" and the value. */
141 error = hive_key_del(mem_ctx, root, "Parent Key");
142 torture_assert_werr_ok(tctx, error, "hive_key_del");
143
144 return true;
145}
146
147static bool test_flush_key(struct torture_context *tctx, void *test_data)
148{
149 struct hive_key *root = (struct hive_key *)test_data;
150
151 torture_assert_werr_ok(tctx, hive_key_flush(root), "flush key");
152
153 return true;
154}
155
156static bool test_del_key(struct torture_context *tctx, const void *test_data)
157{
158 WERROR error;
159 struct hive_key *subkey;
160 const struct hive_key *root = (const struct hive_key *)test_data;
161 TALLOC_CTX *mem_ctx = tctx;
162
163 error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
164 NULL, &subkey);
165 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
166
167 error = hive_key_del(mem_ctx, root, "Nested Key");
168 torture_assert_werr_ok(tctx, error, "reg_key_del");
169
170 error = hive_key_del(mem_ctx, root, "Nested Key");
171 torture_assert_werr_equal(tctx, error, WERR_BADFILE, "reg_key_del");
172
173 return true;
174}
175
176static bool test_set_value(struct torture_context *tctx,
177 const void *test_data)
178{
179 WERROR error;
180 struct hive_key *subkey;
181 const struct hive_key *root = (const struct hive_key *)test_data;
182 TALLOC_CTX *mem_ctx = tctx;
183 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
184 DATA_BLOB db = { d, 4 };
185
186 error = hive_key_add_name(mem_ctx, root, "YA Nested Key", NULL,
187 NULL, &subkey);
188 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
189
190 error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
191 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
192
193 return true;
194}
195
196static bool test_get_value(struct torture_context *tctx, const void *test_data)
197{
198 WERROR error;
199 struct hive_key *subkey;
200 const struct hive_key *root = (const struct hive_key *)test_data;
201 TALLOC_CTX *mem_ctx = tctx;
202 uint32_t type;
203 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
204 DATA_BLOB db = { d, 4 }, data;
205
206 error = hive_key_add_name(mem_ctx, root, "EYA Nested Key", NULL,
207 NULL, &subkey);
208 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
209
210 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
211 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
212 "getting missing value");
213
214 error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
215 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
216
217 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
218 torture_assert_werr_ok(tctx, error, "getting value");
219
220 torture_assert_int_equal(tctx, data.length, 4, "value length");
221 torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
222
223 torture_assert_mem_equal(tctx, data.data, db.data, 4, "value data");
224
225 return true;
226}
227
228static bool test_del_value(struct torture_context *tctx, const void *test_data)
229{
230 WERROR error;
231 struct hive_key *subkey;
232 const struct hive_key *root = (const struct hive_key *)test_data;
233 TALLOC_CTX *mem_ctx = tctx;
234 uint32_t type;
235 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
236 DATA_BLOB db = { d, 4 };
237
238 error = hive_key_add_name(mem_ctx, root, "EEYA Nested Key", NULL,
239 NULL, &subkey);
240 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
241
242 error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
243 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
244
245 error = hive_key_del_value(mem_ctx, subkey, "Answer");
246 torture_assert_werr_ok(tctx, error, "deleting value");
247
248 error = hive_get_value(mem_ctx, subkey, "Answer", &type, &db);
249 torture_assert_werr_equal(tctx, error, WERR_BADFILE, "getting value");
250
251 error = hive_key_del_value(mem_ctx, subkey, "Answer");
252 torture_assert_werr_equal(tctx, error, WERR_BADFILE,
253 "deleting value");
254
255 return true;
256}
257
258static bool test_list_values(struct torture_context *tctx,
259 const void *test_data)
260{
261 WERROR error;
262 struct hive_key *subkey;
263 const struct hive_key *root = (const struct hive_key *)test_data;
264 TALLOC_CTX *mem_ctx = tctx;
265 uint32_t type;
266 uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
267 DATA_BLOB db = { d, 4 }, data;
268 const char *name;
269
270 error = hive_key_add_name(mem_ctx, root, "AYAYA Nested Key", NULL,
271 NULL, &subkey);
272 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
273
274 error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
275 torture_assert_werr_ok(tctx, error, "hive_key_set_value");
276
277 error = hive_get_value_by_index(mem_ctx, subkey, 0, &name,
278 &type, &data);
279 torture_assert_werr_ok(tctx, error, "getting value");
280
281 torture_assert_str_equal(tctx, name, "Answer", "value name");
282
283 torture_assert_int_equal(tctx, data.length, 4, "value length");
284 torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
285
286 torture_assert_mem_equal(tctx, data.data, db.data, 4, "value data");
287
288 error = hive_get_value_by_index(mem_ctx, subkey, 1, &name,
289 &type, &data);
290 torture_assert_werr_equal(tctx, error, WERR_NO_MORE_ITEMS,
291 "getting missing value");
292
293 return true;
294}
295
296static bool test_hive_security(struct torture_context *tctx, const void *_data)
297{
298 struct hive_key *subkey = NULL;
299 const struct hive_key *root = _data;
300 WERROR error;
301 struct security_descriptor *osd, *nsd;
302
303 osd = security_descriptor_dacl_create(tctx,
304 0,
305 NULL, NULL,
306 SID_NT_AUTHENTICATED_USERS,
307 SEC_ACE_TYPE_ACCESS_ALLOWED,
308 SEC_GENERIC_ALL,
309 SEC_ACE_FLAG_OBJECT_INHERIT,
310 NULL);
311
312
313 error = hive_key_add_name(tctx, root, "SecurityKey", NULL,
314 osd, &subkey);
315 torture_assert_werr_ok(tctx, error, "hive_key_add_name");
316
317 error = hive_get_sec_desc(tctx, subkey, &nsd);
318 torture_assert_werr_ok (tctx, error, "getting security descriptor");
319
320 torture_assert(tctx, security_descriptor_equal(osd, nsd),
321 "security descriptor changed!");
322
323 /* Create a fresh security descriptor */
324 talloc_free(osd);
325 osd = security_descriptor_dacl_create(tctx,
326 0,
327 NULL, NULL,
328 SID_NT_AUTHENTICATED_USERS,
329 SEC_ACE_TYPE_ACCESS_ALLOWED,
330 SEC_GENERIC_ALL,
331 SEC_ACE_FLAG_OBJECT_INHERIT,
332 NULL);
333
334 error = hive_set_sec_desc(subkey, osd);
335 torture_assert_werr_ok(tctx, error, "setting security descriptor");
336
337 error = hive_get_sec_desc(tctx, subkey, &nsd);
338 torture_assert_werr_ok (tctx, error, "getting security descriptor");
339
340 torture_assert(tctx, security_descriptor_equal(osd, nsd),
341 "security descriptor changed!");
342
343 return true;
344}
345
346static void tcase_add_tests(struct torture_tcase *tcase)
347{
348 torture_tcase_add_simple_test_const(tcase, "del_nonexistant_key",
349 test_del_nonexistant_key);
350 torture_tcase_add_simple_test_const(tcase, "add_subkey",
351 test_add_subkey);
352 torture_tcase_add_simple_test(tcase, "flush_key",
353 test_flush_key);
354 /* test_del_recursive() test must run before test_keyinfo_root().
355 test_keyinfo_root() checks the number of subkeys, which verifies
356 the recursive delete worked properly. */
357 torture_tcase_add_simple_test_const(tcase, "del_recursive",
358 test_del_recursive);
359 torture_tcase_add_simple_test_const(tcase, "get_info",
360 test_keyinfo_root);
361 torture_tcase_add_simple_test(tcase, "get_info_nums",
362 test_keyinfo_nums);
363 torture_tcase_add_simple_test_const(tcase, "set_value",
364 test_set_value);
365 torture_tcase_add_simple_test_const(tcase, "get_value",
366 test_get_value);
367 torture_tcase_add_simple_test_const(tcase, "list_values",
368 test_list_values);
369 torture_tcase_add_simple_test_const(tcase, "del_key",
370 test_del_key);
371 torture_tcase_add_simple_test_const(tcase, "del_value",
372 test_del_value);
373 torture_tcase_add_simple_test_const(tcase, "check hive security",
374 test_hive_security);
375}
376
377static bool hive_setup_dir(struct torture_context *tctx, void **data)
378{
379 struct hive_key *key;
380 WERROR error;
381 char *dirname;
382 NTSTATUS status;
383
384 status = torture_temp_dir(tctx, "hive-dir", &dirname);
385 if (!NT_STATUS_IS_OK(status))
386 return false;
387
388 rmdir(dirname);
389
390 error = reg_create_directory(tctx, dirname, &key);
391 if (!W_ERROR_IS_OK(error)) {
392 fprintf(stderr, "Unable to initialize dir hive\n");
393 return false;
394 }
395
396 *data = key;
397
398 return true;
399}
400
401static bool hive_setup_ldb(struct torture_context *tctx, void **data)
402{
403 struct hive_key *key;
404 WERROR error;
405 char *dirname;
406 NTSTATUS status;
407
408 status = torture_temp_dir(tctx, "hive-ldb", &dirname);
409 if (!NT_STATUS_IS_OK(status))
410 return false;
411
412 rmdir(dirname);
413
414 error = reg_open_ldb_file(tctx, dirname, NULL, NULL, tctx->ev, tctx->lp_ctx, &key);
415 if (!W_ERROR_IS_OK(error)) {
416 fprintf(stderr, "Unable to initialize ldb hive\n");
417 return false;
418 }
419
420 *data = key;
421
422 return true;
423}
424
425static bool hive_setup_regf(struct torture_context *tctx, void **data)
426{
427 struct hive_key *key;
428 WERROR error;
429 char *dirname;
430 NTSTATUS status;
431
432 status = torture_temp_dir(tctx, "hive-regf", &dirname);
433 if (!NT_STATUS_IS_OK(status))
434 return false;
435
436 rmdir(dirname);
437
438 error = reg_create_regf_file(tctx, dirname, 5, &key);
439 if (!W_ERROR_IS_OK(error)) {
440 fprintf(stderr, "Unable to create new regf file\n");
441 return false;
442 }
443
444 *data = key;
445
446 return true;
447}
448
449static bool test_dir_refuses_null_location(struct torture_context *tctx)
450{
451 torture_assert_werr_equal(tctx, WERR_INVALID_PARAM,
452 reg_open_directory(NULL, NULL, NULL),
453 "reg_open_directory accepts NULL location");
454 return true;
455}
456
457struct torture_suite *torture_registry_hive(TALLOC_CTX *mem_ctx)
458{
459 struct torture_tcase *tcase;
460 struct torture_suite *suite = torture_suite_create(mem_ctx, "hive");
461
462 torture_suite_add_simple_test(suite, "dir-refuses-null-location",
463 test_dir_refuses_null_location);
464
465 tcase = torture_suite_add_tcase(suite, "dir");
466 torture_tcase_set_fixture(tcase, hive_setup_dir, NULL);
467 tcase_add_tests(tcase);
468
469 tcase = torture_suite_add_tcase(suite, "ldb");
470 torture_tcase_set_fixture(tcase, hive_setup_ldb, NULL);
471 tcase_add_tests(tcase);
472
473 tcase = torture_suite_add_tcase(suite, "regf");
474 torture_tcase_set_fixture(tcase, hive_setup_regf, NULL);
475 tcase_add_tests(tcase);
476
477 return suite;
478}
Note: See TracBrowser for help on using the repository browser.