Finish removal of iconv_convenience in public API's.
[bbaumbach/samba-autobuild/.git] / source4 / lib / registry / tests / hive.c
index a71e31474c61a49d01293b5f7a53e65df802c946..4ae9a5bcbf5d48c854c9370bd1bceaa04fb7294d 100644 (file)
@@ -1,20 +1,20 @@
-/* 
+/*
    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 2 of the License, or
+   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 "lib/cmdline/popt_common.h"
 #include "torture/torture.h"
 #include "librpc/gen_ndr/winreg.h"
 #include "system/filesys.h"
-
-NTSTATUS torture_temp_dir(struct torture_context *tctx, const char *prefix, 
-                                                                  const char **tempdir);
+#include "param/param.h"
+#include "libcli/security/security.h"
 
 static bool test_del_nonexistant_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(root, "bla");
-       torture_assert_werr_equal(tctx, error, WERR_NOT_FOUND, 
-                                                         "invalid return code");
+       WERROR error = hive_key_del(tctx, root, "bla");
+       torture_assert_werr_equal(tctx, error, WERR_BADFILE,
+                                 "invalid return code");
 
        return true;
 }
 
 static bool test_keyinfo_root(struct torture_context *tctx,
-                                                const void *test_data)
+                             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 
+       /* 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);
+       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_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");
+       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,
-                                                const void *test_data)
+static bool test_keyinfo_nums(struct torture_context *tctx, void *test_data)
 {
        uint32_t num_subkeys, num_values;
-       const struct hive_key *root = (const struct hive_key *)test_data;
+       struct hive_key *root = (struct hive_key *)test_data;
        WERROR error;
        struct hive_key *subkey;
-       uint32_t data = 42;
+       uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
+       DATA_BLOB db = { d, 4 };
 
-       error = hive_key_add_name(tctx, root, "Nested Keyll", NULL, 
-                                                        NULL, &subkey);
+       error = hive_key_add_name(tctx, root, "Nested Keyll", NULL,
+                                 NULL, &subkey);
        torture_assert_werr_ok(tctx, error, "hive_key_add_name");
 
-       error = hive_set_value(root, "Answer", REG_DWORD, 
-                                  data_blob_talloc(tctx, &data, sizeof(data)));
-       torture_assert_werr_ok(tctx, error, "hive_set_value");
+       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 
+       /* 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);
+       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");
@@ -96,27 +95,58 @@ static bool test_keyinfo_nums(struct torture_context *tctx,
 }
 
 static bool test_add_subkey(struct torture_context *tctx,
-                                         const void *test_data)
+                           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);
+       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(root, "Nested Key");
+       error = hive_key_del(mem_ctx, root, "Nested Key");
        torture_assert_werr_ok(tctx, error, "reg_key_del");
 
        return true;
 }
 
-static bool test_flush_key(struct torture_context *tctx,
-                          const void *test_data)
+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");
 
@@ -130,35 +160,35 @@ static bool test_del_key(struct torture_context *tctx, const void *test_data)
        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);
+       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(root, "Nested Key");
+       error = hive_key_del(mem_ctx, root, "Nested Key");
        torture_assert_werr_ok(tctx, error, "reg_key_del");
 
-       error = hive_key_del(root, "Nested Key");
-       torture_assert_werr_equal(tctx, error, WERR_NOT_FOUND, "reg_key_del");
+       error = hive_key_del(mem_ctx, root, "Nested Key");
+       torture_assert_werr_equal(tctx, error, WERR_BADFILE, "reg_key_del");
 
        return true;
 }
 
 static bool test_set_value(struct torture_context *tctx,
-                                         const void *test_data)
+                          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 data = 42;
+       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);
+       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_set_value(subkey, "Answer", REG_DWORD, 
-                                  data_blob_talloc(mem_ctx, &data, sizeof(data)));
-       torture_assert_werr_ok(tctx, error, "hive_set_value");
+       error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
+       torture_assert_werr_ok(tctx, error, "hive_key_set_value");
 
        return true;
 }
@@ -169,30 +199,29 @@ static bool test_get_value(struct torture_context *tctx, const void *test_data)
        struct hive_key *subkey;
        const struct hive_key *root = (const struct hive_key *)test_data;
        TALLOC_CTX *mem_ctx = tctx;
-       uint32_t data = 42;
        uint32_t type;
-       DATA_BLOB value;
+       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);
+       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, &value);
-       torture_assert_werr_equal(tctx, error, WERR_NOT_FOUND, 
-                                                         "getting missing value");
+       error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
+       torture_assert_werr_equal(tctx, error, WERR_BADFILE,
+                                 "getting missing value");
 
-       error = hive_set_value(subkey, "Answer", REG_DWORD, 
-                                  data_blob_talloc(mem_ctx, &data, sizeof(data)));
-       torture_assert_werr_ok(tctx, error, "hive_set_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, &value);
+       error = hive_get_value(mem_ctx, subkey, "Answer", &type, &data);
        torture_assert_werr_ok(tctx, error, "getting value");
 
-       torture_assert(tctx, memcmp(value.data, &data, 4) == 0, "value data");
-
-       torture_assert_int_equal(tctx, value.length, 4, "value length");
+       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;
 }
 
@@ -202,86 +231,154 @@ static bool test_del_value(struct torture_context *tctx, const void *test_data)
        struct hive_key *subkey;
        const struct hive_key *root = (const struct hive_key *)test_data;
        TALLOC_CTX *mem_ctx = tctx;
-       uint32_t data = 42;
        uint32_t type;
-       DATA_BLOB value;
+       uint8_t d[] = { 0x42, 0x00, 0x00, 0x00 };
+       DATA_BLOB db = { d, 4 };
 
-       error = hive_key_add_name(mem_ctx, root, "EEYA Nested Key", NULL, 
+       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_set_value(subkey, "Answer", REG_DWORD, 
-                                  data_blob_talloc(mem_ctx, &data, sizeof(data)));
-       torture_assert_werr_ok(tctx, error, "hive_set_value");
+       error = hive_key_set_value(subkey, "Answer", REG_DWORD, db);
+       torture_assert_werr_ok(tctx, error, "hive_key_set_value");
 
-       error = hive_del_value(subkey, "Answer");
+       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, &value);
-       torture_assert_werr_equal(tctx, error, WERR_NOT_FOUND, "getting value");
+       error = hive_get_value(mem_ctx, subkey, "Answer", &type, &db);
+       torture_assert_werr_equal(tctx, error, WERR_BADFILE, "getting value");
 
-       error = hive_del_value(subkey, "Answer");
-       torture_assert_werr_equal(tctx, error, WERR_NOT_FOUND, "deleting value");
+       error = hive_key_del_value(mem_ctx, subkey, "Answer");
+       torture_assert_werr_equal(tctx, error, WERR_BADFILE,
+                                 "deleting value");
 
        return true;
 }
 
-static bool test_list_values(struct torture_context *tctx, 
-                                                        const void *test_data)
+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 data = 42;
        uint32_t type;
-       DATA_BLOB value;
+       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);
+       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_set_value(subkey, "Answer", REG_DWORD, 
-                                  data_blob_talloc(mem_ctx, &data, sizeof(data)));
-       torture_assert_werr_ok(tctx, error, "hive_set_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_by_index(mem_ctx, subkey, 0, &name, &type, &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(tctx, memcmp(value.data, &data, 4) == 0, "value data");
 
-       torture_assert_int_equal(tctx, value.length, 4, "value length");
+       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");
 
-       error = hive_get_value_by_index(mem_ctx, subkey, 1, &name, &type, &value);
-       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) 
+static void tcase_add_tests(struct torture_tcase *tcase)
 {
-       torture_tcase_add_simple_test(tcase, "del_nonexistant_key", 
-                                                                 test_del_nonexistant_key);
-       torture_tcase_add_simple_test(tcase, "add_subkey", test_add_subkey);
-       torture_tcase_add_simple_test(tcase, "flush_key", test_flush_key);
-       torture_tcase_add_simple_test(tcase, "get_info", test_keyinfo_root);
-       torture_tcase_add_simple_test(tcase, "get_info_nums", test_keyinfo_nums);
-       torture_tcase_add_simple_test(tcase, "set_value", test_set_value);
-       torture_tcase_add_simple_test(tcase, "get_value", test_get_value);
-       torture_tcase_add_simple_test(tcase, "list_values", test_list_values);
-       torture_tcase_add_simple_test(tcase, "del_key", test_del_key);
-       torture_tcase_add_simple_test(tcase, "del_value", test_del_value);
+       torture_tcase_add_simple_test_const(tcase, "del_nonexistant_key",
+                                               test_del_nonexistant_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_dir(struct torture_context *tctx, void **data)
 {
        struct hive_key *key;
        WERROR error;
-       const char *dirname;
+       char *dirname;
        NTSTATUS status;
 
        status = torture_temp_dir(tctx, "hive-dir", &dirname);
@@ -305,7 +402,7 @@ static bool hive_setup_ldb(struct torture_context *tctx, void **data)
 {
        struct hive_key *key;
        WERROR error;
-       const char *dirname;
+       char *dirname;
        NTSTATUS status;
 
        status = torture_temp_dir(tctx, "hive-ldb", &dirname);
@@ -314,7 +411,7 @@ static bool hive_setup_ldb(struct torture_context *tctx, void **data)
 
        rmdir(dirname);
 
-       error = reg_open_ldb_file(tctx, dirname, NULL, NULL, &key);
+       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;
@@ -329,10 +426,10 @@ static bool hive_setup_regf(struct torture_context *tctx, void **data)
 {
        struct hive_key *key;
        WERROR error;
-       const char *dirname;
+       char *dirname;
        NTSTATUS status;
 
-       status = torture_temp_dir(tctx, "hive-dir", &dirname);
+       status = torture_temp_dir(tctx, "hive-regf", &dirname);
        if (!NT_STATUS_IS_OK(status))
                return false;
 
@@ -351,21 +448,19 @@ static bool hive_setup_regf(struct torture_context *tctx, void **data)
 
 static bool test_dir_refuses_null_location(struct torture_context *tctx)
 {
-       torture_assert_werr_equal(tctx, WERR_INVALID_PARAM, 
-                                                         reg_open_directory(NULL, NULL, NULL),
-                                                         "reg_open_directory accepts NULL location");
+       torture_assert_werr_equal(tctx, WERR_INVALID_PARAM,
+                                 reg_open_directory(NULL, NULL, NULL),
+                                 "reg_open_directory accepts NULL location");
        return true;
 }
 
-struct torture_suite *torture_registry_hive(TALLOC_CTX *mem_ctx) 
+struct torture_suite *torture_registry_hive(TALLOC_CTX *mem_ctx)
 {
        struct torture_tcase *tcase;
-       struct torture_suite *suite = torture_suite_create(mem_ctx, 
-                                                                                                          "HIVE");
-
-       torture_suite_add_simple_test(suite, "dir-refuses-null-location", 
-                                                                 test_dir_refuses_null_location);
+       struct torture_suite *suite = torture_suite_create(mem_ctx, "HIVE");
 
+       torture_suite_add_simple_test(suite, "dir-refuses-null-location",
+                                     test_dir_refuses_null_location);
 
        tcase = torture_suite_add_tcase(suite, "dir");
        torture_tcase_set_fixture(tcase, hive_setup_dir, NULL);