s3: Put a comment into the right place
[Samba/gebeck_regimport.git] / source3 / smbd / posix_acls.c
blobc5dea9c141e32efa492b2aed3c583ff6022ff922
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"
30 #include "lib/param/loadparm.h"
32 extern const struct generic_mapping file_generic_mapping;
34 #undef DBGC_CLASS
35 #define DBGC_CLASS DBGC_ACLS
37 /****************************************************************************
38 Data structures representing the internal ACE format.
39 ****************************************************************************/
41 enum ace_owner {UID_ACE, GID_ACE, WORLD_ACE};
42 enum ace_attribute {ALLOW_ACE, DENY_ACE}; /* Used for incoming NT ACLS. */
44 typedef struct canon_ace {
45 struct canon_ace *next, *prev;
46 SMB_ACL_TAG_T type;
47 mode_t perms; /* Only use S_I(R|W|X)USR mode bits here. */
48 struct dom_sid trustee;
49 enum ace_owner owner_type;
50 enum ace_attribute attr;
51 struct unixid unix_ug;
52 uint8_t ace_flags; /* From windows ACE entry. */
53 } canon_ace;
55 #define ALL_ACE_PERMS (S_IRUSR|S_IWUSR|S_IXUSR)
58 * EA format of user.SAMBA_PAI (Samba_Posix_Acl_Interitance)
59 * attribute on disk - version 1.
60 * All values are little endian.
62 * | 1 | 1 | 2 | 2 | ....
63 * +------+------+-------------+---------------------+-------------+--------------------+
64 * | vers | flag | num_entries | num_default_entries | ..entries.. | default_entries... |
65 * +------+------+-------------+---------------------+-------------+--------------------+
67 * Entry format is :
69 * | 1 | 4 |
70 * +------+-------------------+
71 * | value| uid/gid or world |
72 * | type | value |
73 * +------+-------------------+
75 * Version 2 format. Stores extra Windows metadata about an ACL.
77 * | 1 | 2 | 2 | 2 | ....
78 * +------+----------+-------------+---------------------+-------------+--------------------+
79 * | vers | ace | num_entries | num_default_entries | ..entries.. | default_entries... |
80 * | 2 | type | | | | |
81 * +------+----------+-------------+---------------------+-------------+--------------------+
83 * Entry format is :
85 * | 1 | 1 | 4 |
86 * +------+------+-------------------+
87 * | ace | value| uid/gid or world |
88 * | flag | type | value |
89 * +------+-------------------+------+
93 #define PAI_VERSION_OFFSET 0
95 #define PAI_V1_FLAG_OFFSET 1
96 #define PAI_V1_NUM_ENTRIES_OFFSET 2
97 #define PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET 4
98 #define PAI_V1_ENTRIES_BASE 6
99 #define PAI_V1_ACL_FLAG_PROTECTED 0x1
100 #define PAI_V1_ENTRY_LENGTH 5
102 #define PAI_V1_VERSION 1
104 #define PAI_V2_TYPE_OFFSET 1
105 #define PAI_V2_NUM_ENTRIES_OFFSET 3
106 #define PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET 5
107 #define PAI_V2_ENTRIES_BASE 7
108 #define PAI_V2_ENTRY_LENGTH 6
110 #define PAI_V2_VERSION 2
113 * In memory format of user.SAMBA_PAI attribute.
116 struct pai_entry {
117 struct pai_entry *next, *prev;
118 uint8_t ace_flags;
119 enum ace_owner owner_type;
120 struct unixid unix_ug;
123 struct pai_val {
124 uint16_t sd_type;
125 unsigned int num_entries;
126 struct pai_entry *entry_list;
127 unsigned int num_def_entries;
128 struct pai_entry *def_entry_list;
131 /************************************************************************
132 Return a uint32 of the pai_entry principal.
133 ************************************************************************/
135 static uint32_t get_pai_entry_val(struct pai_entry *paie)
137 switch (paie->owner_type) {
138 case UID_ACE:
139 DEBUG(10,("get_pai_entry_val: uid = %u\n", (unsigned int)paie->unix_ug.id ));
140 return (uint32_t)paie->unix_ug.id;
141 case GID_ACE:
142 DEBUG(10,("get_pai_entry_val: gid = %u\n", (unsigned int)paie->unix_ug.id ));
143 return (uint32_t)paie->unix_ug.id;
144 case WORLD_ACE:
145 default:
146 DEBUG(10,("get_pai_entry_val: world ace\n"));
147 return (uint32_t)-1;
151 /************************************************************************
152 Return a uint32 of the entry principal.
153 ************************************************************************/
155 static uint32_t get_entry_val(canon_ace *ace_entry)
157 switch (ace_entry->owner_type) {
158 case UID_ACE:
159 DEBUG(10,("get_entry_val: uid = %u\n", (unsigned int)ace_entry->unix_ug.id ));
160 return (uint32_t)ace_entry->unix_ug.id;
161 case GID_ACE:
162 DEBUG(10,("get_entry_val: gid = %u\n", (unsigned int)ace_entry->unix_ug.id ));
163 return (uint32_t)ace_entry->unix_ug.id;
164 case WORLD_ACE:
165 default:
166 DEBUG(10,("get_entry_val: world ace\n"));
167 return (uint32_t)-1;
171 /************************************************************************
172 Create the on-disk format (always v2 now). Caller must free.
173 ************************************************************************/
175 static char *create_pai_buf_v2(canon_ace *file_ace_list,
176 canon_ace *dir_ace_list,
177 uint16_t sd_type,
178 size_t *store_size)
180 char *pai_buf = NULL;
181 canon_ace *ace_list = NULL;
182 char *entry_offset = NULL;
183 unsigned int num_entries = 0;
184 unsigned int num_def_entries = 0;
185 unsigned int i;
187 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
188 num_entries++;
191 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
192 num_def_entries++;
195 DEBUG(10,("create_pai_buf_v2: num_entries = %u, num_def_entries = %u\n", num_entries, num_def_entries ));
197 *store_size = PAI_V2_ENTRIES_BASE +
198 ((num_entries + num_def_entries)*PAI_V2_ENTRY_LENGTH);
200 pai_buf = talloc_array(talloc_tos(), char, *store_size);
201 if (!pai_buf) {
202 return NULL;
205 /* Set up the header. */
206 memset(pai_buf, '\0', PAI_V2_ENTRIES_BASE);
207 SCVAL(pai_buf,PAI_VERSION_OFFSET,PAI_V2_VERSION);
208 SSVAL(pai_buf,PAI_V2_TYPE_OFFSET, sd_type);
209 SSVAL(pai_buf,PAI_V2_NUM_ENTRIES_OFFSET,num_entries);
210 SSVAL(pai_buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET,num_def_entries);
212 DEBUG(10,("create_pai_buf_v2: sd_type = 0x%x\n",
213 (unsigned int)sd_type ));
215 entry_offset = pai_buf + PAI_V2_ENTRIES_BASE;
217 i = 0;
218 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
219 uint8_t type_val = (uint8_t)ace_list->owner_type;
220 uint32_t entry_val = get_entry_val(ace_list);
222 SCVAL(entry_offset,0,ace_list->ace_flags);
223 SCVAL(entry_offset,1,type_val);
224 SIVAL(entry_offset,2,entry_val);
225 DEBUG(10,("create_pai_buf_v2: entry %u [0x%x] [0x%x] [0x%x]\n",
227 (unsigned int)ace_list->ace_flags,
228 (unsigned int)type_val,
229 (unsigned int)entry_val ));
230 i++;
231 entry_offset += PAI_V2_ENTRY_LENGTH;
234 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
235 uint8_t type_val = (uint8_t)ace_list->owner_type;
236 uint32_t entry_val = get_entry_val(ace_list);
238 SCVAL(entry_offset,0,ace_list->ace_flags);
239 SCVAL(entry_offset,1,type_val);
240 SIVAL(entry_offset,2,entry_val);
241 DEBUG(10,("create_pai_buf_v2: entry %u [0x%x] [0x%x] [0x%x]\n",
243 (unsigned int)ace_list->ace_flags,
244 (unsigned int)type_val,
245 (unsigned int)entry_val ));
246 i++;
247 entry_offset += PAI_V2_ENTRY_LENGTH;
250 return pai_buf;
253 /************************************************************************
254 Store the user.SAMBA_PAI attribute on disk.
255 ************************************************************************/
257 static void store_inheritance_attributes(files_struct *fsp,
258 canon_ace *file_ace_list,
259 canon_ace *dir_ace_list,
260 uint16_t sd_type)
262 int ret;
263 size_t store_size;
264 char *pai_buf;
266 if (!lp_map_acl_inherit(SNUM(fsp->conn))) {
267 return;
270 pai_buf = create_pai_buf_v2(file_ace_list, dir_ace_list,
271 sd_type, &store_size);
273 if (fsp->fh->fd != -1) {
274 ret = SMB_VFS_FSETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
275 pai_buf, store_size, 0);
276 } else {
277 ret = SMB_VFS_SETXATTR(fsp->conn, fsp->fsp_name->base_name,
278 SAMBA_POSIX_INHERITANCE_EA_NAME,
279 pai_buf, store_size, 0);
282 TALLOC_FREE(pai_buf);
284 DEBUG(10,("store_inheritance_attribute: type 0x%x for file %s\n",
285 (unsigned int)sd_type,
286 fsp_str_dbg(fsp)));
288 if (ret == -1 && !no_acl_syscall_error(errno)) {
289 DEBUG(1,("store_inheritance_attribute: Error %s\n", strerror(errno) ));
293 /************************************************************************
294 Delete the in memory inheritance info.
295 ************************************************************************/
297 static void free_inherited_info(struct pai_val *pal)
299 if (pal) {
300 struct pai_entry *paie, *paie_next;
301 for (paie = pal->entry_list; paie; paie = paie_next) {
302 paie_next = paie->next;
303 TALLOC_FREE(paie);
305 for (paie = pal->def_entry_list; paie; paie = paie_next) {
306 paie_next = paie->next;
307 TALLOC_FREE(paie);
309 TALLOC_FREE(pal);
313 /************************************************************************
314 Get any stored ACE flags.
315 ************************************************************************/
317 static uint16_t get_pai_flags(struct pai_val *pal, canon_ace *ace_entry, bool default_ace)
319 struct pai_entry *paie;
321 if (!pal) {
322 return 0;
325 /* If the entry exists it is inherited. */
326 for (paie = (default_ace ? pal->def_entry_list : pal->entry_list); paie; paie = paie->next) {
327 if (ace_entry->owner_type == paie->owner_type &&
328 get_entry_val(ace_entry) == get_pai_entry_val(paie))
329 return paie->ace_flags;
331 return 0;
334 /************************************************************************
335 Ensure an attribute just read is valid - v1.
336 ************************************************************************/
338 static bool check_pai_ok_v1(const char *pai_buf, size_t pai_buf_data_size)
340 uint16 num_entries;
341 uint16 num_def_entries;
343 if (pai_buf_data_size < PAI_V1_ENTRIES_BASE) {
344 /* Corrupted - too small. */
345 return false;
348 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_V1_VERSION) {
349 return false;
352 num_entries = SVAL(pai_buf,PAI_V1_NUM_ENTRIES_OFFSET);
353 num_def_entries = SVAL(pai_buf,PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET);
355 /* Check the entry lists match. */
356 /* Each entry is 5 bytes (type plus 4 bytes of uid or gid). */
358 if (((num_entries + num_def_entries)*PAI_V1_ENTRY_LENGTH) +
359 PAI_V1_ENTRIES_BASE != pai_buf_data_size) {
360 return false;
363 return true;
366 /************************************************************************
367 Ensure an attribute just read is valid - v2.
368 ************************************************************************/
370 static bool check_pai_ok_v2(const char *pai_buf, size_t pai_buf_data_size)
372 uint16 num_entries;
373 uint16 num_def_entries;
375 if (pai_buf_data_size < PAI_V2_ENTRIES_BASE) {
376 /* Corrupted - too small. */
377 return false;
380 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_V2_VERSION) {
381 return false;
384 num_entries = SVAL(pai_buf,PAI_V2_NUM_ENTRIES_OFFSET);
385 num_def_entries = SVAL(pai_buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET);
387 /* Check the entry lists match. */
388 /* Each entry is 6 bytes (flags + type + 4 bytes of uid or gid). */
390 if (((num_entries + num_def_entries)*PAI_V2_ENTRY_LENGTH) +
391 PAI_V2_ENTRIES_BASE != pai_buf_data_size) {
392 return false;
395 return true;
398 /************************************************************************
399 Decode the owner.
400 ************************************************************************/
402 static bool get_pai_owner_type(struct pai_entry *paie, const char *entry_offset)
404 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
405 switch( paie->owner_type) {
406 case UID_ACE:
407 paie->unix_ug.type = ID_TYPE_UID;
408 paie->unix_ug.id = (uid_t)IVAL(entry_offset,1);
409 DEBUG(10,("get_pai_owner_type: uid = %u\n",
410 (unsigned int)paie->unix_ug.id ));
411 break;
412 case GID_ACE:
413 paie->unix_ug.type = ID_TYPE_GID;
414 paie->unix_ug.id = (gid_t)IVAL(entry_offset,1);
415 DEBUG(10,("get_pai_owner_type: gid = %u\n",
416 (unsigned int)paie->unix_ug.id ));
417 break;
418 case WORLD_ACE:
419 paie->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
420 paie->unix_ug.id = -1;
421 DEBUG(10,("get_pai_owner_type: world ace\n"));
422 break;
423 default:
424 DEBUG(10,("get_pai_owner_type: unknown type %u\n",
425 (unsigned int)paie->owner_type ));
426 return false;
428 return true;
431 /************************************************************************
432 Process v2 entries.
433 ************************************************************************/
435 static const char *create_pai_v1_entries(struct pai_val *paiv,
436 const char *entry_offset,
437 bool def_entry)
439 int i;
441 for (i = 0; i < paiv->num_entries; i++) {
442 struct pai_entry *paie = talloc(talloc_tos(), struct pai_entry);
443 if (!paie) {
444 return NULL;
447 paie->ace_flags = SEC_ACE_FLAG_INHERITED_ACE;
448 if (!get_pai_owner_type(paie, entry_offset)) {
449 TALLOC_FREE(paie);
450 return NULL;
453 if (!def_entry) {
454 DLIST_ADD(paiv->entry_list, paie);
455 } else {
456 DLIST_ADD(paiv->def_entry_list, paie);
458 entry_offset += PAI_V1_ENTRY_LENGTH;
460 return entry_offset;
463 /************************************************************************
464 Convert to in-memory format from version 1.
465 ************************************************************************/
467 static struct pai_val *create_pai_val_v1(const char *buf, size_t size)
469 const char *entry_offset;
470 struct pai_val *paiv = NULL;
472 if (!check_pai_ok_v1(buf, size)) {
473 return NULL;
476 paiv = talloc(talloc_tos(), struct pai_val);
477 if (!paiv) {
478 return NULL;
481 memset(paiv, '\0', sizeof(struct pai_val));
483 paiv->sd_type = (CVAL(buf,PAI_V1_FLAG_OFFSET) == PAI_V1_ACL_FLAG_PROTECTED) ?
484 SEC_DESC_DACL_PROTECTED : 0;
486 paiv->num_entries = SVAL(buf,PAI_V1_NUM_ENTRIES_OFFSET);
487 paiv->num_def_entries = SVAL(buf,PAI_V1_NUM_DEFAULT_ENTRIES_OFFSET);
489 entry_offset = buf + PAI_V1_ENTRIES_BASE;
491 DEBUG(10,("create_pai_val: num_entries = %u, num_def_entries = %u\n",
492 paiv->num_entries, paiv->num_def_entries ));
494 entry_offset = create_pai_v1_entries(paiv, entry_offset, false);
495 if (entry_offset == NULL) {
496 free_inherited_info(paiv);
497 return NULL;
499 entry_offset = create_pai_v1_entries(paiv, entry_offset, true);
500 if (entry_offset == NULL) {
501 free_inherited_info(paiv);
502 return NULL;
505 return paiv;
508 /************************************************************************
509 Process v2 entries.
510 ************************************************************************/
512 static const char *create_pai_v2_entries(struct pai_val *paiv,
513 unsigned int num_entries,
514 const char *entry_offset,
515 bool def_entry)
517 unsigned int i;
519 for (i = 0; i < num_entries; i++) {
520 struct pai_entry *paie = talloc(talloc_tos(), struct pai_entry);
521 if (!paie) {
522 return NULL;
525 paie->ace_flags = CVAL(entry_offset,0);
527 if (!get_pai_owner_type(paie, entry_offset+1)) {
528 TALLOC_FREE(paie);
529 return NULL;
531 if (!def_entry) {
532 DLIST_ADD(paiv->entry_list, paie);
533 } else {
534 DLIST_ADD(paiv->def_entry_list, paie);
536 entry_offset += PAI_V2_ENTRY_LENGTH;
538 return entry_offset;
541 /************************************************************************
542 Convert to in-memory format from version 2.
543 ************************************************************************/
545 static struct pai_val *create_pai_val_v2(const char *buf, size_t size)
547 const char *entry_offset;
548 struct pai_val *paiv = NULL;
550 if (!check_pai_ok_v2(buf, size)) {
551 return NULL;
554 paiv = talloc(talloc_tos(), struct pai_val);
555 if (!paiv) {
556 return NULL;
559 memset(paiv, '\0', sizeof(struct pai_val));
561 paiv->sd_type = SVAL(buf,PAI_V2_TYPE_OFFSET);
563 paiv->num_entries = SVAL(buf,PAI_V2_NUM_ENTRIES_OFFSET);
564 paiv->num_def_entries = SVAL(buf,PAI_V2_NUM_DEFAULT_ENTRIES_OFFSET);
566 entry_offset = buf + PAI_V2_ENTRIES_BASE;
568 DEBUG(10,("create_pai_val_v2: sd_type = 0x%x num_entries = %u, num_def_entries = %u\n",
569 (unsigned int)paiv->sd_type,
570 paiv->num_entries, paiv->num_def_entries ));
572 entry_offset = create_pai_v2_entries(paiv, paiv->num_entries,
573 entry_offset, false);
574 if (entry_offset == NULL) {
575 free_inherited_info(paiv);
576 return NULL;
578 entry_offset = create_pai_v2_entries(paiv, paiv->num_def_entries,
579 entry_offset, true);
580 if (entry_offset == NULL) {
581 free_inherited_info(paiv);
582 return NULL;
585 return paiv;
588 /************************************************************************
589 Convert to in-memory format - from either version 1 or 2.
590 ************************************************************************/
592 static struct pai_val *create_pai_val(const char *buf, size_t size)
594 if (size < 1) {
595 return NULL;
597 if (CVAL(buf,PAI_VERSION_OFFSET) == PAI_V1_VERSION) {
598 return create_pai_val_v1(buf, size);
599 } else if (CVAL(buf,PAI_VERSION_OFFSET) == PAI_V2_VERSION) {
600 return create_pai_val_v2(buf, size);
601 } else {
602 return NULL;
606 /************************************************************************
607 Load the user.SAMBA_PAI attribute.
608 ************************************************************************/
610 static struct pai_val *fload_inherited_info(files_struct *fsp)
612 char *pai_buf;
613 size_t pai_buf_size = 1024;
614 struct pai_val *paiv = NULL;
615 ssize_t ret;
617 if (!lp_map_acl_inherit(SNUM(fsp->conn))) {
618 return NULL;
621 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL) {
622 return NULL;
625 do {
626 if (fsp->fh->fd != -1) {
627 ret = SMB_VFS_FGETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
628 pai_buf, pai_buf_size);
629 } else {
630 ret = SMB_VFS_GETXATTR(fsp->conn,
631 fsp->fsp_name->base_name,
632 SAMBA_POSIX_INHERITANCE_EA_NAME,
633 pai_buf, pai_buf_size);
636 if (ret == -1) {
637 if (errno != ERANGE) {
638 break;
640 /* Buffer too small - enlarge it. */
641 pai_buf_size *= 2;
642 TALLOC_FREE(pai_buf);
643 if (pai_buf_size > 1024*1024) {
644 return NULL; /* Limit malloc to 1mb. */
646 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL)
647 return NULL;
649 } while (ret == -1);
651 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n",
652 (unsigned long)ret, fsp_str_dbg(fsp)));
654 if (ret == -1) {
655 /* No attribute or not supported. */
656 #if defined(ENOATTR)
657 if (errno != ENOATTR)
658 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
659 #else
660 if (errno != ENOSYS)
661 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
662 #endif
663 TALLOC_FREE(pai_buf);
664 return NULL;
667 paiv = create_pai_val(pai_buf, ret);
669 if (paiv) {
670 DEBUG(10,("load_inherited_info: ACL type is 0x%x for file %s\n",
671 (unsigned int)paiv->sd_type, fsp_str_dbg(fsp)));
674 TALLOC_FREE(pai_buf);
675 return paiv;
678 /************************************************************************
679 Load the user.SAMBA_PAI attribute.
680 ************************************************************************/
682 static struct pai_val *load_inherited_info(const struct connection_struct *conn,
683 const char *fname)
685 char *pai_buf;
686 size_t pai_buf_size = 1024;
687 struct pai_val *paiv = NULL;
688 ssize_t ret;
690 if (!lp_map_acl_inherit(SNUM(conn))) {
691 return NULL;
694 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL) {
695 return NULL;
698 do {
699 ret = SMB_VFS_GETXATTR(conn, fname,
700 SAMBA_POSIX_INHERITANCE_EA_NAME,
701 pai_buf, pai_buf_size);
703 if (ret == -1) {
704 if (errno != ERANGE) {
705 break;
707 /* Buffer too small - enlarge it. */
708 pai_buf_size *= 2;
709 TALLOC_FREE(pai_buf);
710 if (pai_buf_size > 1024*1024) {
711 return NULL; /* Limit malloc to 1mb. */
713 if ((pai_buf = talloc_array(talloc_tos(), char, pai_buf_size)) == NULL)
714 return NULL;
716 } while (ret == -1);
718 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fname));
720 if (ret == -1) {
721 /* No attribute or not supported. */
722 #if defined(ENOATTR)
723 if (errno != ENOATTR)
724 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
725 #else
726 if (errno != ENOSYS)
727 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
728 #endif
729 TALLOC_FREE(pai_buf);
730 return NULL;
733 paiv = create_pai_val(pai_buf, ret);
735 if (paiv) {
736 DEBUG(10,("load_inherited_info: ACL type 0x%x for file %s\n",
737 (unsigned int)paiv->sd_type,
738 fname));
741 TALLOC_FREE(pai_buf);
742 return paiv;
745 /****************************************************************************
746 Functions to manipulate the internal ACE format.
747 ****************************************************************************/
749 /****************************************************************************
750 Count a linked list of canonical ACE entries.
751 ****************************************************************************/
753 static size_t count_canon_ace_list( canon_ace *l_head )
755 size_t count = 0;
756 canon_ace *ace;
758 for (ace = l_head; ace; ace = ace->next)
759 count++;
761 return count;
764 /****************************************************************************
765 Free a linked list of canonical ACE entries.
766 ****************************************************************************/
768 static void free_canon_ace_list( canon_ace *l_head )
770 canon_ace *list, *next;
772 for (list = l_head; list; list = next) {
773 next = list->next;
774 DLIST_REMOVE(l_head, list);
775 TALLOC_FREE(list);
779 /****************************************************************************
780 Function to duplicate a canon_ace entry.
781 ****************************************************************************/
783 static canon_ace *dup_canon_ace( canon_ace *src_ace)
785 canon_ace *dst_ace = talloc(talloc_tos(), canon_ace);
787 if (dst_ace == NULL)
788 return NULL;
790 *dst_ace = *src_ace;
791 dst_ace->prev = dst_ace->next = NULL;
792 return dst_ace;
795 /****************************************************************************
796 Print out a canon ace.
797 ****************************************************************************/
799 static void print_canon_ace(canon_ace *pace, int num)
801 dbgtext( "canon_ace index %d. Type = %s ", num, pace->attr == ALLOW_ACE ? "allow" : "deny" );
802 dbgtext( "SID = %s ", sid_string_dbg(&pace->trustee));
803 if (pace->owner_type == UID_ACE) {
804 const char *u_name = uidtoname(pace->unix_ug.id);
805 dbgtext( "uid %u (%s) ", (unsigned int)pace->unix_ug.id, u_name );
806 } else if (pace->owner_type == GID_ACE) {
807 char *g_name = gidtoname(pace->unix_ug.id);
808 dbgtext( "gid %u (%s) ", (unsigned int)pace->unix_ug.id, g_name );
809 } else
810 dbgtext( "other ");
811 switch (pace->type) {
812 case SMB_ACL_USER:
813 dbgtext( "SMB_ACL_USER ");
814 break;
815 case SMB_ACL_USER_OBJ:
816 dbgtext( "SMB_ACL_USER_OBJ ");
817 break;
818 case SMB_ACL_GROUP:
819 dbgtext( "SMB_ACL_GROUP ");
820 break;
821 case SMB_ACL_GROUP_OBJ:
822 dbgtext( "SMB_ACL_GROUP_OBJ ");
823 break;
824 case SMB_ACL_OTHER:
825 dbgtext( "SMB_ACL_OTHER ");
826 break;
827 default:
828 dbgtext( "MASK " );
829 break;
832 dbgtext( "ace_flags = 0x%x ", (unsigned int)pace->ace_flags);
833 dbgtext( "perms ");
834 dbgtext( "%c", pace->perms & S_IRUSR ? 'r' : '-');
835 dbgtext( "%c", pace->perms & S_IWUSR ? 'w' : '-');
836 dbgtext( "%c\n", pace->perms & S_IXUSR ? 'x' : '-');
839 /****************************************************************************
840 Print out a canon ace list.
841 ****************************************************************************/
843 static void print_canon_ace_list(const char *name, canon_ace *ace_list)
845 int count = 0;
847 if( DEBUGLVL( 10 )) {
848 dbgtext( "print_canon_ace_list: %s\n", name );
849 for (;ace_list; ace_list = ace_list->next, count++)
850 print_canon_ace(ace_list, count );
854 /****************************************************************************
855 Map POSIX ACL perms to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
856 ****************************************************************************/
858 static mode_t convert_permset_to_mode_t(SMB_ACL_PERMSET_T permset)
860 mode_t ret = 0;
862 ret |= (sys_acl_get_perm(permset, SMB_ACL_READ) ? S_IRUSR : 0);
863 ret |= (sys_acl_get_perm(permset, SMB_ACL_WRITE) ? S_IWUSR : 0);
864 ret |= (sys_acl_get_perm(permset, SMB_ACL_EXECUTE) ? S_IXUSR : 0);
866 return ret;
869 /****************************************************************************
870 Map generic UNIX permissions to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
871 ****************************************************************************/
873 static mode_t unix_perms_to_acl_perms(mode_t mode, int r_mask, int w_mask, int x_mask)
875 mode_t ret = 0;
877 if (mode & r_mask)
878 ret |= S_IRUSR;
879 if (mode & w_mask)
880 ret |= S_IWUSR;
881 if (mode & x_mask)
882 ret |= S_IXUSR;
884 return ret;
887 /****************************************************************************
888 Map canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits) to
889 an SMB_ACL_PERMSET_T.
890 ****************************************************************************/
892 static int map_acl_perms_to_permset(connection_struct *conn, mode_t mode, SMB_ACL_PERMSET_T *p_permset)
894 if (sys_acl_clear_perms(*p_permset) == -1)
895 return -1;
896 if (mode & S_IRUSR) {
897 if (sys_acl_add_perm(*p_permset, SMB_ACL_READ) == -1)
898 return -1;
900 if (mode & S_IWUSR) {
901 if (sys_acl_add_perm(*p_permset, SMB_ACL_WRITE) == -1)
902 return -1;
904 if (mode & S_IXUSR) {
905 if (sys_acl_add_perm(*p_permset, SMB_ACL_EXECUTE) == -1)
906 return -1;
908 return 0;
911 /****************************************************************************
912 Function to create owner and group SIDs from a SMB_STRUCT_STAT.
913 ****************************************************************************/
915 void create_file_sids(const SMB_STRUCT_STAT *psbuf, struct dom_sid *powner_sid, struct dom_sid *pgroup_sid)
917 uid_to_sid( powner_sid, psbuf->st_ex_uid );
918 gid_to_sid( pgroup_sid, psbuf->st_ex_gid );
921 /****************************************************************************
922 Merge aces with a common UID or GID - if both are allow or deny, OR the permissions together and
923 delete the second one. If the first is deny, mask the permissions off and delete the allow
924 if the permissions become zero, delete the deny if the permissions are non zero.
925 ****************************************************************************/
927 static void merge_aces( canon_ace **pp_list_head, bool dir_acl)
929 canon_ace *l_head = *pp_list_head;
930 canon_ace *curr_ace_outer;
931 canon_ace *curr_ace_outer_next;
934 * First, merge allow entries with identical SIDs, and deny entries
935 * with identical SIDs.
938 for (curr_ace_outer = l_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
939 canon_ace *curr_ace;
940 canon_ace *curr_ace_next;
942 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
944 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
945 bool can_merge = false;
947 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
949 /* For file ACLs we can merge if the SIDs and ALLOW/DENY
950 * types are the same. For directory acls we must also
951 * ensure the POSIX ACL types are the same.
953 * For the IDMAP_BOTH case, we must not merge
954 * the UID and GID ACE values for same SID
957 if (!dir_acl) {
958 can_merge = (curr_ace->unix_ug.id == curr_ace_outer->unix_ug.id &&
959 curr_ace->owner_type == curr_ace_outer->owner_type &&
960 (curr_ace->attr == curr_ace_outer->attr));
961 } else {
962 can_merge = (curr_ace->unix_ug.id == curr_ace_outer->unix_ug.id &&
963 curr_ace->owner_type == curr_ace_outer->owner_type &&
964 (curr_ace->type == curr_ace_outer->type) &&
965 (curr_ace->attr == curr_ace_outer->attr));
968 if (can_merge) {
969 if( DEBUGLVL( 10 )) {
970 dbgtext("merge_aces: Merging ACE's\n");
971 print_canon_ace( curr_ace_outer, 0);
972 print_canon_ace( curr_ace, 0);
975 /* Merge two allow or two deny ACE's. */
977 /* Theoretically we shouldn't merge a dir ACE if
978 * one ACE has the CI flag set, and the other
979 * ACE has the OI flag set, but this is rare
980 * enough we can ignore it. */
982 curr_ace_outer->perms |= curr_ace->perms;
983 curr_ace_outer->ace_flags |= curr_ace->ace_flags;
984 DLIST_REMOVE(l_head, curr_ace);
985 TALLOC_FREE(curr_ace);
986 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
992 * Now go through and mask off allow permissions with deny permissions.
993 * We can delete either the allow or deny here as we know that each SID
994 * appears only once in the list.
997 for (curr_ace_outer = l_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
998 canon_ace *curr_ace;
999 canon_ace *curr_ace_next;
1001 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
1003 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
1005 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
1008 * Subtract ACE's with different entries. Due to the ordering constraints
1009 * we've put on the ACL, we know the deny must be the first one.
1012 if (curr_ace->unix_ug.id == curr_ace_outer->unix_ug.id &&
1013 (curr_ace->owner_type == curr_ace_outer->owner_type) &&
1014 (curr_ace_outer->attr == DENY_ACE) && (curr_ace->attr == ALLOW_ACE)) {
1016 if( DEBUGLVL( 10 )) {
1017 dbgtext("merge_aces: Masking ACE's\n");
1018 print_canon_ace( curr_ace_outer, 0);
1019 print_canon_ace( curr_ace, 0);
1022 curr_ace->perms &= ~curr_ace_outer->perms;
1024 if (curr_ace->perms == 0) {
1027 * The deny overrides the allow. Remove the allow.
1030 DLIST_REMOVE(l_head, curr_ace);
1031 TALLOC_FREE(curr_ace);
1032 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
1034 } else {
1037 * Even after removing permissions, there
1038 * are still allow permissions - delete the deny.
1039 * It is safe to delete the deny here,
1040 * as we are guarenteed by the deny first
1041 * ordering that all the deny entries for
1042 * this SID have already been merged into one
1043 * before we can get to an allow ace.
1046 DLIST_REMOVE(l_head, curr_ace_outer);
1047 TALLOC_FREE(curr_ace_outer);
1048 break;
1052 } /* end for curr_ace */
1053 } /* end for curr_ace_outer */
1055 /* We may have modified the list. */
1057 *pp_list_head = l_head;
1060 /****************************************************************************
1061 Check if we need to return NT4.x compatible ACL entries.
1062 ****************************************************************************/
1064 bool nt4_compatible_acls(void)
1066 int compat = lp_acl_compatibility();
1068 if (compat == ACL_COMPAT_AUTO) {
1069 enum remote_arch_types ra_type = get_remote_arch();
1071 /* Automatically adapt to client */
1072 return (ra_type <= RA_WINNT);
1073 } else
1074 return (compat == ACL_COMPAT_WINNT);
1078 /****************************************************************************
1079 Map canon_ace perms to permission bits NT.
1080 The attr element is not used here - we only process deny entries on set,
1081 not get. Deny entries are implicit on get with ace->perms = 0.
1082 ****************************************************************************/
1084 uint32_t map_canon_ace_perms(int snum,
1085 enum security_ace_type *pacl_type,
1086 mode_t perms,
1087 bool directory_ace)
1089 uint32_t nt_mask = 0;
1091 *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
1093 if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
1094 if (directory_ace) {
1095 nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
1096 } else {
1097 nt_mask = (UNIX_ACCESS_RWX & ~DELETE_ACCESS);
1099 } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
1101 * Windows NT refuses to display ACEs with no permissions in them (but
1102 * they are perfectly legal with Windows 2000). If the ACE has empty
1103 * permissions we cannot use 0, so we use the otherwise unused
1104 * WRITE_OWNER permission, which we ignore when we set an ACL.
1105 * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
1106 * to be changed in the future.
1109 if (nt4_compatible_acls())
1110 nt_mask = UNIX_ACCESS_NONE;
1111 else
1112 nt_mask = 0;
1113 } else {
1114 if (directory_ace) {
1115 nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
1116 nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
1117 nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
1118 } else {
1119 nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
1120 nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
1121 nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
1125 if ((perms & S_IWUSR) && lp_dos_filemode(snum)) {
1126 nt_mask |= (SEC_STD_WRITE_DAC|SEC_STD_WRITE_OWNER|DELETE_ACCESS);
1129 DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
1130 (unsigned int)perms, (unsigned int)nt_mask ));
1132 return nt_mask;
1135 /****************************************************************************
1136 Map NT perms to a UNIX mode_t.
1137 ****************************************************************************/
1139 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA)
1140 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA)
1141 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
1143 static mode_t map_nt_perms( uint32 *mask, int type)
1145 mode_t mode = 0;
1147 switch(type) {
1148 case S_IRUSR:
1149 if((*mask) & GENERIC_ALL_ACCESS)
1150 mode = S_IRUSR|S_IWUSR|S_IXUSR;
1151 else {
1152 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
1153 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
1154 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
1156 break;
1157 case S_IRGRP:
1158 if((*mask) & GENERIC_ALL_ACCESS)
1159 mode = S_IRGRP|S_IWGRP|S_IXGRP;
1160 else {
1161 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
1162 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
1163 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
1165 break;
1166 case S_IROTH:
1167 if((*mask) & GENERIC_ALL_ACCESS)
1168 mode = S_IROTH|S_IWOTH|S_IXOTH;
1169 else {
1170 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
1171 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
1172 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
1174 break;
1177 return mode;
1180 /****************************************************************************
1181 Unpack a struct security_descriptor into a UNIX owner and group.
1182 ****************************************************************************/
1184 NTSTATUS unpack_nt_owners(struct connection_struct *conn,
1185 uid_t *puser, gid_t *pgrp,
1186 uint32 security_info_sent, const struct
1187 security_descriptor *psd)
1189 struct dom_sid owner_sid;
1190 struct dom_sid grp_sid;
1192 *puser = (uid_t)-1;
1193 *pgrp = (gid_t)-1;
1195 if(security_info_sent == 0) {
1196 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
1197 return NT_STATUS_OK;
1201 * Validate the owner and group SID's.
1204 memset(&owner_sid, '\0', sizeof(owner_sid));
1205 memset(&grp_sid, '\0', sizeof(grp_sid));
1207 DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
1210 * Don't immediately fail if the owner sid cannot be validated.
1211 * This may be a group chown only set.
1214 if (security_info_sent & SECINFO_OWNER) {
1215 sid_copy(&owner_sid, psd->owner_sid);
1216 if (!sid_to_uid(&owner_sid, puser)) {
1217 if (lp_force_unknown_acl_user(SNUM(conn))) {
1218 /* this allows take ownership to work
1219 * reasonably */
1220 *puser = get_current_uid(conn);
1221 } else {
1222 DEBUG(3,("unpack_nt_owners: unable to validate"
1223 " owner sid for %s\n",
1224 sid_string_dbg(&owner_sid)));
1225 return NT_STATUS_INVALID_OWNER;
1228 DEBUG(3,("unpack_nt_owners: owner sid mapped to uid %u\n",
1229 (unsigned int)*puser ));
1233 * Don't immediately fail if the group sid cannot be validated.
1234 * This may be an owner chown only set.
1237 if (security_info_sent & SECINFO_GROUP) {
1238 sid_copy(&grp_sid, psd->group_sid);
1239 if (!sid_to_gid( &grp_sid, pgrp)) {
1240 if (lp_force_unknown_acl_user(SNUM(conn))) {
1241 /* this allows take group ownership to work
1242 * reasonably */
1243 *pgrp = get_current_gid(conn);
1244 } else {
1245 DEBUG(3,("unpack_nt_owners: unable to validate"
1246 " group sid.\n"));
1247 return NT_STATUS_INVALID_OWNER;
1250 DEBUG(3,("unpack_nt_owners: group sid mapped to gid %u\n",
1251 (unsigned int)*pgrp));
1254 DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
1256 return NT_STATUS_OK;
1259 /****************************************************************************
1260 Ensure the enforced permissions for this share apply.
1261 ****************************************************************************/
1263 static void apply_default_perms(const struct share_params *params,
1264 const bool is_directory, canon_ace *pace,
1265 mode_t type)
1267 mode_t and_bits = (mode_t)0;
1268 mode_t or_bits = (mode_t)0;
1270 /* Get the initial bits to apply. */
1272 if (is_directory) {
1273 and_bits = lp_dir_security_mask(params->service);
1274 or_bits = lp_force_dir_security_mode(params->service);
1275 } else {
1276 and_bits = lp_security_mask(params->service);
1277 or_bits = lp_force_security_mode(params->service);
1280 /* Now bounce them into the S_USR space. */
1281 switch(type) {
1282 case S_IRUSR:
1283 /* Ensure owner has read access. */
1284 pace->perms |= S_IRUSR;
1285 if (is_directory)
1286 pace->perms |= (S_IWUSR|S_IXUSR);
1287 and_bits = unix_perms_to_acl_perms(and_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1288 or_bits = unix_perms_to_acl_perms(or_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1289 break;
1290 case S_IRGRP:
1291 and_bits = unix_perms_to_acl_perms(and_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1292 or_bits = unix_perms_to_acl_perms(or_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1293 break;
1294 case S_IROTH:
1295 and_bits = unix_perms_to_acl_perms(and_bits, S_IROTH, S_IWOTH, S_IXOTH);
1296 or_bits = unix_perms_to_acl_perms(or_bits, S_IROTH, S_IWOTH, S_IXOTH);
1297 break;
1300 pace->perms = ((pace->perms & and_bits)|or_bits);
1303 /****************************************************************************
1304 Check if a given uid/SID is in a group gid/SID. This is probably very
1305 expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1306 ****************************************************************************/
1308 static bool uid_entry_in_group(connection_struct *conn, canon_ace *uid_ace, canon_ace *group_ace )
1310 /* "Everyone" always matches every uid. */
1312 if (dom_sid_equal(&group_ace->trustee, &global_sid_World))
1313 return True;
1316 * if it's the current user, we already have the unix token
1317 * and don't need to do the complex user_in_group_sid() call
1319 if (uid_ace->unix_ug.id == get_current_uid(conn)) {
1320 const struct security_unix_token *curr_utok = NULL;
1321 size_t i;
1323 if (group_ace->unix_ug.id == get_current_gid(conn)) {
1324 return True;
1327 curr_utok = get_current_utok(conn);
1328 for (i=0; i < curr_utok->ngroups; i++) {
1329 if (group_ace->unix_ug.id == curr_utok->groups[i]) {
1330 return True;
1336 * user_in_group_sid() uses create_token_from_sid()
1337 * which creates an artificial NT token given just a username,
1338 * so this is not reliable for users from foreign domains
1339 * exported by winbindd!
1341 return user_sid_in_group_sid(&uid_ace->trustee, &group_ace->trustee);
1344 /****************************************************************************
1345 A well formed POSIX file or default ACL has at least 3 entries, a
1346 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1347 In addition, the owner must always have at least read access.
1348 When using this call on get_acl, the pst struct is valid and contains
1349 the mode of the file. When using this call on set_acl, the pst struct has
1350 been modified to have a mode containing the default for this file or directory
1351 type.
1352 ****************************************************************************/
1354 static bool ensure_canon_entry_valid(connection_struct *conn, canon_ace **pp_ace,
1355 const struct share_params *params,
1356 const bool is_directory,
1357 const struct dom_sid *pfile_owner_sid,
1358 const struct dom_sid *pfile_grp_sid,
1359 const SMB_STRUCT_STAT *pst,
1360 bool setting_acl)
1362 canon_ace *pace;
1363 canon_ace *pace_user = NULL;
1364 canon_ace *pace_group = NULL;
1365 canon_ace *pace_other = NULL;
1367 for (pace = *pp_ace; pace; pace = pace->next) {
1368 if (pace->type == SMB_ACL_USER_OBJ) {
1370 if (setting_acl)
1371 apply_default_perms(params, is_directory, pace, S_IRUSR);
1372 pace_user = pace;
1374 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1377 * Ensure create mask/force create mode is respected on set.
1380 if (setting_acl)
1381 apply_default_perms(params, is_directory, pace, S_IRGRP);
1382 pace_group = pace;
1384 } else if (pace->type == SMB_ACL_OTHER) {
1387 * Ensure create mask/force create mode is respected on set.
1390 if (setting_acl)
1391 apply_default_perms(params, is_directory, pace, S_IROTH);
1392 pace_other = pace;
1396 if (!pace_user) {
1397 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1398 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1399 return False;
1402 ZERO_STRUCTP(pace);
1403 pace->type = SMB_ACL_USER_OBJ;
1404 pace->owner_type = UID_ACE;
1405 pace->unix_ug.type = ID_TYPE_UID;
1406 pace->unix_ug.id = pst->st_ex_uid;
1407 pace->trustee = *pfile_owner_sid;
1408 pace->attr = ALLOW_ACE;
1409 /* Start with existing permissions, principle of least
1410 surprises for the user. */
1411 pace->perms = pst->st_ex_mode;
1413 if (setting_acl) {
1414 /* See if the owning user is in any of the other groups in
1415 the ACE, or if there's a matching user entry (by uid
1416 or in the case of ID_TYPE_BOTH by SID).
1417 If so, OR in the permissions from that entry. */
1419 canon_ace *pace_iter;
1421 for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1422 if (pace_iter->type == SMB_ACL_USER &&
1423 pace_iter->unix_ug.id == pace->unix_ug.id) {
1424 pace->perms |= pace_iter->perms;
1425 } else if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1426 if (dom_sid_equal(&pace->trustee, &pace_iter->trustee)) {
1427 pace->perms |= pace_iter->perms;
1428 } else if (uid_entry_in_group(conn, pace, pace_iter)) {
1429 pace->perms |= pace_iter->perms;
1434 if (pace->perms == 0) {
1435 /* If we only got an "everyone" perm, just use that. */
1436 if (pace_other)
1437 pace->perms = pace_other->perms;
1440 apply_default_perms(params, is_directory, pace, S_IRUSR);
1441 } else {
1442 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1445 DLIST_ADD(*pp_ace, pace);
1446 pace_user = pace;
1449 if (!pace_group) {
1450 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1451 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1452 return False;
1455 ZERO_STRUCTP(pace);
1456 pace->type = SMB_ACL_GROUP_OBJ;
1457 pace->owner_type = GID_ACE;
1458 pace->unix_ug.type = ID_TYPE_GID;
1459 pace->unix_ug.id = pst->st_ex_gid;
1460 pace->trustee = *pfile_grp_sid;
1461 pace->attr = ALLOW_ACE;
1462 if (setting_acl) {
1463 /* If we only got an "everyone" perm, just use that. */
1464 if (pace_other)
1465 pace->perms = pace_other->perms;
1466 else
1467 pace->perms = 0;
1468 apply_default_perms(params, is_directory, pace, S_IRGRP);
1469 } else {
1470 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1473 DLIST_ADD(*pp_ace, pace);
1474 pace_group = pace;
1477 if (!pace_other) {
1478 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1479 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1480 return False;
1483 ZERO_STRUCTP(pace);
1484 pace->type = SMB_ACL_OTHER;
1485 pace->owner_type = WORLD_ACE;
1486 pace->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
1487 pace->unix_ug.id = -1;
1488 pace->trustee = global_sid_World;
1489 pace->attr = ALLOW_ACE;
1490 if (setting_acl) {
1491 pace->perms = 0;
1492 apply_default_perms(params, is_directory, pace, S_IROTH);
1493 } else
1494 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IROTH, S_IWOTH, S_IXOTH);
1496 DLIST_ADD(*pp_ace, pace);
1497 pace_other = pace;
1500 if (setting_acl) {
1501 /* Ensure when setting a POSIX ACL, that the uid for a
1502 SMB_ACL_USER_OBJ ACE (the owner ACE entry) has a duplicate
1503 permission entry as an SMB_ACL_USER, and a gid for a
1504 SMB_ACL_GROUP_OBJ ACE (the primary group ACE entry) also has
1505 a duplicate permission entry as an SMB_ACL_GROUP. If not,
1506 then if the ownership or group ownership of this file or
1507 directory gets changed, the user or group can lose their
1508 access. */
1509 bool got_duplicate_user = false;
1510 bool got_duplicate_group = false;
1512 for (pace = *pp_ace; pace; pace = pace->next) {
1513 if (pace->type == SMB_ACL_USER &&
1514 pace->unix_ug.id == pace_user->unix_ug.id) {
1515 /* Already got one. */
1516 got_duplicate_user = true;
1517 } else if (pace->type == SMB_ACL_GROUP &&
1518 pace->unix_ug.id == pace_user->unix_ug.id) {
1519 /* Already got one. */
1520 got_duplicate_group = true;
1521 } else if ((pace->type == SMB_ACL_GROUP)
1522 && (dom_sid_equal(&pace->trustee, &pace_user->trustee))) {
1523 /* If the SID owning the file appears
1524 * in a group entry, then we have
1525 * enough duplication, they will still
1526 * have access */
1527 got_duplicate_user = true;
1531 /* If the SID is equal for the user and group that we need
1532 to add the duplicate for, add only the group */
1533 if (!got_duplicate_user && !got_duplicate_group
1534 && dom_sid_equal(&pace_group->trustee,
1535 &pace_user->trustee)) {
1536 /* Add a duplicate SMB_ACL_GROUP entry, this
1537 * will cover the owning SID as well, as it
1538 * will always be mapped to both a uid and
1539 * gid. */
1541 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1542 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1543 return false;
1546 ZERO_STRUCTP(pace);
1547 pace->type = SMB_ACL_GROUP;;
1548 pace->owner_type = GID_ACE;
1549 pace->unix_ug.type = ID_TYPE_GID;
1550 pace->unix_ug.id = pace_group->unix_ug.id;
1551 pace->trustee = pace_group->trustee;
1552 pace->attr = pace_group->attr;
1553 pace->perms = pace_group->perms;
1555 DLIST_ADD(*pp_ace, pace);
1557 /* We're done here, make sure the
1558 statements below are not executed. */
1559 got_duplicate_user = true;
1560 got_duplicate_group = true;
1563 if (!got_duplicate_user) {
1564 /* Add a duplicate SMB_ACL_USER entry. */
1565 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1566 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1567 return false;
1570 ZERO_STRUCTP(pace);
1571 pace->type = SMB_ACL_USER;;
1572 pace->owner_type = UID_ACE;
1573 pace->unix_ug.type = ID_TYPE_UID;
1574 pace->unix_ug.id = pace_user->unix_ug.id;
1575 pace->trustee = pace_user->trustee;
1576 pace->attr = pace_user->attr;
1577 pace->perms = pace_user->perms;
1579 DLIST_ADD(*pp_ace, pace);
1581 got_duplicate_user = true;
1584 if (!got_duplicate_group) {
1585 /* Add a duplicate SMB_ACL_GROUP entry. */
1586 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1587 DEBUG(0,("ensure_canon_entry_valid: talloc fail.\n"));
1588 return false;
1591 ZERO_STRUCTP(pace);
1592 pace->type = SMB_ACL_GROUP;;
1593 pace->owner_type = GID_ACE;
1594 pace->unix_ug.type = ID_TYPE_GID;
1595 pace->unix_ug.id = pace_group->unix_ug.id;
1596 pace->trustee = pace_group->trustee;
1597 pace->attr = pace_group->attr;
1598 pace->perms = pace_group->perms;
1600 DLIST_ADD(*pp_ace, pace);
1602 got_duplicate_group = true;
1607 return True;
1610 /****************************************************************************
1611 Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1612 If it does not have them, check if there are any entries where the trustee is the
1613 file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1614 Note we must not do this to default directory ACLs.
1615 ****************************************************************************/
1617 static void check_owning_objs(canon_ace *ace, struct dom_sid *pfile_owner_sid, struct dom_sid *pfile_grp_sid)
1619 bool got_user_obj, got_group_obj;
1620 canon_ace *current_ace;
1621 int i, entries;
1623 entries = count_canon_ace_list(ace);
1624 got_user_obj = False;
1625 got_group_obj = False;
1627 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1628 if (current_ace->type == SMB_ACL_USER_OBJ)
1629 got_user_obj = True;
1630 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1631 got_group_obj = True;
1633 if (got_user_obj && got_group_obj) {
1634 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1635 return;
1638 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1639 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1640 dom_sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1641 current_ace->type = SMB_ACL_USER_OBJ;
1642 got_user_obj = True;
1644 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1645 dom_sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1646 current_ace->type = SMB_ACL_GROUP_OBJ;
1647 got_group_obj = True;
1650 if (!got_user_obj)
1651 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1652 if (!got_group_obj)
1653 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1656 static bool add_current_ace_to_acl(files_struct *fsp, struct security_ace *psa,
1657 canon_ace **file_ace, canon_ace **dir_ace,
1658 bool *got_file_allow, bool *got_dir_allow,
1659 bool *all_aces_are_inherit_only,
1660 canon_ace *current_ace)
1664 * Map the given NT permissions into a UNIX mode_t containing only
1665 * S_I(R|W|X)USR bits.
1668 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1669 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1671 /* Store the ace_flag. */
1672 current_ace->ace_flags = psa->flags;
1675 * Now add the created ace to either the file list, the directory
1676 * list, or both. We *MUST* preserve the order here (hence we use
1677 * DLIST_ADD_END) as NT ACLs are order dependent.
1680 if (fsp->is_directory) {
1683 * We can only add to the default POSIX ACE list if the ACE is
1684 * designed to be inherited by both files and directories.
1687 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1688 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1690 canon_ace *current_dir_ace = current_ace;
1691 DLIST_ADD_END(*dir_ace, current_ace, canon_ace *);
1694 * Note if this was an allow ace. We can't process
1695 * any further deny ace's after this.
1698 if (current_ace->attr == ALLOW_ACE)
1699 *got_dir_allow = True;
1701 if ((current_ace->attr == DENY_ACE) && *got_dir_allow) {
1702 DEBUG(0,("add_current_ace_to_acl: "
1703 "malformed ACL in "
1704 "inheritable ACL! Deny entry "
1705 "after Allow entry. Failing "
1706 "to set on file %s.\n",
1707 fsp_str_dbg(fsp)));
1708 return False;
1711 if( DEBUGLVL( 10 )) {
1712 dbgtext("add_current_ace_to_acl: adding dir ACL:\n");
1713 print_canon_ace( current_ace, 0);
1717 * If this is not an inherit only ACE we need to add a duplicate
1718 * to the file acl.
1721 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1722 canon_ace *dup_ace = dup_canon_ace(current_ace);
1724 if (!dup_ace) {
1725 DEBUG(0,("add_current_ace_to_acl: malloc fail !\n"));
1726 return False;
1730 * We must not free current_ace here as its
1731 * pointer is now owned by the dir_ace list.
1733 current_ace = dup_ace;
1734 /* We've essentially split this ace into two,
1735 * and added the ace with inheritance request
1736 * bits to the directory ACL. Drop those bits for
1737 * the ACE we're adding to the file list. */
1738 current_ace->ace_flags &= ~(SEC_ACE_FLAG_OBJECT_INHERIT|
1739 SEC_ACE_FLAG_CONTAINER_INHERIT|
1740 SEC_ACE_FLAG_INHERIT_ONLY);
1741 } else {
1743 * We must not free current_ace here as its
1744 * pointer is now owned by the dir_ace list.
1746 current_ace = NULL;
1750 * current_ace is now either owned by file_ace
1751 * or is NULL. We can safely operate on current_dir_ace
1752 * to treat mapping for default acl entries differently
1753 * than access acl entries.
1756 if (current_dir_ace->owner_type == UID_ACE) {
1758 * We already decided above this is a uid,
1759 * for default acls ace's only CREATOR_OWNER
1760 * maps to ACL_USER_OBJ. All other uid
1761 * ace's are ACL_USER.
1763 if (dom_sid_equal(&current_dir_ace->trustee,
1764 &global_sid_Creator_Owner)) {
1765 current_dir_ace->type = SMB_ACL_USER_OBJ;
1766 } else {
1767 current_dir_ace->type = SMB_ACL_USER;
1771 if (current_dir_ace->owner_type == GID_ACE) {
1773 * We already decided above this is a gid,
1774 * for default acls ace's only CREATOR_GROUP
1775 * maps to ACL_GROUP_OBJ. All other uid
1776 * ace's are ACL_GROUP.
1778 if (dom_sid_equal(&current_dir_ace->trustee,
1779 &global_sid_Creator_Group)) {
1780 current_dir_ace->type = SMB_ACL_GROUP_OBJ;
1781 } else {
1782 current_dir_ace->type = SMB_ACL_GROUP;
1789 * Only add to the file ACL if not inherit only.
1792 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1793 DLIST_ADD_END(*file_ace, current_ace, canon_ace *);
1796 * Note if this was an allow ace. We can't process
1797 * any further deny ace's after this.
1800 if (current_ace->attr == ALLOW_ACE)
1801 *got_file_allow = True;
1803 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1804 DEBUG(0,("add_current_ace_to_acl: malformed "
1805 "ACL in file ACL ! Deny entry after "
1806 "Allow entry. Failing to set on file "
1807 "%s.\n", fsp_str_dbg(fsp)));
1808 return False;
1811 if( DEBUGLVL( 10 )) {
1812 dbgtext("add_current_ace_to_acl: adding file ACL:\n");
1813 print_canon_ace( current_ace, 0);
1815 *all_aces_are_inherit_only = False;
1817 * We must not free current_ace here as its
1818 * pointer is now owned by the file_ace list.
1820 current_ace = NULL;
1824 * Free if ACE was not added.
1827 TALLOC_FREE(current_ace);
1828 return true;
1831 /****************************************************************************
1832 Unpack a struct security_descriptor into two canonical ace lists.
1833 ****************************************************************************/
1835 static bool create_canon_ace_lists(files_struct *fsp,
1836 const SMB_STRUCT_STAT *pst,
1837 struct dom_sid *pfile_owner_sid,
1838 struct dom_sid *pfile_grp_sid,
1839 canon_ace **ppfile_ace,
1840 canon_ace **ppdir_ace,
1841 const struct security_acl *dacl)
1843 bool all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1844 canon_ace *file_ace = NULL;
1845 canon_ace *dir_ace = NULL;
1846 canon_ace *current_ace = NULL;
1847 bool got_dir_allow = False;
1848 bool got_file_allow = False;
1849 int i, j;
1851 *ppfile_ace = NULL;
1852 *ppdir_ace = NULL;
1855 * Convert the incoming ACL into a more regular form.
1858 for(i = 0; i < dacl->num_aces; i++) {
1859 struct security_ace *psa = &dacl->aces[i];
1861 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1862 DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1863 return False;
1866 if (nt4_compatible_acls()) {
1868 * The security mask may be UNIX_ACCESS_NONE which should map into
1869 * no permissions (we overload the WRITE_OWNER bit for this) or it
1870 * should be one of the ALL/EXECUTE/READ/WRITE bits. Arrange for this
1871 * to be so. Any other bits override the UNIX_ACCESS_NONE bit.
1875 * Convert GENERIC bits to specific bits.
1878 se_map_generic(&psa->access_mask, &file_generic_mapping);
1880 psa->access_mask &= (UNIX_ACCESS_NONE|FILE_ALL_ACCESS);
1882 if(psa->access_mask != UNIX_ACCESS_NONE)
1883 psa->access_mask &= ~UNIX_ACCESS_NONE;
1888 * Deal with the fact that NT 4.x re-writes the canonical format
1889 * that we return for default ACLs. If a directory ACE is identical
1890 * to a inherited directory ACE then NT changes the bits so that the
1891 * first ACE is set to OI|IO and the second ACE for this SID is set
1892 * to CI. We need to repair this. JRA.
1895 for(i = 0; i < dacl->num_aces; i++) {
1896 struct security_ace *psa1 = &dacl->aces[i];
1898 for (j = i + 1; j < dacl->num_aces; j++) {
1899 struct security_ace *psa2 = &dacl->aces[j];
1901 if (psa1->access_mask != psa2->access_mask)
1902 continue;
1904 if (!dom_sid_equal(&psa1->trustee, &psa2->trustee))
1905 continue;
1908 * Ok - permission bits and SIDs are equal.
1909 * Check if flags were re-written.
1912 if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1914 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1915 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1917 } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1919 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1920 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1926 for(i = 0; i < dacl->num_aces; i++) {
1927 struct security_ace *psa = &dacl->aces[i];
1930 * Create a canon_ace entry representing this NT DACL ACE.
1933 if ((current_ace = talloc(talloc_tos(), canon_ace)) == NULL) {
1934 free_canon_ace_list(file_ace);
1935 free_canon_ace_list(dir_ace);
1936 DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1937 return False;
1940 ZERO_STRUCTP(current_ace);
1942 sid_copy(&current_ace->trustee, &psa->trustee);
1945 * Try and work out if the SID is a user or group
1946 * as we need to flag these differently for POSIX.
1947 * Note what kind of a POSIX ACL this should map to.
1950 if( dom_sid_equal(&current_ace->trustee, &global_sid_World)) {
1951 current_ace->owner_type = WORLD_ACE;
1952 current_ace->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
1953 current_ace->unix_ug.id = -1;
1954 current_ace->type = SMB_ACL_OTHER;
1955 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1956 current_ace->owner_type = UID_ACE;
1957 current_ace->unix_ug.type = ID_TYPE_UID;
1958 current_ace->unix_ug.id = pst->st_ex_uid;
1959 current_ace->type = SMB_ACL_USER_OBJ;
1962 * The Creator Owner entry only specifies inheritable permissions,
1963 * never access permissions. WinNT doesn't always set the ACE to
1964 * INHERIT_ONLY, though.
1967 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1969 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1970 current_ace->owner_type = GID_ACE;
1971 current_ace->unix_ug.type = ID_TYPE_GID;
1972 current_ace->unix_ug.id = pst->st_ex_gid;
1973 current_ace->type = SMB_ACL_GROUP_OBJ;
1976 * The Creator Group entry only specifies inheritable permissions,
1977 * never access permissions. WinNT doesn't always set the ACE to
1978 * INHERIT_ONLY, though.
1980 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1982 } else {
1983 struct unixid unixid;
1985 if (!sids_to_unixids(&current_ace->trustee, 1, &unixid)) {
1986 free_canon_ace_list(file_ace);
1987 free_canon_ace_list(dir_ace);
1988 TALLOC_FREE(current_ace);
1989 DEBUG(0, ("create_canon_ace_lists: sids_to_unixids "
1990 "failed for %s (allocation failure)\n",
1991 sid_string_dbg(&current_ace->trustee)));
1992 return false;
1995 if (unixid.type == ID_TYPE_BOTH) {
1996 /* If it's the owning user, this is a
1997 * user_obj, not a user. This way, we
1998 * get a valid ACL for groups that own
1999 * files, without putting user ACL
2000 * entries in for groups otherwise */
2001 if (unixid.id == pst->st_ex_uid) {
2002 current_ace->owner_type = UID_ACE;
2003 current_ace->unix_ug.type = ID_TYPE_UID;
2004 current_ace->unix_ug.id = 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.type = ID_TYPE_GID;
2040 current_ace->unix_ug.id = unixid.id;
2041 current_ace->owner_type = GID_ACE;
2042 /* If it's the primary group, this is a
2043 group_obj, not a group. */
2044 if (current_ace->unix_ug.id == pst->st_ex_gid) {
2045 current_ace->type = SMB_ACL_GROUP_OBJ;
2046 } else {
2047 current_ace->type = SMB_ACL_GROUP;
2050 } else if (unixid.type == ID_TYPE_UID) {
2051 current_ace->owner_type = UID_ACE;
2052 current_ace->unix_ug.type = ID_TYPE_UID;
2053 current_ace->unix_ug.id = unixid.id;
2054 /* If it's the owning user, this is a user_obj,
2055 not a user. */
2056 if (current_ace->unix_ug.id == pst->st_ex_uid) {
2057 current_ace->type = SMB_ACL_USER_OBJ;
2058 } else {
2059 current_ace->type = SMB_ACL_USER;
2061 } else if (unixid.type == ID_TYPE_GID) {
2062 current_ace->unix_ug.type = ID_TYPE_GID;
2063 current_ace->unix_ug.id = unixid.id;
2064 current_ace->owner_type = GID_ACE;
2065 /* If it's the primary group, this is a
2066 group_obj, not a group. */
2067 if (current_ace->unix_ug.id == pst->st_ex_gid) {
2068 current_ace->type = SMB_ACL_GROUP_OBJ;
2069 } else {
2070 current_ace->type = SMB_ACL_GROUP;
2072 } else {
2074 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
2077 if (non_mappable_sid(&psa->trustee)) {
2078 DEBUG(10, ("create_canon_ace_lists: ignoring "
2079 "non-mappable SID %s\n",
2080 sid_string_dbg(&psa->trustee)));
2081 TALLOC_FREE(current_ace);
2082 continue;
2085 if (lp_force_unknown_acl_user(SNUM(fsp->conn))) {
2086 DEBUG(10, ("create_canon_ace_lists: ignoring "
2087 "unknown or foreign SID %s\n",
2088 sid_string_dbg(&psa->trustee)));
2089 TALLOC_FREE(current_ace);
2090 continue;
2093 free_canon_ace_list(file_ace);
2094 free_canon_ace_list(dir_ace);
2095 DEBUG(0, ("create_canon_ace_lists: unable to map SID "
2096 "%s to uid or gid.\n",
2097 sid_string_dbg(&current_ace->trustee)));
2098 TALLOC_FREE(current_ace);
2099 return false;
2103 /* handles the talloc_free of current_ace if not added for some reason */
2104 if (!add_current_ace_to_acl(fsp, psa, &file_ace, &dir_ace,
2105 &got_file_allow, &got_dir_allow,
2106 &all_aces_are_inherit_only, current_ace)) {
2107 free_canon_ace_list(file_ace);
2108 free_canon_ace_list(dir_ace);
2109 return false;
2113 if (fsp->is_directory && all_aces_are_inherit_only) {
2115 * Windows 2000 is doing one of these weird 'inherit acl'
2116 * traverses to conserve NTFS ACL resources. Just pretend
2117 * there was no DACL sent. JRA.
2120 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
2121 free_canon_ace_list(file_ace);
2122 free_canon_ace_list(dir_ace);
2123 file_ace = NULL;
2124 dir_ace = NULL;
2125 } else {
2127 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in
2128 * the file ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
2129 * entries can be converted to *_OBJ. Don't do this for the default
2130 * ACL, we will create them separately for this if needed inside
2131 * ensure_canon_entry_valid().
2133 if (file_ace) {
2134 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
2138 *ppfile_ace = file_ace;
2139 *ppdir_ace = dir_ace;
2141 return True;
2144 /****************************************************************************
2145 ASCII art time again... JRA :-).
2147 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
2148 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
2149 entries). Secondly, the merge code has ensured that all duplicate SID entries for
2150 allow or deny have been merged, so the same SID can only appear once in the deny
2151 list or once in the allow list.
2153 We then process as follows :
2155 ---------------------------------------------------------------------------
2156 First pass - look for a Everyone DENY entry.
2158 If it is deny all (rwx) trunate the list at this point.
2159 Else, walk the list from this point and use the deny permissions of this
2160 entry as a mask on all following allow entries. Finally, delete
2161 the Everyone DENY entry (we have applied it to everything possible).
2163 In addition, in this pass we remove any DENY entries that have
2164 no permissions (ie. they are a DENY nothing).
2165 ---------------------------------------------------------------------------
2166 Second pass - only deal with deny user entries.
2168 DENY user1 (perms XXX)
2170 new_perms = 0
2171 for all following allow group entries where user1 is in group
2172 new_perms |= group_perms;
2174 user1 entry perms = new_perms & ~ XXX;
2176 Convert the deny entry to an allow entry with the new perms and
2177 push to the end of the list. Note if the user was in no groups
2178 this maps to a specific allow nothing entry for this user.
2180 The common case from the NT ACL choser (userX deny all) is
2181 optimised so we don't do the group lookup - we just map to
2182 an allow nothing entry.
2184 What we're doing here is inferring the allow permissions the
2185 person setting the ACE on user1 wanted by looking at the allow
2186 permissions on the groups the user is currently in. This will
2187 be a snapshot, depending on group membership but is the best
2188 we can do and has the advantage of failing closed rather than
2189 open.
2190 ---------------------------------------------------------------------------
2191 Third pass - only deal with deny group entries.
2193 DENY group1 (perms XXX)
2195 for all following allow user entries where user is in group1
2196 user entry perms = user entry perms & ~ XXX;
2198 If there is a group Everyone allow entry with permissions YYY,
2199 convert the group1 entry to an allow entry and modify its
2200 permissions to be :
2202 new_perms = YYY & ~ XXX
2204 and push to the end of the list.
2206 If there is no group Everyone allow entry then convert the
2207 group1 entry to a allow nothing entry and push to the end of the list.
2209 Note that the common case from the NT ACL choser (groupX deny all)
2210 cannot be optimised here as we need to modify user entries who are
2211 in the group to change them to a deny all also.
2213 What we're doing here is modifying the allow permissions of
2214 user entries (which are more specific in POSIX ACLs) to mask
2215 out the explicit deny set on the group they are in. This will
2216 be a snapshot depending on current group membership but is the
2217 best we can do and has the advantage of failing closed rather
2218 than open.
2219 ---------------------------------------------------------------------------
2220 Fourth pass - cope with cumulative permissions.
2222 for all allow user entries, if there exists an allow group entry with
2223 more permissive permissions, and the user is in that group, rewrite the
2224 allow user permissions to contain both sets of permissions.
2226 Currently the code for this is #ifdef'ed out as these semantics make
2227 no sense to me. JRA.
2228 ---------------------------------------------------------------------------
2230 Note we *MUST* do the deny user pass first as this will convert deny user
2231 entries into allow user entries which can then be processed by the deny
2232 group pass.
2234 The above algorithm took a *lot* of thinking about - hence this
2235 explaination :-). JRA.
2236 ****************************************************************************/
2238 /****************************************************************************
2239 Process a canon_ace list entries. This is very complex code. We need
2240 to go through and remove the "deny" permissions from any allow entry that matches
2241 the id of this entry. We have already refused any NT ACL that wasn't in correct
2242 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
2243 we just remove it (to fail safe). We have already removed any duplicate ace
2244 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
2245 allow entries.
2246 ****************************************************************************/
2248 static void process_deny_list(connection_struct *conn, canon_ace **pp_ace_list )
2250 canon_ace *ace_list = *pp_ace_list;
2251 canon_ace *curr_ace = NULL;
2252 canon_ace *curr_ace_next = NULL;
2254 /* Pass 1 above - look for an Everyone, deny entry. */
2256 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2257 canon_ace *allow_ace_p;
2259 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2261 if (curr_ace->attr != DENY_ACE)
2262 continue;
2264 if (curr_ace->perms == (mode_t)0) {
2266 /* Deny nothing entry - delete. */
2268 DLIST_REMOVE(ace_list, curr_ace);
2269 continue;
2272 if (!dom_sid_equal(&curr_ace->trustee, &global_sid_World))
2273 continue;
2275 /* JRATEST - assert. */
2276 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
2278 if (curr_ace->perms == ALL_ACE_PERMS) {
2281 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
2282 * list at this point including this entry.
2285 canon_ace *prev_entry = DLIST_PREV(curr_ace);
2287 free_canon_ace_list( curr_ace );
2288 if (prev_entry)
2289 DLIST_REMOVE(ace_list, prev_entry);
2290 else {
2291 /* We deleted the entire list. */
2292 ace_list = NULL;
2294 break;
2297 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2300 * Only mask off allow entries.
2303 if (allow_ace_p->attr != ALLOW_ACE)
2304 continue;
2306 allow_ace_p->perms &= ~curr_ace->perms;
2310 * Now it's been applied, remove it.
2313 DLIST_REMOVE(ace_list, curr_ace);
2316 /* Pass 2 above - deal with deny user entries. */
2318 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2319 mode_t new_perms = (mode_t)0;
2320 canon_ace *allow_ace_p;
2322 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2324 if (curr_ace->attr != DENY_ACE)
2325 continue;
2327 if (curr_ace->owner_type != UID_ACE)
2328 continue;
2330 if (curr_ace->perms == ALL_ACE_PERMS) {
2333 * Optimisation - this is a deny everything to this user.
2334 * Convert to an allow nothing and push to the end of the list.
2337 curr_ace->attr = ALLOW_ACE;
2338 curr_ace->perms = (mode_t)0;
2339 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2340 continue;
2343 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2345 if (allow_ace_p->attr != ALLOW_ACE)
2346 continue;
2348 /* We process GID_ACE and WORLD_ACE entries only. */
2350 if (allow_ace_p->owner_type == UID_ACE)
2351 continue;
2353 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2354 new_perms |= allow_ace_p->perms;
2358 * Convert to a allow entry, modify the perms and push to the end
2359 * of the list.
2362 curr_ace->attr = ALLOW_ACE;
2363 curr_ace->perms = (new_perms & ~curr_ace->perms);
2364 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2367 /* Pass 3 above - deal with deny group entries. */
2369 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2370 canon_ace *allow_ace_p;
2371 canon_ace *allow_everyone_p = NULL;
2373 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2375 if (curr_ace->attr != DENY_ACE)
2376 continue;
2378 if (curr_ace->owner_type != GID_ACE)
2379 continue;
2381 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2383 if (allow_ace_p->attr != ALLOW_ACE)
2384 continue;
2386 /* Store a pointer to the Everyone allow, if it exists. */
2387 if (allow_ace_p->owner_type == WORLD_ACE)
2388 allow_everyone_p = allow_ace_p;
2390 /* We process UID_ACE entries only. */
2392 if (allow_ace_p->owner_type != UID_ACE)
2393 continue;
2395 /* Mask off the deny group perms. */
2397 if (uid_entry_in_group(conn, allow_ace_p, curr_ace))
2398 allow_ace_p->perms &= ~curr_ace->perms;
2402 * Convert the deny to an allow with the correct perms and
2403 * push to the end of the list.
2406 curr_ace->attr = ALLOW_ACE;
2407 if (allow_everyone_p)
2408 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
2409 else
2410 curr_ace->perms = (mode_t)0;
2411 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2414 /* Doing this fourth pass allows Windows semantics to be layered
2415 * on top of POSIX semantics. I'm not sure if this is desirable.
2416 * For example, in W2K ACLs there is no way to say, "Group X no
2417 * access, user Y full access" if user Y is a member of group X.
2418 * This seems completely broken semantics to me.... JRA.
2421 #if 0
2422 /* Pass 4 above - deal with allow entries. */
2424 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2425 canon_ace *allow_ace_p;
2427 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2429 if (curr_ace->attr != ALLOW_ACE)
2430 continue;
2432 if (curr_ace->owner_type != UID_ACE)
2433 continue;
2435 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2437 if (allow_ace_p->attr != ALLOW_ACE)
2438 continue;
2440 /* We process GID_ACE entries only. */
2442 if (allow_ace_p->owner_type != GID_ACE)
2443 continue;
2445 /* OR in the group perms. */
2447 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2448 curr_ace->perms |= allow_ace_p->perms;
2451 #endif
2453 *pp_ace_list = ace_list;
2456 /****************************************************************************
2457 Unpack a struct security_descriptor into two canonical ace lists. We don't depend on this
2458 succeeding.
2459 ****************************************************************************/
2461 static bool unpack_canon_ace(files_struct *fsp,
2462 const SMB_STRUCT_STAT *pst,
2463 struct dom_sid *pfile_owner_sid,
2464 struct dom_sid *pfile_grp_sid,
2465 canon_ace **ppfile_ace,
2466 canon_ace **ppdir_ace,
2467 uint32 security_info_sent,
2468 const struct security_descriptor *psd)
2470 canon_ace *file_ace = NULL;
2471 canon_ace *dir_ace = NULL;
2473 *ppfile_ace = NULL;
2474 *ppdir_ace = NULL;
2476 if(security_info_sent == 0) {
2477 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2478 return False;
2482 * If no DACL then this is a chown only security descriptor.
2485 if(!(security_info_sent & SECINFO_DACL) || !psd->dacl)
2486 return True;
2489 * Now go through the DACL and create the canon_ace lists.
2492 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2493 &file_ace, &dir_ace, psd->dacl))
2494 return False;
2496 if ((file_ace == NULL) && (dir_ace == NULL)) {
2497 /* W2K traverse DACL set - ignore. */
2498 return True;
2502 * Go through the canon_ace list and merge entries
2503 * belonging to identical users of identical allow or deny type.
2504 * We can do this as all deny entries come first, followed by
2505 * all allow entries (we have mandated this before accepting this acl).
2508 print_canon_ace_list( "file ace - before merge", file_ace);
2509 merge_aces( &file_ace, false);
2511 print_canon_ace_list( "dir ace - before merge", dir_ace);
2512 merge_aces( &dir_ace, true);
2515 * NT ACLs are order dependent. Go through the acl lists and
2516 * process DENY entries by masking the allow entries.
2519 print_canon_ace_list( "file ace - before deny", file_ace);
2520 process_deny_list(fsp->conn, &file_ace);
2522 print_canon_ace_list( "dir ace - before deny", dir_ace);
2523 process_deny_list(fsp->conn, &dir_ace);
2526 * A well formed POSIX file or default ACL has at least 3 entries, a
2527 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2528 * and optionally a mask entry. Ensure this is the case.
2531 print_canon_ace_list( "file ace - before valid", file_ace);
2533 if (!ensure_canon_entry_valid(fsp->conn, &file_ace, fsp->conn->params,
2534 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2535 free_canon_ace_list(file_ace);
2536 free_canon_ace_list(dir_ace);
2537 return False;
2540 print_canon_ace_list( "dir ace - before valid", dir_ace);
2542 if (dir_ace && !ensure_canon_entry_valid(fsp->conn, &dir_ace, fsp->conn->params,
2543 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2544 free_canon_ace_list(file_ace);
2545 free_canon_ace_list(dir_ace);
2546 return False;
2549 print_canon_ace_list( "file ace - return", file_ace);
2550 print_canon_ace_list( "dir ace - return", dir_ace);
2552 *ppfile_ace = file_ace;
2553 *ppdir_ace = dir_ace;
2554 return True;
2558 /******************************************************************************
2559 When returning permissions, try and fit NT display
2560 semantics if possible. Note the the canon_entries here must have been malloced.
2561 The list format should be - first entry = owner, followed by group and other user
2562 entries, last entry = other.
2564 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2565 are not ordered, and match on the most specific entry rather than walking a list,
2566 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2568 Entry 0: owner : deny all except read and write.
2569 Entry 1: owner : allow read and write.
2570 Entry 2: group : deny all except read.
2571 Entry 3: group : allow read.
2572 Entry 4: Everyone : allow read.
2574 But NT cannot display this in their ACL editor !
2575 ********************************************************************************/
2577 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2579 canon_ace *l_head = *pp_list_head;
2580 canon_ace *owner_ace = NULL;
2581 canon_ace *other_ace = NULL;
2582 canon_ace *ace = NULL;
2584 for (ace = l_head; ace; ace = ace->next) {
2585 if (ace->type == SMB_ACL_USER_OBJ)
2586 owner_ace = ace;
2587 else if (ace->type == SMB_ACL_OTHER) {
2588 /* Last ace - this is "other" */
2589 other_ace = ace;
2593 if (!owner_ace || !other_ace) {
2594 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2595 filename ));
2596 return;
2600 * The POSIX algorithm applies to owner first, and other last,
2601 * so ensure they are arranged in this order.
2604 if (owner_ace) {
2605 DLIST_PROMOTE(l_head, owner_ace);
2608 if (other_ace) {
2609 DLIST_DEMOTE(l_head, other_ace, canon_ace *);
2612 /* We have probably changed the head of the list. */
2614 *pp_list_head = l_head;
2617 /****************************************************************************
2618 Create a linked list of canonical ACE entries.
2619 ****************************************************************************/
2621 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2622 const char *fname, SMB_ACL_T posix_acl,
2623 const SMB_STRUCT_STAT *psbuf,
2624 const struct dom_sid *powner, const struct dom_sid *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2626 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2627 canon_ace *l_head = NULL;
2628 canon_ace *ace = NULL;
2629 canon_ace *next_ace = NULL;
2630 int entry_id = SMB_ACL_FIRST_ENTRY;
2631 SMB_ACL_ENTRY_T entry;
2632 size_t ace_count;
2634 while ( posix_acl && (sys_acl_get_entry(posix_acl, entry_id, &entry) == 1)) {
2635 SMB_ACL_TAG_T tagtype;
2636 SMB_ACL_PERMSET_T permset;
2637 struct dom_sid sid;
2638 struct unixid unix_ug;
2639 enum ace_owner owner_type;
2641 entry_id = SMB_ACL_NEXT_ENTRY;
2643 /* Is this a MASK entry ? */
2644 if (sys_acl_get_tag_type(entry, &tagtype) == -1)
2645 continue;
2647 if (sys_acl_get_permset(entry, &permset) == -1)
2648 continue;
2650 /* Decide which SID to use based on the ACL type. */
2651 switch(tagtype) {
2652 case SMB_ACL_USER_OBJ:
2653 /* Get the SID from the owner. */
2654 sid_copy(&sid, powner);
2655 unix_ug.type = ID_TYPE_UID;
2656 unix_ug.id = psbuf->st_ex_uid;
2657 owner_type = UID_ACE;
2658 break;
2659 case SMB_ACL_USER:
2661 uid_t *puid = (uid_t *)sys_acl_get_qualifier(entry);
2662 if (puid == NULL) {
2663 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2664 continue;
2666 uid_to_sid( &sid, *puid);
2667 unix_ug.type = ID_TYPE_UID;
2668 unix_ug.id = *puid;
2669 owner_type = UID_ACE;
2670 break;
2672 case SMB_ACL_GROUP_OBJ:
2673 /* Get the SID from the owning group. */
2674 sid_copy(&sid, pgroup);
2675 unix_ug.type = ID_TYPE_GID;
2676 unix_ug.id = psbuf->st_ex_gid;
2677 owner_type = GID_ACE;
2678 break;
2679 case SMB_ACL_GROUP:
2681 gid_t *pgid = (gid_t *)sys_acl_get_qualifier(entry);
2682 if (pgid == NULL) {
2683 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2684 continue;
2686 gid_to_sid( &sid, *pgid);
2687 unix_ug.type = ID_TYPE_GID;
2688 unix_ug.id = *pgid;
2689 owner_type = GID_ACE;
2690 break;
2692 case SMB_ACL_MASK:
2693 acl_mask = convert_permset_to_mode_t(permset);
2694 continue; /* Don't count the mask as an entry. */
2695 case SMB_ACL_OTHER:
2696 /* Use the Everyone SID */
2697 sid = global_sid_World;
2698 unix_ug.type = ID_TYPE_NOT_SPECIFIED;
2699 unix_ug.id = -1;
2700 owner_type = WORLD_ACE;
2701 break;
2702 default:
2703 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2704 continue;
2708 * Add this entry to the list.
2711 if ((ace = talloc(talloc_tos(), canon_ace)) == NULL)
2712 goto fail;
2714 ZERO_STRUCTP(ace);
2715 ace->type = tagtype;
2716 ace->perms = convert_permset_to_mode_t(permset);
2717 ace->attr = ALLOW_ACE;
2718 ace->trustee = sid;
2719 ace->unix_ug = unix_ug;
2720 ace->owner_type = owner_type;
2721 ace->ace_flags = get_pai_flags(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2723 DLIST_ADD(l_head, ace);
2727 * This next call will ensure we have at least a user/group/world set.
2730 if (!ensure_canon_entry_valid(conn, &l_head, conn->params,
2731 S_ISDIR(psbuf->st_ex_mode), powner, pgroup,
2732 psbuf, False))
2733 goto fail;
2736 * Now go through the list, masking the permissions with the
2737 * acl_mask. Ensure all DENY Entries are at the start of the list.
2740 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2742 for ( ace_count = 0, ace = l_head; ace; ace = next_ace, ace_count++) {
2743 next_ace = ace->next;
2745 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2746 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2747 ace->perms &= acl_mask;
2749 if (ace->perms == 0) {
2750 DLIST_PROMOTE(l_head, ace);
2753 if( DEBUGLVL( 10 ) ) {
2754 print_canon_ace(ace, ace_count);
2758 arrange_posix_perms(fname,&l_head );
2760 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", l_head );
2762 return l_head;
2764 fail:
2766 free_canon_ace_list(l_head);
2767 return NULL;
2770 /****************************************************************************
2771 Check if the current user group list contains a given group.
2772 ****************************************************************************/
2774 bool current_user_in_group(connection_struct *conn, gid_t gid)
2776 int i;
2777 const struct security_unix_token *utok = get_current_utok(conn);
2779 for (i = 0; i < utok->ngroups; i++) {
2780 if (utok->groups[i] == gid) {
2781 return True;
2785 return False;
2788 /****************************************************************************
2789 Should we override a deny ? Check 'acl group control' and 'dos filemode'.
2790 ****************************************************************************/
2792 static bool acl_group_override(connection_struct *conn,
2793 const struct smb_filename *smb_fname)
2795 if ((errno != EPERM) && (errno != EACCES)) {
2796 return false;
2799 /* file primary group == user primary or supplementary group */
2800 if (lp_acl_group_control(SNUM(conn)) &&
2801 current_user_in_group(conn, smb_fname->st.st_ex_gid)) {
2802 return true;
2805 /* user has writeable permission */
2806 if (lp_dos_filemode(SNUM(conn)) &&
2807 can_write_to_file(conn, smb_fname)) {
2808 return true;
2811 return false;
2814 /****************************************************************************
2815 Attempt to apply an ACL to a file or directory.
2816 ****************************************************************************/
2818 static bool set_canon_ace_list(files_struct *fsp,
2819 canon_ace *the_ace,
2820 bool default_ace,
2821 const SMB_STRUCT_STAT *psbuf,
2822 bool *pacl_set_support)
2824 connection_struct *conn = fsp->conn;
2825 bool ret = False;
2826 SMB_ACL_T the_acl = sys_acl_init(count_canon_ace_list(the_ace) + 1);
2827 canon_ace *p_ace;
2828 int i;
2829 SMB_ACL_ENTRY_T mask_entry;
2830 bool got_mask_entry = False;
2831 SMB_ACL_PERMSET_T mask_permset;
2832 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2833 bool needs_mask = False;
2834 mode_t mask_perms = 0;
2836 /* Use the psbuf that was passed in. */
2837 if (psbuf != &fsp->fsp_name->st) {
2838 fsp->fsp_name->st = *psbuf;
2841 #if defined(POSIX_ACL_NEEDS_MASK)
2842 /* HP-UX always wants to have a mask (called "class" there). */
2843 needs_mask = True;
2844 #endif
2846 if (the_acl == NULL) {
2847 DEBUG(0, ("sys_acl_init failed to allocate an ACL\n"));
2848 return false;
2851 if( DEBUGLVL( 10 )) {
2852 dbgtext("set_canon_ace_list: setting ACL:\n");
2853 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2854 print_canon_ace( p_ace, i);
2858 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2859 SMB_ACL_ENTRY_T the_entry;
2860 SMB_ACL_PERMSET_T the_permset;
2863 * ACLs only "need" an ACL_MASK entry if there are any named user or
2864 * named group entries. But if there is an ACL_MASK entry, it applies
2865 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2866 * so that it doesn't deny (i.e., mask off) any permissions.
2869 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2870 needs_mask = True;
2871 mask_perms |= p_ace->perms;
2872 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2873 mask_perms |= p_ace->perms;
2877 * Get the entry for this ACE.
2880 if (sys_acl_create_entry(&the_acl, &the_entry) == -1) {
2881 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2882 i, strerror(errno) ));
2883 goto fail;
2886 if (p_ace->type == SMB_ACL_MASK) {
2887 mask_entry = the_entry;
2888 got_mask_entry = True;
2892 * Ok - we now know the ACL calls should be working, don't
2893 * allow fallback to chmod.
2896 *pacl_set_support = True;
2899 * Initialise the entry from the canon_ace.
2903 * First tell the entry what type of ACE this is.
2906 if (sys_acl_set_tag_type(the_entry, p_ace->type) == -1) {
2907 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2908 i, strerror(errno) ));
2909 goto fail;
2913 * Only set the qualifier (user or group id) if the entry is a user
2914 * or group id ACE.
2917 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2918 if (sys_acl_set_qualifier(the_entry,(void *)&p_ace->unix_ug.id) == -1) {
2919 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2920 i, strerror(errno) ));
2921 goto fail;
2926 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2929 if (sys_acl_get_permset(the_entry, &the_permset) == -1) {
2930 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2931 i, strerror(errno) ));
2932 goto fail;
2935 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2936 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2937 (unsigned int)p_ace->perms, i, strerror(errno) ));
2938 goto fail;
2942 * ..and apply them to the entry.
2945 if (sys_acl_set_permset(the_entry, the_permset) == -1) {
2946 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2947 i, strerror(errno) ));
2948 goto fail;
2951 if( DEBUGLVL( 10 ))
2952 print_canon_ace( p_ace, i);
2956 if (needs_mask && !got_mask_entry) {
2957 if (sys_acl_create_entry(&the_acl, &mask_entry) == -1) {
2958 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2959 goto fail;
2962 if (sys_acl_set_tag_type(mask_entry, SMB_ACL_MASK) == -1) {
2963 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2964 goto fail;
2967 if (sys_acl_get_permset(mask_entry, &mask_permset) == -1) {
2968 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2969 goto fail;
2972 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2973 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2974 goto fail;
2977 if (sys_acl_set_permset(mask_entry, mask_permset) == -1) {
2978 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2979 goto fail;
2984 * Finally apply it to the file or directory.
2987 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2988 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name->base_name,
2989 the_acl_type, the_acl) == -1) {
2991 * Some systems allow all the above calls and only fail with no ACL support
2992 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2994 if (no_acl_syscall_error(errno)) {
2995 *pacl_set_support = False;
2998 if (acl_group_override(conn, fsp->fsp_name)) {
2999 int sret;
3001 DEBUG(5,("set_canon_ace_list: acl group "
3002 "control on and current user in file "
3003 "%s primary group.\n",
3004 fsp_str_dbg(fsp)));
3006 become_root();
3007 sret = SMB_VFS_SYS_ACL_SET_FILE(conn,
3008 fsp->fsp_name->base_name, the_acl_type,
3009 the_acl);
3010 unbecome_root();
3011 if (sret == 0) {
3012 ret = True;
3016 if (ret == False) {
3017 DEBUG(2,("set_canon_ace_list: "
3018 "sys_acl_set_file type %s failed for "
3019 "file %s (%s).\n",
3020 the_acl_type == SMB_ACL_TYPE_DEFAULT ?
3021 "directory default" : "file",
3022 fsp_str_dbg(fsp), strerror(errno)));
3023 goto fail;
3026 } else {
3027 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
3029 * Some systems allow all the above calls and only fail with no ACL support
3030 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
3032 if (no_acl_syscall_error(errno)) {
3033 *pacl_set_support = False;
3036 if (acl_group_override(conn, fsp->fsp_name)) {
3037 int sret;
3039 DEBUG(5,("set_canon_ace_list: acl group "
3040 "control on and current user in file "
3041 "%s primary group.\n",
3042 fsp_str_dbg(fsp)));
3044 become_root();
3045 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
3046 unbecome_root();
3047 if (sret == 0) {
3048 ret = True;
3052 if (ret == False) {
3053 DEBUG(2,("set_canon_ace_list: "
3054 "sys_acl_set_file failed for file %s "
3055 "(%s).\n",
3056 fsp_str_dbg(fsp), strerror(errno)));
3057 goto fail;
3062 ret = True;
3064 fail:
3066 if (the_acl != NULL) {
3067 TALLOC_FREE(the_acl);
3070 return ret;
3073 /****************************************************************************
3074 Find a particular canon_ace entry.
3075 ****************************************************************************/
3077 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, struct unixid *id)
3079 while (list) {
3080 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
3081 (type == SMB_ACL_USER && id && id->id == list->unix_ug.id) ||
3082 (type == SMB_ACL_GROUP && id && id->id == list->unix_ug.id)))
3083 break;
3084 list = list->next;
3086 return list;
3089 /****************************************************************************
3091 ****************************************************************************/
3093 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
3095 SMB_ACL_ENTRY_T entry;
3097 if (!the_acl)
3098 return NULL;
3099 if (sys_acl_get_entry(the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
3100 TALLOC_FREE(the_acl);
3101 return NULL;
3103 return the_acl;
3106 /****************************************************************************
3107 Convert a canon_ace to a generic 3 element permission - if possible.
3108 ****************************************************************************/
3110 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
3112 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
3114 int snum = SNUM(fsp->conn);
3115 size_t ace_count = count_canon_ace_list(file_ace_list);
3116 canon_ace *ace_p;
3117 canon_ace *owner_ace = NULL;
3118 canon_ace *group_ace = NULL;
3119 canon_ace *other_ace = NULL;
3120 mode_t and_bits;
3121 mode_t or_bits;
3123 if (ace_count != 3) {
3124 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE "
3125 "entries for file %s to convert to posix perms.\n",
3126 fsp_str_dbg(fsp)));
3127 return False;
3130 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
3131 if (ace_p->owner_type == UID_ACE)
3132 owner_ace = ace_p;
3133 else if (ace_p->owner_type == GID_ACE)
3134 group_ace = ace_p;
3135 else if (ace_p->owner_type == WORLD_ACE)
3136 other_ace = ace_p;
3139 if (!owner_ace || !group_ace || !other_ace) {
3140 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get "
3141 "standard entries for file %s.\n", fsp_str_dbg(fsp)));
3142 return False;
3145 *posix_perms = (mode_t)0;
3147 *posix_perms |= owner_ace->perms;
3148 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
3149 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
3150 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
3151 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
3152 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
3153 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
3155 /* The owner must have at least read access. */
3157 *posix_perms |= S_IRUSR;
3158 if (fsp->is_directory)
3159 *posix_perms |= (S_IWUSR|S_IXUSR);
3161 /* If requested apply the masks. */
3163 /* Get the initial bits to apply. */
3165 if (fsp->is_directory) {
3166 and_bits = lp_dir_security_mask(snum);
3167 or_bits = lp_force_dir_security_mode(snum);
3168 } else {
3169 and_bits = lp_security_mask(snum);
3170 or_bits = lp_force_security_mode(snum);
3173 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
3175 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o "
3176 "to perm=0%o for file %s.\n", (int)owner_ace->perms,
3177 (int)group_ace->perms, (int)other_ace->perms,
3178 (int)*posix_perms, fsp_str_dbg(fsp)));
3180 return True;
3183 /****************************************************************************
3184 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
3185 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
3186 with CI|OI set so it is inherited and also applies to the directory.
3187 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
3188 ****************************************************************************/
3190 static size_t merge_default_aces( struct security_ace *nt_ace_list, size_t num_aces)
3192 size_t i, j;
3194 for (i = 0; i < num_aces; i++) {
3195 for (j = i+1; j < num_aces; j++) {
3196 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3197 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3198 bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3199 bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3201 /* We know the lower number ACE's are file entries. */
3202 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
3203 (nt_ace_list[i].size == nt_ace_list[j].size) &&
3204 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
3205 dom_sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
3206 (i_inh == j_inh) &&
3207 (i_flags_ni == 0) &&
3208 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
3209 SEC_ACE_FLAG_CONTAINER_INHERIT|
3210 SEC_ACE_FLAG_INHERIT_ONLY))) {
3212 * W2K wants to have access allowed zero access ACE's
3213 * at the end of the list. If the mask is zero, merge
3214 * the non-inherited ACE onto the inherited ACE.
3217 if (nt_ace_list[i].access_mask == 0) {
3218 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3219 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3220 if (num_aces - i - 1 > 0)
3221 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
3222 sizeof(struct security_ace));
3224 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
3225 (unsigned int)i, (unsigned int)j ));
3226 } else {
3228 * These are identical except for the flags.
3229 * Merge the inherited ACE onto the non-inherited ACE.
3232 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3233 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3234 if (num_aces - j - 1 > 0)
3235 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
3236 sizeof(struct security_ace));
3238 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
3239 (unsigned int)j, (unsigned int)i ));
3241 num_aces--;
3242 break;
3247 return num_aces;
3251 * Add or Replace ACE entry.
3252 * In some cases we need to add a specific ACE for compatibility reasons.
3253 * When doing that we must make sure we are not actually creating a duplicate
3254 * entry. So we need to search whether an ACE entry already exist and eventually
3255 * replacce the access mask, or add a completely new entry if none was found.
3257 * This function assumes the array has enough space to add a new entry without
3258 * any reallocation of memory.
3261 static void add_or_replace_ace(struct security_ace *nt_ace_list, size_t *num_aces,
3262 const struct dom_sid *sid, enum security_ace_type type,
3263 uint32_t mask, uint8_t flags)
3265 int i;
3267 /* first search for a duplicate */
3268 for (i = 0; i < *num_aces; i++) {
3269 if (dom_sid_equal(&nt_ace_list[i].trustee, sid) &&
3270 (nt_ace_list[i].flags == flags)) break;
3273 if (i < *num_aces) { /* found */
3274 nt_ace_list[i].type = type;
3275 nt_ace_list[i].access_mask = mask;
3276 DEBUG(10, ("Replacing ACE %d with SID %s and flags %02x\n",
3277 i, sid_string_dbg(sid), flags));
3278 return;
3281 /* not found, append it */
3282 init_sec_ace(&nt_ace_list[(*num_aces)++], sid, type, mask, flags);
3286 /****************************************************************************
3287 Reply to query a security descriptor from an fsp. If it succeeds it allocates
3288 the space for the return elements and returns the size needed to return the
3289 security descriptor. This should be the only external function needed for
3290 the UNIX style get ACL.
3291 ****************************************************************************/
3293 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
3294 const char *name,
3295 const SMB_STRUCT_STAT *sbuf,
3296 struct pai_val *pal,
3297 SMB_ACL_T posix_acl,
3298 SMB_ACL_T def_acl,
3299 uint32_t security_info,
3300 struct security_descriptor **ppdesc)
3302 struct dom_sid owner_sid;
3303 struct dom_sid group_sid;
3304 size_t sd_size = 0;
3305 struct security_acl *psa = NULL;
3306 size_t num_acls = 0;
3307 size_t num_def_acls = 0;
3308 size_t num_aces = 0;
3309 canon_ace *file_ace = NULL;
3310 canon_ace *dir_ace = NULL;
3311 struct security_ace *nt_ace_list = NULL;
3312 size_t num_profile_acls = 0;
3313 struct dom_sid orig_owner_sid;
3314 struct security_descriptor *psd = NULL;
3315 int i;
3318 * Get the owner, group and world SIDs.
3321 create_file_sids(sbuf, &owner_sid, &group_sid);
3323 if (lp_profile_acls(SNUM(conn))) {
3324 /* For WXP SP1 the owner must be administrators. */
3325 sid_copy(&orig_owner_sid, &owner_sid);
3326 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
3327 sid_copy(&group_sid, &global_sid_Builtin_Users);
3328 num_profile_acls = 3;
3331 if ((security_info & SECINFO_DACL) && !(security_info & SECINFO_PROTECTED_DACL)) {
3334 * In the optimum case Creator Owner and Creator Group would be used for
3335 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
3336 * would lead to usability problems under Windows: The Creator entries
3337 * are only available in browse lists of directories and not for files;
3338 * additionally the identity of the owning group couldn't be determined.
3339 * We therefore use those identities only for Default ACLs.
3342 /* Create the canon_ace lists. */
3343 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
3344 &owner_sid, &group_sid, pal,
3345 SMB_ACL_TYPE_ACCESS);
3347 /* We must have *some* ACLS. */
3349 if (count_canon_ace_list(file_ace) == 0) {
3350 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
3351 goto done;
3354 if (S_ISDIR(sbuf->st_ex_mode) && def_acl) {
3355 dir_ace = canonicalise_acl(conn, name, def_acl,
3356 sbuf,
3357 &global_sid_Creator_Owner,
3358 &global_sid_Creator_Group,
3359 pal, SMB_ACL_TYPE_DEFAULT);
3363 * Create the NT ACE list from the canonical ace lists.
3367 canon_ace *ace;
3368 enum security_ace_type nt_acl_type;
3370 if (nt4_compatible_acls() && dir_ace) {
3372 * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
3373 * but no non-INHERIT_ONLY entry for one SID. So we only
3374 * remove entries from the Access ACL if the
3375 * corresponding Default ACL entries have also been
3376 * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
3377 * are exceptions. We can do nothing
3378 * intelligent if the Default ACL contains entries that
3379 * are not also contained in the Access ACL, so this
3380 * case will still fail under NT 4.
3383 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
3384 if (ace && !ace->perms) {
3385 DLIST_REMOVE(dir_ace, ace);
3386 TALLOC_FREE(ace);
3388 ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
3389 if (ace && !ace->perms) {
3390 DLIST_REMOVE(file_ace, ace);
3391 TALLOC_FREE(ace);
3396 * WinNT doesn't usually have Creator Group
3397 * in browse lists, so we send this entry to
3398 * WinNT even if it contains no relevant
3399 * permissions. Once we can add
3400 * Creator Group to browse lists we can
3401 * re-enable this.
3404 #if 0
3405 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
3406 if (ace && !ace->perms) {
3407 DLIST_REMOVE(dir_ace, ace);
3408 TALLOC_FREE(ace);
3410 #endif
3412 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
3413 if (ace && !ace->perms) {
3414 DLIST_REMOVE(file_ace, ace);
3415 TALLOC_FREE(ace);
3419 num_acls = count_canon_ace_list(file_ace);
3420 num_def_acls = count_canon_ace_list(dir_ace);
3422 /* Allocate the ace list. */
3423 if ((nt_ace_list = talloc_array(talloc_tos(), struct security_ace,num_acls + num_profile_acls + num_def_acls)) == NULL) {
3424 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
3425 goto done;
3428 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(struct security_ace) );
3431 * Create the NT ACE list from the canonical ace lists.
3434 for (ace = file_ace; ace != NULL; ace = ace->next) {
3435 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3436 &nt_acl_type,
3437 ace->perms,
3438 S_ISDIR(sbuf->st_ex_mode));
3439 init_sec_ace(&nt_ace_list[num_aces++],
3440 &ace->trustee,
3441 nt_acl_type,
3442 acc,
3443 ace->ace_flags);
3446 /* The User must have access to a profile share - even
3447 * if we can't map the SID. */
3448 if (lp_profile_acls(SNUM(conn))) {
3449 add_or_replace_ace(nt_ace_list, &num_aces,
3450 &global_sid_Builtin_Users,
3451 SEC_ACE_TYPE_ACCESS_ALLOWED,
3452 FILE_GENERIC_ALL, 0);
3455 for (ace = dir_ace; ace != NULL; ace = ace->next) {
3456 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3457 &nt_acl_type,
3458 ace->perms,
3459 S_ISDIR(sbuf->st_ex_mode));
3460 init_sec_ace(&nt_ace_list[num_aces++],
3461 &ace->trustee,
3462 nt_acl_type,
3463 acc,
3464 ace->ace_flags |
3465 SEC_ACE_FLAG_OBJECT_INHERIT|
3466 SEC_ACE_FLAG_CONTAINER_INHERIT|
3467 SEC_ACE_FLAG_INHERIT_ONLY);
3470 /* The User must have access to a profile share - even
3471 * if we can't map the SID. */
3472 if (lp_profile_acls(SNUM(conn))) {
3473 add_or_replace_ace(nt_ace_list, &num_aces,
3474 &global_sid_Builtin_Users,
3475 SEC_ACE_TYPE_ACCESS_ALLOWED,
3476 FILE_GENERIC_ALL,
3477 SEC_ACE_FLAG_OBJECT_INHERIT |
3478 SEC_ACE_FLAG_CONTAINER_INHERIT |
3479 SEC_ACE_FLAG_INHERIT_ONLY);
3483 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3484 * Win2K needs this to get the inheritance correct when replacing ACLs
3485 * on a directory tree. Based on work by Jim @ IBM.
3488 num_aces = merge_default_aces(nt_ace_list, num_aces);
3490 if (lp_profile_acls(SNUM(conn))) {
3491 for (i = 0; i < num_aces; i++) {
3492 if (dom_sid_equal(&nt_ace_list[i].trustee, &owner_sid)) {
3493 add_or_replace_ace(nt_ace_list, &num_aces,
3494 &orig_owner_sid,
3495 nt_ace_list[i].type,
3496 nt_ace_list[i].access_mask,
3497 nt_ace_list[i].flags);
3498 break;
3504 if (num_aces) {
3505 if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3506 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3507 goto done;
3510 } /* security_info & SECINFO_DACL */
3512 psd = make_standard_sec_desc( talloc_tos(),
3513 (security_info & SECINFO_OWNER) ? &owner_sid : NULL,
3514 (security_info & SECINFO_GROUP) ? &group_sid : NULL,
3515 psa,
3516 &sd_size);
3518 if(!psd) {
3519 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3520 sd_size = 0;
3521 goto done;
3525 * Windows 2000: The DACL_PROTECTED flag in the security
3526 * descriptor marks the ACL as non-inheriting, i.e., no
3527 * ACEs from higher level directories propagate to this
3528 * ACL. In the POSIX ACL model permissions are only
3529 * inherited at file create time, so ACLs never contain
3530 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3531 * flag doesn't seem to bother Windows NT.
3532 * Always set this if map acl inherit is turned off.
3534 if (pal == NULL || !lp_map_acl_inherit(SNUM(conn))) {
3535 psd->type |= SEC_DESC_DACL_PROTECTED;
3536 } else {
3537 psd->type |= pal->sd_type;
3540 if (psd->dacl) {
3541 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3544 *ppdesc = psd;
3546 done:
3548 if (posix_acl) {
3549 TALLOC_FREE(posix_acl);
3551 if (def_acl) {
3552 TALLOC_FREE(def_acl);
3554 free_canon_ace_list(file_ace);
3555 free_canon_ace_list(dir_ace);
3556 free_inherited_info(pal);
3557 TALLOC_FREE(nt_ace_list);
3559 return NT_STATUS_OK;
3562 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3563 struct security_descriptor **ppdesc)
3565 SMB_STRUCT_STAT sbuf;
3566 SMB_ACL_T posix_acl = NULL;
3567 struct pai_val *pal;
3569 *ppdesc = NULL;
3571 DEBUG(10,("posix_fget_nt_acl: called for file %s\n",
3572 fsp_str_dbg(fsp)));
3574 /* can it happen that fsp_name == NULL ? */
3575 if (fsp->is_directory || fsp->fh->fd == -1) {
3576 return posix_get_nt_acl(fsp->conn, fsp->fsp_name->base_name,
3577 security_info, ppdesc);
3580 /* Get the stat struct for the owner info. */
3581 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3582 return map_nt_error_from_unix(errno);
3585 /* Get the ACL from the fd. */
3586 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
3588 pal = fload_inherited_info(fsp);
3590 return posix_get_nt_acl_common(fsp->conn, fsp->fsp_name->base_name,
3591 &sbuf, pal, posix_acl, NULL,
3592 security_info, ppdesc);
3595 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3596 uint32_t security_info, struct security_descriptor **ppdesc)
3598 SMB_ACL_T posix_acl = NULL;
3599 SMB_ACL_T def_acl = NULL;
3600 struct pai_val *pal;
3601 struct smb_filename smb_fname;
3602 int ret;
3604 *ppdesc = NULL;
3606 DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3608 ZERO_STRUCT(smb_fname);
3609 smb_fname.base_name = discard_const_p(char, name);
3611 /* Get the stat struct for the owner info. */
3612 if (lp_posix_pathnames()) {
3613 ret = SMB_VFS_LSTAT(conn, &smb_fname);
3614 } else {
3615 ret = SMB_VFS_STAT(conn, &smb_fname);
3618 if (ret == -1) {
3619 return map_nt_error_from_unix(errno);
3622 /* Get the ACL from the path. */
3623 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_ACCESS);
3625 /* If it's a directory get the default POSIX ACL. */
3626 if(S_ISDIR(smb_fname.st.st_ex_mode)) {
3627 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_DEFAULT);
3628 def_acl = free_empty_sys_acl(conn, def_acl);
3631 pal = load_inherited_info(conn, name);
3633 return posix_get_nt_acl_common(conn, name, &smb_fname.st, pal,
3634 posix_acl, def_acl, security_info,
3635 ppdesc);
3638 /****************************************************************************
3639 Try to chown a file. We will be able to chown it under the following conditions.
3641 1) If we have root privileges, then it will just work.
3642 2) If we have SeRestorePrivilege we can change the user + group to any other user.
3643 3) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3644 4) If we have write permission to the file and dos_filemodes is set
3645 then allow chown to the currently authenticated user.
3646 ****************************************************************************/
3648 NTSTATUS try_chown(files_struct *fsp, uid_t uid, gid_t gid)
3650 NTSTATUS status;
3652 if(!CAN_WRITE(fsp->conn)) {
3653 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3656 /* Case (1). */
3657 status = vfs_chown_fsp(fsp, uid, gid);
3658 if (NT_STATUS_IS_OK(status)) {
3659 return status;
3662 /* Case (2) / (3) */
3663 if (lp_enable_privileges()) {
3664 bool has_take_ownership_priv = security_token_has_privilege(
3665 get_current_nttok(fsp->conn),
3666 SEC_PRIV_TAKE_OWNERSHIP);
3667 bool has_restore_priv = security_token_has_privilege(
3668 get_current_nttok(fsp->conn),
3669 SEC_PRIV_RESTORE);
3671 if (has_restore_priv) {
3672 ; /* Case (2) */
3673 } else if (has_take_ownership_priv) {
3674 /* Case (3) */
3675 if (uid == get_current_uid(fsp->conn)) {
3676 gid = (gid_t)-1;
3677 } else {
3678 has_take_ownership_priv = false;
3682 if (has_take_ownership_priv || has_restore_priv) {
3683 become_root();
3684 status = vfs_chown_fsp(fsp, uid, gid);
3685 unbecome_root();
3686 return status;
3690 /* Case (4). */
3691 if (!lp_dos_filemode(SNUM(fsp->conn))) {
3692 return NT_STATUS_ACCESS_DENIED;
3695 /* only allow chown to the current user. This is more secure,
3696 and also copes with the case where the SID in a take ownership ACL is
3697 a local SID on the users workstation
3699 if (uid != get_current_uid(fsp->conn)) {
3700 return NT_STATUS_ACCESS_DENIED;
3703 become_root();
3704 /* Keep the current file gid the same. */
3705 status = vfs_chown_fsp(fsp, uid, (gid_t)-1);
3706 unbecome_root();
3708 return status;
3711 #if 0
3712 /* Disable this - prevents ACL inheritance from the ACL editor. JRA. */
3714 /****************************************************************************
3715 Take care of parent ACL inheritance.
3716 ****************************************************************************/
3718 NTSTATUS append_parent_acl(files_struct *fsp,
3719 const struct security_descriptor *pcsd,
3720 struct security_descriptor **pp_new_sd)
3722 struct smb_filename *smb_dname = NULL;
3723 struct security_descriptor *parent_sd = NULL;
3724 files_struct *parent_fsp = NULL;
3725 TALLOC_CTX *mem_ctx = talloc_tos();
3726 char *parent_name = NULL;
3727 struct security_ace *new_ace = NULL;
3728 unsigned int num_aces = pcsd->dacl->num_aces;
3729 NTSTATUS status;
3730 int info;
3731 unsigned int i, j;
3732 struct security_descriptor *psd = dup_sec_desc(talloc_tos(), pcsd);
3733 bool is_dacl_protected = (pcsd->type & SEC_DESC_DACL_PROTECTED);
3735 if (psd == NULL) {
3736 return NT_STATUS_NO_MEMORY;
3739 if (!parent_dirname(mem_ctx, fsp->fsp_name->base_name, &parent_name,
3740 NULL)) {
3741 return NT_STATUS_NO_MEMORY;
3744 status = create_synthetic_smb_fname(mem_ctx, parent_name, NULL, NULL,
3745 &smb_dname);
3746 if (!NT_STATUS_IS_OK(status)) {
3747 goto fail;
3750 status = SMB_VFS_CREATE_FILE(
3751 fsp->conn, /* conn */
3752 NULL, /* req */
3753 0, /* root_dir_fid */
3754 smb_dname, /* fname */
3755 FILE_READ_ATTRIBUTES, /* access_mask */
3756 FILE_SHARE_NONE, /* share_access */
3757 FILE_OPEN, /* create_disposition*/
3758 FILE_DIRECTORY_FILE, /* create_options */
3759 0, /* file_attributes */
3760 INTERNAL_OPEN_ONLY, /* oplock_request */
3761 0, /* allocation_size */
3762 NULL, /* sd */
3763 NULL, /* ea_list */
3764 &parent_fsp, /* result */
3765 &info); /* pinfo */
3767 if (!NT_STATUS_IS_OK(status)) {
3768 TALLOC_FREE(smb_dname);
3769 return status;
3772 status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, smb_dname->base_name,
3773 SECINFO_DACL, &parent_sd );
3775 close_file(NULL, parent_fsp, NORMAL_CLOSE);
3776 TALLOC_FREE(smb_dname);
3778 if (!NT_STATUS_IS_OK(status)) {
3779 return status;
3783 * Make room for potentially all the ACLs from
3784 * the parent. We used to add the ugw triple here,
3785 * as we knew we were dealing with POSIX ACLs.
3786 * We no longer need to do so as we can guarentee
3787 * that a default ACL from the parent directory will
3788 * be well formed for POSIX ACLs if it came from a
3789 * POSIX ACL source, and if we're not writing to a
3790 * POSIX ACL sink then we don't care if it's not well
3791 * formed. JRA.
3794 num_aces += parent_sd->dacl->num_aces;
3796 if((new_ace = talloc_zero_array(mem_ctx, struct security_ace,
3797 num_aces)) == NULL) {
3798 return NT_STATUS_NO_MEMORY;
3801 /* Start by copying in all the given ACE entries. */
3802 for (i = 0; i < psd->dacl->num_aces; i++) {
3803 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3807 * Note that we're ignoring "inherit permissions" here
3808 * as that really only applies to newly created files. JRA.
3811 /* Finally append any inherited ACEs. */
3812 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3813 struct security_ace *se = &parent_sd->dacl->aces[j];
3815 if (fsp->is_directory) {
3816 if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3817 /* Doesn't apply to a directory - ignore. */
3818 DEBUG(10,("append_parent_acl: directory %s "
3819 "ignoring non container "
3820 "inherit flags %u on ACE with sid %s "
3821 "from parent %s\n",
3822 fsp_str_dbg(fsp),
3823 (unsigned int)se->flags,
3824 sid_string_dbg(&se->trustee),
3825 parent_name));
3826 continue;
3828 } else {
3829 if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3830 /* Doesn't apply to a file - ignore. */
3831 DEBUG(10,("append_parent_acl: file %s "
3832 "ignoring non object "
3833 "inherit flags %u on ACE with sid %s "
3834 "from parent %s\n",
3835 fsp_str_dbg(fsp),
3836 (unsigned int)se->flags,
3837 sid_string_dbg(&se->trustee),
3838 parent_name));
3839 continue;
3843 if (is_dacl_protected) {
3844 /* If the DACL is protected it means we must
3845 * not overwrite an existing ACE entry with the
3846 * same SID. This is order N^2. Ouch :-(. JRA. */
3847 unsigned int k;
3848 for (k = 0; k < psd->dacl->num_aces; k++) {
3849 if (dom_sid_equal(&psd->dacl->aces[k].trustee,
3850 &se->trustee)) {
3851 break;
3854 if (k < psd->dacl->num_aces) {
3855 /* SID matched. Ignore. */
3856 DEBUG(10,("append_parent_acl: path %s "
3857 "ignoring ACE with protected sid %s "
3858 "from parent %s\n",
3859 fsp_str_dbg(fsp),
3860 sid_string_dbg(&se->trustee),
3861 parent_name));
3862 continue;
3866 sec_ace_copy(&new_ace[i], se);
3867 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3868 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3870 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3872 if (fsp->is_directory) {
3874 * Strip off any inherit only. It's applied.
3876 new_ace[i].flags &= ~(SEC_ACE_FLAG_INHERIT_ONLY);
3877 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3878 /* No further inheritance. */
3879 new_ace[i].flags &=
3880 ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3881 SEC_ACE_FLAG_OBJECT_INHERIT);
3883 } else {
3885 * Strip off any container or inherit
3886 * flags, they can't apply to objects.
3888 new_ace[i].flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3889 SEC_ACE_FLAG_INHERIT_ONLY|
3890 SEC_ACE_FLAG_NO_PROPAGATE_INHERIT);
3892 i++;
3894 DEBUG(10,("append_parent_acl: path %s "
3895 "inheriting ACE with sid %s "
3896 "from parent %s\n",
3897 fsp_str_dbg(fsp),
3898 sid_string_dbg(&se->trustee),
3899 parent_name));
3902 psd->dacl->aces = new_ace;
3903 psd->dacl->num_aces = i;
3904 psd->type &= ~(SEC_DESC_DACL_AUTO_INHERITED|
3905 SEC_DESC_DACL_AUTO_INHERIT_REQ);
3907 *pp_new_sd = psd;
3908 return status;
3910 #endif
3912 /****************************************************************************
3913 Reply to set a security descriptor on an fsp. security_info_sent is the
3914 description of the following NT ACL.
3915 This should be the only external function needed for the UNIX style set ACL.
3916 We make a copy of psd_orig as internal functions modify the elements inside
3917 it, even though it's a const pointer.
3918 ****************************************************************************/
3920 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, const struct security_descriptor *psd_orig)
3922 connection_struct *conn = fsp->conn;
3923 uid_t user = (uid_t)-1;
3924 gid_t grp = (gid_t)-1;
3925 struct dom_sid file_owner_sid;
3926 struct dom_sid file_grp_sid;
3927 canon_ace *file_ace_list = NULL;
3928 canon_ace *dir_ace_list = NULL;
3929 bool acl_perms = False;
3930 mode_t orig_mode = (mode_t)0;
3931 NTSTATUS status;
3932 bool set_acl_as_root = false;
3933 bool acl_set_support = false;
3934 bool ret = false;
3935 struct security_descriptor *psd = NULL;
3937 DEBUG(10,("set_nt_acl: called for file %s\n",
3938 fsp_str_dbg(fsp)));
3940 if (!CAN_WRITE(conn)) {
3941 DEBUG(10,("set acl rejected on read-only share\n"));
3942 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3945 if (!psd_orig) {
3946 return NT_STATUS_INVALID_PARAMETER;
3949 psd = dup_sec_desc(talloc_tos(), psd_orig);
3950 if (!psd) {
3951 return NT_STATUS_NO_MEMORY;
3955 * Get the current state of the file.
3958 status = vfs_stat_fsp(fsp);
3959 if (!NT_STATUS_IS_OK(status)) {
3960 return status;
3963 /* Save the original element we check against. */
3964 orig_mode = fsp->fsp_name->st.st_ex_mode;
3967 * Unpack the user/group/world id's.
3970 /* POSIX can't cope with missing owner/group. */
3971 if ((security_info_sent & SECINFO_OWNER) && (psd->owner_sid == NULL)) {
3972 security_info_sent &= ~SECINFO_OWNER;
3974 if ((security_info_sent & SECINFO_GROUP) && (psd->group_sid == NULL)) {
3975 security_info_sent &= ~SECINFO_GROUP;
3978 status = unpack_nt_owners( conn, &user, &grp, security_info_sent, psd);
3979 if (!NT_STATUS_IS_OK(status)) {
3980 return status;
3984 * Do we need to chown ? If so this must be done first as the incoming
3985 * CREATOR_OWNER acl will be relative to the *new* owner, not the old.
3986 * Noticed by Simo.
3989 if (((user != (uid_t)-1) && (fsp->fsp_name->st.st_ex_uid != user)) ||
3990 (( grp != (gid_t)-1) && (fsp->fsp_name->st.st_ex_gid != grp))) {
3992 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3993 fsp_str_dbg(fsp), (unsigned int)user,
3994 (unsigned int)grp));
3996 status = try_chown(fsp, user, grp);
3997 if(!NT_STATUS_IS_OK(status)) {
3998 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error "
3999 "= %s.\n", fsp_str_dbg(fsp),
4000 (unsigned int)user,
4001 (unsigned int)grp,
4002 nt_errstr(status)));
4003 return status;
4007 * Recheck the current state of the file, which may have changed.
4008 * (suid/sgid bits, for instance)
4011 status = vfs_stat_fsp(fsp);
4012 if (!NT_STATUS_IS_OK(status)) {
4013 return status;
4016 /* Save the original element we check against. */
4017 orig_mode = fsp->fsp_name->st.st_ex_mode;
4019 /* If we successfully chowned, we know we must
4020 * be able to set the acl, so do it as root.
4022 set_acl_as_root = true;
4025 create_file_sids(&fsp->fsp_name->st, &file_owner_sid, &file_grp_sid);
4027 if((security_info_sent & SECINFO_DACL) &&
4028 (psd->type & SEC_DESC_DACL_PRESENT) &&
4029 (psd->dacl == NULL)) {
4030 struct security_ace ace[3];
4032 /* We can't have NULL DACL in POSIX.
4033 Use owner/group/Everyone -> full access. */
4035 init_sec_ace(&ace[0],
4036 &file_owner_sid,
4037 SEC_ACE_TYPE_ACCESS_ALLOWED,
4038 GENERIC_ALL_ACCESS,
4040 init_sec_ace(&ace[1],
4041 &file_grp_sid,
4042 SEC_ACE_TYPE_ACCESS_ALLOWED,
4043 GENERIC_ALL_ACCESS,
4045 init_sec_ace(&ace[2],
4046 &global_sid_World,
4047 SEC_ACE_TYPE_ACCESS_ALLOWED,
4048 GENERIC_ALL_ACCESS,
4050 psd->dacl = make_sec_acl(talloc_tos(),
4051 NT4_ACL_REVISION,
4053 ace);
4054 if (psd->dacl == NULL) {
4055 return NT_STATUS_NO_MEMORY;
4057 security_acl_map_generic(psd->dacl, &file_generic_mapping);
4060 acl_perms = unpack_canon_ace(fsp, &fsp->fsp_name->st, &file_owner_sid,
4061 &file_grp_sid, &file_ace_list,
4062 &dir_ace_list, security_info_sent, psd);
4064 /* Ignore W2K traverse DACL set. */
4065 if (!file_ace_list && !dir_ace_list) {
4066 return NT_STATUS_OK;
4069 if (!acl_perms) {
4070 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
4071 free_canon_ace_list(file_ace_list);
4072 free_canon_ace_list(dir_ace_list);
4073 return NT_STATUS_ACCESS_DENIED;
4077 * Only change security if we got a DACL.
4080 if(!(security_info_sent & SECINFO_DACL) || (psd->dacl == NULL)) {
4081 free_canon_ace_list(file_ace_list);
4082 free_canon_ace_list(dir_ace_list);
4083 return NT_STATUS_OK;
4087 * Try using the POSIX ACL set first. Fall back to chmod if
4088 * we have no ACL support on this filesystem.
4091 if (acl_perms && file_ace_list) {
4092 if (set_acl_as_root) {
4093 become_root();
4095 ret = set_canon_ace_list(fsp, file_ace_list, false,
4096 &fsp->fsp_name->st, &acl_set_support);
4097 if (set_acl_as_root) {
4098 unbecome_root();
4100 if (acl_set_support && ret == false) {
4101 DEBUG(3,("set_nt_acl: failed to set file acl on file "
4102 "%s (%s).\n", fsp_str_dbg(fsp),
4103 strerror(errno)));
4104 free_canon_ace_list(file_ace_list);
4105 free_canon_ace_list(dir_ace_list);
4106 return map_nt_error_from_unix(errno);
4110 if (acl_perms && acl_set_support && fsp->is_directory) {
4111 if (dir_ace_list) {
4112 if (set_acl_as_root) {
4113 become_root();
4115 ret = set_canon_ace_list(fsp, dir_ace_list, true,
4116 &fsp->fsp_name->st,
4117 &acl_set_support);
4118 if (set_acl_as_root) {
4119 unbecome_root();
4121 if (ret == false) {
4122 DEBUG(3,("set_nt_acl: failed to set default "
4123 "acl on directory %s (%s).\n",
4124 fsp_str_dbg(fsp), strerror(errno)));
4125 free_canon_ace_list(file_ace_list);
4126 free_canon_ace_list(dir_ace_list);
4127 return map_nt_error_from_unix(errno);
4129 } else {
4130 int sret = -1;
4133 * No default ACL - delete one if it exists.
4136 if (set_acl_as_root) {
4137 become_root();
4139 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn,
4140 fsp->fsp_name->base_name);
4141 if (set_acl_as_root) {
4142 unbecome_root();
4144 if (sret == -1) {
4145 if (acl_group_override(conn, fsp->fsp_name)) {
4146 DEBUG(5,("set_nt_acl: acl group "
4147 "control on and current user "
4148 "in file %s primary group. "
4149 "Override delete_def_acl\n",
4150 fsp_str_dbg(fsp)));
4152 become_root();
4153 sret =
4154 SMB_VFS_SYS_ACL_DELETE_DEF_FILE(
4155 conn,
4156 fsp->fsp_name->base_name);
4157 unbecome_root();
4160 if (sret == -1) {
4161 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
4162 free_canon_ace_list(file_ace_list);
4163 free_canon_ace_list(dir_ace_list);
4164 return map_nt_error_from_unix(errno);
4170 if (acl_set_support) {
4171 if (set_acl_as_root) {
4172 become_root();
4174 store_inheritance_attributes(fsp,
4175 file_ace_list,
4176 dir_ace_list,
4177 psd->type);
4178 if (set_acl_as_root) {
4179 unbecome_root();
4184 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
4187 if(!acl_set_support && acl_perms) {
4188 mode_t posix_perms;
4190 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
4191 free_canon_ace_list(file_ace_list);
4192 free_canon_ace_list(dir_ace_list);
4193 DEBUG(3,("set_nt_acl: failed to convert file acl to "
4194 "posix permissions for file %s.\n",
4195 fsp_str_dbg(fsp)));
4196 return NT_STATUS_ACCESS_DENIED;
4199 if (orig_mode != posix_perms) {
4200 int sret = -1;
4202 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
4203 fsp_str_dbg(fsp), (unsigned int)posix_perms));
4205 if (set_acl_as_root) {
4206 become_root();
4208 sret = SMB_VFS_CHMOD(conn, fsp->fsp_name->base_name,
4209 posix_perms);
4210 if (set_acl_as_root) {
4211 unbecome_root();
4213 if(sret == -1) {
4214 if (acl_group_override(conn, fsp->fsp_name)) {
4215 DEBUG(5,("set_nt_acl: acl group "
4216 "control on and current user "
4217 "in file %s primary group. "
4218 "Override chmod\n",
4219 fsp_str_dbg(fsp)));
4221 become_root();
4222 sret = SMB_VFS_CHMOD(conn,
4223 fsp->fsp_name->base_name,
4224 posix_perms);
4225 unbecome_root();
4228 if (sret == -1) {
4229 DEBUG(3,("set_nt_acl: chmod %s, 0%o "
4230 "failed. Error = %s.\n",
4231 fsp_str_dbg(fsp),
4232 (unsigned int)posix_perms,
4233 strerror(errno)));
4234 free_canon_ace_list(file_ace_list);
4235 free_canon_ace_list(dir_ace_list);
4236 return map_nt_error_from_unix(errno);
4242 free_canon_ace_list(file_ace_list);
4243 free_canon_ace_list(dir_ace_list);
4245 /* Ensure the stat struct in the fsp is correct. */
4246 status = vfs_stat_fsp(fsp);
4248 return NT_STATUS_OK;
4251 /****************************************************************************
4252 Get the actual group bits stored on a file with an ACL. Has no effect if
4253 the file has no ACL. Needed in dosmode code where the stat() will return
4254 the mask bits, not the real group bits, for a file with an ACL.
4255 ****************************************************************************/
4257 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
4259 int entry_id = SMB_ACL_FIRST_ENTRY;
4260 SMB_ACL_ENTRY_T entry;
4261 SMB_ACL_T posix_acl;
4262 int result = -1;
4264 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
4265 if (posix_acl == (SMB_ACL_T)NULL)
4266 return -1;
4268 while (sys_acl_get_entry(posix_acl, entry_id, &entry) == 1) {
4269 SMB_ACL_TAG_T tagtype;
4270 SMB_ACL_PERMSET_T permset;
4272 entry_id = SMB_ACL_NEXT_ENTRY;
4274 if (sys_acl_get_tag_type(entry, &tagtype) ==-1)
4275 break;
4277 if (tagtype == SMB_ACL_GROUP_OBJ) {
4278 if (sys_acl_get_permset(entry, &permset) == -1) {
4279 break;
4280 } else {
4281 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
4282 *mode |= (sys_acl_get_perm(permset, SMB_ACL_READ) ? S_IRGRP : 0);
4283 *mode |= (sys_acl_get_perm(permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
4284 *mode |= (sys_acl_get_perm(permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
4285 result = 0;
4286 break;
4290 TALLOC_FREE(posix_acl);
4291 return result;
4294 /****************************************************************************
4295 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4296 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4297 ****************************************************************************/
4299 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
4301 int entry_id = SMB_ACL_FIRST_ENTRY;
4302 SMB_ACL_ENTRY_T entry;
4303 int num_entries = 0;
4305 while ( sys_acl_get_entry(posix_acl, entry_id, &entry) == 1) {
4306 SMB_ACL_TAG_T tagtype;
4307 SMB_ACL_PERMSET_T permset;
4308 mode_t perms;
4310 entry_id = SMB_ACL_NEXT_ENTRY;
4312 if (sys_acl_get_tag_type(entry, &tagtype) == -1)
4313 return -1;
4315 if (sys_acl_get_permset(entry, &permset) == -1)
4316 return -1;
4318 num_entries++;
4320 switch(tagtype) {
4321 case SMB_ACL_USER_OBJ:
4322 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
4323 break;
4324 case SMB_ACL_GROUP_OBJ:
4325 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
4326 break;
4327 case SMB_ACL_MASK:
4329 * FIXME: The ACL_MASK entry permissions should really be set to
4330 * the union of the permissions of all ACL_USER,
4331 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
4332 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
4334 perms = S_IRUSR|S_IWUSR|S_IXUSR;
4335 break;
4336 case SMB_ACL_OTHER:
4337 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
4338 break;
4339 default:
4340 continue;
4343 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
4344 return -1;
4346 if (sys_acl_set_permset(entry, permset) == -1)
4347 return -1;
4351 * If this is a simple 3 element ACL or no elements then it's a standard
4352 * UNIX permission set. Just use chmod...
4355 if ((num_entries == 3) || (num_entries == 0))
4356 return -1;
4358 return 0;
4361 /****************************************************************************
4362 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
4363 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
4364 resulting ACL on TO. Note that name is in UNIX character set.
4365 ****************************************************************************/
4367 static int copy_access_posix_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
4369 SMB_ACL_T posix_acl = NULL;
4370 int ret = -1;
4372 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
4373 return -1;
4375 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4376 goto done;
4378 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
4380 done:
4382 TALLOC_FREE(posix_acl);
4383 return ret;
4386 /****************************************************************************
4387 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4388 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4389 Note that name is in UNIX character set.
4390 ****************************************************************************/
4392 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
4394 return copy_access_posix_acl(conn, name, name, mode);
4397 /****************************************************************************
4398 Check for an existing default POSIX ACL on a directory.
4399 ****************************************************************************/
4401 static bool directory_has_default_posix_acl(connection_struct *conn, const char *fname)
4403 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
4404 bool has_acl = False;
4405 SMB_ACL_ENTRY_T entry;
4407 if (def_acl != NULL && (sys_acl_get_entry(def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
4408 has_acl = True;
4411 if (def_acl) {
4412 TALLOC_FREE(def_acl);
4414 return has_acl;
4417 /****************************************************************************
4418 If the parent directory has no default ACL but it does have an Access ACL,
4419 inherit this Access ACL to file name.
4420 ****************************************************************************/
4422 int inherit_access_posix_acl(connection_struct *conn, const char *inherit_from_dir,
4423 const char *name, mode_t mode)
4425 if (directory_has_default_posix_acl(conn, inherit_from_dir))
4426 return 0;
4428 return copy_access_posix_acl(conn, inherit_from_dir, name, mode);
4431 /****************************************************************************
4432 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4433 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4434 ****************************************************************************/
4436 int fchmod_acl(files_struct *fsp, mode_t mode)
4438 connection_struct *conn = fsp->conn;
4439 SMB_ACL_T posix_acl = NULL;
4440 int ret = -1;
4442 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp)) == NULL)
4443 return -1;
4445 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4446 goto done;
4448 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
4450 done:
4452 TALLOC_FREE(posix_acl);
4453 return ret;
4456 /****************************************************************************
4457 Map from wire type to permset.
4458 ****************************************************************************/
4460 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
4462 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
4463 return False;
4466 if (sys_acl_clear_perms(*p_permset) == -1) {
4467 return False;
4470 if (wire_perm & SMB_POSIX_ACL_READ) {
4471 if (sys_acl_add_perm(*p_permset, SMB_ACL_READ) == -1) {
4472 return False;
4475 if (wire_perm & SMB_POSIX_ACL_WRITE) {
4476 if (sys_acl_add_perm(*p_permset, SMB_ACL_WRITE) == -1) {
4477 return False;
4480 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
4481 if (sys_acl_add_perm(*p_permset, SMB_ACL_EXECUTE) == -1) {
4482 return False;
4485 return True;
4488 /****************************************************************************
4489 Map from wire type to tagtype.
4490 ****************************************************************************/
4492 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
4494 switch (wire_tt) {
4495 case SMB_POSIX_ACL_USER_OBJ:
4496 *p_tt = SMB_ACL_USER_OBJ;
4497 break;
4498 case SMB_POSIX_ACL_USER:
4499 *p_tt = SMB_ACL_USER;
4500 break;
4501 case SMB_POSIX_ACL_GROUP_OBJ:
4502 *p_tt = SMB_ACL_GROUP_OBJ;
4503 break;
4504 case SMB_POSIX_ACL_GROUP:
4505 *p_tt = SMB_ACL_GROUP;
4506 break;
4507 case SMB_POSIX_ACL_MASK:
4508 *p_tt = SMB_ACL_MASK;
4509 break;
4510 case SMB_POSIX_ACL_OTHER:
4511 *p_tt = SMB_ACL_OTHER;
4512 break;
4513 default:
4514 return False;
4516 return True;
4519 /****************************************************************************
4520 Create a new POSIX acl from wire permissions.
4521 FIXME ! How does the share mask/mode fit into this.... ?
4522 ****************************************************************************/
4524 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
4526 unsigned int i;
4527 SMB_ACL_T the_acl = sys_acl_init(num_acls);
4529 if (the_acl == NULL) {
4530 return NULL;
4533 for (i = 0; i < num_acls; i++) {
4534 SMB_ACL_ENTRY_T the_entry;
4535 SMB_ACL_PERMSET_T the_permset;
4536 SMB_ACL_TAG_T tag_type;
4538 if (sys_acl_create_entry(&the_acl, &the_entry) == -1) {
4539 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
4540 i, strerror(errno) ));
4541 goto fail;
4544 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
4545 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
4546 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
4547 goto fail;
4550 if (sys_acl_set_tag_type(the_entry, tag_type) == -1) {
4551 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
4552 i, strerror(errno) ));
4553 goto fail;
4556 /* Get the permset pointer from the new ACL entry. */
4557 if (sys_acl_get_permset(the_entry, &the_permset) == -1) {
4558 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
4559 i, strerror(errno) ));
4560 goto fail;
4563 /* Map from wire to permissions. */
4564 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
4565 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
4566 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
4567 goto fail;
4570 /* Now apply to the new ACL entry. */
4571 if (sys_acl_set_permset(the_entry, the_permset) == -1) {
4572 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
4573 i, strerror(errno) ));
4574 goto fail;
4577 if (tag_type == SMB_ACL_USER) {
4578 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4579 uid_t uid = (uid_t)uidval;
4580 if (sys_acl_set_qualifier(the_entry,(void *)&uid) == -1) {
4581 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
4582 (unsigned int)uid, i, strerror(errno) ));
4583 goto fail;
4587 if (tag_type == SMB_ACL_GROUP) {
4588 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4589 gid_t gid = (uid_t)gidval;
4590 if (sys_acl_set_qualifier(the_entry,(void *)&gid) == -1) {
4591 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
4592 (unsigned int)gid, i, strerror(errno) ));
4593 goto fail;
4598 return the_acl;
4600 fail:
4602 if (the_acl != NULL) {
4603 TALLOC_FREE(the_acl);
4605 return NULL;
4608 /****************************************************************************
4609 Calls from UNIX extensions - Default POSIX ACL set.
4610 If num_def_acls == 0 and not a directory just return. If it is a directory
4611 and num_def_acls == 0 then remove the default acl. Else set the default acl
4612 on the directory.
4613 ****************************************************************************/
4615 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, const SMB_STRUCT_STAT *psbuf,
4616 uint16 num_def_acls, const char *pdata)
4618 SMB_ACL_T def_acl = NULL;
4620 if (!S_ISDIR(psbuf->st_ex_mode)) {
4621 if (num_def_acls) {
4622 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4623 errno = EISDIR;
4624 return False;
4625 } else {
4626 return True;
4630 if (!num_def_acls) {
4631 /* Remove the default ACL. */
4632 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4633 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4634 fname, strerror(errno) ));
4635 return False;
4637 return True;
4640 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
4641 return False;
4644 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4645 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4646 fname, strerror(errno) ));
4647 TALLOC_FREE(def_acl);
4648 return False;
4651 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4652 TALLOC_FREE(def_acl);
4653 return True;
4656 /****************************************************************************
4657 Remove an ACL from a file. As we don't have acl_delete_entry() available
4658 we must read the current acl and copy all entries except MASK, USER and GROUP
4659 to a new acl, then set that. This (at least on Linux) causes any ACL to be
4660 removed.
4661 FIXME ! How does the share mask/mode fit into this.... ?
4662 ****************************************************************************/
4664 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4666 SMB_ACL_T file_acl = NULL;
4667 int entry_id = SMB_ACL_FIRST_ENTRY;
4668 SMB_ACL_ENTRY_T entry;
4669 bool ret = False;
4670 /* Create a new ACL with only 3 entries, u/g/w. */
4671 SMB_ACL_T new_file_acl = sys_acl_init(3);
4672 SMB_ACL_ENTRY_T user_ent = NULL;
4673 SMB_ACL_ENTRY_T group_ent = NULL;
4674 SMB_ACL_ENTRY_T other_ent = NULL;
4676 if (new_file_acl == NULL) {
4677 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4678 return False;
4681 /* Now create the u/g/w entries. */
4682 if (sys_acl_create_entry(&new_file_acl, &user_ent) == -1) {
4683 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4684 fname, strerror(errno) ));
4685 goto done;
4687 if (sys_acl_set_tag_type(user_ent, SMB_ACL_USER_OBJ) == -1) {
4688 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4689 fname, strerror(errno) ));
4690 goto done;
4693 if (sys_acl_create_entry(&new_file_acl, &group_ent) == -1) {
4694 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4695 fname, strerror(errno) ));
4696 goto done;
4698 if (sys_acl_set_tag_type(group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4699 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4700 fname, strerror(errno) ));
4701 goto done;
4704 if (sys_acl_create_entry(&new_file_acl, &other_ent) == -1) {
4705 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4706 fname, strerror(errno) ));
4707 goto done;
4709 if (sys_acl_set_tag_type(other_ent, SMB_ACL_OTHER) == -1) {
4710 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4711 fname, strerror(errno) ));
4712 goto done;
4715 /* Get the current file ACL. */
4716 if (fsp && fsp->fh->fd != -1) {
4717 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
4718 } else {
4719 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4722 if (file_acl == NULL) {
4723 /* This is only returned if an error occurred. Even for a file with
4724 no acl a u/g/w acl should be returned. */
4725 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4726 fname, strerror(errno) ));
4727 goto done;
4730 while ( sys_acl_get_entry(file_acl, entry_id, &entry) == 1) {
4731 SMB_ACL_TAG_T tagtype;
4732 SMB_ACL_PERMSET_T permset;
4734 entry_id = SMB_ACL_NEXT_ENTRY;
4736 if (sys_acl_get_tag_type(entry, &tagtype) == -1) {
4737 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4738 fname, strerror(errno) ));
4739 goto done;
4742 if (sys_acl_get_permset(entry, &permset) == -1) {
4743 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4744 fname, strerror(errno) ));
4745 goto done;
4748 if (tagtype == SMB_ACL_USER_OBJ) {
4749 if (sys_acl_set_permset(user_ent, permset) == -1) {
4750 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4751 fname, strerror(errno) ));
4753 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4754 if (sys_acl_set_permset(group_ent, permset) == -1) {
4755 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4756 fname, strerror(errno) ));
4758 } else if (tagtype == SMB_ACL_OTHER) {
4759 if (sys_acl_set_permset(other_ent, permset) == -1) {
4760 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4761 fname, strerror(errno) ));
4766 /* Set the new empty file ACL. */
4767 if (fsp && fsp->fh->fd != -1) {
4768 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4769 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4770 fname, strerror(errno) ));
4771 goto done;
4773 } else {
4774 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4775 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4776 fname, strerror(errno) ));
4777 goto done;
4781 ret = True;
4783 done:
4785 if (file_acl) {
4786 TALLOC_FREE(file_acl);
4788 if (new_file_acl) {
4789 TALLOC_FREE(new_file_acl);
4791 return ret;
4794 /****************************************************************************
4795 Calls from UNIX extensions - POSIX ACL set.
4796 If num_def_acls == 0 then read/modify/write acl after removing all entries
4797 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4798 ****************************************************************************/
4800 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4802 SMB_ACL_T file_acl = NULL;
4804 if (!num_acls) {
4805 /* Remove the ACL from the file. */
4806 return remove_posix_acl(conn, fsp, fname);
4809 if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4810 return False;
4813 if (fsp && fsp->fh->fd != -1) {
4814 /* The preferred way - use an open fd. */
4815 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4816 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4817 fname, strerror(errno) ));
4818 TALLOC_FREE(file_acl);
4819 return False;
4821 } else {
4822 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4823 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4824 fname, strerror(errno) ));
4825 TALLOC_FREE(file_acl);
4826 return False;
4830 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4831 TALLOC_FREE(file_acl);
4832 return True;
4835 /********************************************************************
4836 Pull the NT ACL from a file on disk or the OpenEventlog() access
4837 check. Caller is responsible for freeing the returned security
4838 descriptor via TALLOC_FREE(). This is designed for dealing with
4839 user space access checks in smbd outside of the VFS. For example,
4840 checking access rights in OpenEventlog().
4842 Assume we are dealing with files (for now)
4843 ********************************************************************/
4845 struct security_descriptor *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname, uint32 security_info_wanted)
4847 struct security_descriptor *psd, *ret_sd;
4848 connection_struct *conn;
4849 files_struct finfo;
4850 struct fd_handle fh;
4851 NTSTATUS status;
4852 TALLOC_CTX *frame = talloc_stackframe();
4854 conn = talloc_zero(frame, connection_struct);
4855 if (conn == NULL) {
4856 DEBUG(0, ("talloc failed\n"));
4857 return NULL;
4860 if (!(conn->params = talloc(conn, struct share_params))) {
4861 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4862 TALLOC_FREE(frame);
4863 return NULL;
4866 conn->params->service = -1;
4868 set_conn_connectpath(conn, "/");
4870 if (!smbd_vfs_init(conn)) {
4871 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4872 conn_free(conn);
4873 TALLOC_FREE(frame);
4874 return NULL;
4877 ZERO_STRUCT( finfo );
4878 ZERO_STRUCT( fh );
4880 finfo.fnum = FNUM_FIELD_INVALID;
4881 finfo.conn = conn;
4882 finfo.fh = &fh;
4883 finfo.fh->fd = -1;
4885 status = create_synthetic_smb_fname(frame, fname, NULL, NULL,
4886 &finfo.fsp_name);
4887 if (!NT_STATUS_IS_OK(status)) {
4888 conn_free(conn);
4889 TALLOC_FREE(frame);
4890 return NULL;
4893 if (!NT_STATUS_IS_OK(SMB_VFS_FGET_NT_ACL( &finfo, security_info_wanted, &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 TALLOC_FREE(frame);
4898 return NULL;
4901 ret_sd = dup_sec_desc( ctx, psd );
4903 TALLOC_FREE(finfo.fsp_name);
4904 conn_free(conn);
4905 TALLOC_FREE(frame);
4907 return ret_sd;
4910 /* Stolen shamelessly from pvfs_default_acl() in source4 :-). */
4912 NTSTATUS make_default_filesystem_acl(TALLOC_CTX *ctx,
4913 const char *name,
4914 SMB_STRUCT_STAT *psbuf,
4915 struct security_descriptor **ppdesc)
4917 struct dom_sid owner_sid, group_sid;
4918 size_t size = 0;
4919 struct security_ace aces[4];
4920 uint32_t access_mask = 0;
4921 mode_t mode = psbuf->st_ex_mode;
4922 struct security_acl *new_dacl = NULL;
4923 int idx = 0;
4925 DEBUG(10,("make_default_filesystem_acl: file %s mode = 0%o\n",
4926 name, (int)mode ));
4928 uid_to_sid(&owner_sid, psbuf->st_ex_uid);
4929 gid_to_sid(&group_sid, psbuf->st_ex_gid);
4932 We provide up to 4 ACEs
4933 - Owner
4934 - Group
4935 - Everyone
4936 - NT System
4939 if (mode & S_IRUSR) {
4940 if (mode & S_IWUSR) {
4941 access_mask |= SEC_RIGHTS_FILE_ALL;
4942 } else {
4943 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4946 if (mode & S_IWUSR) {
4947 access_mask |= SEC_RIGHTS_FILE_WRITE | SEC_STD_DELETE;
4950 init_sec_ace(&aces[idx],
4951 &owner_sid,
4952 SEC_ACE_TYPE_ACCESS_ALLOWED,
4953 access_mask,
4955 idx++;
4957 access_mask = 0;
4958 if (mode & S_IRGRP) {
4959 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4961 if (mode & S_IWGRP) {
4962 /* note that delete is not granted - this matches posix behaviour */
4963 access_mask |= SEC_RIGHTS_FILE_WRITE;
4965 if (access_mask) {
4966 init_sec_ace(&aces[idx],
4967 &group_sid,
4968 SEC_ACE_TYPE_ACCESS_ALLOWED,
4969 access_mask,
4971 idx++;
4974 access_mask = 0;
4975 if (mode & S_IROTH) {
4976 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4978 if (mode & S_IWOTH) {
4979 access_mask |= SEC_RIGHTS_FILE_WRITE;
4981 if (access_mask) {
4982 init_sec_ace(&aces[idx],
4983 &global_sid_World,
4984 SEC_ACE_TYPE_ACCESS_ALLOWED,
4985 access_mask,
4987 idx++;
4990 init_sec_ace(&aces[idx],
4991 &global_sid_System,
4992 SEC_ACE_TYPE_ACCESS_ALLOWED,
4993 SEC_RIGHTS_FILE_ALL,
4995 idx++;
4997 new_dacl = make_sec_acl(ctx,
4998 NT4_ACL_REVISION,
4999 idx,
5000 aces);
5002 if (!new_dacl) {
5003 return NT_STATUS_NO_MEMORY;
5006 *ppdesc = make_sec_desc(ctx,
5007 SECURITY_DESCRIPTOR_REVISION_1,
5008 SEC_DESC_SELF_RELATIVE|SEC_DESC_DACL_PRESENT,
5009 &owner_sid,
5010 &group_sid,
5011 NULL,
5012 new_dacl,
5013 &size);
5014 if (!*ppdesc) {
5015 return NT_STATUS_NO_MEMORY;
5017 return NT_STATUS_OK;