r3323: more warning reductions
[bbaumbach/samba-autobuild/.git] / source4 / lib / registry / reg_backend_ldb / reg_backend_ldb.c
index 0633c94616045511027dc918974adf96db758902..faa8a5e62c90b866f7fe2c4c4827c445338392d7 100644 (file)
 */
 
 #include "includes.h"
-#include "lib/registry/common/registry.h"
 
-static char *reg_path_to_ldb(TALLOC_CTX *mem_ctx, const char *path)
+static char *reg_path_to_ldb(TALLOC_CTX *mem_ctx, const char *path, const char *add)
 {
-       char *ret = talloc_strdup(mem_ctx, "(dn=");
-       char *begin = (char *)path;
-       char *end = NULL;
-
-       while(begin) {
-               end = strchr(begin, '\\');
-               if(end)end = '\0';
-               if(end - begin != 0) ret = talloc_asprintf_append(mem_ctx, ret, "key=%s,", begin);
+       char *ret = talloc_strdup(mem_ctx, "");
+       char *mypath = strdup(path);
+       char *end = mypath, *begin;
+
+       if(add) 
+               ret = talloc_asprintf_append(ret, "%s", add);
+
+       while(end) {
+               char *keyname;
+               begin = strrchr(end, '\\');
+
+               if(begin) keyname = begin + 1;
+               else keyname = mypath;
+
+               if(strlen(keyname))
+                       ret = talloc_asprintf_append(ret, "key=%s,", keyname);
                        
-               if(end) {
-                       *end = '\\';
-                       begin = end+1;
-               } else begin = NULL;
+               if(begin) {
+                       *begin = '\0';
+                       end = begin-1;
+               } else {
+                       end = NULL;
+               }
        }
 
-       ret[strlen(ret)-1] = ')';
-       printf("Doing search for : %s\n", ret);
+       SAFE_FREE(mypath);
+
+       ret[strlen(ret)-1] = '\0';
+
+       if(strlen(ret) == 0) return NULL;
+       
        return ret;
 }
 
-/* 
- * Saves the dn as private_data for every key/val
- */
 
-static WERROR ldb_open_registry(REG_HANDLE *handle, const char *location, const char *credentials)
+static WERROR ldb_get_subkey_by_id(TALLOC_CTX *mem_ctx, struct registry_key *k, int idx, struct registry_key **subkey)
 {
-       struct ldb_context *c;
-       c = ldb_connect(location, 0, NULL);
+       struct ldb_context *c = k->hive->backend_data;
+       int ret;
+       struct ldb_message **msg;
+       struct ldb_message_element *el;
 
-       if(!c) return WERR_FOOBAR;
+       ret = ldb_search(c, (char *)k->backend_data, LDB_SCOPE_ONELEVEL, "(key=*)", NULL,&msg);
+
+       if(ret < 0) {
+               DEBUG(0, ("Error getting subkeys for '%s': %s\n", (char *)k->backend_data, ldb_errstring(c)));
+               return WERR_FOOBAR;
+       }
 
-       handle->backend_data = c;
+       if(idx >= ret) return WERR_NO_MORE_ITEMS;
        
-       return WERR_OK;
-}
+       el = ldb_msg_find_element(msg[idx], "key");
+       
+       *subkey = talloc_p(mem_ctx, struct registry_key);
+       (*subkey)->name = talloc_strdup(mem_ctx, el->values[0].data);
+       (*subkey)->backend_data = talloc_strdup(mem_ctx, msg[idx]->dn);
 
-static WERROR ldb_close_registry(REG_HANDLE *h) 
-{
-       ldb_close((struct ldb_context *)h->backend_data);
+       ldb_search_free(c, msg);
        return WERR_OK;
 }
 
-static WERROR ldb_fetch_subkeys(REG_KEY *k, int *count, REG_KEY ***subkeys)
+static WERROR ldb_get_value_by_id(TALLOC_CTX *mem_ctx, struct registry_key *k, int idx, struct registry_value **value)
 {
-       struct ldb_context *c = k->handle->backend_data;
-       char *path;
+       struct ldb_context *c = k->hive->backend_data;
+       int ret;
        struct ldb_message **msg;
-       char *ldap_path;
-       TALLOC_CTX *mem_ctx = talloc_init("ldb_path");
-       REG_KEY *key = NULL;
-       ldap_path = reg_path_to_ldb(mem_ctx, reg_key_get_path(k));
-       
-       if(ldb_search(c, NULL, LDB_SCOPE_ONELEVEL, ldap_path, NULL,&msg) > 0) {
-               key = reg_key_new_abs(reg_key_get_path(k), k->handle, ldap_path);
-               talloc_steal(mem_ctx, key->mem_ctx, ldap_path);
-               /* FIXME */
+       struct ldb_message_element *el;
+
+       ret = ldb_search(c, (char *)k->backend_data, LDB_SCOPE_ONELEVEL, "(value=*)", NULL,&msg);
+
+       if(ret < 0) {
+               DEBUG(0, ("Error getting values for '%s': %s\n", (char *)k->backend_data, ldb_errstring(c)));
+               return WERR_FOOBAR;
        }
 
+       if(idx >= ret) return WERR_NO_MORE_ITEMS;
+       
+       el = ldb_msg_find_element(msg[idx], "value");
+       
+       *value = talloc_p(mem_ctx, struct registry_value);
+       (*value)->name = talloc_strdup(mem_ctx, el->values[0].data);
+       (*value)->backend_data = talloc_strdup(mem_ctx, msg[idx]->dn);
+
        ldb_search_free(c, msg);
-       talloc_destroy(mem_ctx);
        return WERR_OK;
 }
 
-static WERROR ldb_get_hive(REG_HANDLE *h, int num, REG_KEY **key)
-{
-       /* FIXME */
-       return WERR_FOOBAR;     
-}
-
-static WERROR ldb_open_key(REG_HANDLE *h, int num, const char *name, REG_KEY **key)
+static WERROR ldb_open_key(TALLOC_CTX *mem_ctx, struct registry_hive *h, const char *name, struct registry_key **key)
 {
        struct ldb_context *c = h->backend_data;
-       char *path;
        struct ldb_message **msg;
        char *ldap_path;
-       TALLOC_CTX *mem_ctx = talloc_init("ldb_path");
-       ldap_path = reg_path_to_ldb(mem_ctx, name);
+       int ret;
+       ldap_path = reg_path_to_ldb(mem_ctx, name, NULL);
        
-       if(ldb_search(c, NULL, LDB_SCOPE_BASE, ldap_path, NULL,&msg) > 0) {
-               *key = reg_key_new_abs(name, h, ldap_path);
-               talloc_steal(mem_ctx, (*key)->mem_ctx, ldap_path);
-               /* FIXME */
+       ret = ldb_search(c, ldap_path, LDB_SCOPE_BASE, "(key=*)", NULL,&msg);
+
+       if(ret == 0) {
+               return WERR_NO_MORE_ITEMS;
+       } else if(ret < 0) {
+               DEBUG(0, ("Error opening key '%s': %s\n", ldap_path, ldb_errstring(c)));
+               return WERR_FOOBAR;
        }
 
+       *key = talloc_p(mem_ctx, struct registry_key);
+       (*key)->name = talloc_strdup(mem_ctx, strrchr(name, '\\'));
+       (*key)->backend_data = talloc_strdup(mem_ctx, msg[0]->dn);
+
        ldb_search_free(c, msg);
-       talloc_destroy(mem_ctx);
 
        return WERR_OK;
 }
 
-static struct registry_ops reg_backend_ldb = {
+static WERROR ldb_open_hive(TALLOC_CTX *mem_ctx, struct registry_hive *hive, struct registry_key **k)
+{
+       struct ldb_context *c;
+
+       if (!hive->location) return WERR_INVALID_PARAM;
+       c = ldb_connect(hive->location, 0, NULL);
+
+       if(!c) return WERR_FOOBAR;
+       ldb_set_debug_stderr(c);
+       hive->backend_data = c;
+
+       return ldb_open_key(mem_ctx, hive, "", k);
+}
+
+static struct registry_operations reg_backend_ldb = {
        .name = "ldb",
-       .open_registry = ldb_open_registry,
-       .close_registry = ldb_close_registry,
+       .open_hive = ldb_open_hive,
        .open_key = ldb_open_key,
-       .fetch_subkeys = ldb_fetch_subkeys,
+       .get_value_by_index = ldb_get_value_by_id,
+       .get_subkey_by_index = ldb_get_subkey_by_id,
 };
 
 NTSTATUS registry_ldb_init(void)