Add reference to bug #4308 to remind me to add regression test to smbtorture.
[Samba.git] / source / smbd / posix_acls.c
blobb4f8ad585217578c29f67a48003a9ad048186cf0
1 /*
2 Unix SMB/CIFS implementation.
3 SMB NT Security Descriptor / Unix permission conversion.
4 Copyright (C) Jeremy Allison 1994-2000.
5 Copyright (C) Andreas Gruenbacher 2002.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "includes.h"
23 extern struct current_user current_user;
24 extern const struct generic_mapping file_generic_mapping;
26 #undef DBGC_CLASS
27 #define DBGC_CLASS DBGC_ACLS
29 /****************************************************************************
30 Data structures representing the internal ACE format.
31 ****************************************************************************/
33 enum ace_owner {UID_ACE, GID_ACE, WORLD_ACE};
34 enum ace_attribute {ALLOW_ACE, DENY_ACE}; /* Used for incoming NT ACLS. */
36 typedef union posix_id {
37 uid_t uid;
38 gid_t gid;
39 int world;
40 } posix_id;
42 typedef struct canon_ace {
43 struct canon_ace *next, *prev;
44 SMB_ACL_TAG_T type;
45 mode_t perms; /* Only use S_I(R|W|X)USR mode bits here. */
46 DOM_SID trustee;
47 enum ace_owner owner_type;
48 enum ace_attribute attr;
49 posix_id unix_ug;
50 bool inherited;
51 } canon_ace;
53 #define ALL_ACE_PERMS (S_IRUSR|S_IWUSR|S_IXUSR)
56 * EA format of user.SAMBA_PAI (Samba_Posix_Acl_Interitance)
57 * attribute on disk.
59 * | 1 | 1 | 2 | 2 | ....
60 * +------+------+-------------+---------------------+-------------+--------------------+
61 * | vers | flag | num_entries | num_default_entries | ..entries.. | default_entries... |
62 * +------+------+-------------+---------------------+-------------+--------------------+
65 #define PAI_VERSION_OFFSET 0
66 #define PAI_FLAG_OFFSET 1
67 #define PAI_NUM_ENTRIES_OFFSET 2
68 #define PAI_NUM_DEFAULT_ENTRIES_OFFSET 4
69 #define PAI_ENTRIES_BASE 6
71 #define PAI_VERSION 1
72 #define PAI_ACL_FLAG_PROTECTED 0x1
73 #define PAI_ENTRY_LENGTH 5
76 * In memory format of user.SAMBA_PAI attribute.
79 struct pai_entry {
80 struct pai_entry *next, *prev;
81 enum ace_owner owner_type;
82 posix_id unix_ug;
85 struct pai_val {
86 bool pai_protected;
87 unsigned int num_entries;
88 struct pai_entry *entry_list;
89 unsigned int num_def_entries;
90 struct pai_entry *def_entry_list;
93 /************************************************************************
94 Return a uint32 of the pai_entry principal.
95 ************************************************************************/
97 static uint32 get_pai_entry_val(struct pai_entry *paie)
99 switch (paie->owner_type) {
100 case UID_ACE:
101 DEBUG(10,("get_pai_entry_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
102 return (uint32)paie->unix_ug.uid;
103 case GID_ACE:
104 DEBUG(10,("get_pai_entry_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
105 return (uint32)paie->unix_ug.gid;
106 case WORLD_ACE:
107 default:
108 DEBUG(10,("get_pai_entry_val: world ace\n"));
109 return (uint32)-1;
113 /************************************************************************
114 Return a uint32 of the entry principal.
115 ************************************************************************/
117 static uint32 get_entry_val(canon_ace *ace_entry)
119 switch (ace_entry->owner_type) {
120 case UID_ACE:
121 DEBUG(10,("get_entry_val: uid = %u\n", (unsigned int)ace_entry->unix_ug.uid ));
122 return (uint32)ace_entry->unix_ug.uid;
123 case GID_ACE:
124 DEBUG(10,("get_entry_val: gid = %u\n", (unsigned int)ace_entry->unix_ug.gid ));
125 return (uint32)ace_entry->unix_ug.gid;
126 case WORLD_ACE:
127 default:
128 DEBUG(10,("get_entry_val: world ace\n"));
129 return (uint32)-1;
133 /************************************************************************
134 Count the inherited entries.
135 ************************************************************************/
137 static unsigned int num_inherited_entries(canon_ace *ace_list)
139 unsigned int num_entries = 0;
141 for (; ace_list; ace_list = ace_list->next)
142 if (ace_list->inherited)
143 num_entries++;
144 return num_entries;
147 /************************************************************************
148 Create the on-disk format. Caller must free.
149 ************************************************************************/
151 static char *create_pai_buf(canon_ace *file_ace_list, canon_ace *dir_ace_list, bool pai_protected, size_t *store_size)
153 char *pai_buf = NULL;
154 canon_ace *ace_list = NULL;
155 char *entry_offset = NULL;
156 unsigned int num_entries = 0;
157 unsigned int num_def_entries = 0;
159 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next)
160 if (ace_list->inherited)
161 num_entries++;
163 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next)
164 if (ace_list->inherited)
165 num_def_entries++;
167 DEBUG(10,("create_pai_buf: num_entries = %u, num_def_entries = %u\n", num_entries, num_def_entries ));
169 *store_size = PAI_ENTRIES_BASE + ((num_entries + num_def_entries)*PAI_ENTRY_LENGTH);
171 pai_buf = (char *)SMB_MALLOC(*store_size);
172 if (!pai_buf) {
173 return NULL;
176 /* Set up the header. */
177 memset(pai_buf, '\0', PAI_ENTRIES_BASE);
178 SCVAL(pai_buf,PAI_VERSION_OFFSET,PAI_VERSION);
179 SCVAL(pai_buf,PAI_FLAG_OFFSET,(pai_protected ? PAI_ACL_FLAG_PROTECTED : 0));
180 SSVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET,num_entries);
181 SSVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET,num_def_entries);
183 entry_offset = pai_buf + PAI_ENTRIES_BASE;
185 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
186 if (ace_list->inherited) {
187 uint8 type_val = (unsigned char)ace_list->owner_type;
188 uint32 entry_val = get_entry_val(ace_list);
190 SCVAL(entry_offset,0,type_val);
191 SIVAL(entry_offset,1,entry_val);
192 entry_offset += PAI_ENTRY_LENGTH;
196 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
197 if (ace_list->inherited) {
198 uint8 type_val = (unsigned char)ace_list->owner_type;
199 uint32 entry_val = get_entry_val(ace_list);
201 SCVAL(entry_offset,0,type_val);
202 SIVAL(entry_offset,1,entry_val);
203 entry_offset += PAI_ENTRY_LENGTH;
207 return pai_buf;
210 /************************************************************************
211 Store the user.SAMBA_PAI attribute on disk.
212 ************************************************************************/
214 static void store_inheritance_attributes(files_struct *fsp, canon_ace *file_ace_list,
215 canon_ace *dir_ace_list, bool pai_protected)
217 int ret;
218 size_t store_size;
219 char *pai_buf;
221 if (!lp_map_acl_inherit(SNUM(fsp->conn)))
222 return;
225 * Don't store if this ACL isn't protected and
226 * none of the entries in it are marked as inherited.
229 if (!pai_protected && num_inherited_entries(file_ace_list) == 0 && num_inherited_entries(dir_ace_list) == 0) {
230 /* Instead just remove the attribute if it exists. */
231 if (fsp->fh->fd != -1)
232 SMB_VFS_FREMOVEXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME);
233 else
234 SMB_VFS_REMOVEXATTR(fsp->conn, fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME);
235 return;
238 pai_buf = create_pai_buf(file_ace_list, dir_ace_list, pai_protected, &store_size);
240 if (fsp->fh->fd != -1)
241 ret = SMB_VFS_FSETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
242 pai_buf, store_size, 0);
243 else
244 ret = SMB_VFS_SETXATTR(fsp->conn,fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME,
245 pai_buf, store_size, 0);
247 SAFE_FREE(pai_buf);
249 DEBUG(10,("store_inheritance_attribute:%s for file %s\n", pai_protected ? " (protected)" : "", fsp->fsp_name));
250 if (ret == -1 && !no_acl_syscall_error(errno))
251 DEBUG(1,("store_inheritance_attribute: Error %s\n", strerror(errno) ));
254 /************************************************************************
255 Delete the in memory inheritance info.
256 ************************************************************************/
258 static void free_inherited_info(struct pai_val *pal)
260 if (pal) {
261 struct pai_entry *paie, *paie_next;
262 for (paie = pal->entry_list; paie; paie = paie_next) {
263 paie_next = paie->next;
264 SAFE_FREE(paie);
266 for (paie = pal->def_entry_list; paie; paie = paie_next) {
267 paie_next = paie->next;
268 SAFE_FREE(paie);
270 SAFE_FREE(pal);
274 /************************************************************************
275 Was this ACL protected ?
276 ************************************************************************/
278 static bool get_protected_flag(struct pai_val *pal)
280 if (!pal)
281 return False;
282 return pal->pai_protected;
285 /************************************************************************
286 Was this ACE inherited ?
287 ************************************************************************/
289 static bool get_inherited_flag(struct pai_val *pal, canon_ace *ace_entry, bool default_ace)
291 struct pai_entry *paie;
293 if (!pal)
294 return False;
296 /* If the entry exists it is inherited. */
297 for (paie = (default_ace ? pal->def_entry_list : pal->entry_list); paie; paie = paie->next) {
298 if (ace_entry->owner_type == paie->owner_type &&
299 get_entry_val(ace_entry) == get_pai_entry_val(paie))
300 return True;
302 return False;
305 /************************************************************************
306 Ensure an attribute just read is valid.
307 ************************************************************************/
309 static bool check_pai_ok(char *pai_buf, size_t pai_buf_data_size)
311 uint16 num_entries;
312 uint16 num_def_entries;
314 if (pai_buf_data_size < PAI_ENTRIES_BASE) {
315 /* Corrupted - too small. */
316 return False;
319 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_VERSION)
320 return False;
322 num_entries = SVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET);
323 num_def_entries = SVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
325 /* Check the entry lists match. */
326 /* Each entry is 5 bytes (type plus 4 bytes of uid or gid). */
328 if (((num_entries + num_def_entries)*PAI_ENTRY_LENGTH) + PAI_ENTRIES_BASE != pai_buf_data_size)
329 return False;
331 return True;
335 /************************************************************************
336 Convert to in-memory format.
337 ************************************************************************/
339 static struct pai_val *create_pai_val(char *buf, size_t size)
341 char *entry_offset;
342 struct pai_val *paiv = NULL;
343 int i;
345 if (!check_pai_ok(buf, size))
346 return NULL;
348 paiv = SMB_MALLOC_P(struct pai_val);
349 if (!paiv)
350 return NULL;
352 memset(paiv, '\0', sizeof(struct pai_val));
354 paiv->pai_protected = (CVAL(buf,PAI_FLAG_OFFSET) == PAI_ACL_FLAG_PROTECTED);
356 paiv->num_entries = SVAL(buf,PAI_NUM_ENTRIES_OFFSET);
357 paiv->num_def_entries = SVAL(buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
359 entry_offset = buf + PAI_ENTRIES_BASE;
361 DEBUG(10,("create_pai_val:%s num_entries = %u, num_def_entries = %u\n",
362 paiv->pai_protected ? " (pai_protected)" : "", paiv->num_entries, paiv->num_def_entries ));
364 for (i = 0; i < paiv->num_entries; i++) {
365 struct pai_entry *paie;
367 paie = SMB_MALLOC_P(struct pai_entry);
368 if (!paie) {
369 free_inherited_info(paiv);
370 return NULL;
373 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
374 switch( paie->owner_type) {
375 case UID_ACE:
376 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
377 DEBUG(10,("create_pai_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
378 break;
379 case GID_ACE:
380 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
381 DEBUG(10,("create_pai_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
382 break;
383 case WORLD_ACE:
384 paie->unix_ug.world = -1;
385 DEBUG(10,("create_pai_val: world ace\n"));
386 break;
387 default:
388 free_inherited_info(paiv);
389 return NULL;
391 entry_offset += PAI_ENTRY_LENGTH;
392 DLIST_ADD(paiv->entry_list, paie);
395 for (i = 0; i < paiv->num_def_entries; i++) {
396 struct pai_entry *paie;
398 paie = SMB_MALLOC_P(struct pai_entry);
399 if (!paie) {
400 free_inherited_info(paiv);
401 return NULL;
404 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
405 switch( paie->owner_type) {
406 case UID_ACE:
407 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
408 DEBUG(10,("create_pai_val: (def) uid = %u\n", (unsigned int)paie->unix_ug.uid ));
409 break;
410 case GID_ACE:
411 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
412 DEBUG(10,("create_pai_val: (def) gid = %u\n", (unsigned int)paie->unix_ug.gid ));
413 break;
414 case WORLD_ACE:
415 paie->unix_ug.world = -1;
416 DEBUG(10,("create_pai_val: (def) world ace\n"));
417 break;
418 default:
419 free_inherited_info(paiv);
420 return NULL;
422 entry_offset += PAI_ENTRY_LENGTH;
423 DLIST_ADD(paiv->def_entry_list, paie);
426 return paiv;
429 /************************************************************************
430 Load the user.SAMBA_PAI attribute.
431 ************************************************************************/
433 static struct pai_val *fload_inherited_info(files_struct *fsp)
435 char *pai_buf;
436 size_t pai_buf_size = 1024;
437 struct pai_val *paiv = NULL;
438 ssize_t ret;
440 if (!lp_map_acl_inherit(SNUM(fsp->conn)))
441 return NULL;
443 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
444 return NULL;
446 do {
447 if (fsp->fh->fd != -1)
448 ret = SMB_VFS_FGETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
449 pai_buf, pai_buf_size);
450 else
451 ret = SMB_VFS_GETXATTR(fsp->conn,fsp->fsp_name,SAMBA_POSIX_INHERITANCE_EA_NAME,
452 pai_buf, pai_buf_size);
454 if (ret == -1) {
455 if (errno != ERANGE) {
456 break;
458 /* Buffer too small - enlarge it. */
459 pai_buf_size *= 2;
460 SAFE_FREE(pai_buf);
461 if (pai_buf_size > 1024*1024) {
462 return NULL; /* Limit malloc to 1mb. */
464 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
465 return NULL;
467 } while (ret == -1);
469 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fsp->fsp_name));
471 if (ret == -1) {
472 /* No attribute or not supported. */
473 #if defined(ENOATTR)
474 if (errno != ENOATTR)
475 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
476 #else
477 if (errno != ENOSYS)
478 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
479 #endif
480 SAFE_FREE(pai_buf);
481 return NULL;
484 paiv = create_pai_val(pai_buf, ret);
486 if (paiv && paiv->pai_protected)
487 DEBUG(10,("load_inherited_info: ACL is protected for file %s\n", fsp->fsp_name));
489 SAFE_FREE(pai_buf);
490 return paiv;
493 /************************************************************************
494 Load the user.SAMBA_PAI attribute.
495 ************************************************************************/
497 static struct pai_val *load_inherited_info(const struct connection_struct *conn,
498 const char *fname)
500 char *pai_buf;
501 size_t pai_buf_size = 1024;
502 struct pai_val *paiv = NULL;
503 ssize_t ret;
505 if (!lp_map_acl_inherit(SNUM(conn))) {
506 return NULL;
509 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL) {
510 return NULL;
513 do {
514 ret = SMB_VFS_GETXATTR(conn, fname,
515 SAMBA_POSIX_INHERITANCE_EA_NAME,
516 pai_buf, pai_buf_size);
518 if (ret == -1) {
519 if (errno != ERANGE) {
520 break;
522 /* Buffer too small - enlarge it. */
523 pai_buf_size *= 2;
524 SAFE_FREE(pai_buf);
525 if (pai_buf_size > 1024*1024) {
526 return NULL; /* Limit malloc to 1mb. */
528 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
529 return NULL;
531 } while (ret == -1);
533 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fname));
535 if (ret == -1) {
536 /* No attribute or not supported. */
537 #if defined(ENOATTR)
538 if (errno != ENOATTR)
539 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
540 #else
541 if (errno != ENOSYS)
542 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
543 #endif
544 SAFE_FREE(pai_buf);
545 return NULL;
548 paiv = create_pai_val(pai_buf, ret);
550 if (paiv && paiv->pai_protected) {
551 DEBUG(10,("load_inherited_info: ACL is protected for file %s\n", fname));
554 SAFE_FREE(pai_buf);
555 return paiv;
558 /****************************************************************************
559 Functions to manipulate the internal ACE format.
560 ****************************************************************************/
562 /****************************************************************************
563 Count a linked list of canonical ACE entries.
564 ****************************************************************************/
566 static size_t count_canon_ace_list( canon_ace *list_head )
568 size_t count = 0;
569 canon_ace *ace;
571 for (ace = list_head; ace; ace = ace->next)
572 count++;
574 return count;
577 /****************************************************************************
578 Free a linked list of canonical ACE entries.
579 ****************************************************************************/
581 static void free_canon_ace_list( canon_ace *list_head )
583 canon_ace *list, *next;
585 for (list = list_head; list; list = next) {
586 next = list->next;
587 DLIST_REMOVE(list_head, list);
588 SAFE_FREE(list);
592 /****************************************************************************
593 Function to duplicate a canon_ace entry.
594 ****************************************************************************/
596 static canon_ace *dup_canon_ace( canon_ace *src_ace)
598 canon_ace *dst_ace = SMB_MALLOC_P(canon_ace);
600 if (dst_ace == NULL)
601 return NULL;
603 *dst_ace = *src_ace;
604 dst_ace->prev = dst_ace->next = NULL;
605 return dst_ace;
608 /****************************************************************************
609 Print out a canon ace.
610 ****************************************************************************/
612 static void print_canon_ace(canon_ace *pace, int num)
614 dbgtext( "canon_ace index %d. Type = %s ", num, pace->attr == ALLOW_ACE ? "allow" : "deny" );
615 dbgtext( "SID = %s ", sid_string_dbg(&pace->trustee));
616 if (pace->owner_type == UID_ACE) {
617 const char *u_name = uidtoname(pace->unix_ug.uid);
618 dbgtext( "uid %u (%s) ", (unsigned int)pace->unix_ug.uid, u_name );
619 } else if (pace->owner_type == GID_ACE) {
620 char *g_name = gidtoname(pace->unix_ug.gid);
621 dbgtext( "gid %u (%s) ", (unsigned int)pace->unix_ug.gid, g_name );
622 } else
623 dbgtext( "other ");
624 switch (pace->type) {
625 case SMB_ACL_USER:
626 dbgtext( "SMB_ACL_USER ");
627 break;
628 case SMB_ACL_USER_OBJ:
629 dbgtext( "SMB_ACL_USER_OBJ ");
630 break;
631 case SMB_ACL_GROUP:
632 dbgtext( "SMB_ACL_GROUP ");
633 break;
634 case SMB_ACL_GROUP_OBJ:
635 dbgtext( "SMB_ACL_GROUP_OBJ ");
636 break;
637 case SMB_ACL_OTHER:
638 dbgtext( "SMB_ACL_OTHER ");
639 break;
640 default:
641 dbgtext( "MASK " );
642 break;
644 if (pace->inherited)
645 dbgtext( "(inherited) ");
646 dbgtext( "perms ");
647 dbgtext( "%c", pace->perms & S_IRUSR ? 'r' : '-');
648 dbgtext( "%c", pace->perms & S_IWUSR ? 'w' : '-');
649 dbgtext( "%c\n", pace->perms & S_IXUSR ? 'x' : '-');
652 /****************************************************************************
653 Print out a canon ace list.
654 ****************************************************************************/
656 static void print_canon_ace_list(const char *name, canon_ace *ace_list)
658 int count = 0;
660 if( DEBUGLVL( 10 )) {
661 dbgtext( "print_canon_ace_list: %s\n", name );
662 for (;ace_list; ace_list = ace_list->next, count++)
663 print_canon_ace(ace_list, count );
667 /****************************************************************************
668 Map POSIX ACL perms to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
669 ****************************************************************************/
671 static mode_t convert_permset_to_mode_t(connection_struct *conn, SMB_ACL_PERMSET_T permset)
673 mode_t ret = 0;
675 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRUSR : 0);
676 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWUSR : 0);
677 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXUSR : 0);
679 return ret;
682 /****************************************************************************
683 Map generic UNIX permissions to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
684 ****************************************************************************/
686 static mode_t unix_perms_to_acl_perms(mode_t mode, int r_mask, int w_mask, int x_mask)
688 mode_t ret = 0;
690 if (mode & r_mask)
691 ret |= S_IRUSR;
692 if (mode & w_mask)
693 ret |= S_IWUSR;
694 if (mode & x_mask)
695 ret |= S_IXUSR;
697 return ret;
700 /****************************************************************************
701 Map canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits) to
702 an SMB_ACL_PERMSET_T.
703 ****************************************************************************/
705 static int map_acl_perms_to_permset(connection_struct *conn, mode_t mode, SMB_ACL_PERMSET_T *p_permset)
707 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1)
708 return -1;
709 if (mode & S_IRUSR) {
710 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1)
711 return -1;
713 if (mode & S_IWUSR) {
714 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1)
715 return -1;
717 if (mode & S_IXUSR) {
718 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1)
719 return -1;
721 return 0;
724 /****************************************************************************
725 Function to create owner and group SIDs from a SMB_STRUCT_STAT.
726 ****************************************************************************/
728 static void create_file_sids(const SMB_STRUCT_STAT *psbuf, DOM_SID *powner_sid, DOM_SID *pgroup_sid)
730 uid_to_sid( powner_sid, psbuf->st_uid );
731 gid_to_sid( pgroup_sid, psbuf->st_gid );
734 /****************************************************************************
735 Is the identity in two ACEs equal ? Check both SID and uid/gid.
736 ****************************************************************************/
738 static bool identity_in_ace_equal(canon_ace *ace1, canon_ace *ace2)
740 if (sid_equal(&ace1->trustee, &ace2->trustee)) {
741 return True;
743 if (ace1->owner_type == ace2->owner_type) {
744 if (ace1->owner_type == UID_ACE &&
745 ace1->unix_ug.uid == ace2->unix_ug.uid) {
746 return True;
747 } else if (ace1->owner_type == GID_ACE &&
748 ace1->unix_ug.gid == ace2->unix_ug.gid) {
749 return True;
752 return False;
755 /****************************************************************************
756 Merge aces with a common sid - if both are allow or deny, OR the permissions together and
757 delete the second one. If the first is deny, mask the permissions off and delete the allow
758 if the permissions become zero, delete the deny if the permissions are non zero.
759 ****************************************************************************/
761 static void merge_aces( canon_ace **pp_list_head )
763 canon_ace *list_head = *pp_list_head;
764 canon_ace *curr_ace_outer;
765 canon_ace *curr_ace_outer_next;
768 * First, merge allow entries with identical SIDs, and deny entries
769 * with identical SIDs.
772 for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
773 canon_ace *curr_ace;
774 canon_ace *curr_ace_next;
776 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
778 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
780 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
782 if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
783 (curr_ace->attr == curr_ace_outer->attr)) {
785 if( DEBUGLVL( 10 )) {
786 dbgtext("merge_aces: Merging ACE's\n");
787 print_canon_ace( curr_ace_outer, 0);
788 print_canon_ace( curr_ace, 0);
791 /* Merge two allow or two deny ACE's. */
793 curr_ace_outer->perms |= curr_ace->perms;
794 DLIST_REMOVE(list_head, curr_ace);
795 SAFE_FREE(curr_ace);
796 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
802 * Now go through and mask off allow permissions with deny permissions.
803 * We can delete either the allow or deny here as we know that each SID
804 * appears only once in the list.
807 for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
808 canon_ace *curr_ace;
809 canon_ace *curr_ace_next;
811 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
813 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
815 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
818 * Subtract ACE's with different entries. Due to the ordering constraints
819 * we've put on the ACL, we know the deny must be the first one.
822 if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
823 (curr_ace_outer->attr == DENY_ACE) && (curr_ace->attr == ALLOW_ACE)) {
825 if( DEBUGLVL( 10 )) {
826 dbgtext("merge_aces: Masking ACE's\n");
827 print_canon_ace( curr_ace_outer, 0);
828 print_canon_ace( curr_ace, 0);
831 curr_ace->perms &= ~curr_ace_outer->perms;
833 if (curr_ace->perms == 0) {
836 * The deny overrides the allow. Remove the allow.
839 DLIST_REMOVE(list_head, curr_ace);
840 SAFE_FREE(curr_ace);
841 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
843 } else {
846 * Even after removing permissions, there
847 * are still allow permissions - delete the deny.
848 * It is safe to delete the deny here,
849 * as we are guarenteed by the deny first
850 * ordering that all the deny entries for
851 * this SID have already been merged into one
852 * before we can get to an allow ace.
855 DLIST_REMOVE(list_head, curr_ace_outer);
856 SAFE_FREE(curr_ace_outer);
857 break;
861 } /* end for curr_ace */
862 } /* end for curr_ace_outer */
864 /* We may have modified the list. */
866 *pp_list_head = list_head;
869 /****************************************************************************
870 Check if we need to return NT4.x compatible ACL entries.
871 ****************************************************************************/
873 static bool nt4_compatible_acls(void)
875 int compat = lp_acl_compatibility();
877 if (compat == ACL_COMPAT_AUTO) {
878 enum remote_arch_types ra_type = get_remote_arch();
880 /* Automatically adapt to client */
881 return (ra_type <= RA_WINNT);
882 } else
883 return (compat == ACL_COMPAT_WINNT);
887 /****************************************************************************
888 Map canon_ace perms to permission bits NT.
889 The attr element is not used here - we only process deny entries on set,
890 not get. Deny entries are implicit on get with ace->perms = 0.
891 ****************************************************************************/
893 static SEC_ACCESS map_canon_ace_perms(int snum,
894 enum security_ace_type *pacl_type,
895 mode_t perms,
896 bool directory_ace)
898 SEC_ACCESS sa;
899 uint32 nt_mask = 0;
901 *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
903 if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
904 if (directory_ace) {
905 nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
906 } else {
907 nt_mask = UNIX_ACCESS_RWX;
909 } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
911 * Windows NT refuses to display ACEs with no permissions in them (but
912 * they are perfectly legal with Windows 2000). If the ACE has empty
913 * permissions we cannot use 0, so we use the otherwise unused
914 * WRITE_OWNER permission, which we ignore when we set an ACL.
915 * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
916 * to be changed in the future.
919 if (nt4_compatible_acls())
920 nt_mask = UNIX_ACCESS_NONE;
921 else
922 nt_mask = 0;
923 } else {
924 if (directory_ace) {
925 nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
926 nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
927 nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
928 } else {
929 nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
930 nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
931 nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
935 DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
936 (unsigned int)perms, (unsigned int)nt_mask ));
938 init_sec_access(&sa,nt_mask);
939 return sa;
942 /****************************************************************************
943 Map NT perms to a UNIX mode_t.
944 ****************************************************************************/
946 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA|FILE_READ_ATTRIBUTES)
947 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA|FILE_WRITE_ATTRIBUTES)
948 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
950 static mode_t map_nt_perms( uint32 *mask, int type)
952 mode_t mode = 0;
954 switch(type) {
955 case S_IRUSR:
956 if((*mask) & GENERIC_ALL_ACCESS)
957 mode = S_IRUSR|S_IWUSR|S_IXUSR;
958 else {
959 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
960 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
961 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
963 break;
964 case S_IRGRP:
965 if((*mask) & GENERIC_ALL_ACCESS)
966 mode = S_IRGRP|S_IWGRP|S_IXGRP;
967 else {
968 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
969 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
970 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
972 break;
973 case S_IROTH:
974 if((*mask) & GENERIC_ALL_ACCESS)
975 mode = S_IROTH|S_IWOTH|S_IXOTH;
976 else {
977 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
978 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
979 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
981 break;
984 return mode;
987 /****************************************************************************
988 Unpack a SEC_DESC into a UNIX owner and group.
989 ****************************************************************************/
991 NTSTATUS unpack_nt_owners(int snum, uid_t *puser, gid_t *pgrp, uint32 security_info_sent, SEC_DESC *psd)
993 DOM_SID owner_sid;
994 DOM_SID grp_sid;
996 *puser = (uid_t)-1;
997 *pgrp = (gid_t)-1;
999 if(security_info_sent == 0) {
1000 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
1001 return NT_STATUS_OK;
1005 * Validate the owner and group SID's.
1008 memset(&owner_sid, '\0', sizeof(owner_sid));
1009 memset(&grp_sid, '\0', sizeof(grp_sid));
1011 DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
1014 * Don't immediately fail if the owner sid cannot be validated.
1015 * This may be a group chown only set.
1018 if (security_info_sent & OWNER_SECURITY_INFORMATION) {
1019 sid_copy(&owner_sid, psd->owner_sid);
1020 if (!sid_to_uid(&owner_sid, puser)) {
1021 if (lp_force_unknown_acl_user(snum)) {
1022 /* this allows take ownership to work
1023 * reasonably */
1024 *puser = current_user.ut.uid;
1025 } else {
1026 DEBUG(3,("unpack_nt_owners: unable to validate"
1027 " owner sid for %s\n",
1028 sid_string_dbg(&owner_sid)));
1029 return NT_STATUS_INVALID_OWNER;
1032 DEBUG(3,("unpack_nt_owners: owner sid mapped to uid %u\n",
1033 (unsigned int)*puser ));
1037 * Don't immediately fail if the group sid cannot be validated.
1038 * This may be an owner chown only set.
1041 if (security_info_sent & GROUP_SECURITY_INFORMATION) {
1042 sid_copy(&grp_sid, psd->group_sid);
1043 if (!sid_to_gid( &grp_sid, pgrp)) {
1044 if (lp_force_unknown_acl_user(snum)) {
1045 /* this allows take group ownership to work
1046 * reasonably */
1047 *pgrp = current_user.ut.gid;
1048 } else {
1049 DEBUG(3,("unpack_nt_owners: unable to validate"
1050 " group sid.\n"));
1051 return NT_STATUS_INVALID_OWNER;
1054 DEBUG(3,("unpack_nt_owners: group sid mapped to gid %u\n",
1055 (unsigned int)*pgrp));
1058 DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
1060 return NT_STATUS_OK;
1063 /****************************************************************************
1064 Ensure the enforced permissions for this share apply.
1065 ****************************************************************************/
1067 static void apply_default_perms(const struct share_params *params,
1068 const bool is_directory, canon_ace *pace,
1069 mode_t type)
1071 mode_t and_bits = (mode_t)0;
1072 mode_t or_bits = (mode_t)0;
1074 /* Get the initial bits to apply. */
1076 if (is_directory) {
1077 and_bits = lp_dir_security_mask(params->service);
1078 or_bits = lp_force_dir_security_mode(params->service);
1079 } else {
1080 and_bits = lp_security_mask(params->service);
1081 or_bits = lp_force_security_mode(params->service);
1084 /* Now bounce them into the S_USR space. */
1085 switch(type) {
1086 case S_IRUSR:
1087 /* Ensure owner has read access. */
1088 pace->perms |= S_IRUSR;
1089 if (is_directory)
1090 pace->perms |= (S_IWUSR|S_IXUSR);
1091 and_bits = unix_perms_to_acl_perms(and_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1092 or_bits = unix_perms_to_acl_perms(or_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1093 break;
1094 case S_IRGRP:
1095 and_bits = unix_perms_to_acl_perms(and_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1096 or_bits = unix_perms_to_acl_perms(or_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1097 break;
1098 case S_IROTH:
1099 and_bits = unix_perms_to_acl_perms(and_bits, S_IROTH, S_IWOTH, S_IXOTH);
1100 or_bits = unix_perms_to_acl_perms(or_bits, S_IROTH, S_IWOTH, S_IXOTH);
1101 break;
1104 pace->perms = ((pace->perms & and_bits)|or_bits);
1107 /****************************************************************************
1108 Check if a given uid/SID is in a group gid/SID. This is probably very
1109 expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1110 ****************************************************************************/
1112 static bool uid_entry_in_group( canon_ace *uid_ace, canon_ace *group_ace )
1114 const char *u_name = NULL;
1116 /* "Everyone" always matches every uid. */
1118 if (sid_equal(&group_ace->trustee, &global_sid_World))
1119 return True;
1121 /* Assume that the current user is in the current group (force group) */
1123 if (uid_ace->unix_ug.uid == current_user.ut.uid && group_ace->unix_ug.gid == current_user.ut.gid)
1124 return True;
1126 /* u_name talloc'ed off tos. */
1127 u_name = uidtoname(uid_ace->unix_ug.uid);
1128 if (!u_name) {
1129 return False;
1131 return user_in_group_sid(u_name, &group_ace->trustee);
1134 /****************************************************************************
1135 A well formed POSIX file or default ACL has at least 3 entries, a
1136 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1137 In addition, the owner must always have at least read access.
1138 When using this call on get_acl, the pst struct is valid and contains
1139 the mode of the file. When using this call on set_acl, the pst struct has
1140 been modified to have a mode containing the default for this file or directory
1141 type.
1142 ****************************************************************************/
1144 static bool ensure_canon_entry_valid(canon_ace **pp_ace,
1145 const struct share_params *params,
1146 const bool is_directory,
1147 const DOM_SID *pfile_owner_sid,
1148 const DOM_SID *pfile_grp_sid,
1149 const SMB_STRUCT_STAT *pst,
1150 bool setting_acl)
1152 canon_ace *pace;
1153 bool got_user = False;
1154 bool got_grp = False;
1155 bool got_other = False;
1156 canon_ace *pace_other = NULL;
1158 for (pace = *pp_ace; pace; pace = pace->next) {
1159 if (pace->type == SMB_ACL_USER_OBJ) {
1161 if (setting_acl)
1162 apply_default_perms(params, is_directory, pace, S_IRUSR);
1163 got_user = True;
1165 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1168 * Ensure create mask/force create mode is respected on set.
1171 if (setting_acl)
1172 apply_default_perms(params, is_directory, pace, S_IRGRP);
1173 got_grp = True;
1175 } else if (pace->type == SMB_ACL_OTHER) {
1178 * Ensure create mask/force create mode is respected on set.
1181 if (setting_acl)
1182 apply_default_perms(params, is_directory, pace, S_IROTH);
1183 got_other = True;
1184 pace_other = pace;
1188 if (!got_user) {
1189 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1190 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1191 return False;
1194 ZERO_STRUCTP(pace);
1195 pace->type = SMB_ACL_USER_OBJ;
1196 pace->owner_type = UID_ACE;
1197 pace->unix_ug.uid = pst->st_uid;
1198 pace->trustee = *pfile_owner_sid;
1199 pace->attr = ALLOW_ACE;
1201 if (setting_acl) {
1202 /* See if the owning user is in any of the other groups in
1203 the ACE. If so, OR in the permissions from that group. */
1205 bool group_matched = False;
1206 canon_ace *pace_iter;
1208 for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1209 if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1210 if (uid_entry_in_group(pace, pace_iter)) {
1211 pace->perms |= pace_iter->perms;
1212 group_matched = True;
1217 /* If we only got an "everyone" perm, just use that. */
1218 if (!group_matched) {
1219 if (got_other)
1220 pace->perms = pace_other->perms;
1221 else
1222 pace->perms = 0;
1225 apply_default_perms(params, is_directory, pace, S_IRUSR);
1226 } else {
1227 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1230 DLIST_ADD(*pp_ace, pace);
1233 if (!got_grp) {
1234 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1235 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1236 return False;
1239 ZERO_STRUCTP(pace);
1240 pace->type = SMB_ACL_GROUP_OBJ;
1241 pace->owner_type = GID_ACE;
1242 pace->unix_ug.uid = pst->st_gid;
1243 pace->trustee = *pfile_grp_sid;
1244 pace->attr = ALLOW_ACE;
1245 if (setting_acl) {
1246 /* If we only got an "everyone" perm, just use that. */
1247 if (got_other)
1248 pace->perms = pace_other->perms;
1249 else
1250 pace->perms = 0;
1251 apply_default_perms(params, is_directory, pace, S_IRGRP);
1252 } else {
1253 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1256 DLIST_ADD(*pp_ace, pace);
1259 if (!got_other) {
1260 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1261 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1262 return False;
1265 ZERO_STRUCTP(pace);
1266 pace->type = SMB_ACL_OTHER;
1267 pace->owner_type = WORLD_ACE;
1268 pace->unix_ug.world = -1;
1269 pace->trustee = global_sid_World;
1270 pace->attr = ALLOW_ACE;
1271 if (setting_acl) {
1272 pace->perms = 0;
1273 apply_default_perms(params, is_directory, pace, S_IROTH);
1274 } else
1275 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IROTH, S_IWOTH, S_IXOTH);
1277 DLIST_ADD(*pp_ace, pace);
1280 return True;
1283 /****************************************************************************
1284 Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1285 If it does not have them, check if there are any entries where the trustee is the
1286 file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1287 ****************************************************************************/
1289 static void check_owning_objs(canon_ace *ace, DOM_SID *pfile_owner_sid, DOM_SID *pfile_grp_sid)
1291 bool got_user_obj, got_group_obj;
1292 canon_ace *current_ace;
1293 int i, entries;
1295 entries = count_canon_ace_list(ace);
1296 got_user_obj = False;
1297 got_group_obj = False;
1299 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1300 if (current_ace->type == SMB_ACL_USER_OBJ)
1301 got_user_obj = True;
1302 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1303 got_group_obj = True;
1305 if (got_user_obj && got_group_obj) {
1306 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1307 return;
1310 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1311 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1312 sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1313 current_ace->type = SMB_ACL_USER_OBJ;
1314 got_user_obj = True;
1316 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1317 sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1318 current_ace->type = SMB_ACL_GROUP_OBJ;
1319 got_group_obj = True;
1322 if (!got_user_obj)
1323 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1324 if (!got_group_obj)
1325 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1328 /****************************************************************************
1329 Unpack a SEC_DESC into two canonical ace lists.
1330 ****************************************************************************/
1332 static bool create_canon_ace_lists(files_struct *fsp, SMB_STRUCT_STAT *pst,
1333 DOM_SID *pfile_owner_sid,
1334 DOM_SID *pfile_grp_sid,
1335 canon_ace **ppfile_ace, canon_ace **ppdir_ace,
1336 SEC_ACL *dacl)
1338 bool all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1339 canon_ace *file_ace = NULL;
1340 canon_ace *dir_ace = NULL;
1341 canon_ace *current_ace = NULL;
1342 bool got_dir_allow = False;
1343 bool got_file_allow = False;
1344 int i, j;
1346 *ppfile_ace = NULL;
1347 *ppdir_ace = NULL;
1350 * Convert the incoming ACL into a more regular form.
1353 for(i = 0; i < dacl->num_aces; i++) {
1354 SEC_ACE *psa = &dacl->aces[i];
1356 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1357 DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1358 return False;
1361 if (nt4_compatible_acls()) {
1363 * The security mask may be UNIX_ACCESS_NONE which should map into
1364 * no permissions (we overload the WRITE_OWNER bit for this) or it
1365 * should be one of the ALL/EXECUTE/READ/WRITE bits. Arrange for this
1366 * to be so. Any other bits override the UNIX_ACCESS_NONE bit.
1370 * Convert GENERIC bits to specific bits.
1373 se_map_generic(&psa->access_mask, &file_generic_mapping);
1375 psa->access_mask &= (UNIX_ACCESS_NONE|FILE_ALL_ACCESS);
1377 if(psa->access_mask != UNIX_ACCESS_NONE)
1378 psa->access_mask &= ~UNIX_ACCESS_NONE;
1383 * Deal with the fact that NT 4.x re-writes the canonical format
1384 * that we return for default ACLs. If a directory ACE is identical
1385 * to a inherited directory ACE then NT changes the bits so that the
1386 * first ACE is set to OI|IO and the second ACE for this SID is set
1387 * to CI. We need to repair this. JRA.
1390 for(i = 0; i < dacl->num_aces; i++) {
1391 SEC_ACE *psa1 = &dacl->aces[i];
1393 for (j = i + 1; j < dacl->num_aces; j++) {
1394 SEC_ACE *psa2 = &dacl->aces[j];
1396 if (psa1->access_mask != psa2->access_mask)
1397 continue;
1399 if (!sid_equal(&psa1->trustee, &psa2->trustee))
1400 continue;
1403 * Ok - permission bits and SIDs are equal.
1404 * Check if flags were re-written.
1407 if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1409 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1410 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1412 } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1414 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1415 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1421 for(i = 0; i < dacl->num_aces; i++) {
1422 SEC_ACE *psa = &dacl->aces[i];
1425 * Create a cannon_ace entry representing this NT DACL ACE.
1428 if ((current_ace = SMB_MALLOC_P(canon_ace)) == NULL) {
1429 free_canon_ace_list(file_ace);
1430 free_canon_ace_list(dir_ace);
1431 DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1432 return False;
1435 ZERO_STRUCTP(current_ace);
1437 sid_copy(&current_ace->trustee, &psa->trustee);
1440 * Try and work out if the SID is a user or group
1441 * as we need to flag these differently for POSIX.
1442 * Note what kind of a POSIX ACL this should map to.
1445 if( sid_equal(&current_ace->trustee, &global_sid_World)) {
1446 current_ace->owner_type = WORLD_ACE;
1447 current_ace->unix_ug.world = -1;
1448 current_ace->type = SMB_ACL_OTHER;
1449 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1450 current_ace->owner_type = UID_ACE;
1451 current_ace->unix_ug.uid = pst->st_uid;
1452 current_ace->type = SMB_ACL_USER_OBJ;
1455 * The Creator Owner entry only specifies inheritable permissions,
1456 * never access permissions. WinNT doesn't always set the ACE to
1457 *INHERIT_ONLY, though.
1460 if (nt4_compatible_acls())
1461 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1462 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1463 current_ace->owner_type = GID_ACE;
1464 current_ace->unix_ug.gid = pst->st_gid;
1465 current_ace->type = SMB_ACL_GROUP_OBJ;
1468 * The Creator Group entry only specifies inheritable permissions,
1469 * never access permissions. WinNT doesn't always set the ACE to
1470 *INHERIT_ONLY, though.
1472 if (nt4_compatible_acls())
1473 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1475 } else if (sid_to_uid( &current_ace->trustee, &current_ace->unix_ug.uid)) {
1476 current_ace->owner_type = UID_ACE;
1477 /* If it's the owning user, this is a user_obj, not
1478 * a user. */
1479 if (current_ace->unix_ug.uid == pst->st_uid) {
1480 current_ace->type = SMB_ACL_USER_OBJ;
1481 } else {
1482 current_ace->type = SMB_ACL_USER;
1484 } else if (sid_to_gid( &current_ace->trustee, &current_ace->unix_ug.gid)) {
1485 current_ace->owner_type = GID_ACE;
1486 /* If it's the primary group, this is a group_obj, not
1487 * a group. */
1488 if (current_ace->unix_ug.gid == pst->st_gid) {
1489 current_ace->type = SMB_ACL_GROUP_OBJ;
1490 } else {
1491 current_ace->type = SMB_ACL_GROUP;
1493 } else {
1495 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
1498 if (non_mappable_sid(&psa->trustee)) {
1499 DEBUG(10, ("create_canon_ace_lists: ignoring "
1500 "non-mappable SID %s\n",
1501 sid_string_dbg(&psa->trustee)));
1502 SAFE_FREE(current_ace);
1503 continue;
1506 free_canon_ace_list(file_ace);
1507 free_canon_ace_list(dir_ace);
1508 DEBUG(0, ("create_canon_ace_lists: unable to map SID "
1509 "%s to uid or gid.\n",
1510 sid_string_dbg(&current_ace->trustee)));
1511 SAFE_FREE(current_ace);
1512 return False;
1516 * Map the given NT permissions into a UNIX mode_t containing only
1517 * S_I(R|W|X)USR bits.
1520 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1521 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1522 current_ace->inherited = ((psa->flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False);
1525 * Now add the created ace to either the file list, the directory
1526 * list, or both. We *MUST* preserve the order here (hence we use
1527 * DLIST_ADD_END) as NT ACLs are order dependent.
1530 if (fsp->is_directory) {
1533 * We can only add to the default POSIX ACE list if the ACE is
1534 * designed to be inherited by both files and directories.
1537 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1538 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1540 DLIST_ADD_END(dir_ace, current_ace, canon_ace *);
1543 * Note if this was an allow ace. We can't process
1544 * any further deny ace's after this.
1547 if (current_ace->attr == ALLOW_ACE)
1548 got_dir_allow = True;
1550 if ((current_ace->attr == DENY_ACE) && got_dir_allow) {
1551 DEBUG(0,("create_canon_ace_lists: malformed ACL in inheritable ACL ! \
1552 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1553 free_canon_ace_list(file_ace);
1554 free_canon_ace_list(dir_ace);
1555 return False;
1558 if( DEBUGLVL( 10 )) {
1559 dbgtext("create_canon_ace_lists: adding dir ACL:\n");
1560 print_canon_ace( current_ace, 0);
1564 * If this is not an inherit only ACE we need to add a duplicate
1565 * to the file acl.
1568 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1569 canon_ace *dup_ace = dup_canon_ace(current_ace);
1571 if (!dup_ace) {
1572 DEBUG(0,("create_canon_ace_lists: malloc fail !\n"));
1573 free_canon_ace_list(file_ace);
1574 free_canon_ace_list(dir_ace);
1575 return False;
1579 * We must not free current_ace here as its
1580 * pointer is now owned by the dir_ace list.
1582 current_ace = dup_ace;
1583 } else {
1585 * We must not free current_ace here as its
1586 * pointer is now owned by the dir_ace list.
1588 current_ace = NULL;
1594 * Only add to the file ACL if not inherit only.
1597 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1598 DLIST_ADD_END(file_ace, current_ace, canon_ace *);
1601 * Note if this was an allow ace. We can't process
1602 * any further deny ace's after this.
1605 if (current_ace->attr == ALLOW_ACE)
1606 got_file_allow = True;
1608 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1609 DEBUG(0,("create_canon_ace_lists: malformed ACL in file ACL ! \
1610 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1611 free_canon_ace_list(file_ace);
1612 free_canon_ace_list(dir_ace);
1613 return False;
1616 if( DEBUGLVL( 10 )) {
1617 dbgtext("create_canon_ace_lists: adding file ACL:\n");
1618 print_canon_ace( current_ace, 0);
1620 all_aces_are_inherit_only = False;
1622 * We must not free current_ace here as its
1623 * pointer is now owned by the file_ace list.
1625 current_ace = NULL;
1629 * Free if ACE was not added.
1632 SAFE_FREE(current_ace);
1635 if (fsp->is_directory && all_aces_are_inherit_only) {
1637 * Windows 2000 is doing one of these weird 'inherit acl'
1638 * traverses to conserve NTFS ACL resources. Just pretend
1639 * there was no DACL sent. JRA.
1642 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
1643 free_canon_ace_list(file_ace);
1644 free_canon_ace_list(dir_ace);
1645 file_ace = NULL;
1646 dir_ace = NULL;
1647 } else {
1649 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in each
1650 * ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
1651 * entries can be converted to *_OBJ. Usually we will already have these
1652 * entries in the Default ACL, and the Access ACL will not have them.
1654 if (file_ace) {
1655 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
1657 if (dir_ace) {
1658 check_owning_objs(dir_ace, pfile_owner_sid, pfile_grp_sid);
1662 *ppfile_ace = file_ace;
1663 *ppdir_ace = dir_ace;
1665 return True;
1668 /****************************************************************************
1669 ASCII art time again... JRA :-).
1671 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
1672 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
1673 entries). Secondly, the merge code has ensured that all duplicate SID entries for
1674 allow or deny have been merged, so the same SID can only appear once in the deny
1675 list or once in the allow list.
1677 We then process as follows :
1679 ---------------------------------------------------------------------------
1680 First pass - look for a Everyone DENY entry.
1682 If it is deny all (rwx) trunate the list at this point.
1683 Else, walk the list from this point and use the deny permissions of this
1684 entry as a mask on all following allow entries. Finally, delete
1685 the Everyone DENY entry (we have applied it to everything possible).
1687 In addition, in this pass we remove any DENY entries that have
1688 no permissions (ie. they are a DENY nothing).
1689 ---------------------------------------------------------------------------
1690 Second pass - only deal with deny user entries.
1692 DENY user1 (perms XXX)
1694 new_perms = 0
1695 for all following allow group entries where user1 is in group
1696 new_perms |= group_perms;
1698 user1 entry perms = new_perms & ~ XXX;
1700 Convert the deny entry to an allow entry with the new perms and
1701 push to the end of the list. Note if the user was in no groups
1702 this maps to a specific allow nothing entry for this user.
1704 The common case from the NT ACL choser (userX deny all) is
1705 optimised so we don't do the group lookup - we just map to
1706 an allow nothing entry.
1708 What we're doing here is inferring the allow permissions the
1709 person setting the ACE on user1 wanted by looking at the allow
1710 permissions on the groups the user is currently in. This will
1711 be a snapshot, depending on group membership but is the best
1712 we can do and has the advantage of failing closed rather than
1713 open.
1714 ---------------------------------------------------------------------------
1715 Third pass - only deal with deny group entries.
1717 DENY group1 (perms XXX)
1719 for all following allow user entries where user is in group1
1720 user entry perms = user entry perms & ~ XXX;
1722 If there is a group Everyone allow entry with permissions YYY,
1723 convert the group1 entry to an allow entry and modify its
1724 permissions to be :
1726 new_perms = YYY & ~ XXX
1728 and push to the end of the list.
1730 If there is no group Everyone allow entry then convert the
1731 group1 entry to a allow nothing entry and push to the end of the list.
1733 Note that the common case from the NT ACL choser (groupX deny all)
1734 cannot be optimised here as we need to modify user entries who are
1735 in the group to change them to a deny all also.
1737 What we're doing here is modifying the allow permissions of
1738 user entries (which are more specific in POSIX ACLs) to mask
1739 out the explicit deny set on the group they are in. This will
1740 be a snapshot depending on current group membership but is the
1741 best we can do and has the advantage of failing closed rather
1742 than open.
1743 ---------------------------------------------------------------------------
1744 Fourth pass - cope with cumulative permissions.
1746 for all allow user entries, if there exists an allow group entry with
1747 more permissive permissions, and the user is in that group, rewrite the
1748 allow user permissions to contain both sets of permissions.
1750 Currently the code for this is #ifdef'ed out as these semantics make
1751 no sense to me. JRA.
1752 ---------------------------------------------------------------------------
1754 Note we *MUST* do the deny user pass first as this will convert deny user
1755 entries into allow user entries which can then be processed by the deny
1756 group pass.
1758 The above algorithm took a *lot* of thinking about - hence this
1759 explaination :-). JRA.
1760 ****************************************************************************/
1762 /****************************************************************************
1763 Process a canon_ace list entries. This is very complex code. We need
1764 to go through and remove the "deny" permissions from any allow entry that matches
1765 the id of this entry. We have already refused any NT ACL that wasn't in correct
1766 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
1767 we just remove it (to fail safe). We have already removed any duplicate ace
1768 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
1769 allow entries.
1770 ****************************************************************************/
1772 static void process_deny_list( canon_ace **pp_ace_list )
1774 canon_ace *ace_list = *pp_ace_list;
1775 canon_ace *curr_ace = NULL;
1776 canon_ace *curr_ace_next = NULL;
1778 /* Pass 1 above - look for an Everyone, deny entry. */
1780 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1781 canon_ace *allow_ace_p;
1783 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1785 if (curr_ace->attr != DENY_ACE)
1786 continue;
1788 if (curr_ace->perms == (mode_t)0) {
1790 /* Deny nothing entry - delete. */
1792 DLIST_REMOVE(ace_list, curr_ace);
1793 continue;
1796 if (!sid_equal(&curr_ace->trustee, &global_sid_World))
1797 continue;
1799 /* JRATEST - assert. */
1800 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
1802 if (curr_ace->perms == ALL_ACE_PERMS) {
1805 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
1806 * list at this point including this entry.
1809 canon_ace *prev_entry = curr_ace->prev;
1811 free_canon_ace_list( curr_ace );
1812 if (prev_entry)
1813 prev_entry->next = NULL;
1814 else {
1815 /* We deleted the entire list. */
1816 ace_list = NULL;
1818 break;
1821 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1824 * Only mask off allow entries.
1827 if (allow_ace_p->attr != ALLOW_ACE)
1828 continue;
1830 allow_ace_p->perms &= ~curr_ace->perms;
1834 * Now it's been applied, remove it.
1837 DLIST_REMOVE(ace_list, curr_ace);
1840 /* Pass 2 above - deal with deny user entries. */
1842 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1843 mode_t new_perms = (mode_t)0;
1844 canon_ace *allow_ace_p;
1846 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1848 if (curr_ace->attr != DENY_ACE)
1849 continue;
1851 if (curr_ace->owner_type != UID_ACE)
1852 continue;
1854 if (curr_ace->perms == ALL_ACE_PERMS) {
1857 * Optimisation - this is a deny everything to this user.
1858 * Convert to an allow nothing and push to the end of the list.
1861 curr_ace->attr = ALLOW_ACE;
1862 curr_ace->perms = (mode_t)0;
1863 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1864 continue;
1867 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1869 if (allow_ace_p->attr != ALLOW_ACE)
1870 continue;
1872 /* We process GID_ACE and WORLD_ACE entries only. */
1874 if (allow_ace_p->owner_type == UID_ACE)
1875 continue;
1877 if (uid_entry_in_group( curr_ace, allow_ace_p))
1878 new_perms |= allow_ace_p->perms;
1882 * Convert to a allow entry, modify the perms and push to the end
1883 * of the list.
1886 curr_ace->attr = ALLOW_ACE;
1887 curr_ace->perms = (new_perms & ~curr_ace->perms);
1888 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1891 /* Pass 3 above - deal with deny group entries. */
1893 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1894 canon_ace *allow_ace_p;
1895 canon_ace *allow_everyone_p = NULL;
1897 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1899 if (curr_ace->attr != DENY_ACE)
1900 continue;
1902 if (curr_ace->owner_type != GID_ACE)
1903 continue;
1905 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1907 if (allow_ace_p->attr != ALLOW_ACE)
1908 continue;
1910 /* Store a pointer to the Everyone allow, if it exists. */
1911 if (allow_ace_p->owner_type == WORLD_ACE)
1912 allow_everyone_p = allow_ace_p;
1914 /* We process UID_ACE entries only. */
1916 if (allow_ace_p->owner_type != UID_ACE)
1917 continue;
1919 /* Mask off the deny group perms. */
1921 if (uid_entry_in_group( allow_ace_p, curr_ace))
1922 allow_ace_p->perms &= ~curr_ace->perms;
1926 * Convert the deny to an allow with the correct perms and
1927 * push to the end of the list.
1930 curr_ace->attr = ALLOW_ACE;
1931 if (allow_everyone_p)
1932 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
1933 else
1934 curr_ace->perms = (mode_t)0;
1935 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1938 /* Doing this fourth pass allows Windows semantics to be layered
1939 * on top of POSIX semantics. I'm not sure if this is desirable.
1940 * For example, in W2K ACLs there is no way to say, "Group X no
1941 * access, user Y full access" if user Y is a member of group X.
1942 * This seems completely broken semantics to me.... JRA.
1945 #if 0
1946 /* Pass 4 above - deal with allow entries. */
1948 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1949 canon_ace *allow_ace_p;
1951 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1953 if (curr_ace->attr != ALLOW_ACE)
1954 continue;
1956 if (curr_ace->owner_type != UID_ACE)
1957 continue;
1959 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1961 if (allow_ace_p->attr != ALLOW_ACE)
1962 continue;
1964 /* We process GID_ACE entries only. */
1966 if (allow_ace_p->owner_type != GID_ACE)
1967 continue;
1969 /* OR in the group perms. */
1971 if (uid_entry_in_group( curr_ace, allow_ace_p))
1972 curr_ace->perms |= allow_ace_p->perms;
1975 #endif
1977 *pp_ace_list = ace_list;
1980 /****************************************************************************
1981 Create a default mode that will be used if a security descriptor entry has
1982 no user/group/world entries.
1983 ****************************************************************************/
1985 static mode_t create_default_mode(files_struct *fsp, bool interitable_mode)
1987 int snum = SNUM(fsp->conn);
1988 mode_t and_bits = (mode_t)0;
1989 mode_t or_bits = (mode_t)0;
1990 mode_t mode = interitable_mode
1991 ? unix_mode( fsp->conn, FILE_ATTRIBUTE_ARCHIVE, fsp->fsp_name,
1992 NULL )
1993 : S_IRUSR;
1995 if (fsp->is_directory)
1996 mode |= (S_IWUSR|S_IXUSR);
1999 * Now AND with the create mode/directory mode bits then OR with the
2000 * force create mode/force directory mode bits.
2003 if (fsp->is_directory) {
2004 and_bits = lp_dir_security_mask(snum);
2005 or_bits = lp_force_dir_security_mode(snum);
2006 } else {
2007 and_bits = lp_security_mask(snum);
2008 or_bits = lp_force_security_mode(snum);
2011 return ((mode & and_bits)|or_bits);
2014 /****************************************************************************
2015 Unpack a SEC_DESC into two canonical ace lists. We don't depend on this
2016 succeeding.
2017 ****************************************************************************/
2019 static bool unpack_canon_ace(files_struct *fsp,
2020 SMB_STRUCT_STAT *pst,
2021 DOM_SID *pfile_owner_sid,
2022 DOM_SID *pfile_grp_sid,
2023 canon_ace **ppfile_ace, canon_ace **ppdir_ace,
2024 uint32 security_info_sent, SEC_DESC *psd)
2026 canon_ace *file_ace = NULL;
2027 canon_ace *dir_ace = NULL;
2029 *ppfile_ace = NULL;
2030 *ppdir_ace = NULL;
2032 if(security_info_sent == 0) {
2033 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2034 return False;
2038 * If no DACL then this is a chown only security descriptor.
2041 if(!(security_info_sent & DACL_SECURITY_INFORMATION) || !psd->dacl)
2042 return True;
2045 * Now go through the DACL and create the canon_ace lists.
2048 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2049 &file_ace, &dir_ace, psd->dacl))
2050 return False;
2052 if ((file_ace == NULL) && (dir_ace == NULL)) {
2053 /* W2K traverse DACL set - ignore. */
2054 return True;
2058 * Go through the canon_ace list and merge entries
2059 * belonging to identical users of identical allow or deny type.
2060 * We can do this as all deny entries come first, followed by
2061 * all allow entries (we have mandated this before accepting this acl).
2064 print_canon_ace_list( "file ace - before merge", file_ace);
2065 merge_aces( &file_ace );
2067 print_canon_ace_list( "dir ace - before merge", dir_ace);
2068 merge_aces( &dir_ace );
2071 * NT ACLs are order dependent. Go through the acl lists and
2072 * process DENY entries by masking the allow entries.
2075 print_canon_ace_list( "file ace - before deny", file_ace);
2076 process_deny_list( &file_ace);
2078 print_canon_ace_list( "dir ace - before deny", dir_ace);
2079 process_deny_list( &dir_ace);
2082 * A well formed POSIX file or default ACL has at least 3 entries, a
2083 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2084 * and optionally a mask entry. Ensure this is the case.
2087 print_canon_ace_list( "file ace - before valid", file_ace);
2090 * A default 3 element mode entry for a file should be r-- --- ---.
2091 * A default 3 element mode entry for a directory should be rwx --- ---.
2094 pst->st_mode = create_default_mode(fsp, False);
2096 if (!ensure_canon_entry_valid(&file_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2097 free_canon_ace_list(file_ace);
2098 free_canon_ace_list(dir_ace);
2099 return False;
2102 print_canon_ace_list( "dir ace - before valid", dir_ace);
2105 * A default inheritable 3 element mode entry for a directory should be the
2106 * mode Samba will use to create a file within. Ensure user rwx bits are set if
2107 * it's a directory.
2110 pst->st_mode = create_default_mode(fsp, True);
2112 if (dir_ace && !ensure_canon_entry_valid(&dir_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2113 free_canon_ace_list(file_ace);
2114 free_canon_ace_list(dir_ace);
2115 return False;
2118 print_canon_ace_list( "file ace - return", file_ace);
2119 print_canon_ace_list( "dir ace - return", dir_ace);
2121 *ppfile_ace = file_ace;
2122 *ppdir_ace = dir_ace;
2123 return True;
2127 /******************************************************************************
2128 When returning permissions, try and fit NT display
2129 semantics if possible. Note the the canon_entries here must have been malloced.
2130 The list format should be - first entry = owner, followed by group and other user
2131 entries, last entry = other.
2133 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2134 are not ordered, and match on the most specific entry rather than walking a list,
2135 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2137 Entry 0: owner : deny all except read and write.
2138 Entry 1: owner : allow read and write.
2139 Entry 2: group : deny all except read.
2140 Entry 3: group : allow read.
2141 Entry 4: Everyone : allow read.
2143 But NT cannot display this in their ACL editor !
2144 ********************************************************************************/
2146 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2148 canon_ace *list_head = *pp_list_head;
2149 canon_ace *owner_ace = NULL;
2150 canon_ace *other_ace = NULL;
2151 canon_ace *ace = NULL;
2153 for (ace = list_head; ace; ace = ace->next) {
2154 if (ace->type == SMB_ACL_USER_OBJ)
2155 owner_ace = ace;
2156 else if (ace->type == SMB_ACL_OTHER) {
2157 /* Last ace - this is "other" */
2158 other_ace = ace;
2162 if (!owner_ace || !other_ace) {
2163 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2164 filename ));
2165 return;
2169 * The POSIX algorithm applies to owner first, and other last,
2170 * so ensure they are arranged in this order.
2173 if (owner_ace) {
2174 DLIST_PROMOTE(list_head, owner_ace);
2177 if (other_ace) {
2178 DLIST_DEMOTE(list_head, other_ace, canon_ace *);
2181 /* We have probably changed the head of the list. */
2183 *pp_list_head = list_head;
2186 /****************************************************************************
2187 Create a linked list of canonical ACE entries.
2188 ****************************************************************************/
2190 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2191 const char *fname, SMB_ACL_T posix_acl,
2192 const SMB_STRUCT_STAT *psbuf,
2193 const DOM_SID *powner, const DOM_SID *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2195 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2196 canon_ace *list_head = NULL;
2197 canon_ace *ace = NULL;
2198 canon_ace *next_ace = NULL;
2199 int entry_id = SMB_ACL_FIRST_ENTRY;
2200 SMB_ACL_ENTRY_T entry;
2201 size_t ace_count;
2203 while ( posix_acl && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1)) {
2204 SMB_ACL_TAG_T tagtype;
2205 SMB_ACL_PERMSET_T permset;
2206 DOM_SID sid;
2207 posix_id unix_ug;
2208 enum ace_owner owner_type;
2210 /* get_next... */
2211 if (entry_id == SMB_ACL_FIRST_ENTRY)
2212 entry_id = SMB_ACL_NEXT_ENTRY;
2214 /* Is this a MASK entry ? */
2215 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
2216 continue;
2218 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
2219 continue;
2221 /* Decide which SID to use based on the ACL type. */
2222 switch(tagtype) {
2223 case SMB_ACL_USER_OBJ:
2224 /* Get the SID from the owner. */
2225 sid_copy(&sid, powner);
2226 unix_ug.uid = psbuf->st_uid;
2227 owner_type = UID_ACE;
2228 break;
2229 case SMB_ACL_USER:
2231 uid_t *puid = (uid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2232 if (puid == NULL) {
2233 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2234 continue;
2237 * A SMB_ACL_USER entry for the owner is shadowed by the
2238 * SMB_ACL_USER_OBJ entry and Windows also cannot represent
2239 * that entry, so we ignore it. We also don't create such
2240 * entries out of the blue when setting ACLs, so a get/set
2241 * cycle will drop them.
2243 if (the_acl_type == SMB_ACL_TYPE_ACCESS && *puid == psbuf->st_uid) {
2244 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2245 continue;
2247 uid_to_sid( &sid, *puid);
2248 unix_ug.uid = *puid;
2249 owner_type = UID_ACE;
2250 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2251 break;
2253 case SMB_ACL_GROUP_OBJ:
2254 /* Get the SID from the owning group. */
2255 sid_copy(&sid, pgroup);
2256 unix_ug.gid = psbuf->st_gid;
2257 owner_type = GID_ACE;
2258 break;
2259 case SMB_ACL_GROUP:
2261 gid_t *pgid = (gid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2262 if (pgid == NULL) {
2263 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2264 continue;
2266 gid_to_sid( &sid, *pgid);
2267 unix_ug.gid = *pgid;
2268 owner_type = GID_ACE;
2269 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)pgid,tagtype);
2270 break;
2272 case SMB_ACL_MASK:
2273 acl_mask = convert_permset_to_mode_t(conn, permset);
2274 continue; /* Don't count the mask as an entry. */
2275 case SMB_ACL_OTHER:
2276 /* Use the Everyone SID */
2277 sid = global_sid_World;
2278 unix_ug.world = -1;
2279 owner_type = WORLD_ACE;
2280 break;
2281 default:
2282 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2283 continue;
2287 * Add this entry to the list.
2290 if ((ace = SMB_MALLOC_P(canon_ace)) == NULL)
2291 goto fail;
2293 ZERO_STRUCTP(ace);
2294 ace->type = tagtype;
2295 ace->perms = convert_permset_to_mode_t(conn, permset);
2296 ace->attr = ALLOW_ACE;
2297 ace->trustee = sid;
2298 ace->unix_ug = unix_ug;
2299 ace->owner_type = owner_type;
2300 ace->inherited = get_inherited_flag(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2302 DLIST_ADD(list_head, ace);
2306 * This next call will ensure we have at least a user/group/world set.
2309 if (!ensure_canon_entry_valid(&list_head, conn->params,
2310 S_ISDIR(psbuf->st_mode), powner, pgroup,
2311 psbuf, False))
2312 goto fail;
2315 * Now go through the list, masking the permissions with the
2316 * acl_mask. Ensure all DENY Entries are at the start of the list.
2319 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2321 for ( ace_count = 0, ace = list_head; ace; ace = next_ace, ace_count++) {
2322 next_ace = ace->next;
2324 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2325 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2326 ace->perms &= acl_mask;
2328 if (ace->perms == 0) {
2329 DLIST_PROMOTE(list_head, ace);
2332 if( DEBUGLVL( 10 ) ) {
2333 print_canon_ace(ace, ace_count);
2337 arrange_posix_perms(fname,&list_head );
2339 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", list_head );
2341 return list_head;
2343 fail:
2345 free_canon_ace_list(list_head);
2346 return NULL;
2349 /****************************************************************************
2350 Check if the current user group list contains a given group.
2351 ****************************************************************************/
2353 static bool current_user_in_group(gid_t gid)
2355 int i;
2357 for (i = 0; i < current_user.ut.ngroups; i++) {
2358 if (current_user.ut.groups[i] == gid) {
2359 return True;
2363 return False;
2366 /****************************************************************************
2367 Should we override a deny ? Check 'acl group control' and 'dos filemode'.
2368 ****************************************************************************/
2370 static bool acl_group_override(connection_struct *conn,
2371 gid_t prim_gid,
2372 const char *fname)
2374 SMB_STRUCT_STAT sbuf;
2376 if ((errno != EPERM) && (errno != EACCES)) {
2377 return false;
2380 /* file primary group == user primary or supplementary group */
2381 if (lp_acl_group_control(SNUM(conn)) &&
2382 current_user_in_group(prim_gid)) {
2383 return true;
2386 /* user has writeable permission */
2387 if (lp_dos_filemode(SNUM(conn)) &&
2388 can_write_to_file(conn, fname, &sbuf)) {
2389 return true;
2392 return false;
2395 /****************************************************************************
2396 Attempt to apply an ACL to a file or directory.
2397 ****************************************************************************/
2399 static bool set_canon_ace_list(files_struct *fsp, canon_ace *the_ace, bool default_ace, gid_t prim_gid, bool *pacl_set_support)
2401 connection_struct *conn = fsp->conn;
2402 bool ret = False;
2403 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, (int)count_canon_ace_list(the_ace) + 1);
2404 canon_ace *p_ace;
2405 int i;
2406 SMB_ACL_ENTRY_T mask_entry;
2407 bool got_mask_entry = False;
2408 SMB_ACL_PERMSET_T mask_permset;
2409 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2410 bool needs_mask = False;
2411 mode_t mask_perms = 0;
2413 #if defined(POSIX_ACL_NEEDS_MASK)
2414 /* HP-UX always wants to have a mask (called "class" there). */
2415 needs_mask = True;
2416 #endif
2418 if (the_acl == NULL) {
2420 if (!no_acl_syscall_error(errno)) {
2422 * Only print this error message if we have some kind of ACL
2423 * support that's not working. Otherwise we would always get this.
2425 DEBUG(0,("set_canon_ace_list: Unable to init %s ACL. (%s)\n",
2426 default_ace ? "default" : "file", strerror(errno) ));
2428 *pacl_set_support = False;
2429 return False;
2432 if( DEBUGLVL( 10 )) {
2433 dbgtext("set_canon_ace_list: setting ACL:\n");
2434 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2435 print_canon_ace( p_ace, i);
2439 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2440 SMB_ACL_ENTRY_T the_entry;
2441 SMB_ACL_PERMSET_T the_permset;
2444 * ACLs only "need" an ACL_MASK entry if there are any named user or
2445 * named group entries. But if there is an ACL_MASK entry, it applies
2446 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2447 * so that it doesn't deny (i.e., mask off) any permissions.
2450 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2451 needs_mask = True;
2452 mask_perms |= p_ace->perms;
2453 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2454 mask_perms |= p_ace->perms;
2458 * Get the entry for this ACE.
2461 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
2462 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2463 i, strerror(errno) ));
2464 goto fail;
2467 if (p_ace->type == SMB_ACL_MASK) {
2468 mask_entry = the_entry;
2469 got_mask_entry = True;
2473 * Ok - we now know the ACL calls should be working, don't
2474 * allow fallback to chmod.
2477 *pacl_set_support = True;
2480 * Initialise the entry from the canon_ace.
2484 * First tell the entry what type of ACE this is.
2487 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, p_ace->type) == -1) {
2488 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2489 i, strerror(errno) ));
2490 goto fail;
2494 * Only set the qualifier (user or group id) if the entry is a user
2495 * or group id ACE.
2498 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2499 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&p_ace->unix_ug.uid) == -1) {
2500 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2501 i, strerror(errno) ));
2502 goto fail;
2507 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2510 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
2511 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2512 i, strerror(errno) ));
2513 goto fail;
2516 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2517 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2518 (unsigned int)p_ace->perms, i, strerror(errno) ));
2519 goto fail;
2523 * ..and apply them to the entry.
2526 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
2527 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2528 i, strerror(errno) ));
2529 goto fail;
2532 if( DEBUGLVL( 10 ))
2533 print_canon_ace( p_ace, i);
2537 if (needs_mask && !got_mask_entry) {
2538 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &mask_entry) == -1) {
2539 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2540 goto fail;
2543 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, mask_entry, SMB_ACL_MASK) == -1) {
2544 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2545 goto fail;
2548 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, mask_entry, &mask_permset) == -1) {
2549 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2550 goto fail;
2553 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2554 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2555 goto fail;
2558 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, mask_entry, mask_permset) == -1) {
2559 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2560 goto fail;
2565 * Finally apply it to the file or directory.
2568 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2569 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl) == -1) {
2571 * Some systems allow all the above calls and only fail with no ACL support
2572 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2574 if (no_acl_syscall_error(errno)) {
2575 *pacl_set_support = False;
2578 if (acl_group_override(conn, prim_gid, fsp->fsp_name)) {
2579 int sret;
2581 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2582 fsp->fsp_name ));
2584 become_root();
2585 sret = SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl);
2586 unbecome_root();
2587 if (sret == 0) {
2588 ret = True;
2592 if (ret == False) {
2593 DEBUG(2,("set_canon_ace_list: sys_acl_set_file type %s failed for file %s (%s).\n",
2594 the_acl_type == SMB_ACL_TYPE_DEFAULT ? "directory default" : "file",
2595 fsp->fsp_name, strerror(errno) ));
2596 goto fail;
2599 } else {
2600 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
2602 * Some systems allow all the above calls and only fail with no ACL support
2603 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2605 if (no_acl_syscall_error(errno)) {
2606 *pacl_set_support = False;
2609 if (acl_group_override(conn, prim_gid, fsp->fsp_name)) {
2610 int sret;
2612 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2613 fsp->fsp_name ));
2615 become_root();
2616 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
2617 unbecome_root();
2618 if (sret == 0) {
2619 ret = True;
2623 if (ret == False) {
2624 DEBUG(2,("set_canon_ace_list: sys_acl_set_file failed for file %s (%s).\n",
2625 fsp->fsp_name, strerror(errno) ));
2626 goto fail;
2631 ret = True;
2633 fail:
2635 if (the_acl != NULL) {
2636 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2639 return ret;
2642 /****************************************************************************
2643 Find a particular canon_ace entry.
2644 ****************************************************************************/
2646 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, posix_id *id)
2648 while (list) {
2649 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
2650 (type == SMB_ACL_USER && id && id->uid == list->unix_ug.uid) ||
2651 (type == SMB_ACL_GROUP && id && id->gid == list->unix_ug.gid)))
2652 break;
2653 list = list->next;
2655 return list;
2658 /****************************************************************************
2660 ****************************************************************************/
2662 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
2664 SMB_ACL_ENTRY_T entry;
2666 if (!the_acl)
2667 return NULL;
2668 if (SMB_VFS_SYS_ACL_GET_ENTRY(conn, the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
2669 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2670 return NULL;
2672 return the_acl;
2675 /****************************************************************************
2676 Convert a canon_ace to a generic 3 element permission - if possible.
2677 ****************************************************************************/
2679 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
2681 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
2683 int snum = SNUM(fsp->conn);
2684 size_t ace_count = count_canon_ace_list(file_ace_list);
2685 canon_ace *ace_p;
2686 canon_ace *owner_ace = NULL;
2687 canon_ace *group_ace = NULL;
2688 canon_ace *other_ace = NULL;
2689 mode_t and_bits;
2690 mode_t or_bits;
2692 if (ace_count != 3) {
2693 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE entries for file %s to convert to \
2694 posix perms.\n", fsp->fsp_name ));
2695 return False;
2698 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
2699 if (ace_p->owner_type == UID_ACE)
2700 owner_ace = ace_p;
2701 else if (ace_p->owner_type == GID_ACE)
2702 group_ace = ace_p;
2703 else if (ace_p->owner_type == WORLD_ACE)
2704 other_ace = ace_p;
2707 if (!owner_ace || !group_ace || !other_ace) {
2708 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get standard entries for file %s.\n",
2709 fsp->fsp_name ));
2710 return False;
2713 *posix_perms = (mode_t)0;
2715 *posix_perms |= owner_ace->perms;
2716 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
2717 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
2718 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
2719 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
2720 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
2721 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
2723 /* The owner must have at least read access. */
2725 *posix_perms |= S_IRUSR;
2726 if (fsp->is_directory)
2727 *posix_perms |= (S_IWUSR|S_IXUSR);
2729 /* If requested apply the masks. */
2731 /* Get the initial bits to apply. */
2733 if (fsp->is_directory) {
2734 and_bits = lp_dir_security_mask(snum);
2735 or_bits = lp_force_dir_security_mode(snum);
2736 } else {
2737 and_bits = lp_security_mask(snum);
2738 or_bits = lp_force_security_mode(snum);
2741 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
2743 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o to perm=0%o for file %s.\n",
2744 (int)owner_ace->perms, (int)group_ace->perms, (int)other_ace->perms, (int)*posix_perms,
2745 fsp->fsp_name ));
2747 return True;
2750 /****************************************************************************
2751 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
2752 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
2753 with CI|OI set so it is inherited and also applies to the directory.
2754 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
2755 ****************************************************************************/
2757 static size_t merge_default_aces( SEC_ACE *nt_ace_list, size_t num_aces)
2759 size_t i, j;
2761 for (i = 0; i < num_aces; i++) {
2762 for (j = i+1; j < num_aces; j++) {
2763 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2764 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2765 bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2766 bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2768 /* We know the lower number ACE's are file entries. */
2769 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
2770 (nt_ace_list[i].size == nt_ace_list[j].size) &&
2771 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
2772 sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
2773 (i_inh == j_inh) &&
2774 (i_flags_ni == 0) &&
2775 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
2776 SEC_ACE_FLAG_CONTAINER_INHERIT|
2777 SEC_ACE_FLAG_INHERIT_ONLY))) {
2779 * W2K wants to have access allowed zero access ACE's
2780 * at the end of the list. If the mask is zero, merge
2781 * the non-inherited ACE onto the inherited ACE.
2784 if (nt_ace_list[i].access_mask == 0) {
2785 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2786 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2787 if (num_aces - i - 1 > 0)
2788 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
2789 sizeof(SEC_ACE));
2791 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
2792 (unsigned int)i, (unsigned int)j ));
2793 } else {
2795 * These are identical except for the flags.
2796 * Merge the inherited ACE onto the non-inherited ACE.
2799 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2800 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2801 if (num_aces - j - 1 > 0)
2802 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
2803 sizeof(SEC_ACE));
2805 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
2806 (unsigned int)j, (unsigned int)i ));
2808 num_aces--;
2809 break;
2814 return num_aces;
2817 /****************************************************************************
2818 Reply to query a security descriptor from an fsp. If it succeeds it allocates
2819 the space for the return elements and returns the size needed to return the
2820 security descriptor. This should be the only external function needed for
2821 the UNIX style get ACL.
2822 ****************************************************************************/
2824 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
2825 const char *name,
2826 const SMB_STRUCT_STAT *sbuf,
2827 struct pai_val *pal,
2828 SMB_ACL_T posix_acl,
2829 SMB_ACL_T def_acl,
2830 uint32_t security_info,
2831 SEC_DESC **ppdesc)
2833 DOM_SID owner_sid;
2834 DOM_SID group_sid;
2835 size_t sd_size = 0;
2836 SEC_ACL *psa = NULL;
2837 size_t num_acls = 0;
2838 size_t num_def_acls = 0;
2839 size_t num_aces = 0;
2840 canon_ace *file_ace = NULL;
2841 canon_ace *dir_ace = NULL;
2842 SEC_ACE *nt_ace_list = NULL;
2843 size_t num_profile_acls = 0;
2844 SEC_DESC *psd = NULL;
2847 * Get the owner, group and world SIDs.
2850 if (lp_profile_acls(SNUM(conn))) {
2851 /* For WXP SP1 the owner must be administrators. */
2852 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
2853 sid_copy(&group_sid, &global_sid_Builtin_Users);
2854 num_profile_acls = 2;
2855 } else {
2856 create_file_sids(sbuf, &owner_sid, &group_sid);
2859 if ((security_info & DACL_SECURITY_INFORMATION) && !(security_info & PROTECTED_DACL_SECURITY_INFORMATION)) {
2862 * In the optimum case Creator Owner and Creator Group would be used for
2863 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
2864 * would lead to usability problems under Windows: The Creator entries
2865 * are only available in browse lists of directories and not for files;
2866 * additionally the identity of the owning group couldn't be determined.
2867 * We therefore use those identities only for Default ACLs.
2870 /* Create the canon_ace lists. */
2871 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
2872 &owner_sid, &group_sid, pal,
2873 SMB_ACL_TYPE_ACCESS);
2875 /* We must have *some* ACLS. */
2877 if (count_canon_ace_list(file_ace) == 0) {
2878 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
2879 goto done;
2882 if (S_ISDIR(sbuf->st_mode) && def_acl) {
2883 dir_ace = canonicalise_acl(conn, name, def_acl,
2884 sbuf,
2885 &global_sid_Creator_Owner,
2886 &global_sid_Creator_Group,
2887 pal, SMB_ACL_TYPE_DEFAULT);
2891 * Create the NT ACE list from the canonical ace lists.
2895 canon_ace *ace;
2896 enum security_ace_type nt_acl_type;
2898 if (nt4_compatible_acls() && dir_ace) {
2900 * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
2901 * but no non-INHERIT_ONLY entry for one SID. So we only
2902 * remove entries from the Access ACL if the
2903 * corresponding Default ACL entries have also been
2904 * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
2905 * are exceptions. We can do nothing
2906 * intelligent if the Default ACL contains entries that
2907 * are not also contained in the Access ACL, so this
2908 * case will still fail under NT 4.
2911 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
2912 if (ace && !ace->perms) {
2913 DLIST_REMOVE(dir_ace, ace);
2914 SAFE_FREE(ace);
2916 ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
2917 if (ace && !ace->perms) {
2918 DLIST_REMOVE(file_ace, ace);
2919 SAFE_FREE(ace);
2924 * WinNT doesn't usually have Creator Group
2925 * in browse lists, so we send this entry to
2926 * WinNT even if it contains no relevant
2927 * permissions. Once we can add
2928 * Creator Group to browse lists we can
2929 * re-enable this.
2932 #if 0
2933 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
2934 if (ace && !ace->perms) {
2935 DLIST_REMOVE(dir_ace, ace);
2936 SAFE_FREE(ace);
2938 #endif
2940 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
2941 if (ace && !ace->perms) {
2942 DLIST_REMOVE(file_ace, ace);
2943 SAFE_FREE(ace);
2947 num_acls = count_canon_ace_list(file_ace);
2948 num_def_acls = count_canon_ace_list(dir_ace);
2950 /* Allocate the ace list. */
2951 if ((nt_ace_list = SMB_MALLOC_ARRAY(SEC_ACE,num_acls + num_profile_acls + num_def_acls)) == NULL) {
2952 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
2953 goto done;
2956 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(SEC_ACE) );
2959 * Create the NT ACE list from the canonical ace lists.
2962 for (ace = file_ace; ace != NULL; ace = ace->next) {
2963 SEC_ACCESS acc;
2965 acc = map_canon_ace_perms(SNUM(conn),
2966 &nt_acl_type,
2967 ace->perms,
2968 S_ISDIR(sbuf->st_mode));
2969 init_sec_ace(&nt_ace_list[num_aces++],
2970 &ace->trustee,
2971 nt_acl_type,
2972 acc,
2973 ace->inherited ?
2974 SEC_ACE_FLAG_INHERITED_ACE : 0);
2977 /* The User must have access to a profile share - even
2978 * if we can't map the SID. */
2979 if (lp_profile_acls(SNUM(conn))) {
2980 SEC_ACCESS acc;
2982 init_sec_access(&acc,FILE_GENERIC_ALL);
2983 init_sec_ace(&nt_ace_list[num_aces++],
2984 &global_sid_Builtin_Users,
2985 SEC_ACE_TYPE_ACCESS_ALLOWED,
2986 acc, 0);
2989 for (ace = dir_ace; ace != NULL; ace = ace->next) {
2990 SEC_ACCESS acc;
2992 acc = map_canon_ace_perms(SNUM(conn),
2993 &nt_acl_type,
2994 ace->perms,
2995 S_ISDIR(sbuf->st_mode));
2996 init_sec_ace(&nt_ace_list[num_aces++],
2997 &ace->trustee,
2998 nt_acl_type,
2999 acc,
3000 SEC_ACE_FLAG_OBJECT_INHERIT|
3001 SEC_ACE_FLAG_CONTAINER_INHERIT|
3002 SEC_ACE_FLAG_INHERIT_ONLY|
3003 (ace->inherited ?
3004 SEC_ACE_FLAG_INHERITED_ACE : 0));
3007 /* The User must have access to a profile share - even
3008 * if we can't map the SID. */
3009 if (lp_profile_acls(SNUM(conn))) {
3010 SEC_ACCESS acc;
3012 init_sec_access(&acc,FILE_GENERIC_ALL);
3013 init_sec_ace(&nt_ace_list[num_aces++], &global_sid_Builtin_Users, SEC_ACE_TYPE_ACCESS_ALLOWED, acc,
3014 SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3015 SEC_ACE_FLAG_INHERIT_ONLY|0);
3019 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3020 * Win2K needs this to get the inheritance correct when replacing ACLs
3021 * on a directory tree. Based on work by Jim @ IBM.
3024 num_aces = merge_default_aces(nt_ace_list, num_aces);
3028 if (num_aces) {
3029 if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3030 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3031 goto done;
3034 } /* security_info & DACL_SECURITY_INFORMATION */
3036 psd = make_standard_sec_desc( talloc_tos(),
3037 (security_info & OWNER_SECURITY_INFORMATION) ? &owner_sid : NULL,
3038 (security_info & GROUP_SECURITY_INFORMATION) ? &group_sid : NULL,
3039 psa,
3040 &sd_size);
3042 if(!psd) {
3043 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3044 sd_size = 0;
3045 goto done;
3049 * Windows 2000: The DACL_PROTECTED flag in the security
3050 * descriptor marks the ACL as non-inheriting, i.e., no
3051 * ACEs from higher level directories propagate to this
3052 * ACL. In the POSIX ACL model permissions are only
3053 * inherited at file create time, so ACLs never contain
3054 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3055 * flag doesn't seem to bother Windows NT.
3056 * Always set this if map acl inherit is turned off.
3058 if (get_protected_flag(pal) || !lp_map_acl_inherit(SNUM(conn))) {
3059 psd->type |= SE_DESC_DACL_PROTECTED;
3062 if (psd->dacl) {
3063 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3066 *ppdesc = psd;
3068 done:
3070 if (posix_acl) {
3071 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3073 if (def_acl) {
3074 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3076 free_canon_ace_list(file_ace);
3077 free_canon_ace_list(dir_ace);
3078 free_inherited_info(pal);
3079 SAFE_FREE(nt_ace_list);
3081 return NT_STATUS_OK;
3084 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3085 SEC_DESC **ppdesc)
3087 SMB_STRUCT_STAT sbuf;
3088 SMB_ACL_T posix_acl = NULL;
3089 struct pai_val *pal;
3091 *ppdesc = NULL;
3093 DEBUG(10,("posix_fget_nt_acl: called for file %s\n", fsp->fsp_name ));
3095 /* can it happen that fsp_name == NULL ? */
3096 if (fsp->is_directory || fsp->fh->fd == -1) {
3097 return posix_get_nt_acl(fsp->conn, fsp->fsp_name,
3098 security_info, ppdesc);
3101 /* Get the stat struct for the owner info. */
3102 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3103 return map_nt_error_from_unix(errno);
3106 /* Get the ACL from the fd. */
3107 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
3109 pal = fload_inherited_info(fsp);
3111 return posix_get_nt_acl_common(fsp->conn, fsp->fsp_name, &sbuf, pal,
3112 posix_acl, NULL, security_info, ppdesc);
3115 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3116 uint32_t security_info, SEC_DESC **ppdesc)
3118 SMB_STRUCT_STAT sbuf;
3119 SMB_ACL_T posix_acl = NULL;
3120 SMB_ACL_T def_acl = NULL;
3121 struct pai_val *pal;
3123 *ppdesc = NULL;
3125 DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3127 /* Get the stat struct for the owner info. */
3128 if(SMB_VFS_STAT(conn, name, &sbuf) != 0) {
3129 return map_nt_error_from_unix(errno);
3132 /* Get the ACL from the path. */
3133 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_ACCESS);
3135 /* If it's a directory get the default POSIX ACL. */
3136 if(S_ISDIR(sbuf.st_mode)) {
3137 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_DEFAULT);
3138 def_acl = free_empty_sys_acl(conn, def_acl);
3141 pal = load_inherited_info(conn, name);
3143 return posix_get_nt_acl_common(conn, name, &sbuf, pal, posix_acl,
3144 def_acl, security_info, ppdesc);
3147 /****************************************************************************
3148 Try to chown a file. We will be able to chown it under the following conditions.
3150 1) If we have root privileges, then it will just work.
3151 2) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3152 3) If we have SeRestorePrivilege we can change the user to any other user.
3153 4) If we have write permission to the file and dos_filemodes is set
3154 then allow chown to the currently authenticated user.
3155 ****************************************************************************/
3157 int try_chown(connection_struct *conn, const char *fname, uid_t uid, gid_t gid)
3159 int ret;
3160 files_struct *fsp;
3161 SMB_STRUCT_STAT st;
3163 if(!CAN_WRITE(conn)) {
3164 return -1;
3167 /* Case (1). */
3168 /* try the direct way first */
3169 ret = SMB_VFS_CHOWN(conn, fname, uid, gid);
3170 if (ret == 0)
3171 return 0;
3173 /* Case (2) / (3) */
3174 if (lp_enable_privileges()) {
3176 bool has_take_ownership_priv = user_has_privileges(current_user.nt_user_token,
3177 &se_take_ownership);
3178 bool has_restore_priv = user_has_privileges(current_user.nt_user_token,
3179 &se_restore);
3181 /* Case (2) */
3182 if ( ( has_take_ownership_priv && ( uid == current_user.ut.uid ) ) ||
3183 /* Case (3) */
3184 ( has_restore_priv ) ) {
3186 become_root();
3187 /* Keep the current file gid the same - take ownership doesn't imply group change. */
3188 ret = SMB_VFS_CHOWN(conn, fname, uid, (gid_t)-1);
3189 unbecome_root();
3190 return ret;
3194 /* Case (4). */
3195 if (!lp_dos_filemode(SNUM(conn))) {
3196 errno = EPERM;
3197 return -1;
3200 if (SMB_VFS_STAT(conn,fname,&st)) {
3201 return -1;
3204 if (!NT_STATUS_IS_OK(open_file_fchmod(conn,fname,&st,&fsp))) {
3205 return -1;
3208 /* only allow chown to the current user. This is more secure,
3209 and also copes with the case where the SID in a take ownership ACL is
3210 a local SID on the users workstation
3212 uid = current_user.ut.uid;
3214 become_root();
3215 /* Keep the current file gid the same. */
3216 ret = SMB_VFS_FCHOWN(fsp, uid, (gid_t)-1);
3217 unbecome_root();
3219 close_file_fchmod(fsp);
3221 return ret;
3224 /****************************************************************************
3225 Take care of parent ACL inheritance.
3226 ****************************************************************************/
3228 static NTSTATUS append_parent_acl(files_struct *fsp,
3229 SMB_STRUCT_STAT *psbuf,
3230 SEC_DESC *psd,
3231 SEC_DESC **pp_new_sd)
3233 SEC_DESC *parent_sd = NULL;
3234 files_struct *parent_fsp = NULL;
3235 TALLOC_CTX *mem_ctx = talloc_parent(psd);
3236 char *parent_name = NULL;
3237 SEC_ACE *new_ace = NULL;
3238 unsigned int num_aces = psd->dacl->num_aces;
3239 SMB_STRUCT_STAT sbuf;
3240 NTSTATUS status;
3241 int info;
3242 unsigned int i, j;
3243 bool is_dacl_protected = (psd->type & SE_DESC_DACL_PROTECTED);
3245 ZERO_STRUCT(sbuf);
3247 if (mem_ctx == NULL) {
3248 return NT_STATUS_NO_MEMORY;
3251 if (!parent_dirname_talloc(mem_ctx,
3252 fsp->fsp_name,
3253 &parent_name,
3254 NULL)) {
3255 return NT_STATUS_NO_MEMORY;
3258 status = open_directory(fsp->conn,
3259 NULL,
3260 parent_name,
3261 &sbuf,
3262 FILE_READ_ATTRIBUTES, /* Just a stat open */
3263 FILE_SHARE_NONE, /* Ignored for stat opens */
3264 FILE_OPEN,
3266 INTERNAL_OPEN_ONLY,
3267 &info,
3268 &parent_fsp);
3270 if (!NT_STATUS_IS_OK(status)) {
3271 return status;
3274 status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, parent_fsp->fsp_name,
3275 DACL_SECURITY_INFORMATION, &parent_sd );
3277 close_file(parent_fsp, NORMAL_CLOSE);
3279 if (!NT_STATUS_IS_OK(status)) {
3280 return status;
3284 * Make room for potentially all the ACLs from
3285 * the parent. We used to add the ugw triple here,
3286 * as we knew we were dealing with POSIX ACLs.
3287 * We no longer need to do so as we can guarentee
3288 * that a default ACL from the parent directory will
3289 * be well formed for POSIX ACLs if it came from a
3290 * POSIX ACL source, and if we're not writing to a
3291 * POSIX ACL sink then we don't care if it's not well
3292 * formed. JRA.
3295 num_aces += parent_sd->dacl->num_aces;
3297 if((new_ace = TALLOC_ZERO_ARRAY(mem_ctx, SEC_ACE,
3298 num_aces)) == NULL) {
3299 return NT_STATUS_NO_MEMORY;
3302 /* Start by copying in all the given ACE entries. */
3303 for (i = 0; i < psd->dacl->num_aces; i++) {
3304 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3308 * Note that we're ignoring "inherit permissions" here
3309 * as that really only applies to newly created files. JRA.
3312 /* Finally append any inherited ACEs. */
3313 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3314 SEC_ACE *se = &parent_sd->dacl->aces[j];
3316 if (fsp->is_directory) {
3317 if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3318 /* Doesn't apply to a directory - ignore. */
3319 DEBUG(10,("append_parent_acl: directory %s "
3320 "ignoring non container "
3321 "inherit flags %u on ACE with sid %s "
3322 "from parent %s\n",
3323 fsp->fsp_name,
3324 (unsigned int)se->flags,
3325 sid_string_dbg(&se->trustee),
3326 parent_name));
3327 continue;
3329 } else {
3330 if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3331 /* Doesn't apply to a file - ignore. */
3332 DEBUG(10,("append_parent_acl: file %s "
3333 "ignoring non object "
3334 "inherit flags %u on ACE with sid %s "
3335 "from parent %s\n",
3336 fsp->fsp_name,
3337 (unsigned int)se->flags,
3338 sid_string_dbg(&se->trustee),
3339 parent_name));
3340 continue;
3344 if (is_dacl_protected) {
3345 /* If the DACL is protected it means we must
3346 * not overwrite an existing ACE entry with the
3347 * same SID. This is order N^2. Ouch :-(. JRA. */
3348 unsigned int k;
3349 for (k = 0; k < psd->dacl->num_aces; k++) {
3350 if (sid_equal(&psd->dacl->aces[k].trustee,
3351 &se->trustee)) {
3352 break;
3355 if (k < psd->dacl->num_aces) {
3356 /* SID matched. Ignore. */
3357 DEBUG(10,("append_parent_acl: path %s "
3358 "ignoring ACE with protected sid %s "
3359 "from parent %s\n",
3360 fsp->fsp_name,
3361 sid_string_dbg(&se->trustee),
3362 parent_name));
3363 continue;
3367 sec_ace_copy(&new_ace[i], se);
3368 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3369 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3371 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3373 if (fsp->is_directory) {
3375 * Strip off any inherit only. It's applied.
3377 new_ace[i].flags &= ~(SEC_ACE_FLAG_INHERIT_ONLY);
3378 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3379 /* No further inheritance. */
3380 new_ace[i].flags &=
3381 ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3382 SEC_ACE_FLAG_OBJECT_INHERIT);
3384 } else {
3386 * Strip off any container or inherit
3387 * flags, they can't apply to objects.
3389 new_ace[i].flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3390 SEC_ACE_FLAG_INHERIT_ONLY|
3391 SEC_ACE_FLAG_NO_PROPAGATE_INHERIT);
3393 i++;
3395 DEBUG(10,("append_parent_acl: path %s "
3396 "inheriting ACE with sid %s "
3397 "from parent %s\n",
3398 fsp->fsp_name,
3399 sid_string_dbg(&se->trustee),
3400 parent_name));
3403 /* This sucks. psd should be const and we should
3404 * be doing a deep-copy here. We're getting away
3405 * with is as we know parent_sd is talloced off
3406 * talloc_tos() as well as psd. JRA. */
3408 psd->dacl->aces = new_ace;
3409 psd->dacl->num_aces = i;
3410 psd->type &= ~(SE_DESC_DACL_AUTO_INHERITED|
3411 SE_DESC_DACL_AUTO_INHERIT_REQ);
3413 *pp_new_sd = psd;
3414 return status;
3417 /****************************************************************************
3418 Reply to set a security descriptor on an fsp. security_info_sent is the
3419 description of the following NT ACL.
3420 This should be the only external function needed for the UNIX style set ACL.
3421 ****************************************************************************/
3423 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, SEC_DESC *psd)
3425 connection_struct *conn = fsp->conn;
3426 uid_t user = (uid_t)-1;
3427 gid_t grp = (gid_t)-1;
3428 SMB_STRUCT_STAT sbuf;
3429 DOM_SID file_owner_sid;
3430 DOM_SID file_grp_sid;
3431 canon_ace *file_ace_list = NULL;
3432 canon_ace *dir_ace_list = NULL;
3433 bool acl_perms = False;
3434 mode_t orig_mode = (mode_t)0;
3435 NTSTATUS status;
3436 uid_t orig_uid;
3437 gid_t orig_gid;
3438 bool need_chown = False;
3440 DEBUG(10,("set_nt_acl: called for file %s\n", fsp->fsp_name ));
3442 if (!CAN_WRITE(conn)) {
3443 DEBUG(10,("set acl rejected on read-only share\n"));
3444 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3448 * Get the current state of the file.
3451 if(fsp->is_directory || fsp->fh->fd == -1) {
3452 if(SMB_VFS_STAT(fsp->conn,fsp->fsp_name, &sbuf) != 0)
3453 return map_nt_error_from_unix(errno);
3454 } else {
3455 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0)
3456 return map_nt_error_from_unix(errno);
3459 /* Save the original elements we check against. */
3460 orig_mode = sbuf.st_mode;
3461 orig_uid = sbuf.st_uid;
3462 orig_gid = sbuf.st_gid;
3465 * Unpack the user/group/world id's.
3468 status = unpack_nt_owners( SNUM(conn), &user, &grp, security_info_sent, psd);
3469 if (!NT_STATUS_IS_OK(status)) {
3470 return status;
3474 * Do we need to chown ?
3477 if (((user != (uid_t)-1) && (orig_uid != user)) || (( grp != (gid_t)-1) && (orig_gid != grp))) {
3478 need_chown = True;
3481 if (need_chown && (user == (uid_t)-1 || user == current_user.ut.uid)) {
3483 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3484 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3486 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3487 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3488 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3489 if (errno == EPERM) {
3490 return NT_STATUS_INVALID_OWNER;
3492 return map_nt_error_from_unix(errno);
3496 * Recheck the current state of the file, which may have changed.
3497 * (suid/sgid bits, for instance)
3500 if(fsp->is_directory) {
3501 if(SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf) != 0) {
3502 return map_nt_error_from_unix(errno);
3504 } else {
3506 int ret;
3508 if(fsp->fh->fd == -1)
3509 ret = SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf);
3510 else
3511 ret = SMB_VFS_FSTAT(fsp, &sbuf);
3513 if(ret != 0)
3514 return map_nt_error_from_unix(errno);
3517 /* Save the original elements we check against. */
3518 orig_mode = sbuf.st_mode;
3519 orig_uid = sbuf.st_uid;
3520 orig_gid = sbuf.st_gid;
3522 /* We did chown already, drop the flag */
3523 need_chown = False;
3526 create_file_sids(&sbuf, &file_owner_sid, &file_grp_sid);
3528 /* See here: http://www.codeproject.com/KB/winsdk/accessctrl2.aspx
3529 * for details and also the log trace in bug #4308. JRA.
3532 if ((security_info_sent & DACL_SECURITY_INFORMATION) &&
3533 psd->dacl != NULL &&
3534 (psd->type & (SE_DESC_DACL_AUTO_INHERITED|
3535 SE_DESC_DACL_AUTO_INHERIT_REQ))==
3536 (SE_DESC_DACL_AUTO_INHERITED|
3537 SE_DESC_DACL_AUTO_INHERIT_REQ) ) {
3538 status = append_parent_acl(fsp, &sbuf, psd, &psd);
3539 if (!NT_STATUS_IS_OK(status)) {
3540 return status;
3544 acl_perms = unpack_canon_ace( fsp, &sbuf, &file_owner_sid, &file_grp_sid,
3545 &file_ace_list, &dir_ace_list, security_info_sent, psd);
3547 /* Ignore W2K traverse DACL set. */
3548 if (file_ace_list || dir_ace_list) {
3550 if (!acl_perms) {
3551 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
3552 free_canon_ace_list(file_ace_list);
3553 free_canon_ace_list(dir_ace_list);
3554 return NT_STATUS_ACCESS_DENIED;
3558 * Only change security if we got a DACL.
3561 if((security_info_sent & DACL_SECURITY_INFORMATION) && (psd->dacl != NULL)) {
3563 bool acl_set_support = False;
3564 bool ret = False;
3567 * Try using the POSIX ACL set first. Fall back to chmod if
3568 * we have no ACL support on this filesystem.
3571 if (acl_perms && file_ace_list) {
3572 ret = set_canon_ace_list(fsp, file_ace_list, False, sbuf.st_gid, &acl_set_support);
3573 if (acl_set_support && ret == False) {
3574 DEBUG(3,("set_nt_acl: failed to set file acl on file %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3575 free_canon_ace_list(file_ace_list);
3576 free_canon_ace_list(dir_ace_list);
3577 return map_nt_error_from_unix(errno);
3581 if (acl_perms && acl_set_support && fsp->is_directory) {
3582 if (dir_ace_list) {
3583 if (!set_canon_ace_list(fsp, dir_ace_list, True, sbuf.st_gid, &acl_set_support)) {
3584 DEBUG(3,("set_nt_acl: failed to set default acl on directory %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3585 free_canon_ace_list(file_ace_list);
3586 free_canon_ace_list(dir_ace_list);
3587 return map_nt_error_from_unix(errno);
3589 } else {
3592 * No default ACL - delete one if it exists.
3595 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name) == -1) {
3596 int sret = -1;
3598 if (acl_group_override(conn, sbuf.st_gid, fsp->fsp_name)) {
3599 DEBUG(5,("set_nt_acl: acl group control on and "
3600 "current user in file %s primary group. Override delete_def_acl\n",
3601 fsp->fsp_name ));
3603 become_root();
3604 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name);
3605 unbecome_root();
3608 if (sret == -1) {
3609 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
3610 free_canon_ace_list(file_ace_list);
3611 free_canon_ace_list(dir_ace_list);
3612 return map_nt_error_from_unix(errno);
3618 if (acl_set_support) {
3619 store_inheritance_attributes(fsp, file_ace_list, dir_ace_list,
3620 (psd->type & SE_DESC_DACL_PROTECTED) ? True : False);
3624 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
3627 if(!acl_set_support && acl_perms) {
3628 mode_t posix_perms;
3630 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
3631 free_canon_ace_list(file_ace_list);
3632 free_canon_ace_list(dir_ace_list);
3633 DEBUG(3,("set_nt_acl: failed to convert file acl to posix permissions for file %s.\n",
3634 fsp->fsp_name ));
3635 return NT_STATUS_ACCESS_DENIED;
3638 if (orig_mode != posix_perms) {
3640 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
3641 fsp->fsp_name, (unsigned int)posix_perms ));
3643 if(SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms) == -1) {
3644 int sret = -1;
3645 if (acl_group_override(conn, sbuf.st_gid, fsp->fsp_name)) {
3646 DEBUG(5,("set_nt_acl: acl group control on and "
3647 "current user in file %s primary group. Override chmod\n",
3648 fsp->fsp_name ));
3650 become_root();
3651 sret = SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms);
3652 unbecome_root();
3655 if (sret == -1) {
3656 DEBUG(3,("set_nt_acl: chmod %s, 0%o failed. Error = %s.\n",
3657 fsp->fsp_name, (unsigned int)posix_perms, strerror(errno) ));
3658 free_canon_ace_list(file_ace_list);
3659 free_canon_ace_list(dir_ace_list);
3660 return map_nt_error_from_unix(errno);
3667 free_canon_ace_list(file_ace_list);
3668 free_canon_ace_list(dir_ace_list);
3671 /* Any chown pending? */
3672 if (need_chown) {
3673 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3674 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3676 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3677 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3678 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3679 if (errno == EPERM) {
3680 return NT_STATUS_INVALID_OWNER;
3682 return map_nt_error_from_unix(errno);
3686 return NT_STATUS_OK;
3689 /****************************************************************************
3690 Get the actual group bits stored on a file with an ACL. Has no effect if
3691 the file has no ACL. Needed in dosmode code where the stat() will return
3692 the mask bits, not the real group bits, for a file with an ACL.
3693 ****************************************************************************/
3695 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
3697 int entry_id = SMB_ACL_FIRST_ENTRY;
3698 SMB_ACL_ENTRY_T entry;
3699 SMB_ACL_T posix_acl;
3700 int result = -1;
3702 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
3703 if (posix_acl == (SMB_ACL_T)NULL)
3704 return -1;
3706 while (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3707 SMB_ACL_TAG_T tagtype;
3708 SMB_ACL_PERMSET_T permset;
3710 /* get_next... */
3711 if (entry_id == SMB_ACL_FIRST_ENTRY)
3712 entry_id = SMB_ACL_NEXT_ENTRY;
3714 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) ==-1)
3715 break;
3717 if (tagtype == SMB_ACL_GROUP_OBJ) {
3718 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
3719 break;
3720 } else {
3721 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
3722 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRGRP : 0);
3723 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
3724 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
3725 result = 0;
3726 break;
3730 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3731 return result;
3734 /****************************************************************************
3735 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3736 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3737 ****************************************************************************/
3739 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
3741 int entry_id = SMB_ACL_FIRST_ENTRY;
3742 SMB_ACL_ENTRY_T entry;
3743 int num_entries = 0;
3745 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3746 SMB_ACL_TAG_T tagtype;
3747 SMB_ACL_PERMSET_T permset;
3748 mode_t perms;
3750 /* get_next... */
3751 if (entry_id == SMB_ACL_FIRST_ENTRY)
3752 entry_id = SMB_ACL_NEXT_ENTRY;
3754 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
3755 return -1;
3757 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
3758 return -1;
3760 num_entries++;
3762 switch(tagtype) {
3763 case SMB_ACL_USER_OBJ:
3764 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
3765 break;
3766 case SMB_ACL_GROUP_OBJ:
3767 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
3768 break;
3769 case SMB_ACL_MASK:
3771 * FIXME: The ACL_MASK entry permissions should really be set to
3772 * the union of the permissions of all ACL_USER,
3773 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
3774 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
3776 perms = S_IRUSR|S_IWUSR|S_IXUSR;
3777 break;
3778 case SMB_ACL_OTHER:
3779 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
3780 break;
3781 default:
3782 continue;
3785 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
3786 return -1;
3788 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, entry, permset) == -1)
3789 return -1;
3793 * If this is a simple 3 element ACL or no elements then it's a standard
3794 * UNIX permission set. Just use chmod...
3797 if ((num_entries == 3) || (num_entries == 0))
3798 return -1;
3800 return 0;
3803 /****************************************************************************
3804 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
3805 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
3806 resulting ACL on TO. Note that name is in UNIX character set.
3807 ****************************************************************************/
3809 static int copy_access_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
3811 SMB_ACL_T posix_acl = NULL;
3812 int ret = -1;
3814 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
3815 return -1;
3817 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3818 goto done;
3820 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
3822 done:
3824 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3825 return ret;
3828 /****************************************************************************
3829 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3830 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3831 Note that name is in UNIX character set.
3832 ****************************************************************************/
3834 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
3836 return copy_access_acl(conn, name, name, mode);
3839 /****************************************************************************
3840 If the parent directory has no default ACL but it does have an Access ACL,
3841 inherit this Access ACL to file name.
3842 ****************************************************************************/
3844 int inherit_access_acl(connection_struct *conn, const char *inherit_from_dir,
3845 const char *name, mode_t mode)
3847 if (directory_has_default_acl(conn, inherit_from_dir))
3848 return 0;
3850 return copy_access_acl(conn, inherit_from_dir, name, mode);
3853 /****************************************************************************
3854 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3855 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3856 ****************************************************************************/
3858 int fchmod_acl(files_struct *fsp, mode_t mode)
3860 connection_struct *conn = fsp->conn;
3861 SMB_ACL_T posix_acl = NULL;
3862 int ret = -1;
3864 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp)) == NULL)
3865 return -1;
3867 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3868 goto done;
3870 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
3872 done:
3874 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3875 return ret;
3878 /****************************************************************************
3879 Check for an existing default POSIX ACL on a directory.
3880 ****************************************************************************/
3882 bool directory_has_default_acl(connection_struct *conn, const char *fname)
3884 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
3885 bool has_acl = False;
3886 SMB_ACL_ENTRY_T entry;
3888 if (def_acl != NULL && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
3889 has_acl = True;
3892 if (def_acl) {
3893 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3895 return has_acl;
3898 /****************************************************************************
3899 Map from wire type to permset.
3900 ****************************************************************************/
3902 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
3904 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
3905 return False;
3908 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1) {
3909 return False;
3912 if (wire_perm & SMB_POSIX_ACL_READ) {
3913 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1) {
3914 return False;
3917 if (wire_perm & SMB_POSIX_ACL_WRITE) {
3918 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1) {
3919 return False;
3922 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
3923 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1) {
3924 return False;
3927 return True;
3930 /****************************************************************************
3931 Map from wire type to tagtype.
3932 ****************************************************************************/
3934 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
3936 switch (wire_tt) {
3937 case SMB_POSIX_ACL_USER_OBJ:
3938 *p_tt = SMB_ACL_USER_OBJ;
3939 break;
3940 case SMB_POSIX_ACL_USER:
3941 *p_tt = SMB_ACL_USER;
3942 break;
3943 case SMB_POSIX_ACL_GROUP_OBJ:
3944 *p_tt = SMB_ACL_GROUP_OBJ;
3945 break;
3946 case SMB_POSIX_ACL_GROUP:
3947 *p_tt = SMB_ACL_GROUP;
3948 break;
3949 case SMB_POSIX_ACL_MASK:
3950 *p_tt = SMB_ACL_MASK;
3951 break;
3952 case SMB_POSIX_ACL_OTHER:
3953 *p_tt = SMB_ACL_OTHER;
3954 break;
3955 default:
3956 return False;
3958 return True;
3961 /****************************************************************************
3962 Create a new POSIX acl from wire permissions.
3963 FIXME ! How does the share mask/mode fit into this.... ?
3964 ****************************************************************************/
3966 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
3968 unsigned int i;
3969 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, num_acls);
3971 if (the_acl == NULL) {
3972 return NULL;
3975 for (i = 0; i < num_acls; i++) {
3976 SMB_ACL_ENTRY_T the_entry;
3977 SMB_ACL_PERMSET_T the_permset;
3978 SMB_ACL_TAG_T tag_type;
3980 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
3981 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
3982 i, strerror(errno) ));
3983 goto fail;
3986 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
3987 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
3988 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
3989 goto fail;
3992 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, tag_type) == -1) {
3993 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
3994 i, strerror(errno) ));
3995 goto fail;
3998 /* Get the permset pointer from the new ACL entry. */
3999 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
4000 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
4001 i, strerror(errno) ));
4002 goto fail;
4005 /* Map from wire to permissions. */
4006 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
4007 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
4008 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
4009 goto fail;
4012 /* Now apply to the new ACL entry. */
4013 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
4014 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
4015 i, strerror(errno) ));
4016 goto fail;
4019 if (tag_type == SMB_ACL_USER) {
4020 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4021 uid_t uid = (uid_t)uidval;
4022 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&uid) == -1) {
4023 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
4024 (unsigned int)uid, i, strerror(errno) ));
4025 goto fail;
4029 if (tag_type == SMB_ACL_GROUP) {
4030 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4031 gid_t gid = (uid_t)gidval;
4032 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&gid) == -1) {
4033 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
4034 (unsigned int)gid, i, strerror(errno) ));
4035 goto fail;
4040 return the_acl;
4042 fail:
4044 if (the_acl != NULL) {
4045 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
4047 return NULL;
4050 /****************************************************************************
4051 Calls from UNIX extensions - Default POSIX ACL set.
4052 If num_def_acls == 0 and not a directory just return. If it is a directory
4053 and num_def_acls == 0 then remove the default acl. Else set the default acl
4054 on the directory.
4055 ****************************************************************************/
4057 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf,
4058 uint16 num_def_acls, const char *pdata)
4060 SMB_ACL_T def_acl = NULL;
4062 if (num_def_acls && !S_ISDIR(psbuf->st_mode)) {
4063 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4064 errno = EISDIR;
4065 return False;
4068 if (!num_def_acls) {
4069 /* Remove the default ACL. */
4070 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4071 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4072 fname, strerror(errno) ));
4073 return False;
4075 return True;
4078 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
4079 return False;
4082 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4083 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4084 fname, strerror(errno) ));
4085 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4086 return False;
4089 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4090 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4091 return True;
4094 /****************************************************************************
4095 Remove an ACL from a file. As we don't have acl_delete_entry() available
4096 we must read the current acl and copy all entries except MASK, USER and GROUP
4097 to a new acl, then set that. This (at least on Linux) causes any ACL to be
4098 removed.
4099 FIXME ! How does the share mask/mode fit into this.... ?
4100 ****************************************************************************/
4102 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4104 SMB_ACL_T file_acl = NULL;
4105 int entry_id = SMB_ACL_FIRST_ENTRY;
4106 SMB_ACL_ENTRY_T entry;
4107 bool ret = False;
4108 /* Create a new ACL with only 3 entries, u/g/w. */
4109 SMB_ACL_T new_file_acl = SMB_VFS_SYS_ACL_INIT(conn, 3);
4110 SMB_ACL_ENTRY_T user_ent = NULL;
4111 SMB_ACL_ENTRY_T group_ent = NULL;
4112 SMB_ACL_ENTRY_T other_ent = NULL;
4114 if (new_file_acl == NULL) {
4115 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4116 return False;
4119 /* Now create the u/g/w entries. */
4120 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &user_ent) == -1) {
4121 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4122 fname, strerror(errno) ));
4123 goto done;
4125 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, user_ent, SMB_ACL_USER_OBJ) == -1) {
4126 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4127 fname, strerror(errno) ));
4128 goto done;
4131 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &group_ent) == -1) {
4132 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4133 fname, strerror(errno) ));
4134 goto done;
4136 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4137 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4138 fname, strerror(errno) ));
4139 goto done;
4142 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &other_ent) == -1) {
4143 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4144 fname, strerror(errno) ));
4145 goto done;
4147 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, other_ent, SMB_ACL_OTHER) == -1) {
4148 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4149 fname, strerror(errno) ));
4150 goto done;
4153 /* Get the current file ACL. */
4154 if (fsp && fsp->fh->fd != -1) {
4155 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
4156 } else {
4157 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4160 if (file_acl == NULL) {
4161 /* This is only returned if an error occurred. Even for a file with
4162 no acl a u/g/w acl should be returned. */
4163 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4164 fname, strerror(errno) ));
4165 goto done;
4168 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, file_acl, entry_id, &entry) == 1) {
4169 SMB_ACL_TAG_T tagtype;
4170 SMB_ACL_PERMSET_T permset;
4172 /* get_next... */
4173 if (entry_id == SMB_ACL_FIRST_ENTRY)
4174 entry_id = SMB_ACL_NEXT_ENTRY;
4176 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1) {
4177 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4178 fname, strerror(errno) ));
4179 goto done;
4182 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4183 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4184 fname, strerror(errno) ));
4185 goto done;
4188 if (tagtype == SMB_ACL_USER_OBJ) {
4189 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, user_ent, permset) == -1) {
4190 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4191 fname, strerror(errno) ));
4193 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4194 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, group_ent, permset) == -1) {
4195 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4196 fname, strerror(errno) ));
4198 } else if (tagtype == SMB_ACL_OTHER) {
4199 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, other_ent, permset) == -1) {
4200 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4201 fname, strerror(errno) ));
4206 /* Set the new empty file ACL. */
4207 if (fsp && fsp->fh->fd != -1) {
4208 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4209 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4210 fname, strerror(errno) ));
4211 goto done;
4213 } else {
4214 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4215 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4216 fname, strerror(errno) ));
4217 goto done;
4221 ret = True;
4223 done:
4225 if (file_acl) {
4226 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4228 if (new_file_acl) {
4229 SMB_VFS_SYS_ACL_FREE_ACL(conn, new_file_acl);
4231 return ret;
4234 /****************************************************************************
4235 Calls from UNIX extensions - POSIX ACL set.
4236 If num_def_acls == 0 then read/modify/write acl after removing all entries
4237 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4238 ****************************************************************************/
4240 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4242 SMB_ACL_T file_acl = NULL;
4244 if (!num_acls) {
4245 /* Remove the ACL from the file. */
4246 return remove_posix_acl(conn, fsp, fname);
4249 if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4250 return False;
4253 if (fsp && fsp->fh->fd != -1) {
4254 /* The preferred way - use an open fd. */
4255 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4256 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4257 fname, strerror(errno) ));
4258 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4259 return False;
4261 } else {
4262 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4263 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4264 fname, strerror(errno) ));
4265 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4266 return False;
4270 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4271 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4272 return True;
4275 /********************************************************************
4276 Pull the NT ACL from a file on disk or the OpenEventlog() access
4277 check. Caller is responsible for freeing the returned security
4278 descriptor via TALLOC_FREE(). This is designed for dealing with
4279 user space access checks in smbd outside of the VFS. For example,
4280 checking access rights in OpenEventlog().
4282 Assume we are dealing with files (for now)
4283 ********************************************************************/
4285 SEC_DESC *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname)
4287 SEC_DESC *psd, *ret_sd;
4288 connection_struct conn;
4289 files_struct finfo;
4290 struct fd_handle fh;
4292 ZERO_STRUCT( conn );
4294 if ( !(conn.mem_ctx = talloc_init( "novfs_get_nt_acl" )) ) {
4295 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4296 return NULL;
4299 if (!(conn.params = TALLOC_P(conn.mem_ctx, struct share_params))) {
4300 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4301 TALLOC_FREE(conn.mem_ctx);
4302 return NULL;
4305 conn.params->service = -1;
4307 set_conn_connectpath(&conn, "/");
4309 if (!smbd_vfs_init(&conn)) {
4310 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4311 conn_free_internal( &conn );
4312 return NULL;
4315 ZERO_STRUCT( finfo );
4316 ZERO_STRUCT( fh );
4318 finfo.fnum = -1;
4319 finfo.conn = &conn;
4320 finfo.fh = &fh;
4321 finfo.fh->fd = -1;
4322 finfo.fsp_name = CONST_DISCARD(char *,fname);
4324 if (!NT_STATUS_IS_OK(posix_fget_nt_acl( &finfo, DACL_SECURITY_INFORMATION, &psd))) {
4325 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4326 conn_free_internal( &conn );
4327 return NULL;
4330 ret_sd = dup_sec_desc( ctx, psd );
4332 conn_free_internal( &conn );
4334 return ret_sd;