Merge branch 'v3-2-test' of ssh://jra@git.samba.org/data/git/samba into v3-2-test
[ira/wip.git] / source3 / lib / sharesec.c
1 /* 
2  *  Unix SMB/Netbios implementation.
3  *  SEC_DESC handling functions
4  *  Copyright (C) Jeremy R. Allison            1995-2003.
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 #include "includes.h"
21
22 /*******************************************************************
23  Create the share security tdb.
24  ********************************************************************/
25
26 static TDB_CONTEXT *share_tdb; /* used for share security descriptors */
27 #define SHARE_DATABASE_VERSION_V1 1
28 #define SHARE_DATABASE_VERSION_V2 2 /* version id in little endian. */
29
30 /* Map generic permissions to file object specific permissions */
31
32 static const struct generic_mapping file_generic_mapping = {
33         FILE_GENERIC_READ,
34         FILE_GENERIC_WRITE,
35         FILE_GENERIC_EXECUTE,
36         FILE_GENERIC_ALL
37 };
38
39
40 static bool share_info_db_init(void)
41 {
42         const char *vstring = "INFO/version";
43         int32 vers_id;
44  
45         if (share_tdb) {
46                 return True;
47         }
48
49         share_tdb = tdb_open_log(state_path("share_info.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
50         if (!share_tdb) {
51                 DEBUG(0,("Failed to open share info database %s (%s)\n",
52                         state_path("share_info.tdb"), strerror(errno) ));
53                 return False;
54         }
55  
56         /* handle a Samba upgrade */
57         tdb_lock_bystring(share_tdb, vstring);
58
59         /* Cope with byte-reversed older versions of the db. */
60         vers_id = tdb_fetch_int32(share_tdb, vstring);
61         if ((vers_id == SHARE_DATABASE_VERSION_V1) || (IREV(vers_id) == SHARE_DATABASE_VERSION_V1)) {
62                 /* Written on a bigendian machine with old fetch_int code. Save as le. */
63                 tdb_store_int32(share_tdb, vstring, SHARE_DATABASE_VERSION_V2);
64                 vers_id = SHARE_DATABASE_VERSION_V2;
65         }
66
67         if (vers_id != SHARE_DATABASE_VERSION_V2) {
68                 tdb_traverse(share_tdb, tdb_traverse_delete_fn, NULL);
69                 tdb_store_int32(share_tdb, vstring, SHARE_DATABASE_VERSION_V2);
70         }
71         tdb_unlock_bystring(share_tdb, vstring);
72
73         return True;
74 }
75
76 /*******************************************************************
77  Fake up a Everyone, default access as a default.
78  def_access is a GENERIC_XXX access mode.
79  ********************************************************************/
80
81 SEC_DESC *get_share_security_default( TALLOC_CTX *ctx, size_t *psize, uint32 def_access)
82 {
83         SEC_ACCESS sa;
84         SEC_ACE ace;
85         SEC_ACL *psa = NULL;
86         SEC_DESC *psd = NULL;
87         uint32 spec_access = def_access;
88
89         se_map_generic(&spec_access, &file_generic_mapping);
90
91         init_sec_access(&sa, def_access | spec_access );
92         init_sec_ace(&ace, &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED, sa, 0);
93
94         if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, 1, &ace)) != NULL) {
95                 psd = make_sec_desc(ctx, SECURITY_DESCRIPTOR_REVISION_1,
96                                     SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL,
97                                     psa, psize);
98         }
99
100         if (!psd) {
101                 DEBUG(0,("get_share_security: Failed to make SEC_DESC.\n"));
102                 return NULL;
103         }
104
105         return psd;
106 }
107
108 /*******************************************************************
109  Pull a security descriptor from the share tdb.
110  ********************************************************************/
111
112 SEC_DESC *get_share_security( TALLOC_CTX *ctx, const char *servicename,
113                               size_t *psize)
114 {
115         char *key;
116         SEC_DESC *psd = NULL;
117         TDB_DATA data;
118         NTSTATUS status;
119
120         if (!share_info_db_init()) {
121                 return NULL;
122         }
123
124         if (!(key = talloc_asprintf(ctx, "SECDESC/%s", servicename))) {
125                 DEBUG(0, ("talloc_asprintf failed\n"));
126                 return NULL;
127         }
128
129         data = tdb_fetch_bystring(share_tdb, key);
130
131         TALLOC_FREE(key);
132
133         if (data.dptr == NULL) {
134                 return get_share_security_default(ctx, psize,
135                                                   GENERIC_ALL_ACCESS);
136         }
137
138         status = unmarshall_sec_desc(ctx, data.dptr, data.dsize, &psd);
139
140         if (!NT_STATUS_IS_OK(status)) {
141                 DEBUG(0, ("unmarshall_sec_desc failed: %s\n",
142                           nt_errstr(status)));
143                 return NULL;
144         }
145
146         if (psd)
147                 *psize = ndr_size_security_descriptor(psd, 0);
148
149         return psd;
150 }
151
152 /*******************************************************************
153  Store a security descriptor in the share db.
154  ********************************************************************/
155
156 bool set_share_security(const char *share_name, SEC_DESC *psd)
157 {
158         TALLOC_CTX *frame;
159         char *key;
160         bool ret = False;
161         TDB_DATA blob;
162         NTSTATUS status;
163
164         if (!share_info_db_init()) {
165                 return False;
166         }
167
168         frame = talloc_stackframe();
169
170         status = marshall_sec_desc(frame, psd, &blob.dptr, &blob.dsize);
171
172         if (!NT_STATUS_IS_OK(status)) {
173                 DEBUG(0, ("marshall_sec_desc failed: %s\n",
174                           nt_errstr(status)));
175                 goto out;
176         }
177
178         if (!(key = talloc_asprintf(frame, "SECDESC/%s", share_name))) {
179                 DEBUG(0, ("talloc_asprintf failed\n"));
180                 goto out;
181         }
182
183         if (tdb_trans_store_bystring(share_tdb, key, blob,
184                                      TDB_REPLACE) == -1) {
185                 DEBUG(1,("set_share_security: Failed to store secdesc for "
186                          "%s\n", share_name ));
187                 goto out;
188         }
189
190         DEBUG(5,("set_share_security: stored secdesc for %s\n", share_name ));
191         ret = True;
192
193  out:
194         TALLOC_FREE(frame);
195         return ret;
196 }
197
198 /*******************************************************************
199  Delete a security descriptor.
200 ********************************************************************/
201
202 bool delete_share_security(const char *servicename)
203 {
204         TDB_DATA kbuf;
205         char *key;
206
207         if (!(key = talloc_asprintf(talloc_tos(), "SECDESC/%s",
208                                     servicename))) {
209                 return False;
210         }
211         kbuf = string_term_tdb_data(key);
212
213         if (tdb_trans_delete(share_tdb, kbuf) != 0) {
214                 DEBUG(0, ("delete_share_security: Failed to delete entry for "
215                           "share %s\n", servicename));
216                 return False;
217         }
218
219         return True;
220 }
221
222 /*******************************************************************
223  Can this user access with share with the required permissions ?
224 ********************************************************************/
225
226 bool share_access_check(const NT_USER_TOKEN *token, const char *sharename,
227                         uint32 desired_access)
228 {
229         uint32 granted;
230         NTSTATUS status;
231         SEC_DESC *psd = NULL;
232         size_t sd_size;
233         bool ret = True;
234
235         psd = get_share_security(talloc_tos(), sharename, &sd_size);
236
237         if (!psd) {
238                 return True;
239         }
240
241         ret = se_access_check(psd, token, desired_access, &granted, &status);
242
243         TALLOC_FREE(psd);
244
245         return ret;
246 }
247
248 /***************************************************************************
249  Parse the contents of an acl string from a usershare file.
250 ***************************************************************************/
251
252 bool parse_usershare_acl(TALLOC_CTX *ctx, const char *acl_str, SEC_DESC **ppsd)
253 {
254         size_t s_size = 0;
255         const char *pacl = acl_str;
256         int num_aces = 0;
257         SEC_ACE *ace_list = NULL;
258         SEC_ACL *psa = NULL;
259         SEC_DESC *psd = NULL;
260         size_t sd_size = 0;
261         int i;
262
263         *ppsd = NULL;
264
265         /* If the acl string is blank return "Everyone:R" */
266         if (!*acl_str) {
267                 SEC_DESC *default_psd = get_share_security_default(ctx, &s_size, GENERIC_READ_ACCESS);
268                 if (!default_psd) {
269                         return False;
270                 }
271                 *ppsd = default_psd;
272                 return True;
273         }
274
275         num_aces = 1;
276
277         /* Add the number of ',' characters to get the number of aces. */
278         num_aces += count_chars(pacl,',');
279
280         ace_list = TALLOC_ARRAY(ctx, SEC_ACE, num_aces);
281         if (!ace_list) {
282                 return False;
283         }
284
285         for (i = 0; i < num_aces; i++) {
286                 SEC_ACCESS sa;
287                 uint32 g_access;
288                 uint32 s_access;
289                 DOM_SID sid;
290                 char *sidstr;
291                 enum security_ace_type type = SEC_ACE_TYPE_ACCESS_ALLOWED;
292
293                 if (!next_token_talloc(ctx, &pacl, &sidstr, ":")) {
294                         DEBUG(0,("parse_usershare_acl: malformed usershare acl looking "
295                                 "for ':' in string '%s'\n", pacl));
296                         return False;
297                 }
298
299                 if (!string_to_sid(&sid, sidstr)) {
300                         DEBUG(0,("parse_usershare_acl: failed to convert %s to sid.\n",
301                                 sidstr ));
302                         return False;
303                 }
304
305                 switch (*pacl) {
306                         case 'F': /* Full Control, ie. R+W */
307                         case 'f': /* Full Control, ie. R+W */
308                                 s_access = g_access = GENERIC_ALL_ACCESS;
309                                 break;
310                         case 'R': /* Read only. */
311                         case 'r': /* Read only. */
312                                 s_access = g_access = GENERIC_READ_ACCESS;
313                                 break;
314                         case 'D': /* Deny all to this SID. */
315                         case 'd': /* Deny all to this SID. */
316                                 type = SEC_ACE_TYPE_ACCESS_DENIED;
317                                 s_access = g_access = GENERIC_ALL_ACCESS;
318                                 break;
319                         default:
320                                 DEBUG(0,("parse_usershare_acl: unknown acl type at %s.\n",
321                                         pacl ));
322                                 return False;
323                 }
324
325                 pacl++;
326                 if (*pacl && *pacl != ',') {
327                         DEBUG(0,("parse_usershare_acl: bad acl string at %s.\n",
328                                 pacl ));
329                         return False;
330                 }
331                 pacl++; /* Go past any ',' */
332
333                 se_map_generic(&s_access, &file_generic_mapping);
334                 init_sec_access(&sa, g_access | s_access );
335                 init_sec_ace(&ace_list[i], &sid, type, sa, 0);
336         }
337
338         if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, num_aces, ace_list)) != NULL) {
339                 psd = make_sec_desc(ctx, SECURITY_DESCRIPTOR_REVISION_1,
340                                     SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL,
341                                     psa, &sd_size);
342         }
343
344         if (!psd) {
345                 DEBUG(0,("parse_usershare_acl: Failed to make SEC_DESC.\n"));
346                 return False;
347         }
348
349         *ppsd = psd;
350         return True;
351 }