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