s3:registry: fix regval_ctr_addvalue() to take data as uint8 *, not char *.
[amitay/samba.git] / source3 / registry / reg_objects.c
index 89fdae7b8c205ad88e9b76548e74270299dd62ff..52f2b6bbf1a18063d2af56f828f9cbcf7b778dcb 100644 (file)
@@ -1,4 +1,4 @@
-/* 
+/*
  *  Unix SMB/CIFS implementation.
  *  Virtual Windows Registry Layer
  *  Copyright (C) Gerald Carter                     2002-2005
@@ -7,12 +7,12 @@
  *  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, see <http://www.gnu.org/licenses/>.
  */
 /* Implementation of registry frontend view functions. */
 
 #include "includes.h"
+#include "registry.h"
 
 #undef DBGC_CLASS
-#define DBGC_CLASS DBGC_RPC_SRV
+#define DBGC_CLASS DBGC_REGISTRY
+
+struct regsubkey_ctr {
+       uint32_t        num_subkeys;
+       char            **subkeys;
+       struct db_context *subkeys_hash;
+       int seqnum;
+};
 
 /**********************************************************************
 
- Note that the REGSUB_CTR and REGVAL_CTR objects *must* be talloc()'d
- since the methods use the object pointer as the talloc context for 
- internal private data.
+ Note that the struct regsubkey_ctr and struct regval_ctr objects *must* be
+ talloc()'d since the methods use the object pointer as the talloc
context for internal private data.
 
- There is no longer a regXXX_ctr_intit() and regXXX_ctr_destroy()
- pair of functions.  Simply TALLOC_ZERO_P() and TALLOC_FREE() the 
+ There is no longer a regval_ctr_intit() and regval_ctr_destroy()
+ pair of functions.  Simply TALLOC_ZERO_P() and TALLOC_FREE() the
  object.
 
  **********************************************************************/
 
+WERROR regsubkey_ctr_init(TALLOC_CTX *mem_ctx, struct regsubkey_ctr **ctr)
+{
+       if (ctr == NULL) {
+               return WERR_INVALID_PARAM;
+       }
+
+       *ctr = talloc_zero(mem_ctx, struct regsubkey_ctr);
+       if (*ctr == NULL) {
+               return WERR_NOMEM;
+       }
+
+       (*ctr)->subkeys_hash = db_open_rbt(*ctr);
+       if ((*ctr)->subkeys_hash == NULL) {
+               talloc_free(*ctr);
+               return WERR_NOMEM;
+       }
+
+       return WERR_OK;
+}
+
+/**
+ * re-initialize the list of subkeys (to the emtpy list)
+ * in an already allocated regsubkey_ctr
+ */
+
+WERROR regsubkey_ctr_reinit(struct regsubkey_ctr *ctr)
+{
+       if (ctr == NULL) {
+               return WERR_INVALID_PARAM;
+       }
+
+       talloc_free(ctr->subkeys_hash);
+       ctr->subkeys_hash = db_open_rbt(ctr);
+       W_ERROR_HAVE_NO_MEMORY(ctr->subkeys_hash);
+
+       TALLOC_FREE(ctr->subkeys);
+
+       ctr->num_subkeys = 0;
+       ctr->seqnum = 0;
+
+       return WERR_OK;
+}
+
+WERROR regsubkey_ctr_set_seqnum(struct regsubkey_ctr *ctr, int seqnum)
+{
+       if (ctr == NULL) {
+               return WERR_INVALID_PARAM;
+       }
+
+       ctr->seqnum = seqnum;
+
+       return WERR_OK;
+}
+
+int regsubkey_ctr_get_seqnum(struct regsubkey_ctr *ctr)
+{
+       if (ctr == NULL) {
+               return -1;
+       }
+
+       return ctr->seqnum;
+}
+
+static WERROR regsubkey_ctr_hash_keyname(struct regsubkey_ctr *ctr,
+                                        const char *keyname,
+                                        uint32 idx)
+{
+       WERROR werr;
+
+       werr = ntstatus_to_werror(dbwrap_store_bystring_upper(ctr->subkeys_hash,
+                                               keyname,
+                                               make_tdb_data((uint8 *)&idx,
+                                                             sizeof(idx)),
+                                               TDB_REPLACE));
+       if (!W_ERROR_IS_OK(werr)) {
+               DEBUG(1, ("error hashing new key '%s' in container: %s\n",
+                         keyname, win_errstr(werr)));
+       }
+
+       return werr;
+}
+
+static WERROR regsubkey_ctr_unhash_keyname(struct regsubkey_ctr *ctr,
+                                          const char *keyname)
+{
+       WERROR werr;
+
+       werr = ntstatus_to_werror(dbwrap_delete_bystring_upper(ctr->subkeys_hash,
+                                 keyname));
+       if (!W_ERROR_IS_OK(werr)) {
+               DEBUG(1, ("error unhashing key '%s' in container: %s\n",
+                         keyname, win_errstr(werr)));
+       }
+
+       return werr;
+}
+
+static WERROR regsubkey_ctr_index_for_keyname(struct regsubkey_ctr *ctr,
+                                             const char *keyname,
+                                             uint32 *idx)
+{
+       TDB_DATA data;
+
+       if ((ctr == NULL) || (keyname == NULL)) {
+               return WERR_INVALID_PARAM;
+       }
+
+       data = dbwrap_fetch_bystring_upper(ctr->subkeys_hash, ctr, keyname);
+       if (data.dptr == NULL) {
+               return WERR_NOT_FOUND;
+       }
+
+       if (data.dsize != sizeof(*idx)) {
+               talloc_free(data.dptr);
+               return WERR_INVALID_DATATYPE;
+       }
+
+       if (idx != NULL) {
+               *idx = *(uint32 *)data.dptr;
+       }
+
+       talloc_free(data.dptr);
+       return WERR_OK;
+}
+
 /***********************************************************************
  Add a new key to the array
  **********************************************************************/
 
-WERROR regsubkey_ctr_addkey( REGSUBKEY_CTR *ctr, const char *keyname )
+WERROR regsubkey_ctr_addkey( struct regsubkey_ctr *ctr, const char *keyname )
 {
        char **newkeys;
+       WERROR werr;
 
        if ( !keyname ) {
                return WERR_OK;
@@ -68,65 +202,77 @@ WERROR regsubkey_ctr_addkey( REGSUBKEY_CTR *ctr, const char *keyname )
                 */
                return WERR_NOMEM;
        }
+
+       werr = regsubkey_ctr_hash_keyname(ctr, keyname, ctr->num_subkeys);
+       W_ERROR_NOT_OK_RETURN(werr);
+
        ctr->num_subkeys++;
 
        return WERR_OK;
 }
+
  /***********************************************************************
  Delete a key from the array
  **********************************************************************/
 
-int regsubkey_ctr_delkey( REGSUBKEY_CTR *ctr, const char *keyname )
+WERROR regsubkey_ctr_delkey( struct regsubkey_ctr *ctr, const char *keyname )
 {
-       int i;
+       WERROR werr;
+       uint32 idx, j;
 
-       if ( !keyname )
-               return ctr->num_subkeys;
+       if (keyname == NULL) {
+               return WERR_INVALID_PARAM;
+       }
 
        /* make sure the keyname is actually already there */
 
-       for ( i=0; i<ctr->num_subkeys; i++ ) {
-               if ( strequal( ctr->subkeys[i], keyname ) )
-                       break;
-       }
-       
-       if ( i == ctr->num_subkeys )
-               return ctr->num_subkeys;
+       werr = regsubkey_ctr_index_for_keyname(ctr, keyname, &idx);
+       W_ERROR_NOT_OK_RETURN(werr);
+
+       werr = regsubkey_ctr_unhash_keyname(ctr, keyname);
+       W_ERROR_NOT_OK_RETURN(werr);
 
        /* update if we have any keys left */
        ctr->num_subkeys--;
-       if ( i < ctr->num_subkeys )
-               memmove( &ctr->subkeys[i], &ctr->subkeys[i+1], sizeof(char*) * (ctr->num_subkeys-i) );
-       
-       return ctr->num_subkeys;
+       if (idx < ctr->num_subkeys) {
+               memmove(&ctr->subkeys[idx], &ctr->subkeys[idx+1],
+                       sizeof(char *) * (ctr->num_subkeys - idx));
+
+               /* we have to re-hash rest of the array...  :-( */
+               for (j = idx; j < ctr->num_subkeys; j++) {
+                       werr = regsubkey_ctr_hash_keyname(ctr, ctr->subkeys[j], j);
+                       W_ERROR_NOT_OK_RETURN(werr);
+               }
+       }
+
+       return WERR_OK;
 }
 
 /***********************************************************************
  Check for the existance of a key
  **********************************************************************/
 
-BOOL regsubkey_ctr_key_exists( REGSUBKEY_CTR *ctr, const char *keyname )
+bool regsubkey_ctr_key_exists( struct regsubkey_ctr *ctr, const char *keyname )
 {
-       int     i;
-       
+       WERROR werr;
+
        if (!ctr->subkeys) {
                return False;
        }
 
-       for ( i=0; i<ctr->num_subkeys; i++ ) {
-               if ( strequal( ctr->subkeys[i],keyname ) )
-                       return True;
+       werr = regsubkey_ctr_index_for_keyname(ctr, keyname, NULL);
+       if (!W_ERROR_IS_OK(werr)) {
+               return false;
        }
-       
-       return False;
+
+       return true;
 }
 
 /***********************************************************************
  How many keys does the container hold ?
  **********************************************************************/
 
-int regsubkey_ctr_numkeys( REGSUBKEY_CTR *ctr )
+int regsubkey_ctr_numkeys( struct regsubkey_ctr *ctr )
 {
        return ctr->num_subkeys;
 }
@@ -135,85 +281,85 @@ int regsubkey_ctr_numkeys( REGSUBKEY_CTR *ctr )
  Retreive a specific key string
  **********************************************************************/
 
-char* regsubkey_ctr_specific_key( REGSUBKEY_CTR *ctr, uint32 key_index )
+char* regsubkey_ctr_specific_key( struct regsubkey_ctr *ctr, uint32_t key_index )
 {
        if ( ! (key_index < ctr->num_subkeys) )
                return NULL;
-               
+
        return ctr->subkeys[key_index];
 }
 
 /*
- * Utility functions for REGVAL_CTR
+ * Utility functions for struct regval_ctr
  */
 
 /***********************************************************************
  How many keys does the container hold ?
  **********************************************************************/
 
-int regval_ctr_numvals( REGVAL_CTR *ctr )
+int regval_ctr_numvals(struct regval_ctr *ctr)
 {
        return ctr->num_values;
 }
 
 /***********************************************************************
- allocate memory for and duplicate a REGISTRY_VALUE.
+ allocate memory for and duplicate a struct regval_blob.
  This is malloc'd memory so the caller should free it when done
  **********************************************************************/
 
-REGISTRY_VALUE* dup_registry_value( REGISTRY_VALUE *val )
+struct regval_blob* dup_registry_value(struct regval_blob *val)
 {
-       REGISTRY_VALUE  *copy = NULL;
-       
+       struct regval_blob *copy = NULL;
+
        if ( !val )
                return NULL;
-       
-       if ( !(copy = SMB_MALLOC_P( REGISTRY_VALUE)) ) {
+
+       if ( !(copy = SMB_MALLOC_P( struct regval_blob)) ) {
                DEBUG(0,("dup_registry_value: malloc() failed!\n"));
                return NULL;
        }
-       
+
        /* copy all the non-pointer initial data */
-       
-       memcpy( copy, val, sizeof(REGISTRY_VALUE) );
-       
+
+       memcpy( copy, val, sizeof(struct regval_blob) );
+
        copy->size = 0;
        copy->data_p = NULL;
-       
-       if ( val->data_p && val->size ) 
+
+       if ( val->data_p && val->size )
        {
                if ( !(copy->data_p = (uint8 *)memdup( val->data_p,
                                                       val->size )) ) {
-                       DEBUG(0,("dup_registry_value: memdup() failed for [%d] bytes!\n",
-                               val->size));
+                       DEBUG(0,("dup_registry_value: memdup() failed for [%d] "
+                                "bytes!\n", val->size));
                        SAFE_FREE( copy );
                        return NULL;
                }
                copy->size = val->size;
        }
-       
-       return copy;    
+
+       return copy;
 }
 
 /**********************************************************************
- free the memory allocated to a REGISTRY_VALUE 
+ free the memory allocated to a struct regval_blob
  *********************************************************************/
-void free_registry_value( REGISTRY_VALUE *val )
+
+void free_registry_value(struct regval_blob *val)
 {
        if ( !val )
                return;
-               
+
        SAFE_FREE( val->data_p );
        SAFE_FREE( val );
-       
+
        return;
 }
 
 /**********************************************************************
  *********************************************************************/
 
-uint8* regval_data_p( REGISTRY_VALUE *val )
+uint8* regval_data_p(struct regval_blob *val)
 {
        return val->data_p;
 }
@@ -221,7 +367,7 @@ uint8* regval_data_p( REGISTRY_VALUE *val )
 /**********************************************************************
  *********************************************************************/
 
-uint32 regval_size( REGISTRY_VALUE *val )
+uint32 regval_size(struct regval_blob *val)
 {
        return val->size;
 }
@@ -229,7 +375,7 @@ uint32 regval_size( REGISTRY_VALUE *val )
 /**********************************************************************
  *********************************************************************/
 
-char* regval_name( REGISTRY_VALUE *val )
+char* regval_name(struct regval_blob *val)
 {
        return val->valuename;
 }
@@ -237,7 +383,7 @@ char* regval_name( REGISTRY_VALUE *val )
 /**********************************************************************
  *********************************************************************/
 
-uint32 regval_type( REGISTRY_VALUE *val )
+uint32 regval_type(struct regval_blob *val)
 {
        return val->type;
 }
@@ -247,11 +393,12 @@ uint32 regval_type( REGISTRY_VALUE *val )
  since this memory will go away when the ctr is free()'d
  **********************************************************************/
 
-REGISTRY_VALUE* regval_ctr_specific_value( REGVAL_CTR *ctr, uint32 idx )
+struct regval_blob *regval_ctr_specific_value(struct regval_ctr *ctr,
+                                             uint32 idx)
 {
        if ( !(idx < ctr->num_values) )
                return NULL;
-               
+
        return ctr->values[idx];
 }
 
@@ -259,26 +406,27 @@ REGISTRY_VALUE* regval_ctr_specific_value( REGVAL_CTR *ctr, uint32 idx )
  Check for the existance of a value
  **********************************************************************/
 
-BOOL regval_ctr_key_exists( REGVAL_CTR *ctr, const char *value )
+bool regval_ctr_key_exists(struct regval_ctr *ctr, const char *value)
 {
        int     i;
-       
+
        for ( i=0; i<ctr->num_values; i++ ) {
                if ( strequal( ctr->values[i]->valuename, value) )
                        return True;
        }
-       
+
        return False;
 }
 
 /***********************************************************************
- * compose a REGISTRY_VALUE from input data
+ * compose a struct regval_blob from input data
  **********************************************************************/
 
-REGISTRY_VALUE *regval_compose(TALLOC_CTX *ctx, const char *name, uint16 type,
-                              const char *data_p, size_t size)
+struct regval_blob *regval_compose(TALLOC_CTX *ctx, const char *name,
+                                  uint16 type,
+                                  const uint8 *data_p, size_t size)
 {
-       REGISTRY_VALUE *regval = TALLOC_P(ctx, REGISTRY_VALUE);
+       struct regval_blob *regval = TALLOC_P(ctx, struct regval_blob);
 
        if (regval == NULL) {
                return NULL;
@@ -304,8 +452,8 @@ REGISTRY_VALUE *regval_compose(TALLOC_CTX *ctx, const char *name, uint16 type,
  Add a new registry value to the array
  **********************************************************************/
 
-int regval_ctr_addvalue( REGVAL_CTR *ctr, const char *name, uint16 type, 
-                         const char *data_p, size_t size )
+int regval_ctr_addvalue(struct regval_ctr *ctr, const char *name, uint16 type,
+                        const uint8 *data_p, size_t size)
 {
        if ( !name )
                return ctr->num_values;
@@ -315,11 +463,13 @@ int regval_ctr_addvalue( REGVAL_CTR *ctr, const char *name, uint16 type,
        regval_ctr_delvalue( ctr, name );
 
        /* allocate a slot in the array of pointers */
-               
+
        if (  ctr->num_values == 0 ) {
-               ctr->values = TALLOC_P( ctr, REGISTRY_VALUE *);
+               ctr->values = TALLOC_P( ctr, struct regval_blob *);
        } else {
-               ctr->values = TALLOC_REALLOC_ARRAY( ctr, ctr->values, REGISTRY_VALUE *, ctr->num_values+1 );
+               ctr->values = TALLOC_REALLOC_ARRAY(ctr, ctr->values,
+                                                  struct regval_blob *,
+                                                  ctr->num_values+1);
        }
 
        if (!ctr->values) {
@@ -328,7 +478,7 @@ int regval_ctr_addvalue( REGVAL_CTR *ctr, const char *name, uint16 type,
        }
 
        /* allocate a new value and store the pointer in the arrya */
-               
+
        ctr->values[ctr->num_values] = regval_compose(ctr, name, type, data_p,
                                                      size);
        if (ctr->values[ctr->num_values] == NULL) {
@@ -340,15 +490,49 @@ int regval_ctr_addvalue( REGVAL_CTR *ctr, const char *name, uint16 type,
        return ctr->num_values;
 }
 
+/***********************************************************************
+ Add a new registry SZ value to the array
+ **********************************************************************/
+
+int regval_ctr_addvalue_sz(struct regval_ctr *ctr, const char *name, const char *data)
+{
+       DATA_BLOB blob;
+
+       if (!push_reg_sz(ctr, &blob, data)) {
+               return -1;
+       }
+
+       return regval_ctr_addvalue(ctr, name, REG_SZ,
+                                  (const uint8 *)blob.data,
+                                  blob.length);
+}
+
+/***********************************************************************
+ Add a new registry MULTI_SZ value to the array
+ **********************************************************************/
+
+int regval_ctr_addvalue_multi_sz(struct regval_ctr *ctr, const char *name, const char **data)
+{
+       DATA_BLOB blob;
+
+       if (!push_reg_multi_sz(ctr, &blob, data)) {
+               return -1;
+       }
+
+       return regval_ctr_addvalue(ctr, name, REG_MULTI_SZ,
+                                  (const uint8 *)blob.data,
+                                  blob.length);
+}
+
 /***********************************************************************
  Add a new registry value to the array
  **********************************************************************/
 
-int regval_ctr_copyvalue( REGVAL_CTR *ctr, REGISTRY_VALUE *val )
+int regval_ctr_copyvalue(struct regval_ctr *ctr, struct regval_blob *val)
 {
        if ( val ) {
                regval_ctr_addvalue(ctr, val->valuename, val->type,
-                                   (char *)val->data_p, val->size);
+                                   (uint8 *)val->data_p, val->size);
        }
 
        return ctr->num_values;
@@ -359,25 +543,26 @@ int regval_ctr_copyvalue( REGVAL_CTR *ctr, REGISTRY_VALUE *val )
  No need to free memory since it is talloc'd.
  **********************************************************************/
 
-int regval_ctr_delvalue( REGVAL_CTR *ctr, const char *name )
+int regval_ctr_delvalue(struct regval_ctr *ctr, const char *name)
 {
        int     i;
-       
+
        for ( i=0; i<ctr->num_values; i++ ) {
                if ( strequal( ctr->values[i]->valuename, name ) )
                        break;
        }
-       
+
        /* just return if we don't find it */
-       
+
        if ( i == ctr->num_values )
                return ctr->num_values;
-       
+
        /* If 'i' was not the last element, just shift everything down one */
        ctr->num_values--;
        if ( i < ctr->num_values )
-               memmove( &ctr->values[i], &ctr->values[i+1], sizeof(REGISTRY_VALUE*)*(ctr->num_values-i) );
-       
+               memmove(&ctr->values[i], &ctr->values[i+1],
+                       sizeof(struct regval_blob*)*(ctr->num_values-i));
+
        return ctr->num_values;
 }
 
@@ -386,17 +571,18 @@ int regval_ctr_delvalue( REGVAL_CTR *ctr, const char *name )
  No need to free memory since it is talloc'd.
  **********************************************************************/
 
-REGISTRY_VALUE* regval_ctr_getvalue( REGVAL_CTR *ctr, const char *name )
+struct regval_blob* regval_ctr_getvalue(struct regval_ctr *ctr,
+                                       const char *name)
 {
        int     i;
-       
+
        /* search for the value */
-       
+
        for ( i=0; i<ctr->num_values; i++ ) {
                if ( strequal( ctr->values[i]->valuename, name ) )
                        return ctr->values[i];
        }
-       
+
        return NULL;
 }
 
@@ -404,12 +590,12 @@ REGISTRY_VALUE* regval_ctr_getvalue( REGVAL_CTR *ctr, const char *name )
  return the data_p as a uint32
  **********************************************************************/
 
-uint32 regval_dword( REGISTRY_VALUE *val )
+uint32 regval_dword(struct regval_blob *val)
 {
        uint32 data;
-       
+
        data = IVAL( regval_data_p(val), 0 );
-       
+
        return data;
 }
 
@@ -417,11 +603,12 @@ uint32 regval_dword( REGISTRY_VALUE *val )
  return the data_p as a character string
  **********************************************************************/
 
-char* regval_sz( REGISTRY_VALUE *val )
+const char *regval_sz(struct regval_blob *val)
 {
-       pstring data;
+       const char *data = NULL;
+       DATA_BLOB blob = data_blob_const(regval_data_p(val), regval_size(val));
+
+       pull_reg_sz(talloc_tos(), &blob, &data);
 
-       rpcstr_pull( data, regval_data_p(val), sizeof(data), regval_size(val), 0 );
-       
-       return talloc_strdup(talloc_tos(), data);
+       return data;
 }