Remove pstrings from nsswitch/ and registry/
[tprouty/samba.git] / source / registry / reg_util.c
1 /* 
2  *  Unix SMB/CIFS implementation.
3  *  Virtual Windows Registry Layer (utility functions)
4  *  Copyright (C) Gerald Carter                     2002-2005
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 3 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19
20 /* Implementation of registry frontend view functions. */
21
22 #include "includes.h"
23
24 #undef DBGC_CLASS
25 #define DBGC_CLASS DBGC_REGISTRY
26
27 /***********************************************************************
28  Utility function for splitting the base path of a registry path off
29  by setting base and new_path to the apprapriate offsets withing the
30  path.
31
32  WARNING!!  Does modify the original string!
33  ***********************************************************************/
34
35 bool reg_split_path(char *path, char **base, char **new_path)
36 {
37         char *p;
38
39         *new_path = *base = NULL;
40
41         if (!path) {
42                 return false;
43         }
44         *base = path;
45
46         p = strchr(path, '\\');
47
48         if ( p ) {
49                 *p = '\0';
50                 *new_path = p+1;
51         }
52
53         return true;
54 }
55
56 /***********************************************************************
57  Utility function for splitting the base path of a registry path off
58  by setting base and new_path to the appropriate offsets withing the
59  path.
60
61  WARNING!!  Does modify the original string!
62  ***********************************************************************/
63
64 bool reg_split_key(char *path, char **base, char **key)
65 {
66         char *p;
67
68         *key = *base = NULL;
69
70         if (!path) {
71                 return false;
72         }
73
74         *base = path;
75
76         p = strrchr(path, '\\');
77
78         if (p) {
79                 *p = '\0';
80                 *key = p+1;
81         }
82
83         return true;
84 }
85
86 /**********************************************************************
87  The full path to the registry key is used as database after the
88  \'s are converted to /'s.  Key string is also normalized to UPPER
89  case.
90 **********************************************************************/
91
92 char *normalize_reg_path(TALLOC_CTX *ctx, const char *keyname )
93 {
94         char *nkeyname = talloc_string_sub(ctx, keyname, "\\", "/");
95         if (!nkeyname) {
96                 return NULL;
97         }
98         strupper_m(nkeyname);
99         return nkeyname;
100 }
101
102 /**********************************************************************
103  move to next non-delimter character
104 *********************************************************************/
105
106 char *reg_remaining_path(TALLOC_CTX *ctx, const char *key)
107 {
108         char *new_path = NULL;
109         char *p = NULL;
110
111         if (!key || !*key) {
112                 return NULL;
113         }
114
115         new_path = talloc_strdup(ctx, key);
116         if (!new_path) {
117                 return NULL;
118         }
119         /* normalize_reg_path( new_path ); */
120         if (!(p = strchr(new_path, '\\')) ) {
121                 if (!(p = strchr( new_path, '/'))) {
122                         p = new_path;
123                 } else {
124                         p++;
125                 }
126         } else {
127                 p++;
128         }
129
130         return p;
131 }
132
133 /**********************************************************************
134 *********************************************************************/
135
136 int regval_convert_multi_sz( uint16 *multi_string, size_t byte_len, char ***values )
137 {
138         char **sz;
139         int i;
140         int num_strings = 0;
141         fstring buffer;
142         uint16 *wp;
143         size_t multi_len = byte_len / 2;
144
145         if ( !multi_string || !values )
146                 return 0;
147
148         *values = NULL;
149
150         /* just count the NULLs */
151
152         for ( i=0; (i<multi_len-1) && !(multi_string[i]==0x0 && multi_string[i+1]==0x0); i++ ) {
153                 /* peek ahead */
154                 if ( multi_string[i+1] == 0x0 )
155                         num_strings++;
156         }
157
158         if ( num_strings == 0 )
159                 return 0;
160
161         if ( !(sz = TALLOC_ARRAY( NULL, char*, num_strings+1 )) ) {
162                 DEBUG(0,("reg_convert_multi_sz: talloc() failed!\n"));
163                 return -1;
164         }
165
166         wp = multi_string;
167
168         for ( i=0; i<num_strings; i++ ) {
169                 rpcstr_pull( buffer, wp, sizeof(buffer), -1, STR_TERMINATE );
170                 sz[i] = talloc_strdup( sz, buffer );
171
172                 /* skip to the next string NULL and then one more */
173                 while ( *wp )
174                         wp++;
175                 wp++;
176         }
177
178         /* tag the array off with an empty string */
179         sz[i] = '\0';
180
181         *values = sz;
182
183         return num_strings;
184 }
185
186 /**********************************************************************
187  Returns number of bytes, not number of unicode characters
188 *********************************************************************/
189
190 size_t regval_build_multi_sz( char **values, uint16 **buffer )
191 {
192         int i;
193         size_t buf_size = 0;
194         uint16 *buf, *b;
195         UNISTR2 sz;
196
197         if ( !values || !buffer )
198                 return 0;
199
200         /* go ahead and alloc some space */
201
202         if ( !(buf = TALLOC_ARRAY( NULL, uint16, 2 )) ) {
203                 DEBUG(0,("regval_build_multi_sz: talloc() failed!\n"));
204                 return 0;
205         }
206
207         for ( i=0; values[i]; i++ ) {
208                 ZERO_STRUCT( sz );
209                 /* DEBUG(0,("regval_build_multi_sz: building [%s]\n",values[i])); */
210                 init_unistr2( &sz, values[i], UNI_STR_TERMINATE );
211
212                 /* Alloc some more memory.  Always add one one to account for the 
213                    double NULL termination */
214
215                 b = TALLOC_REALLOC_ARRAY( NULL, buf, uint16, buf_size+sz.uni_str_len+1 );
216                 if ( !b ) {
217                         DEBUG(0,("regval_build_multi_sz: talloc() reallocation error!\n"));
218                         TALLOC_FREE( buffer );
219                         return 0;
220                 }
221                 buf = b;
222
223                 /* copy the unistring2 buffer and increment the size */
224                 /* dump_data(1,sz.buffer,sz.uni_str_len*2); */
225                 memcpy( buf+buf_size, sz.buffer, sz.uni_str_len*2 );
226                 buf_size += sz.uni_str_len;
227
228                 /* cleanup rather than leaving memory hanging around */
229                 TALLOC_FREE( sz.buffer );
230         }
231
232         buf[buf_size++] = 0x0;
233
234         *buffer = buf;
235
236         /* return number of bytes */
237         return buf_size*2;
238 }