s3:smbd: change blocking.c to use fsp_fnum_dbg() for fsp->fnum logging.
[Samba/gebeck_regimport.git] / source3 / smbd / posix_acls.c
blob9753bfeb6169bbb4e26a35b0419991f6b5ff3fc1
1 /*
2 Unix SMB/CIFS implementation.
3 SMB NT Security Descriptor / Unix permission conversion.
4 Copyright (C) Jeremy Allison 1994-2009.
5 Copyright (C) Andreas Gruenbacher 2002.
6 Copyright (C) Simo Sorce <idra@samba.org> 2009.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
22 #include "includes.h"
23 #include "smbd/smbd.h"
24 #include "system/filesys.h"
25 #include "../libcli/security/security.h"
26 #include "trans2.h"
27 #include "passdb/lookup_sid.h"
28 #include "auth.h"
29 #include "../librpc/gen_ndr/idmap.h"
31 extern const struct generic_mapping file_generic_mapping;
33 #undef DBGC_CLASS
34 #define DBGC_CLASS DBGC_ACLS
36 /****************************************************************************
37 Data structures representing the internal ACE format.
38 ****************************************************************************/
40 enum ace_owner {UID_ACE, GID_ACE, WORLD_ACE};
41 enum ace_attribute {ALLOW_ACE, DENY_ACE}; /* Used for incoming NT ACLS. */
43 typedef union posix_id {
44 uid_t uid;
45 gid_t gid;
46 int world;
47 } posix_id;
49 typedef struct canon_ace {
50 struct canon_ace *next, *prev;
51 SMB_ACL_TAG_T type;
52 mode_t perms; /* Only use S_I(R|W|X)USR mode bits here. */
53 struct dom_sid trustee;
54 enum ace_owner owner_type;
55 enum ace_attribute attr;
56 posix_id unix_ug;
57 uint8_t ace_flags; /* From windows ACE entry. */
58 } canon_ace;
60 #define ALL_ACE_PERMS (S_IRUSR|S_IWUSR|S_IXUSR)
63 * EA format of user.SAMBA_PAI (Samba_Posix_Acl_Interitance)
64 * attribute on disk - version 1.
65 * All values are little endian.
67 * | 1 | 1 | 2 | 2 | ....
68 * +------+------+-------------+---------------------+-------------+--------------------+
69 * | vers | flag | num_entries | num_default_entries | ..entries.. | default_entries... |
70 * +------+------+-------------+---------------------+-------------+--------------------+
72 * Entry format is :
74 * | 1 | 4 |
75 * +------+-------------------+
76 * | value| uid/gid or world |
77 * | type | value |
78 * +------+-------------------+
80 * Version 2 format. Stores extra Windows metadata about an ACL.
82 * | 1 | 2 | 2 | 2 | ....
83 * +------+----------+-------------+---------------------+-------------+--------------------+
84 * | vers | ace | num_entries | num_default_entries | ..entries.. | default_entries... |
85 * | 2 | type | | | | |
86 * +------+----------+-------------+---------------------+-------------+--------------------+
88 * Entry format is :
90 * | 1 | 1 | 4 |
91 * +------+------+-------------------+
92 * | ace | value| uid/gid or world |
93 * | flag | type | value |
94 * +------+-------------------+------+
98 #define PAI_VERSION_OFFSET 0
100 #define PAI_V1_FLAG_OFFSET 1
101 #define PAI_V1_NUM_ENTRIES_OFFSET 2
102 #define PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET 4
103 #define PAI_V1_ENTRIES_BASE 6
104 #define PAI_V1_ACL_FLAG_PROTECTED 0x1
105 #define PAI_V1_ENTRY_LENGTH 5
107 #define PAI_V1_VERSION 1
109 #define PAI_V2_TYPE_OFFSET 1
110 #define PAI_V2_NUM_ENTRIES_OFFSET 3
111 #define PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET 5
112 #define PAI_V2_ENTRIES_BASE 7
113 #define PAI_V2_ENTRY_LENGTH 6
115 #define PAI_V2_VERSION 2
118 * In memory format of user.SAMBA_PAI attribute.
121 struct pai_entry {
122 struct pai_entry *next, *prev;
123 uint8_t ace_flags;
124 enum ace_owner owner_type;
125 posix_id unix_ug;
128 struct pai_val {
129 uint16_t sd_type;
130 unsigned int num_entries;
131 struct pai_entry *entry_list;
132 unsigned int num_def_entries;
133 struct pai_entry *def_entry_list;
136 /************************************************************************
137 Return a uint32 of the pai_entry principal.
138 ************************************************************************/
140 static uint32_t get_pai_entry_val(struct pai_entry *paie)
142 switch (paie->owner_type) {
143 case UID_ACE:
144 DEBUG(10,("get_pai_entry_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
145 return (uint32_t)paie->unix_ug.uid;
146 case GID_ACE:
147 DEBUG(10,("get_pai_entry_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
148 return (uint32_t)paie->unix_ug.gid;
149 case WORLD_ACE:
150 default:
151 DEBUG(10,("get_pai_entry_val: world ace\n"));
152 return (uint32_t)-1;
156 /************************************************************************
157 Return a uint32 of the entry principal.
158 ************************************************************************/
160 static uint32_t get_entry_val(canon_ace *ace_entry)
162 switch (ace_entry->owner_type) {
163 case UID_ACE:
164 DEBUG(10,("get_entry_val: uid = %u\n", (unsigned int)ace_entry->unix_ug.uid ));
165 return (uint32_t)ace_entry->unix_ug.uid;
166 case GID_ACE:
167 DEBUG(10,("get_entry_val: gid = %u\n", (unsigned int)ace_entry->unix_ug.gid ));
168 return (uint32_t)ace_entry->unix_ug.gid;
169 case WORLD_ACE:
170 default:
171 DEBUG(10,("get_entry_val: world ace\n"));
172 return (uint32_t)-1;
176 /************************************************************************
177 Create the on-disk format (always v2 now). Caller must free.
178 ************************************************************************/
180 static char *create_pai_buf_v2(canon_ace *file_ace_list,
181 canon_ace *dir_ace_list,
182 uint16_t sd_type,
183 size_t *store_size)
185 char *pai_buf = NULL;
186 canon_ace *ace_list = NULL;
187 char *entry_offset = NULL;
188 unsigned int num_entries = 0;
189 unsigned int num_def_entries = 0;
190 unsigned int i;
192 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
193 num_entries++;
196 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
197 num_def_entries++;
200 DEBUG(10,("create_pai_buf_v2: num_entries = %u, num_def_entries = %u\n", num_entries, num_def_entries ));
202 *store_size = PAI_V2_ENTRIES_BASE +
203 ((num_entries + num_def_entries)*PAI_V2_ENTRY_LENGTH);
205 pai_buf = talloc_array(talloc_tos(), char, *store_size);
206 if (!pai_buf) {
207 return NULL;
210 /* Set up the header. */
211 memset(pai_buf, '\0', PAI_V2_ENTRIES_BASE);
212 SCVAL(pai_buf,PAI_VERSION_OFFSET,PAI_V2_VERSION);
213 SSVAL(pai_buf,PAI_V2_TYPE_OFFSET, sd_type);
214 SSVAL(pai_buf,PAI_V2_NUM_ENTRIES_OFFSET,num_entries);
215 SSVAL(pai_buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET,num_def_entries);
217 DEBUG(10,("create_pai_buf_v2: sd_type = 0x%x\n",
218 (unsigned int)sd_type ));
220 entry_offset = pai_buf + PAI_V2_ENTRIES_BASE;
222 i = 0;
223 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
224 uint8_t type_val = (uint8_t)ace_list->owner_type;
225 uint32_t entry_val = get_entry_val(ace_list);
227 SCVAL(entry_offset,0,ace_list->ace_flags);
228 SCVAL(entry_offset,1,type_val);
229 SIVAL(entry_offset,2,entry_val);
230 DEBUG(10,("create_pai_buf_v2: entry %u [0x%x] [0x%x] [0x%x]\n",
232 (unsigned int)ace_list->ace_flags,
233 (unsigned int)type_val,
234 (unsigned int)entry_val ));
235 i++;
236 entry_offset += PAI_V2_ENTRY_LENGTH;
239 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
240 uint8_t type_val = (uint8_t)ace_list->owner_type;
241 uint32_t entry_val = get_entry_val(ace_list);
243 SCVAL(entry_offset,0,ace_list->ace_flags);
244 SCVAL(entry_offset,1,type_val);
245 SIVAL(entry_offset,2,entry_val);
246 DEBUG(10,("create_pai_buf_v2: entry %u [0x%x] [0x%x] [0x%x]\n",
248 (unsigned int)ace_list->ace_flags,
249 (unsigned int)type_val,
250 (unsigned int)entry_val ));
251 i++;
252 entry_offset += PAI_V2_ENTRY_LENGTH;
255 return pai_buf;
258 /************************************************************************
259 Store the user.SAMBA_PAI attribute on disk.
260 ************************************************************************/
262 static void store_inheritance_attributes(files_struct *fsp,
263 canon_ace *file_ace_list,
264 canon_ace *dir_ace_list,
265 uint16_t sd_type)
267 int ret;
268 size_t store_size;
269 char *pai_buf;
271 if (!lp_map_acl_inherit(SNUM(fsp->conn))) {
272 return;
275 pai_buf = create_pai_buf_v2(file_ace_list, dir_ace_list,
276 sd_type, &store_size);
278 if (fsp->fh->fd != -1) {
279 ret = SMB_VFS_FSETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
280 pai_buf, store_size, 0);
281 } else {
282 ret = SMB_VFS_SETXATTR(fsp->conn, fsp->fsp_name->base_name,
283 SAMBA_POSIX_INHERITANCE_EA_NAME,
284 pai_buf, store_size, 0);
287 TALLOC_FREE(pai_buf);
289 DEBUG(10,("store_inheritance_attribute: type 0x%x for file %s\n",
290 (unsigned int)sd_type,
291 fsp_str_dbg(fsp)));
293 if (ret == -1 && !no_acl_syscall_error(errno)) {
294 DEBUG(1,("store_inheritance_attribute: Error %s\n", strerror(errno) ));
298 /************************************************************************
299 Delete the in memory inheritance info.
300 ************************************************************************/
302 static void free_inherited_info(struct pai_val *pal)
304 if (pal) {
305 struct pai_entry *paie, *paie_next;
306 for (paie = pal->entry_list; paie; paie = paie_next) {
307 paie_next = paie->next;
308 TALLOC_FREE(paie);
310 for (paie = pal->def_entry_list; paie; paie = paie_next) {
311 paie_next = paie->next;
312 TALLOC_FREE(paie);
314 TALLOC_FREE(pal);
318 /************************************************************************
319 Get any stored ACE flags.
320 ************************************************************************/
322 static uint16_t get_pai_flags(struct pai_val *pal, canon_ace *ace_entry, bool default_ace)
324 struct pai_entry *paie;
326 if (!pal) {
327 return 0;
330 /* If the entry exists it is inherited. */
331 for (paie = (default_ace ? pal->def_entry_list : pal->entry_list); paie; paie = paie->next) {
332 if (ace_entry->owner_type == paie->owner_type &&
333 get_entry_val(ace_entry) == get_pai_entry_val(paie))
334 return paie->ace_flags;
336 return 0;
339 /************************************************************************
340 Ensure an attribute just read is valid - v1.
341 ************************************************************************/
343 static bool check_pai_ok_v1(const char *pai_buf, size_t pai_buf_data_size)
345 uint16 num_entries;
346 uint16 num_def_entries;
348 if (pai_buf_data_size < PAI_V1_ENTRIES_BASE) {
349 /* Corrupted - too small. */
350 return false;
353 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_V1_VERSION) {
354 return false;
357 num_entries = SVAL(pai_buf,PAI_V1_NUM_ENTRIES_OFFSET);
358 num_def_entries = SVAL(pai_buf,PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET);
360 /* Check the entry lists match. */
361 /* Each entry is 5 bytes (type plus 4 bytes of uid or gid). */
363 if (((num_entries + num_def_entries)*PAI_V1_ENTRY_LENGTH) +
364 PAI_V1_ENTRIES_BASE != pai_buf_data_size) {
365 return false;
368 return true;
371 /************************************************************************
372 Ensure an attribute just read is valid - v2.
373 ************************************************************************/
375 static bool check_pai_ok_v2(const char *pai_buf, size_t pai_buf_data_size)
377 uint16 num_entries;
378 uint16 num_def_entries;
380 if (pai_buf_data_size < PAI_V2_ENTRIES_BASE) {
381 /* Corrupted - too small. */
382 return false;
385 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_V2_VERSION) {
386 return false;
389 num_entries = SVAL(pai_buf,PAI_V2_NUM_ENTRIES_OFFSET);
390 num_def_entries = SVAL(pai_buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET);
392 /* Check the entry lists match. */
393 /* Each entry is 6 bytes (flags + type + 4 bytes of uid or gid). */
395 if (((num_entries + num_def_entries)*PAI_V2_ENTRY_LENGTH) +
396 PAI_V2_ENTRIES_BASE != pai_buf_data_size) {
397 return false;
400 return true;
403 /************************************************************************
404 Decode the owner.
405 ************************************************************************/
407 static bool get_pai_owner_type(struct pai_entry *paie, const char *entry_offset)
409 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
410 switch( paie->owner_type) {
411 case UID_ACE:
412 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
413 DEBUG(10,("get_pai_owner_type: uid = %u\n",
414 (unsigned int)paie->unix_ug.uid ));
415 break;
416 case GID_ACE:
417 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
418 DEBUG(10,("get_pai_owner_type: gid = %u\n",
419 (unsigned int)paie->unix_ug.gid ));
420 break;
421 case WORLD_ACE:
422 paie->unix_ug.world = -1;
423 DEBUG(10,("get_pai_owner_type: world ace\n"));
424 break;
425 default:
426 DEBUG(10,("get_pai_owner_type: unknown type %u\n",
427 (unsigned int)paie->owner_type ));
428 return false;
430 return true;
433 /************************************************************************
434 Process v2 entries.
435 ************************************************************************/
437 static const char *create_pai_v1_entries(struct pai_val *paiv,
438 const char *entry_offset,
439 bool def_entry)
441 int i;
443 for (i = 0; i < paiv->num_entries; i++) {
444 struct pai_entry *paie = talloc(talloc_tos(), struct pai_entry);
445 if (!paie) {
446 return NULL;
449 paie->ace_flags = SEC_ACE_FLAG_INHERITED_ACE;
450 if (!get_pai_owner_type(paie, entry_offset)) {
451 TALLOC_FREE(paie);
452 return NULL;
455 if (!def_entry) {
456 DLIST_ADD(paiv->entry_list, paie);
457 } else {
458 DLIST_ADD(paiv->def_entry_list, paie);
460 entry_offset += PAI_V1_ENTRY_LENGTH;
462 return entry_offset;
465 /************************************************************************
466 Convert to in-memory format from version 1.
467 ************************************************************************/
469 static struct pai_val *create_pai_val_v1(const char *buf, size_t size)
471 const char *entry_offset;
472 struct pai_val *paiv = NULL;
474 if (!check_pai_ok_v1(buf, size)) {
475 return NULL;
478 paiv = talloc(talloc_tos(), struct pai_val);
479 if (!paiv) {
480 return NULL;
483 memset(paiv, '\0', sizeof(struct pai_val));
485 paiv->sd_type = (CVAL(buf,PAI_V1_FLAG_OFFSET) == PAI_V1_ACL_FLAG_PROTECTED) ?
486 SEC_DESC_DACL_PROTECTED : 0;
488 paiv->num_entries = SVAL(buf,PAI_V1_NUM_ENTRIES_OFFSET);
489 paiv->num_def_entries = SVAL(buf,PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET);
491 entry_offset = buf + PAI_V1_ENTRIES_BASE;
493 DEBUG(10,("create_pai_val: num_entries = %u, num_def_entries = %u\n",
494 paiv->num_entries, paiv->num_def_entries ));
496 entry_offset = create_pai_v1_entries(paiv, entry_offset, false);
497 if (entry_offset == NULL) {
498 free_inherited_info(paiv);
499 return NULL;
501 entry_offset = create_pai_v1_entries(paiv, entry_offset, true);
502 if (entry_offset == NULL) {
503 free_inherited_info(paiv);
504 return NULL;
507 return paiv;
510 /************************************************************************
511 Process v2 entries.
512 ************************************************************************/
514 static const char *create_pai_v2_entries(struct pai_val *paiv,
515 unsigned int num_entries,
516 const char *entry_offset,
517 bool def_entry)
519 unsigned int i;
521 for (i = 0; i < num_entries; i++) {
522 struct pai_entry *paie = talloc(talloc_tos(), struct pai_entry);
523 if (!paie) {
524 return NULL;
527 paie->ace_flags = CVAL(entry_offset,0);
529 if (!get_pai_owner_type(paie, entry_offset+1)) {
530 TALLOC_FREE(paie);
531 return NULL;
533 if (!def_entry) {
534 DLIST_ADD(paiv->entry_list, paie);
535 } else {
536 DLIST_ADD(paiv->def_entry_list, paie);
538 entry_offset += PAI_V2_ENTRY_LENGTH;
540 return entry_offset;
543 /************************************************************************
544 Convert to in-memory format from version 2.
545 ************************************************************************/
547 static struct pai_val *create_pai_val_v2(const char *buf, size_t size)
549 const char *entry_offset;
550 struct pai_val *paiv = NULL;
552 if (!check_pai_ok_v2(buf, size)) {
553 return NULL;
556 paiv = talloc(talloc_tos(), struct pai_val);
557 if (!paiv) {
558 return NULL;
561 memset(paiv, '\0', sizeof(struct pai_val));
563 paiv->sd_type = SVAL(buf,PAI_V2_TYPE_OFFSET);
565 paiv->num_entries = SVAL(buf,PAI_V2_NUM_ENTRIES_OFFSET);
566 paiv->num_def_entries = SVAL(buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET);
568 entry_offset = buf + PAI_V2_ENTRIES_BASE;
570 DEBUG(10,("create_pai_val_v2: sd_type = 0x%x num_entries = %u, num_def_entries = %u\n",
571 (unsigned int)paiv->sd_type,
572 paiv->num_entries, paiv->num_def_entries ));
574 entry_offset = create_pai_v2_entries(paiv, paiv->num_entries,
575 entry_offset, false);
576 if (entry_offset == NULL) {
577 free_inherited_info(paiv);
578 return NULL;
580 entry_offset = create_pai_v2_entries(paiv, paiv->num_def_entries,
581 entry_offset, true);
582 if (entry_offset == NULL) {
583 free_inherited_info(paiv);
584 return NULL;
587 return paiv;
590 /************************************************************************
591 Convert to in-memory format - from either version 1 or 2.
592 ************************************************************************/
594 static struct pai_val *create_pai_val(const char *buf, size_t size)
596 if (size < 1) {
597 return NULL;
599 if (CVAL(buf,PAI_VERSION_OFFSET) == PAI_V1_VERSION) {
600 return create_pai_val_v1(buf, size);
601 } else if (CVAL(buf,PAI_VERSION_OFFSET) == PAI_V2_VERSION) {
602 return create_pai_val_v2(buf, size);
603 } else {
604 return NULL;
608 /************************************************************************
609 Load the user.SAMBA_PAI attribute.
610 ************************************************************************/
612 static struct pai_val *fload_inherited_info(files_struct *fsp)
614 char *pai_buf;
615 size_t pai_buf_size = 1024;
616 struct pai_val *paiv = NULL;
617 ssize_t ret;
619 if (!lp_map_acl_inherit(SNUM(fsp->conn))) {
620 return NULL;
623 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL) {
624 return NULL;
627 do {
628 if (fsp->fh->fd != -1) {
629 ret = SMB_VFS_FGETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
630 pai_buf, pai_buf_size);
631 } else {
632 ret = SMB_VFS_GETXATTR(fsp->conn,
633 fsp->fsp_name->base_name,
634 SAMBA_POSIX_INHERITANCE_EA_NAME,
635 pai_buf, pai_buf_size);
638 if (ret == -1) {
639 if (errno != ERANGE) {
640 break;
642 /* Buffer too small - enlarge it. */
643 pai_buf_size *= 2;
644 TALLOC_FREE(pai_buf);
645 if (pai_buf_size > 1024*1024) {
646 return NULL; /* Limit malloc to 1mb. */
648 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL)
649 return NULL;
651 } while (ret == -1);
653 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n",
654 (unsigned long)ret, fsp_str_dbg(fsp)));
656 if (ret == -1) {
657 /* No attribute or not supported. */
658 #if defined(ENOATTR)
659 if (errno != ENOATTR)
660 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
661 #else
662 if (errno != ENOSYS)
663 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
664 #endif
665 TALLOC_FREE(pai_buf);
666 return NULL;
669 paiv = create_pai_val(pai_buf, ret);
671 if (paiv) {
672 DEBUG(10,("load_inherited_info: ACL type is 0x%x for file %s\n",
673 (unsigned int)paiv->sd_type, fsp_str_dbg(fsp)));
676 TALLOC_FREE(pai_buf);
677 return paiv;
680 /************************************************************************
681 Load the user.SAMBA_PAI attribute.
682 ************************************************************************/
684 static struct pai_val *load_inherited_info(const struct connection_struct *conn,
685 const char *fname)
687 char *pai_buf;
688 size_t pai_buf_size = 1024;
689 struct pai_val *paiv = NULL;
690 ssize_t ret;
692 if (!lp_map_acl_inherit(SNUM(conn))) {
693 return NULL;
696 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL) {
697 return NULL;
700 do {
701 ret = SMB_VFS_GETXATTR(conn, fname,
702 SAMBA_POSIX_INHERITANCE_EA_NAME,
703 pai_buf, pai_buf_size);
705 if (ret == -1) {
706 if (errno != ERANGE) {
707 break;
709 /* Buffer too small - enlarge it. */
710 pai_buf_size *= 2;
711 TALLOC_FREE(pai_buf);
712 if (pai_buf_size > 1024*1024) {
713 return NULL; /* Limit malloc to 1mb. */
715 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL)
716 return NULL;
718 } while (ret == -1);
720 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fname));
722 if (ret == -1) {
723 /* No attribute or not supported. */
724 #if defined(ENOATTR)
725 if (errno != ENOATTR)
726 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
727 #else
728 if (errno != ENOSYS)
729 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
730 #endif
731 TALLOC_FREE(pai_buf);
732 return NULL;
735 paiv = create_pai_val(pai_buf, ret);
737 if (paiv) {
738 DEBUG(10,("load_inherited_info: ACL type 0x%x for file %s\n",
739 (unsigned int)paiv->sd_type,
740 fname));
743 TALLOC_FREE(pai_buf);
744 return paiv;
747 /****************************************************************************
748 Functions to manipulate the internal ACE format.
749 ****************************************************************************/
751 /****************************************************************************
752 Count a linked list of canonical ACE entries.
753 ****************************************************************************/
755 static size_t count_canon_ace_list( canon_ace *l_head )
757 size_t count = 0;
758 canon_ace *ace;
760 for (ace = l_head; ace; ace = ace->next)
761 count++;
763 return count;
766 /****************************************************************************
767 Free a linked list of canonical ACE entries.
768 ****************************************************************************/
770 static void free_canon_ace_list( canon_ace *l_head )
772 canon_ace *list, *next;
774 for (list = l_head; list; list = next) {
775 next = list->next;
776 DLIST_REMOVE(l_head, list);
777 TALLOC_FREE(list);
781 /****************************************************************************
782 Function to duplicate a canon_ace entry.
783 ****************************************************************************/
785 static canon_ace *dup_canon_ace( canon_ace *src_ace)
787 canon_ace *dst_ace = talloc(talloc_tos(), canon_ace);
789 if (dst_ace == NULL)
790 return NULL;
792 *dst_ace = *src_ace;
793 dst_ace->prev = dst_ace->next = NULL;
794 return dst_ace;
797 /****************************************************************************
798 Print out a canon ace.
799 ****************************************************************************/
801 static void print_canon_ace(canon_ace *pace, int num)
803 dbgtext( "canon_ace index %d. Type = %s ", num, pace->attr == ALLOW_ACE ? "allow" : "deny" );
804 dbgtext( "SID = %s ", sid_string_dbg(&pace->trustee));
805 if (pace->owner_type == UID_ACE) {
806 const char *u_name = uidtoname(pace->unix_ug.uid);
807 dbgtext( "uid %u (%s) ", (unsigned int)pace->unix_ug.uid, u_name );
808 } else if (pace->owner_type == GID_ACE) {
809 char *g_name = gidtoname(pace->unix_ug.gid);
810 dbgtext( "gid %u (%s) ", (unsigned int)pace->unix_ug.gid, g_name );
811 } else
812 dbgtext( "other ");
813 switch (pace->type) {
814 case SMB_ACL_USER:
815 dbgtext( "SMB_ACL_USER ");
816 break;
817 case SMB_ACL_USER_OBJ:
818 dbgtext( "SMB_ACL_USER_OBJ ");
819 break;
820 case SMB_ACL_GROUP:
821 dbgtext( "SMB_ACL_GROUP ");
822 break;
823 case SMB_ACL_GROUP_OBJ:
824 dbgtext( "SMB_ACL_GROUP_OBJ ");
825 break;
826 case SMB_ACL_OTHER:
827 dbgtext( "SMB_ACL_OTHER ");
828 break;
829 default:
830 dbgtext( "MASK " );
831 break;
834 dbgtext( "ace_flags = 0x%x ", (unsigned int)pace->ace_flags);
835 dbgtext( "perms ");
836 dbgtext( "%c", pace->perms & S_IRUSR ? 'r' : '-');
837 dbgtext( "%c", pace->perms & S_IWUSR ? 'w' : '-');
838 dbgtext( "%c\n", pace->perms & S_IXUSR ? 'x' : '-');
841 /****************************************************************************
842 Print out a canon ace list.
843 ****************************************************************************/
845 static void print_canon_ace_list(const char *name, canon_ace *ace_list)
847 int count = 0;
849 if( DEBUGLVL( 10 )) {
850 dbgtext( "print_canon_ace_list: %s\n", name );
851 for (;ace_list; ace_list = ace_list->next, count++)
852 print_canon_ace(ace_list, count );
856 /****************************************************************************
857 Map POSIX ACL perms to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
858 ****************************************************************************/
860 static mode_t convert_permset_to_mode_t(connection_struct *conn, SMB_ACL_PERMSET_T permset)
862 mode_t ret = 0;
864 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRUSR : 0);
865 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWUSR : 0);
866 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXUSR : 0);
868 return ret;
871 /****************************************************************************
872 Map generic UNIX permissions to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
873 ****************************************************************************/
875 static mode_t unix_perms_to_acl_perms(mode_t mode, int r_mask, int w_mask, int x_mask)
877 mode_t ret = 0;
879 if (mode & r_mask)
880 ret |= S_IRUSR;
881 if (mode & w_mask)
882 ret |= S_IWUSR;
883 if (mode & x_mask)
884 ret |= S_IXUSR;
886 return ret;
889 /****************************************************************************
890 Map canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits) to
891 an SMB_ACL_PERMSET_T.
892 ****************************************************************************/
894 static int map_acl_perms_to_permset(connection_struct *conn, mode_t mode, SMB_ACL_PERMSET_T *p_permset)
896 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1)
897 return -1;
898 if (mode & S_IRUSR) {
899 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1)
900 return -1;
902 if (mode & S_IWUSR) {
903 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1)
904 return -1;
906 if (mode & S_IXUSR) {
907 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1)
908 return -1;
910 return 0;
913 /****************************************************************************
914 Function to create owner and group SIDs from a SMB_STRUCT_STAT.
915 ****************************************************************************/
917 void create_file_sids(const SMB_STRUCT_STAT *psbuf, struct dom_sid *powner_sid, struct dom_sid *pgroup_sid)
919 uid_to_sid( powner_sid, psbuf->st_ex_uid );
920 gid_to_sid( pgroup_sid, psbuf->st_ex_gid );
923 /****************************************************************************
924 Merge aces with a common sid - if both are allow or deny, OR the permissions together and
925 delete the second one. If the first is deny, mask the permissions off and delete the allow
926 if the permissions become zero, delete the deny if the permissions are non zero.
927 ****************************************************************************/
929 static void merge_aces( canon_ace **pp_list_head, bool dir_acl)
931 canon_ace *l_head = *pp_list_head;
932 canon_ace *curr_ace_outer;
933 canon_ace *curr_ace_outer_next;
936 * First, merge allow entries with identical SIDs, and deny entries
937 * with identical SIDs.
940 for (curr_ace_outer = l_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
941 canon_ace *curr_ace;
942 canon_ace *curr_ace_next;
944 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
946 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
947 bool can_merge = false;
949 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
951 /* For file ACLs we can merge if the SIDs and ALLOW/DENY
952 * types are the same. For directory acls we must also
953 * ensure the POSIX ACL types are the same.
955 * For the IDMAP_BOTH case, we must not merge
956 * the UID and GID ACE values for same SID
959 if (!dir_acl) {
960 can_merge = (dom_sid_equal(&curr_ace->trustee, &curr_ace_outer->trustee) &&
961 curr_ace->owner_type == curr_ace_outer->owner_type &&
962 (curr_ace->attr == curr_ace_outer->attr));
963 } else {
964 can_merge = (dom_sid_equal(&curr_ace->trustee, &curr_ace_outer->trustee) &&
965 curr_ace->owner_type == curr_ace_outer->owner_type &&
966 (curr_ace->type == curr_ace_outer->type) &&
967 (curr_ace->attr == curr_ace_outer->attr));
970 if (can_merge) {
971 if( DEBUGLVL( 10 )) {
972 dbgtext("merge_aces: Merging ACE's\n");
973 print_canon_ace( curr_ace_outer, 0);
974 print_canon_ace( curr_ace, 0);
977 /* Merge two allow or two deny ACE's. */
979 /* Theoretically we shouldn't merge a dir ACE if
980 * one ACE has the CI flag set, and the other
981 * ACE has the OI flag set, but this is rare
982 * enough we can ignore it. */
984 curr_ace_outer->perms |= curr_ace->perms;
985 curr_ace_outer->ace_flags |= curr_ace->ace_flags;
986 DLIST_REMOVE(l_head, curr_ace);
987 TALLOC_FREE(curr_ace);
988 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
994 * Now go through and mask off allow permissions with deny permissions.
995 * We can delete either the allow or deny here as we know that each SID
996 * appears only once in the list.
999 for (curr_ace_outer = l_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
1000 canon_ace *curr_ace;
1001 canon_ace *curr_ace_next;
1003 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
1005 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
1007 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
1010 * Subtract ACE's with different entries. Due to the ordering constraints
1011 * we've put on the ACL, we know the deny must be the first one.
1014 if (dom_sid_equal(&curr_ace->trustee, &curr_ace_outer->trustee) &&
1015 (curr_ace->owner_type == curr_ace_outer->owner_type) &&
1016 (curr_ace_outer->attr == DENY_ACE) && (curr_ace->attr == ALLOW_ACE)) {
1018 if( DEBUGLVL( 10 )) {
1019 dbgtext("merge_aces: Masking ACE's\n");
1020 print_canon_ace( curr_ace_outer, 0);
1021 print_canon_ace( curr_ace, 0);
1024 curr_ace->perms &= ~curr_ace_outer->perms;
1026 if (curr_ace->perms == 0) {
1029 * The deny overrides the allow. Remove the allow.
1032 DLIST_REMOVE(l_head, curr_ace);
1033 TALLOC_FREE(curr_ace);
1034 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
1036 } else {
1039 * Even after removing permissions, there
1040 * are still allow permissions - delete the deny.
1041 * It is safe to delete the deny here,
1042 * as we are guarenteed by the deny first
1043 * ordering that all the deny entries for
1044 * this SID have already been merged into one
1045 * before we can get to an allow ace.
1048 DLIST_REMOVE(l_head, curr_ace_outer);
1049 TALLOC_FREE(curr_ace_outer);
1050 break;
1054 } /* end for curr_ace */
1055 } /* end for curr_ace_outer */
1057 /* We may have modified the list. */
1059 *pp_list_head = l_head;
1062 /****************************************************************************
1063 Check if we need to return NT4.x compatible ACL entries.
1064 ****************************************************************************/
1066 bool nt4_compatible_acls(void)
1068 int compat = lp_acl_compatibility();
1070 if (compat == ACL_COMPAT_AUTO) {
1071 enum remote_arch_types ra_type = get_remote_arch();
1073 /* Automatically adapt to client */
1074 return (ra_type <= RA_WINNT);
1075 } else
1076 return (compat == ACL_COMPAT_WINNT);
1080 /****************************************************************************
1081 Map canon_ace perms to permission bits NT.
1082 The attr element is not used here - we only process deny entries on set,
1083 not get. Deny entries are implicit on get with ace->perms = 0.
1084 ****************************************************************************/
1086 uint32_t map_canon_ace_perms(int snum,
1087 enum security_ace_type *pacl_type,
1088 mode_t perms,
1089 bool directory_ace)
1091 uint32_t nt_mask = 0;
1093 *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
1095 if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
1096 if (directory_ace) {
1097 nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
1098 } else {
1099 nt_mask = (UNIX_ACCESS_RWX & ~DELETE_ACCESS);
1101 } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
1103 * Windows NT refuses to display ACEs with no permissions in them (but
1104 * they are perfectly legal with Windows 2000). If the ACE has empty
1105 * permissions we cannot use 0, so we use the otherwise unused
1106 * WRITE_OWNER permission, which we ignore when we set an ACL.
1107 * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
1108 * to be changed in the future.
1111 if (nt4_compatible_acls())
1112 nt_mask = UNIX_ACCESS_NONE;
1113 else
1114 nt_mask = 0;
1115 } else {
1116 if (directory_ace) {
1117 nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
1118 nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
1119 nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
1120 } else {
1121 nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
1122 nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
1123 nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
1127 if ((perms & S_IWUSR) && lp_dos_filemode(snum)) {
1128 nt_mask |= (SEC_STD_WRITE_DAC|SEC_STD_WRITE_OWNER|DELETE_ACCESS);
1131 DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
1132 (unsigned int)perms, (unsigned int)nt_mask ));
1134 return nt_mask;
1137 /****************************************************************************
1138 Map NT perms to a UNIX mode_t.
1139 ****************************************************************************/
1141 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA)
1142 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA)
1143 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
1145 static mode_t map_nt_perms( uint32 *mask, int type)
1147 mode_t mode = 0;
1149 switch(type) {
1150 case S_IRUSR:
1151 if((*mask) & GENERIC_ALL_ACCESS)
1152 mode = S_IRUSR|S_IWUSR|S_IXUSR;
1153 else {
1154 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
1155 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
1156 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
1158 break;
1159 case S_IRGRP:
1160 if((*mask) & GENERIC_ALL_ACCESS)
1161 mode = S_IRGRP|S_IWGRP|S_IXGRP;
1162 else {
1163 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
1164 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
1165 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
1167 break;
1168 case S_IROTH:
1169 if((*mask) & GENERIC_ALL_ACCESS)
1170 mode = S_IROTH|S_IWOTH|S_IXOTH;
1171 else {
1172 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
1173 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
1174 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
1176 break;
1179 return mode;
1182 /****************************************************************************
1183 Unpack a struct security_descriptor into a UNIX owner and group.
1184 ****************************************************************************/
1186 NTSTATUS unpack_nt_owners(struct connection_struct *conn,
1187 uid_t *puser, gid_t *pgrp,
1188 uint32 security_info_sent, const struct
1189 security_descriptor *psd)
1191 struct dom_sid owner_sid;
1192 struct dom_sid grp_sid;
1194 *puser = (uid_t)-1;
1195 *pgrp = (gid_t)-1;
1197 if(security_info_sent == 0) {
1198 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
1199 return NT_STATUS_OK;
1203 * Validate the owner and group SID's.
1206 memset(&owner_sid, '\0', sizeof(owner_sid));
1207 memset(&grp_sid, '\0', sizeof(grp_sid));
1209 DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
1212 * Don't immediately fail if the owner sid cannot be validated.
1213 * This may be a group chown only set.
1216 if (security_info_sent & SECINFO_OWNER) {
1217 sid_copy(&owner_sid, psd->owner_sid);
1218 if (!sid_to_uid(&owner_sid, puser)) {
1219 if (lp_force_unknown_acl_user(SNUM(conn))) {
1220 /* this allows take ownership to work
1221 * reasonably */
1222 *puser = get_current_uid(conn);
1223 } else {
1224 DEBUG(3,("unpack_nt_owners: unable to validate"
1225 " owner sid for %s\n",
1226 sid_string_dbg(&owner_sid)));
1227 return NT_STATUS_INVALID_OWNER;
1230 DEBUG(3,("unpack_nt_owners: owner sid mapped to uid %u\n",
1231 (unsigned int)*puser ));
1235 * Don't immediately fail if the group sid cannot be validated.
1236 * This may be an owner chown only set.
1239 if (security_info_sent & SECINFO_GROUP) {
1240 sid_copy(&grp_sid, psd->group_sid);
1241 if (!sid_to_gid( &grp_sid, pgrp)) {
1242 if (lp_force_unknown_acl_user(SNUM(conn))) {
1243 /* this allows take group ownership to work
1244 * reasonably */
1245 *pgrp = get_current_gid(conn);
1246 } else {
1247 DEBUG(3,("unpack_nt_owners: unable to validate"
1248 " group sid.\n"));
1249 return NT_STATUS_INVALID_OWNER;
1252 DEBUG(3,("unpack_nt_owners: group sid mapped to gid %u\n",
1253 (unsigned int)*pgrp));
1256 DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
1258 return NT_STATUS_OK;
1261 /****************************************************************************
1262 Ensure the enforced permissions for this share apply.
1263 ****************************************************************************/
1265 static void apply_default_perms(const struct share_params *params,
1266 const bool is_directory, canon_ace *pace,
1267 mode_t type)
1269 mode_t and_bits = (mode_t)0;
1270 mode_t or_bits = (mode_t)0;
1272 /* Get the initial bits to apply. */
1274 if (is_directory) {
1275 and_bits = lp_dir_security_mask(params->service);
1276 or_bits = lp_force_dir_security_mode(params->service);
1277 } else {
1278 and_bits = lp_security_mask(params->service);
1279 or_bits = lp_force_security_mode(params->service);
1282 /* Now bounce them into the S_USR space. */
1283 switch(type) {
1284 case S_IRUSR:
1285 /* Ensure owner has read access. */
1286 pace->perms |= S_IRUSR;
1287 if (is_directory)
1288 pace->perms |= (S_IWUSR|S_IXUSR);
1289 and_bits = unix_perms_to_acl_perms(and_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1290 or_bits = unix_perms_to_acl_perms(or_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1291 break;
1292 case S_IRGRP:
1293 and_bits = unix_perms_to_acl_perms(and_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1294 or_bits = unix_perms_to_acl_perms(or_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1295 break;
1296 case S_IROTH:
1297 and_bits = unix_perms_to_acl_perms(and_bits, S_IROTH, S_IWOTH, S_IXOTH);
1298 or_bits = unix_perms_to_acl_perms(or_bits, S_IROTH, S_IWOTH, S_IXOTH);
1299 break;
1302 pace->perms = ((pace->perms & and_bits)|or_bits);
1305 /****************************************************************************
1306 Check if a given uid/SID is in a group gid/SID. This is probably very
1307 expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1308 ****************************************************************************/
1310 static bool uid_entry_in_group(connection_struct *conn, canon_ace *uid_ace, canon_ace *group_ace )
1312 const char *u_name = NULL;
1314 /* "Everyone" always matches every uid. */
1316 if (dom_sid_equal(&group_ace->trustee, &global_sid_World))
1317 return True;
1320 * if it's the current user, we already have the unix token
1321 * and don't need to do the complex user_in_group_sid() call
1323 if (uid_ace->unix_ug.uid == get_current_uid(conn)) {
1324 const struct security_unix_token *curr_utok = NULL;
1325 size_t i;
1327 if (group_ace->unix_ug.gid == get_current_gid(conn)) {
1328 return True;
1331 curr_utok = get_current_utok(conn);
1332 for (i=0; i < curr_utok->ngroups; i++) {
1333 if (group_ace->unix_ug.gid == curr_utok->groups[i]) {
1334 return True;
1339 /* u_name talloc'ed off tos. */
1340 u_name = uidtoname(uid_ace->unix_ug.uid);
1341 if (!u_name) {
1342 return False;
1346 * user_in_group_sid() uses create_token_from_username()
1347 * which creates an artificial NT token given just a username,
1348 * so this is not reliable for users from foreign domains
1349 * exported by winbindd!
1351 return user_in_group_sid(u_name, &group_ace->trustee);
1354 /****************************************************************************
1355 A well formed POSIX file or default ACL has at least 3 entries, a
1356 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1357 In addition, the owner must always have at least read access.
1358 When using this call on get_acl, the pst struct is valid and contains
1359 the mode of the file. When using this call on set_acl, the pst struct has
1360 been modified to have a mode containing the default for this file or directory
1361 type.
1362 ****************************************************************************/
1364 static bool ensure_canon_entry_valid(connection_struct *conn, canon_ace **pp_ace,
1365 const struct share_params *params,
1366 const bool is_directory,
1367 const struct dom_sid *pfile_owner_sid,
1368 const struct dom_sid *pfile_grp_sid,
1369 const SMB_STRUCT_STAT *pst,
1370 bool setting_acl)
1372 canon_ace *pace;
1373 canon_ace *pace_user = NULL;
1374 canon_ace *pace_group = NULL;
1375 canon_ace *pace_other = NULL;
1377 for (pace = *pp_ace; pace; pace = pace->next) {
1378 if (pace->type == SMB_ACL_USER_OBJ) {
1380 if (setting_acl)
1381 apply_default_perms(params, is_directory, pace, S_IRUSR);
1382 pace_user = pace;
1384 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1387 * Ensure create mask/force create mode is respected on set.
1390 if (setting_acl)
1391 apply_default_perms(params, is_directory, pace, S_IRGRP);
1392 pace_group = pace;
1394 } else if (pace->type == SMB_ACL_OTHER) {
1397 * Ensure create mask/force create mode is respected on set.
1400 if (setting_acl)
1401 apply_default_perms(params, is_directory, pace, S_IROTH);
1402 pace_other = pace;
1406 if (!pace_user) {
1407 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1408 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1409 return False;
1412 ZERO_STRUCTP(pace);
1413 pace->type = SMB_ACL_USER_OBJ;
1414 pace->owner_type = UID_ACE;
1415 pace->unix_ug.uid = pst->st_ex_uid;
1416 pace->trustee = *pfile_owner_sid;
1417 pace->attr = ALLOW_ACE;
1418 /* Start with existing permissions, principle of least
1419 surprises for the user. */
1420 pace->perms = pst->st_ex_mode;
1422 if (setting_acl) {
1423 /* See if the owning user is in any of the other groups in
1424 the ACE, or if there's a matching user entry (by uid
1425 or in the case of ID_TYPE_BOTH by SID).
1426 If so, OR in the permissions from that entry. */
1428 canon_ace *pace_iter;
1430 for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1431 if (pace_iter->type == SMB_ACL_USER &&
1432 pace_iter->unix_ug.uid == pace->unix_ug.uid) {
1433 pace->perms |= pace_iter->perms;
1434 } else if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1435 if (dom_sid_equal(&pace->trustee, &pace_iter->trustee)) {
1436 pace->perms |= pace_iter->perms;
1437 } else if (uid_entry_in_group(conn, pace, pace_iter)) {
1438 pace->perms |= pace_iter->perms;
1443 if (pace->perms == 0) {
1444 /* If we only got an "everyone" perm, just use that. */
1445 if (pace_other)
1446 pace->perms = pace_other->perms;
1449 apply_default_perms(params, is_directory, pace, S_IRUSR);
1450 } else {
1451 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1454 DLIST_ADD(*pp_ace, pace);
1455 pace_user = pace;
1458 if (!pace_group) {
1459 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1460 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1461 return False;
1464 ZERO_STRUCTP(pace);
1465 pace->type = SMB_ACL_GROUP_OBJ;
1466 pace->owner_type = GID_ACE;
1467 pace->unix_ug.gid = pst->st_ex_gid;
1468 pace->trustee = *pfile_grp_sid;
1469 pace->attr = ALLOW_ACE;
1470 if (setting_acl) {
1471 /* If we only got an "everyone" perm, just use that. */
1472 if (pace_other)
1473 pace->perms = pace_other->perms;
1474 else
1475 pace->perms = 0;
1476 apply_default_perms(params, is_directory, pace, S_IRGRP);
1477 } else {
1478 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1481 DLIST_ADD(*pp_ace, pace);
1482 pace_group = pace;
1485 if (!pace_other) {
1486 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1487 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1488 return False;
1491 ZERO_STRUCTP(pace);
1492 pace->type = SMB_ACL_OTHER;
1493 pace->owner_type = WORLD_ACE;
1494 pace->unix_ug.world = -1;
1495 pace->trustee = global_sid_World;
1496 pace->attr = ALLOW_ACE;
1497 if (setting_acl) {
1498 pace->perms = 0;
1499 apply_default_perms(params, is_directory, pace, S_IROTH);
1500 } else
1501 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IROTH, S_IWOTH, S_IXOTH);
1503 DLIST_ADD(*pp_ace, pace);
1504 pace_other = pace;
1507 if (setting_acl) {
1508 /* Ensure when setting a POSIX ACL, that the uid for a
1509 SMB_ACL_USER_OBJ ACE (the owner ACE entry) has a duplicate
1510 permission entry as an SMB_ACL_USER, and a gid for a
1511 SMB_ACL_GROUP_OBJ ACE (the primary group ACE entry) also has
1512 a duplicate permission entry as an SMB_ACL_GROUP. If not,
1513 then if the ownership or group ownership of this file or
1514 directory gets changed, the user or group can lose their
1515 access. */
1516 bool got_duplicate_user = false;
1517 bool got_duplicate_group = false;
1519 for (pace = *pp_ace; pace; pace = pace->next) {
1520 if (pace->type == SMB_ACL_USER &&
1521 pace->unix_ug.uid == pace_user->unix_ug.uid) {
1522 /* Already got one. */
1523 got_duplicate_user = true;
1524 } else if (pace->type == SMB_ACL_GROUP &&
1525 pace->unix_ug.gid == pace_user->unix_ug.gid) {
1526 /* Already got one. */
1527 got_duplicate_group = true;
1528 } else if ((pace->type == SMB_ACL_GROUP)
1529 && (dom_sid_equal(&pace->trustee, &pace_user->trustee))) {
1530 /* If the SID owning the file appears
1531 * in a group entry, then we have
1532 * enough duplication, they will still
1533 * have access */
1534 got_duplicate_user = true;
1538 /* If the SID is equal for the user and group that we need
1539 to add the duplicate for, add only the group */
1540 if (!got_duplicate_user && !got_duplicate_group
1541 && dom_sid_equal(&pace_group->trustee,
1542 &pace_user->trustee)) {
1543 /* Add a duplicate SMB_ACL_GROUP entry, this
1544 * will cover the owning SID as well, as it
1545 * will always be mapped to both a uid and
1546 * gid. */
1548 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1549 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1550 return false;
1553 ZERO_STRUCTP(pace);
1554 pace->type = SMB_ACL_GROUP;;
1555 pace->owner_type = GID_ACE;
1556 pace->unix_ug.gid = pace_group->unix_ug.gid;
1557 pace->trustee = pace_group->trustee;
1558 pace->attr = pace_group->attr;
1559 pace->perms = pace_group->perms;
1561 DLIST_ADD(*pp_ace, pace);
1563 /* We're done here, make sure the
1564 statements below are not executed. */
1565 got_duplicate_user = true;
1566 got_duplicate_group = true;
1569 if (!got_duplicate_user) {
1570 /* Add a duplicate SMB_ACL_USER entry. */
1571 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1572 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1573 return false;
1576 ZERO_STRUCTP(pace);
1577 pace->type = SMB_ACL_USER;;
1578 pace->owner_type = UID_ACE;
1579 pace->unix_ug.uid = pace_user->unix_ug.uid;
1580 pace->trustee = pace_user->trustee;
1581 pace->attr = pace_user->attr;
1582 pace->perms = pace_user->perms;
1584 DLIST_ADD(*pp_ace, pace);
1586 got_duplicate_user = true;
1589 if (!got_duplicate_group) {
1590 /* Add a duplicate SMB_ACL_GROUP entry. */
1591 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1592 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1593 return false;
1596 ZERO_STRUCTP(pace);
1597 pace->type = SMB_ACL_GROUP;;
1598 pace->owner_type = GID_ACE;
1599 pace->unix_ug.gid = pace_group->unix_ug.gid;
1600 pace->trustee = pace_group->trustee;
1601 pace->attr = pace_group->attr;
1602 pace->perms = pace_group->perms;
1604 DLIST_ADD(*pp_ace, pace);
1606 got_duplicate_group = true;
1611 return True;
1614 /****************************************************************************
1615 Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1616 If it does not have them, check if there are any entries where the trustee is the
1617 file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1618 Note we must not do this to default directory ACLs.
1619 ****************************************************************************/
1621 static void check_owning_objs(canon_ace *ace, struct dom_sid *pfile_owner_sid, struct dom_sid *pfile_grp_sid)
1623 bool got_user_obj, got_group_obj;
1624 canon_ace *current_ace;
1625 int i, entries;
1627 entries = count_canon_ace_list(ace);
1628 got_user_obj = False;
1629 got_group_obj = False;
1631 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1632 if (current_ace->type == SMB_ACL_USER_OBJ)
1633 got_user_obj = True;
1634 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1635 got_group_obj = True;
1637 if (got_user_obj && got_group_obj) {
1638 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1639 return;
1642 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1643 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1644 dom_sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1645 current_ace->type = SMB_ACL_USER_OBJ;
1646 got_user_obj = True;
1648 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1649 dom_sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1650 current_ace->type = SMB_ACL_GROUP_OBJ;
1651 got_group_obj = True;
1654 if (!got_user_obj)
1655 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1656 if (!got_group_obj)
1657 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1660 static bool add_current_ace_to_acl(files_struct *fsp, struct security_ace *psa,
1661 canon_ace **file_ace, canon_ace **dir_ace,
1662 bool *got_file_allow, bool *got_dir_allow,
1663 bool *all_aces_are_inherit_only,
1664 canon_ace *current_ace)
1668 * Map the given NT permissions into a UNIX mode_t containing only
1669 * S_I(R|W|X)USR bits.
1672 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1673 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1675 /* Store the ace_flag. */
1676 current_ace->ace_flags = psa->flags;
1679 * Now add the created ace to either the file list, the directory
1680 * list, or both. We *MUST* preserve the order here (hence we use
1681 * DLIST_ADD_END) as NT ACLs are order dependent.
1684 if (fsp->is_directory) {
1687 * We can only add to the default POSIX ACE list if the ACE is
1688 * designed to be inherited by both files and directories.
1691 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1692 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1694 canon_ace *current_dir_ace = current_ace;
1695 DLIST_ADD_END(*dir_ace, current_ace, canon_ace *);
1698 * Note if this was an allow ace. We can't process
1699 * any further deny ace's after this.
1702 if (current_ace->attr == ALLOW_ACE)
1703 *got_dir_allow = True;
1705 if ((current_ace->attr == DENY_ACE) && *got_dir_allow) {
1706 DEBUG(0,("add_current_ace_to_acl: "
1707 "malformed ACL in "
1708 "inheritable ACL! Deny entry "
1709 "after Allow entry. Failing "
1710 "to set on file %s.\n",
1711 fsp_str_dbg(fsp)));
1712 return False;
1715 if( DEBUGLVL( 10 )) {
1716 dbgtext("add_current_ace_to_acl: adding dir ACL:\n");
1717 print_canon_ace( current_ace, 0);
1721 * If this is not an inherit only ACE we need to add a duplicate
1722 * to the file acl.
1725 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1726 canon_ace *dup_ace = dup_canon_ace(current_ace);
1728 if (!dup_ace) {
1729 DEBUG(0,("add_current_ace_to_acl: malloc fail !\n"));
1730 return False;
1734 * We must not free current_ace here as its
1735 * pointer is now owned by the dir_ace list.
1737 current_ace = dup_ace;
1738 /* We've essentially split this ace into two,
1739 * and added the ace with inheritance request
1740 * bits to the directory ACL. Drop those bits for
1741 * the ACE we're adding to the file list. */
1742 current_ace->ace_flags &= ~(SEC_ACE_FLAG_OBJECT_INHERIT|
1743 SEC_ACE_FLAG_CONTAINER_INHERIT|
1744 SEC_ACE_FLAG_INHERIT_ONLY);
1745 } else {
1747 * We must not free current_ace here as its
1748 * pointer is now owned by the dir_ace list.
1750 current_ace = NULL;
1754 * current_ace is now either owned by file_ace
1755 * or is NULL. We can safely operate on current_dir_ace
1756 * to treat mapping for default acl entries differently
1757 * than access acl entries.
1760 if (current_dir_ace->owner_type == UID_ACE) {
1762 * We already decided above this is a uid,
1763 * for default acls ace's only CREATOR_OWNER
1764 * maps to ACL_USER_OBJ. All other uid
1765 * ace's are ACL_USER.
1767 if (dom_sid_equal(&current_dir_ace->trustee,
1768 &global_sid_Creator_Owner)) {
1769 current_dir_ace->type = SMB_ACL_USER_OBJ;
1770 } else {
1771 current_dir_ace->type = SMB_ACL_USER;
1775 if (current_dir_ace->owner_type == GID_ACE) {
1777 * We already decided above this is a gid,
1778 * for default acls ace's only CREATOR_GROUP
1779 * maps to ACL_GROUP_OBJ. All other uid
1780 * ace's are ACL_GROUP.
1782 if (dom_sid_equal(&current_dir_ace->trustee,
1783 &global_sid_Creator_Group)) {
1784 current_dir_ace->type = SMB_ACL_GROUP_OBJ;
1785 } else {
1786 current_dir_ace->type = SMB_ACL_GROUP;
1793 * Only add to the file ACL if not inherit only.
1796 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1797 DLIST_ADD_END(*file_ace, current_ace, canon_ace *);
1800 * Note if this was an allow ace. We can't process
1801 * any further deny ace's after this.
1804 if (current_ace->attr == ALLOW_ACE)
1805 *got_file_allow = True;
1807 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1808 DEBUG(0,("add_current_ace_to_acl: malformed "
1809 "ACL in file ACL ! Deny entry after "
1810 "Allow entry. Failing to set on file "
1811 "%s.\n", fsp_str_dbg(fsp)));
1812 return False;
1815 if( DEBUGLVL( 10 )) {
1816 dbgtext("add_current_ace_to_acl: adding file ACL:\n");
1817 print_canon_ace( current_ace, 0);
1819 *all_aces_are_inherit_only = False;
1821 * We must not free current_ace here as its
1822 * pointer is now owned by the file_ace list.
1824 current_ace = NULL;
1828 * Free if ACE was not added.
1831 TALLOC_FREE(current_ace);
1832 return true;
1835 /****************************************************************************
1836 Unpack a struct security_descriptor into two canonical ace lists.
1837 ****************************************************************************/
1839 static bool create_canon_ace_lists(files_struct *fsp,
1840 const SMB_STRUCT_STAT *pst,
1841 struct dom_sid *pfile_owner_sid,
1842 struct dom_sid *pfile_grp_sid,
1843 canon_ace **ppfile_ace,
1844 canon_ace **ppdir_ace,
1845 const struct security_acl *dacl)
1847 bool all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1848 canon_ace *file_ace = NULL;
1849 canon_ace *dir_ace = NULL;
1850 canon_ace *current_ace = NULL;
1851 bool got_dir_allow = False;
1852 bool got_file_allow = False;
1853 int i, j;
1855 *ppfile_ace = NULL;
1856 *ppdir_ace = NULL;
1859 * Convert the incoming ACL into a more regular form.
1862 for(i = 0; i < dacl->num_aces; i++) {
1863 struct security_ace *psa = &dacl->aces[i];
1865 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1866 DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1867 return False;
1870 if (nt4_compatible_acls()) {
1872 * The security mask may be UNIX_ACCESS_NONE which should map into
1873 * no permissions (we overload the WRITE_OWNER bit for this) or it
1874 * should be one of the ALL/EXECUTE/READ/WRITE bits. Arrange for this
1875 * to be so. Any other bits override the UNIX_ACCESS_NONE bit.
1879 * Convert GENERIC bits to specific bits.
1882 se_map_generic(&psa->access_mask, &file_generic_mapping);
1884 psa->access_mask &= (UNIX_ACCESS_NONE|FILE_ALL_ACCESS);
1886 if(psa->access_mask != UNIX_ACCESS_NONE)
1887 psa->access_mask &= ~UNIX_ACCESS_NONE;
1892 * Deal with the fact that NT 4.x re-writes the canonical format
1893 * that we return for default ACLs. If a directory ACE is identical
1894 * to a inherited directory ACE then NT changes the bits so that the
1895 * first ACE is set to OI|IO and the second ACE for this SID is set
1896 * to CI. We need to repair this. JRA.
1899 for(i = 0; i < dacl->num_aces; i++) {
1900 struct security_ace *psa1 = &dacl->aces[i];
1902 for (j = i + 1; j < dacl->num_aces; j++) {
1903 struct security_ace *psa2 = &dacl->aces[j];
1905 if (psa1->access_mask != psa2->access_mask)
1906 continue;
1908 if (!dom_sid_equal(&psa1->trustee, &psa2->trustee))
1909 continue;
1912 * Ok - permission bits and SIDs are equal.
1913 * Check if flags were re-written.
1916 if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1918 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1919 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1921 } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1923 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1924 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1930 for(i = 0; i < dacl->num_aces; i++) {
1931 struct security_ace *psa = &dacl->aces[i];
1934 * Create a canon_ace entry representing this NT DACL ACE.
1937 if ((current_ace = talloc(talloc_tos(), canon_ace)) == NULL) {
1938 free_canon_ace_list(file_ace);
1939 free_canon_ace_list(dir_ace);
1940 DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1941 return False;
1944 ZERO_STRUCTP(current_ace);
1946 sid_copy(&current_ace->trustee, &psa->trustee);
1949 * Try and work out if the SID is a user or group
1950 * as we need to flag these differently for POSIX.
1951 * Note what kind of a POSIX ACL this should map to.
1954 if( dom_sid_equal(&current_ace->trustee, &global_sid_World)) {
1955 current_ace->owner_type = WORLD_ACE;
1956 current_ace->unix_ug.world = -1;
1957 current_ace->type = SMB_ACL_OTHER;
1958 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1959 current_ace->owner_type = UID_ACE;
1960 current_ace->unix_ug.uid = pst->st_ex_uid;
1961 current_ace->type = SMB_ACL_USER_OBJ;
1964 * The Creator Owner entry only specifies inheritable permissions,
1965 * never access permissions. WinNT doesn't always set the ACE to
1966 * INHERIT_ONLY, though.
1969 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1971 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1972 current_ace->owner_type = GID_ACE;
1973 current_ace->unix_ug.gid = pst->st_ex_gid;
1974 current_ace->type = SMB_ACL_GROUP_OBJ;
1977 * The Creator Group entry only specifies inheritable permissions,
1978 * never access permissions. WinNT doesn't always set the ACE to
1979 * INHERIT_ONLY, though.
1981 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1983 } else {
1984 struct unixid unixid;
1986 if (!sids_to_unixids(&current_ace->trustee, 1, &unixid)) {
1987 free_canon_ace_list(file_ace);
1988 free_canon_ace_list(dir_ace);
1989 TALLOC_FREE(current_ace);
1990 DEBUG(0, ("create_canon_ace_lists: sids_to_unixids "
1991 "failed for %s (allocation failure)\n",
1992 sid_string_dbg(&current_ace->trustee)));
1993 return false;
1996 if (unixid.type == ID_TYPE_BOTH) {
1997 /* If it's the owning user, this is a
1998 * user_obj, not a user. This way, we
1999 * get a valid ACL for groups that own
2000 * files, without putting user ACL
2001 * entries in for groups otherwise */
2002 if (unixid.id == pst->st_ex_uid) {
2003 current_ace->owner_type = UID_ACE;
2004 current_ace->unix_ug.uid = unixid.id;
2005 current_ace->type = SMB_ACL_USER_OBJ;
2007 /* Add the user object to the posix ACL,
2008 and proceed to the group mapping
2009 below. This handles the talloc_free
2010 of current_ace if not added for some
2011 reason */
2012 if (!add_current_ace_to_acl(fsp,
2013 psa,
2014 &file_ace,
2015 &dir_ace,
2016 &got_file_allow,
2017 &got_dir_allow,
2018 &all_aces_are_inherit_only,
2019 current_ace)) {
2020 free_canon_ace_list(file_ace);
2021 free_canon_ace_list(dir_ace);
2022 return false;
2025 if ((current_ace = talloc(talloc_tos(),
2026 canon_ace)) == NULL) {
2027 free_canon_ace_list(file_ace);
2028 free_canon_ace_list(dir_ace);
2029 DEBUG(0,("create_canon_ace_lists: "
2030 "malloc fail.\n"));
2031 return False;
2034 ZERO_STRUCTP(current_ace);
2037 sid_copy(&current_ace->trustee, &psa->trustee);
2039 current_ace->unix_ug.gid = unixid.id;
2040 current_ace->owner_type = GID_ACE;
2041 /* If it's the primary group, this is a
2042 group_obj, not a group. */
2043 if (current_ace->unix_ug.gid == pst->st_ex_gid) {
2044 current_ace->type = SMB_ACL_GROUP_OBJ;
2045 } else {
2046 current_ace->type = SMB_ACL_GROUP;
2049 } else if (unixid.type == ID_TYPE_UID) {
2050 current_ace->owner_type = UID_ACE;
2051 current_ace->unix_ug.uid = unixid.id;
2052 /* If it's the owning user, this is a user_obj,
2053 not a user. */
2054 if (current_ace->unix_ug.uid == pst->st_ex_uid) {
2055 current_ace->type = SMB_ACL_USER_OBJ;
2056 } else {
2057 current_ace->type = SMB_ACL_USER;
2059 } else if (unixid.type == ID_TYPE_GID) {
2060 current_ace->unix_ug.gid = unixid.id;
2061 current_ace->owner_type = GID_ACE;
2062 /* If it's the primary group, this is a
2063 group_obj, not a group. */
2064 if (current_ace->unix_ug.gid == pst->st_ex_gid) {
2065 current_ace->type = SMB_ACL_GROUP_OBJ;
2066 } else {
2067 current_ace->type = SMB_ACL_GROUP;
2069 } else {
2071 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
2074 if (non_mappable_sid(&psa->trustee)) {
2075 DEBUG(10, ("create_canon_ace_lists: ignoring "
2076 "non-mappable SID %s\n",
2077 sid_string_dbg(&psa->trustee)));
2078 TALLOC_FREE(current_ace);
2079 continue;
2082 if (lp_force_unknown_acl_user(SNUM(fsp->conn))) {
2083 DEBUG(10, ("create_canon_ace_lists: ignoring "
2084 "unknown or foreign SID %s\n",
2085 sid_string_dbg(&psa->trustee)));
2086 TALLOC_FREE(current_ace);
2087 continue;
2090 free_canon_ace_list(file_ace);
2091 free_canon_ace_list(dir_ace);
2092 DEBUG(0, ("create_canon_ace_lists: unable to map SID "
2093 "%s to uid or gid.\n",
2094 sid_string_dbg(&current_ace->trustee)));
2095 TALLOC_FREE(current_ace);
2096 return false;
2100 /* handles the talloc_free of current_ace if not added for some reason */
2101 if (!add_current_ace_to_acl(fsp, psa, &file_ace, &dir_ace,
2102 &got_file_allow, &got_dir_allow,
2103 &all_aces_are_inherit_only, current_ace)) {
2104 free_canon_ace_list(file_ace);
2105 free_canon_ace_list(dir_ace);
2106 return false;
2110 if (fsp->is_directory && all_aces_are_inherit_only) {
2112 * Windows 2000 is doing one of these weird 'inherit acl'
2113 * traverses to conserve NTFS ACL resources. Just pretend
2114 * there was no DACL sent. JRA.
2117 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
2118 free_canon_ace_list(file_ace);
2119 free_canon_ace_list(dir_ace);
2120 file_ace = NULL;
2121 dir_ace = NULL;
2122 } else {
2124 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in
2125 * the file ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
2126 * entries can be converted to *_OBJ. Don't do this for the default
2127 * ACL, we will create them separately for this if needed inside
2128 * ensure_canon_entry_valid().
2130 if (file_ace) {
2131 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
2135 *ppfile_ace = file_ace;
2136 *ppdir_ace = dir_ace;
2138 return True;
2141 /****************************************************************************
2142 ASCII art time again... JRA :-).
2144 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
2145 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
2146 entries). Secondly, the merge code has ensured that all duplicate SID entries for
2147 allow or deny have been merged, so the same SID can only appear once in the deny
2148 list or once in the allow list.
2150 We then process as follows :
2152 ---------------------------------------------------------------------------
2153 First pass - look for a Everyone DENY entry.
2155 If it is deny all (rwx) trunate the list at this point.
2156 Else, walk the list from this point and use the deny permissions of this
2157 entry as a mask on all following allow entries. Finally, delete
2158 the Everyone DENY entry (we have applied it to everything possible).
2160 In addition, in this pass we remove any DENY entries that have
2161 no permissions (ie. they are a DENY nothing).
2162 ---------------------------------------------------------------------------
2163 Second pass - only deal with deny user entries.
2165 DENY user1 (perms XXX)
2167 new_perms = 0
2168 for all following allow group entries where user1 is in group
2169 new_perms |= group_perms;
2171 user1 entry perms = new_perms & ~ XXX;
2173 Convert the deny entry to an allow entry with the new perms and
2174 push to the end of the list. Note if the user was in no groups
2175 this maps to a specific allow nothing entry for this user.
2177 The common case from the NT ACL choser (userX deny all) is
2178 optimised so we don't do the group lookup - we just map to
2179 an allow nothing entry.
2181 What we're doing here is inferring the allow permissions the
2182 person setting the ACE on user1 wanted by looking at the allow
2183 permissions on the groups the user is currently in. This will
2184 be a snapshot, depending on group membership but is the best
2185 we can do and has the advantage of failing closed rather than
2186 open.
2187 ---------------------------------------------------------------------------
2188 Third pass - only deal with deny group entries.
2190 DENY group1 (perms XXX)
2192 for all following allow user entries where user is in group1
2193 user entry perms = user entry perms & ~ XXX;
2195 If there is a group Everyone allow entry with permissions YYY,
2196 convert the group1 entry to an allow entry and modify its
2197 permissions to be :
2199 new_perms = YYY & ~ XXX
2201 and push to the end of the list.
2203 If there is no group Everyone allow entry then convert the
2204 group1 entry to a allow nothing entry and push to the end of the list.
2206 Note that the common case from the NT ACL choser (groupX deny all)
2207 cannot be optimised here as we need to modify user entries who are
2208 in the group to change them to a deny all also.
2210 What we're doing here is modifying the allow permissions of
2211 user entries (which are more specific in POSIX ACLs) to mask
2212 out the explicit deny set on the group they are in. This will
2213 be a snapshot depending on current group membership but is the
2214 best we can do and has the advantage of failing closed rather
2215 than open.
2216 ---------------------------------------------------------------------------
2217 Fourth pass - cope with cumulative permissions.
2219 for all allow user entries, if there exists an allow group entry with
2220 more permissive permissions, and the user is in that group, rewrite the
2221 allow user permissions to contain both sets of permissions.
2223 Currently the code for this is #ifdef'ed out as these semantics make
2224 no sense to me. JRA.
2225 ---------------------------------------------------------------------------
2227 Note we *MUST* do the deny user pass first as this will convert deny user
2228 entries into allow user entries which can then be processed by the deny
2229 group pass.
2231 The above algorithm took a *lot* of thinking about - hence this
2232 explaination :-). JRA.
2233 ****************************************************************************/
2235 /****************************************************************************
2236 Process a canon_ace list entries. This is very complex code. We need
2237 to go through and remove the "deny" permissions from any allow entry that matches
2238 the id of this entry. We have already refused any NT ACL that wasn't in correct
2239 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
2240 we just remove it (to fail safe). We have already removed any duplicate ace
2241 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
2242 allow entries.
2243 ****************************************************************************/
2245 static void process_deny_list(connection_struct *conn, canon_ace **pp_ace_list )
2247 canon_ace *ace_list = *pp_ace_list;
2248 canon_ace *curr_ace = NULL;
2249 canon_ace *curr_ace_next = NULL;
2251 /* Pass 1 above - look for an Everyone, deny entry. */
2253 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2254 canon_ace *allow_ace_p;
2256 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2258 if (curr_ace->attr != DENY_ACE)
2259 continue;
2261 if (curr_ace->perms == (mode_t)0) {
2263 /* Deny nothing entry - delete. */
2265 DLIST_REMOVE(ace_list, curr_ace);
2266 continue;
2269 if (!dom_sid_equal(&curr_ace->trustee, &global_sid_World))
2270 continue;
2272 /* JRATEST - assert. */
2273 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
2275 if (curr_ace->perms == ALL_ACE_PERMS) {
2278 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
2279 * list at this point including this entry.
2282 canon_ace *prev_entry = DLIST_PREV(curr_ace);
2284 free_canon_ace_list( curr_ace );
2285 if (prev_entry)
2286 DLIST_REMOVE(ace_list, prev_entry);
2287 else {
2288 /* We deleted the entire list. */
2289 ace_list = NULL;
2291 break;
2294 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2297 * Only mask off allow entries.
2300 if (allow_ace_p->attr != ALLOW_ACE)
2301 continue;
2303 allow_ace_p->perms &= ~curr_ace->perms;
2307 * Now it's been applied, remove it.
2310 DLIST_REMOVE(ace_list, curr_ace);
2313 /* Pass 2 above - deal with deny user entries. */
2315 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2316 mode_t new_perms = (mode_t)0;
2317 canon_ace *allow_ace_p;
2319 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2321 if (curr_ace->attr != DENY_ACE)
2322 continue;
2324 if (curr_ace->owner_type != UID_ACE)
2325 continue;
2327 if (curr_ace->perms == ALL_ACE_PERMS) {
2330 * Optimisation - this is a deny everything to this user.
2331 * Convert to an allow nothing and push to the end of the list.
2334 curr_ace->attr = ALLOW_ACE;
2335 curr_ace->perms = (mode_t)0;
2336 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2337 continue;
2340 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2342 if (allow_ace_p->attr != ALLOW_ACE)
2343 continue;
2345 /* We process GID_ACE and WORLD_ACE entries only. */
2347 if (allow_ace_p->owner_type == UID_ACE)
2348 continue;
2350 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2351 new_perms |= allow_ace_p->perms;
2355 * Convert to a allow entry, modify the perms and push to the end
2356 * of the list.
2359 curr_ace->attr = ALLOW_ACE;
2360 curr_ace->perms = (new_perms & ~curr_ace->perms);
2361 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2364 /* Pass 3 above - deal with deny group entries. */
2366 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2367 canon_ace *allow_ace_p;
2368 canon_ace *allow_everyone_p = NULL;
2370 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2372 if (curr_ace->attr != DENY_ACE)
2373 continue;
2375 if (curr_ace->owner_type != GID_ACE)
2376 continue;
2378 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2380 if (allow_ace_p->attr != ALLOW_ACE)
2381 continue;
2383 /* Store a pointer to the Everyone allow, if it exists. */
2384 if (allow_ace_p->owner_type == WORLD_ACE)
2385 allow_everyone_p = allow_ace_p;
2387 /* We process UID_ACE entries only. */
2389 if (allow_ace_p->owner_type != UID_ACE)
2390 continue;
2392 /* Mask off the deny group perms. */
2394 if (uid_entry_in_group(conn, allow_ace_p, curr_ace))
2395 allow_ace_p->perms &= ~curr_ace->perms;
2399 * Convert the deny to an allow with the correct perms and
2400 * push to the end of the list.
2403 curr_ace->attr = ALLOW_ACE;
2404 if (allow_everyone_p)
2405 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
2406 else
2407 curr_ace->perms = (mode_t)0;
2408 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2411 /* Doing this fourth pass allows Windows semantics to be layered
2412 * on top of POSIX semantics. I'm not sure if this is desirable.
2413 * For example, in W2K ACLs there is no way to say, "Group X no
2414 * access, user Y full access" if user Y is a member of group X.
2415 * This seems completely broken semantics to me.... JRA.
2418 #if 0
2419 /* Pass 4 above - deal with allow entries. */
2421 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2422 canon_ace *allow_ace_p;
2424 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2426 if (curr_ace->attr != ALLOW_ACE)
2427 continue;
2429 if (curr_ace->owner_type != UID_ACE)
2430 continue;
2432 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2434 if (allow_ace_p->attr != ALLOW_ACE)
2435 continue;
2437 /* We process GID_ACE entries only. */
2439 if (allow_ace_p->owner_type != GID_ACE)
2440 continue;
2442 /* OR in the group perms. */
2444 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2445 curr_ace->perms |= allow_ace_p->perms;
2448 #endif
2450 *pp_ace_list = ace_list;
2453 /****************************************************************************
2454 Unpack a struct security_descriptor into two canonical ace lists. We don't depend on this
2455 succeeding.
2456 ****************************************************************************/
2458 static bool unpack_canon_ace(files_struct *fsp,
2459 const SMB_STRUCT_STAT *pst,
2460 struct dom_sid *pfile_owner_sid,
2461 struct dom_sid *pfile_grp_sid,
2462 canon_ace **ppfile_ace,
2463 canon_ace **ppdir_ace,
2464 uint32 security_info_sent,
2465 const struct security_descriptor *psd)
2467 canon_ace *file_ace = NULL;
2468 canon_ace *dir_ace = NULL;
2470 *ppfile_ace = NULL;
2471 *ppdir_ace = NULL;
2473 if(security_info_sent == 0) {
2474 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2475 return False;
2479 * If no DACL then this is a chown only security descriptor.
2482 if(!(security_info_sent & SECINFO_DACL) || !psd->dacl)
2483 return True;
2486 * Now go through the DACL and create the canon_ace lists.
2489 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2490 &file_ace, &dir_ace, psd->dacl))
2491 return False;
2493 if ((file_ace == NULL) && (dir_ace == NULL)) {
2494 /* W2K traverse DACL set - ignore. */
2495 return True;
2499 * Go through the canon_ace list and merge entries
2500 * belonging to identical users of identical allow or deny type.
2501 * We can do this as all deny entries come first, followed by
2502 * all allow entries (we have mandated this before accepting this acl).
2505 print_canon_ace_list( "file ace - before merge", file_ace);
2506 merge_aces( &file_ace, false);
2508 print_canon_ace_list( "dir ace - before merge", dir_ace);
2509 merge_aces( &dir_ace, true);
2512 * NT ACLs are order dependent. Go through the acl lists and
2513 * process DENY entries by masking the allow entries.
2516 print_canon_ace_list( "file ace - before deny", file_ace);
2517 process_deny_list(fsp->conn, &file_ace);
2519 print_canon_ace_list( "dir ace - before deny", dir_ace);
2520 process_deny_list(fsp->conn, &dir_ace);
2523 * A well formed POSIX file or default ACL has at least 3 entries, a
2524 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2525 * and optionally a mask entry. Ensure this is the case.
2528 print_canon_ace_list( "file ace - before valid", file_ace);
2530 if (!ensure_canon_entry_valid(fsp->conn, &file_ace, fsp->conn->params,
2531 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2532 free_canon_ace_list(file_ace);
2533 free_canon_ace_list(dir_ace);
2534 return False;
2537 print_canon_ace_list( "dir ace - before valid", dir_ace);
2539 if (dir_ace && !ensure_canon_entry_valid(fsp->conn, &dir_ace, fsp->conn->params,
2540 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2541 free_canon_ace_list(file_ace);
2542 free_canon_ace_list(dir_ace);
2543 return False;
2546 print_canon_ace_list( "file ace - return", file_ace);
2547 print_canon_ace_list( "dir ace - return", dir_ace);
2549 *ppfile_ace = file_ace;
2550 *ppdir_ace = dir_ace;
2551 return True;
2555 /******************************************************************************
2556 When returning permissions, try and fit NT display
2557 semantics if possible. Note the the canon_entries here must have been malloced.
2558 The list format should be - first entry = owner, followed by group and other user
2559 entries, last entry = other.
2561 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2562 are not ordered, and match on the most specific entry rather than walking a list,
2563 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2565 Entry 0: owner : deny all except read and write.
2566 Entry 1: owner : allow read and write.
2567 Entry 2: group : deny all except read.
2568 Entry 3: group : allow read.
2569 Entry 4: Everyone : allow read.
2571 But NT cannot display this in their ACL editor !
2572 ********************************************************************************/
2574 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2576 canon_ace *l_head = *pp_list_head;
2577 canon_ace *owner_ace = NULL;
2578 canon_ace *other_ace = NULL;
2579 canon_ace *ace = NULL;
2581 for (ace = l_head; ace; ace = ace->next) {
2582 if (ace->type == SMB_ACL_USER_OBJ)
2583 owner_ace = ace;
2584 else if (ace->type == SMB_ACL_OTHER) {
2585 /* Last ace - this is "other" */
2586 other_ace = ace;
2590 if (!owner_ace || !other_ace) {
2591 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2592 filename ));
2593 return;
2597 * The POSIX algorithm applies to owner first, and other last,
2598 * so ensure they are arranged in this order.
2601 if (owner_ace) {
2602 DLIST_PROMOTE(l_head, owner_ace);
2605 if (other_ace) {
2606 DLIST_DEMOTE(l_head, other_ace, canon_ace *);
2609 /* We have probably changed the head of the list. */
2611 *pp_list_head = l_head;
2614 /****************************************************************************
2615 Create a linked list of canonical ACE entries.
2616 ****************************************************************************/
2618 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2619 const char *fname, SMB_ACL_T posix_acl,
2620 const SMB_STRUCT_STAT *psbuf,
2621 const struct dom_sid *powner, const struct dom_sid *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2623 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2624 canon_ace *l_head = NULL;
2625 canon_ace *ace = NULL;
2626 canon_ace *next_ace = NULL;
2627 int entry_id = SMB_ACL_FIRST_ENTRY;
2628 SMB_ACL_ENTRY_T entry;
2629 size_t ace_count;
2631 while ( posix_acl && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1)) {
2632 SMB_ACL_TAG_T tagtype;
2633 SMB_ACL_PERMSET_T permset;
2634 struct dom_sid sid;
2635 posix_id unix_ug;
2636 enum ace_owner owner_type;
2638 entry_id = SMB_ACL_NEXT_ENTRY;
2640 /* Is this a MASK entry ? */
2641 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
2642 continue;
2644 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
2645 continue;
2647 /* Decide which SID to use based on the ACL type. */
2648 switch(tagtype) {
2649 case SMB_ACL_USER_OBJ:
2650 /* Get the SID from the owner. */
2651 sid_copy(&sid, powner);
2652 unix_ug.uid = psbuf->st_ex_uid;
2653 owner_type = UID_ACE;
2654 break;
2655 case SMB_ACL_USER:
2657 uid_t *puid = (uid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2658 if (puid == NULL) {
2659 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2660 continue;
2662 uid_to_sid( &sid, *puid);
2663 unix_ug.uid = *puid;
2664 owner_type = UID_ACE;
2665 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2666 break;
2668 case SMB_ACL_GROUP_OBJ:
2669 /* Get the SID from the owning group. */
2670 sid_copy(&sid, pgroup);
2671 unix_ug.gid = psbuf->st_ex_gid;
2672 owner_type = GID_ACE;
2673 break;
2674 case SMB_ACL_GROUP:
2676 gid_t *pgid = (gid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2677 if (pgid == NULL) {
2678 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2679 continue;
2681 gid_to_sid( &sid, *pgid);
2682 unix_ug.gid = *pgid;
2683 owner_type = GID_ACE;
2684 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)pgid,tagtype);
2685 break;
2687 case SMB_ACL_MASK:
2688 acl_mask = convert_permset_to_mode_t(conn, permset);
2689 continue; /* Don't count the mask as an entry. */
2690 case SMB_ACL_OTHER:
2691 /* Use the Everyone SID */
2692 sid = global_sid_World;
2693 unix_ug.world = -1;
2694 owner_type = WORLD_ACE;
2695 break;
2696 default:
2697 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2698 continue;
2702 * Add this entry to the list.
2705 if ((ace = talloc(talloc_tos(), canon_ace)) == NULL)
2706 goto fail;
2708 ZERO_STRUCTP(ace);
2709 ace->type = tagtype;
2710 ace->perms = convert_permset_to_mode_t(conn, permset);
2711 ace->attr = ALLOW_ACE;
2712 ace->trustee = sid;
2713 ace->unix_ug = unix_ug;
2714 ace->owner_type = owner_type;
2715 ace->ace_flags = get_pai_flags(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2717 DLIST_ADD(l_head, ace);
2721 * This next call will ensure we have at least a user/group/world set.
2724 if (!ensure_canon_entry_valid(conn, &l_head, conn->params,
2725 S_ISDIR(psbuf->st_ex_mode), powner, pgroup,
2726 psbuf, False))
2727 goto fail;
2730 * Now go through the list, masking the permissions with the
2731 * acl_mask. Ensure all DENY Entries are at the start of the list.
2734 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2736 for ( ace_count = 0, ace = l_head; ace; ace = next_ace, ace_count++) {
2737 next_ace = ace->next;
2739 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2740 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2741 ace->perms &= acl_mask;
2743 if (ace->perms == 0) {
2744 DLIST_PROMOTE(l_head, ace);
2747 if( DEBUGLVL( 10 ) ) {
2748 print_canon_ace(ace, ace_count);
2752 arrange_posix_perms(fname,&l_head );
2754 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", l_head );
2756 return l_head;
2758 fail:
2760 free_canon_ace_list(l_head);
2761 return NULL;
2764 /****************************************************************************
2765 Check if the current user group list contains a given group.
2766 ****************************************************************************/
2768 bool current_user_in_group(connection_struct *conn, gid_t gid)
2770 int i;
2771 const struct security_unix_token *utok = get_current_utok(conn);
2773 for (i = 0; i < utok->ngroups; i++) {
2774 if (utok->groups[i] == gid) {
2775 return True;
2779 return False;
2782 /****************************************************************************
2783 Should we override a deny ? Check 'acl group control' and 'dos filemode'.
2784 ****************************************************************************/
2786 static bool acl_group_override(connection_struct *conn,
2787 const struct smb_filename *smb_fname)
2789 if ((errno != EPERM) && (errno != EACCES)) {
2790 return false;
2793 /* file primary group == user primary or supplementary group */
2794 if (lp_acl_group_control(SNUM(conn)) &&
2795 current_user_in_group(conn, smb_fname->st.st_ex_gid)) {
2796 return true;
2799 /* user has writeable permission */
2800 if (lp_dos_filemode(SNUM(conn)) &&
2801 can_write_to_file(conn, smb_fname)) {
2802 return true;
2805 return false;
2808 /****************************************************************************
2809 Attempt to apply an ACL to a file or directory.
2810 ****************************************************************************/
2812 static bool set_canon_ace_list(files_struct *fsp,
2813 canon_ace *the_ace,
2814 bool default_ace,
2815 const SMB_STRUCT_STAT *psbuf,
2816 bool *pacl_set_support)
2818 connection_struct *conn = fsp->conn;
2819 bool ret = False;
2820 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, (int)count_canon_ace_list(the_ace) + 1);
2821 canon_ace *p_ace;
2822 int i;
2823 SMB_ACL_ENTRY_T mask_entry;
2824 bool got_mask_entry = False;
2825 SMB_ACL_PERMSET_T mask_permset;
2826 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2827 bool needs_mask = False;
2828 mode_t mask_perms = 0;
2830 /* Use the psbuf that was passed in. */
2831 if (psbuf != &fsp->fsp_name->st) {
2832 fsp->fsp_name->st = *psbuf;
2835 #if defined(POSIX_ACL_NEEDS_MASK)
2836 /* HP-UX always wants to have a mask (called "class" there). */
2837 needs_mask = True;
2838 #endif
2840 if (the_acl == NULL) {
2842 if (!no_acl_syscall_error(errno)) {
2844 * Only print this error message if we have some kind of ACL
2845 * support that's not working. Otherwise we would always get this.
2847 DEBUG(0,("set_canon_ace_list: Unable to init %s ACL. (%s)\n",
2848 default_ace ? "default" : "file", strerror(errno) ));
2850 *pacl_set_support = False;
2851 goto fail;
2854 if( DEBUGLVL( 10 )) {
2855 dbgtext("set_canon_ace_list: setting ACL:\n");
2856 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2857 print_canon_ace( p_ace, i);
2861 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2862 SMB_ACL_ENTRY_T the_entry;
2863 SMB_ACL_PERMSET_T the_permset;
2866 * ACLs only "need" an ACL_MASK entry if there are any named user or
2867 * named group entries. But if there is an ACL_MASK entry, it applies
2868 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2869 * so that it doesn't deny (i.e., mask off) any permissions.
2872 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2873 needs_mask = True;
2874 mask_perms |= p_ace->perms;
2875 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2876 mask_perms |= p_ace->perms;
2880 * Get the entry for this ACE.
2883 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
2884 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2885 i, strerror(errno) ));
2886 goto fail;
2889 if (p_ace->type == SMB_ACL_MASK) {
2890 mask_entry = the_entry;
2891 got_mask_entry = True;
2895 * Ok - we now know the ACL calls should be working, don't
2896 * allow fallback to chmod.
2899 *pacl_set_support = True;
2902 * Initialise the entry from the canon_ace.
2906 * First tell the entry what type of ACE this is.
2909 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, p_ace->type) == -1) {
2910 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2911 i, strerror(errno) ));
2912 goto fail;
2916 * Only set the qualifier (user or group id) if the entry is a user
2917 * or group id ACE.
2920 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2921 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&p_ace->unix_ug.uid) == -1) {
2922 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2923 i, strerror(errno) ));
2924 goto fail;
2929 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2932 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
2933 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2934 i, strerror(errno) ));
2935 goto fail;
2938 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2939 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2940 (unsigned int)p_ace->perms, i, strerror(errno) ));
2941 goto fail;
2945 * ..and apply them to the entry.
2948 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
2949 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2950 i, strerror(errno) ));
2951 goto fail;
2954 if( DEBUGLVL( 10 ))
2955 print_canon_ace( p_ace, i);
2959 if (needs_mask && !got_mask_entry) {
2960 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &mask_entry) == -1) {
2961 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2962 goto fail;
2965 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, mask_entry, SMB_ACL_MASK) == -1) {
2966 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2967 goto fail;
2970 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, mask_entry, &mask_permset) == -1) {
2971 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2972 goto fail;
2975 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2976 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2977 goto fail;
2980 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, mask_entry, mask_permset) == -1) {
2981 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2982 goto fail;
2987 * Finally apply it to the file or directory.
2990 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2991 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name->base_name,
2992 the_acl_type, the_acl) == -1) {
2994 * Some systems allow all the above calls and only fail with no ACL support
2995 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2997 if (no_acl_syscall_error(errno)) {
2998 *pacl_set_support = False;
3001 if (acl_group_override(conn, fsp->fsp_name)) {
3002 int sret;
3004 DEBUG(5,("set_canon_ace_list: acl group "
3005 "control on and current user in file "
3006 "%s primary group.\n",
3007 fsp_str_dbg(fsp)));
3009 become_root();
3010 sret = SMB_VFS_SYS_ACL_SET_FILE(conn,
3011 fsp->fsp_name->base_name, the_acl_type,
3012 the_acl);
3013 unbecome_root();
3014 if (sret == 0) {
3015 ret = True;
3019 if (ret == False) {
3020 DEBUG(2,("set_canon_ace_list: "
3021 "sys_acl_set_file type %s failed for "
3022 "file %s (%s).\n",
3023 the_acl_type == SMB_ACL_TYPE_DEFAULT ?
3024 "directory default" : "file",
3025 fsp_str_dbg(fsp), strerror(errno)));
3026 goto fail;
3029 } else {
3030 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
3032 * Some systems allow all the above calls and only fail with no ACL support
3033 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
3035 if (no_acl_syscall_error(errno)) {
3036 *pacl_set_support = False;
3039 if (acl_group_override(conn, fsp->fsp_name)) {
3040 int sret;
3042 DEBUG(5,("set_canon_ace_list: acl group "
3043 "control on and current user in file "
3044 "%s primary group.\n",
3045 fsp_str_dbg(fsp)));
3047 become_root();
3048 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
3049 unbecome_root();
3050 if (sret == 0) {
3051 ret = True;
3055 if (ret == False) {
3056 DEBUG(2,("set_canon_ace_list: "
3057 "sys_acl_set_file failed for file %s "
3058 "(%s).\n",
3059 fsp_str_dbg(fsp), strerror(errno)));
3060 goto fail;
3065 ret = True;
3067 fail:
3069 if (the_acl != NULL) {
3070 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
3073 return ret;
3076 /****************************************************************************
3077 Find a particular canon_ace entry.
3078 ****************************************************************************/
3080 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, posix_id *id)
3082 while (list) {
3083 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
3084 (type == SMB_ACL_USER && id && id->uid == list->unix_ug.uid) ||
3085 (type == SMB_ACL_GROUP && id && id->gid == list->unix_ug.gid)))
3086 break;
3087 list = list->next;
3089 return list;
3092 /****************************************************************************
3094 ****************************************************************************/
3096 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
3098 SMB_ACL_ENTRY_T entry;
3100 if (!the_acl)
3101 return NULL;
3102 if (SMB_VFS_SYS_ACL_GET_ENTRY(conn, the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
3103 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
3104 return NULL;
3106 return the_acl;
3109 /****************************************************************************
3110 Convert a canon_ace to a generic 3 element permission - if possible.
3111 ****************************************************************************/
3113 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
3115 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
3117 int snum = SNUM(fsp->conn);
3118 size_t ace_count = count_canon_ace_list(file_ace_list);
3119 canon_ace *ace_p;
3120 canon_ace *owner_ace = NULL;
3121 canon_ace *group_ace = NULL;
3122 canon_ace *other_ace = NULL;
3123 mode_t and_bits;
3124 mode_t or_bits;
3126 if (ace_count != 3) {
3127 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE "
3128 "entries for file %s to convert to posix perms.\n",
3129 fsp_str_dbg(fsp)));
3130 return False;
3133 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
3134 if (ace_p->owner_type == UID_ACE)
3135 owner_ace = ace_p;
3136 else if (ace_p->owner_type == GID_ACE)
3137 group_ace = ace_p;
3138 else if (ace_p->owner_type == WORLD_ACE)
3139 other_ace = ace_p;
3142 if (!owner_ace || !group_ace || !other_ace) {
3143 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get "
3144 "standard entries for file %s.\n", fsp_str_dbg(fsp)));
3145 return False;
3148 *posix_perms = (mode_t)0;
3150 *posix_perms |= owner_ace->perms;
3151 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
3152 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
3153 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
3154 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
3155 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
3156 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
3158 /* The owner must have at least read access. */
3160 *posix_perms |= S_IRUSR;
3161 if (fsp->is_directory)
3162 *posix_perms |= (S_IWUSR|S_IXUSR);
3164 /* If requested apply the masks. */
3166 /* Get the initial bits to apply. */
3168 if (fsp->is_directory) {
3169 and_bits = lp_dir_security_mask(snum);
3170 or_bits = lp_force_dir_security_mode(snum);
3171 } else {
3172 and_bits = lp_security_mask(snum);
3173 or_bits = lp_force_security_mode(snum);
3176 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
3178 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o "
3179 "to perm=0%o for file %s.\n", (int)owner_ace->perms,
3180 (int)group_ace->perms, (int)other_ace->perms,
3181 (int)*posix_perms, fsp_str_dbg(fsp)));
3183 return True;
3186 /****************************************************************************
3187 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
3188 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
3189 with CI|OI set so it is inherited and also applies to the directory.
3190 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
3191 ****************************************************************************/
3193 static size_t merge_default_aces( struct security_ace *nt_ace_list, size_t num_aces)
3195 size_t i, j;
3197 for (i = 0; i < num_aces; i++) {
3198 for (j = i+1; j < num_aces; j++) {
3199 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3200 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3201 bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3202 bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3204 /* We know the lower number ACE's are file entries. */
3205 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
3206 (nt_ace_list[i].size == nt_ace_list[j].size) &&
3207 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
3208 dom_sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
3209 (i_inh == j_inh) &&
3210 (i_flags_ni == 0) &&
3211 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
3212 SEC_ACE_FLAG_CONTAINER_INHERIT|
3213 SEC_ACE_FLAG_INHERIT_ONLY))) {
3215 * W2K wants to have access allowed zero access ACE's
3216 * at the end of the list. If the mask is zero, merge
3217 * the non-inherited ACE onto the inherited ACE.
3220 if (nt_ace_list[i].access_mask == 0) {
3221 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3222 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3223 if (num_aces - i - 1 > 0)
3224 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
3225 sizeof(struct security_ace));
3227 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
3228 (unsigned int)i, (unsigned int)j ));
3229 } else {
3231 * These are identical except for the flags.
3232 * Merge the inherited ACE onto the non-inherited ACE.
3235 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3236 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3237 if (num_aces - j - 1 > 0)
3238 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
3239 sizeof(struct security_ace));
3241 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
3242 (unsigned int)j, (unsigned int)i ));
3244 num_aces--;
3245 break;
3250 return num_aces;
3254 * Add or Replace ACE entry.
3255 * In some cases we need to add a specific ACE for compatibility reasons.
3256 * When doing that we must make sure we are not actually creating a duplicate
3257 * entry. So we need to search whether an ACE entry already exist and eventually
3258 * replacce the access mask, or add a completely new entry if none was found.
3260 * This function assumes the array has enough space to add a new entry without
3261 * any reallocation of memory.
3264 static void add_or_replace_ace(struct security_ace *nt_ace_list, size_t *num_aces,
3265 const struct dom_sid *sid, enum security_ace_type type,
3266 uint32_t mask, uint8_t flags)
3268 int i;
3270 /* first search for a duplicate */
3271 for (i = 0; i < *num_aces; i++) {
3272 if (dom_sid_equal(&nt_ace_list[i].trustee, sid) &&
3273 (nt_ace_list[i].flags == flags)) break;
3276 if (i < *num_aces) { /* found */
3277 nt_ace_list[i].type = type;
3278 nt_ace_list[i].access_mask = mask;
3279 DEBUG(10, ("Replacing ACE %d with SID %s and flags %02x\n",
3280 i, sid_string_dbg(sid), flags));
3281 return;
3284 /* not found, append it */
3285 init_sec_ace(&nt_ace_list[(*num_aces)++], sid, type, mask, flags);
3289 /****************************************************************************
3290 Reply to query a security descriptor from an fsp. If it succeeds it allocates
3291 the space for the return elements and returns the size needed to return the
3292 security descriptor. This should be the only external function needed for
3293 the UNIX style get ACL.
3294 ****************************************************************************/
3296 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
3297 const char *name,
3298 const SMB_STRUCT_STAT *sbuf,
3299 struct pai_val *pal,
3300 SMB_ACL_T posix_acl,
3301 SMB_ACL_T def_acl,
3302 uint32_t security_info,
3303 struct security_descriptor **ppdesc)
3305 struct dom_sid owner_sid;
3306 struct dom_sid group_sid;
3307 size_t sd_size = 0;
3308 struct security_acl *psa = NULL;
3309 size_t num_acls = 0;
3310 size_t num_def_acls = 0;
3311 size_t num_aces = 0;
3312 canon_ace *file_ace = NULL;
3313 canon_ace *dir_ace = NULL;
3314 struct security_ace *nt_ace_list = NULL;
3315 size_t num_profile_acls = 0;
3316 struct dom_sid orig_owner_sid;
3317 struct security_descriptor *psd = NULL;
3318 int i;
3321 * Get the owner, group and world SIDs.
3324 create_file_sids(sbuf, &owner_sid, &group_sid);
3326 if (lp_profile_acls(SNUM(conn))) {
3327 /* For WXP SP1 the owner must be administrators. */
3328 sid_copy(&orig_owner_sid, &owner_sid);
3329 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
3330 sid_copy(&group_sid, &global_sid_Builtin_Users);
3331 num_profile_acls = 3;
3334 if ((security_info & SECINFO_DACL) && !(security_info & SECINFO_PROTECTED_DACL)) {
3337 * In the optimum case Creator Owner and Creator Group would be used for
3338 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
3339 * would lead to usability problems under Windows: The Creator entries
3340 * are only available in browse lists of directories and not for files;
3341 * additionally the identity of the owning group couldn't be determined.
3342 * We therefore use those identities only for Default ACLs.
3345 /* Create the canon_ace lists. */
3346 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
3347 &owner_sid, &group_sid, pal,
3348 SMB_ACL_TYPE_ACCESS);
3350 /* We must have *some* ACLS. */
3352 if (count_canon_ace_list(file_ace) == 0) {
3353 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
3354 goto done;
3357 if (S_ISDIR(sbuf->st_ex_mode) && def_acl) {
3358 dir_ace = canonicalise_acl(conn, name, def_acl,
3359 sbuf,
3360 &global_sid_Creator_Owner,
3361 &global_sid_Creator_Group,
3362 pal, SMB_ACL_TYPE_DEFAULT);
3366 * Create the NT ACE list from the canonical ace lists.
3370 canon_ace *ace;
3371 enum security_ace_type nt_acl_type;
3373 if (nt4_compatible_acls() && dir_ace) {
3375 * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
3376 * but no non-INHERIT_ONLY entry for one SID. So we only
3377 * remove entries from the Access ACL if the
3378 * corresponding Default ACL entries have also been
3379 * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
3380 * are exceptions. We can do nothing
3381 * intelligent if the Default ACL contains entries that
3382 * are not also contained in the Access ACL, so this
3383 * case will still fail under NT 4.
3386 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
3387 if (ace && !ace->perms) {
3388 DLIST_REMOVE(dir_ace, ace);
3389 TALLOC_FREE(ace);
3391 ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
3392 if (ace && !ace->perms) {
3393 DLIST_REMOVE(file_ace, ace);
3394 TALLOC_FREE(ace);
3399 * WinNT doesn't usually have Creator Group
3400 * in browse lists, so we send this entry to
3401 * WinNT even if it contains no relevant
3402 * permissions. Once we can add
3403 * Creator Group to browse lists we can
3404 * re-enable this.
3407 #if 0
3408 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
3409 if (ace && !ace->perms) {
3410 DLIST_REMOVE(dir_ace, ace);
3411 TALLOC_FREE(ace);
3413 #endif
3415 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
3416 if (ace && !ace->perms) {
3417 DLIST_REMOVE(file_ace, ace);
3418 TALLOC_FREE(ace);
3422 num_acls = count_canon_ace_list(file_ace);
3423 num_def_acls = count_canon_ace_list(dir_ace);
3425 /* Allocate the ace list. */
3426 if ((nt_ace_list = talloc_array(talloc_tos(), struct security_ace,num_acls + num_profile_acls + num_def_acls)) == NULL) {
3427 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
3428 goto done;
3431 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(struct security_ace) );
3434 * Create the NT ACE list from the canonical ace lists.
3437 for (ace = file_ace; ace != NULL; ace = ace->next) {
3438 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3439 &nt_acl_type,
3440 ace->perms,
3441 S_ISDIR(sbuf->st_ex_mode));
3442 init_sec_ace(&nt_ace_list[num_aces++],
3443 &ace->trustee,
3444 nt_acl_type,
3445 acc,
3446 ace->ace_flags);
3449 /* The User must have access to a profile share - even
3450 * if we can't map the SID. */
3451 if (lp_profile_acls(SNUM(conn))) {
3452 add_or_replace_ace(nt_ace_list, &num_aces,
3453 &global_sid_Builtin_Users,
3454 SEC_ACE_TYPE_ACCESS_ALLOWED,
3455 FILE_GENERIC_ALL, 0);
3458 for (ace = dir_ace; ace != NULL; ace = ace->next) {
3459 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3460 &nt_acl_type,
3461 ace->perms,
3462 S_ISDIR(sbuf->st_ex_mode));
3463 init_sec_ace(&nt_ace_list[num_aces++],
3464 &ace->trustee,
3465 nt_acl_type,
3466 acc,
3467 ace->ace_flags |
3468 SEC_ACE_FLAG_OBJECT_INHERIT|
3469 SEC_ACE_FLAG_CONTAINER_INHERIT|
3470 SEC_ACE_FLAG_INHERIT_ONLY);
3473 /* The User must have access to a profile share - even
3474 * if we can't map the SID. */
3475 if (lp_profile_acls(SNUM(conn))) {
3476 add_or_replace_ace(nt_ace_list, &num_aces,
3477 &global_sid_Builtin_Users,
3478 SEC_ACE_TYPE_ACCESS_ALLOWED,
3479 FILE_GENERIC_ALL,
3480 SEC_ACE_FLAG_OBJECT_INHERIT |
3481 SEC_ACE_FLAG_CONTAINER_INHERIT |
3482 SEC_ACE_FLAG_INHERIT_ONLY);
3486 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3487 * Win2K needs this to get the inheritance correct when replacing ACLs
3488 * on a directory tree. Based on work by Jim @ IBM.
3491 num_aces = merge_default_aces(nt_ace_list, num_aces);
3493 if (lp_profile_acls(SNUM(conn))) {
3494 for (i = 0; i < num_aces; i++) {
3495 if (dom_sid_equal(&nt_ace_list[i].trustee, &owner_sid)) {
3496 add_or_replace_ace(nt_ace_list, &num_aces,
3497 &orig_owner_sid,
3498 nt_ace_list[i].type,
3499 nt_ace_list[i].access_mask,
3500 nt_ace_list[i].flags);
3501 break;
3507 if (num_aces) {
3508 if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3509 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3510 goto done;
3513 } /* security_info & SECINFO_DACL */
3515 psd = make_standard_sec_desc( talloc_tos(),
3516 (security_info & SECINFO_OWNER) ? &owner_sid : NULL,
3517 (security_info & SECINFO_GROUP) ? &group_sid : NULL,
3518 psa,
3519 &sd_size);
3521 if(!psd) {
3522 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3523 sd_size = 0;
3524 goto done;
3528 * Windows 2000: The DACL_PROTECTED flag in the security
3529 * descriptor marks the ACL as non-inheriting, i.e., no
3530 * ACEs from higher level directories propagate to this
3531 * ACL. In the POSIX ACL model permissions are only
3532 * inherited at file create time, so ACLs never contain
3533 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3534 * flag doesn't seem to bother Windows NT.
3535 * Always set this if map acl inherit is turned off.
3537 if (pal == NULL || !lp_map_acl_inherit(SNUM(conn))) {
3538 psd->type |= SEC_DESC_DACL_PROTECTED;
3539 } else {
3540 psd->type |= pal->sd_type;
3543 if (psd->dacl) {
3544 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3547 *ppdesc = psd;
3549 done:
3551 if (posix_acl) {
3552 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3554 if (def_acl) {
3555 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3557 free_canon_ace_list(file_ace);
3558 free_canon_ace_list(dir_ace);
3559 free_inherited_info(pal);
3560 TALLOC_FREE(nt_ace_list);
3562 return NT_STATUS_OK;
3565 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3566 struct security_descriptor **ppdesc)
3568 SMB_STRUCT_STAT sbuf;
3569 SMB_ACL_T posix_acl = NULL;
3570 struct pai_val *pal;
3572 *ppdesc = NULL;
3574 DEBUG(10,("posix_fget_nt_acl: called for file %s\n",
3575 fsp_str_dbg(fsp)));
3577 /* can it happen that fsp_name == NULL ? */
3578 if (fsp->is_directory || fsp->fh->fd == -1) {
3579 return posix_get_nt_acl(fsp->conn, fsp->fsp_name->base_name,
3580 security_info, ppdesc);
3583 /* Get the stat struct for the owner info. */
3584 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3585 return map_nt_error_from_unix(errno);
3588 /* Get the ACL from the fd. */
3589 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
3591 pal = fload_inherited_info(fsp);
3593 return posix_get_nt_acl_common(fsp->conn, fsp->fsp_name->base_name,
3594 &sbuf, pal, posix_acl, NULL,
3595 security_info, ppdesc);
3598 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3599 uint32_t security_info, struct security_descriptor **ppdesc)
3601 SMB_ACL_T posix_acl = NULL;
3602 SMB_ACL_T def_acl = NULL;
3603 struct pai_val *pal;
3604 struct smb_filename smb_fname;
3605 int ret;
3607 *ppdesc = NULL;
3609 DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3611 ZERO_STRUCT(smb_fname);
3612 smb_fname.base_name = discard_const_p(char, name);
3614 /* Get the stat struct for the owner info. */
3615 if (lp_posix_pathnames()) {
3616 ret = SMB_VFS_LSTAT(conn, &smb_fname);
3617 } else {
3618 ret = SMB_VFS_STAT(conn, &smb_fname);
3621 if (ret == -1) {
3622 return map_nt_error_from_unix(errno);
3625 /* Get the ACL from the path. */
3626 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_ACCESS);
3628 /* If it's a directory get the default POSIX ACL. */
3629 if(S_ISDIR(smb_fname.st.st_ex_mode)) {
3630 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_DEFAULT);
3631 def_acl = free_empty_sys_acl(conn, def_acl);
3634 pal = load_inherited_info(conn, name);
3636 return posix_get_nt_acl_common(conn, name, &smb_fname.st, pal,
3637 posix_acl, def_acl, security_info,
3638 ppdesc);
3641 /****************************************************************************
3642 Try to chown a file. We will be able to chown it under the following conditions.
3644 1) If we have root privileges, then it will just work.
3645 2) If we have SeRestorePrivilege we can change the user + group to any other user.
3646 3) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3647 4) If we have write permission to the file and dos_filemodes is set
3648 then allow chown to the currently authenticated user.
3649 ****************************************************************************/
3651 NTSTATUS try_chown(files_struct *fsp, uid_t uid, gid_t gid)
3653 NTSTATUS status;
3655 if(!CAN_WRITE(fsp->conn)) {
3656 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3659 /* Case (1). */
3660 status = vfs_chown_fsp(fsp, uid, gid);
3661 if (NT_STATUS_IS_OK(status)) {
3662 return status;
3665 /* Case (2) / (3) */
3666 if (lp_enable_privileges()) {
3667 bool has_take_ownership_priv = security_token_has_privilege(
3668 get_current_nttok(fsp->conn),
3669 SEC_PRIV_TAKE_OWNERSHIP);
3670 bool has_restore_priv = security_token_has_privilege(
3671 get_current_nttok(fsp->conn),
3672 SEC_PRIV_RESTORE);
3674 if (has_restore_priv) {
3675 ; /* Case (2) */
3676 } else if (has_take_ownership_priv) {
3677 /* Case (3) */
3678 if (uid == get_current_uid(fsp->conn)) {
3679 gid = (gid_t)-1;
3680 } else {
3681 has_take_ownership_priv = false;
3685 if (has_take_ownership_priv || has_restore_priv) {
3686 become_root();
3687 status = vfs_chown_fsp(fsp, uid, gid);
3688 unbecome_root();
3689 return status;
3693 /* Case (4). */
3694 if (!lp_dos_filemode(SNUM(fsp->conn))) {
3695 return NT_STATUS_ACCESS_DENIED;
3698 /* only allow chown to the current user. This is more secure,
3699 and also copes with the case where the SID in a take ownership ACL is
3700 a local SID on the users workstation
3702 if (uid != get_current_uid(fsp->conn)) {
3703 return NT_STATUS_ACCESS_DENIED;
3706 become_root();
3707 /* Keep the current file gid the same. */
3708 status = vfs_chown_fsp(fsp, uid, (gid_t)-1);
3709 unbecome_root();
3711 return status;
3714 #if 0
3715 /* Disable this - prevents ACL inheritance from the ACL editor. JRA. */
3717 /****************************************************************************
3718 Take care of parent ACL inheritance.
3719 ****************************************************************************/
3721 NTSTATUS append_parent_acl(files_struct *fsp,
3722 const struct security_descriptor *pcsd,
3723 struct security_descriptor **pp_new_sd)
3725 struct smb_filename *smb_dname = NULL;
3726 struct security_descriptor *parent_sd = NULL;
3727 files_struct *parent_fsp = NULL;
3728 TALLOC_CTX *mem_ctx = talloc_tos();
3729 char *parent_name = NULL;
3730 struct security_ace *new_ace = NULL;
3731 unsigned int num_aces = pcsd->dacl->num_aces;
3732 NTSTATUS status;
3733 int info;
3734 unsigned int i, j;
3735 struct security_descriptor *psd = dup_sec_desc(talloc_tos(), pcsd);
3736 bool is_dacl_protected = (pcsd->type & SEC_DESC_DACL_PROTECTED);
3738 if (psd == NULL) {
3739 return NT_STATUS_NO_MEMORY;
3742 if (!parent_dirname(mem_ctx, fsp->fsp_name->base_name, &parent_name,
3743 NULL)) {
3744 return NT_STATUS_NO_MEMORY;
3747 status = create_synthetic_smb_fname(mem_ctx, parent_name, NULL, NULL,
3748 &smb_dname);
3749 if (!NT_STATUS_IS_OK(status)) {
3750 goto fail;
3753 status = SMB_VFS_CREATE_FILE(
3754 fsp->conn, /* conn */
3755 NULL, /* req */
3756 0, /* root_dir_fid */
3757 smb_dname, /* fname */
3758 FILE_READ_ATTRIBUTES, /* access_mask */
3759 FILE_SHARE_NONE, /* share_access */
3760 FILE_OPEN, /* create_disposition*/
3761 FILE_DIRECTORY_FILE, /* create_options */
3762 0, /* file_attributes */
3763 INTERNAL_OPEN_ONLY, /* oplock_request */
3764 0, /* allocation_size */
3765 NULL, /* sd */
3766 NULL, /* ea_list */
3767 &parent_fsp, /* result */
3768 &info); /* pinfo */
3770 if (!NT_STATUS_IS_OK(status)) {
3771 TALLOC_FREE(smb_dname);
3772 return status;
3775 status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, smb_dname->base_name,
3776 SECINFO_DACL, &parent_sd );
3778 close_file(NULL, parent_fsp, NORMAL_CLOSE);
3779 TALLOC_FREE(smb_dname);
3781 if (!NT_STATUS_IS_OK(status)) {
3782 return status;
3786 * Make room for potentially all the ACLs from
3787 * the parent. We used to add the ugw triple here,
3788 * as we knew we were dealing with POSIX ACLs.
3789 * We no longer need to do so as we can guarentee
3790 * that a default ACL from the parent directory will
3791 * be well formed for POSIX ACLs if it came from a
3792 * POSIX ACL source, and if we're not writing to a
3793 * POSIX ACL sink then we don't care if it's not well
3794 * formed. JRA.
3797 num_aces += parent_sd->dacl->num_aces;
3799 if((new_ace = talloc_zero_array(mem_ctx, struct security_ace,
3800 num_aces)) == NULL) {
3801 return NT_STATUS_NO_MEMORY;
3804 /* Start by copying in all the given ACE entries. */
3805 for (i = 0; i < psd->dacl->num_aces; i++) {
3806 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3810 * Note that we're ignoring "inherit permissions" here
3811 * as that really only applies to newly created files. JRA.
3814 /* Finally append any inherited ACEs. */
3815 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3816 struct security_ace *se = &parent_sd->dacl->aces[j];
3818 if (fsp->is_directory) {
3819 if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3820 /* Doesn't apply to a directory - ignore. */
3821 DEBUG(10,("append_parent_acl: directory %s "
3822 "ignoring non container "
3823 "inherit flags %u on ACE with sid %s "
3824 "from parent %s\n",
3825 fsp_str_dbg(fsp),
3826 (unsigned int)se->flags,
3827 sid_string_dbg(&se->trustee),
3828 parent_name));
3829 continue;
3831 } else {
3832 if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3833 /* Doesn't apply to a file - ignore. */
3834 DEBUG(10,("append_parent_acl: file %s "
3835 "ignoring non object "
3836 "inherit flags %u on ACE with sid %s "
3837 "from parent %s\n",
3838 fsp_str_dbg(fsp),
3839 (unsigned int)se->flags,
3840 sid_string_dbg(&se->trustee),
3841 parent_name));
3842 continue;
3846 if (is_dacl_protected) {
3847 /* If the DACL is protected it means we must
3848 * not overwrite an existing ACE entry with the
3849 * same SID. This is order N^2. Ouch :-(. JRA. */
3850 unsigned int k;
3851 for (k = 0; k < psd->dacl->num_aces; k++) {
3852 if (dom_sid_equal(&psd->dacl->aces[k].trustee,
3853 &se->trustee)) {
3854 break;
3857 if (k < psd->dacl->num_aces) {
3858 /* SID matched. Ignore. */
3859 DEBUG(10,("append_parent_acl: path %s "
3860 "ignoring ACE with protected sid %s "
3861 "from parent %s\n",
3862 fsp_str_dbg(fsp),
3863 sid_string_dbg(&se->trustee),
3864 parent_name));
3865 continue;
3869 sec_ace_copy(&new_ace[i], se);
3870 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3871 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3873 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3875 if (fsp->is_directory) {
3877 * Strip off any inherit only. It's applied.
3879 new_ace[i].flags &= ~(SEC_ACE_FLAG_INHERIT_ONLY);
3880 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3881 /* No further inheritance. */
3882 new_ace[i].flags &=
3883 ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3884 SEC_ACE_FLAG_OBJECT_INHERIT);
3886 } else {
3888 * Strip off any container or inherit
3889 * flags, they can't apply to objects.
3891 new_ace[i].flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3892 SEC_ACE_FLAG_INHERIT_ONLY|
3893 SEC_ACE_FLAG_NO_PROPAGATE_INHERIT);
3895 i++;
3897 DEBUG(10,("append_parent_acl: path %s "
3898 "inheriting ACE with sid %s "
3899 "from parent %s\n",
3900 fsp_str_dbg(fsp),
3901 sid_string_dbg(&se->trustee),
3902 parent_name));
3905 psd->dacl->aces = new_ace;
3906 psd->dacl->num_aces = i;
3907 psd->type &= ~(SEC_DESC_DACL_AUTO_INHERITED|
3908 SEC_DESC_DACL_AUTO_INHERIT_REQ);
3910 *pp_new_sd = psd;
3911 return status;
3913 #endif
3915 /****************************************************************************
3916 Reply to set a security descriptor on an fsp. security_info_sent is the
3917 description of the following NT ACL.
3918 This should be the only external function needed for the UNIX style set ACL.
3919 We make a copy of psd_orig as internal functions modify the elements inside
3920 it, even though it's a const pointer.
3921 ****************************************************************************/
3923 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, const struct security_descriptor *psd_orig)
3925 connection_struct *conn = fsp->conn;
3926 uid_t user = (uid_t)-1;
3927 gid_t grp = (gid_t)-1;
3928 struct dom_sid file_owner_sid;
3929 struct dom_sid file_grp_sid;
3930 canon_ace *file_ace_list = NULL;
3931 canon_ace *dir_ace_list = NULL;
3932 bool acl_perms = False;
3933 mode_t orig_mode = (mode_t)0;
3934 NTSTATUS status;
3935 bool set_acl_as_root = false;
3936 bool acl_set_support = false;
3937 bool ret = false;
3938 struct security_descriptor *psd = NULL;
3940 DEBUG(10,("set_nt_acl: called for file %s\n",
3941 fsp_str_dbg(fsp)));
3943 if (!CAN_WRITE(conn)) {
3944 DEBUG(10,("set acl rejected on read-only share\n"));
3945 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3948 if (!psd_orig) {
3949 return NT_STATUS_INVALID_PARAMETER;
3952 psd = dup_sec_desc(talloc_tos(), psd_orig);
3953 if (!psd) {
3954 return NT_STATUS_NO_MEMORY;
3958 * Get the current state of the file.
3961 status = vfs_stat_fsp(fsp);
3962 if (!NT_STATUS_IS_OK(status)) {
3963 return status;
3966 /* Save the original element we check against. */
3967 orig_mode = fsp->fsp_name->st.st_ex_mode;
3970 * Unpack the user/group/world id's.
3973 /* POSIX can't cope with missing owner/group. */
3974 if ((security_info_sent & SECINFO_OWNER) && (psd->owner_sid == NULL)) {
3975 security_info_sent &= ~SECINFO_OWNER;
3977 if ((security_info_sent & SECINFO_GROUP) && (psd->group_sid == NULL)) {
3978 security_info_sent &= ~SECINFO_GROUP;
3981 status = unpack_nt_owners( conn, &user, &grp, security_info_sent, psd);
3982 if (!NT_STATUS_IS_OK(status)) {
3983 return status;
3987 * Do we need to chown ? If so this must be done first as the incoming
3988 * CREATOR_OWNER acl will be relative to the *new* owner, not the old.
3989 * Noticed by Simo.
3992 if (((user != (uid_t)-1) && (fsp->fsp_name->st.st_ex_uid != user)) ||
3993 (( grp != (gid_t)-1) && (fsp->fsp_name->st.st_ex_gid != grp))) {
3995 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3996 fsp_str_dbg(fsp), (unsigned int)user,
3997 (unsigned int)grp));
3999 status = try_chown(fsp, user, grp);
4000 if(!NT_STATUS_IS_OK(status)) {
4001 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error "
4002 "= %s.\n", fsp_str_dbg(fsp),
4003 (unsigned int)user,
4004 (unsigned int)grp,
4005 nt_errstr(status)));
4006 return status;
4010 * Recheck the current state of the file, which may have changed.
4011 * (suid/sgid bits, for instance)
4014 status = vfs_stat_fsp(fsp);
4015 if (!NT_STATUS_IS_OK(status)) {
4016 return status;
4019 /* Save the original element we check against. */
4020 orig_mode = fsp->fsp_name->st.st_ex_mode;
4022 /* If we successfully chowned, we know we must
4023 * be able to set the acl, so do it as root.
4025 set_acl_as_root = true;
4028 create_file_sids(&fsp->fsp_name->st, &file_owner_sid, &file_grp_sid);
4030 if((security_info_sent & SECINFO_DACL) &&
4031 (psd->type & SEC_DESC_DACL_PRESENT) &&
4032 (psd->dacl == NULL)) {
4033 struct security_ace ace[3];
4035 /* We can't have NULL DACL in POSIX.
4036 Use owner/group/Everyone -> full access. */
4038 init_sec_ace(&ace[0],
4039 &file_owner_sid,
4040 SEC_ACE_TYPE_ACCESS_ALLOWED,
4041 GENERIC_ALL_ACCESS,
4043 init_sec_ace(&ace[1],
4044 &file_grp_sid,
4045 SEC_ACE_TYPE_ACCESS_ALLOWED,
4046 GENERIC_ALL_ACCESS,
4048 init_sec_ace(&ace[2],
4049 &global_sid_World,
4050 SEC_ACE_TYPE_ACCESS_ALLOWED,
4051 GENERIC_ALL_ACCESS,
4053 psd->dacl = make_sec_acl(talloc_tos(),
4054 NT4_ACL_REVISION,
4056 ace);
4057 if (psd->dacl == NULL) {
4058 return NT_STATUS_NO_MEMORY;
4060 security_acl_map_generic(psd->dacl, &file_generic_mapping);
4063 acl_perms = unpack_canon_ace(fsp, &fsp->fsp_name->st, &file_owner_sid,
4064 &file_grp_sid, &file_ace_list,
4065 &dir_ace_list, security_info_sent, psd);
4067 /* Ignore W2K traverse DACL set. */
4068 if (!file_ace_list && !dir_ace_list) {
4069 return NT_STATUS_OK;
4072 if (!acl_perms) {
4073 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
4074 free_canon_ace_list(file_ace_list);
4075 free_canon_ace_list(dir_ace_list);
4076 return NT_STATUS_ACCESS_DENIED;
4080 * Only change security if we got a DACL.
4083 if(!(security_info_sent & SECINFO_DACL) || (psd->dacl == NULL)) {
4084 free_canon_ace_list(file_ace_list);
4085 free_canon_ace_list(dir_ace_list);
4086 return NT_STATUS_OK;
4090 * Try using the POSIX ACL set first. Fall back to chmod if
4091 * we have no ACL support on this filesystem.
4094 if (acl_perms && file_ace_list) {
4095 if (set_acl_as_root) {
4096 become_root();
4098 ret = set_canon_ace_list(fsp, file_ace_list, false,
4099 &fsp->fsp_name->st, &acl_set_support);
4100 if (set_acl_as_root) {
4101 unbecome_root();
4103 if (acl_set_support && ret == false) {
4104 DEBUG(3,("set_nt_acl: failed to set file acl on file "
4105 "%s (%s).\n", fsp_str_dbg(fsp),
4106 strerror(errno)));
4107 free_canon_ace_list(file_ace_list);
4108 free_canon_ace_list(dir_ace_list);
4109 return map_nt_error_from_unix(errno);
4113 if (acl_perms && acl_set_support && fsp->is_directory) {
4114 if (dir_ace_list) {
4115 if (set_acl_as_root) {
4116 become_root();
4118 ret = set_canon_ace_list(fsp, dir_ace_list, true,
4119 &fsp->fsp_name->st,
4120 &acl_set_support);
4121 if (set_acl_as_root) {
4122 unbecome_root();
4124 if (ret == false) {
4125 DEBUG(3,("set_nt_acl: failed to set default "
4126 "acl on directory %s (%s).\n",
4127 fsp_str_dbg(fsp), strerror(errno)));
4128 free_canon_ace_list(file_ace_list);
4129 free_canon_ace_list(dir_ace_list);
4130 return map_nt_error_from_unix(errno);
4132 } else {
4133 int sret = -1;
4136 * No default ACL - delete one if it exists.
4139 if (set_acl_as_root) {
4140 become_root();
4142 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn,
4143 fsp->fsp_name->base_name);
4144 if (set_acl_as_root) {
4145 unbecome_root();
4147 if (sret == -1) {
4148 if (acl_group_override(conn, fsp->fsp_name)) {
4149 DEBUG(5,("set_nt_acl: acl group "
4150 "control on and current user "
4151 "in file %s primary group. "
4152 "Override delete_def_acl\n",
4153 fsp_str_dbg(fsp)));
4155 become_root();
4156 sret =
4157 SMB_VFS_SYS_ACL_DELETE_DEF_FILE(
4158 conn,
4159 fsp->fsp_name->base_name);
4160 unbecome_root();
4163 if (sret == -1) {
4164 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
4165 free_canon_ace_list(file_ace_list);
4166 free_canon_ace_list(dir_ace_list);
4167 return map_nt_error_from_unix(errno);
4173 if (acl_set_support) {
4174 if (set_acl_as_root) {
4175 become_root();
4177 store_inheritance_attributes(fsp,
4178 file_ace_list,
4179 dir_ace_list,
4180 psd->type);
4181 if (set_acl_as_root) {
4182 unbecome_root();
4187 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
4190 if(!acl_set_support && acl_perms) {
4191 mode_t posix_perms;
4193 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
4194 free_canon_ace_list(file_ace_list);
4195 free_canon_ace_list(dir_ace_list);
4196 DEBUG(3,("set_nt_acl: failed to convert file acl to "
4197 "posix permissions for file %s.\n",
4198 fsp_str_dbg(fsp)));
4199 return NT_STATUS_ACCESS_DENIED;
4202 if (orig_mode != posix_perms) {
4203 int sret = -1;
4205 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
4206 fsp_str_dbg(fsp), (unsigned int)posix_perms));
4208 if (set_acl_as_root) {
4209 become_root();
4211 sret = SMB_VFS_CHMOD(conn, fsp->fsp_name->base_name,
4212 posix_perms);
4213 if (set_acl_as_root) {
4214 unbecome_root();
4216 if(sret == -1) {
4217 if (acl_group_override(conn, fsp->fsp_name)) {
4218 DEBUG(5,("set_nt_acl: acl group "
4219 "control on and current user "
4220 "in file %s primary group. "
4221 "Override chmod\n",
4222 fsp_str_dbg(fsp)));
4224 become_root();
4225 sret = SMB_VFS_CHMOD(conn,
4226 fsp->fsp_name->base_name,
4227 posix_perms);
4228 unbecome_root();
4231 if (sret == -1) {
4232 DEBUG(3,("set_nt_acl: chmod %s, 0%o "
4233 "failed. Error = %s.\n",
4234 fsp_str_dbg(fsp),
4235 (unsigned int)posix_perms,
4236 strerror(errno)));
4237 free_canon_ace_list(file_ace_list);
4238 free_canon_ace_list(dir_ace_list);
4239 return map_nt_error_from_unix(errno);
4245 free_canon_ace_list(file_ace_list);
4246 free_canon_ace_list(dir_ace_list);
4248 /* Ensure the stat struct in the fsp is correct. */
4249 status = vfs_stat_fsp(fsp);
4251 return NT_STATUS_OK;
4254 /****************************************************************************
4255 Get the actual group bits stored on a file with an ACL. Has no effect if
4256 the file has no ACL. Needed in dosmode code where the stat() will return
4257 the mask bits, not the real group bits, for a file with an ACL.
4258 ****************************************************************************/
4260 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
4262 int entry_id = SMB_ACL_FIRST_ENTRY;
4263 SMB_ACL_ENTRY_T entry;
4264 SMB_ACL_T posix_acl;
4265 int result = -1;
4267 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
4268 if (posix_acl == (SMB_ACL_T)NULL)
4269 return -1;
4271 while (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
4272 SMB_ACL_TAG_T tagtype;
4273 SMB_ACL_PERMSET_T permset;
4275 entry_id = SMB_ACL_NEXT_ENTRY;
4277 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) ==-1)
4278 break;
4280 if (tagtype == SMB_ACL_GROUP_OBJ) {
4281 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4282 break;
4283 } else {
4284 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
4285 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRGRP : 0);
4286 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
4287 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
4288 result = 0;
4289 break;
4293 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
4294 return result;
4297 /****************************************************************************
4298 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4299 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4300 ****************************************************************************/
4302 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
4304 int entry_id = SMB_ACL_FIRST_ENTRY;
4305 SMB_ACL_ENTRY_T entry;
4306 int num_entries = 0;
4308 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
4309 SMB_ACL_TAG_T tagtype;
4310 SMB_ACL_PERMSET_T permset;
4311 mode_t perms;
4313 entry_id = SMB_ACL_NEXT_ENTRY;
4315 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
4316 return -1;
4318 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
4319 return -1;
4321 num_entries++;
4323 switch(tagtype) {
4324 case SMB_ACL_USER_OBJ:
4325 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
4326 break;
4327 case SMB_ACL_GROUP_OBJ:
4328 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
4329 break;
4330 case SMB_ACL_MASK:
4332 * FIXME: The ACL_MASK entry permissions should really be set to
4333 * the union of the permissions of all ACL_USER,
4334 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
4335 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
4337 perms = S_IRUSR|S_IWUSR|S_IXUSR;
4338 break;
4339 case SMB_ACL_OTHER:
4340 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
4341 break;
4342 default:
4343 continue;
4346 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
4347 return -1;
4349 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, entry, permset) == -1)
4350 return -1;
4354 * If this is a simple 3 element ACL or no elements then it's a standard
4355 * UNIX permission set. Just use chmod...
4358 if ((num_entries == 3) || (num_entries == 0))
4359 return -1;
4361 return 0;
4364 /****************************************************************************
4365 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
4366 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
4367 resulting ACL on TO. Note that name is in UNIX character set.
4368 ****************************************************************************/
4370 static int copy_access_posix_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
4372 SMB_ACL_T posix_acl = NULL;
4373 int ret = -1;
4375 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
4376 return -1;
4378 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4379 goto done;
4381 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
4383 done:
4385 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
4386 return ret;
4389 /****************************************************************************
4390 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4391 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4392 Note that name is in UNIX character set.
4393 ****************************************************************************/
4395 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
4397 return copy_access_posix_acl(conn, name, name, mode);
4400 /****************************************************************************
4401 Check for an existing default POSIX ACL on a directory.
4402 ****************************************************************************/
4404 static bool directory_has_default_posix_acl(connection_struct *conn, const char *fname)
4406 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
4407 bool has_acl = False;
4408 SMB_ACL_ENTRY_T entry;
4410 if (def_acl != NULL && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
4411 has_acl = True;
4414 if (def_acl) {
4415 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4417 return has_acl;
4420 /****************************************************************************
4421 If the parent directory has no default ACL but it does have an Access ACL,
4422 inherit this Access ACL to file name.
4423 ****************************************************************************/
4425 int inherit_access_posix_acl(connection_struct *conn, const char *inherit_from_dir,
4426 const char *name, mode_t mode)
4428 if (directory_has_default_posix_acl(conn, inherit_from_dir))
4429 return 0;
4431 return copy_access_posix_acl(conn, inherit_from_dir, name, mode);
4434 /****************************************************************************
4435 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4436 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4437 ****************************************************************************/
4439 int fchmod_acl(files_struct *fsp, mode_t mode)
4441 connection_struct *conn = fsp->conn;
4442 SMB_ACL_T posix_acl = NULL;
4443 int ret = -1;
4445 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp)) == NULL)
4446 return -1;
4448 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4449 goto done;
4451 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
4453 done:
4455 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
4456 return ret;
4459 /****************************************************************************
4460 Map from wire type to permset.
4461 ****************************************************************************/
4463 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
4465 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
4466 return False;
4469 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1) {
4470 return False;
4473 if (wire_perm & SMB_POSIX_ACL_READ) {
4474 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1) {
4475 return False;
4478 if (wire_perm & SMB_POSIX_ACL_WRITE) {
4479 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1) {
4480 return False;
4483 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
4484 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1) {
4485 return False;
4488 return True;
4491 /****************************************************************************
4492 Map from wire type to tagtype.
4493 ****************************************************************************/
4495 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
4497 switch (wire_tt) {
4498 case SMB_POSIX_ACL_USER_OBJ:
4499 *p_tt = SMB_ACL_USER_OBJ;
4500 break;
4501 case SMB_POSIX_ACL_USER:
4502 *p_tt = SMB_ACL_USER;
4503 break;
4504 case SMB_POSIX_ACL_GROUP_OBJ:
4505 *p_tt = SMB_ACL_GROUP_OBJ;
4506 break;
4507 case SMB_POSIX_ACL_GROUP:
4508 *p_tt = SMB_ACL_GROUP;
4509 break;
4510 case SMB_POSIX_ACL_MASK:
4511 *p_tt = SMB_ACL_MASK;
4512 break;
4513 case SMB_POSIX_ACL_OTHER:
4514 *p_tt = SMB_ACL_OTHER;
4515 break;
4516 default:
4517 return False;
4519 return True;
4522 /****************************************************************************
4523 Create a new POSIX acl from wire permissions.
4524 FIXME ! How does the share mask/mode fit into this.... ?
4525 ****************************************************************************/
4527 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
4529 unsigned int i;
4530 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, num_acls);
4532 if (the_acl == NULL) {
4533 return NULL;
4536 for (i = 0; i < num_acls; i++) {
4537 SMB_ACL_ENTRY_T the_entry;
4538 SMB_ACL_PERMSET_T the_permset;
4539 SMB_ACL_TAG_T tag_type;
4541 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
4542 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
4543 i, strerror(errno) ));
4544 goto fail;
4547 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
4548 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
4549 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
4550 goto fail;
4553 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, tag_type) == -1) {
4554 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
4555 i, strerror(errno) ));
4556 goto fail;
4559 /* Get the permset pointer from the new ACL entry. */
4560 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
4561 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
4562 i, strerror(errno) ));
4563 goto fail;
4566 /* Map from wire to permissions. */
4567 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
4568 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
4569 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
4570 goto fail;
4573 /* Now apply to the new ACL entry. */
4574 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
4575 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
4576 i, strerror(errno) ));
4577 goto fail;
4580 if (tag_type == SMB_ACL_USER) {
4581 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4582 uid_t uid = (uid_t)uidval;
4583 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&uid) == -1) {
4584 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
4585 (unsigned int)uid, i, strerror(errno) ));
4586 goto fail;
4590 if (tag_type == SMB_ACL_GROUP) {
4591 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4592 gid_t gid = (uid_t)gidval;
4593 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&gid) == -1) {
4594 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
4595 (unsigned int)gid, i, strerror(errno) ));
4596 goto fail;
4601 return the_acl;
4603 fail:
4605 if (the_acl != NULL) {
4606 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
4608 return NULL;
4611 /****************************************************************************
4612 Calls from UNIX extensions - Default POSIX ACL set.
4613 If num_def_acls == 0 and not a directory just return. If it is a directory
4614 and num_def_acls == 0 then remove the default acl. Else set the default acl
4615 on the directory.
4616 ****************************************************************************/
4618 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, const SMB_STRUCT_STAT *psbuf,
4619 uint16 num_def_acls, const char *pdata)
4621 SMB_ACL_T def_acl = NULL;
4623 if (!S_ISDIR(psbuf->st_ex_mode)) {
4624 if (num_def_acls) {
4625 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4626 errno = EISDIR;
4627 return False;
4628 } else {
4629 return True;
4633 if (!num_def_acls) {
4634 /* Remove the default ACL. */
4635 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4636 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4637 fname, strerror(errno) ));
4638 return False;
4640 return True;
4643 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
4644 return False;
4647 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4648 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4649 fname, strerror(errno) ));
4650 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4651 return False;
4654 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4655 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4656 return True;
4659 /****************************************************************************
4660 Remove an ACL from a file. As we don't have acl_delete_entry() available
4661 we must read the current acl and copy all entries except MASK, USER and GROUP
4662 to a new acl, then set that. This (at least on Linux) causes any ACL to be
4663 removed.
4664 FIXME ! How does the share mask/mode fit into this.... ?
4665 ****************************************************************************/
4667 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4669 SMB_ACL_T file_acl = NULL;
4670 int entry_id = SMB_ACL_FIRST_ENTRY;
4671 SMB_ACL_ENTRY_T entry;
4672 bool ret = False;
4673 /* Create a new ACL with only 3 entries, u/g/w. */
4674 SMB_ACL_T new_file_acl = SMB_VFS_SYS_ACL_INIT(conn, 3);
4675 SMB_ACL_ENTRY_T user_ent = NULL;
4676 SMB_ACL_ENTRY_T group_ent = NULL;
4677 SMB_ACL_ENTRY_T other_ent = NULL;
4679 if (new_file_acl == NULL) {
4680 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4681 return False;
4684 /* Now create the u/g/w entries. */
4685 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &user_ent) == -1) {
4686 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4687 fname, strerror(errno) ));
4688 goto done;
4690 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, user_ent, SMB_ACL_USER_OBJ) == -1) {
4691 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4692 fname, strerror(errno) ));
4693 goto done;
4696 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &group_ent) == -1) {
4697 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4698 fname, strerror(errno) ));
4699 goto done;
4701 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4702 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4703 fname, strerror(errno) ));
4704 goto done;
4707 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &other_ent) == -1) {
4708 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4709 fname, strerror(errno) ));
4710 goto done;
4712 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, other_ent, SMB_ACL_OTHER) == -1) {
4713 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4714 fname, strerror(errno) ));
4715 goto done;
4718 /* Get the current file ACL. */
4719 if (fsp && fsp->fh->fd != -1) {
4720 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
4721 } else {
4722 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4725 if (file_acl == NULL) {
4726 /* This is only returned if an error occurred. Even for a file with
4727 no acl a u/g/w acl should be returned. */
4728 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4729 fname, strerror(errno) ));
4730 goto done;
4733 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, file_acl, entry_id, &entry) == 1) {
4734 SMB_ACL_TAG_T tagtype;
4735 SMB_ACL_PERMSET_T permset;
4737 entry_id = SMB_ACL_NEXT_ENTRY;
4739 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1) {
4740 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4741 fname, strerror(errno) ));
4742 goto done;
4745 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4746 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4747 fname, strerror(errno) ));
4748 goto done;
4751 if (tagtype == SMB_ACL_USER_OBJ) {
4752 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, user_ent, permset) == -1) {
4753 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4754 fname, strerror(errno) ));
4756 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4757 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, group_ent, permset) == -1) {
4758 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4759 fname, strerror(errno) ));
4761 } else if (tagtype == SMB_ACL_OTHER) {
4762 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, other_ent, permset) == -1) {
4763 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4764 fname, strerror(errno) ));
4769 /* Set the new empty file ACL. */
4770 if (fsp && fsp->fh->fd != -1) {
4771 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4772 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4773 fname, strerror(errno) ));
4774 goto done;
4776 } else {
4777 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4778 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4779 fname, strerror(errno) ));
4780 goto done;
4784 ret = True;
4786 done:
4788 if (file_acl) {
4789 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4791 if (new_file_acl) {
4792 SMB_VFS_SYS_ACL_FREE_ACL(conn, new_file_acl);
4794 return ret;
4797 /****************************************************************************
4798 Calls from UNIX extensions - POSIX ACL set.
4799 If num_def_acls == 0 then read/modify/write acl after removing all entries
4800 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4801 ****************************************************************************/
4803 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4805 SMB_ACL_T file_acl = NULL;
4807 if (!num_acls) {
4808 /* Remove the ACL from the file. */
4809 return remove_posix_acl(conn, fsp, fname);
4812 if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4813 return False;
4816 if (fsp && fsp->fh->fd != -1) {
4817 /* The preferred way - use an open fd. */
4818 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4819 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4820 fname, strerror(errno) ));
4821 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4822 return False;
4824 } else {
4825 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4826 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4827 fname, strerror(errno) ));
4828 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4829 return False;
4833 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4834 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4835 return True;
4838 /********************************************************************
4839 Pull the NT ACL from a file on disk or the OpenEventlog() access
4840 check. Caller is responsible for freeing the returned security
4841 descriptor via TALLOC_FREE(). This is designed for dealing with
4842 user space access checks in smbd outside of the VFS. For example,
4843 checking access rights in OpenEventlog().
4845 Assume we are dealing with files (for now)
4846 ********************************************************************/
4848 struct security_descriptor *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname)
4850 struct security_descriptor *psd, *ret_sd;
4851 connection_struct *conn;
4852 files_struct finfo;
4853 struct fd_handle fh;
4854 NTSTATUS status;
4856 conn = talloc_zero(ctx, connection_struct);
4857 if (conn == NULL) {
4858 DEBUG(0, ("talloc failed\n"));
4859 return NULL;
4862 if (!(conn->params = talloc(conn, struct share_params))) {
4863 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4864 TALLOC_FREE(conn);
4865 return NULL;
4868 conn->params->service = -1;
4870 set_conn_connectpath(conn, "/");
4872 if (!smbd_vfs_init(conn)) {
4873 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4874 conn_free(conn);
4875 return NULL;
4878 ZERO_STRUCT( finfo );
4879 ZERO_STRUCT( fh );
4881 finfo.fnum = FNUM_FIELD_INVALID;
4882 finfo.conn = conn;
4883 finfo.fh = &fh;
4884 finfo.fh->fd = -1;
4886 status = create_synthetic_smb_fname(talloc_tos(), fname, NULL, NULL,
4887 &finfo.fsp_name);
4888 if (!NT_STATUS_IS_OK(status)) {
4889 conn_free(conn);
4890 return NULL;
4893 if (!NT_STATUS_IS_OK(SMB_VFS_FGET_NT_ACL( &finfo, SECINFO_DACL, &psd))) {
4894 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4895 TALLOC_FREE(finfo.fsp_name);
4896 conn_free(conn);
4897 return NULL;
4900 ret_sd = dup_sec_desc( ctx, psd );
4902 TALLOC_FREE(finfo.fsp_name);
4903 conn_free(conn);
4905 return ret_sd;
4908 /* Stolen shamelessly from pvfs_default_acl() in source4 :-). */
4910 NTSTATUS make_default_filesystem_acl(TALLOC_CTX *ctx,
4911 const char *name,
4912 SMB_STRUCT_STAT *psbuf,
4913 struct security_descriptor **ppdesc)
4915 struct dom_sid owner_sid, group_sid;
4916 size_t size = 0;
4917 struct security_ace aces[4];
4918 uint32_t access_mask = 0;
4919 mode_t mode = psbuf->st_ex_mode;
4920 struct security_acl *new_dacl = NULL;
4921 int idx = 0;
4923 DEBUG(10,("make_default_filesystem_acl: file %s mode = 0%o\n",
4924 name, (int)mode ));
4926 uid_to_sid(&owner_sid, psbuf->st_ex_uid);
4927 gid_to_sid(&group_sid, psbuf->st_ex_gid);
4930 We provide up to 4 ACEs
4931 - Owner
4932 - Group
4933 - Everyone
4934 - NT System
4937 if (mode & S_IRUSR) {
4938 if (mode & S_IWUSR) {
4939 access_mask |= SEC_RIGHTS_FILE_ALL;
4940 } else {
4941 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4944 if (mode & S_IWUSR) {
4945 access_mask |= SEC_RIGHTS_FILE_WRITE | SEC_STD_DELETE;
4948 init_sec_ace(&aces[idx],
4949 &owner_sid,
4950 SEC_ACE_TYPE_ACCESS_ALLOWED,
4951 access_mask,
4953 idx++;
4955 access_mask = 0;
4956 if (mode & S_IRGRP) {
4957 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4959 if (mode & S_IWGRP) {
4960 /* note that delete is not granted - this matches posix behaviour */
4961 access_mask |= SEC_RIGHTS_FILE_WRITE;
4963 if (access_mask) {
4964 init_sec_ace(&aces[idx],
4965 &group_sid,
4966 SEC_ACE_TYPE_ACCESS_ALLOWED,
4967 access_mask,
4969 idx++;
4972 access_mask = 0;
4973 if (mode & S_IROTH) {
4974 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4976 if (mode & S_IWOTH) {
4977 access_mask |= SEC_RIGHTS_FILE_WRITE;
4979 if (access_mask) {
4980 init_sec_ace(&aces[idx],
4981 &global_sid_World,
4982 SEC_ACE_TYPE_ACCESS_ALLOWED,
4983 access_mask,
4985 idx++;
4988 init_sec_ace(&aces[idx],
4989 &global_sid_System,
4990 SEC_ACE_TYPE_ACCESS_ALLOWED,
4991 SEC_RIGHTS_FILE_ALL,
4993 idx++;
4995 new_dacl = make_sec_acl(ctx,
4996 NT4_ACL_REVISION,
4997 idx,
4998 aces);
5000 if (!new_dacl) {
5001 return NT_STATUS_NO_MEMORY;
5004 *ppdesc = make_sec_desc(ctx,
5005 SECURITY_DESCRIPTOR_REVISION_1,
5006 SEC_DESC_SELF_RELATIVE|SEC_DESC_DACL_PRESENT,
5007 &owner_sid,
5008 &group_sid,
5009 NULL,
5010 new_dacl,
5011 &size);
5012 if (!*ppdesc) {
5013 return NT_STATUS_NO_MEMORY;
5015 return NT_STATUS_OK;