Merge latest fixes to vfs_gpfs and NFS4 ACLs from Samba 3.0 CTDB branch (from http...
[Samba/bjacke.git] / source / smbd / posix_acls.c
blob6cec39f9c0103b96d62c87da42035664af47cc83
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 current_ace->type = SMB_ACL_USER;
1478 } else if (sid_to_gid( &current_ace->trustee, &current_ace->unix_ug.gid)) {
1479 current_ace->owner_type = GID_ACE;
1480 current_ace->type = SMB_ACL_GROUP;
1481 } else {
1483 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
1486 if (non_mappable_sid(&psa->trustee)) {
1487 DEBUG(10, ("create_canon_ace_lists: ignoring "
1488 "non-mappable SID %s\n",
1489 sid_string_dbg(&psa->trustee)));
1490 SAFE_FREE(current_ace);
1491 continue;
1494 free_canon_ace_list(file_ace);
1495 free_canon_ace_list(dir_ace);
1496 DEBUG(0, ("create_canon_ace_lists: unable to map SID "
1497 "%s to uid or gid.\n",
1498 sid_string_dbg(&current_ace->trustee)));
1499 SAFE_FREE(current_ace);
1500 return False;
1504 * Map the given NT permissions into a UNIX mode_t containing only
1505 * S_I(R|W|X)USR bits.
1508 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1509 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1510 current_ace->inherited = ((psa->flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False);
1513 * Now add the created ace to either the file list, the directory
1514 * list, or both. We *MUST* preserve the order here (hence we use
1515 * DLIST_ADD_END) as NT ACLs are order dependent.
1518 if (fsp->is_directory) {
1521 * We can only add to the default POSIX ACE list if the ACE is
1522 * designed to be inherited by both files and directories.
1525 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1526 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1528 DLIST_ADD_END(dir_ace, current_ace, canon_ace *);
1531 * Note if this was an allow ace. We can't process
1532 * any further deny ace's after this.
1535 if (current_ace->attr == ALLOW_ACE)
1536 got_dir_allow = True;
1538 if ((current_ace->attr == DENY_ACE) && got_dir_allow) {
1539 DEBUG(0,("create_canon_ace_lists: malformed ACL in inheritable ACL ! \
1540 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1541 free_canon_ace_list(file_ace);
1542 free_canon_ace_list(dir_ace);
1543 return False;
1546 if( DEBUGLVL( 10 )) {
1547 dbgtext("create_canon_ace_lists: adding dir ACL:\n");
1548 print_canon_ace( current_ace, 0);
1552 * If this is not an inherit only ACE we need to add a duplicate
1553 * to the file acl.
1556 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1557 canon_ace *dup_ace = dup_canon_ace(current_ace);
1559 if (!dup_ace) {
1560 DEBUG(0,("create_canon_ace_lists: malloc fail !\n"));
1561 free_canon_ace_list(file_ace);
1562 free_canon_ace_list(dir_ace);
1563 return False;
1567 * We must not free current_ace here as its
1568 * pointer is now owned by the dir_ace list.
1570 current_ace = dup_ace;
1571 } else {
1573 * We must not free current_ace here as its
1574 * pointer is now owned by the dir_ace list.
1576 current_ace = NULL;
1582 * Only add to the file ACL if not inherit only.
1585 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1586 DLIST_ADD_END(file_ace, current_ace, canon_ace *);
1589 * Note if this was an allow ace. We can't process
1590 * any further deny ace's after this.
1593 if (current_ace->attr == ALLOW_ACE)
1594 got_file_allow = True;
1596 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1597 DEBUG(0,("create_canon_ace_lists: malformed ACL in file ACL ! \
1598 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1599 free_canon_ace_list(file_ace);
1600 free_canon_ace_list(dir_ace);
1601 return False;
1604 if( DEBUGLVL( 10 )) {
1605 dbgtext("create_canon_ace_lists: adding file ACL:\n");
1606 print_canon_ace( current_ace, 0);
1608 all_aces_are_inherit_only = False;
1610 * We must not free current_ace here as its
1611 * pointer is now owned by the file_ace list.
1613 current_ace = NULL;
1617 * Free if ACE was not added.
1620 SAFE_FREE(current_ace);
1623 if (fsp->is_directory && all_aces_are_inherit_only) {
1625 * Windows 2000 is doing one of these weird 'inherit acl'
1626 * traverses to conserve NTFS ACL resources. Just pretend
1627 * there was no DACL sent. JRA.
1630 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
1631 free_canon_ace_list(file_ace);
1632 free_canon_ace_list(dir_ace);
1633 file_ace = NULL;
1634 dir_ace = NULL;
1635 } else {
1637 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in each
1638 * ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
1639 * entries can be converted to *_OBJ. Usually we will already have these
1640 * entries in the Default ACL, and the Access ACL will not have them.
1642 if (file_ace) {
1643 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
1645 if (dir_ace) {
1646 check_owning_objs(dir_ace, pfile_owner_sid, pfile_grp_sid);
1650 *ppfile_ace = file_ace;
1651 *ppdir_ace = dir_ace;
1653 return True;
1656 /****************************************************************************
1657 ASCII art time again... JRA :-).
1659 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
1660 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
1661 entries). Secondly, the merge code has ensured that all duplicate SID entries for
1662 allow or deny have been merged, so the same SID can only appear once in the deny
1663 list or once in the allow list.
1665 We then process as follows :
1667 ---------------------------------------------------------------------------
1668 First pass - look for a Everyone DENY entry.
1670 If it is deny all (rwx) trunate the list at this point.
1671 Else, walk the list from this point and use the deny permissions of this
1672 entry as a mask on all following allow entries. Finally, delete
1673 the Everyone DENY entry (we have applied it to everything possible).
1675 In addition, in this pass we remove any DENY entries that have
1676 no permissions (ie. they are a DENY nothing).
1677 ---------------------------------------------------------------------------
1678 Second pass - only deal with deny user entries.
1680 DENY user1 (perms XXX)
1682 new_perms = 0
1683 for all following allow group entries where user1 is in group
1684 new_perms |= group_perms;
1686 user1 entry perms = new_perms & ~ XXX;
1688 Convert the deny entry to an allow entry with the new perms and
1689 push to the end of the list. Note if the user was in no groups
1690 this maps to a specific allow nothing entry for this user.
1692 The common case from the NT ACL choser (userX deny all) is
1693 optimised so we don't do the group lookup - we just map to
1694 an allow nothing entry.
1696 What we're doing here is inferring the allow permissions the
1697 person setting the ACE on user1 wanted by looking at the allow
1698 permissions on the groups the user is currently in. This will
1699 be a snapshot, depending on group membership but is the best
1700 we can do and has the advantage of failing closed rather than
1701 open.
1702 ---------------------------------------------------------------------------
1703 Third pass - only deal with deny group entries.
1705 DENY group1 (perms XXX)
1707 for all following allow user entries where user is in group1
1708 user entry perms = user entry perms & ~ XXX;
1710 If there is a group Everyone allow entry with permissions YYY,
1711 convert the group1 entry to an allow entry and modify its
1712 permissions to be :
1714 new_perms = YYY & ~ XXX
1716 and push to the end of the list.
1718 If there is no group Everyone allow entry then convert the
1719 group1 entry to a allow nothing entry and push to the end of the list.
1721 Note that the common case from the NT ACL choser (groupX deny all)
1722 cannot be optimised here as we need to modify user entries who are
1723 in the group to change them to a deny all also.
1725 What we're doing here is modifying the allow permissions of
1726 user entries (which are more specific in POSIX ACLs) to mask
1727 out the explicit deny set on the group they are in. This will
1728 be a snapshot depending on current group membership but is the
1729 best we can do and has the advantage of failing closed rather
1730 than open.
1731 ---------------------------------------------------------------------------
1732 Fourth pass - cope with cumulative permissions.
1734 for all allow user entries, if there exists an allow group entry with
1735 more permissive permissions, and the user is in that group, rewrite the
1736 allow user permissions to contain both sets of permissions.
1738 Currently the code for this is #ifdef'ed out as these semantics make
1739 no sense to me. JRA.
1740 ---------------------------------------------------------------------------
1742 Note we *MUST* do the deny user pass first as this will convert deny user
1743 entries into allow user entries which can then be processed by the deny
1744 group pass.
1746 The above algorithm took a *lot* of thinking about - hence this
1747 explaination :-). JRA.
1748 ****************************************************************************/
1750 /****************************************************************************
1751 Process a canon_ace list entries. This is very complex code. We need
1752 to go through and remove the "deny" permissions from any allow entry that matches
1753 the id of this entry. We have already refused any NT ACL that wasn't in correct
1754 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
1755 we just remove it (to fail safe). We have already removed any duplicate ace
1756 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
1757 allow entries.
1758 ****************************************************************************/
1760 static void process_deny_list( canon_ace **pp_ace_list )
1762 canon_ace *ace_list = *pp_ace_list;
1763 canon_ace *curr_ace = NULL;
1764 canon_ace *curr_ace_next = NULL;
1766 /* Pass 1 above - look for an Everyone, deny entry. */
1768 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1769 canon_ace *allow_ace_p;
1771 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1773 if (curr_ace->attr != DENY_ACE)
1774 continue;
1776 if (curr_ace->perms == (mode_t)0) {
1778 /* Deny nothing entry - delete. */
1780 DLIST_REMOVE(ace_list, curr_ace);
1781 continue;
1784 if (!sid_equal(&curr_ace->trustee, &global_sid_World))
1785 continue;
1787 /* JRATEST - assert. */
1788 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
1790 if (curr_ace->perms == ALL_ACE_PERMS) {
1793 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
1794 * list at this point including this entry.
1797 canon_ace *prev_entry = curr_ace->prev;
1799 free_canon_ace_list( curr_ace );
1800 if (prev_entry)
1801 prev_entry->next = NULL;
1802 else {
1803 /* We deleted the entire list. */
1804 ace_list = NULL;
1806 break;
1809 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1812 * Only mask off allow entries.
1815 if (allow_ace_p->attr != ALLOW_ACE)
1816 continue;
1818 allow_ace_p->perms &= ~curr_ace->perms;
1822 * Now it's been applied, remove it.
1825 DLIST_REMOVE(ace_list, curr_ace);
1828 /* Pass 2 above - deal with deny user entries. */
1830 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1831 mode_t new_perms = (mode_t)0;
1832 canon_ace *allow_ace_p;
1834 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1836 if (curr_ace->attr != DENY_ACE)
1837 continue;
1839 if (curr_ace->owner_type != UID_ACE)
1840 continue;
1842 if (curr_ace->perms == ALL_ACE_PERMS) {
1845 * Optimisation - this is a deny everything to this user.
1846 * Convert to an allow nothing and push to the end of the list.
1849 curr_ace->attr = ALLOW_ACE;
1850 curr_ace->perms = (mode_t)0;
1851 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1852 continue;
1855 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1857 if (allow_ace_p->attr != ALLOW_ACE)
1858 continue;
1860 /* We process GID_ACE and WORLD_ACE entries only. */
1862 if (allow_ace_p->owner_type == UID_ACE)
1863 continue;
1865 if (uid_entry_in_group( curr_ace, allow_ace_p))
1866 new_perms |= allow_ace_p->perms;
1870 * Convert to a allow entry, modify the perms and push to the end
1871 * of the list.
1874 curr_ace->attr = ALLOW_ACE;
1875 curr_ace->perms = (new_perms & ~curr_ace->perms);
1876 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1879 /* Pass 3 above - deal with deny group entries. */
1881 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1882 canon_ace *allow_ace_p;
1883 canon_ace *allow_everyone_p = NULL;
1885 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1887 if (curr_ace->attr != DENY_ACE)
1888 continue;
1890 if (curr_ace->owner_type != GID_ACE)
1891 continue;
1893 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1895 if (allow_ace_p->attr != ALLOW_ACE)
1896 continue;
1898 /* Store a pointer to the Everyone allow, if it exists. */
1899 if (allow_ace_p->owner_type == WORLD_ACE)
1900 allow_everyone_p = allow_ace_p;
1902 /* We process UID_ACE entries only. */
1904 if (allow_ace_p->owner_type != UID_ACE)
1905 continue;
1907 /* Mask off the deny group perms. */
1909 if (uid_entry_in_group( allow_ace_p, curr_ace))
1910 allow_ace_p->perms &= ~curr_ace->perms;
1914 * Convert the deny to an allow with the correct perms and
1915 * push to the end of the list.
1918 curr_ace->attr = ALLOW_ACE;
1919 if (allow_everyone_p)
1920 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
1921 else
1922 curr_ace->perms = (mode_t)0;
1923 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1926 /* Doing this fourth pass allows Windows semantics to be layered
1927 * on top of POSIX semantics. I'm not sure if this is desirable.
1928 * For example, in W2K ACLs there is no way to say, "Group X no
1929 * access, user Y full access" if user Y is a member of group X.
1930 * This seems completely broken semantics to me.... JRA.
1933 #if 0
1934 /* Pass 4 above - deal with allow entries. */
1936 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1937 canon_ace *allow_ace_p;
1939 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1941 if (curr_ace->attr != ALLOW_ACE)
1942 continue;
1944 if (curr_ace->owner_type != UID_ACE)
1945 continue;
1947 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1949 if (allow_ace_p->attr != ALLOW_ACE)
1950 continue;
1952 /* We process GID_ACE entries only. */
1954 if (allow_ace_p->owner_type != GID_ACE)
1955 continue;
1957 /* OR in the group perms. */
1959 if (uid_entry_in_group( curr_ace, allow_ace_p))
1960 curr_ace->perms |= allow_ace_p->perms;
1963 #endif
1965 *pp_ace_list = ace_list;
1968 /****************************************************************************
1969 Create a default mode that will be used if a security descriptor entry has
1970 no user/group/world entries.
1971 ****************************************************************************/
1973 static mode_t create_default_mode(files_struct *fsp, bool interitable_mode)
1975 int snum = SNUM(fsp->conn);
1976 mode_t and_bits = (mode_t)0;
1977 mode_t or_bits = (mode_t)0;
1978 mode_t mode = interitable_mode
1979 ? unix_mode( fsp->conn, FILE_ATTRIBUTE_ARCHIVE, fsp->fsp_name,
1980 NULL )
1981 : S_IRUSR;
1983 if (fsp->is_directory)
1984 mode |= (S_IWUSR|S_IXUSR);
1987 * Now AND with the create mode/directory mode bits then OR with the
1988 * force create mode/force directory mode bits.
1991 if (fsp->is_directory) {
1992 and_bits = lp_dir_security_mask(snum);
1993 or_bits = lp_force_dir_security_mode(snum);
1994 } else {
1995 and_bits = lp_security_mask(snum);
1996 or_bits = lp_force_security_mode(snum);
1999 return ((mode & and_bits)|or_bits);
2002 /****************************************************************************
2003 Unpack a SEC_DESC into two canonical ace lists. We don't depend on this
2004 succeeding.
2005 ****************************************************************************/
2007 static bool unpack_canon_ace(files_struct *fsp,
2008 SMB_STRUCT_STAT *pst,
2009 DOM_SID *pfile_owner_sid,
2010 DOM_SID *pfile_grp_sid,
2011 canon_ace **ppfile_ace, canon_ace **ppdir_ace,
2012 uint32 security_info_sent, SEC_DESC *psd)
2014 canon_ace *file_ace = NULL;
2015 canon_ace *dir_ace = NULL;
2017 *ppfile_ace = NULL;
2018 *ppdir_ace = NULL;
2020 if(security_info_sent == 0) {
2021 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2022 return False;
2026 * If no DACL then this is a chown only security descriptor.
2029 if(!(security_info_sent & DACL_SECURITY_INFORMATION) || !psd->dacl)
2030 return True;
2033 * Now go through the DACL and create the canon_ace lists.
2036 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2037 &file_ace, &dir_ace, psd->dacl))
2038 return False;
2040 if ((file_ace == NULL) && (dir_ace == NULL)) {
2041 /* W2K traverse DACL set - ignore. */
2042 return True;
2046 * Go through the canon_ace list and merge entries
2047 * belonging to identical users of identical allow or deny type.
2048 * We can do this as all deny entries come first, followed by
2049 * all allow entries (we have mandated this before accepting this acl).
2052 print_canon_ace_list( "file ace - before merge", file_ace);
2053 merge_aces( &file_ace );
2055 print_canon_ace_list( "dir ace - before merge", dir_ace);
2056 merge_aces( &dir_ace );
2059 * NT ACLs are order dependent. Go through the acl lists and
2060 * process DENY entries by masking the allow entries.
2063 print_canon_ace_list( "file ace - before deny", file_ace);
2064 process_deny_list( &file_ace);
2066 print_canon_ace_list( "dir ace - before deny", dir_ace);
2067 process_deny_list( &dir_ace);
2070 * A well formed POSIX file or default ACL has at least 3 entries, a
2071 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2072 * and optionally a mask entry. Ensure this is the case.
2075 print_canon_ace_list( "file ace - before valid", file_ace);
2078 * A default 3 element mode entry for a file should be r-- --- ---.
2079 * A default 3 element mode entry for a directory should be rwx --- ---.
2082 pst->st_mode = create_default_mode(fsp, False);
2084 if (!ensure_canon_entry_valid(&file_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2085 free_canon_ace_list(file_ace);
2086 free_canon_ace_list(dir_ace);
2087 return False;
2090 print_canon_ace_list( "dir ace - before valid", dir_ace);
2093 * A default inheritable 3 element mode entry for a directory should be the
2094 * mode Samba will use to create a file within. Ensure user rwx bits are set if
2095 * it's a directory.
2098 pst->st_mode = create_default_mode(fsp, True);
2100 if (dir_ace && !ensure_canon_entry_valid(&dir_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2101 free_canon_ace_list(file_ace);
2102 free_canon_ace_list(dir_ace);
2103 return False;
2106 print_canon_ace_list( "file ace - return", file_ace);
2107 print_canon_ace_list( "dir ace - return", dir_ace);
2109 *ppfile_ace = file_ace;
2110 *ppdir_ace = dir_ace;
2111 return True;
2115 /******************************************************************************
2116 When returning permissions, try and fit NT display
2117 semantics if possible. Note the the canon_entries here must have been malloced.
2118 The list format should be - first entry = owner, followed by group and other user
2119 entries, last entry = other.
2121 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2122 are not ordered, and match on the most specific entry rather than walking a list,
2123 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2125 Entry 0: owner : deny all except read and write.
2126 Entry 1: owner : allow read and write.
2127 Entry 2: group : deny all except read.
2128 Entry 3: group : allow read.
2129 Entry 4: Everyone : allow read.
2131 But NT cannot display this in their ACL editor !
2132 ********************************************************************************/
2134 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2136 canon_ace *list_head = *pp_list_head;
2137 canon_ace *owner_ace = NULL;
2138 canon_ace *other_ace = NULL;
2139 canon_ace *ace = NULL;
2141 for (ace = list_head; ace; ace = ace->next) {
2142 if (ace->type == SMB_ACL_USER_OBJ)
2143 owner_ace = ace;
2144 else if (ace->type == SMB_ACL_OTHER) {
2145 /* Last ace - this is "other" */
2146 other_ace = ace;
2150 if (!owner_ace || !other_ace) {
2151 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2152 filename ));
2153 return;
2157 * The POSIX algorithm applies to owner first, and other last,
2158 * so ensure they are arranged in this order.
2161 if (owner_ace) {
2162 DLIST_PROMOTE(list_head, owner_ace);
2165 if (other_ace) {
2166 DLIST_DEMOTE(list_head, other_ace, canon_ace *);
2169 /* We have probably changed the head of the list. */
2171 *pp_list_head = list_head;
2174 /****************************************************************************
2175 Create a linked list of canonical ACE entries.
2176 ****************************************************************************/
2178 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2179 const char *fname, SMB_ACL_T posix_acl,
2180 const SMB_STRUCT_STAT *psbuf,
2181 const DOM_SID *powner, const DOM_SID *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2183 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2184 canon_ace *list_head = NULL;
2185 canon_ace *ace = NULL;
2186 canon_ace *next_ace = NULL;
2187 int entry_id = SMB_ACL_FIRST_ENTRY;
2188 SMB_ACL_ENTRY_T entry;
2189 size_t ace_count;
2191 while ( posix_acl && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1)) {
2192 SMB_ACL_TAG_T tagtype;
2193 SMB_ACL_PERMSET_T permset;
2194 DOM_SID sid;
2195 posix_id unix_ug;
2196 enum ace_owner owner_type;
2198 /* get_next... */
2199 if (entry_id == SMB_ACL_FIRST_ENTRY)
2200 entry_id = SMB_ACL_NEXT_ENTRY;
2202 /* Is this a MASK entry ? */
2203 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
2204 continue;
2206 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
2207 continue;
2209 /* Decide which SID to use based on the ACL type. */
2210 switch(tagtype) {
2211 case SMB_ACL_USER_OBJ:
2212 /* Get the SID from the owner. */
2213 sid_copy(&sid, powner);
2214 unix_ug.uid = psbuf->st_uid;
2215 owner_type = UID_ACE;
2216 break;
2217 case SMB_ACL_USER:
2219 uid_t *puid = (uid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2220 if (puid == NULL) {
2221 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2222 continue;
2225 * A SMB_ACL_USER entry for the owner is shadowed by the
2226 * SMB_ACL_USER_OBJ entry and Windows also cannot represent
2227 * that entry, so we ignore it. We also don't create such
2228 * entries out of the blue when setting ACLs, so a get/set
2229 * cycle will drop them.
2231 if (the_acl_type == SMB_ACL_TYPE_ACCESS && *puid == psbuf->st_uid) {
2232 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2233 continue;
2235 uid_to_sid( &sid, *puid);
2236 unix_ug.uid = *puid;
2237 owner_type = UID_ACE;
2238 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2239 break;
2241 case SMB_ACL_GROUP_OBJ:
2242 /* Get the SID from the owning group. */
2243 sid_copy(&sid, pgroup);
2244 unix_ug.gid = psbuf->st_gid;
2245 owner_type = GID_ACE;
2246 break;
2247 case SMB_ACL_GROUP:
2249 gid_t *pgid = (gid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2250 if (pgid == NULL) {
2251 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2252 continue;
2254 gid_to_sid( &sid, *pgid);
2255 unix_ug.gid = *pgid;
2256 owner_type = GID_ACE;
2257 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)pgid,tagtype);
2258 break;
2260 case SMB_ACL_MASK:
2261 acl_mask = convert_permset_to_mode_t(conn, permset);
2262 continue; /* Don't count the mask as an entry. */
2263 case SMB_ACL_OTHER:
2264 /* Use the Everyone SID */
2265 sid = global_sid_World;
2266 unix_ug.world = -1;
2267 owner_type = WORLD_ACE;
2268 break;
2269 default:
2270 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2271 continue;
2275 * Add this entry to the list.
2278 if ((ace = SMB_MALLOC_P(canon_ace)) == NULL)
2279 goto fail;
2281 ZERO_STRUCTP(ace);
2282 ace->type = tagtype;
2283 ace->perms = convert_permset_to_mode_t(conn, permset);
2284 ace->attr = ALLOW_ACE;
2285 ace->trustee = sid;
2286 ace->unix_ug = unix_ug;
2287 ace->owner_type = owner_type;
2288 ace->inherited = get_inherited_flag(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2290 DLIST_ADD(list_head, ace);
2294 * This next call will ensure we have at least a user/group/world set.
2297 if (!ensure_canon_entry_valid(&list_head, conn->params,
2298 S_ISDIR(psbuf->st_mode), powner, pgroup,
2299 psbuf, False))
2300 goto fail;
2303 * Now go through the list, masking the permissions with the
2304 * acl_mask. Ensure all DENY Entries are at the start of the list.
2307 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2309 for ( ace_count = 0, ace = list_head; ace; ace = next_ace, ace_count++) {
2310 next_ace = ace->next;
2312 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2313 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2314 ace->perms &= acl_mask;
2316 if (ace->perms == 0) {
2317 DLIST_PROMOTE(list_head, ace);
2320 if( DEBUGLVL( 10 ) ) {
2321 print_canon_ace(ace, ace_count);
2325 arrange_posix_perms(fname,&list_head );
2327 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", list_head );
2329 return list_head;
2331 fail:
2333 free_canon_ace_list(list_head);
2334 return NULL;
2337 /****************************************************************************
2338 Check if the current user group list contains a given group.
2339 ****************************************************************************/
2341 static bool current_user_in_group(gid_t gid)
2343 int i;
2345 for (i = 0; i < current_user.ut.ngroups; i++) {
2346 if (current_user.ut.groups[i] == gid) {
2347 return True;
2351 return False;
2354 /****************************************************************************
2355 Should we override a deny ? Check deprecated 'acl group control'
2356 and 'dos filemode'
2357 ****************************************************************************/
2359 static bool acl_group_override(connection_struct *conn, gid_t prim_gid)
2361 if ( (errno == EACCES || errno == EPERM)
2362 && (lp_acl_group_control(SNUM(conn)) || lp_dos_filemode(SNUM(conn)))
2363 && current_user_in_group(prim_gid))
2365 return True;
2368 return False;
2371 /****************************************************************************
2372 Attempt to apply an ACL to a file or directory.
2373 ****************************************************************************/
2375 static bool set_canon_ace_list(files_struct *fsp, canon_ace *the_ace, bool default_ace, gid_t prim_gid, bool *pacl_set_support)
2377 connection_struct *conn = fsp->conn;
2378 bool ret = False;
2379 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, (int)count_canon_ace_list(the_ace) + 1);
2380 canon_ace *p_ace;
2381 int i;
2382 SMB_ACL_ENTRY_T mask_entry;
2383 bool got_mask_entry = False;
2384 SMB_ACL_PERMSET_T mask_permset;
2385 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2386 bool needs_mask = False;
2387 mode_t mask_perms = 0;
2389 #if defined(POSIX_ACL_NEEDS_MASK)
2390 /* HP-UX always wants to have a mask (called "class" there). */
2391 needs_mask = True;
2392 #endif
2394 if (the_acl == NULL) {
2396 if (!no_acl_syscall_error(errno)) {
2398 * Only print this error message if we have some kind of ACL
2399 * support that's not working. Otherwise we would always get this.
2401 DEBUG(0,("set_canon_ace_list: Unable to init %s ACL. (%s)\n",
2402 default_ace ? "default" : "file", strerror(errno) ));
2404 *pacl_set_support = False;
2405 return False;
2408 if( DEBUGLVL( 10 )) {
2409 dbgtext("set_canon_ace_list: setting ACL:\n");
2410 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2411 print_canon_ace( p_ace, i);
2415 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2416 SMB_ACL_ENTRY_T the_entry;
2417 SMB_ACL_PERMSET_T the_permset;
2420 * ACLs only "need" an ACL_MASK entry if there are any named user or
2421 * named group entries. But if there is an ACL_MASK entry, it applies
2422 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2423 * so that it doesn't deny (i.e., mask off) any permissions.
2426 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2427 needs_mask = True;
2428 mask_perms |= p_ace->perms;
2429 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2430 mask_perms |= p_ace->perms;
2434 * Get the entry for this ACE.
2437 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
2438 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2439 i, strerror(errno) ));
2440 goto fail;
2443 if (p_ace->type == SMB_ACL_MASK) {
2444 mask_entry = the_entry;
2445 got_mask_entry = True;
2449 * Ok - we now know the ACL calls should be working, don't
2450 * allow fallback to chmod.
2453 *pacl_set_support = True;
2456 * Initialise the entry from the canon_ace.
2460 * First tell the entry what type of ACE this is.
2463 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, p_ace->type) == -1) {
2464 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2465 i, strerror(errno) ));
2466 goto fail;
2470 * Only set the qualifier (user or group id) if the entry is a user
2471 * or group id ACE.
2474 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2475 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&p_ace->unix_ug.uid) == -1) {
2476 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2477 i, strerror(errno) ));
2478 goto fail;
2483 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2486 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
2487 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2488 i, strerror(errno) ));
2489 goto fail;
2492 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2493 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2494 (unsigned int)p_ace->perms, i, strerror(errno) ));
2495 goto fail;
2499 * ..and apply them to the entry.
2502 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
2503 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2504 i, strerror(errno) ));
2505 goto fail;
2508 if( DEBUGLVL( 10 ))
2509 print_canon_ace( p_ace, i);
2513 if (needs_mask && !got_mask_entry) {
2514 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &mask_entry) == -1) {
2515 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2516 goto fail;
2519 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, mask_entry, SMB_ACL_MASK) == -1) {
2520 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2521 goto fail;
2524 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, mask_entry, &mask_permset) == -1) {
2525 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2526 goto fail;
2529 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2530 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2531 goto fail;
2534 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, mask_entry, mask_permset) == -1) {
2535 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2536 goto fail;
2541 * Finally apply it to the file or directory.
2544 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2545 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl) == -1) {
2547 * Some systems allow all the above calls and only fail with no ACL support
2548 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2550 if (no_acl_syscall_error(errno)) {
2551 *pacl_set_support = False;
2554 if (acl_group_override(conn, prim_gid)) {
2555 int sret;
2557 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2558 fsp->fsp_name ));
2560 become_root();
2561 sret = SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl);
2562 unbecome_root();
2563 if (sret == 0) {
2564 ret = True;
2568 if (ret == False) {
2569 DEBUG(2,("set_canon_ace_list: sys_acl_set_file type %s failed for file %s (%s).\n",
2570 the_acl_type == SMB_ACL_TYPE_DEFAULT ? "directory default" : "file",
2571 fsp->fsp_name, strerror(errno) ));
2572 goto fail;
2575 } else {
2576 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
2578 * Some systems allow all the above calls and only fail with no ACL support
2579 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2581 if (no_acl_syscall_error(errno)) {
2582 *pacl_set_support = False;
2585 if (acl_group_override(conn, prim_gid)) {
2586 int sret;
2588 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2589 fsp->fsp_name ));
2591 become_root();
2592 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
2593 unbecome_root();
2594 if (sret == 0) {
2595 ret = True;
2599 if (ret == False) {
2600 DEBUG(2,("set_canon_ace_list: sys_acl_set_file failed for file %s (%s).\n",
2601 fsp->fsp_name, strerror(errno) ));
2602 goto fail;
2607 ret = True;
2609 fail:
2611 if (the_acl != NULL) {
2612 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2615 return ret;
2618 /****************************************************************************
2619 Find a particular canon_ace entry.
2620 ****************************************************************************/
2622 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, posix_id *id)
2624 while (list) {
2625 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
2626 (type == SMB_ACL_USER && id && id->uid == list->unix_ug.uid) ||
2627 (type == SMB_ACL_GROUP && id && id->gid == list->unix_ug.gid)))
2628 break;
2629 list = list->next;
2631 return list;
2634 /****************************************************************************
2636 ****************************************************************************/
2638 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
2640 SMB_ACL_ENTRY_T entry;
2642 if (!the_acl)
2643 return NULL;
2644 if (SMB_VFS_SYS_ACL_GET_ENTRY(conn, the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
2645 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2646 return NULL;
2648 return the_acl;
2651 /****************************************************************************
2652 Convert a canon_ace to a generic 3 element permission - if possible.
2653 ****************************************************************************/
2655 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
2657 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
2659 int snum = SNUM(fsp->conn);
2660 size_t ace_count = count_canon_ace_list(file_ace_list);
2661 canon_ace *ace_p;
2662 canon_ace *owner_ace = NULL;
2663 canon_ace *group_ace = NULL;
2664 canon_ace *other_ace = NULL;
2665 mode_t and_bits;
2666 mode_t or_bits;
2668 if (ace_count != 3) {
2669 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE entries for file %s to convert to \
2670 posix perms.\n", fsp->fsp_name ));
2671 return False;
2674 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
2675 if (ace_p->owner_type == UID_ACE)
2676 owner_ace = ace_p;
2677 else if (ace_p->owner_type == GID_ACE)
2678 group_ace = ace_p;
2679 else if (ace_p->owner_type == WORLD_ACE)
2680 other_ace = ace_p;
2683 if (!owner_ace || !group_ace || !other_ace) {
2684 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get standard entries for file %s.\n",
2685 fsp->fsp_name ));
2686 return False;
2689 *posix_perms = (mode_t)0;
2691 *posix_perms |= owner_ace->perms;
2692 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
2693 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
2694 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
2695 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
2696 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
2697 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
2699 /* The owner must have at least read access. */
2701 *posix_perms |= S_IRUSR;
2702 if (fsp->is_directory)
2703 *posix_perms |= (S_IWUSR|S_IXUSR);
2705 /* If requested apply the masks. */
2707 /* Get the initial bits to apply. */
2709 if (fsp->is_directory) {
2710 and_bits = lp_dir_security_mask(snum);
2711 or_bits = lp_force_dir_security_mode(snum);
2712 } else {
2713 and_bits = lp_security_mask(snum);
2714 or_bits = lp_force_security_mode(snum);
2717 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
2719 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o to perm=0%o for file %s.\n",
2720 (int)owner_ace->perms, (int)group_ace->perms, (int)other_ace->perms, (int)*posix_perms,
2721 fsp->fsp_name ));
2723 return True;
2726 /****************************************************************************
2727 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
2728 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
2729 with CI|OI set so it is inherited and also applies to the directory.
2730 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
2731 ****************************************************************************/
2733 static size_t merge_default_aces( SEC_ACE *nt_ace_list, size_t num_aces)
2735 size_t i, j;
2737 for (i = 0; i < num_aces; i++) {
2738 for (j = i+1; j < num_aces; j++) {
2739 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2740 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2741 bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2742 bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2744 /* We know the lower number ACE's are file entries. */
2745 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
2746 (nt_ace_list[i].size == nt_ace_list[j].size) &&
2747 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
2748 sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
2749 (i_inh == j_inh) &&
2750 (i_flags_ni == 0) &&
2751 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
2752 SEC_ACE_FLAG_CONTAINER_INHERIT|
2753 SEC_ACE_FLAG_INHERIT_ONLY))) {
2755 * W2K wants to have access allowed zero access ACE's
2756 * at the end of the list. If the mask is zero, merge
2757 * the non-inherited ACE onto the inherited ACE.
2760 if (nt_ace_list[i].access_mask == 0) {
2761 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2762 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2763 if (num_aces - i - 1 > 0)
2764 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
2765 sizeof(SEC_ACE));
2767 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
2768 (unsigned int)i, (unsigned int)j ));
2769 } else {
2771 * These are identical except for the flags.
2772 * Merge the inherited ACE onto the non-inherited ACE.
2775 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2776 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2777 if (num_aces - j - 1 > 0)
2778 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
2779 sizeof(SEC_ACE));
2781 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
2782 (unsigned int)j, (unsigned int)i ));
2784 num_aces--;
2785 break;
2790 return num_aces;
2793 /****************************************************************************
2794 Reply to query a security descriptor from an fsp. If it succeeds it allocates
2795 the space for the return elements and returns the size needed to return the
2796 security descriptor. This should be the only external function needed for
2797 the UNIX style get ACL.
2798 ****************************************************************************/
2800 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
2801 const char *name,
2802 const SMB_STRUCT_STAT *sbuf,
2803 struct pai_val *pal,
2804 SMB_ACL_T posix_acl,
2805 SMB_ACL_T def_acl,
2806 uint32_t security_info,
2807 SEC_DESC **ppdesc)
2809 DOM_SID owner_sid;
2810 DOM_SID group_sid;
2811 size_t sd_size = 0;
2812 SEC_ACL *psa = NULL;
2813 size_t num_acls = 0;
2814 size_t num_def_acls = 0;
2815 size_t num_aces = 0;
2816 canon_ace *file_ace = NULL;
2817 canon_ace *dir_ace = NULL;
2818 SEC_ACE *nt_ace_list = NULL;
2819 size_t num_profile_acls = 0;
2820 SEC_DESC *psd = NULL;
2823 * Get the owner, group and world SIDs.
2826 if (lp_profile_acls(SNUM(conn))) {
2827 /* For WXP SP1 the owner must be administrators. */
2828 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
2829 sid_copy(&group_sid, &global_sid_Builtin_Users);
2830 num_profile_acls = 2;
2831 } else {
2832 create_file_sids(sbuf, &owner_sid, &group_sid);
2835 if ((security_info & DACL_SECURITY_INFORMATION) && !(security_info & PROTECTED_DACL_SECURITY_INFORMATION)) {
2838 * In the optimum case Creator Owner and Creator Group would be used for
2839 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
2840 * would lead to usability problems under Windows: The Creator entries
2841 * are only available in browse lists of directories and not for files;
2842 * additionally the identity of the owning group couldn't be determined.
2843 * We therefore use those identities only for Default ACLs.
2846 /* Create the canon_ace lists. */
2847 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
2848 &owner_sid, &group_sid, pal,
2849 SMB_ACL_TYPE_ACCESS);
2851 /* We must have *some* ACLS. */
2853 if (count_canon_ace_list(file_ace) == 0) {
2854 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
2855 goto done;
2858 if (S_ISDIR(sbuf->st_mode) && def_acl) {
2859 dir_ace = canonicalise_acl(conn, name, def_acl,
2860 sbuf,
2861 &global_sid_Creator_Owner,
2862 &global_sid_Creator_Group,
2863 pal, SMB_ACL_TYPE_DEFAULT);
2867 * Create the NT ACE list from the canonical ace lists.
2871 canon_ace *ace;
2872 enum security_ace_type nt_acl_type;
2873 int i;
2875 if (nt4_compatible_acls() && dir_ace) {
2877 * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
2878 * but no non-INHERIT_ONLY entry for one SID. So we only
2879 * remove entries from the Access ACL if the
2880 * corresponding Default ACL entries have also been
2881 * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
2882 * are exceptions. We can do nothing
2883 * intelligent if the Default ACL contains entries that
2884 * are not also contained in the Access ACL, so this
2885 * case will still fail under NT 4.
2888 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
2889 if (ace && !ace->perms) {
2890 DLIST_REMOVE(dir_ace, ace);
2891 SAFE_FREE(ace);
2893 ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
2894 if (ace && !ace->perms) {
2895 DLIST_REMOVE(file_ace, ace);
2896 SAFE_FREE(ace);
2901 * WinNT doesn't usually have Creator Group
2902 * in browse lists, so we send this entry to
2903 * WinNT even if it contains no relevant
2904 * permissions. Once we can add
2905 * Creator Group to browse lists we can
2906 * re-enable this.
2909 #if 0
2910 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
2911 if (ace && !ace->perms) {
2912 DLIST_REMOVE(dir_ace, ace);
2913 SAFE_FREE(ace);
2915 #endif
2917 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
2918 if (ace && !ace->perms) {
2919 DLIST_REMOVE(file_ace, ace);
2920 SAFE_FREE(ace);
2924 num_acls = count_canon_ace_list(file_ace);
2925 num_def_acls = count_canon_ace_list(dir_ace);
2927 /* Allocate the ace list. */
2928 if ((nt_ace_list = SMB_MALLOC_ARRAY(SEC_ACE,num_acls + num_profile_acls + num_def_acls)) == NULL) {
2929 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
2930 goto done;
2933 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(SEC_ACE) );
2936 * Create the NT ACE list from the canonical ace lists.
2939 ace = file_ace;
2941 for (i = 0; i < num_acls; i++, ace = ace->next) {
2942 SEC_ACCESS acc;
2944 acc = map_canon_ace_perms(SNUM(conn),
2945 &nt_acl_type,
2946 ace->perms,
2947 S_ISDIR(sbuf->st_mode));
2948 init_sec_ace(&nt_ace_list[num_aces++],
2949 &ace->trustee,
2950 nt_acl_type,
2951 acc,
2952 ace->inherited ?
2953 SEC_ACE_FLAG_INHERITED_ACE : 0);
2956 /* The User must have access to a profile share - even
2957 * if we can't map the SID. */
2958 if (lp_profile_acls(SNUM(conn))) {
2959 SEC_ACCESS acc;
2961 init_sec_access(&acc,FILE_GENERIC_ALL);
2962 init_sec_ace(&nt_ace_list[num_aces++],
2963 &global_sid_Builtin_Users,
2964 SEC_ACE_TYPE_ACCESS_ALLOWED,
2965 acc, 0);
2968 ace = dir_ace;
2970 for (i = 0; i < num_def_acls; i++, ace = ace->next) {
2971 SEC_ACCESS acc;
2973 acc = map_canon_ace_perms(SNUM(conn),
2974 &nt_acl_type,
2975 ace->perms,
2976 S_ISDIR(sbuf->st_mode));
2977 init_sec_ace(&nt_ace_list[num_aces++],
2978 &ace->trustee,
2979 nt_acl_type,
2980 acc,
2981 SEC_ACE_FLAG_OBJECT_INHERIT|
2982 SEC_ACE_FLAG_CONTAINER_INHERIT|
2983 SEC_ACE_FLAG_INHERIT_ONLY|
2984 (ace->inherited ?
2985 SEC_ACE_FLAG_INHERITED_ACE : 0));
2988 /* The User must have access to a profile share - even
2989 * if we can't map the SID. */
2990 if (lp_profile_acls(SNUM(conn))) {
2991 SEC_ACCESS acc;
2993 init_sec_access(&acc,FILE_GENERIC_ALL);
2994 init_sec_ace(&nt_ace_list[num_aces++], &global_sid_Builtin_Users, SEC_ACE_TYPE_ACCESS_ALLOWED, acc,
2995 SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2996 SEC_ACE_FLAG_INHERIT_ONLY|0);
3000 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3001 * Win2K needs this to get the inheritance correct when replacing ACLs
3002 * on a directory tree. Based on work by Jim @ IBM.
3005 num_aces = merge_default_aces(nt_ace_list, num_aces);
3009 if (num_aces) {
3010 if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3011 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3012 goto done;
3015 } /* security_info & DACL_SECURITY_INFORMATION */
3017 psd = make_standard_sec_desc( talloc_tos(),
3018 (security_info & OWNER_SECURITY_INFORMATION) ? &owner_sid : NULL,
3019 (security_info & GROUP_SECURITY_INFORMATION) ? &group_sid : NULL,
3020 psa,
3021 &sd_size);
3023 if(!psd) {
3024 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3025 sd_size = 0;
3026 goto done;
3030 * Windows 2000: The DACL_PROTECTED flag in the security
3031 * descriptor marks the ACL as non-inheriting, i.e., no
3032 * ACEs from higher level directories propagate to this
3033 * ACL. In the POSIX ACL model permissions are only
3034 * inherited at file create time, so ACLs never contain
3035 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3036 * flag doesn't seem to bother Windows NT.
3037 * Always set this if map acl inherit is turned off.
3039 if (get_protected_flag(pal) || !lp_map_acl_inherit(SNUM(conn))) {
3040 psd->type |= SE_DESC_DACL_PROTECTED;
3043 if (psd->dacl) {
3044 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3047 *ppdesc = psd;
3049 done:
3051 if (posix_acl) {
3052 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3054 if (def_acl) {
3055 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3057 free_canon_ace_list(file_ace);
3058 free_canon_ace_list(dir_ace);
3059 free_inherited_info(pal);
3060 SAFE_FREE(nt_ace_list);
3062 return NT_STATUS_OK;
3065 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3066 SEC_DESC **ppdesc)
3068 SMB_STRUCT_STAT sbuf;
3069 SMB_ACL_T posix_acl = NULL;
3070 struct pai_val *pal;
3072 *ppdesc = NULL;
3074 DEBUG(10,("posix_fget_nt_acl: called for file %s\n", fsp->fsp_name ));
3076 /* can it happen that fsp_name == NULL ? */
3077 if (fsp->is_directory || fsp->fh->fd == -1) {
3078 return posix_get_nt_acl(fsp->conn, fsp->fsp_name,
3079 security_info, ppdesc);
3082 /* Get the stat struct for the owner info. */
3083 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3084 return map_nt_error_from_unix(errno);
3087 /* Get the ACL from the fd. */
3088 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
3090 pal = fload_inherited_info(fsp);
3092 return posix_get_nt_acl_common(fsp->conn, fsp->fsp_name, &sbuf, pal,
3093 posix_acl, NULL, security_info, ppdesc);
3096 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3097 uint32_t security_info, SEC_DESC **ppdesc)
3099 SMB_STRUCT_STAT sbuf;
3100 SMB_ACL_T posix_acl = NULL;
3101 SMB_ACL_T def_acl = NULL;
3102 struct pai_val *pal;
3104 *ppdesc = NULL;
3106 DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3108 /* Get the stat struct for the owner info. */
3109 if(SMB_VFS_STAT(conn, name, &sbuf) != 0) {
3110 return map_nt_error_from_unix(errno);
3113 /* Get the ACL from the path. */
3114 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_ACCESS);
3116 /* If it's a directory get the default POSIX ACL. */
3117 if(S_ISDIR(sbuf.st_mode)) {
3118 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_DEFAULT);
3119 def_acl = free_empty_sys_acl(conn, def_acl);
3122 pal = load_inherited_info(conn, name);
3124 return posix_get_nt_acl_common(conn, name, &sbuf, pal, posix_acl,
3125 def_acl, security_info, ppdesc);
3128 /****************************************************************************
3129 Try to chown a file. We will be able to chown it under the following conditions.
3131 1) If we have root privileges, then it will just work.
3132 2) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3133 3) If we have SeRestorePrivilege we can change the user to any other user.
3134 4) If we have write permission to the file and dos_filemodes is set
3135 then allow chown to the currently authenticated user.
3136 ****************************************************************************/
3138 int try_chown(connection_struct *conn, const char *fname, uid_t uid, gid_t gid)
3140 int ret;
3141 files_struct *fsp;
3142 SMB_STRUCT_STAT st;
3144 if(!CAN_WRITE(conn)) {
3145 return -1;
3148 /* Case (1). */
3149 /* try the direct way first */
3150 ret = SMB_VFS_CHOWN(conn, fname, uid, gid);
3151 if (ret == 0)
3152 return 0;
3154 /* Case (2) / (3) */
3155 if (lp_enable_privileges()) {
3157 bool has_take_ownership_priv = user_has_privileges(current_user.nt_user_token,
3158 &se_take_ownership);
3159 bool has_restore_priv = user_has_privileges(current_user.nt_user_token,
3160 &se_restore);
3162 /* Case (2) */
3163 if ( ( has_take_ownership_priv && ( uid == current_user.ut.uid ) ) ||
3164 /* Case (3) */
3165 ( has_restore_priv ) ) {
3167 become_root();
3168 /* Keep the current file gid the same - take ownership doesn't imply group change. */
3169 ret = SMB_VFS_CHOWN(conn, fname, uid, (gid_t)-1);
3170 unbecome_root();
3171 return ret;
3175 /* Case (4). */
3176 if (!lp_dos_filemode(SNUM(conn))) {
3177 errno = EPERM;
3178 return -1;
3181 if (SMB_VFS_STAT(conn,fname,&st)) {
3182 return -1;
3185 if (!NT_STATUS_IS_OK(open_file_fchmod(conn,fname,&st,&fsp))) {
3186 return -1;
3189 /* only allow chown to the current user. This is more secure,
3190 and also copes with the case where the SID in a take ownership ACL is
3191 a local SID on the users workstation
3193 uid = current_user.ut.uid;
3195 become_root();
3196 /* Keep the current file gid the same. */
3197 ret = SMB_VFS_FCHOWN(fsp, uid, (gid_t)-1);
3198 unbecome_root();
3200 close_file_fchmod(fsp);
3202 return ret;
3205 static NTSTATUS append_ugw_ace(files_struct *fsp,
3206 SMB_STRUCT_STAT *psbuf,
3207 mode_t unx_mode,
3208 int ugw,
3209 SEC_ACE *se)
3211 mode_t perms;
3212 SEC_ACCESS acc;
3213 enum security_ace_type nt_acl_type;
3214 DOM_SID trustee;
3216 switch (ugw) {
3217 case S_IRUSR:
3218 perms = unix_perms_to_acl_perms(unx_mode,
3219 S_IRUSR,
3220 S_IWUSR,
3221 S_IXUSR);
3222 uid_to_sid(&trustee, psbuf->st_uid );
3223 break;
3224 case S_IRGRP:
3225 perms = unix_perms_to_acl_perms(unx_mode,
3226 S_IRGRP,
3227 S_IWGRP,
3228 S_IXGRP);
3229 gid_to_sid(&trustee, psbuf->st_gid );
3230 break;
3231 case S_IROTH:
3232 perms = unix_perms_to_acl_perms(unx_mode,
3233 S_IROTH,
3234 S_IWOTH,
3235 S_IXOTH);
3236 sid_copy(&trustee, &global_sid_World);
3237 break;
3238 default:
3239 return NT_STATUS_INVALID_PARAMETER;
3241 acc = map_canon_ace_perms(SNUM(fsp->conn),
3242 &nt_acl_type,
3243 perms,
3244 fsp->is_directory);
3246 init_sec_ace(se,
3247 &trustee,
3248 nt_acl_type,
3249 acc,
3251 return NT_STATUS_OK;
3254 /****************************************************************************
3255 If this is an
3256 ****************************************************************************/
3258 static NTSTATUS append_parent_acl(files_struct *fsp,
3259 SMB_STRUCT_STAT *psbuf,
3260 SEC_DESC *psd,
3261 SEC_DESC **pp_new_sd)
3263 SEC_DESC *parent_sd = NULL;
3264 files_struct *parent_fsp = NULL;
3265 TALLOC_CTX *mem_ctx = talloc_parent(psd);
3266 char *parent_name = NULL;
3267 SEC_ACE *new_ace = NULL;
3268 unsigned int num_aces = psd->dacl->num_aces;
3269 SMB_STRUCT_STAT sbuf;
3270 NTSTATUS status;
3271 int info;
3272 unsigned int i, j;
3273 mode_t unx_mode;
3275 ZERO_STRUCT(sbuf);
3277 if (mem_ctx == NULL) {
3278 return NT_STATUS_NO_MEMORY;
3281 if (!parent_dirname_talloc(mem_ctx,
3282 fsp->fsp_name,
3283 &parent_name,
3284 NULL)) {
3285 return NT_STATUS_NO_MEMORY;
3288 /* Create a default mode for u/g/w. */
3289 unx_mode = unix_mode(fsp->conn,
3290 aARCH | (fsp->is_directory ? aDIR : 0),
3291 fsp->fsp_name,
3292 parent_name);
3294 status = open_directory(fsp->conn,
3295 NULL,
3296 parent_name,
3297 &sbuf,
3298 FILE_READ_ATTRIBUTES, /* Just a stat open */
3299 FILE_SHARE_NONE, /* Ignored for stat opens */
3300 FILE_OPEN,
3302 INTERNAL_OPEN_ONLY,
3303 &info,
3304 &parent_fsp);
3306 if (!NT_STATUS_IS_OK(status)) {
3307 return status;
3310 status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, parent_fsp->fsp_name,
3311 DACL_SECURITY_INFORMATION, &parent_sd );
3313 close_file(parent_fsp, NORMAL_CLOSE);
3315 if (!NT_STATUS_IS_OK(status)) {
3316 return status;
3320 * Make room for potentially all the ACLs from
3321 * the parent, plus the user/group/other triple.
3324 num_aces += parent_sd->dacl->num_aces + 3;
3326 if((new_ace = TALLOC_ZERO_ARRAY(mem_ctx, SEC_ACE,
3327 num_aces)) == NULL) {
3328 return NT_STATUS_NO_MEMORY;
3331 DEBUG(10,("append_parent_acl: parent ACL has %u entries. New "
3332 "ACL has %u entries\n",
3333 parent_sd->dacl->num_aces, num_aces ));
3335 /* Start by copying in all the given ACE entries. */
3336 for (i = 0; i < psd->dacl->num_aces; i++) {
3337 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3341 * Note that we're ignoring "inherit permissions" here
3342 * as that really only applies to newly created files. JRA.
3346 * Append u/g/w.
3349 status = append_ugw_ace(fsp, psbuf, unx_mode, S_IRUSR, &new_ace[i++]);
3350 if (!NT_STATUS_IS_OK(status)) {
3351 return status;
3353 status = append_ugw_ace(fsp, psbuf, unx_mode, S_IRGRP, &new_ace[i++]);
3354 if (!NT_STATUS_IS_OK(status)) {
3355 return status;
3357 status = append_ugw_ace(fsp, psbuf, unx_mode, S_IROTH, &new_ace[i++]);
3358 if (!NT_STATUS_IS_OK(status)) {
3359 return status;
3362 /* Finally append any inherited ACEs. */
3363 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3364 SEC_ACE *se = &parent_sd->dacl->aces[j];
3365 uint32 i_flags = se->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|
3366 SEC_ACE_FLAG_CONTAINER_INHERIT|
3367 SEC_ACE_FLAG_INHERIT_ONLY);
3369 if (fsp->is_directory) {
3370 if (i_flags == SEC_ACE_FLAG_OBJECT_INHERIT) {
3371 /* Should only apply to a file - ignore. */
3372 continue;
3374 } else {
3375 if ((i_flags & (SEC_ACE_FLAG_OBJECT_INHERIT|
3376 SEC_ACE_FLAG_INHERIT_ONLY)) !=
3377 SEC_ACE_FLAG_OBJECT_INHERIT) {
3378 /* Should not apply to a file - ignore. */
3379 continue;
3382 sec_ace_copy(&new_ace[i], se);
3383 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3384 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3386 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3387 i++;
3390 parent_sd->dacl->aces = new_ace;
3391 parent_sd->dacl->num_aces = i;
3393 *pp_new_sd = parent_sd;
3394 return status;
3397 /****************************************************************************
3398 Reply to set a security descriptor on an fsp. security_info_sent is the
3399 description of the following NT ACL.
3400 This should be the only external function needed for the UNIX style set ACL.
3401 ****************************************************************************/
3403 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, SEC_DESC *psd)
3405 connection_struct *conn = fsp->conn;
3406 uid_t user = (uid_t)-1;
3407 gid_t grp = (gid_t)-1;
3408 SMB_STRUCT_STAT sbuf;
3409 DOM_SID file_owner_sid;
3410 DOM_SID file_grp_sid;
3411 canon_ace *file_ace_list = NULL;
3412 canon_ace *dir_ace_list = NULL;
3413 bool acl_perms = False;
3414 mode_t orig_mode = (mode_t)0;
3415 NTSTATUS status;
3416 uid_t orig_uid;
3417 gid_t orig_gid;
3418 bool need_chown = False;
3420 DEBUG(10,("set_nt_acl: called for file %s\n", fsp->fsp_name ));
3422 if (!CAN_WRITE(conn)) {
3423 DEBUG(10,("set acl rejected on read-only share\n"));
3424 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3428 * Get the current state of the file.
3431 if(fsp->is_directory || fsp->fh->fd == -1) {
3432 if(SMB_VFS_STAT(fsp->conn,fsp->fsp_name, &sbuf) != 0)
3433 return map_nt_error_from_unix(errno);
3434 } else {
3435 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0)
3436 return map_nt_error_from_unix(errno);
3439 /* Save the original elements we check against. */
3440 orig_mode = sbuf.st_mode;
3441 orig_uid = sbuf.st_uid;
3442 orig_gid = sbuf.st_gid;
3445 * Unpack the user/group/world id's.
3448 status = unpack_nt_owners( SNUM(conn), &user, &grp, security_info_sent, psd);
3449 if (!NT_STATUS_IS_OK(status)) {
3450 return status;
3454 * Do we need to chown ?
3457 if (((user != (uid_t)-1) && (orig_uid != user)) || (( grp != (gid_t)-1) && (orig_gid != grp))) {
3458 need_chown = True;
3461 if (need_chown && (user == (uid_t)-1 || user == current_user.ut.uid)) {
3463 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3464 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3466 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3467 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3468 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3469 if (errno == EPERM) {
3470 return NT_STATUS_INVALID_OWNER;
3472 return map_nt_error_from_unix(errno);
3476 * Recheck the current state of the file, which may have changed.
3477 * (suid/sgid bits, for instance)
3480 if(fsp->is_directory) {
3481 if(SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf) != 0) {
3482 return map_nt_error_from_unix(errno);
3484 } else {
3486 int ret;
3488 if(fsp->fh->fd == -1)
3489 ret = SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf);
3490 else
3491 ret = SMB_VFS_FSTAT(fsp, &sbuf);
3493 if(ret != 0)
3494 return map_nt_error_from_unix(errno);
3497 /* Save the original elements we check against. */
3498 orig_mode = sbuf.st_mode;
3499 orig_uid = sbuf.st_uid;
3500 orig_gid = sbuf.st_gid;
3502 /* We did chown already, drop the flag */
3503 need_chown = False;
3506 create_file_sids(&sbuf, &file_owner_sid, &file_grp_sid);
3508 if ((security_info_sent & DACL_SECURITY_INFORMATION) &&
3509 psd->dacl != NULL &&
3510 (psd->type & (SE_DESC_DACL_AUTO_INHERITED|
3511 SE_DESC_DACL_AUTO_INHERIT_REQ))==
3512 (SE_DESC_DACL_AUTO_INHERITED|
3513 SE_DESC_DACL_AUTO_INHERIT_REQ) ) {
3514 status = append_parent_acl(fsp, &sbuf, psd, &psd);
3515 if (!NT_STATUS_IS_OK(status)) {
3516 return status;
3520 acl_perms = unpack_canon_ace( fsp, &sbuf, &file_owner_sid, &file_grp_sid,
3521 &file_ace_list, &dir_ace_list, security_info_sent, psd);
3523 /* Ignore W2K traverse DACL set. */
3524 if (file_ace_list || dir_ace_list) {
3526 if (!acl_perms) {
3527 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
3528 free_canon_ace_list(file_ace_list);
3529 free_canon_ace_list(dir_ace_list);
3530 return NT_STATUS_ACCESS_DENIED;
3534 * Only change security if we got a DACL.
3537 if((security_info_sent & DACL_SECURITY_INFORMATION) && (psd->dacl != NULL)) {
3539 bool acl_set_support = False;
3540 bool ret = False;
3543 * Try using the POSIX ACL set first. Fall back to chmod if
3544 * we have no ACL support on this filesystem.
3547 if (acl_perms && file_ace_list) {
3548 ret = set_canon_ace_list(fsp, file_ace_list, False, sbuf.st_gid, &acl_set_support);
3549 if (acl_set_support && ret == False) {
3550 DEBUG(3,("set_nt_acl: failed to set file acl on file %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3551 free_canon_ace_list(file_ace_list);
3552 free_canon_ace_list(dir_ace_list);
3553 return map_nt_error_from_unix(errno);
3557 if (acl_perms && acl_set_support && fsp->is_directory) {
3558 if (dir_ace_list) {
3559 if (!set_canon_ace_list(fsp, dir_ace_list, True, sbuf.st_gid, &acl_set_support)) {
3560 DEBUG(3,("set_nt_acl: failed to set default acl on directory %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3561 free_canon_ace_list(file_ace_list);
3562 free_canon_ace_list(dir_ace_list);
3563 return map_nt_error_from_unix(errno);
3565 } else {
3568 * No default ACL - delete one if it exists.
3571 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name) == -1) {
3572 int sret = -1;
3574 if (acl_group_override(conn, sbuf.st_gid)) {
3575 DEBUG(5,("set_nt_acl: acl group control on and "
3576 "current user in file %s primary group. Override delete_def_acl\n",
3577 fsp->fsp_name ));
3579 become_root();
3580 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name);
3581 unbecome_root();
3584 if (sret == -1) {
3585 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
3586 free_canon_ace_list(file_ace_list);
3587 free_canon_ace_list(dir_ace_list);
3588 return map_nt_error_from_unix(errno);
3594 if (acl_set_support) {
3595 store_inheritance_attributes(fsp, file_ace_list, dir_ace_list,
3596 (psd->type & SE_DESC_DACL_PROTECTED) ? True : False);
3600 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
3603 if(!acl_set_support && acl_perms) {
3604 mode_t posix_perms;
3606 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
3607 free_canon_ace_list(file_ace_list);
3608 free_canon_ace_list(dir_ace_list);
3609 DEBUG(3,("set_nt_acl: failed to convert file acl to posix permissions for file %s.\n",
3610 fsp->fsp_name ));
3611 return NT_STATUS_ACCESS_DENIED;
3614 if (orig_mode != posix_perms) {
3616 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
3617 fsp->fsp_name, (unsigned int)posix_perms ));
3619 if(SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms) == -1) {
3620 int sret = -1;
3621 if (acl_group_override(conn, sbuf.st_gid)) {
3622 DEBUG(5,("set_nt_acl: acl group control on and "
3623 "current user in file %s primary group. Override chmod\n",
3624 fsp->fsp_name ));
3626 become_root();
3627 sret = SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms);
3628 unbecome_root();
3631 if (sret == -1) {
3632 DEBUG(3,("set_nt_acl: chmod %s, 0%o failed. Error = %s.\n",
3633 fsp->fsp_name, (unsigned int)posix_perms, strerror(errno) ));
3634 free_canon_ace_list(file_ace_list);
3635 free_canon_ace_list(dir_ace_list);
3636 return map_nt_error_from_unix(errno);
3643 free_canon_ace_list(file_ace_list);
3644 free_canon_ace_list(dir_ace_list);
3647 /* Any chown pending? */
3648 if (need_chown) {
3649 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3650 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3652 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3653 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3654 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3655 if (errno == EPERM) {
3656 return NT_STATUS_INVALID_OWNER;
3658 return map_nt_error_from_unix(errno);
3662 return NT_STATUS_OK;
3665 /****************************************************************************
3666 Get the actual group bits stored on a file with an ACL. Has no effect if
3667 the file has no ACL. Needed in dosmode code where the stat() will return
3668 the mask bits, not the real group bits, for a file with an ACL.
3669 ****************************************************************************/
3671 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
3673 int entry_id = SMB_ACL_FIRST_ENTRY;
3674 SMB_ACL_ENTRY_T entry;
3675 SMB_ACL_T posix_acl;
3676 int result = -1;
3678 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
3679 if (posix_acl == (SMB_ACL_T)NULL)
3680 return -1;
3682 while (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3683 SMB_ACL_TAG_T tagtype;
3684 SMB_ACL_PERMSET_T permset;
3686 /* get_next... */
3687 if (entry_id == SMB_ACL_FIRST_ENTRY)
3688 entry_id = SMB_ACL_NEXT_ENTRY;
3690 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) ==-1)
3691 break;
3693 if (tagtype == SMB_ACL_GROUP_OBJ) {
3694 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
3695 break;
3696 } else {
3697 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
3698 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRGRP : 0);
3699 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
3700 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
3701 result = 0;
3702 break;
3706 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3707 return result;
3710 /****************************************************************************
3711 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3712 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3713 ****************************************************************************/
3715 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
3717 int entry_id = SMB_ACL_FIRST_ENTRY;
3718 SMB_ACL_ENTRY_T entry;
3719 int num_entries = 0;
3721 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3722 SMB_ACL_TAG_T tagtype;
3723 SMB_ACL_PERMSET_T permset;
3724 mode_t perms;
3726 /* get_next... */
3727 if (entry_id == SMB_ACL_FIRST_ENTRY)
3728 entry_id = SMB_ACL_NEXT_ENTRY;
3730 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
3731 return -1;
3733 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
3734 return -1;
3736 num_entries++;
3738 switch(tagtype) {
3739 case SMB_ACL_USER_OBJ:
3740 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
3741 break;
3742 case SMB_ACL_GROUP_OBJ:
3743 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
3744 break;
3745 case SMB_ACL_MASK:
3747 * FIXME: The ACL_MASK entry permissions should really be set to
3748 * the union of the permissions of all ACL_USER,
3749 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
3750 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
3752 perms = S_IRUSR|S_IWUSR|S_IXUSR;
3753 break;
3754 case SMB_ACL_OTHER:
3755 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
3756 break;
3757 default:
3758 continue;
3761 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
3762 return -1;
3764 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, entry, permset) == -1)
3765 return -1;
3769 * If this is a simple 3 element ACL or no elements then it's a standard
3770 * UNIX permission set. Just use chmod...
3773 if ((num_entries == 3) || (num_entries == 0))
3774 return -1;
3776 return 0;
3779 /****************************************************************************
3780 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
3781 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
3782 resulting ACL on TO. Note that name is in UNIX character set.
3783 ****************************************************************************/
3785 static int copy_access_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
3787 SMB_ACL_T posix_acl = NULL;
3788 int ret = -1;
3790 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
3791 return -1;
3793 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3794 goto done;
3796 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
3798 done:
3800 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3801 return ret;
3804 /****************************************************************************
3805 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3806 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3807 Note that name is in UNIX character set.
3808 ****************************************************************************/
3810 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
3812 return copy_access_acl(conn, name, name, mode);
3815 /****************************************************************************
3816 If the parent directory has no default ACL but it does have an Access ACL,
3817 inherit this Access ACL to file name.
3818 ****************************************************************************/
3820 int inherit_access_acl(connection_struct *conn, const char *inherit_from_dir,
3821 const char *name, mode_t mode)
3823 if (directory_has_default_acl(conn, inherit_from_dir))
3824 return 0;
3826 return copy_access_acl(conn, inherit_from_dir, name, mode);
3829 /****************************************************************************
3830 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3831 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3832 ****************************************************************************/
3834 int fchmod_acl(files_struct *fsp, mode_t mode)
3836 connection_struct *conn = fsp->conn;
3837 SMB_ACL_T posix_acl = NULL;
3838 int ret = -1;
3840 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp)) == NULL)
3841 return -1;
3843 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3844 goto done;
3846 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
3848 done:
3850 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3851 return ret;
3854 /****************************************************************************
3855 Check for an existing default POSIX ACL on a directory.
3856 ****************************************************************************/
3858 bool directory_has_default_acl(connection_struct *conn, const char *fname)
3860 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
3861 bool has_acl = False;
3862 SMB_ACL_ENTRY_T entry;
3864 if (def_acl != NULL && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
3865 has_acl = True;
3868 if (def_acl) {
3869 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3871 return has_acl;
3874 /****************************************************************************
3875 Map from wire type to permset.
3876 ****************************************************************************/
3878 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
3880 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
3881 return False;
3884 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1) {
3885 return False;
3888 if (wire_perm & SMB_POSIX_ACL_READ) {
3889 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1) {
3890 return False;
3893 if (wire_perm & SMB_POSIX_ACL_WRITE) {
3894 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1) {
3895 return False;
3898 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
3899 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1) {
3900 return False;
3903 return True;
3906 /****************************************************************************
3907 Map from wire type to tagtype.
3908 ****************************************************************************/
3910 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
3912 switch (wire_tt) {
3913 case SMB_POSIX_ACL_USER_OBJ:
3914 *p_tt = SMB_ACL_USER_OBJ;
3915 break;
3916 case SMB_POSIX_ACL_USER:
3917 *p_tt = SMB_ACL_USER;
3918 break;
3919 case SMB_POSIX_ACL_GROUP_OBJ:
3920 *p_tt = SMB_ACL_GROUP_OBJ;
3921 break;
3922 case SMB_POSIX_ACL_GROUP:
3923 *p_tt = SMB_ACL_GROUP;
3924 break;
3925 case SMB_POSIX_ACL_MASK:
3926 *p_tt = SMB_ACL_MASK;
3927 break;
3928 case SMB_POSIX_ACL_OTHER:
3929 *p_tt = SMB_ACL_OTHER;
3930 break;
3931 default:
3932 return False;
3934 return True;
3937 /****************************************************************************
3938 Create a new POSIX acl from wire permissions.
3939 FIXME ! How does the share mask/mode fit into this.... ?
3940 ****************************************************************************/
3942 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
3944 unsigned int i;
3945 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, num_acls);
3947 if (the_acl == NULL) {
3948 return NULL;
3951 for (i = 0; i < num_acls; i++) {
3952 SMB_ACL_ENTRY_T the_entry;
3953 SMB_ACL_PERMSET_T the_permset;
3954 SMB_ACL_TAG_T tag_type;
3956 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
3957 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
3958 i, strerror(errno) ));
3959 goto fail;
3962 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
3963 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
3964 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
3965 goto fail;
3968 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, tag_type) == -1) {
3969 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
3970 i, strerror(errno) ));
3971 goto fail;
3974 /* Get the permset pointer from the new ACL entry. */
3975 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
3976 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
3977 i, strerror(errno) ));
3978 goto fail;
3981 /* Map from wire to permissions. */
3982 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
3983 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
3984 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
3985 goto fail;
3988 /* Now apply to the new ACL entry. */
3989 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
3990 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
3991 i, strerror(errno) ));
3992 goto fail;
3995 if (tag_type == SMB_ACL_USER) {
3996 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3997 uid_t uid = (uid_t)uidval;
3998 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&uid) == -1) {
3999 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
4000 (unsigned int)uid, i, strerror(errno) ));
4001 goto fail;
4005 if (tag_type == SMB_ACL_GROUP) {
4006 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4007 gid_t gid = (uid_t)gidval;
4008 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&gid) == -1) {
4009 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
4010 (unsigned int)gid, i, strerror(errno) ));
4011 goto fail;
4016 return the_acl;
4018 fail:
4020 if (the_acl != NULL) {
4021 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
4023 return NULL;
4026 /****************************************************************************
4027 Calls from UNIX extensions - Default POSIX ACL set.
4028 If num_def_acls == 0 and not a directory just return. If it is a directory
4029 and num_def_acls == 0 then remove the default acl. Else set the default acl
4030 on the directory.
4031 ****************************************************************************/
4033 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf,
4034 uint16 num_def_acls, const char *pdata)
4036 SMB_ACL_T def_acl = NULL;
4038 if (num_def_acls && !S_ISDIR(psbuf->st_mode)) {
4039 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4040 errno = EISDIR;
4041 return False;
4044 if (!num_def_acls) {
4045 /* Remove the default ACL. */
4046 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4047 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4048 fname, strerror(errno) ));
4049 return False;
4051 return True;
4054 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
4055 return False;
4058 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4059 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4060 fname, strerror(errno) ));
4061 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4062 return False;
4065 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4066 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4067 return True;
4070 /****************************************************************************
4071 Remove an ACL from a file. As we don't have acl_delete_entry() available
4072 we must read the current acl and copy all entries except MASK, USER and GROUP
4073 to a new acl, then set that. This (at least on Linux) causes any ACL to be
4074 removed.
4075 FIXME ! How does the share mask/mode fit into this.... ?
4076 ****************************************************************************/
4078 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4080 SMB_ACL_T file_acl = NULL;
4081 int entry_id = SMB_ACL_FIRST_ENTRY;
4082 SMB_ACL_ENTRY_T entry;
4083 bool ret = False;
4084 /* Create a new ACL with only 3 entries, u/g/w. */
4085 SMB_ACL_T new_file_acl = SMB_VFS_SYS_ACL_INIT(conn, 3);
4086 SMB_ACL_ENTRY_T user_ent = NULL;
4087 SMB_ACL_ENTRY_T group_ent = NULL;
4088 SMB_ACL_ENTRY_T other_ent = NULL;
4090 if (new_file_acl == NULL) {
4091 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4092 return False;
4095 /* Now create the u/g/w entries. */
4096 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &user_ent) == -1) {
4097 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4098 fname, strerror(errno) ));
4099 goto done;
4101 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, user_ent, SMB_ACL_USER_OBJ) == -1) {
4102 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4103 fname, strerror(errno) ));
4104 goto done;
4107 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &group_ent) == -1) {
4108 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4109 fname, strerror(errno) ));
4110 goto done;
4112 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4113 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4114 fname, strerror(errno) ));
4115 goto done;
4118 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &other_ent) == -1) {
4119 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4120 fname, strerror(errno) ));
4121 goto done;
4123 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, other_ent, SMB_ACL_OTHER) == -1) {
4124 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4125 fname, strerror(errno) ));
4126 goto done;
4129 /* Get the current file ACL. */
4130 if (fsp && fsp->fh->fd != -1) {
4131 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
4132 } else {
4133 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4136 if (file_acl == NULL) {
4137 /* This is only returned if an error occurred. Even for a file with
4138 no acl a u/g/w acl should be returned. */
4139 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4140 fname, strerror(errno) ));
4141 goto done;
4144 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, file_acl, entry_id, &entry) == 1) {
4145 SMB_ACL_TAG_T tagtype;
4146 SMB_ACL_PERMSET_T permset;
4148 /* get_next... */
4149 if (entry_id == SMB_ACL_FIRST_ENTRY)
4150 entry_id = SMB_ACL_NEXT_ENTRY;
4152 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1) {
4153 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4154 fname, strerror(errno) ));
4155 goto done;
4158 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4159 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4160 fname, strerror(errno) ));
4161 goto done;
4164 if (tagtype == SMB_ACL_USER_OBJ) {
4165 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, user_ent, permset) == -1) {
4166 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4167 fname, strerror(errno) ));
4169 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4170 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, group_ent, permset) == -1) {
4171 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4172 fname, strerror(errno) ));
4174 } else if (tagtype == SMB_ACL_OTHER) {
4175 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, other_ent, permset) == -1) {
4176 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4177 fname, strerror(errno) ));
4182 /* Set the new empty file ACL. */
4183 if (fsp && fsp->fh->fd != -1) {
4184 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4185 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4186 fname, strerror(errno) ));
4187 goto done;
4189 } else {
4190 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4191 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4192 fname, strerror(errno) ));
4193 goto done;
4197 ret = True;
4199 done:
4201 if (file_acl) {
4202 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4204 if (new_file_acl) {
4205 SMB_VFS_SYS_ACL_FREE_ACL(conn, new_file_acl);
4207 return ret;
4210 /****************************************************************************
4211 Calls from UNIX extensions - POSIX ACL set.
4212 If num_def_acls == 0 then read/modify/write acl after removing all entries
4213 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4214 ****************************************************************************/
4216 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4218 SMB_ACL_T file_acl = NULL;
4220 if (!num_acls) {
4221 /* Remove the ACL from the file. */
4222 return remove_posix_acl(conn, fsp, fname);
4225 if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4226 return False;
4229 if (fsp && fsp->fh->fd != -1) {
4230 /* The preferred way - use an open fd. */
4231 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4232 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4233 fname, strerror(errno) ));
4234 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4235 return False;
4237 } else {
4238 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4239 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4240 fname, strerror(errno) ));
4241 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4242 return False;
4246 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4247 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4248 return True;
4251 /********************************************************************
4252 Pull the NT ACL from a file on disk or the OpenEventlog() access
4253 check. Caller is responsible for freeing the returned security
4254 descriptor via TALLOC_FREE(). This is designed for dealing with
4255 user space access checks in smbd outside of the VFS. For example,
4256 checking access rights in OpenEventlog().
4258 Assume we are dealing with files (for now)
4259 ********************************************************************/
4261 SEC_DESC *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname)
4263 SEC_DESC *psd, *ret_sd;
4264 connection_struct conn;
4265 files_struct finfo;
4266 struct fd_handle fh;
4268 ZERO_STRUCT( conn );
4270 if ( !(conn.mem_ctx = talloc_init( "novfs_get_nt_acl" )) ) {
4271 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4272 return NULL;
4275 if (!(conn.params = TALLOC_P(conn.mem_ctx, struct share_params))) {
4276 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4277 TALLOC_FREE(conn.mem_ctx);
4278 return NULL;
4281 conn.params->service = -1;
4283 set_conn_connectpath(&conn, "/");
4285 if (!smbd_vfs_init(&conn)) {
4286 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4287 conn_free_internal( &conn );
4288 return NULL;
4291 ZERO_STRUCT( finfo );
4292 ZERO_STRUCT( fh );
4294 finfo.fnum = -1;
4295 finfo.conn = &conn;
4296 finfo.fh = &fh;
4297 finfo.fh->fd = -1;
4298 finfo.fsp_name = CONST_DISCARD(char *,fname);
4300 if (!NT_STATUS_IS_OK(posix_fget_nt_acl( &finfo, DACL_SECURITY_INFORMATION, &psd))) {
4301 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4302 conn_free_internal( &conn );
4303 return NULL;
4306 ret_sd = dup_sec_desc( ctx, psd );
4308 conn_free_internal( &conn );
4310 return ret_sd;