mirror of
https://github.com/samba-team/samba.git
synced 2025-01-07 17:18:11 +03:00
70807a4267
Guenther Signed-off-by: Guenther Deschner <gd@samba.org> Reviewed-by: Jeremy Allison <jra@samba.org>
441 lines
13 KiB
C
441 lines
13 KiB
C
/*
|
|
Unix SMB/CIFS implementation.
|
|
|
|
local testing of registry library - hives
|
|
|
|
Copyright (C) Jelmer Vernooij 2005-2007
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
#include "includes.h"
|
|
#include "lib/registry/registry.h"
|
|
#include "torture/torture.h"
|
|
#include "librpc/gen_ndr/winreg.h"
|
|
#include "system/filesys.h"
|
|
#include "param/param.h"
|
|
#include "libcli/security/security.h"
|
|
#include "lib/registry/tests/proto.h"
|
|
|
|
static bool test_del_nonexistent_key(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
WERROR error = hive_key_del(tctx, root, "bla");
|
|
torture_assert_werr_equal(tctx, error, WERR_FILE_NOT_FOUND,
|
|
"invalid return code");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_keyinfo_root(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
uint32_t num_subkeys, num_values;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
WERROR error;
|
|
|
|
/* This is a new backend. There should be no subkeys and no
|
|
* values */
|
|
error = hive_key_get_info(tctx, root, NULL, &num_subkeys, &num_values,
|
|
NULL, NULL, NULL, NULL);
|
|
torture_assert_werr_ok(tctx, error, "reg_key_num_subkeys()");
|
|
|
|
torture_assert_int_equal(tctx, num_subkeys, 0,
|
|
"New key has non-zero subkey count");
|
|
|
|
torture_assert_werr_ok(tctx, error, "reg_key_num_values");
|
|
|
|
torture_assert_int_equal(tctx, num_values, 0,
|
|
"New key has non-zero value count");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_keyinfo_nums(struct torture_context *tctx, void *test_data)
|
|
{
|
|
uint32_t num_subkeys, num_values;
|
|
struct hive_key *root = (struct hive_key *)test_data;
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 };
|
|
|
|
error = hive_key_add_name(tctx, root, "Nested Keyll", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_set_value(root, "Answer", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
/* This is a new backend. There should be no subkeys and no
|
|
* values */
|
|
error = hive_key_get_info(tctx, root, NULL, &num_subkeys, &num_values,
|
|
NULL, NULL, NULL, NULL);
|
|
torture_assert_werr_ok(tctx, error, "reg_key_num_subkeys()");
|
|
|
|
torture_assert_int_equal(tctx, num_subkeys, 1, "subkey count");
|
|
|
|
torture_assert_werr_ok(tctx, error, "reg_key_num_values");
|
|
|
|
torture_assert_int_equal(tctx, num_values, 1, "value count");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_add_subkey(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_del(mem_ctx, root, "Nested Key");
|
|
torture_assert_werr_ok(tctx, error, "reg_key_del");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_del_recursive(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
struct hive_key *subkey2;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 };
|
|
|
|
/* Create a new key under the root */
|
|
error = hive_key_add_name(mem_ctx, root, "Parent Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
/* Create a new key under "Parent Key" */
|
|
error = hive_key_add_name(mem_ctx, subkey, "Child Key", NULL,
|
|
NULL, &subkey2);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
/* Create a new value under "Child Key" */
|
|
error = hive_key_set_value(subkey2, "Answer Recursive", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
/* Deleting "Parent Key" will also delete "Child Key" and the value. */
|
|
error = hive_key_del(mem_ctx, root, "Parent Key");
|
|
torture_assert_werr_ok(tctx, error, "hive_key_del");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_flush_key(struct torture_context *tctx, void *test_data)
|
|
{
|
|
struct hive_key *root = (struct hive_key *)test_data;
|
|
|
|
torture_assert_werr_ok(tctx, hive_key_flush(root), "flush key");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_del_key(struct torture_context *tctx, const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_del(mem_ctx, root, "Nested Key");
|
|
torture_assert_werr_ok(tctx, error, "reg_key_del");
|
|
|
|
error = hive_key_del(mem_ctx, root, "Nested Key");
|
|
torture_assert_werr_equal(tctx, error, WERR_FILE_NOT_FOUND, "reg_key_del");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_set_value(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 };
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "YA Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_get_value(struct torture_context *tctx, const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
uint32_t type;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 }, data;
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "EYA Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
|
|
torture_assert_werr_equal(tctx, error, WERR_FILE_NOT_FOUND,
|
|
"getting missing value");
|
|
|
|
error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
|
|
torture_assert_werr_ok(tctx, error, "getting value");
|
|
|
|
torture_assert_int_equal(tctx, data.length, 4, "value length");
|
|
torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
|
|
|
|
torture_assert_mem_equal(tctx, data.data, db.data, 4, "value data");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_del_value(struct torture_context *tctx, const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
uint32_t type;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 };
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "EEYA Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
error = hive_key_del_value(mem_ctx, subkey, "Answer");
|
|
torture_assert_werr_ok(tctx, error, "deleting value");
|
|
|
|
error = hive_get_value(mem_ctx, subkey, "Answer", &type, &db);
|
|
torture_assert_werr_equal(tctx, error, WERR_FILE_NOT_FOUND, "getting value");
|
|
|
|
error = hive_key_del_value(mem_ctx, subkey, "Answer");
|
|
torture_assert_werr_equal(tctx, error, WERR_FILE_NOT_FOUND,
|
|
"deleting value");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_list_values(struct torture_context *tctx,
|
|
const void *test_data)
|
|
{
|
|
WERROR error;
|
|
struct hive_key *subkey;
|
|
const struct hive_key *root = (const struct hive_key *)test_data;
|
|
TALLOC_CTX *mem_ctx = tctx;
|
|
uint32_t type;
|
|
uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
|
|
DATA_BLOB db = { d, 4 }, data;
|
|
const char *name;
|
|
|
|
error = hive_key_add_name(mem_ctx, root, "AYAYA Nested Key", NULL,
|
|
NULL, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_set_value");
|
|
|
|
error = hive_get_value_by_index(mem_ctx, subkey, 0, &name,
|
|
&type, &data);
|
|
torture_assert_werr_ok(tctx, error, "getting value");
|
|
|
|
torture_assert_str_equal(tctx, name, "Answer", "value name");
|
|
|
|
torture_assert_int_equal(tctx, data.length, 4, "value length");
|
|
torture_assert_int_equal(tctx, type, REG_DWORD, "value type");
|
|
|
|
torture_assert_mem_equal(tctx, data.data, db.data, 4, "value data");
|
|
|
|
error = hive_get_value_by_index(mem_ctx, subkey, 1, &name,
|
|
&type, &data);
|
|
torture_assert_werr_equal(tctx, error, WERR_NO_MORE_ITEMS,
|
|
"getting missing value");
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool test_hive_security(struct torture_context *tctx, const void *_data)
|
|
{
|
|
struct hive_key *subkey = NULL;
|
|
const struct hive_key *root = _data;
|
|
WERROR error;
|
|
struct security_descriptor *osd, *nsd;
|
|
|
|
osd = security_descriptor_dacl_create(tctx,
|
|
0,
|
|
NULL, NULL,
|
|
SID_NT_AUTHENTICATED_USERS,
|
|
SEC_ACE_TYPE_ACCESS_ALLOWED,
|
|
SEC_GENERIC_ALL,
|
|
SEC_ACE_FLAG_OBJECT_INHERIT,
|
|
NULL);
|
|
|
|
|
|
error = hive_key_add_name(tctx, root, "SecurityKey", NULL,
|
|
osd, &subkey);
|
|
torture_assert_werr_ok(tctx, error, "hive_key_add_name");
|
|
|
|
error = hive_get_sec_desc(tctx, subkey, &nsd);
|
|
torture_assert_werr_ok (tctx, error, "getting security descriptor");
|
|
|
|
torture_assert(tctx, security_descriptor_equal(osd, nsd),
|
|
"security descriptor changed!");
|
|
|
|
/* Create a fresh security descriptor */
|
|
talloc_free(osd);
|
|
osd = security_descriptor_dacl_create(tctx,
|
|
0,
|
|
NULL, NULL,
|
|
SID_NT_AUTHENTICATED_USERS,
|
|
SEC_ACE_TYPE_ACCESS_ALLOWED,
|
|
SEC_GENERIC_ALL,
|
|
SEC_ACE_FLAG_OBJECT_INHERIT,
|
|
NULL);
|
|
|
|
error = hive_set_sec_desc(subkey, osd);
|
|
torture_assert_werr_ok(tctx, error, "setting security descriptor");
|
|
|
|
error = hive_get_sec_desc(tctx, subkey, &nsd);
|
|
torture_assert_werr_ok (tctx, error, "getting security descriptor");
|
|
|
|
torture_assert(tctx, security_descriptor_equal(osd, nsd),
|
|
"security descriptor changed!");
|
|
|
|
return true;
|
|
}
|
|
|
|
static void tcase_add_tests(struct torture_tcase *tcase)
|
|
{
|
|
torture_tcase_add_simple_test_const(tcase, "del_nonexistent_key",
|
|
test_del_nonexistent_key);
|
|
torture_tcase_add_simple_test_const(tcase, "add_subkey",
|
|
test_add_subkey);
|
|
torture_tcase_add_simple_test(tcase, "flush_key",
|
|
test_flush_key);
|
|
/* test_del_recursive() test must run before test_keyinfo_root().
|
|
test_keyinfo_root() checks the number of subkeys, which verifies
|
|
the recursive delete worked properly. */
|
|
torture_tcase_add_simple_test_const(tcase, "del_recursive",
|
|
test_del_recursive);
|
|
torture_tcase_add_simple_test_const(tcase, "get_info",
|
|
test_keyinfo_root);
|
|
torture_tcase_add_simple_test(tcase, "get_info_nums",
|
|
test_keyinfo_nums);
|
|
torture_tcase_add_simple_test_const(tcase, "set_value",
|
|
test_set_value);
|
|
torture_tcase_add_simple_test_const(tcase, "get_value",
|
|
test_get_value);
|
|
torture_tcase_add_simple_test_const(tcase, "list_values",
|
|
test_list_values);
|
|
torture_tcase_add_simple_test_const(tcase, "del_key",
|
|
test_del_key);
|
|
torture_tcase_add_simple_test_const(tcase, "del_value",
|
|
test_del_value);
|
|
torture_tcase_add_simple_test_const(tcase, "check hive security",
|
|
test_hive_security);
|
|
}
|
|
|
|
static bool hive_setup_ldb(struct torture_context *tctx, void **data)
|
|
{
|
|
struct hive_key *key;
|
|
WERROR error;
|
|
char *dirname;
|
|
NTSTATUS status;
|
|
|
|
status = torture_temp_dir(tctx, "hive-ldb", &dirname);
|
|
if (!NT_STATUS_IS_OK(status))
|
|
return false;
|
|
|
|
rmdir(dirname);
|
|
|
|
error = reg_open_ldb_file(tctx, dirname, NULL, NULL, tctx->ev, tctx->lp_ctx, &key);
|
|
if (!W_ERROR_IS_OK(error)) {
|
|
fprintf(stderr, "Unable to initialize ldb hive\n");
|
|
return false;
|
|
}
|
|
|
|
*data = key;
|
|
|
|
return true;
|
|
}
|
|
|
|
static bool hive_setup_regf(struct torture_context *tctx, void **data)
|
|
{
|
|
struct hive_key *key;
|
|
WERROR error;
|
|
char *dirname;
|
|
NTSTATUS status;
|
|
|
|
status = torture_temp_dir(tctx, "hive-regf", &dirname);
|
|
if (!NT_STATUS_IS_OK(status))
|
|
return false;
|
|
|
|
rmdir(dirname);
|
|
|
|
error = reg_create_regf_file(tctx, dirname, 5, &key);
|
|
if (!W_ERROR_IS_OK(error)) {
|
|
fprintf(stderr, "Unable to create new regf file\n");
|
|
return false;
|
|
}
|
|
|
|
*data = key;
|
|
|
|
return true;
|
|
}
|
|
|
|
struct torture_suite *torture_registry_hive(TALLOC_CTX *mem_ctx)
|
|
{
|
|
struct torture_tcase *tcase;
|
|
struct torture_suite *suite = torture_suite_create(mem_ctx, "hive");
|
|
|
|
tcase = torture_suite_add_tcase(suite, "ldb");
|
|
torture_tcase_set_fixture(tcase, hive_setup_ldb, NULL);
|
|
tcase_add_tests(tcase);
|
|
|
|
tcase = torture_suite_add_tcase(suite, "regf");
|
|
torture_tcase_set_fixture(tcase, hive_setup_regf, NULL);
|
|
tcase_add_tests(tcase);
|
|
|
|
return suite;
|
|
}
|