s4:torture/rpc: avoid compiler warnings
[Samba.git] / source3 / lib / sharesec.c
blobe9a3eae91784abe64512ea32942984dfd0ec3943
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.
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.
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/>.
20 #include "includes.h"
21 #include "system/filesys.h"
22 #include "../libcli/security/security.h"
23 #include "../librpc/gen_ndr/ndr_security.h"
24 #include "dbwrap/dbwrap.h"
25 #include "dbwrap/dbwrap_open.h"
26 #include "util_tdb.h"
28 /*******************************************************************
29 Create the share security tdb.
30 ********************************************************************/
32 static struct db_context *share_db; /* used for share security descriptors */
33 #define SHARE_DATABASE_VERSION_V1 1
34 #define SHARE_DATABASE_VERSION_V2 2 /* version id in little endian. */
35 #define SHARE_DATABASE_VERSION_V3 3 /* canonicalized sharenames as lower case */
37 #define SHARE_SECURITY_DB_KEY_PREFIX_STR "SECDESC/"
38 /* Map generic permissions to file object specific permissions */
40 extern const struct generic_mapping file_generic_mapping;
42 static int delete_fn(struct db_record *rec, void *priv)
44 dbwrap_record_delete(rec);
45 return 0;
48 /*****************************************************
49 Looking for keys of the form: SHARE_SECURITY_DB_KEY_PREFIX_STR + "non lower case str".
50 If we find one re-write it into a canonical case form.
51 *****************************************************/
53 static int upgrade_v2_to_v3(struct db_record *rec, void *priv)
55 size_t prefix_len = strlen(SHARE_SECURITY_DB_KEY_PREFIX_STR);
56 const char *servicename = NULL;
57 char *c_servicename = NULL;
58 char *newkey = NULL;
59 bool *p_upgrade_ok = (bool *)priv;
60 NTSTATUS status;
61 TDB_DATA key;
62 TDB_DATA value;
64 key = dbwrap_record_get_key(rec);
66 /* Is there space for a one character sharename ? */
67 if (key.dsize <= prefix_len+2) {
68 return 0;
71 /* Does it start with the share key prefix ? */
72 if (memcmp(key.dptr, SHARE_SECURITY_DB_KEY_PREFIX_STR,
73 prefix_len) != 0) {
74 return 0;
77 /* Is it a null terminated string as a key ? */
78 if (key.dptr[key.dsize-1] != '\0') {
79 return 0;
82 /* Bytes after the prefix are the sharename string. */
83 servicename = (char *)&key.dptr[prefix_len];
84 c_servicename = canonicalize_servicename(talloc_tos(), servicename);
85 if (!c_servicename) {
86 smb_panic("out of memory upgrading share security db from v2 -> v3");
89 if (strcmp(servicename, c_servicename) == 0) {
90 /* Old and new names match. No canonicalization needed. */
91 TALLOC_FREE(c_servicename);
92 return 0;
95 /* Oops. Need to canonicalize name, delete old then store new. */
96 status = dbwrap_record_delete(rec);
97 if (!NT_STATUS_IS_OK(status)) {
98 DEBUG(1, ("upgrade_v2_to_v3: Failed to delete secdesc for "
99 "%s: %s\n", (const char *)key.dptr,
100 nt_errstr(status)));
101 TALLOC_FREE(c_servicename);
102 *p_upgrade_ok = false;
103 return -1;
104 } else {
105 DEBUG(10, ("upgrade_v2_to_v3: deleted secdesc for "
106 "%s\n", (const char *)key.dptr));
109 if (!(newkey = talloc_asprintf(talloc_tos(),
110 SHARE_SECURITY_DB_KEY_PREFIX_STR "%s",
111 c_servicename))) {
112 smb_panic("out of memory upgrading share security db from v2 -> v3");
115 value = dbwrap_record_get_value(rec);
116 status = dbwrap_store(share_db,
117 string_term_tdb_data(newkey),
118 value,
119 TDB_REPLACE);
121 if (!NT_STATUS_IS_OK(status)) {
122 DEBUG(1, ("upgrade_v2_to_v3: Failed to store secdesc for "
123 "%s: %s\n", c_servicename, nt_errstr(status)));
124 TALLOC_FREE(c_servicename);
125 TALLOC_FREE(newkey);
126 *p_upgrade_ok = false;
127 return -1;
128 } else {
129 DEBUG(10, ("upgrade_v2_to_v3: stored secdesc for "
130 "%s\n", newkey ));
133 TALLOC_FREE(newkey);
134 TALLOC_FREE(c_servicename);
136 return 0;
139 bool share_info_db_init(void)
141 const char *vstring = "INFO/version";
142 int32 vers_id = 0;
143 bool upgrade_ok = true;
144 NTSTATUS status;
145 char *db_path;
147 if (share_db != NULL) {
148 return True;
151 db_path = state_path("share_info.tdb");
152 if (db_path == NULL) {
153 return false;
156 share_db = db_open(NULL, db_path, 0,
157 TDB_DEFAULT, O_RDWR|O_CREAT, 0600,
158 DBWRAP_LOCK_ORDER_1, DBWRAP_FLAG_NONE);
159 if (share_db == NULL) {
160 DEBUG(0,("Failed to open share info database %s (%s)\n",
161 db_path, strerror(errno)));
162 TALLOC_FREE(db_path);
163 return False;
165 TALLOC_FREE(db_path);
167 status = dbwrap_fetch_int32_bystring(share_db, vstring, &vers_id);
168 if (!NT_STATUS_IS_OK(status)) {
169 vers_id = 0;
172 if (vers_id == SHARE_DATABASE_VERSION_V3) {
173 return true;
176 if (dbwrap_transaction_start(share_db) != 0) {
177 DEBUG(0, ("transaction_start failed\n"));
178 TALLOC_FREE(share_db);
179 return false;
182 status = dbwrap_fetch_int32_bystring(share_db, vstring, &vers_id);
183 if (!NT_STATUS_IS_OK(status)) {
184 vers_id = 0;
187 if (vers_id == SHARE_DATABASE_VERSION_V3) {
189 * Race condition
191 if (dbwrap_transaction_cancel(share_db)) {
192 smb_panic("transaction_cancel failed");
194 return true;
197 /* Move to at least V2. */
199 /* Cope with byte-reversed older versions of the db. */
200 if ((vers_id == SHARE_DATABASE_VERSION_V1) || (IREV(vers_id) == SHARE_DATABASE_VERSION_V1)) {
201 /* Written on a bigendian machine with old fetch_int code. Save as le. */
203 status = dbwrap_store_int32_bystring(
204 share_db, vstring, SHARE_DATABASE_VERSION_V2);
205 if (!NT_STATUS_IS_OK(status)) {
206 DEBUG(0, ("dbwrap_store_int32 failed: %s\n",
207 nt_errstr(status)));
208 goto cancel;
210 vers_id = SHARE_DATABASE_VERSION_V2;
213 if (vers_id != SHARE_DATABASE_VERSION_V2) {
214 status = dbwrap_traverse(share_db, delete_fn, NULL, NULL);
215 if (!NT_STATUS_IS_OK(status)) {
216 DEBUG(0, ("traverse failed\n"));
217 goto cancel;
219 status = dbwrap_store_int32_bystring(
220 share_db, vstring, SHARE_DATABASE_VERSION_V2);
221 if (!NT_STATUS_IS_OK(status)) {
222 DEBUG(0, ("dbwrap_store_int32 failed: %s\n",
223 nt_errstr(status)));
224 goto cancel;
228 /* Finally upgrade to version 3, with canonicalized sharenames. */
230 status = dbwrap_traverse(share_db, upgrade_v2_to_v3, &upgrade_ok, NULL);
231 if (!NT_STATUS_IS_OK(status) || upgrade_ok == false) {
232 DEBUG(0, ("traverse failed\n"));
233 goto cancel;
235 status = dbwrap_store_int32_bystring(
236 share_db, vstring, SHARE_DATABASE_VERSION_V3);
237 if (!NT_STATUS_IS_OK(status)) {
238 DEBUG(0, ("dbwrap_store_int32 failed: %s\n",
239 nt_errstr(status)));
240 goto cancel;
243 if (dbwrap_transaction_commit(share_db) != 0) {
244 DEBUG(0, ("transaction_commit failed\n"));
245 return false;
248 return true;
250 cancel:
251 if (dbwrap_transaction_cancel(share_db)) {
252 smb_panic("transaction_cancel failed");
255 return false;
258 /*******************************************************************
259 Fake up a Everyone, default access as a default.
260 def_access is a GENERIC_XXX access mode.
261 ********************************************************************/
263 struct security_descriptor *get_share_security_default( TALLOC_CTX *ctx, size_t *psize, uint32 def_access)
265 uint32_t sa;
266 struct security_ace ace;
267 struct security_acl *psa = NULL;
268 struct security_descriptor *psd = NULL;
269 uint32 spec_access = def_access;
271 se_map_generic(&spec_access, &file_generic_mapping);
273 sa = (def_access | spec_access );
274 init_sec_ace(&ace, &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED, sa, 0);
276 if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, 1, &ace)) != NULL) {
277 psd = make_sec_desc(ctx, SECURITY_DESCRIPTOR_REVISION_1,
278 SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL,
279 psa, psize);
282 if (!psd) {
283 DEBUG(0,("get_share_security: Failed to make SEC_DESC.\n"));
284 return NULL;
287 return psd;
290 /*******************************************************************
291 Pull a security descriptor from the share tdb.
292 ********************************************************************/
294 struct security_descriptor *get_share_security( TALLOC_CTX *ctx, const char *servicename,
295 size_t *psize)
297 char *key;
298 struct security_descriptor *psd = NULL;
299 TDB_DATA data;
300 char *c_servicename = canonicalize_servicename(talloc_tos(), servicename);
301 NTSTATUS status;
303 if (!c_servicename) {
304 return NULL;
307 if (!share_info_db_init()) {
308 TALLOC_FREE(c_servicename);
309 return NULL;
312 if (!(key = talloc_asprintf(ctx, SHARE_SECURITY_DB_KEY_PREFIX_STR "%s", c_servicename))) {
313 TALLOC_FREE(c_servicename);
314 DEBUG(0, ("talloc_asprintf failed\n"));
315 return NULL;
318 TALLOC_FREE(c_servicename);
320 status = dbwrap_fetch_bystring(share_db, talloc_tos(), key, &data);
322 TALLOC_FREE(key);
324 if (!NT_STATUS_IS_OK(status)) {
325 return get_share_security_default(ctx, psize,
326 SEC_RIGHTS_DIR_ALL);
329 status = unmarshall_sec_desc(ctx, data.dptr, data.dsize, &psd);
331 TALLOC_FREE(data.dptr);
333 if (!NT_STATUS_IS_OK(status)) {
334 DEBUG(0, ("unmarshall_sec_desc failed: %s\n",
335 nt_errstr(status)));
336 return get_share_security_default(ctx, psize,
337 SEC_RIGHTS_DIR_ALL);
340 if (psd) {
341 *psize = ndr_size_security_descriptor(psd, 0);
342 } else {
343 return get_share_security_default(ctx, psize,
344 SEC_RIGHTS_DIR_ALL);
347 return psd;
350 /*******************************************************************
351 Store a security descriptor in the share db.
352 ********************************************************************/
354 bool set_share_security(const char *share_name, struct security_descriptor *psd)
356 TALLOC_CTX *frame = talloc_stackframe();
357 char *key;
358 bool ret = False;
359 TDB_DATA blob;
360 NTSTATUS status;
361 char *c_share_name = canonicalize_servicename(frame, share_name);
363 if (!c_share_name) {
364 goto out;
367 if (!share_info_db_init()) {
368 goto out;
371 status = marshall_sec_desc(frame, psd, &blob.dptr, &blob.dsize);
373 if (!NT_STATUS_IS_OK(status)) {
374 DEBUG(0, ("marshall_sec_desc failed: %s\n",
375 nt_errstr(status)));
376 goto out;
379 if (!(key = talloc_asprintf(frame, SHARE_SECURITY_DB_KEY_PREFIX_STR "%s", c_share_name))) {
380 DEBUG(0, ("talloc_asprintf failed\n"));
381 goto out;
384 status = dbwrap_trans_store(share_db, string_term_tdb_data(key), blob,
385 TDB_REPLACE);
386 if (!NT_STATUS_IS_OK(status)) {
387 DEBUG(1, ("set_share_security: Failed to store secdesc for "
388 "%s: %s\n", share_name, nt_errstr(status)));
389 goto out;
392 DEBUG(5,("set_share_security: stored secdesc for %s\n", share_name ));
393 ret = True;
395 out:
396 TALLOC_FREE(frame);
397 return ret;
400 /*******************************************************************
401 Delete a security descriptor.
402 ********************************************************************/
404 bool delete_share_security(const char *servicename)
406 TDB_DATA kbuf;
407 char *key;
408 NTSTATUS status;
409 char *c_servicename = canonicalize_servicename(talloc_tos(), servicename);
411 if (!c_servicename) {
412 return NULL;
415 if (!share_info_db_init()) {
416 TALLOC_FREE(c_servicename);
417 return False;
420 if (!(key = talloc_asprintf(talloc_tos(), SHARE_SECURITY_DB_KEY_PREFIX_STR "%s",
421 c_servicename))) {
422 TALLOC_FREE(c_servicename);
423 return False;
425 kbuf = string_term_tdb_data(key);
427 status = dbwrap_trans_delete(share_db, kbuf);
428 if (!NT_STATUS_IS_OK(status)) {
429 DEBUG(0, ("delete_share_security: Failed to delete entry for "
430 "share %s: %s\n", c_servicename, nt_errstr(status)));
431 TALLOC_FREE(c_servicename);
432 return False;
435 TALLOC_FREE(c_servicename);
436 return True;
439 /*******************************************************************
440 Can this user access with share with the required permissions ?
441 ********************************************************************/
443 bool share_access_check(const struct security_token *token,
444 const char *sharename,
445 uint32 desired_access,
446 uint32_t *pgranted)
448 uint32 granted;
449 NTSTATUS status;
450 struct security_descriptor *psd = NULL;
451 size_t sd_size;
453 psd = get_share_security(talloc_tos(), sharename, &sd_size);
455 if (!psd) {
456 if (pgranted != NULL) {
457 *pgranted = desired_access;
459 return false;
462 status = se_file_access_check(psd, token, true, desired_access, &granted);
464 TALLOC_FREE(psd);
466 if (pgranted != NULL) {
467 *pgranted = granted;
470 return NT_STATUS_IS_OK(status);
473 /***************************************************************************
474 Parse the contents of an acl string from a usershare file.
475 ***************************************************************************/
477 bool parse_usershare_acl(TALLOC_CTX *ctx, const char *acl_str, struct security_descriptor **ppsd)
479 size_t s_size = 0;
480 const char *pacl = acl_str;
481 int num_aces = 0;
482 struct security_ace *ace_list = NULL;
483 struct security_acl *psa = NULL;
484 struct security_descriptor *psd = NULL;
485 size_t sd_size = 0;
486 int i;
488 *ppsd = NULL;
490 /* If the acl string is blank return "Everyone:R" */
491 if (!*acl_str) {
492 struct security_descriptor *default_psd = get_share_security_default(ctx, &s_size, GENERIC_READ_ACCESS);
493 if (!default_psd) {
494 return False;
496 *ppsd = default_psd;
497 return True;
500 num_aces = 1;
502 /* Add the number of ',' characters to get the number of aces. */
503 num_aces += count_chars(pacl,',');
505 ace_list = talloc_array(ctx, struct security_ace, num_aces);
506 if (!ace_list) {
507 return False;
510 for (i = 0; i < num_aces; i++) {
511 uint32_t sa;
512 uint32 g_access;
513 uint32 s_access;
514 struct dom_sid sid;
515 char *sidstr;
516 enum security_ace_type type = SEC_ACE_TYPE_ACCESS_ALLOWED;
518 if (!next_token_talloc(ctx, &pacl, &sidstr, ":")) {
519 DEBUG(0,("parse_usershare_acl: malformed usershare acl looking "
520 "for ':' in string '%s'\n", pacl));
521 return False;
524 if (!string_to_sid(&sid, sidstr)) {
525 DEBUG(0,("parse_usershare_acl: failed to convert %s to sid.\n",
526 sidstr ));
527 return False;
530 switch (*pacl) {
531 case 'F': /* Full Control, ie. R+W */
532 case 'f': /* Full Control, ie. R+W */
533 s_access = g_access = GENERIC_ALL_ACCESS;
534 break;
535 case 'R': /* Read only. */
536 case 'r': /* Read only. */
537 s_access = g_access = GENERIC_READ_ACCESS;
538 break;
539 case 'D': /* Deny all to this SID. */
540 case 'd': /* Deny all to this SID. */
541 type = SEC_ACE_TYPE_ACCESS_DENIED;
542 s_access = g_access = GENERIC_ALL_ACCESS;
543 break;
544 default:
545 DEBUG(0,("parse_usershare_acl: unknown acl type at %s.\n",
546 pacl ));
547 return False;
550 pacl++;
551 if (*pacl && *pacl != ',') {
552 DEBUG(0,("parse_usershare_acl: bad acl string at %s.\n",
553 pacl ));
554 return False;
556 pacl++; /* Go past any ',' */
558 se_map_generic(&s_access, &file_generic_mapping);
559 sa = (g_access | s_access);
560 init_sec_ace(&ace_list[i], &sid, type, sa, 0);
563 if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, num_aces, ace_list)) != NULL) {
564 psd = make_sec_desc(ctx, SECURITY_DESCRIPTOR_REVISION_1,
565 SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL,
566 psa, &sd_size);
569 if (!psd) {
570 DEBUG(0,("parse_usershare_acl: Failed to make SEC_DESC.\n"));
571 return False;
574 *ppsd = psd;
575 return True;