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