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