?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add reference to bug #4308 to remind me to add regression test to smbtorture.
[Samba.git] / source / smbd / posix_acls.c
blob2242405d413f378acd23c9184de4a50e0353738d
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.
6
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 2 of the License, or
10 (at your option) any later version.
11
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.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include "includes.h"
23
24 extern struct current_user current_user;
25 extern struct generic_mapping file_generic_mapping;
26
27 #undef DBGC_CLASS
28 #define DBGC_CLASS DBGC_ACLS
29
30 /****************************************************************************
31 Data structures representing the internal ACE format.
32 ****************************************************************************/
33
34 enum ace_owner {UID_ACE, GID_ACE, WORLD_ACE};
35 enum ace_attribute {ALLOW_ACE, DENY_ACE}; /* Used for incoming NT ACLS. */
36
37 typedef union posix_id {
38 uid_t uid;
39 gid_t gid;
40 int world;
41 } posix_id;
42
43 typedef struct canon_ace {
44 struct canon_ace *next, *prev;
45 SMB_ACL_TAG_T type;
46 mode_t perms; /* Only use S_I(R|W|X)USR mode bits here. */
47 DOM_SID trustee;
48 enum ace_owner owner_type;
49 enum ace_attribute attr;
50 posix_id unix_ug;
51 BOOL inherited;
52 } canon_ace;
53
54 #define ALL_ACE_PERMS (S_IRUSR|S_IWUSR|S_IXUSR)
55
56 /*
57 * EA format of user.SAMBA_PAI (Samba_Posix_Acl_Interitance)
58 * attribute on disk.
59 *
60 * | 1 | 1 | 2 | 2 | ....
61 * +------+------+-------------+---------------------+-------------+--------------------+
62 * | vers | flag | num_entries | num_default_entries | ..entries.. | default_entries... |
63 * +------+------+-------------+---------------------+-------------+--------------------+
64 */
65
66 #define PAI_VERSION_OFFSET 0
67 #define PAI_FLAG_OFFSET 1
68 #define PAI_NUM_ENTRIES_OFFSET 2
69 #define PAI_NUM_DEFAULT_ENTRIES_OFFSET 4
70 #define PAI_ENTRIES_BASE 6
71
72 #define PAI_VERSION 1
73 #define PAI_ACL_FLAG_PROTECTED 0x1
74 #define PAI_ENTRY_LENGTH 5
75
76 /*
77 * In memory format of user.SAMBA_PAI attribute.
78 */
79
80 struct pai_entry {
81 struct pai_entry *next, *prev;
82 enum ace_owner owner_type;
83 posix_id unix_ug;
84 };
85
86 struct pai_val {
87 BOOL pai_protected;
88 unsigned int num_entries;
89 struct pai_entry *entry_list;
90 unsigned int num_def_entries;
91 struct pai_entry *def_entry_list;
92 };
93
94 /************************************************************************
95 Return a uint32 of the pai_entry principal.
96 ************************************************************************/
97
98 static uint32 get_pai_entry_val(struct pai_entry *paie)
99 {
100 switch (paie->owner_type) {
101 case UID_ACE:
102 DEBUG(10,("get_pai_entry_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
103 return (uint32)paie->unix_ug.uid;
104 case GID_ACE:
105 DEBUG(10,("get_pai_entry_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
106 return (uint32)paie->unix_ug.gid;
107 case WORLD_ACE:
108 default:
109 DEBUG(10,("get_pai_entry_val: world ace\n"));
110 return (uint32)-1;
111 }
112 }
113
114 /************************************************************************
115 Return a uint32 of the entry principal.
116 ************************************************************************/
117
118 static uint32 get_entry_val(canon_ace *ace_entry)
119 {
120 switch (ace_entry->owner_type) {
121 case UID_ACE:
122 DEBUG(10,("get_entry_val: uid = %u\n", (unsigned int)ace_entry->unix_ug.uid ));
123 return (uint32)ace_entry->unix_ug.uid;
124 case GID_ACE:
125 DEBUG(10,("get_entry_val: gid = %u\n", (unsigned int)ace_entry->unix_ug.gid ));
126 return (uint32)ace_entry->unix_ug.gid;
127 case WORLD_ACE:
128 default:
129 DEBUG(10,("get_entry_val: world ace\n"));
130 return (uint32)-1;
131 }
132 }
133
134 /************************************************************************
135 Count the inherited entries.
136 ************************************************************************/
137
138 static unsigned int num_inherited_entries(canon_ace *ace_list)
139 {
140 unsigned int num_entries = 0;
141
142 for (; ace_list; ace_list = ace_list->next)
143 if (ace_list->inherited)
144 num_entries++;
145 return num_entries;
146 }
147
148 /************************************************************************
149 Create the on-disk format. Caller must free.
150 ************************************************************************/
151
152 static char *create_pai_buf(canon_ace *file_ace_list, canon_ace *dir_ace_list, BOOL pai_protected, size_t *store_size)
153 {
154 char *pai_buf = NULL;
155 canon_ace *ace_list = NULL;
156 char *entry_offset = NULL;
157 unsigned int num_entries = 0;
158 unsigned int num_def_entries = 0;
159
160 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next)
161 if (ace_list->inherited)
162 num_entries++;
163
164 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next)
165 if (ace_list->inherited)
166 num_def_entries++;
167
168 DEBUG(10,("create_pai_buf: num_entries = %u, num_def_entries = %u\n", num_entries, num_def_entries ));
169
170 *store_size = PAI_ENTRIES_BASE + ((num_entries + num_def_entries)*PAI_ENTRY_LENGTH);
171
172 pai_buf = (char *)SMB_MALLOC(*store_size);
173 if (!pai_buf) {
174 return NULL;
175 }
176
177 /* Set up the header. */
178 memset(pai_buf, '\0', PAI_ENTRIES_BASE);
179 SCVAL(pai_buf,PAI_VERSION_OFFSET,PAI_VERSION);
180 SCVAL(pai_buf,PAI_FLAG_OFFSET,(pai_protected ? PAI_ACL_FLAG_PROTECTED : 0));
181 SSVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET,num_entries);
182 SSVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET,num_def_entries);
183
184 entry_offset = pai_buf + PAI_ENTRIES_BASE;
185
186 for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
187 if (ace_list->inherited) {
188 uint8 type_val = (unsigned char)ace_list->owner_type;
189 uint32 entry_val = get_entry_val(ace_list);
190
191 SCVAL(entry_offset,0,type_val);
192 SIVAL(entry_offset,1,entry_val);
193 entry_offset += PAI_ENTRY_LENGTH;
194 }
195 }
196
197 for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
198 if (ace_list->inherited) {
199 uint8 type_val = (unsigned char)ace_list->owner_type;
200 uint32 entry_val = get_entry_val(ace_list);
201
202 SCVAL(entry_offset,0,type_val);
203 SIVAL(entry_offset,1,entry_val);
204 entry_offset += PAI_ENTRY_LENGTH;
205 }
206 }
207
208 return pai_buf;
209 }
210
211 /************************************************************************
212 Store the user.SAMBA_PAI attribute on disk.
213 ************************************************************************/
214
215 static void store_inheritance_attributes(files_struct *fsp, canon_ace *file_ace_list,
216 canon_ace *dir_ace_list, BOOL pai_protected)
217 {
218 int ret;
219 size_t store_size;
220 char *pai_buf;
221
222 if (!lp_map_acl_inherit(SNUM(fsp->conn)))
223 return;
224
225 /*
226 * Don't store if this ACL isn't protected and
227 * none of the entries in it are marked as inherited.
228 */
229
230 if (!pai_protected && num_inherited_entries(file_ace_list) == 0 && num_inherited_entries(dir_ace_list) == 0) {
231 /* Instead just remove the attribute if it exists. */
232 if (fsp->fh->fd != -1)
233 SMB_VFS_FREMOVEXATTR(fsp, fsp->fh->fd, SAMBA_POSIX_INHERITANCE_EA_NAME);
234 else
235 SMB_VFS_REMOVEXATTR(fsp->conn, fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME);
236 return;
237 }
238
239 pai_buf = create_pai_buf(file_ace_list, dir_ace_list, pai_protected, &store_size);
240
241 if (fsp->fh->fd != -1)
242 ret = SMB_VFS_FSETXATTR(fsp, fsp->fh->fd, SAMBA_POSIX_INHERITANCE_EA_NAME,
243 pai_buf, store_size, 0);
244 else
245 ret = SMB_VFS_SETXATTR(fsp->conn,fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME,
246 pai_buf, store_size, 0);
247
248 SAFE_FREE(pai_buf);
249
250 DEBUG(10,("store_inheritance_attribute:%s for file %s\n", pai_protected ? " (protected)" : "", fsp->fsp_name));
251 if (ret == -1 && !no_acl_syscall_error(errno))
252 DEBUG(1,("store_inheritance_attribute: Error %s\n", strerror(errno) ));
253 }
254
255 /************************************************************************
256 Delete the in memory inheritance info.
257 ************************************************************************/
258
259 static void free_inherited_info(struct pai_val *pal)
260 {
261 if (pal) {
262 struct pai_entry *paie, *paie_next;
263 for (paie = pal->entry_list; paie; paie = paie_next) {
264 paie_next = paie->next;
265 SAFE_FREE(paie);
266 }
267 for (paie = pal->def_entry_list; paie; paie = paie_next) {
268 paie_next = paie->next;
269 SAFE_FREE(paie);
270 }
271 SAFE_FREE(pal);
272 }
273 }
274
275 /************************************************************************
276 Was this ACL protected ?
277 ************************************************************************/
278
279 static BOOL get_protected_flag(struct pai_val *pal)
280 {
281 if (!pal)
282 return False;
283 return pal->pai_protected;
284 }
285
286 /************************************************************************
287 Was this ACE inherited ?
288 ************************************************************************/
289
290 static BOOL get_inherited_flag(struct pai_val *pal, canon_ace *ace_entry, BOOL default_ace)
291 {
292 struct pai_entry *paie;
293
294 if (!pal)
295 return False;
296
297 /* If the entry exists it is inherited. */
298 for (paie = (default_ace ? pal->def_entry_list : pal->entry_list); paie; paie = paie->next) {
299 if (ace_entry->owner_type == paie->owner_type &&
300 get_entry_val(ace_entry) == get_pai_entry_val(paie))
301 return True;
302 }
303 return False;
304 }
305
306 /************************************************************************
307 Ensure an attribute just read is valid.
308 ************************************************************************/
309
310 static BOOL check_pai_ok(char *pai_buf, size_t pai_buf_data_size)
311 {
312 uint16 num_entries;
313 uint16 num_def_entries;
314
315 if (pai_buf_data_size < PAI_ENTRIES_BASE) {
316 /* Corrupted - too small. */
317 return False;
318 }
319
320 if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_VERSION)
321 return False;
322
323 num_entries = SVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET);
324 num_def_entries = SVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
325
326 /* Check the entry lists match. */
327 /* Each entry is 5 bytes (type plus 4 bytes of uid or gid). */
328
329 if (((num_entries + num_def_entries)*PAI_ENTRY_LENGTH) + PAI_ENTRIES_BASE != pai_buf_data_size)
330 return False;
331
332 return True;
333 }
334
335
336 /************************************************************************
337 Convert to in-memory format.
338 ************************************************************************/
339
340 static struct pai_val *create_pai_val(char *buf, size_t size)
341 {
342 char *entry_offset;
343 struct pai_val *paiv = NULL;
344 int i;
345
346 if (!check_pai_ok(buf, size))
347 return NULL;
348
349 paiv = SMB_MALLOC_P(struct pai_val);
350 if (!paiv)
351 return NULL;
352
353 memset(paiv, '\0', sizeof(struct pai_val));
354
355 paiv->pai_protected = (CVAL(buf,PAI_FLAG_OFFSET) == PAI_ACL_FLAG_PROTECTED);
356
357 paiv->num_entries = SVAL(buf,PAI_NUM_ENTRIES_OFFSET);
358 paiv->num_def_entries = SVAL(buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
359
360 entry_offset = buf + PAI_ENTRIES_BASE;
361
362 DEBUG(10,("create_pai_val:%s num_entries = %u, num_def_entries = %u\n",
363 paiv->pai_protected ? " (pai_protected)" : "", paiv->num_entries, paiv->num_def_entries ));
364
365 for (i = 0; i < paiv->num_entries; i++) {
366 struct pai_entry *paie;
367
368 paie = SMB_MALLOC_P(struct pai_entry);
369 if (!paie) {
370 free_inherited_info(paiv);
371 return NULL;
372 }
373
374 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
375 switch( paie->owner_type) {
376 case UID_ACE:
377 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
378 DEBUG(10,("create_pai_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
379 break;
380 case GID_ACE:
381 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
382 DEBUG(10,("create_pai_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
383 break;
384 case WORLD_ACE:
385 paie->unix_ug.world = -1;
386 DEBUG(10,("create_pai_val: world ace\n"));
387 break;
388 default:
389 free_inherited_info(paiv);
390 return NULL;
391 }
392 entry_offset += PAI_ENTRY_LENGTH;
393 DLIST_ADD(paiv->entry_list, paie);
394 }
395
396 for (i = 0; i < paiv->num_def_entries; i++) {
397 struct pai_entry *paie;
398
399 paie = SMB_MALLOC_P(struct pai_entry);
400 if (!paie) {
401 free_inherited_info(paiv);
402 return NULL;
403 }
404
405 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
406 switch( paie->owner_type) {
407 case UID_ACE:
408 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
409 DEBUG(10,("create_pai_val: (def) uid = %u\n", (unsigned int)paie->unix_ug.uid ));
410 break;
411 case GID_ACE:
412 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
413 DEBUG(10,("create_pai_val: (def) gid = %u\n", (unsigned int)paie->unix_ug.gid ));
414 break;
415 case WORLD_ACE:
416 paie->unix_ug.world = -1;
417 DEBUG(10,("create_pai_val: (def) world ace\n"));
418 break;
419 default:
420 free_inherited_info(paiv);
421 return NULL;
422 }
423 entry_offset += PAI_ENTRY_LENGTH;
424 DLIST_ADD(paiv->def_entry_list, paie);
425 }
426
427 return paiv;
428 }
429
430 /************************************************************************
431 Load the user.SAMBA_PAI attribute.
432 ************************************************************************/
433
434 static struct pai_val *load_inherited_info(files_struct *fsp)
435 {
436 char *pai_buf;
437 size_t pai_buf_size = 1024;
438 struct pai_val *paiv = NULL;
439 ssize_t ret;
440
441 if (!lp_map_acl_inherit(SNUM(fsp->conn)))
442 return NULL;
443
444 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
445 return NULL;
446
447 do {
448 if (fsp->fh->fd != -1)
449 ret = SMB_VFS_FGETXATTR(fsp, fsp->fh->fd, SAMBA_POSIX_INHERITANCE_EA_NAME,
450 pai_buf, pai_buf_size);
451 else
452 ret = SMB_VFS_GETXATTR(fsp->conn,fsp->fsp_name,SAMBA_POSIX_INHERITANCE_EA_NAME,
453 pai_buf, pai_buf_size);
454
455 if (ret == -1) {
456 if (errno != ERANGE) {
457 break;
458 }
459 /* Buffer too small - enlarge it. */
460 pai_buf_size *= 2;
461 SAFE_FREE(pai_buf);
462 if (pai_buf_size > 1024*1024) {
463 return NULL; /* Limit malloc to 1mb. */
464 }
465 if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
466 return NULL;
467 }
468 } while (ret == -1);
469
470 DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fsp->fsp_name));
471
472 if (ret == -1) {
473 /* No attribute or not supported. */
474 #if defined(ENOATTR)
475 if (errno != ENOATTR)
476 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
477 #else
478 if (errno != ENOSYS)
479 DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
480 #endif
481 SAFE_FREE(pai_buf);
482 return NULL;
483 }
484
485 paiv = create_pai_val(pai_buf, ret);
486
487 if (paiv && paiv->pai_protected)
488 DEBUG(10,("load_inherited_info: ACL is protected for file %s\n", fsp->fsp_name));
489
490 SAFE_FREE(pai_buf);
491 return paiv;
492 }
493
494 /****************************************************************************
495 Functions to manipulate the internal ACE format.
496 ****************************************************************************/
497
498 /****************************************************************************
499 Count a linked list of canonical ACE entries.
500 ****************************************************************************/
501
502 static size_t count_canon_ace_list( canon_ace *list_head )
503 {
504 size_t count = 0;
505 canon_ace *ace;
506
507 for (ace = list_head; ace; ace = ace->next)
508 count++;
509
510 return count;
511 }
512
513 /****************************************************************************
514 Free a linked list of canonical ACE entries.
515 ****************************************************************************/
516
517 static void free_canon_ace_list( canon_ace *list_head )
518 {
519 canon_ace *list, *next;
520
521 for (list = list_head; list; list = next) {
522 next = list->next;
523 DLIST_REMOVE(list_head, list);
524 SAFE_FREE(list);
525 }
526 }
527
528 /****************************************************************************
529 Function to duplicate a canon_ace entry.
530 ****************************************************************************/
531
532 static canon_ace *dup_canon_ace( canon_ace *src_ace)
533 {
534 canon_ace *dst_ace = SMB_MALLOC_P(canon_ace);
535
536 if (dst_ace == NULL)
537 return NULL;
538
539 *dst_ace = *src_ace;
540 dst_ace->prev = dst_ace->next = NULL;
541 return dst_ace;
542 }
543
544 /****************************************************************************
545 Print out a canon ace.
546 ****************************************************************************/
547
548 static void print_canon_ace(canon_ace *pace, int num)
549 {
550 fstring str;
551
552 dbgtext( "canon_ace index %d. Type = %s ", num, pace->attr == ALLOW_ACE ? "allow" : "deny" );
553 dbgtext( "SID = %s ", sid_to_string( str, &pace->trustee));
554 if (pace->owner_type == UID_ACE) {
555 const char *u_name = uidtoname(pace->unix_ug.uid);
556 dbgtext( "uid %u (%s) ", (unsigned int)pace->unix_ug.uid, u_name );
557 } else if (pace->owner_type == GID_ACE) {
558 char *g_name = gidtoname(pace->unix_ug.gid);
559 dbgtext( "gid %u (%s) ", (unsigned int)pace->unix_ug.gid, g_name );
560 } else
561 dbgtext( "other ");
562 switch (pace->type) {
563 case SMB_ACL_USER:
564 dbgtext( "SMB_ACL_USER ");
565 break;
566 case SMB_ACL_USER_OBJ:
567 dbgtext( "SMB_ACL_USER_OBJ ");
568 break;
569 case SMB_ACL_GROUP:
570 dbgtext( "SMB_ACL_GROUP ");
571 break;
572 case SMB_ACL_GROUP_OBJ:
573 dbgtext( "SMB_ACL_GROUP_OBJ ");
574 break;
575 case SMB_ACL_OTHER:
576 dbgtext( "SMB_ACL_OTHER ");
577 break;
578 default:
579 dbgtext( "MASK " );
580 break;
581 }
582 if (pace->inherited)
583 dbgtext( "(inherited) ");
584 dbgtext( "perms ");
585 dbgtext( "%c", pace->perms & S_IRUSR ? 'r' : '-');
586 dbgtext( "%c", pace->perms & S_IWUSR ? 'w' : '-');
587 dbgtext( "%c\n", pace->perms & S_IXUSR ? 'x' : '-');
588 }
589
590 /****************************************************************************
591 Print out a canon ace list.
592 ****************************************************************************/
593
594 static void print_canon_ace_list(const char *name, canon_ace *ace_list)
595 {
596 int count = 0;
597
598 if( DEBUGLVL( 10 )) {
599 dbgtext( "print_canon_ace_list: %s\n", name );
600 for (;ace_list; ace_list = ace_list->next, count++)
601 print_canon_ace(ace_list, count );
602 }
603 }
604
605 /****************************************************************************
606 Map POSIX ACL perms to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
607 ****************************************************************************/
608
609 static mode_t convert_permset_to_mode_t(connection_struct *conn, SMB_ACL_PERMSET_T permset)
610 {
611 mode_t ret = 0;
612
613 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRUSR : 0);
614 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWUSR : 0);
615 ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXUSR : 0);
616
617 return ret;
618 }
619
620 /****************************************************************************
621 Map generic UNIX permissions to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
622 ****************************************************************************/
623
624 static mode_t unix_perms_to_acl_perms(mode_t mode, int r_mask, int w_mask, int x_mask)
625 {
626 mode_t ret = 0;
627
628 if (mode & r_mask)
629 ret |= S_IRUSR;
630 if (mode & w_mask)
631 ret |= S_IWUSR;
632 if (mode & x_mask)
633 ret |= S_IXUSR;
634
635 return ret;
636 }
637
638 /****************************************************************************
639 Map canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits) to
640 an SMB_ACL_PERMSET_T.
641 ****************************************************************************/
642
643 static int map_acl_perms_to_permset(connection_struct *conn, mode_t mode, SMB_ACL_PERMSET_T *p_permset)
644 {
645 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1)
646 return -1;
647 if (mode & S_IRUSR) {
648 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1)
649 return -1;
650 }
651 if (mode & S_IWUSR) {
652 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1)
653 return -1;
654 }
655 if (mode & S_IXUSR) {
656 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1)
657 return -1;
658 }
659 return 0;
660 }
661
662 /****************************************************************************
663 Function to create owner and group SIDs from a SMB_STRUCT_STAT.
664 ****************************************************************************/
665
666 static void create_file_sids(SMB_STRUCT_STAT *psbuf, DOM_SID *powner_sid, DOM_SID *pgroup_sid)
667 {
668 uid_to_sid( powner_sid, psbuf->st_uid );
669 gid_to_sid( pgroup_sid, psbuf->st_gid );
670 }
671
672 /****************************************************************************
673 Is the identity in two ACEs equal ? Check both SID and uid/gid.
674 ****************************************************************************/
675
676 static BOOL identity_in_ace_equal(canon_ace *ace1, canon_ace *ace2)
677 {
678 if (sid_equal(&ace1->trustee, &ace2->trustee)) {
679 return True;
680 }
681 if (ace1->owner_type == ace2->owner_type) {
682 if (ace1->owner_type == UID_ACE &&
683 ace1->unix_ug.uid == ace2->unix_ug.uid) {
684 return True;
685 } else if (ace1->owner_type == GID_ACE &&
686 ace1->unix_ug.gid == ace2->unix_ug.gid) {
687 return True;
688 }
689 }
690 return False;
691 }
692
693 /****************************************************************************
694 Merge aces with a common sid - if both are allow or deny, OR the permissions together and
695 delete the second one. If the first is deny, mask the permissions off and delete the allow
696 if the permissions become zero, delete the deny if the permissions are non zero.
697 ****************************************************************************/
698
699 static void merge_aces( canon_ace **pp_list_head )
700 {
701 canon_ace *list_head = *pp_list_head;
702 canon_ace *curr_ace_outer;
703 canon_ace *curr_ace_outer_next;
704
705 /*
706 * First, merge allow entries with identical SIDs, and deny entries
707 * with identical SIDs.
708 */
709
710 for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
711 canon_ace *curr_ace;
712 canon_ace *curr_ace_next;
713
714 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
715
716 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
717
718 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
719
720 if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
721 (curr_ace->attr == curr_ace_outer->attr)) {
722
723 if( DEBUGLVL( 10 )) {
724 dbgtext("merge_aces: Merging ACE's\n");
725 print_canon_ace( curr_ace_outer, 0);
726 print_canon_ace( curr_ace, 0);
727 }
728
729 /* Merge two allow or two deny ACE's. */
730
731 curr_ace_outer->perms |= curr_ace->perms;
732 DLIST_REMOVE(list_head, curr_ace);
733 SAFE_FREE(curr_ace);
734 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
735 }
736 }
737 }
738
739 /*
740 * Now go through and mask off allow permissions with deny permissions.
741 * We can delete either the allow or deny here as we know that each SID
742 * appears only once in the list.
743 */
744
745 for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
746 canon_ace *curr_ace;
747 canon_ace *curr_ace_next;
748
749 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
750
751 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
752
753 curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
754
755 /*
756 * Subtract ACE's with different entries. Due to the ordering constraints
757 * we've put on the ACL, we know the deny must be the first one.
758 */
759
760 if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
761 (curr_ace_outer->attr == DENY_ACE) && (curr_ace->attr == ALLOW_ACE)) {
762
763 if( DEBUGLVL( 10 )) {
764 dbgtext("merge_aces: Masking ACE's\n");
765 print_canon_ace( curr_ace_outer, 0);
766 print_canon_ace( curr_ace, 0);
767 }
768
769 curr_ace->perms &= ~curr_ace_outer->perms;
770
771 if (curr_ace->perms == 0) {
772
773 /*
774 * The deny overrides the allow. Remove the allow.
775 */
776
777 DLIST_REMOVE(list_head, curr_ace);
778 SAFE_FREE(curr_ace);
779 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
780
781 } else {
782
783 /*
784 * Even after removing permissions, there
785 * are still allow permissions - delete the deny.
786 * It is safe to delete the deny here,
787 * as we are guarenteed by the deny first
788 * ordering that all the deny entries for
789 * this SID have already been merged into one
790 * before we can get to an allow ace.
791 */
792
793 DLIST_REMOVE(list_head, curr_ace_outer);
794 SAFE_FREE(curr_ace_outer);
795 break;
796 }
797 }
798
799 } /* end for curr_ace */
800 } /* end for curr_ace_outer */
801
802 /* We may have modified the list. */
803
804 *pp_list_head = list_head;
805 }
806
807 /****************************************************************************
808 Check if we need to return NT4.x compatible ACL entries.
809 ****************************************************************************/
810
811 static BOOL nt4_compatible_acls(void)
812 {
813 int compat = lp_acl_compatibility();
814
815 if (compat == ACL_COMPAT_AUTO) {
816 enum remote_arch_types ra_type = get_remote_arch();
817
818 /* Automatically adapt to client */
819 return (ra_type <= RA_WINNT);
820 } else
821 return (compat == ACL_COMPAT_WINNT);
822 }
823
824
825 /****************************************************************************
826 Map canon_ace perms to permission bits NT.
827 The attr element is not used here - we only process deny entries on set,
828 not get. Deny entries are implicit on get with ace->perms = 0.
829 ****************************************************************************/
830
831 static SEC_ACCESS map_canon_ace_perms(int snum,
832 int *pacl_type,
833 mode_t perms,
834 BOOL directory_ace)
835 {
836 SEC_ACCESS sa;
837 uint32 nt_mask = 0;
838
839 *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
840
841 if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
842 if (directory_ace) {
843 nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
844 } else {
845 nt_mask = UNIX_ACCESS_RWX;
846 }
847 } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
848 /*
849 * Windows NT refuses to display ACEs with no permissions in them (but
850 * they are perfectly legal with Windows 2000). If the ACE has empty
851 * permissions we cannot use 0, so we use the otherwise unused
852 * WRITE_OWNER permission, which we ignore when we set an ACL.
853 * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
854 * to be changed in the future.
855 */
856
857 if (nt4_compatible_acls())
858 nt_mask = UNIX_ACCESS_NONE;
859 else
860 nt_mask = 0;
861 } else {
862 if (directory_ace) {
863 nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
864 nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
865 nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
866 } else {
867 nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
868 nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
869 nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
870 }
871 }
872
873 DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
874 (unsigned int)perms, (unsigned int)nt_mask ));
875
876 init_sec_access(&sa,nt_mask);
877 return sa;
878 }
879
880 /****************************************************************************
881 Map NT perms to a UNIX mode_t.
882 ****************************************************************************/
883
884 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA|FILE_READ_ATTRIBUTES)
885 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA|FILE_WRITE_ATTRIBUTES)
886 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
887
888 static mode_t map_nt_perms( uint32 *mask, int type)
889 {
890 mode_t mode = 0;
891
892 switch(type) {
893 case S_IRUSR:
894 if((*mask) & GENERIC_ALL_ACCESS)
895 mode = S_IRUSR|S_IWUSR|S_IXUSR;
896 else {
897 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
898 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
899 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
900 }
901 break;
902 case S_IRGRP:
903 if((*mask) & GENERIC_ALL_ACCESS)
904 mode = S_IRGRP|S_IWGRP|S_IXGRP;
905 else {
906 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
907 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
908 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
909 }
910 break;
911 case S_IROTH:
912 if((*mask) & GENERIC_ALL_ACCESS)
913 mode = S_IROTH|S_IWOTH|S_IXOTH;
914 else {
915 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
916 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
917 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
918 }
919 break;
920 }
921
922 return mode;
923 }
924
925 /****************************************************************************
926 Unpack a SEC_DESC into a UNIX owner and group.
927 ****************************************************************************/
928
929 BOOL unpack_nt_owners(int snum, uid_t *puser, gid_t *pgrp, uint32 security_info_sent, SEC_DESC *psd)
930 {
931 DOM_SID owner_sid;
932 DOM_SID grp_sid;
933
934 *puser = (uid_t)-1;
935 *pgrp = (gid_t)-1;
936
937 if(security_info_sent == 0) {
938 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
939 return True;
940 }
941
942 /*
943 * Validate the owner and group SID's.
944 */
945
946 memset(&owner_sid, '\0', sizeof(owner_sid));
947 memset(&grp_sid, '\0', sizeof(grp_sid));
948
949 DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
950
951 /*
952 * Don't immediately fail if the owner sid cannot be validated.
953 * This may be a group chown only set.
954 */
955
956 if (security_info_sent & OWNER_SECURITY_INFORMATION) {
957 sid_copy(&owner_sid, psd->owner_sid);
958 if (!sid_to_uid(&owner_sid, puser)) {
959 if (lp_force_unknown_acl_user(snum)) {
960 /* this allows take ownership to work
961 * reasonably */
962 *puser = current_user.ut.uid;
963 } else {
964 DEBUG(3,("unpack_nt_owners: unable to validate"
965 " owner sid for %s\n",
966 sid_string_static(&owner_sid)));
967 return False;
968 }
969 }
970 }
971
972 /*
973 * Don't immediately fail if the group sid cannot be validated.
974 * This may be an owner chown only set.
975 */
976
977 if (security_info_sent & GROUP_SECURITY_INFORMATION) {
978 sid_copy(&grp_sid, psd->group_sid);
979 if (!sid_to_gid( &grp_sid, pgrp)) {
980 if (lp_force_unknown_acl_user(snum)) {
981 /* this allows take group ownership to work
982 * reasonably */
983 *pgrp = current_user.ut.gid;
984 } else {
985 DEBUG(3,("unpack_nt_owners: unable to validate"
986 " group sid.\n"));
987 return False;
988 }
989 }
990 }
991
992 DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
993
994 return True;
995 }
996
997 /****************************************************************************
998 Ensure the enforced permissions for this share apply.
999 ****************************************************************************/
1000
1001 static void apply_default_perms(files_struct *fsp, canon_ace *pace, mode_t type)
1002 {
1003 int snum = SNUM(fsp->conn);
1004 mode_t and_bits = (mode_t)0;
1005 mode_t or_bits = (mode_t)0;
1006
1007 /* Get the initial bits to apply. */
1008
1009 if (fsp->is_directory) {
1010 and_bits = lp_dir_security_mask(snum);
1011 or_bits = lp_force_dir_security_mode(snum);
1012 } else {
1013 and_bits = lp_security_mask(snum);
1014 or_bits = lp_force_security_mode(snum);
1015 }
1016
1017 /* Now bounce them into the S_USR space. */
1018 switch(type) {
1019 case S_IRUSR:
1020 /* Ensure owner has read access. */
1021 pace->perms |= S_IRUSR;
1022 if (fsp->is_directory)
1023 pace->perms |= (S_IWUSR|S_IXUSR);
1024 and_bits = unix_perms_to_acl_perms(and_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1025 or_bits = unix_perms_to_acl_perms(or_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1026 break;
1027 case S_IRGRP:
1028 and_bits = unix_perms_to_acl_perms(and_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1029 or_bits = unix_perms_to_acl_perms(or_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1030 break;
1031 case S_IROTH:
1032 and_bits = unix_perms_to_acl_perms(and_bits, S_IROTH, S_IWOTH, S_IXOTH);
1033 or_bits = unix_perms_to_acl_perms(or_bits, S_IROTH, S_IWOTH, S_IXOTH);
1034 break;
1035 }
1036
1037 pace->perms = ((pace->perms & and_bits)|or_bits);
1038 }
1039
1040 /****************************************************************************
1041 Check if a given uid/SID is in a group gid/SID. This is probably very
1042 expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1043 ****************************************************************************/
1044
1045 static BOOL uid_entry_in_group( canon_ace *uid_ace, canon_ace *group_ace )
1046 {
1047 fstring u_name;
1048
1049 /* "Everyone" always matches every uid. */
1050
1051 if (sid_equal(&group_ace->trustee, &global_sid_World))
1052 return True;
1053
1054 /* Assume that the current user is in the current group (force group) */
1055
1056 if (uid_ace->unix_ug.uid == current_user.ut.uid && group_ace->unix_ug.gid == current_user.ut.gid)
1057 return True;
1058
1059 fstrcpy(u_name, uidtoname(uid_ace->unix_ug.uid));
1060 return user_in_group_sid(u_name, &group_ace->trustee);
1061 }
1062
1063 /****************************************************************************
1064 A well formed POSIX file or default ACL has at least 3 entries, a
1065 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1066 In addition, the owner must always have at least read access.
1067 When using this call on get_acl, the pst struct is valid and contains
1068 the mode of the file. When using this call on set_acl, the pst struct has
1069 been modified to have a mode containing the default for this file or directory
1070 type.
1071 ****************************************************************************/
1072
1073 static BOOL ensure_canon_entry_valid(canon_ace **pp_ace,
1074 files_struct *fsp,
1075 const DOM_SID *pfile_owner_sid,
1076 const DOM_SID *pfile_grp_sid,
1077 SMB_STRUCT_STAT *pst,
1078 BOOL setting_acl)
1079 {
1080 canon_ace *pace;
1081 BOOL got_user = False;
1082 BOOL got_grp = False;
1083 BOOL got_other = False;
1084 canon_ace *pace_other = NULL;
1085
1086 for (pace = *pp_ace; pace; pace = pace->next) {
1087 if (pace->type == SMB_ACL_USER_OBJ) {
1088
1089 if (setting_acl)
1090 apply_default_perms(fsp, pace, S_IRUSR);
1091 got_user = True;
1092
1093 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1094
1095 /*
1096 * Ensure create mask/force create mode is respected on set.
1097 */
1098
1099 if (setting_acl)
1100 apply_default_perms(fsp, pace, S_IRGRP);
1101 got_grp = True;
1102
1103 } else if (pace->type == SMB_ACL_OTHER) {
1104
1105 /*
1106 * Ensure create mask/force create mode is respected on set.
1107 */
1108
1109 if (setting_acl)
1110 apply_default_perms(fsp, pace, S_IROTH);
1111 got_other = True;
1112 pace_other = pace;
1113 }
1114 }
1115
1116 if (!got_user) {
1117 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1118 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1119 return False;
1120 }
1121
1122 ZERO_STRUCTP(pace);
1123 pace->type = SMB_ACL_USER_OBJ;
1124 pace->owner_type = UID_ACE;
1125 pace->unix_ug.uid = pst->st_uid;
1126 pace->trustee = *pfile_owner_sid;
1127 pace->attr = ALLOW_ACE;
1128
1129 if (setting_acl) {
1130 /* See if the owning user is in any of the other groups in
1131 the ACE. If so, OR in the permissions from that group. */
1132
1133 BOOL group_matched = False;
1134 canon_ace *pace_iter;
1135
1136 for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1137 if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1138 if (uid_entry_in_group(pace, pace_iter)) {
1139 pace->perms |= pace_iter->perms;
1140 group_matched = True;
1141 }
1142 }
1143 }
1144
1145 /* If we only got an "everyone" perm, just use that. */
1146 if (!group_matched) {
1147 if (got_other)
1148 pace->perms = pace_other->perms;
1149 else
1150 pace->perms = 0;
1151 }
1152
1153 apply_default_perms(fsp, pace, S_IRUSR);
1154 } else {
1155 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1156 }
1157
1158 DLIST_ADD(*pp_ace, pace);
1159 }
1160
1161 if (!got_grp) {
1162 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1163 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1164 return False;
1165 }
1166
1167 ZERO_STRUCTP(pace);
1168 pace->type = SMB_ACL_GROUP_OBJ;
1169 pace->owner_type = GID_ACE;
1170 pace->unix_ug.uid = pst->st_gid;
1171 pace->trustee = *pfile_grp_sid;
1172 pace->attr = ALLOW_ACE;
1173 if (setting_acl) {
1174 /* If we only got an "everyone" perm, just use that. */
1175 if (got_other)
1176 pace->perms = pace_other->perms;
1177 else
1178 pace->perms = 0;
1179 apply_default_perms(fsp, pace, S_IRGRP);
1180 } else {
1181 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1182 }
1183
1184 DLIST_ADD(*pp_ace, pace);
1185 }
1186
1187 if (!got_other) {
1188 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1189 DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1190 return False;
1191 }
1192
1193 ZERO_STRUCTP(pace);
1194 pace->type = SMB_ACL_OTHER;
1195 pace->owner_type = WORLD_ACE;
1196 pace->unix_ug.world = -1;
1197 pace->trustee = global_sid_World;
1198 pace->attr = ALLOW_ACE;
1199 if (setting_acl) {
1200 pace->perms = 0;
1201 apply_default_perms(fsp, pace, S_IROTH);
1202 } else
1203 pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IROTH, S_IWOTH, S_IXOTH);
1204
1205 DLIST_ADD(*pp_ace, pace);
1206 }
1207
1208 return True;
1209 }
1210
1211 /****************************************************************************
1212 Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1213 If it does not have them, check if there are any entries where the trustee is the
1214 file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1215 ****************************************************************************/
1216
1217 static void check_owning_objs(canon_ace *ace, DOM_SID *pfile_owner_sid, DOM_SID *pfile_grp_sid)
1218 {
1219 BOOL got_user_obj, got_group_obj;
1220 canon_ace *current_ace;
1221 int i, entries;
1222
1223 entries = count_canon_ace_list(ace);
1224 got_user_obj = False;
1225 got_group_obj = False;
1226
1227 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1228 if (current_ace->type == SMB_ACL_USER_OBJ)
1229 got_user_obj = True;
1230 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1231 got_group_obj = True;
1232 }
1233 if (got_user_obj && got_group_obj) {
1234 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1235 return;
1236 }
1237
1238 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1239 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1240 sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1241 current_ace->type = SMB_ACL_USER_OBJ;
1242 got_user_obj = True;
1243 }
1244 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1245 sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1246 current_ace->type = SMB_ACL_GROUP_OBJ;
1247 got_group_obj = True;
1248 }
1249 }
1250 if (!got_user_obj)
1251 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1252 if (!got_group_obj)
1253 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1254 }
1255
1256 /****************************************************************************
1257 Unpack a SEC_DESC into two canonical ace lists.
1258 ****************************************************************************/
1259
1260 static BOOL create_canon_ace_lists(files_struct *fsp, SMB_STRUCT_STAT *pst,
1261 DOM_SID *pfile_owner_sid,
1262 DOM_SID *pfile_grp_sid,
1263 canon_ace **ppfile_ace, canon_ace **ppdir_ace,
1264 SEC_ACL *dacl)
1265 {
1266 BOOL all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1267 canon_ace *file_ace = NULL;
1268 canon_ace *dir_ace = NULL;
1269 canon_ace *current_ace = NULL;
1270 BOOL got_dir_allow = False;
1271 BOOL got_file_allow = False;
1272 int i, j;
1273
1274 *ppfile_ace = NULL;
1275 *ppdir_ace = NULL;
1276
1277 /*
1278 * Convert the incoming ACL into a more regular form.
1279 */
1280
1281 for(i = 0; i < dacl->num_aces; i++) {
1282 SEC_ACE *psa = &dacl->aces[i];
1283
1284 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1285 DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1286 return False;
1287 }
1288
1289 if (nt4_compatible_acls()) {
1290 /*
1291 * The security mask may be UNIX_ACCESS_NONE which should map into
1292 * no permissions (we overload the WRITE_OWNER bit for this) or it
1293 * should be one of the ALL/EXECUTE/READ/WRITE bits. Arrange for this
1294 * to be so. Any other bits override the UNIX_ACCESS_NONE bit.
1295 */
1296
1297 /*
1298 * Convert GENERIC bits to specific bits.
1299 */
1300
1301 se_map_generic(&psa->access_mask, &file_generic_mapping);
1302
1303 psa->access_mask &= (UNIX_ACCESS_NONE|FILE_ALL_ACCESS);
1304
1305 if(psa->access_mask != UNIX_ACCESS_NONE)
1306 psa->access_mask &= ~UNIX_ACCESS_NONE;
1307 }
1308 }
1309
1310 /*
1311 * Deal with the fact that NT 4.x re-writes the canonical format
1312 * that we return for default ACLs. If a directory ACE is identical
1313 * to a inherited directory ACE then NT changes the bits so that the
1314 * first ACE is set to OI|IO and the second ACE for this SID is set
1315 * to CI. We need to repair this. JRA.
1316 */
1317
1318 for(i = 0; i < dacl->num_aces; i++) {
1319 SEC_ACE *psa1 = &dacl->aces[i];
1320
1321 for (j = i + 1; j < dacl->num_aces; j++) {
1322 SEC_ACE *psa2 = &dacl->aces[j];
1323
1324 if (psa1->access_mask != psa2->access_mask)
1325 continue;
1326
1327 if (!sid_equal(&psa1->trustee, &psa2->trustee))
1328 continue;
1329
1330 /*
1331 * Ok - permission bits and SIDs are equal.
1332 * Check if flags were re-written.
1333 */
1334
1335 if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1336
1337 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1338 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1339
1340 } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1341
1342 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1343 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1344
1345 }
1346 }
1347 }
1348
1349 for(i = 0; i < dacl->num_aces; i++) {
1350 SEC_ACE *psa = &dacl->aces[i];
1351
1352 /*
1353 * Create a cannon_ace entry representing this NT DACL ACE.
1354 */
1355
1356 if ((current_ace = SMB_MALLOC_P(canon_ace)) == NULL) {
1357 free_canon_ace_list(file_ace);
1358 free_canon_ace_list(dir_ace);
1359 DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1360 return False;
1361 }
1362
1363 ZERO_STRUCTP(current_ace);
1364
1365 sid_copy(&current_ace->trustee, &psa->trustee);
1366
1367 /*
1368 * Try and work out if the SID is a user or group
1369 * as we need to flag these differently for POSIX.
1370 * Note what kind of a POSIX ACL this should map to.
1371 */
1372
1373 if( sid_equal(&current_ace->trustee, &global_sid_World)) {
1374 current_ace->owner_type = WORLD_ACE;
1375 current_ace->unix_ug.world = -1;
1376 current_ace->type = SMB_ACL_OTHER;
1377 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1378 current_ace->owner_type = UID_ACE;
1379 current_ace->unix_ug.uid = pst->st_uid;
1380 current_ace->type = SMB_ACL_USER_OBJ;
1381
1382 /*
1383 * The Creator Owner entry only specifies inheritable permissions,
1384 * never access permissions. WinNT doesn't always set the ACE to
1385 *INHERIT_ONLY, though.
1386 */
1387
1388 if (nt4_compatible_acls())
1389 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1390 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1391 current_ace->owner_type = GID_ACE;
1392 current_ace->unix_ug.gid = pst->st_gid;
1393 current_ace->type = SMB_ACL_GROUP_OBJ;
1394
1395 /*
1396 * The Creator Group entry only specifies inheritable permissions,
1397 * never access permissions. WinNT doesn't always set the ACE to
1398 *INHERIT_ONLY, though.
1399 */
1400 if (nt4_compatible_acls())
1401 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1402
1403 } else if (sid_to_uid( &current_ace->trustee, &current_ace->unix_ug.uid)) {
1404 current_ace->owner_type = UID_ACE;
1405 /* If it's the owning user, this is a user_obj, not
1406 * a user. */
1407 if (current_ace->unix_ug.uid == pst->st_uid) {
1408 current_ace->type = SMB_ACL_USER_OBJ;
1409 } else {
1410 current_ace->type = SMB_ACL_USER;
1411 }
1412 } else if (sid_to_gid( &current_ace->trustee, &current_ace->unix_ug.gid)) {
1413 current_ace->owner_type = GID_ACE;
1414 /* If it's the primary group, this is a group_obj, not
1415 * a group. */
1416 if (current_ace->unix_ug.gid == pst->st_gid) {
1417 current_ace->type = SMB_ACL_GROUP_OBJ;
1418 } else {
1419 current_ace->type = SMB_ACL_GROUP;
1420 }
1421 } else {
1422 fstring str;
1423
1424 /*
1425 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
1426 */
1427
1428 if (non_mappable_sid(&psa->trustee)) {
1429 DEBUG(10,("create_canon_ace_lists: ignoring non-mappable SID %s\n",
1430 sid_to_string(str, &psa->trustee) ));
1431 SAFE_FREE(current_ace);
1432 continue;
1433 }
1434
1435 free_canon_ace_list(file_ace);
1436 free_canon_ace_list(dir_ace);
1437 DEBUG(0,("create_canon_ace_lists: unable to map SID %s to uid or gid.\n",
1438 sid_to_string(str, &current_ace->trustee) ));
1439 SAFE_FREE(current_ace);
1440 return False;
1441 }
1442
1443 /*
1444 * Map the given NT permissions into a UNIX mode_t containing only
1445 * S_I(R|W|X)USR bits.
1446 */
1447
1448 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1449 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1450 current_ace->inherited = ((psa->flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False);
1451
1452 /*
1453 * Now add the created ace to either the file list, the directory
1454 * list, or both. We *MUST* preserve the order here (hence we use
1455 * DLIST_ADD_END) as NT ACLs are order dependent.
1456 */
1457
1458 if (fsp->is_directory) {
1459
1460 /*
1461 * We can only add to the default POSIX ACE list if the ACE is
1462 * designed to be inherited by both files and directories.
1463 */
1464
1465 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1466 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1467
1468 DLIST_ADD_END(dir_ace, current_ace, canon_ace *);
1469
1470 /*
1471 * Note if this was an allow ace. We can't process
1472 * any further deny ace's after this.
1473 */
1474
1475 if (current_ace->attr == ALLOW_ACE)
1476 got_dir_allow = True;
1477
1478 if ((current_ace->attr == DENY_ACE) && got_dir_allow) {
1479 DEBUG(0,("create_canon_ace_lists: malformed ACL in inheritable ACL ! \
1480 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1481 free_canon_ace_list(file_ace);
1482 free_canon_ace_list(dir_ace);
1483 return False;
1484 }
1485
1486 if( DEBUGLVL( 10 )) {
1487 dbgtext("create_canon_ace_lists: adding dir ACL:\n");
1488 print_canon_ace( current_ace, 0);
1489 }
1490
1491 /*
1492 * If this is not an inherit only ACE we need to add a duplicate
1493 * to the file acl.
1494 */
1495
1496 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1497 canon_ace *dup_ace = dup_canon_ace(current_ace);
1498
1499 if (!dup_ace) {
1500 DEBUG(0,("create_canon_ace_lists: malloc fail !\n"));
1501 free_canon_ace_list(file_ace);
1502 free_canon_ace_list(dir_ace);
1503 return False;
1504 }
1505
1506 /*
1507 * We must not free current_ace here as its
1508 * pointer is now owned by the dir_ace list.
1509 */
1510 current_ace = dup_ace;
1511 } else {
1512 /*
1513 * We must not free current_ace here as its
1514 * pointer is now owned by the dir_ace list.
1515 */
1516 current_ace = NULL;
1517 }
1518 }
1519 }
1520
1521 /*
1522 * Only add to the file ACL if not inherit only.
1523 */
1524
1525 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1526 DLIST_ADD_END(file_ace, current_ace, canon_ace *);
1527
1528 /*
1529 * Note if this was an allow ace. We can't process
1530 * any further deny ace's after this.
1531 */
1532
1533 if (current_ace->attr == ALLOW_ACE)
1534 got_file_allow = True;
1535
1536 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1537 DEBUG(0,("create_canon_ace_lists: malformed ACL in file ACL ! \
1538 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1539 free_canon_ace_list(file_ace);
1540 free_canon_ace_list(dir_ace);
1541 return False;
1542 }
1543
1544 if( DEBUGLVL( 10 )) {
1545 dbgtext("create_canon_ace_lists: adding file ACL:\n");
1546 print_canon_ace( current_ace, 0);
1547 }
1548 all_aces_are_inherit_only = False;
1549 /*
1550 * We must not free current_ace here as its
1551 * pointer is now owned by the file_ace list.
1552 */
1553 current_ace = NULL;
1554 }
1555
1556 /*
1557 * Free if ACE was not added.
1558 */
1559
1560 SAFE_FREE(current_ace);
1561 }
1562
1563 if (fsp->is_directory && all_aces_are_inherit_only) {
1564 /*
1565 * Windows 2000 is doing one of these weird 'inherit acl'
1566 * traverses to conserve NTFS ACL resources. Just pretend
1567 * there was no DACL sent. JRA.
1568 */
1569
1570 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
1571 free_canon_ace_list(file_ace);
1572 free_canon_ace_list(dir_ace);
1573 file_ace = NULL;
1574 dir_ace = NULL;
1575 } else {
1576 /*
1577 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in each
1578 * ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
1579 * entries can be converted to *_OBJ. Usually we will already have these
1580 * entries in the Default ACL, and the Access ACL will not have them.
1581 */
1582 if (file_ace) {
1583 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
1584 }
1585 if (dir_ace) {
1586 check_owning_objs(dir_ace, pfile_owner_sid, pfile_grp_sid);
1587 }
1588 }
1589
1590 *ppfile_ace = file_ace;
1591 *ppdir_ace = dir_ace;
1592
1593 return True;
1594 }
1595
1596 /****************************************************************************
1597 ASCII art time again... JRA :-).
1598
1599 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
1600 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
1601 entries). Secondly, the merge code has ensured that all duplicate SID entries for
1602 allow or deny have been merged, so the same SID can only appear once in the deny
1603 list or once in the allow list.
1604
1605 We then process as follows :
1606
1607 ---------------------------------------------------------------------------
1608 First pass - look for a Everyone DENY entry.
1609
1610 If it is deny all (rwx) trunate the list at this point.
1611 Else, walk the list from this point and use the deny permissions of this
1612 entry as a mask on all following allow entries. Finally, delete
1613 the Everyone DENY entry (we have applied it to everything possible).
1614
1615 In addition, in this pass we remove any DENY entries that have
1616 no permissions (ie. they are a DENY nothing).
1617 ---------------------------------------------------------------------------
1618 Second pass - only deal with deny user entries.
1619
1620 DENY user1 (perms XXX)
1621
1622 new_perms = 0
1623 for all following allow group entries where user1 is in group
1624 new_perms |= group_perms;
1625
1626 user1 entry perms = new_perms & ~ XXX;
1627
1628 Convert the deny entry to an allow entry with the new perms and
1629 push to the end of the list. Note if the user was in no groups
1630 this maps to a specific allow nothing entry for this user.
1631
1632 The common case from the NT ACL choser (userX deny all) is
1633 optimised so we don't do the group lookup - we just map to
1634 an allow nothing entry.
1635
1636 What we're doing here is inferring the allow permissions the
1637 person setting the ACE on user1 wanted by looking at the allow
1638 permissions on the groups the user is currently in. This will
1639 be a snapshot, depending on group membership but is the best
1640 we can do and has the advantage of failing closed rather than
1641 open.
1642 ---------------------------------------------------------------------------
1643 Third pass - only deal with deny group entries.
1644
1645 DENY group1 (perms XXX)
1646
1647 for all following allow user entries where user is in group1
1648 user entry perms = user entry perms & ~ XXX;
1649
1650 If there is a group Everyone allow entry with permissions YYY,
1651 convert the group1 entry to an allow entry and modify its
1652 permissions to be :
1653
1654 new_perms = YYY & ~ XXX
1655
1656 and push to the end of the list.
1657
1658 If there is no group Everyone allow entry then convert the
1659 group1 entry to a allow nothing entry and push to the end of the list.
1660
1661 Note that the common case from the NT ACL choser (groupX deny all)
1662 cannot be optimised here as we need to modify user entries who are
1663 in the group to change them to a deny all also.
1664
1665 What we're doing here is modifying the allow permissions of
1666 user entries (which are more specific in POSIX ACLs) to mask
1667 out the explicit deny set on the group they are in. This will
1668 be a snapshot depending on current group membership but is the
1669 best we can do and has the advantage of failing closed rather
1670 than open.
1671 ---------------------------------------------------------------------------
1672 Fourth pass - cope with cumulative permissions.
1673
1674 for all allow user entries, if there exists an allow group entry with
1675 more permissive permissions, and the user is in that group, rewrite the
1676 allow user permissions to contain both sets of permissions.
1677
1678 Currently the code for this is #ifdef'ed out as these semantics make
1679 no sense to me. JRA.
1680 ---------------------------------------------------------------------------
1681
1682 Note we *MUST* do the deny user pass first as this will convert deny user
1683 entries into allow user entries which can then be processed by the deny
1684 group pass.
1685
1686 The above algorithm took a *lot* of thinking about - hence this
1687 explaination :-). JRA.
1688 ****************************************************************************/
1689
1690 /****************************************************************************
1691 Process a canon_ace list entries. This is very complex code. We need
1692 to go through and remove the "deny" permissions from any allow entry that matches
1693 the id of this entry. We have already refused any NT ACL that wasn't in correct
1694 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
1695 we just remove it (to fail safe). We have already removed any duplicate ace
1696 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
1697 allow entries.
1698 ****************************************************************************/
1699
1700 static void process_deny_list( canon_ace **pp_ace_list )
1701 {
1702 canon_ace *ace_list = *pp_ace_list;
1703 canon_ace *curr_ace = NULL;
1704 canon_ace *curr_ace_next = NULL;
1705
1706 /* Pass 1 above - look for an Everyone, deny entry. */
1707
1708 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1709 canon_ace *allow_ace_p;
1710
1711 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1712
1713 if (curr_ace->attr != DENY_ACE)
1714 continue;
1715
1716 if (curr_ace->perms == (mode_t)0) {
1717
1718 /* Deny nothing entry - delete. */
1719
1720 DLIST_REMOVE(ace_list, curr_ace);
1721 continue;
1722 }
1723
1724 if (!sid_equal(&curr_ace->trustee, &global_sid_World))
1725 continue;
1726
1727 /* JRATEST - assert. */
1728 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
1729
1730 if (curr_ace->perms == ALL_ACE_PERMS) {
1731
1732 /*
1733 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
1734 * list at this point including this entry.
1735 */
1736
1737 canon_ace *prev_entry = curr_ace->prev;
1738
1739 free_canon_ace_list( curr_ace );
1740 if (prev_entry)
1741 prev_entry->next = NULL;
1742 else {
1743 /* We deleted the entire list. */
1744 ace_list = NULL;
1745 }
1746 break;
1747 }
1748
1749 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1750
1751 /*
1752 * Only mask off allow entries.
1753 */
1754
1755 if (allow_ace_p->attr != ALLOW_ACE)
1756 continue;
1757
1758 allow_ace_p->perms &= ~curr_ace->perms;
1759 }
1760
1761 /*
1762 * Now it's been applied, remove it.
1763 */
1764
1765 DLIST_REMOVE(ace_list, curr_ace);
1766 }
1767
1768 /* Pass 2 above - deal with deny user entries. */
1769
1770 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1771 mode_t new_perms = (mode_t)0;
1772 canon_ace *allow_ace_p;
1773
1774 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1775
1776 if (curr_ace->attr != DENY_ACE)
1777 continue;
1778
1779 if (curr_ace->owner_type != UID_ACE)
1780 continue;
1781
1782 if (curr_ace->perms == ALL_ACE_PERMS) {
1783
1784 /*
1785 * Optimisation - this is a deny everything to this user.
1786 * Convert to an allow nothing and push to the end of the list.
1787 */
1788
1789 curr_ace->attr = ALLOW_ACE;
1790 curr_ace->perms = (mode_t)0;
1791 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1792 continue;
1793 }
1794
1795 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1796
1797 if (allow_ace_p->attr != ALLOW_ACE)
1798 continue;
1799
1800 /* We process GID_ACE and WORLD_ACE entries only. */
1801
1802 if (allow_ace_p->owner_type == UID_ACE)
1803 continue;
1804
1805 if (uid_entry_in_group( curr_ace, allow_ace_p))
1806 new_perms |= allow_ace_p->perms;
1807 }
1808
1809 /*
1810 * Convert to a allow entry, modify the perms and push to the end
1811 * of the list.
1812 */
1813
1814 curr_ace->attr = ALLOW_ACE;
1815 curr_ace->perms = (new_perms & ~curr_ace->perms);
1816 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1817 }
1818
1819 /* Pass 3 above - deal with deny group entries. */
1820
1821 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1822 canon_ace *allow_ace_p;
1823 canon_ace *allow_everyone_p = NULL;
1824
1825 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1826
1827 if (curr_ace->attr != DENY_ACE)
1828 continue;
1829
1830 if (curr_ace->owner_type != GID_ACE)
1831 continue;
1832
1833 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1834
1835 if (allow_ace_p->attr != ALLOW_ACE)
1836 continue;
1837
1838 /* Store a pointer to the Everyone allow, if it exists. */
1839 if (allow_ace_p->owner_type == WORLD_ACE)
1840 allow_everyone_p = allow_ace_p;
1841
1842 /* We process UID_ACE entries only. */
1843
1844 if (allow_ace_p->owner_type != UID_ACE)
1845 continue;
1846
1847 /* Mask off the deny group perms. */
1848
1849 if (uid_entry_in_group( allow_ace_p, curr_ace))
1850 allow_ace_p->perms &= ~curr_ace->perms;
1851 }
1852
1853 /*
1854 * Convert the deny to an allow with the correct perms and
1855 * push to the end of the list.
1856 */
1857
1858 curr_ace->attr = ALLOW_ACE;
1859 if (allow_everyone_p)
1860 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
1861 else
1862 curr_ace->perms = (mode_t)0;
1863 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1864 }
1865
1866 /* Doing this fourth pass allows Windows semantics to be layered
1867 * on top of POSIX semantics. I'm not sure if this is desirable.
1868 * For example, in W2K ACLs there is no way to say, "Group X no
1869 * access, user Y full access" if user Y is a member of group X.
1870 * This seems completely broken semantics to me.... JRA.
1871 */
1872
1873 #if 0
1874 /* Pass 4 above - deal with allow entries. */
1875
1876 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1877 canon_ace *allow_ace_p;
1878
1879 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1880
1881 if (curr_ace->attr != ALLOW_ACE)
1882 continue;
1883
1884 if (curr_ace->owner_type != UID_ACE)
1885 continue;
1886
1887 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1888
1889 if (allow_ace_p->attr != ALLOW_ACE)
1890 continue;
1891
1892 /* We process GID_ACE entries only. */
1893
1894 if (allow_ace_p->owner_type != GID_ACE)
1895 continue;
1896
1897 /* OR in the group perms. */
1898
1899 if (uid_entry_in_group( curr_ace, allow_ace_p))
1900 curr_ace->perms |= allow_ace_p->perms;
1901 }
1902 }
1903 #endif
1904
1905 *pp_ace_list = ace_list;
1906 }
1907
1908 /****************************************************************************
1909 Create a default mode that will be used if a security descriptor entry has
1910 no user/group/world entries.
1911 ****************************************************************************/
1912
1913 static mode_t create_default_mode(files_struct *fsp, BOOL interitable_mode)
1914 {
1915 int snum = SNUM(fsp->conn);
1916 mode_t and_bits = (mode_t)0;
1917 mode_t or_bits = (mode_t)0;
1918 mode_t mode = interitable_mode
1919 ? unix_mode( fsp->conn, FILE_ATTRIBUTE_ARCHIVE, fsp->fsp_name,
1920 NULL )
1921 : S_IRUSR;
1922
1923 if (fsp->is_directory)
1924 mode |= (S_IWUSR|S_IXUSR);
1925
1926 /*
1927 * Now AND with the create mode/directory mode bits then OR with the
1928 * force create mode/force directory mode bits.
1929 */
1930
1931 if (fsp->is_directory) {
1932 and_bits = lp_dir_security_mask(snum);
1933 or_bits = lp_force_dir_security_mode(snum);
1934 } else {
1935 and_bits = lp_security_mask(snum);
1936 or_bits = lp_force_security_mode(snum);
1937 }
1938
1939 return ((mode & and_bits)|or_bits);
1940 }
1941
1942 /****************************************************************************
1943 Unpack a SEC_DESC into two canonical ace lists. We don't depend on this
1944 succeeding.
1945 ****************************************************************************/
1946
1947 static BOOL unpack_canon_ace(files_struct *fsp,
1948 SMB_STRUCT_STAT *pst,
1949 DOM_SID *pfile_owner_sid,
1950 DOM_SID *pfile_grp_sid,
1951 canon_ace **ppfile_ace, canon_ace **ppdir_ace,
1952 uint32 security_info_sent, SEC_DESC *psd)
1953 {
1954 canon_ace *file_ace = NULL;
1955 canon_ace *dir_ace = NULL;
1956
1957 *ppfile_ace = NULL;
1958 *ppdir_ace = NULL;
1959
1960 if(security_info_sent == 0) {
1961 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
1962 return False;
1963 }
1964
1965 /*
1966 * If no DACL then this is a chown only security descriptor.
1967 */
1968
1969 if(!(security_info_sent & DACL_SECURITY_INFORMATION) || !psd->dacl)
1970 return True;
1971
1972 /*
1973 * Now go through the DACL and create the canon_ace lists.
1974 */
1975
1976 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
1977 &file_ace, &dir_ace, psd->dacl))
1978 return False;
1979
1980 if ((file_ace == NULL) && (dir_ace == NULL)) {
1981 /* W2K traverse DACL set - ignore. */
1982 return True;
1983 }
1984
1985 /*
1986 * Go through the canon_ace list and merge entries
1987 * belonging to identical users of identical allow or deny type.
1988 * We can do this as all deny entries come first, followed by
1989 * all allow entries (we have mandated this before accepting this acl).
1990 */
1991
1992 print_canon_ace_list( "file ace - before merge", file_ace);
1993 merge_aces( &file_ace );
1994
1995 print_canon_ace_list( "dir ace - before merge", dir_ace);
1996 merge_aces( &dir_ace );
1997
1998 /*
1999 * NT ACLs are order dependent. Go through the acl lists and
2000 * process DENY entries by masking the allow entries.
2001 */
2002
2003 print_canon_ace_list( "file ace - before deny", file_ace);
2004 process_deny_list( &file_ace);
2005
2006 print_canon_ace_list( "dir ace - before deny", dir_ace);
2007 process_deny_list( &dir_ace);
2008
2009 /*
2010 * A well formed POSIX file or default ACL has at least 3 entries, a
2011 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2012 * and optionally a mask entry. Ensure this is the case.
2013 */
2014
2015 print_canon_ace_list( "file ace - before valid", file_ace);
2016
2017 /*
2018 * A default 3 element mode entry for a file should be r-- --- ---.
2019 * A default 3 element mode entry for a directory should be rwx --- ---.
2020 */
2021
2022 pst->st_mode = create_default_mode(fsp, False);
2023
2024 if (!ensure_canon_entry_valid(&file_ace, fsp, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2025 free_canon_ace_list(file_ace);
2026 free_canon_ace_list(dir_ace);
2027 return False;
2028 }
2029
2030 print_canon_ace_list( "dir ace - before valid", dir_ace);
2031
2032 /*
2033 * A default inheritable 3 element mode entry for a directory should be the
2034 * mode Samba will use to create a file within. Ensure user rwx bits are set if
2035 * it's a directory.
2036 */
2037
2038 pst->st_mode = create_default_mode(fsp, True);
2039
2040 if (dir_ace && !ensure_canon_entry_valid(&dir_ace, fsp, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2041 free_canon_ace_list(file_ace);
2042 free_canon_ace_list(dir_ace);
2043 return False;
2044 }
2045
2046 print_canon_ace_list( "file ace - return", file_ace);
2047 print_canon_ace_list( "dir ace - return", dir_ace);
2048
2049 *ppfile_ace = file_ace;
2050 *ppdir_ace = dir_ace;
2051 return True;
2052
2053 }
2054
2055 /******************************************************************************
2056 When returning permissions, try and fit NT display
2057 semantics if possible. Note the the canon_entries here must have been malloced.
2058 The list format should be - first entry = owner, followed by group and other user
2059 entries, last entry = other.
2060
2061 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2062 are not ordered, and match on the most specific entry rather than walking a list,
2063 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2064
2065 Entry 0: owner : deny all except read and write.
2066 Entry 1: owner : allow read and write.
2067 Entry 2: group : deny all except read.
2068 Entry 3: group : allow read.
2069 Entry 4: Everyone : allow read.
2070
2071 But NT cannot display this in their ACL editor !
2072 ********************************************************************************/
2073
2074 static void arrange_posix_perms( char *filename, canon_ace **pp_list_head)
2075 {
2076 canon_ace *list_head = *pp_list_head;
2077 canon_ace *owner_ace = NULL;
2078 canon_ace *other_ace = NULL;
2079 canon_ace *ace = NULL;
2080
2081 for (ace = list_head; ace; ace = ace->next) {
2082 if (ace->type == SMB_ACL_USER_OBJ)
2083 owner_ace = ace;
2084 else if (ace->type == SMB_ACL_OTHER) {
2085 /* Last ace - this is "other" */
2086 other_ace = ace;
2087 }
2088 }
2089
2090 if (!owner_ace || !other_ace) {
2091 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2092 filename ));
2093 return;
2094 }
2095
2096 /*
2097 * The POSIX algorithm applies to owner first, and other last,
2098 * so ensure they are arranged in this order.
2099 */
2100
2101 if (owner_ace) {
2102 DLIST_PROMOTE(list_head, owner_ace);
2103 }
2104
2105 if (other_ace) {
2106 DLIST_DEMOTE(list_head, other_ace, canon_ace *);
2107 }
2108
2109 /* We have probably changed the head of the list. */
2110
2111 *pp_list_head = list_head;
2112 }
2113
2114 /****************************************************************************
2115 Create a linked list of canonical ACE entries.
2116 ****************************************************************************/
2117
2118 static canon_ace *canonicalise_acl( files_struct *fsp, SMB_ACL_T posix_acl, SMB_STRUCT_STAT *psbuf,
2119 const DOM_SID *powner, const DOM_SID *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2120 {
2121 connection_struct *conn = fsp->conn;
2122 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2123 canon_ace *list_head = NULL;
2124 canon_ace *ace = NULL;
2125 canon_ace *next_ace = NULL;
2126 int entry_id = SMB_ACL_FIRST_ENTRY;
2127 SMB_ACL_ENTRY_T entry;
2128 size_t ace_count;
2129
2130 while ( posix_acl && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1)) {
2131 SMB_ACL_TAG_T tagtype;
2132 SMB_ACL_PERMSET_T permset;
2133 DOM_SID sid;
2134 posix_id unix_ug;
2135 enum ace_owner owner_type;
2136
2137 /* get_next... */
2138 if (entry_id == SMB_ACL_FIRST_ENTRY)
2139 entry_id = SMB_ACL_NEXT_ENTRY;
2140
2141 /* Is this a MASK entry ? */
2142 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
2143 continue;
2144
2145 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
2146 continue;
2147
2148 /* Decide which SID to use based on the ACL type. */
2149 switch(tagtype) {
2150 case SMB_ACL_USER_OBJ:
2151 /* Get the SID from the owner. */
2152 sid_copy(&sid, powner);
2153 unix_ug.uid = psbuf->st_uid;
2154 owner_type = UID_ACE;
2155 break;
2156 case SMB_ACL_USER:
2157 {
2158 uid_t *puid = (uid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2159 if (puid == NULL) {
2160 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2161 continue;
2162 }
2163 /*
2164 * A SMB_ACL_USER entry for the owner is shadowed by the
2165 * SMB_ACL_USER_OBJ entry and Windows also cannot represent
2166 * that entry, so we ignore it. We also don't create such
2167 * entries out of the blue when setting ACLs, so a get/set
2168 * cycle will drop them.
2169 */
2170 if (the_acl_type == SMB_ACL_TYPE_ACCESS && *puid == psbuf->st_uid) {
2171 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2172 continue;
2173 }
2174 uid_to_sid( &sid, *puid);
2175 unix_ug.uid = *puid;
2176 owner_type = UID_ACE;
2177 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2178 break;
2179 }
2180 case SMB_ACL_GROUP_OBJ:
2181 /* Get the SID from the owning group. */
2182 sid_copy(&sid, pgroup);
2183 unix_ug.gid = psbuf->st_gid;
2184 owner_type = GID_ACE;
2185 break;
2186 case SMB_ACL_GROUP:
2187 {
2188 gid_t *pgid = (gid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2189 if (pgid == NULL) {
2190 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2191 continue;
2192 }
2193 gid_to_sid( &sid, *pgid);
2194 unix_ug.gid = *pgid;
2195 owner_type = GID_ACE;
2196 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)pgid,tagtype);
2197 break;
2198 }
2199 case SMB_ACL_MASK:
2200 acl_mask = convert_permset_to_mode_t(conn, permset);
2201 continue; /* Don't count the mask as an entry. */
2202 case SMB_ACL_OTHER:
2203 /* Use the Everyone SID */
2204 sid = global_sid_World;
2205 unix_ug.world = -1;
2206 owner_type = WORLD_ACE;
2207 break;
2208 default:
2209 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2210 continue;
2211 }
2212
2213 /*
2214 * Add this entry to the list.
2215 */
2216
2217 if ((ace = SMB_MALLOC_P(canon_ace)) == NULL)
2218 goto fail;
2219
2220 ZERO_STRUCTP(ace);
2221 ace->type = tagtype;
2222 ace->perms = convert_permset_to_mode_t(conn, permset);
2223 ace->attr = ALLOW_ACE;
2224 ace->trustee = sid;
2225 ace->unix_ug = unix_ug;
2226 ace->owner_type = owner_type;
2227 ace->inherited = get_inherited_flag(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2228
2229 DLIST_ADD(list_head, ace);
2230 }
2231
2232 /*
2233 * This next call will ensure we have at least a user/group/world set.
2234 */
2235
2236 if (!ensure_canon_entry_valid(&list_head, fsp, powner, pgroup, psbuf, False))
2237 goto fail;
2238
2239 /*
2240 * Now go through the list, masking the permissions with the
2241 * acl_mask. Ensure all DENY Entries are at the start of the list.
2242 */
2243
2244 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2245
2246 for ( ace_count = 0, ace = list_head; ace; ace = next_ace, ace_count++) {
2247 next_ace = ace->next;
2248
2249 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2250 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2251 ace->perms &= acl_mask;
2252
2253 if (ace->perms == 0) {
2254 DLIST_PROMOTE(list_head, ace);
2255 }
2256
2257 if( DEBUGLVL( 10 ) ) {
2258 print_canon_ace(ace, ace_count);
2259 }
2260 }
2261
2262 arrange_posix_perms(fsp->fsp_name,&list_head );
2263
2264 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", list_head );
2265
2266 return list_head;
2267
2268 fail:
2269
2270 free_canon_ace_list(list_head);
2271 return NULL;
2272 }
2273
2274 /****************************************************************************
2275 Check if the current user group list contains a given group.
2276 ****************************************************************************/
2277
2278 static BOOL current_user_in_group(gid_t gid)
2279 {
2280 int i;
2281
2282 for (i = 0; i < current_user.ut.ngroups; i++) {
2283 if (current_user.ut.groups[i] == gid) {
2284 return True;
2285 }
2286 }
2287
2288 return False;
2289 }
2290
2291 /****************************************************************************
2292 Should we override a deny ? Check 'acl group control' and 'dos filemode'
2293 ****************************************************************************/
2294
2295 static BOOL acl_group_override(connection_struct *conn, gid_t prim_gid, const char *fname)
2296 {
2297 SMB_STRUCT_STAT sbuf;
2298
2299 if ((errno != EPERM) && (errno != EACCES)) {
2300 return False;
2301 }
2302
2303 /* file primary group == user primary or supplementary group */
2304 if (lp_acl_group_control(SNUM(conn)) && current_user_in_group(prim_gid)) {
2305 return True;
2306 }
2307
2308 /* user has writeable permission */
2309 if (lp_dos_filemode(SNUM(conn)) && can_write_to_file(conn, fname, &sbuf)) {
2310 return True;
2311 }
2312
2313 return False;
2314 }
2315
2316 /****************************************************************************
2317 Attempt to apply an ACL to a file or directory.
2318 ****************************************************************************/
2319
2320 static BOOL set_canon_ace_list(files_struct *fsp, canon_ace *the_ace, BOOL default_ace, gid_t prim_gid, BOOL *pacl_set_support)
2321 {
2322 connection_struct *conn = fsp->conn;
2323 BOOL ret = False;
2324 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, (int)count_canon_ace_list(the_ace) + 1);
2325 canon_ace *p_ace;
2326 int i;
2327 SMB_ACL_ENTRY_T mask_entry;
2328 BOOL got_mask_entry = False;
2329 SMB_ACL_PERMSET_T mask_permset;
2330 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2331 BOOL needs_mask = False;
2332 mode_t mask_perms = 0;
2333
2334 #if defined(POSIX_ACL_NEEDS_MASK)
2335 /* HP-UX always wants to have a mask (called "class" there). */
2336 needs_mask = True;
2337 #endif
2338
2339 if (the_acl == NULL) {
2340
2341 if (!no_acl_syscall_error(errno)) {
2342 /*
2343 * Only print this error message if we have some kind of ACL
2344 * support that's not working. Otherwise we would always get this.
2345 */
2346 DEBUG(0,("set_canon_ace_list: Unable to init %s ACL. (%s)\n",
2347 default_ace ? "default" : "file", strerror(errno) ));
2348 }
2349 *pacl_set_support = False;
2350 return False;
2351 }
2352
2353 if( DEBUGLVL( 10 )) {
2354 dbgtext("set_canon_ace_list: setting ACL:\n");
2355 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2356 print_canon_ace( p_ace, i);
2357 }
2358 }
2359
2360 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2361 SMB_ACL_ENTRY_T the_entry;
2362 SMB_ACL_PERMSET_T the_permset;
2363
2364 /*
2365 * ACLs only "need" an ACL_MASK entry if there are any named user or
2366 * named group entries. But if there is an ACL_MASK entry, it applies
2367 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2368 * so that it doesn't deny (i.e., mask off) any permissions.
2369 */
2370
2371 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2372 needs_mask = True;
2373 mask_perms |= p_ace->perms;
2374 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2375 mask_perms |= p_ace->perms;
2376 }
2377
2378 /*
2379 * Get the entry for this ACE.
2380 */
2381
2382 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
2383 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2384 i, strerror(errno) ));
2385 goto fail;
2386 }
2387
2388 if (p_ace->type == SMB_ACL_MASK) {
2389 mask_entry = the_entry;
2390 got_mask_entry = True;
2391 }
2392
2393 /*
2394 * Ok - we now know the ACL calls should be working, don't
2395 * allow fallback to chmod.
2396 */
2397
2398 *pacl_set_support = True;
2399
2400 /*
2401 * Initialise the entry from the canon_ace.
2402 */
2403
2404 /*
2405 * First tell the entry what type of ACE this is.
2406 */
2407
2408 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, p_ace->type) == -1) {
2409 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2410 i, strerror(errno) ));
2411 goto fail;
2412 }
2413
2414 /*
2415 * Only set the qualifier (user or group id) if the entry is a user
2416 * or group id ACE.
2417 */
2418
2419 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2420 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&p_ace->unix_ug.uid) == -1) {
2421 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2422 i, strerror(errno) ));
2423 goto fail;
2424 }
2425 }
2426
2427 /*
2428 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2429 */
2430
2431 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
2432 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2433 i, strerror(errno) ));
2434 goto fail;
2435 }
2436
2437 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2438 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2439 (unsigned int)p_ace->perms, i, strerror(errno) ));
2440 goto fail;
2441 }
2442
2443 /*
2444 * ..and apply them to the entry.
2445 */
2446
2447 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
2448 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2449 i, strerror(errno) ));
2450 goto fail;
2451 }
2452
2453 if( DEBUGLVL( 10 ))
2454 print_canon_ace( p_ace, i);
2455
2456 }
2457
2458 if (needs_mask && !got_mask_entry) {
2459 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &mask_entry) == -1) {
2460 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2461 goto fail;
2462 }
2463
2464 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, mask_entry, SMB_ACL_MASK) == -1) {
2465 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2466 goto fail;
2467 }
2468
2469 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, mask_entry, &mask_permset) == -1) {
2470 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2471 goto fail;
2472 }
2473
2474 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2475 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2476 goto fail;
2477 }
2478
2479 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, mask_entry, mask_permset) == -1) {
2480 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2481 goto fail;
2482 }
2483 }
2484
2485 /*
2486 * Finally apply it to the file or directory.
2487 */
2488
2489 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2490 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl) == -1) {
2491 /*
2492 * Some systems allow all the above calls and only fail with no ACL support
2493 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2494 */
2495 if (no_acl_syscall_error(errno)) {
2496 *pacl_set_support = False;
2497 }
2498
2499 if (acl_group_override(conn, prim_gid, fsp->fsp_name)) {
2500 int sret;
2501
2502 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2503 fsp->fsp_name ));
2504
2505 become_root();
2506 sret = SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl);
2507 unbecome_root();
2508 if (sret == 0) {
2509 ret = True;
2510 }
2511 }
2512
2513 if (ret == False) {
2514 DEBUG(2,("set_canon_ace_list: sys_acl_set_file type %s failed for file %s (%s).\n",
2515 the_acl_type == SMB_ACL_TYPE_DEFAULT ? "directory default" : "file",
2516 fsp->fsp_name, strerror(errno) ));
2517 goto fail;
2518 }
2519 }
2520 } else {
2521 if (SMB_VFS_SYS_ACL_SET_FD(fsp, fsp->fh->fd, the_acl) == -1) {
2522 /*
2523 * Some systems allow all the above calls and only fail with no ACL support
2524 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2525 */
2526 if (no_acl_syscall_error(errno)) {
2527 *pacl_set_support = False;
2528 }
2529
2530 if (acl_group_override(conn, prim_gid, fsp->fsp_name)) {
2531 int sret;
2532
2533 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2534 fsp->fsp_name ));
2535
2536 become_root();
2537 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, fsp->fh->fd, the_acl);
2538 unbecome_root();
2539 if (sret == 0) {
2540 ret = True;
2541 }
2542 }
2543
2544 if (ret == False) {
2545 DEBUG(2,("set_canon_ace_list: sys_acl_set_file failed for file %s (%s).\n",
2546 fsp->fsp_name, strerror(errno) ));
2547 goto fail;
2548 }
2549 }
2550 }
2551
2552 ret = True;
2553
2554 fail:
2555
2556 if (the_acl != NULL) {
2557 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2558 }
2559
2560 return ret;
2561 }
2562
2563 /****************************************************************************
2564 Find a particular canon_ace entry.
2565 ****************************************************************************/
2566
2567 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, posix_id *id)
2568 {
2569 while (list) {
2570 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
2571 (type == SMB_ACL_USER && id && id->uid == list->unix_ug.uid) ||
2572 (type == SMB_ACL_GROUP && id && id->gid == list->unix_ug.gid)))
2573 break;
2574 list = list->next;
2575 }
2576 return list;
2577 }
2578
2579 /****************************************************************************
2580
2581 ****************************************************************************/
2582
2583 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
2584 {
2585 SMB_ACL_ENTRY_T entry;
2586
2587 if (!the_acl)
2588 return NULL;
2589 if (SMB_VFS_SYS_ACL_GET_ENTRY(conn, the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
2590 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2591 return NULL;
2592 }
2593 return the_acl;
2594 }
2595
2596 /****************************************************************************
2597 Convert a canon_ace to a generic 3 element permission - if possible.
2598 ****************************************************************************/
2599
2600 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
2601
2602 static BOOL convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
2603 {
2604 int snum = SNUM(fsp->conn);
2605 size_t ace_count = count_canon_ace_list(file_ace_list);
2606 canon_ace *ace_p;
2607 canon_ace *owner_ace = NULL;
2608 canon_ace *group_ace = NULL;
2609 canon_ace *other_ace = NULL;
2610 mode_t and_bits;
2611 mode_t or_bits;
2612
2613 if (ace_count != 3) {
2614 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE entries for file %s to convert to \
2615 posix perms.\n", fsp->fsp_name ));
2616 return False;
2617 }
2618
2619 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
2620 if (ace_p->owner_type == UID_ACE)
2621 owner_ace = ace_p;
2622 else if (ace_p->owner_type == GID_ACE)
2623 group_ace = ace_p;
2624 else if (ace_p->owner_type == WORLD_ACE)
2625 other_ace = ace_p;
2626 }
2627
2628 if (!owner_ace || !group_ace || !other_ace) {
2629 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get standard entries for file %s.\n",
2630 fsp->fsp_name ));
2631 return False;
2632 }
2633
2634 *posix_perms = (mode_t)0;
2635
2636 *posix_perms |= owner_ace->perms;
2637 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
2638 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
2639 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
2640 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
2641 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
2642 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
2643
2644 /* The owner must have at least read access. */
2645
2646 *posix_perms |= S_IRUSR;
2647 if (fsp->is_directory)
2648 *posix_perms |= (S_IWUSR|S_IXUSR);
2649
2650 /* If requested apply the masks. */
2651
2652 /* Get the initial bits to apply. */
2653
2654 if (fsp->is_directory) {
2655 and_bits = lp_dir_security_mask(snum);
2656 or_bits = lp_force_dir_security_mode(snum);
2657 } else {
2658 and_bits = lp_security_mask(snum);
2659 or_bits = lp_force_security_mode(snum);
2660 }
2661
2662 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
2663
2664 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o to perm=0%o for file %s.\n",
2665 (int)owner_ace->perms, (int)group_ace->perms, (int)other_ace->perms, (int)*posix_perms,
2666 fsp->fsp_name ));
2667
2668 return True;
2669 }
2670
2671 /****************************************************************************
2672 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
2673 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
2674 with CI|OI set so it is inherited and also applies to the directory.
2675 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
2676 ****************************************************************************/
2677
2678 static size_t merge_default_aces( SEC_ACE *nt_ace_list, size_t num_aces)
2679 {
2680 size_t i, j;
2681
2682 for (i = 0; i < num_aces; i++) {
2683 for (j = i+1; j < num_aces; j++) {
2684 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2685 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2686 BOOL i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2687 BOOL j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2688
2689 /* We know the lower number ACE's are file entries. */
2690 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
2691 (nt_ace_list[i].size == nt_ace_list[j].size) &&
2692 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
2693 sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
2694 (i_inh == j_inh) &&
2695 (i_flags_ni == 0) &&
2696 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
2697 SEC_ACE_FLAG_CONTAINER_INHERIT|
2698 SEC_ACE_FLAG_INHERIT_ONLY))) {
2699 /*
2700 * W2K wants to have access allowed zero access ACE's
2701 * at the end of the list. If the mask is zero, merge
2702 * the non-inherited ACE onto the inherited ACE.
2703 */
2704
2705 if (nt_ace_list[i].access_mask == 0) {
2706 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2707 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2708 if (num_aces - i - 1 > 0)
2709 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
2710 sizeof(SEC_ACE));
2711
2712 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
2713 (unsigned int)i, (unsigned int)j ));
2714 } else {
2715 /*
2716 * These are identical except for the flags.
2717 * Merge the inherited ACE onto the non-inherited ACE.
2718 */
2719
2720 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2721 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2722 if (num_aces - j - 1 > 0)
2723 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
2724 sizeof(SEC_ACE));
2725
2726 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
2727 (unsigned int)j, (unsigned int)i ));
2728 }
2729 num_aces--;
2730 break;
2731 }
2732 }
2733 }
2734
2735 return num_aces;
2736 }
2737 /****************************************************************************
2738 Reply to query a security descriptor from an fsp. If it succeeds it allocates
2739 the space for the return elements and returns the size needed to return the
2740 security descriptor. This should be the only external function needed for
2741 the UNIX style get ACL.
2742 ****************************************************************************/
2743
2744 size_t get_nt_acl(files_struct *fsp, uint32 security_info, SEC_DESC **ppdesc)
2745 {
2746 connection_struct *conn = fsp->conn;
2747 SMB_STRUCT_STAT sbuf;
2748 SEC_ACE *nt_ace_list = NULL;
2749 DOM_SID owner_sid;
2750 DOM_SID group_sid;
2751 size_t sd_size = 0;
2752 SEC_ACL *psa = NULL;
2753 size_t num_acls = 0;
2754 size_t num_def_acls = 0;
2755 size_t num_aces = 0;
2756 SMB_ACL_T posix_acl = NULL;
2757 SMB_ACL_T def_acl = NULL;
2758 canon_ace *file_ace = NULL;
2759 canon_ace *dir_ace = NULL;
2760 size_t num_profile_acls = 0;
2761 struct pai_val *pal = NULL;
2762 SEC_DESC *psd = NULL;
2763
2764 *ppdesc = NULL;
2765
2766 DEBUG(10,("get_nt_acl: called for file %s\n", fsp->fsp_name ));
2767
2768 if(fsp->is_directory || fsp->fh->fd == -1) {
2769
2770 /* Get the stat struct for the owner info. */
2771 if(SMB_VFS_STAT(fsp->conn,fsp->fsp_name, &sbuf) != 0) {
2772 return 0;
2773 }
2774 /*
2775 * Get the ACL from the path.
2776 */
2777
2778 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fsp->fsp_name, SMB_ACL_TYPE_ACCESS);
2779
2780 /*
2781 * If it's a directory get the default POSIX ACL.
2782 */
2783
2784 if(fsp->is_directory) {
2785 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fsp->fsp_name, SMB_ACL_TYPE_DEFAULT);
2786 def_acl = free_empty_sys_acl(conn, def_acl);
2787 }
2788
2789 } else {
2790
2791 /* Get the stat struct for the owner info. */
2792 if(SMB_VFS_FSTAT(fsp,fsp->fh->fd,&sbuf) != 0) {
2793 return 0;
2794 }
2795 /*
2796 * Get the ACL from the fd.
2797 */
2798 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, fsp->fh->fd);
2799 }
2800
2801 DEBUG(5,("get_nt_acl : file ACL %s, directory ACL %s\n",
2802 posix_acl ? "present" : "absent",
2803 def_acl ? "present" : "absent" ));
2804
2805 pal = load_inherited_info(fsp);
2806
2807 /*
2808 * Get the owner, group and world SIDs.
2809 */
2810
2811 if (lp_profile_acls(SNUM(conn))) {
2812 /* For WXP SP1 the owner must be administrators. */
2813 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
2814 sid_copy(&group_sid, &global_sid_Builtin_Users);
2815 num_profile_acls = 2;
2816 } else {
2817 create_file_sids(&sbuf, &owner_sid, &group_sid);
2818 }
2819
2820 if ((security_info & DACL_SECURITY_INFORMATION) && !(security_info & PROTECTED_DACL_SECURITY_INFORMATION)) {
2821
2822 /*
2823 * In the optimum case Creator Owner and Creator Group would be used for
2824 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
2825 * would lead to usability problems under Windows: The Creator entries
2826 * are only available in browse lists of directories and not for files;
2827 * additionally the identity of the owning group couldn't be determined.
2828 * We therefore use those identities only for Default ACLs.
2829 */
2830
2831 /* Create the canon_ace lists. */
2832 file_ace = canonicalise_acl( fsp, posix_acl, &sbuf, &owner_sid, &group_sid, pal, SMB_ACL_TYPE_ACCESS );
2833
2834 /* We must have *some* ACLS. */
2835
2836 if (count_canon_ace_list(file_ace) == 0) {
2837 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", fsp->fsp_name ));
2838 goto done;
2839 }
2840
2841 if (fsp->is_directory && def_acl) {
2842 dir_ace = canonicalise_acl(fsp, def_acl, &sbuf,
2843 &global_sid_Creator_Owner,
2844 &global_sid_Creator_Group, pal, SMB_ACL_TYPE_DEFAULT );
2845 }
2846
2847 /*
2848 * Create the NT ACE list from the canonical ace lists.
2849 */
2850
2851 {
2852 canon_ace *ace;
2853 int nt_acl_type;
2854 int i;
2855
2856 if (nt4_compatible_acls() && dir_ace) {
2857 /*
2858 * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
2859 * but no non-INHERIT_ONLY entry for one SID. So we only
2860 * remove entries from the Access ACL if the
2861 * corresponding Default ACL entries have also been
2862 * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
2863 * are exceptions. We can do nothing
2864 * intelligent if the Default ACL contains entries that
2865 * are not also contained in the Access ACL, so this
2866 * case will still fail under NT 4.
2867 */
2868
2869 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
2870 if (ace && !ace->perms) {
2871 DLIST_REMOVE(dir_ace, ace);
2872 SAFE_FREE(ace);
2873
2874 ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
2875 if (ace && !ace->perms) {
2876 DLIST_REMOVE(file_ace, ace);
2877 SAFE_FREE(ace);
2878 }
2879 }
2880
2881 /*
2882 * WinNT doesn't usually have Creator Group
2883 * in browse lists, so we send this entry to
2884 * WinNT even if it contains no relevant
2885 * permissions. Once we can add
2886 * Creator Group to browse lists we can
2887 * re-enable this.
2888 */
2889
2890 #if 0
2891 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
2892 if (ace && !ace->perms) {
2893 DLIST_REMOVE(dir_ace, ace);
2894 SAFE_FREE(ace);
2895 }
2896 #endif
2897
2898 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
2899 if (ace && !ace->perms) {
2900 DLIST_REMOVE(file_ace, ace);
2901 SAFE_FREE(ace);
2902 }
2903 }
2904
2905 num_acls = count_canon_ace_list(file_ace);
2906 num_def_acls = count_canon_ace_list(dir_ace);
2907
2908 /* Allocate the ace list. */
2909 if ((nt_ace_list = SMB_MALLOC_ARRAY(SEC_ACE,num_acls + num_profile_acls + num_def_acls)) == NULL) {
2910 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
2911 goto done;
2912 }
2913
2914 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(SEC_ACE) );
2915
2916 /*
2917 * Create the NT ACE list from the canonical ace lists.
2918 */
2919
2920 ace = file_ace;
2921
2922 for (i = 0; i < num_acls; i++, ace = ace->next) {
2923 SEC_ACCESS acc;
2924
2925 acc = map_canon_ace_perms(SNUM(conn),
2926 &nt_acl_type,
2927 ace->perms,
2928 fsp->is_directory);
2929 init_sec_ace(&nt_ace_list[num_aces++],
2930 &ace->trustee,
2931 nt_acl_type,
2932 acc,
2933 ace->inherited ?
2934 SEC_ACE_FLAG_INHERITED_ACE : 0);
2935 }
2936
2937 /* The User must have access to a profile share - even
2938 * if we can't map the SID. */
2939 if (lp_profile_acls(SNUM(conn))) {
2940 SEC_ACCESS acc;
2941
2942 init_sec_access(&acc,FILE_GENERIC_ALL);
2943 init_sec_ace(&nt_ace_list[num_aces++],
2944 &global_sid_Builtin_Users,
2945 SEC_ACE_TYPE_ACCESS_ALLOWED,
2946 acc, 0);
2947 }
2948
2949 ace = dir_ace;
2950
2951 for (i = 0; i < num_def_acls; i++, ace = ace->next) {
2952 SEC_ACCESS acc;
2953
2954 acc = map_canon_ace_perms(SNUM(conn),
2955 &nt_acl_type,
2956 ace->perms,
2957 fsp->is_directory);
2958 init_sec_ace(&nt_ace_list[num_aces++],
2959 &ace->trustee,
2960 nt_acl_type,
2961 acc,
2962 SEC_ACE_FLAG_OBJECT_INHERIT|
2963 SEC_ACE_FLAG_CONTAINER_INHERIT|
2964 SEC_ACE_FLAG_INHERIT_ONLY|
2965 (ace->inherited ?
2966 SEC_ACE_FLAG_INHERITED_ACE : 0));
2967 }
2968
2969 /* The User must have access to a profile share - even
2970 * if we can't map the SID. */
2971 if (lp_profile_acls(SNUM(conn))) {
2972 SEC_ACCESS acc;
2973
2974 init_sec_access(&acc,FILE_GENERIC_ALL);
2975 init_sec_ace(&nt_ace_list[num_aces++], &global_sid_Builtin_Users, SEC_ACE_TYPE_ACCESS_ALLOWED, acc,
2976 SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2977 SEC_ACE_FLAG_INHERIT_ONLY|0);
2978 }
2979
2980 /*
2981 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
2982 * Win2K needs this to get the inheritance correct when replacing ACLs
2983 * on a directory tree. Based on work by Jim @ IBM.
2984 */
2985
2986 num_aces = merge_default_aces(nt_ace_list, num_aces);
2987
2988 }
2989
2990 if (num_aces) {
2991 if((psa = make_sec_acl( main_loop_talloc_get(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
2992 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
2993 goto done;
2994 }
2995 }
2996 } /* security_info & DACL_SECURITY_INFORMATION */
2997
2998 psd = make_standard_sec_desc( main_loop_talloc_get(),
2999 (security_info & OWNER_SECURITY_INFORMATION) ? &owner_sid : NULL,
3000 (security_info & GROUP_SECURITY_INFORMATION) ? &group_sid : NULL,
3001 psa,
3002 &sd_size);
3003
3004 if(!psd) {
3005 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3006 sd_size = 0;
3007 goto done;
3008 }
3009
3010 /*
3011 * Windows 2000: The DACL_PROTECTED flag in the security
3012 * descriptor marks the ACL as non-inheriting, i.e., no
3013 * ACEs from higher level directories propagate to this
3014 * ACL. In the POSIX ACL model permissions are only
3015 * inherited at file create time, so ACLs never contain
3016 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3017 * flag doesn't seem to bother Windows NT.
3018 * Always set this if map acl inherit is turned off.
3019 */
3020 if (get_protected_flag(pal) || !lp_map_acl_inherit(SNUM(conn))) {
3021 psd->type |= SE_DESC_DACL_PROTECTED;
3022 }
3023
3024 if (psd->dacl) {
3025 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3026 }
3027
3028 *ppdesc = psd;
3029
3030 done:
3031
3032 if (posix_acl) {
3033 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3034 }
3035 if (def_acl) {
3036 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3037 }
3038 free_canon_ace_list(file_ace);
3039 free_canon_ace_list(dir_ace);
3040 free_inherited_info(pal);
3041 SAFE_FREE(nt_ace_list);
3042
3043 return sd_size;
3044 }
3045
3046 /****************************************************************************
3047 Try to chown a file. We will be able to chown it under the following conditions.
3048
3049 1) If we have root privileges, then it will just work.
3050 2) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3051 3) If we have SeRestorePrivilege we can change the user to any other user.
3052 4) If we have write permission to the file and dos_filemodes is set
3053 then allow chown to the currently authenticated user.
3054 ****************************************************************************/
3055
3056 int try_chown(connection_struct *conn, const char *fname, uid_t uid, gid_t gid)
3057 {
3058 int ret;
3059 files_struct *fsp;
3060 SMB_STRUCT_STAT st;
3061
3062 if(!CAN_WRITE(conn)) {
3063 return -1;
3064 }
3065
3066 /* Case (1). */
3067 /* try the direct way first */
3068 ret = SMB_VFS_CHOWN(conn, fname, uid, gid);
3069 if (ret == 0)
3070 return 0;
3071
3072 /* Case (2) / (3) */
3073 if (lp_enable_privileges()) {
3074
3075 BOOL has_take_ownership_priv = user_has_privileges(current_user.nt_user_token,
3076 &se_take_ownership);
3077 BOOL has_restore_priv = user_has_privileges(current_user.nt_user_token,
3078 &se_restore);
3079
3080 /* Case (2) */
3081 if ( ( has_take_ownership_priv && ( uid == current_user.ut.uid ) ) ||
3082 /* Case (3) */
3083 ( has_restore_priv ) ) {
3084
3085 become_root();
3086 /* Keep the current file gid the same - take ownership doesn't imply group change. */
3087 ret = SMB_VFS_CHOWN(conn, fname, uid, (gid_t)-1);
3088 unbecome_root();
3089 return ret;
3090 }
3091 }
3092
3093 /* Case (4). */
3094 if (!lp_dos_filemode(SNUM(conn))) {
3095 return -1;
3096 }
3097
3098 if (SMB_VFS_STAT(conn,fname,&st)) {
3099 return -1;
3100 }
3101
3102 if (!NT_STATUS_IS_OK(open_file_fchmod(conn,fname,&st,&fsp))) {
3103 return -1;
3104 }
3105
3106 /* only allow chown to the current user. This is more secure,
3107 and also copes with the case where the SID in a take ownership ACL is
3108 a local SID on the users workstation
3109 */
3110 uid = current_user.ut.uid;
3111
3112 become_root();
3113 /* Keep the current file gid the same. */
3114 ret = SMB_VFS_FCHOWN(fsp, fsp->fh->fd, uid, (gid_t)-1);
3115 unbecome_root();
3116
3117 close_file_fchmod(fsp);
3118
3119 return ret;
3120 }
3121
3122 /****************************************************************************
3123 Take care of parent ACL inheritance.
3124 ****************************************************************************/
3125
3126 static NTSTATUS append_parent_acl(files_struct *fsp,
3127 SMB_STRUCT_STAT *psbuf,
3128 SEC_DESC *psd,
3129 SEC_DESC **pp_new_sd)
3130 {
3131 SEC_DESC *parent_sd = NULL;
3132 files_struct *parent_fsp = NULL;
3133 TALLOC_CTX *mem_ctx = talloc_parent(psd);
3134 char *parent_name = NULL;
3135 SEC_ACE *new_ace = NULL;
3136 unsigned int num_aces = psd->dacl->num_aces;
3137 SMB_STRUCT_STAT sbuf;
3138 NTSTATUS status;
3139 int info;
3140 size_t sd_size;
3141 unsigned int i, j;
3142 BOOL is_dacl_protected = (psd->type & SE_DESC_DACL_PROTECTED);
3143
3144 ZERO_STRUCT(sbuf);
3145
3146 if (mem_ctx == NULL) {
3147 return NT_STATUS_NO_MEMORY;
3148 }
3149
3150 if (!parent_dirname_talloc(mem_ctx,
3151 fsp->fsp_name,
3152 &parent_name,
3153 NULL)) {
3154 return NT_STATUS_NO_MEMORY;
3155 }
3156
3157 status = open_directory(fsp->conn,
3158 parent_name,
3159 &sbuf,
3160 FILE_READ_ATTRIBUTES, /* Just a stat open */
3161 FILE_SHARE_NONE, /* Ignored for stat opens */
3162 FILE_OPEN,
3163 0,
3164 0,
3165 &info,
3166 &parent_fsp);
3167
3168 if (!NT_STATUS_IS_OK(status)) {
3169 return status;
3170 }
3171
3172 sd_size = SMB_VFS_GET_NT_ACL(parent_fsp, parent_fsp->fsp_name,
3173 DACL_SECURITY_INFORMATION, &parent_sd );
3174
3175 close_file(parent_fsp, NORMAL_CLOSE);
3176
3177 if (!sd_size) {
3178 return NT_STATUS_ACCESS_DENIED;
3179 }
3180
3181 /*
3182 * Make room for potentially all the ACLs from
3183 * the parent. We used to add the ugw triple here,
3184 * as we knew we were dealing with POSIX ACLs.
3185 * We no longer need to do so as we can guarentee
3186 * that a default ACL from the parent directory will
3187 * be well formed for POSIX ACLs if it came from a
3188 * POSIX ACL source, and if we're not writing to a
3189 * POSIX ACL sink then we don't care if it's not well
3190 * formed. JRA.
3191 */
3192
3193 num_aces += parent_sd->dacl->num_aces;
3194
3195 if((new_ace = TALLOC_ZERO_ARRAY(mem_ctx, SEC_ACE,
3196 num_aces)) == NULL) {
3197 return NT_STATUS_NO_MEMORY;
3198 }
3199
3200 /* Start by copying in all the given ACE entries. */
3201 for (i = 0; i < psd->dacl->num_aces; i++) {
3202 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3203 }
3204
3205 /*
3206 * Note that we're ignoring "inherit permissions" here
3207 * as that really only applies to newly created files. JRA.
3208 */
3209
3210 /* Finally append any inherited ACEs. */
3211 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3212 SEC_ACE *se = &parent_sd->dacl->aces[j];
3213
3214 if (fsp->is_directory) {
3215 if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3216 /* Doesn't apply to a directory - ignore. */
3217 DEBUG(10,("append_parent_acl: directory %s "
3218 "ignoring non container "
3219 "inherit flags %u on ACE with sid %s "
3220 "from parent %s\n",
3221 fsp->fsp_name,
3222 (unsigned int)se->flags,
3223 sid_string_static(&se->trustee),
3224 parent_name));
3225 continue;
3226 }
3227 } else {
3228 if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3229 /* Doesn't apply to a file - ignore. */
3230 DEBUG(10,("append_parent_acl: file %s "
3231 "ignoring non object "
3232 "inherit flags %u on ACE with sid %s "
3233 "from parent %s\n",
3234 fsp->fsp_name,
3235 (unsigned int)se->flags,
3236 sid_string_static(&se->trustee),
3237 parent_name));
3238 continue;
3239 }
3240 }
3241
3242 if (is_dacl_protected) {
3243 /* If the DACL is protected it means we must
3244 * not overwrite an existing ACE entry with the
3245 * same SID. This is order N^2. Ouch :-(. JRA. */
3246 unsigned int k;
3247 for (k = 0; k < psd->dacl->num_aces; k++) {
3248 if (sid_equal(&psd->dacl->aces[k].trustee,
3249 &se->trustee)) {
3250 break;
3251 }
3252 }
3253 if (k < psd->dacl->num_aces) {
3254 /* SID matched. Ignore. */
3255 DEBUG(10,("append_parent_acl: path %s "
3256 "ignoring ACE with protected sid %s "
3257 "from parent %s\n",
3258 fsp->fsp_name,
3259 sid_string_static(&se->trustee),
3260 parent_name));
3261 continue;
3262 }
3263 }
3264
3265 sec_ace_copy(&new_ace[i], se);
3266 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3267 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3268 }
3269 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3270
3271 if (fsp->is_directory) {
3272 /*
3273 * Strip off any inherit only. It's applied.
3274 */
3275 new_ace[i].flags &= ~(SEC_ACE_FLAG_INHERIT_ONLY);
3276 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3277 /* No further inheritance. */
3278 new_ace[i].flags &=
3279 ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3280 SEC_ACE_FLAG_OBJECT_INHERIT);
3281 }
3282 } else {
3283 /*
3284 * Strip off any container or inherit
3285 * flags, they can't apply to objects.
3286 */
3287 new_ace[i].flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3288 SEC_ACE_FLAG_INHERIT_ONLY|
3289 SEC_ACE_FLAG_NO_PROPAGATE_INHERIT);
3290 }
3291
3292 i++;
3293
3294 DEBUG(10,("append_parent_acl: path %s "
3295 "inheriting ACE with sid %s "
3296 "from parent %s\n",
3297 fsp->fsp_name,
3298 sid_string_static(&se->trustee),
3299 parent_name));
3300
3301 }
3302
3303 /* This sucks. psd should be const and we should
3304 * be doing a deep-copy here. We're getting away
3305 * with is as we know parent_sd is talloced off
3306 * talloc_tos() as well as psd. JRA. */
3307
3308 psd->dacl->aces = new_ace;
3309 psd->dacl->num_aces = i;
3310 psd->type &= ~(SE_DESC_DACL_AUTO_INHERITED|
3311 SE_DESC_DACL_AUTO_INHERIT_REQ);
3312
3313 *pp_new_sd = psd;
3314 return status;
3315 }
3316
3317 /****************************************************************************
3318 Reply to set a security descriptor on an fsp. security_info_sent is the
3319 description of the following NT ACL.
3320 This should be the only external function needed for the UNIX style set ACL.
3321 ****************************************************************************/
3322
3323 BOOL set_nt_acl(files_struct *fsp, uint32 security_info_sent, SEC_DESC *psd)
3324 {
3325 connection_struct *conn = fsp->conn;
3326 uid_t user = (uid_t)-1;
3327 gid_t grp = (gid_t)-1;
3328 SMB_STRUCT_STAT sbuf;
3329 DOM_SID file_owner_sid;
3330 DOM_SID file_grp_sid;
3331 canon_ace *file_ace_list = NULL;
3332 canon_ace *dir_ace_list = NULL;
3333 BOOL acl_perms = False;
3334 mode_t orig_mode = (mode_t)0;
3335 uid_t orig_uid;
3336 gid_t orig_gid;
3337 BOOL need_chown = False;
3338
3339 DEBUG(10,("set_nt_acl: called for file %s\n", fsp->fsp_name ));
3340
3341 if (!CAN_WRITE(conn)) {
3342 DEBUG(10,("set acl rejected on read-only share\n"));
3343 return False;
3344 }
3345
3346 /*
3347 * Get the current state of the file.
3348 */
3349
3350 if(fsp->is_directory || fsp->fh->fd == -1) {
3351 if(SMB_VFS_STAT(fsp->conn,fsp->fsp_name, &sbuf) != 0)
3352 return False;
3353 } else {
3354 if(SMB_VFS_FSTAT(fsp,fsp->fh->fd,&sbuf) != 0)
3355 return False;
3356 }
3357
3358 /* Save the original elements we check against. */
3359 orig_mode = sbuf.st_mode;
3360 orig_uid = sbuf.st_uid;
3361 orig_gid = sbuf.st_gid;
3362
3363 /*
3364 * Unpack the user/group/world id's.
3365 */
3366
3367 if (!unpack_nt_owners( SNUM(conn), &user, &grp, security_info_sent, psd)) {
3368 return False;
3369 }
3370
3371 /*
3372 * Do we need to chown ?
3373 */
3374
3375 if (((user != (uid_t)-1) && (orig_uid != user)) || (( grp != (gid_t)-1) && (orig_gid != grp))) {
3376 need_chown = True;
3377 }
3378
3379 /*
3380 * Chown before setting ACL only if we don't change the user, or
3381 * if we change to the current user, but not if we want to give away
3382 * the file.
3383 */
3384
3385 if (need_chown && (user == (uid_t)-1 || user == current_user.ut.uid)) {
3386
3387 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3388 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3389
3390 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3391 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3392 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3393 return False;
3394 }
3395
3396 /*
3397 * Recheck the current state of the file, which may have changed.
3398 * (suid/sgid bits, for instance)
3399 */
3400
3401 if(fsp->is_directory) {
3402 if(SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf) != 0) {
3403 return False;
3404 }
3405 } else {
3406
3407 int ret;
3408
3409 if(fsp->fh->fd == -1)
3410 ret = SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf);
3411 else
3412 ret = SMB_VFS_FSTAT(fsp,fsp->fh->fd,&sbuf);
3413
3414 if(ret != 0)
3415 return False;
3416 }
3417
3418 /* Save the original elements we check against. */
3419 orig_mode = sbuf.st_mode;
3420 orig_uid = sbuf.st_uid;
3421 orig_gid = sbuf.st_gid;
3422
3423 /* We did it, don't try again */
3424 need_chown = False;
3425 }
3426
3427 create_file_sids(&sbuf, &file_owner_sid, &file_grp_sid);
3428
3429 /* See here: http://www.codeproject.com/KB/winsdk/accessctrl2.aspx
3430 * for details and also the log trace in bug #4308. JRA.
3431 */
3432
3433 if ((security_info_sent & DACL_SECURITY_INFORMATION) &&
3434 psd->dacl != NULL &&
3435 (psd->type & (SE_DESC_DACL_AUTO_INHERITED|
3436 SE_DESC_DACL_AUTO_INHERIT_REQ))==
3437 (SE_DESC_DACL_AUTO_INHERITED|
3438 SE_DESC_DACL_AUTO_INHERIT_REQ) ) {
3439 NTSTATUS status = append_parent_acl(fsp, &sbuf, psd, &psd);
3440 if (!NT_STATUS_IS_OK(status)) {
3441 return False;
3442 }
3443 }
3444
3445 acl_perms = unpack_canon_ace( fsp, &sbuf, &file_owner_sid, &file_grp_sid,
3446 &file_ace_list, &dir_ace_list, security_info_sent, psd);
3447
3448 /* Ignore W2K traverse DACL set. */
3449 if (file_ace_list || dir_ace_list) {
3450
3451 if (!acl_perms) {
3452 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
3453 free_canon_ace_list(file_ace_list);
3454 free_canon_ace_list(dir_ace_list);
3455 return False;
3456 }
3457
3458 /*
3459 * Only change security if we got a DACL.
3460 */
3461
3462 if((security_info_sent & DACL_SECURITY_INFORMATION) && (psd->dacl != NULL)) {
3463
3464 BOOL acl_set_support = False;
3465 BOOL ret = False;
3466
3467 /*
3468 * Try using the POSIX ACL set first. Fall back to chmod if
3469 * we have no ACL support on this filesystem.
3470 */
3471
3472 if (acl_perms && file_ace_list) {
3473 ret = set_canon_ace_list(fsp, file_ace_list, False, sbuf.st_gid, &acl_set_support);
3474 if (acl_set_support && ret == False) {
3475 DEBUG(3,("set_nt_acl: failed to set file acl on file %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3476 free_canon_ace_list(file_ace_list);
3477 free_canon_ace_list(dir_ace_list);
3478 return False;
3479 }
3480 }
3481
3482 if (acl_perms && acl_set_support && fsp->is_directory) {
3483 if (dir_ace_list) {
3484 if (!set_canon_ace_list(fsp, dir_ace_list, True, sbuf.st_gid, &acl_set_support)) {
3485 DEBUG(3,("set_nt_acl: failed to set default acl on directory %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3486 free_canon_ace_list(file_ace_list);
3487 free_canon_ace_list(dir_ace_list);
3488 return False;
3489 }
3490 } else {
3491
3492 /*
3493 * No default ACL - delete one if it exists.
3494 */
3495
3496 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name) == -1) {
3497 int sret = -1;
3498
3499 if (acl_group_override(conn, sbuf.st_gid, fsp->fsp_name)) {
3500 DEBUG(5,("set_nt_acl: acl group control on and "
3501 "current user in file %s primary group. Override delete_def_acl\n",
3502 fsp->fsp_name ));
3503
3504 become_root();
3505 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name);
3506 unbecome_root();
3507 }
3508
3509 if (sret == -1) {
3510 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
3511 free_canon_ace_list(file_ace_list);
3512 free_canon_ace_list(dir_ace_list);
3513 return False;
3514 }
3515 }
3516 }
3517 }
3518
3519 if (acl_set_support) {
3520 store_inheritance_attributes(fsp, file_ace_list, dir_ace_list,
3521 (psd->type & SE_DESC_DACL_PROTECTED) ? True : False);
3522 }
3523
3524 /*
3525 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
3526 */
3527
3528 if(!acl_set_support && acl_perms) {
3529 mode_t posix_perms;
3530
3531 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
3532 free_canon_ace_list(file_ace_list);
3533 free_canon_ace_list(dir_ace_list);
3534 DEBUG(3,("set_nt_acl: failed to convert file acl to posix permissions for file %s.\n",
3535 fsp->fsp_name ));
3536 return False;
3537 }
3538
3539 if (orig_mode != posix_perms) {
3540
3541 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
3542 fsp->fsp_name, (unsigned int)posix_perms ));
3543
3544 if(SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms) == -1) {
3545 int sret = -1;
3546 if (acl_group_override(conn, sbuf.st_gid, fsp->fsp_name)) {
3547 DEBUG(5,("set_nt_acl: acl group control on and "
3548 "current user in file %s primary group. Override chmod\n",
3549 fsp->fsp_name ));
3550
3551 become_root();
3552 sret = SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms);
3553 unbecome_root();
3554 }
3555
3556 if (sret == -1) {
3557 DEBUG(3,("set_nt_acl: chmod %s, 0%o failed. Error = %s.\n",
3558 fsp->fsp_name, (unsigned int)posix_perms, strerror(errno) ));
3559 free_canon_ace_list(file_ace_list);
3560 free_canon_ace_list(dir_ace_list);
3561 return False;
3562 }
3563 }
3564 }
3565 }
3566 }
3567
3568 free_canon_ace_list(file_ace_list);
3569 free_canon_ace_list(dir_ace_list);
3570 }
3571
3572 /* Any chown pending? */
3573 if (need_chown) {
3574
3575 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3576 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3577
3578 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3579 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3580 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3581 return False;
3582 }
3583 }
3584
3585 return True;
3586 }
3587
3588 /****************************************************************************
3589 Get the actual group bits stored on a file with an ACL. Has no effect if
3590 the file has no ACL. Needed in dosmode code where the stat() will return
3591 the mask bits, not the real group bits, for a file with an ACL.
3592 ****************************************************************************/
3593
3594 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
3595 {
3596 int entry_id = SMB_ACL_FIRST_ENTRY;
3597 SMB_ACL_ENTRY_T entry;
3598 SMB_ACL_T posix_acl;
3599 int result = -1;
3600
3601 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
3602 if (posix_acl == (SMB_ACL_T)NULL)
3603 return -1;
3604
3605 while (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3606 SMB_ACL_TAG_T tagtype;
3607 SMB_ACL_PERMSET_T permset;
3608
3609 /* get_next... */
3610 if (entry_id == SMB_ACL_FIRST_ENTRY)
3611 entry_id = SMB_ACL_NEXT_ENTRY;
3612
3613 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) ==-1)
3614 break;
3615
3616 if (tagtype == SMB_ACL_GROUP_OBJ) {
3617 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
3618 break;
3619 } else {
3620 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
3621 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRGRP : 0);
3622 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
3623 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
3624 result = 0;
3625 break;
3626 }
3627 }
3628 }
3629 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3630 return result;
3631 }
3632
3633 /****************************************************************************
3634 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3635 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3636 ****************************************************************************/
3637
3638 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
3639 {
3640 int entry_id = SMB_ACL_FIRST_ENTRY;
3641 SMB_ACL_ENTRY_T entry;
3642 int num_entries = 0;
3643
3644 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3645 SMB_ACL_TAG_T tagtype;
3646 SMB_ACL_PERMSET_T permset;
3647 mode_t perms;
3648
3649 /* get_next... */
3650 if (entry_id == SMB_ACL_FIRST_ENTRY)
3651 entry_id = SMB_ACL_NEXT_ENTRY;
3652
3653 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
3654 return -1;
3655
3656 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
3657 return -1;
3658
3659 num_entries++;
3660
3661 switch(tagtype) {
3662 case SMB_ACL_USER_OBJ:
3663 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
3664 break;
3665 case SMB_ACL_GROUP_OBJ:
3666 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
3667 break;
3668 case SMB_ACL_MASK:
3669 /*
3670 * FIXME: The ACL_MASK entry permissions should really be set to
3671 * the union of the permissions of all ACL_USER,
3672 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
3673 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
3674 */
3675 perms = S_IRUSR|S_IWUSR|S_IXUSR;
3676 break;
3677 case SMB_ACL_OTHER:
3678 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
3679 break;
3680 default:
3681 continue;
3682 }
3683
3684 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
3685 return -1;
3686
3687 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, entry, permset) == -1)
3688 return -1;
3689 }
3690
3691 /*
3692 * If this is a simple 3 element ACL or no elements then it's a standard
3693 * UNIX permission set. Just use chmod...
3694 */
3695
3696 if ((num_entries == 3) || (num_entries == 0))
3697 return -1;
3698
3699 return 0;
3700 }
3701
3702 /****************************************************************************
3703 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
3704 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
3705 resulting ACL on TO. Note that name is in UNIX character set.
3706 ****************************************************************************/
3707
3708 static int copy_access_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
3709 {
3710 SMB_ACL_T posix_acl = NULL;
3711 int ret = -1;
3712
3713 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
3714 return -1;
3715
3716 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3717 goto done;
3718
3719 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
3720
3721 done:
3722
3723 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3724 return ret;
3725 }
3726
3727 /****************************************************************************
3728 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3729 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3730 Note that name is in UNIX character set.
3731 ****************************************************************************/
3732
3733 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
3734 {
3735 return copy_access_acl(conn, name, name, mode);
3736 }
3737
3738 /****************************************************************************
3739 If the parent directory has no default ACL but it does have an Access ACL,
3740 inherit this Access ACL to file name.
3741 ****************************************************************************/
3742
3743 int inherit_access_acl(connection_struct *conn, const char *inherit_from_dir,
3744 const char *name, mode_t mode)
3745 {
3746 if (directory_has_default_acl(conn, inherit_from_dir))
3747 return 0;
3748
3749 return copy_access_acl(conn, inherit_from_dir, name, mode);
3750 }
3751
3752 /****************************************************************************
3753 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3754 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3755 ****************************************************************************/
3756
3757 int fchmod_acl(files_struct *fsp, int fd, mode_t mode)
3758 {
3759 connection_struct *conn = fsp->conn;
3760 SMB_ACL_T posix_acl = NULL;
3761 int ret = -1;
3762
3763 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, fd)) == NULL)
3764 return -1;
3765
3766 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3767 goto done;
3768
3769 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, fd, posix_acl);
3770
3771 done:
3772
3773 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3774 return ret;
3775 }
3776
3777 /****************************************************************************
3778 Check for an existing default POSIX ACL on a directory.
3779 ****************************************************************************/
3780
3781 BOOL directory_has_default_acl(connection_struct *conn, const char *fname)
3782 {
3783 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
3784 BOOL has_acl = False;
3785 SMB_ACL_ENTRY_T entry;
3786
3787 if (def_acl != NULL && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
3788 has_acl = True;
3789 }
3790
3791 if (def_acl) {
3792 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3793 }
3794 return has_acl;
3795 }
3796
3797 /****************************************************************************
3798 Map from wire type to permset.
3799 ****************************************************************************/
3800
3801 static BOOL unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
3802 {
3803 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
3804 return False;
3805 }
3806
3807 if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) == -1) {
3808 return False;
3809 }
3810
3811 if (wire_perm & SMB_POSIX_ACL_READ) {
3812 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1) {
3813 return False;
3814 }
3815 }
3816 if (wire_perm & SMB_POSIX_ACL_WRITE) {
3817 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1) {
3818 return False;
3819 }
3820 }
3821 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
3822 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1) {
3823 return False;
3824 }
3825 }
3826 return True;
3827 }
3828
3829 /****************************************************************************
3830 Map from wire type to tagtype.
3831 ****************************************************************************/
3832
3833 static BOOL unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
3834 {
3835 switch (wire_tt) {
3836 case SMB_POSIX_ACL_USER_OBJ:
3837 *p_tt = SMB_ACL_USER_OBJ;
3838 break;
3839 case SMB_POSIX_ACL_USER:
3840 *p_tt = SMB_ACL_USER;
3841 break;
3842 case SMB_POSIX_ACL_GROUP_OBJ:
3843 *p_tt = SMB_ACL_GROUP_OBJ;
3844 break;
3845 case SMB_POSIX_ACL_GROUP:
3846 *p_tt = SMB_ACL_GROUP;
3847 break;
3848 case SMB_POSIX_ACL_MASK:
3849 *p_tt = SMB_ACL_MASK;
3850 break;
3851 case SMB_POSIX_ACL_OTHER:
3852 *p_tt = SMB_ACL_OTHER;
3853 break;
3854 default:
3855 return False;
3856 }
3857 return True;
3858 }
3859
3860 /****************************************************************************
3861 Create a new POSIX acl from wire permissions.
3862 FIXME ! How does the share mask/mode fit into this.... ?
3863 ****************************************************************************/
3864
3865 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
3866 {
3867 unsigned int i;
3868 SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, num_acls);
3869
3870 if (the_acl == NULL) {
3871 return NULL;
3872 }
3873
3874 for (i = 0; i < num_acls; i++) {
3875 SMB_ACL_ENTRY_T the_entry;
3876 SMB_ACL_PERMSET_T the_permset;
3877 SMB_ACL_TAG_T tag_type;
3878
3879 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
3880 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
3881 i, strerror(errno) ));
3882 goto fail;
3883 }
3884
3885 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
3886 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
3887 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
3888 goto fail;
3889 }
3890
3891 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, tag_type) == -1) {
3892 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
3893 i, strerror(errno) ));
3894 goto fail;
3895 }
3896
3897 /* Get the permset pointer from the new ACL entry. */
3898 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
3899 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
3900 i, strerror(errno) ));
3901 goto fail;
3902 }
3903
3904 /* Map from wire to permissions. */
3905 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
3906 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
3907 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
3908 goto fail;
3909 }
3910
3911 /* Now apply to the new ACL entry. */
3912 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
3913 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
3914 i, strerror(errno) ));
3915 goto fail;
3916 }
3917
3918 if (tag_type == SMB_ACL_USER) {
3919 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3920 uid_t uid = (uid_t)uidval;
3921 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&uid) == -1) {
3922 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
3923 (unsigned int)uid, i, strerror(errno) ));
3924 goto fail;
3925 }
3926 }
3927
3928 if (tag_type == SMB_ACL_GROUP) {
3929 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3930 gid_t gid = (uid_t)gidval;
3931 if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&gid) == -1) {
3932 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
3933 (unsigned int)gid, i, strerror(errno) ));
3934 goto fail;
3935 }
3936 }
3937 }
3938
3939 return the_acl;
3940
3941 fail:
3942
3943 if (the_acl != NULL) {
3944 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
3945 }
3946 return NULL;
3947 }
3948
3949 /****************************************************************************
3950 Calls from UNIX extensions - Default POSIX ACL set.
3951 If num_def_acls == 0 and not a directory just return. If it is a directory
3952 and num_def_acls == 0 then remove the default acl. Else set the default acl
3953 on the directory.
3954 ****************************************************************************/
3955
3956 BOOL set_unix_posix_default_acl(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf,
3957 uint16 num_def_acls, const char *pdata)
3958 {
3959 SMB_ACL_T def_acl = NULL;
3960
3961 if (num_def_acls && !S_ISDIR(psbuf->st_mode)) {
3962 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
3963 errno = EISDIR;
3964 return False;
3965 }
3966
3967 if (!num_def_acls) {
3968 /* Remove the default ACL. */
3969 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
3970 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
3971 fname, strerror(errno) ));
3972 return False;
3973 }
3974 return True;
3975 }
3976
3977 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
3978 return False;
3979 }
3980
3981 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
3982 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
3983 fname, strerror(errno) ));
3984 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3985 return False;
3986 }
3987
3988 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
3989 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3990 return True;
3991 }
3992
3993 /****************************************************************************
3994 Remove an ACL from a file. As we don't have acl_delete_entry() available
3995 we must read the current acl and copy all entries except MASK, USER and GROUP
3996 to a new acl, then set that. This (at least on Linux) causes any ACL to be
3997 removed.
3998 FIXME ! How does the share mask/mode fit into this.... ?
3999 ****************************************************************************/
4000
4001 static BOOL remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4002 {
4003 SMB_ACL_T file_acl = NULL;
4004 int entry_id = SMB_ACL_FIRST_ENTRY;
4005 SMB_ACL_ENTRY_T entry;
4006 BOOL ret = False;
4007 /* Create a new ACL with only 3 entries, u/g/w. */
4008 SMB_ACL_T new_file_acl = SMB_VFS_SYS_ACL_INIT(conn, 3);
4009 SMB_ACL_ENTRY_T user_ent = NULL;
4010 SMB_ACL_ENTRY_T group_ent = NULL;
4011 SMB_ACL_ENTRY_T other_ent = NULL;
4012
4013 if (new_file_acl == NULL) {
4014 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4015 return False;
4016 }
4017
4018 /* Now create the u/g/w entries. */
4019 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &user_ent) == -1) {
4020 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4021 fname, strerror(errno) ));
4022 goto done;
4023 }
4024 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, user_ent, SMB_ACL_USER_OBJ) == -1) {
4025 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4026 fname, strerror(errno) ));
4027 goto done;
4028 }
4029
4030 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &group_ent) == -1) {
4031 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4032 fname, strerror(errno) ));
4033 goto done;
4034 }
4035 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4036 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4037 fname, strerror(errno) ));
4038 goto done;
4039 }
4040
4041 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &other_ent) == -1) {
4042 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4043 fname, strerror(errno) ));
4044 goto done;
4045 }
4046 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, other_ent, SMB_ACL_OTHER) == -1) {
4047 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4048 fname, strerror(errno) ));
4049 goto done;
4050 }
4051
4052 /* Get the current file ACL. */
4053 if (fsp && fsp->fh->fd != -1) {
4054 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, fsp->fh->fd);
4055 } else {
4056 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4057 }
4058
4059 if (file_acl == NULL) {
4060 /* This is only returned if an error occurred. Even for a file with
4061 no acl a u/g/w acl should be returned. */
4062 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4063 fname, strerror(errno) ));
4064 goto done;
4065 }
4066
4067 while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, file_acl, entry_id, &entry) == 1) {
4068 SMB_ACL_TAG_T tagtype;
4069 SMB_ACL_PERMSET_T permset;
4070
4071 /* get_next... */
4072 if (entry_id == SMB_ACL_FIRST_ENTRY)
4073 entry_id = SMB_ACL_NEXT_ENTRY;
4074
4075 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1) {
4076 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4077 fname, strerror(errno) ));
4078 goto done;
4079 }
4080
4081 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4082 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4083 fname, strerror(errno) ));
4084 goto done;
4085 }
4086
4087 if (tagtype == SMB_ACL_USER_OBJ) {
4088 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, user_ent, permset) == -1) {
4089 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4090 fname, strerror(errno) ));
4091 }
4092 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4093 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, group_ent, permset) == -1) {
4094 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4095 fname, strerror(errno) ));
4096 }
4097 } else if (tagtype == SMB_ACL_OTHER) {
4098 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, other_ent, permset) == -1) {
4099 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4100 fname, strerror(errno) ));
4101 }
4102 }
4103 }
4104
4105 /* Set the new empty file ACL. */
4106 if (fsp && fsp->fh->fd != -1) {
4107 if (SMB_VFS_SYS_ACL_SET_FD(fsp, fsp->fh->fd, new_file_acl) == -1) {
4108 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4109 fname, strerror(errno) ));
4110 goto done;
4111 }
4112 } else {
4113 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4114 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4115 fname, strerror(errno) ));
4116 goto done;
4117 }
4118 }
4119
4120 ret = True;
4121
4122 done:
4123
4124 if (file_acl) {
4125 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4126 }
4127 if (new_file_acl) {
4128 SMB_VFS_SYS_ACL_FREE_ACL(conn, new_file_acl);
4129 }
4130 return ret;
4131 }
4132
4133 /****************************************************************************
4134 Calls from UNIX extensions - POSIX ACL set.
4135 If num_def_acls == 0 then read/modify/write acl after removing all entries
4136 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4137 ****************************************************************************/
4138
4139 BOOL set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4140 {
4141 SMB_ACL_T file_acl = NULL;
4142
4143 if (!num_acls) {
4144 /* Remove the ACL from the file. */
4145 return remove_posix_acl(conn, fsp, fname);
4146 }
4147
4148 if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4149 return False;
4150 }
4151
4152 if (fsp && fsp->fh->fd != -1) {
4153 /* The preferred way - use an open fd. */
4154 if (SMB_VFS_SYS_ACL_SET_FD(fsp, fsp->fh->fd, file_acl) == -1) {
4155 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4156 fname, strerror(errno) ));
4157 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4158 return False;
4159 }
4160 } else {
4161 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4162 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4163 fname, strerror(errno) ));
4164 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4165 return False;
4166 }
4167 }
4168
4169 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4170 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4171 return True;
4172 }
4173
4174 /****************************************************************************
4175 Helper function that gets a security descriptor by connection and
4176 file name.
4177 NOTE: This is transitional, in the sense that SMB_VFS_GET_NT_ACL really
4178 should *not* get a files_struct pointer but a connection_struct ptr
4179 (automatic by the vfs handle) and the file name and _use_ that!
4180 ****************************************************************************/
4181 static NTSTATUS conn_get_nt_acl(TALLOC_CTX *mem_ctx,
4182 struct connection_struct *conn,
4183 const char *fname,
4184 SMB_STRUCT_STAT *psbuf,
4185 struct security_descriptor_info **psd)
4186 {
4187 NTSTATUS status;
4188 struct files_struct *fsp = NULL;
4189 struct security_descriptor_info *secdesc = NULL;
4190 size_t secdesc_size;
4191
4192 if (!VALID_STAT(*psbuf)) {
4193 if (SMB_VFS_STAT(conn, fname, psbuf) != 0) {
4194 return map_nt_error_from_unix(errno);
4195 }
4196 }
4197
4198 /* fake a files_struct ptr: */
4199
4200 if (S_ISDIR(psbuf->st_mode)) {
4201 status = open_directory(conn, fname, psbuf,
4202 READ_CONTROL_ACCESS,
4203 FILE_SHARE_READ|FILE_SHARE_WRITE,
4204 FILE_OPEN,
4205 0,
4206 FILE_ATTRIBUTE_DIRECTORY,
4207 NULL, &fsp);
4208 }
4209 else {
4210 status = open_file_stat(conn, fname, psbuf, &fsp);
4211 }
4212
4213 if (!NT_STATUS_IS_OK(status)) {
4214 DEBUG(3, ("Unable to open file %s: %s\n", fname,
4215 nt_errstr(status)));
4216 return status;
4217 }
4218
4219 secdesc_size = SMB_VFS_GET_NT_ACL(fsp, fname,
4220 (OWNER_SECURITY_INFORMATION |
4221 GROUP_SECURITY_INFORMATION |
4222 DACL_SECURITY_INFORMATION),
4223 &secdesc);
4224 if (secdesc_size == 0) {
4225 DEBUG(5, ("Unable to get NT ACL for file %s\n", fname));
4226 status = NT_STATUS_ACCESS_DENIED;
4227 goto done;
4228 }
4229
4230 *psd = talloc_move(mem_ctx, &secdesc);
4231 status = NT_STATUS_OK;
4232
4233 done:
4234 close_file(fsp, NORMAL_CLOSE);
4235 return status;
4236 }
4237
4238 static BOOL can_access_file_acl(struct connection_struct *conn,
4239 const char * fname, SMB_STRUCT_STAT *psbuf,
4240 uint32_t access_mask)
4241 {
4242 BOOL result;
4243 NTSTATUS status;
4244 uint32_t access_granted;
4245 struct security_descriptor_info *secdesc = NULL;
4246
4247 status = conn_get_nt_acl(tmp_talloc_ctx(), conn, fname, psbuf, &secdesc);
4248 if (!NT_STATUS_IS_OK(status)) {
4249 DEBUG(5, ("Could not get acl: %s\n", nt_errstr(status)));
4250 return False;
4251 }
4252
4253 result = se_access_check(secdesc, current_user.nt_user_token,
4254 access_mask, &access_granted, &status);
4255 TALLOC_FREE(secdesc);
4256 return result;
4257 }
4258
4259 /****************************************************************************
4260 Actually emulate the in-kernel access checking for delete access. We need
4261 this to successfully return ACCESS_DENIED on a file open for delete access.
4262 ****************************************************************************/
4263
4264 BOOL can_delete_file_in_directory(connection_struct *conn, const char *fname)
4265 {
4266 SMB_STRUCT_STAT sbuf;
4267 pstring dname;
4268
4269 if (!CAN_WRITE(conn)) {
4270 return False;
4271 }
4272
4273 /* Get the parent directory permission mask and owners. */
4274 pstrcpy(dname, parent_dirname(fname));
4275 if(SMB_VFS_STAT(conn, dname, &sbuf) != 0) {
4276 return False;
4277 }
4278
4279 /* fast paths first */
4280
4281 if (!S_ISDIR(sbuf.st_mode)) {
4282 return False;
4283 }
4284 if (current_user.ut.uid == 0 || conn->admin_user) {
4285 /* I'm sorry sir, I didn't know you were root... */
4286 return True;
4287 }
4288
4289 /* Check primary owner write access. */
4290 if (current_user.ut.uid == sbuf.st_uid) {
4291 return (sbuf.st_mode & S_IWUSR) ? True : False;
4292 }
4293
4294 #ifdef S_ISVTX
4295 /* sticky bit means delete only by owner or root. */
4296 if (sbuf.st_mode & S_ISVTX) {
4297 SMB_STRUCT_STAT sbuf_file;
4298 if(SMB_VFS_STAT(conn, fname, &sbuf_file) != 0) {
4299 if (errno == ENOENT) {
4300 /* If the file doesn't already exist then
4301 * yes we'll be able to delete it. */
4302 return True;
4303 }
4304 return False;
4305 }
4306 /*
4307 * Patch from SATOH Fumiyasu <fumiyas@miraclelinux.com>
4308 * for bug #3348. Don't assume owning sticky bit
4309 * directory means write access allowed.
4310 */
4311 if (current_user.ut.uid != sbuf_file.st_uid) {
4312 return False;
4313 }
4314 }
4315 #endif
4316
4317 /* now for ACL checks */
4318
4319 return can_access_file_acl(conn, dname, &sbuf, FILE_WRITE_DATA);
4320 }
4321
4322 /****************************************************************************
4323 Actually emulate the in-kernel access checking for read/write access. We need
4324 this to successfully check for ability to write for dos filetimes.
4325 Note this doesn't take into account share write permissions.
4326 ****************************************************************************/
4327
4328 BOOL can_access_file(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf, uint32 access_mask)
4329 {
4330 if (!(access_mask & (FILE_READ_DATA|FILE_WRITE_DATA))) {
4331 return False;
4332 }
4333 access_mask &= (FILE_READ_DATA|FILE_WRITE_DATA);
4334
4335 /* some fast paths first */
4336
4337 DEBUG(10,("can_access_file: requesting 0x%x on file %s\n",
4338 (unsigned int)access_mask, fname ));
4339
4340 if (current_user.ut.uid == 0 || conn->admin_user) {
4341 /* I'm sorry sir, I didn't know you were root... */
4342 return True;
4343 }
4344
4345 if (!VALID_STAT(*psbuf)) {
4346 /* Get the file permission mask and owners. */
4347 if(SMB_VFS_STAT(conn, fname, psbuf) != 0) {
4348 return False;
4349 }
4350 }
4351
4352 /* Check primary owner access. */
4353 if (current_user.ut.uid == psbuf->st_uid) {
4354 switch (access_mask) {
4355 case FILE_READ_DATA:
4356 return (psbuf->st_mode & S_IRUSR) ? True : False;
4357
4358 case FILE_WRITE_DATA:
4359 return (psbuf->st_mode & S_IWUSR) ? True : False;
4360
4361 default: /* FILE_READ_DATA|FILE_WRITE_DATA */
4362
4363 if ((psbuf->st_mode & (S_IWUSR|S_IRUSR)) == (S_IWUSR|S_IRUSR)) {
4364 return True;
4365 } else {
4366 return False;
4367 }
4368 }
4369 }
4370
4371 /* now for ACL checks */
4372
4373 return can_access_file_acl(conn, fname, psbuf, access_mask);
4374 }
4375
4376 /****************************************************************************
4377 Userspace check for write access.
4378 Note this doesn't take into account share write permissions.
4379 ****************************************************************************/
4380
4381 BOOL can_write_to_file(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf)
4382 {
4383 return can_access_file(conn, fname, psbuf, FILE_WRITE_DATA);
4384 }
4385
4386 /********************************************************************
4387 Pull the NT ACL from a file on disk or the OpenEventlog() access
4388 check. Caller is responsible for freeing the returned security
4389 descriptor via TALLOC_FREE(). This is designed for dealing with
4390 user space access checks in smbd outside of the VFS. For example,
4391 checking access rights in OpenEventlog().
4392
4393 Assume we are dealing with files (for now)
4394 ********************************************************************/
4395
4396 SEC_DESC* get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname)
4397 {
4398 SEC_DESC *psd, *ret_sd;
4399 connection_struct conn;
4400 files_struct finfo;
4401 struct fd_handle fh;
4402 pstring path;
4403 pstring filename;
4404
4405 ZERO_STRUCT( conn );
4406
4407 if ( !(conn.mem_ctx = talloc_init( "novfs_get_nt_acl" )) ) {
4408 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4409 return NULL;
4410 }
4411
4412 if (!(conn.params = TALLOC_P(conn.mem_ctx, struct share_params))) {
4413 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4414 TALLOC_FREE(conn.mem_ctx);
4415 return NULL;
4416 }
4417
4418 conn.params->service = -1;
4419
4420 pstrcpy( path, "/" );
4421 set_conn_connectpath(&conn, path);
4422
4423 if (!smbd_vfs_init(&conn)) {
4424 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4425 conn_free_internal( &conn );
4426 return NULL;
4427 }
4428
4429 ZERO_STRUCT( finfo );
4430 ZERO_STRUCT( fh );
4431
4432 finfo.fnum = -1;
4433 finfo.conn = &conn;
4434 finfo.fh = &fh;
4435 finfo.fh->fd = -1;
4436 pstrcpy( filename, fname );
4437 finfo.fsp_name = filename;
4438
4439 if (get_nt_acl( &finfo, DACL_SECURITY_INFORMATION, &psd ) == 0) {
4440 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4441 conn_free_internal( &conn );
4442 return NULL;
4443 }
4444
4445 ret_sd = dup_sec_desc( ctx, psd );
4446
4447 conn_free_internal( &conn );
4448
4449 return ret_sd;
4450 }
Samba GIT mirror