?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s3:smbd: don't apply create/directory mask and modes in apply_default_perms()
[Samba.git] / source3 / smbd / posix_acls.c
blobbbc1eedb0cf10920ee76088211058b52d0f6d799
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 Map canon_ace perms to permission bits NT.
1062 The attr element is not used here - we only process deny entries on set,
1063 not get. Deny entries are implicit on get with ace->perms = 0.
1064 ****************************************************************************/
1065
1066 uint32_t map_canon_ace_perms(int snum,
1067 enum security_ace_type *pacl_type,
1068 mode_t perms,
1069 bool directory_ace)
1070 {
1071 uint32_t nt_mask = 0;
1072
1073 *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
1074
1075 if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
1076 if (directory_ace) {
1077 nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
1078 } else {
1079 nt_mask = (UNIX_ACCESS_RWX & ~DELETE_ACCESS);
1080 }
1081 } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
1082 /*
1083 * Windows NT refuses to display ACEs with no permissions in them (but
1084 * they are perfectly legal with Windows 2000). If the ACE has empty
1085 * permissions we cannot use 0, so we use the otherwise unused
1086 * WRITE_OWNER permission, which we ignore when we set an ACL.
1087 * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
1088 * to be changed in the future.
1089 */
1090
1091 nt_mask = 0;
1092 } else {
1093 if (directory_ace) {
1094 nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
1095 nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
1096 nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
1097 } else {
1098 nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
1099 nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
1100 nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
1101 }
1102 }
1103
1104 if ((perms & S_IWUSR) && lp_dos_filemode(snum)) {
1105 nt_mask |= (SEC_STD_WRITE_DAC|SEC_STD_WRITE_OWNER|DELETE_ACCESS);
1106 }
1107
1108 DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
1109 (unsigned int)perms, (unsigned int)nt_mask ));
1110
1111 return nt_mask;
1112 }
1113
1114 /****************************************************************************
1115 Map NT perms to a UNIX mode_t.
1116 ****************************************************************************/
1117
1118 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA)
1119 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA)
1120 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
1121
1122 static mode_t map_nt_perms( uint32 *mask, int type)
1123 {
1124 mode_t mode = 0;
1125
1126 switch(type) {
1127 case S_IRUSR:
1128 if((*mask) & GENERIC_ALL_ACCESS)
1129 mode = S_IRUSR|S_IWUSR|S_IXUSR;
1130 else {
1131 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
1132 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
1133 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
1134 }
1135 break;
1136 case S_IRGRP:
1137 if((*mask) & GENERIC_ALL_ACCESS)
1138 mode = S_IRGRP|S_IWGRP|S_IXGRP;
1139 else {
1140 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
1141 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
1142 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
1143 }
1144 break;
1145 case S_IROTH:
1146 if((*mask) & GENERIC_ALL_ACCESS)
1147 mode = S_IROTH|S_IWOTH|S_IXOTH;
1148 else {
1149 mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
1150 mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
1151 mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
1152 }
1153 break;
1154 }
1155
1156 return mode;
1157 }
1158
1159 /****************************************************************************
1160 Unpack a struct security_descriptor into a UNIX owner and group.
1161 ****************************************************************************/
1162
1163 NTSTATUS unpack_nt_owners(struct connection_struct *conn,
1164 uid_t *puser, gid_t *pgrp,
1165 uint32 security_info_sent, const struct
1166 security_descriptor *psd)
1167 {
1168 struct dom_sid owner_sid;
1169 struct dom_sid grp_sid;
1170
1171 *puser = (uid_t)-1;
1172 *pgrp = (gid_t)-1;
1173
1174 if(security_info_sent == 0) {
1175 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
1176 return NT_STATUS_OK;
1177 }
1178
1179 /*
1180 * Validate the owner and group SID's.
1181 */
1182
1183 memset(&owner_sid, '\0', sizeof(owner_sid));
1184 memset(&grp_sid, '\0', sizeof(grp_sid));
1185
1186 DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
1187
1188 /*
1189 * Don't immediately fail if the owner sid cannot be validated.
1190 * This may be a group chown only set.
1191 */
1192
1193 if (security_info_sent & SECINFO_OWNER) {
1194 sid_copy(&owner_sid, psd->owner_sid);
1195 if (!sid_to_uid(&owner_sid, puser)) {
1196 if (lp_force_unknown_acl_user(SNUM(conn))) {
1197 /* this allows take ownership to work
1198 * reasonably */
1199 *puser = get_current_uid(conn);
1200 } else {
1201 DEBUG(3,("unpack_nt_owners: unable to validate"
1202 " owner sid for %s\n",
1203 sid_string_dbg(&owner_sid)));
1204 return NT_STATUS_INVALID_OWNER;
1205 }
1206 }
1207 DEBUG(3,("unpack_nt_owners: owner sid mapped to uid %u\n",
1208 (unsigned int)*puser ));
1209 }
1210
1211 /*
1212 * Don't immediately fail if the group sid cannot be validated.
1213 * This may be an owner chown only set.
1214 */
1215
1216 if (security_info_sent & SECINFO_GROUP) {
1217 sid_copy(&grp_sid, psd->group_sid);
1218 if (!sid_to_gid( &grp_sid, pgrp)) {
1219 if (lp_force_unknown_acl_user(SNUM(conn))) {
1220 /* this allows take group ownership to work
1221 * reasonably */
1222 *pgrp = get_current_gid(conn);
1223 } else {
1224 DEBUG(3,("unpack_nt_owners: unable to validate"
1225 " group sid.\n"));
1226 return NT_STATUS_INVALID_OWNER;
1227 }
1228 }
1229 DEBUG(3,("unpack_nt_owners: group sid mapped to gid %u\n",
1230 (unsigned int)*pgrp));
1231 }
1232
1233 DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
1234
1235 return NT_STATUS_OK;
1236 }
1237
1238
1239 static void trim_ace_perms(canon_ace *pace)
1240 {
1241 pace->perms = pace->perms & (S_IXUSR|S_IWUSR|S_IRUSR);
1242 }
1243
1244 static void ensure_minimal_owner_ace_perms(const bool is_directory,
1245 canon_ace *pace)
1246 {
1247 pace->perms |= S_IRUSR;
1248 if (is_directory) {
1249 pace->perms |= (S_IWUSR|S_IXUSR);
1250 }
1251 }
1252
1253 /****************************************************************************
1254 Check if a given uid/SID is in a group gid/SID. This is probably very
1255 expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1256 ****************************************************************************/
1257
1258 static bool uid_entry_in_group(connection_struct *conn, canon_ace *uid_ace, canon_ace *group_ace )
1259 {
1260 /* "Everyone" always matches every uid. */
1261
1262 if (dom_sid_equal(&group_ace->trustee, &global_sid_World))
1263 return True;
1264
1265 /*
1266 * if it's the current user, we already have the unix token
1267 * and don't need to do the complex user_in_group_sid() call
1268 */
1269 if (uid_ace->unix_ug.id == get_current_uid(conn)) {
1270 const struct security_unix_token *curr_utok = NULL;
1271 size_t i;
1272
1273 if (group_ace->unix_ug.id == get_current_gid(conn)) {
1274 return True;
1275 }
1276
1277 curr_utok = get_current_utok(conn);
1278 for (i=0; i < curr_utok->ngroups; i++) {
1279 if (group_ace->unix_ug.id == curr_utok->groups[i]) {
1280 return True;
1281 }
1282 }
1283 }
1284
1285 /*
1286 * user_in_group_sid() uses create_token_from_sid()
1287 * which creates an artificial NT token given just a username,
1288 * so this is not reliable for users from foreign domains
1289 * exported by winbindd!
1290 */
1291 return user_sid_in_group_sid(&uid_ace->trustee, &group_ace->trustee);
1292 }
1293
1294 /****************************************************************************
1295 A well formed POSIX file or default ACL has at least 3 entries, a
1296 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1297 In addition, the owner must always have at least read access.
1298 When using this call on get_acl, the pst struct is valid and contains
1299 the mode of the file.
1300 ****************************************************************************/
1301
1302 static bool ensure_canon_entry_valid_on_get(connection_struct *conn,
1303 canon_ace **pp_ace,
1304 const struct dom_sid *pfile_owner_sid,
1305 const struct dom_sid *pfile_grp_sid,
1306 const SMB_STRUCT_STAT *pst)
1307 {
1308 canon_ace *pace;
1309 bool got_user = false;
1310 bool got_group = false;
1311 bool got_other = false;
1312
1313 for (pace = *pp_ace; pace; pace = pace->next) {
1314 if (pace->type == SMB_ACL_USER_OBJ) {
1315 got_user = true;
1316 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1317 got_group = true;
1318 } else if (pace->type == SMB_ACL_OTHER) {
1319 got_other = true;
1320 }
1321 }
1322
1323 if (!got_user) {
1324 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1325 DEBUG(0,("malloc fail.\n"));
1326 return false;
1327 }
1328
1329 ZERO_STRUCTP(pace);
1330 pace->type = SMB_ACL_USER_OBJ;
1331 pace->owner_type = UID_ACE;
1332 pace->unix_ug.type = ID_TYPE_UID;
1333 pace->unix_ug.id = pst->st_ex_uid;
1334 pace->trustee = *pfile_owner_sid;
1335 pace->attr = ALLOW_ACE;
1336 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1337 DLIST_ADD(*pp_ace, pace);
1338 }
1339
1340 if (!got_group) {
1341 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1342 DEBUG(0,("malloc fail.\n"));
1343 return false;
1344 }
1345
1346 ZERO_STRUCTP(pace);
1347 pace->type = SMB_ACL_GROUP_OBJ;
1348 pace->owner_type = GID_ACE;
1349 pace->unix_ug.type = ID_TYPE_GID;
1350 pace->unix_ug.id = pst->st_ex_gid;
1351 pace->trustee = *pfile_grp_sid;
1352 pace->attr = ALLOW_ACE;
1353 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1354 DLIST_ADD(*pp_ace, pace);
1355 }
1356
1357 if (!got_other) {
1358 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1359 DEBUG(0,("malloc fail.\n"));
1360 return false;
1361 }
1362
1363 ZERO_STRUCTP(pace);
1364 pace->type = SMB_ACL_OTHER;
1365 pace->owner_type = WORLD_ACE;
1366 pace->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
1367 pace->unix_ug.id = -1;
1368 pace->trustee = global_sid_World;
1369 pace->attr = ALLOW_ACE;
1370 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IROTH, S_IWOTH, S_IXOTH);
1371 DLIST_ADD(*pp_ace, pace);
1372 }
1373
1374 return true;
1375 }
1376
1377 /****************************************************************************
1378 A well formed POSIX file or default ACL has at least 3 entries, a
1379 SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1380 In addition, the owner must always have at least read access.
1381 When using this call on set_acl, the pst struct has
1382 been modified to have a mode containing the default for this file or directory
1383 type.
1384 ****************************************************************************/
1385
1386 static bool ensure_canon_entry_valid_on_set(connection_struct *conn,
1387 canon_ace **pp_ace,
1388 bool is_default_acl,
1389 const struct share_params *params,
1390 const bool is_directory,
1391 const struct dom_sid *pfile_owner_sid,
1392 const struct dom_sid *pfile_grp_sid,
1393 const SMB_STRUCT_STAT *pst)
1394 {
1395 canon_ace *pace;
1396 canon_ace *pace_user = NULL;
1397 canon_ace *pace_group = NULL;
1398 canon_ace *pace_other = NULL;
1399 bool got_duplicate_user = false;
1400 bool got_duplicate_group = false;
1401
1402 for (pace = *pp_ace; pace; pace = pace->next) {
1403 trim_ace_perms(pace);
1404 if (pace->type == SMB_ACL_USER_OBJ) {
1405 ensure_minimal_owner_ace_perms(is_directory, pace);
1406 pace_user = pace;
1407 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1408 pace_group = pace;
1409 } else if (pace->type == SMB_ACL_OTHER) {
1410 pace_other = pace;
1411 }
1412 }
1413
1414 if (!pace_user) {
1415 canon_ace *pace_iter;
1416
1417 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1418 DEBUG(0,("talloc fail.\n"));
1419 return false;
1420 }
1421
1422 ZERO_STRUCTP(pace);
1423 pace->type = SMB_ACL_USER_OBJ;
1424 pace->owner_type = UID_ACE;
1425 pace->unix_ug.type = ID_TYPE_UID;
1426 pace->unix_ug.id = pst->st_ex_uid;
1427 pace->trustee = *pfile_owner_sid;
1428 pace->attr = ALLOW_ACE;
1429 /* Start with existing user permissions, principle of least
1430 surprises for the user. */
1431 pace->perms = unix_perms_to_acl_perms(pst->st_ex_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1432
1433 /* See if the owning user is in any of the other groups in
1434 the ACE, or if there's a matching user entry (by uid
1435 or in the case of ID_TYPE_BOTH by SID).
1436 If so, OR in the permissions from that entry. */
1437
1438
1439 for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1440 if (pace_iter->type == SMB_ACL_USER &&
1441 pace_iter->unix_ug.id == pace->unix_ug.id) {
1442 pace->perms |= pace_iter->perms;
1443 } else if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1444 if (dom_sid_equal(&pace->trustee, &pace_iter->trustee)) {
1445 pace->perms |= pace_iter->perms;
1446 } else if (uid_entry_in_group(conn, pace, pace_iter)) {
1447 pace->perms |= pace_iter->perms;
1448 }
1449 }
1450 }
1451
1452 if (pace->perms == 0) {
1453 /* If we only got an "everyone" perm, just use that. */
1454 if (pace_other)
1455 pace->perms = pace_other->perms;
1456 }
1457
1458 /*
1459 * Ensure we have default parameters for the
1460 * user (owner) even on default ACLs.
1461 */
1462 ensure_minimal_owner_ace_perms(is_directory, pace);
1463
1464 DLIST_ADD(*pp_ace, pace);
1465 pace_user = pace;
1466 }
1467
1468 if (!pace_group) {
1469 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1470 DEBUG(0,("talloc fail.\n"));
1471 return false;
1472 }
1473
1474 ZERO_STRUCTP(pace);
1475 pace->type = SMB_ACL_GROUP_OBJ;
1476 pace->owner_type = GID_ACE;
1477 pace->unix_ug.type = ID_TYPE_GID;
1478 pace->unix_ug.id = pst->st_ex_gid;
1479 pace->trustee = *pfile_grp_sid;
1480 pace->attr = ALLOW_ACE;
1481
1482 /* If we only got an "everyone" perm, just use that. */
1483 if (pace_other) {
1484 pace->perms = pace_other->perms;
1485 } else {
1486 pace->perms = 0;
1487 }
1488
1489 DLIST_ADD(*pp_ace, pace);
1490 pace_group = pace;
1491 }
1492
1493 if (!pace_other) {
1494 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1495 DEBUG(0,("talloc fail.\n"));
1496 return false;
1497 }
1498
1499 ZERO_STRUCTP(pace);
1500 pace->type = SMB_ACL_OTHER;
1501 pace->owner_type = WORLD_ACE;
1502 pace->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
1503 pace->unix_ug.id = -1;
1504 pace->trustee = global_sid_World;
1505 pace->attr = ALLOW_ACE;
1506 pace->perms = 0;
1507
1508 DLIST_ADD(*pp_ace, pace);
1509 pace_other = pace;
1510 }
1511
1512 /* Ensure when setting a POSIX ACL, that the uid for a
1513 SMB_ACL_USER_OBJ ACE (the owner ACE entry) has a duplicate
1514 permission entry as an SMB_ACL_USER, and a gid for a
1515 SMB_ACL_GROUP_OBJ ACE (the primary group ACE entry) also has
1516 a duplicate permission entry as an SMB_ACL_GROUP. If not,
1517 then if the ownership or group ownership of this file or
1518 directory gets changed, the user or group can lose their
1519 access. */
1520
1521 for (pace = *pp_ace; pace; pace = pace->next) {
1522 if (pace->type == SMB_ACL_USER &&
1523 pace->unix_ug.id == pace_user->unix_ug.id) {
1524 /* Already got one. */
1525 got_duplicate_user = true;
1526 } else if (pace->type == SMB_ACL_GROUP &&
1527 pace->unix_ug.id == pace_group->unix_ug.id) {
1528 /* Already got one. */
1529 got_duplicate_group = true;
1530 } else if ((pace->type == SMB_ACL_GROUP)
1531 && (dom_sid_equal(&pace->trustee, &pace_user->trustee))) {
1532 /* If the SID owning the file appears
1533 * in a group entry, then we have
1534 * enough duplication, they will still
1535 * have access */
1536 got_duplicate_user = true;
1537 }
1538 }
1539
1540 /* If the SID is equal for the user and group that we need
1541 to add the duplicate for, add only the group */
1542 if (!got_duplicate_user && !got_duplicate_group
1543 && dom_sid_equal(&pace_group->trustee,
1544 &pace_user->trustee)) {
1545 /* Add a duplicate SMB_ACL_GROUP entry, this
1546 * will cover the owning SID as well, as it
1547 * will always be mapped to both a uid and
1548 * gid. */
1549
1550 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1551 DEBUG(0,("talloc fail.\n"));
1552 return false;
1553 }
1554
1555 ZERO_STRUCTP(pace);
1556 pace->type = SMB_ACL_GROUP;;
1557 pace->owner_type = GID_ACE;
1558 pace->unix_ug.type = ID_TYPE_GID;
1559 pace->unix_ug.id = pace_group->unix_ug.id;
1560 pace->trustee = pace_group->trustee;
1561 pace->attr = pace_group->attr;
1562 pace->perms = pace_group->perms;
1563
1564 DLIST_ADD(*pp_ace, pace);
1565
1566 /* We're done here, make sure the
1567 statements below are not executed. */
1568 got_duplicate_user = true;
1569 got_duplicate_group = true;
1570 }
1571
1572 if (!got_duplicate_user) {
1573 /* Add a duplicate SMB_ACL_USER entry. */
1574 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1575 DEBUG(0,("talloc fail.\n"));
1576 return false;
1577 }
1578
1579 ZERO_STRUCTP(pace);
1580 pace->type = SMB_ACL_USER;;
1581 pace->owner_type = UID_ACE;
1582 pace->unix_ug.type = ID_TYPE_UID;
1583 pace->unix_ug.id = pace_user->unix_ug.id;
1584 pace->trustee = pace_user->trustee;
1585 pace->attr = pace_user->attr;
1586 pace->perms = pace_user->perms;
1587
1588 DLIST_ADD(*pp_ace, pace);
1589
1590 got_duplicate_user = true;
1591 }
1592
1593 if (!got_duplicate_group) {
1594 /* Add a duplicate SMB_ACL_GROUP entry. */
1595 if ((pace = talloc(talloc_tos(), canon_ace)) == NULL) {
1596 DEBUG(0,("talloc fail.\n"));
1597 return false;
1598 }
1599
1600 ZERO_STRUCTP(pace);
1601 pace->type = SMB_ACL_GROUP;;
1602 pace->owner_type = GID_ACE;
1603 pace->unix_ug.type = ID_TYPE_GID;
1604 pace->unix_ug.id = pace_group->unix_ug.id;
1605 pace->trustee = pace_group->trustee;
1606 pace->attr = pace_group->attr;
1607 pace->perms = pace_group->perms;
1608
1609 DLIST_ADD(*pp_ace, pace);
1610
1611 got_duplicate_group = true;
1612 }
1613
1614 return true;
1615 }
1616
1617 /****************************************************************************
1618 Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1619 If it does not have them, check if there are any entries where the trustee is the
1620 file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1621 Note we must not do this to default directory ACLs.
1622 ****************************************************************************/
1623
1624 static void check_owning_objs(canon_ace *ace, struct dom_sid *pfile_owner_sid, struct dom_sid *pfile_grp_sid)
1625 {
1626 bool got_user_obj, got_group_obj;
1627 canon_ace *current_ace;
1628 int i, entries;
1629
1630 entries = count_canon_ace_list(ace);
1631 got_user_obj = False;
1632 got_group_obj = False;
1633
1634 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1635 if (current_ace->type == SMB_ACL_USER_OBJ)
1636 got_user_obj = True;
1637 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1638 got_group_obj = True;
1639 }
1640 if (got_user_obj && got_group_obj) {
1641 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1642 return;
1643 }
1644
1645 for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1646 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1647 dom_sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1648 current_ace->type = SMB_ACL_USER_OBJ;
1649 got_user_obj = True;
1650 }
1651 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1652 dom_sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1653 current_ace->type = SMB_ACL_GROUP_OBJ;
1654 got_group_obj = True;
1655 }
1656 }
1657 if (!got_user_obj)
1658 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1659 if (!got_group_obj)
1660 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1661 }
1662
1663 static bool add_current_ace_to_acl(files_struct *fsp, struct security_ace *psa,
1664 canon_ace **file_ace, canon_ace **dir_ace,
1665 bool *got_file_allow, bool *got_dir_allow,
1666 bool *all_aces_are_inherit_only,
1667 canon_ace *current_ace)
1668 {
1669
1670 /*
1671 * Map the given NT permissions into a UNIX mode_t containing only
1672 * S_I(R|W|X)USR bits.
1673 */
1674
1675 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1676 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1677
1678 /* Store the ace_flag. */
1679 current_ace->ace_flags = psa->flags;
1680
1681 /*
1682 * Now add the created ace to either the file list, the directory
1683 * list, or both. We *MUST* preserve the order here (hence we use
1684 * DLIST_ADD_END) as NT ACLs are order dependent.
1685 */
1686
1687 if (fsp->is_directory) {
1688
1689 /*
1690 * We can only add to the default POSIX ACE list if the ACE is
1691 * designed to be inherited by both files and directories.
1692 */
1693
1694 if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1695 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1696
1697 canon_ace *current_dir_ace = current_ace;
1698 DLIST_ADD_END(*dir_ace, current_ace, canon_ace *);
1699
1700 /*
1701 * Note if this was an allow ace. We can't process
1702 * any further deny ace's after this.
1703 */
1704
1705 if (current_ace->attr == ALLOW_ACE)
1706 *got_dir_allow = True;
1707
1708 if ((current_ace->attr == DENY_ACE) && *got_dir_allow) {
1709 DEBUG(0,("add_current_ace_to_acl: "
1710 "malformed ACL in "
1711 "inheritable ACL! Deny entry "
1712 "after Allow entry. Failing "
1713 "to set on file %s.\n",
1714 fsp_str_dbg(fsp)));
1715 return False;
1716 }
1717
1718 if( DEBUGLVL( 10 )) {
1719 dbgtext("add_current_ace_to_acl: adding dir ACL:\n");
1720 print_canon_ace( current_ace, 0);
1721 }
1722
1723 /*
1724 * If this is not an inherit only ACE we need to add a duplicate
1725 * to the file acl.
1726 */
1727
1728 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1729 canon_ace *dup_ace = dup_canon_ace(current_ace);
1730
1731 if (!dup_ace) {
1732 DEBUG(0,("add_current_ace_to_acl: malloc fail !\n"));
1733 return False;
1734 }
1735
1736 /*
1737 * We must not free current_ace here as its
1738 * pointer is now owned by the dir_ace list.
1739 */
1740 current_ace = dup_ace;
1741 /* We've essentially split this ace into two,
1742 * and added the ace with inheritance request
1743 * bits to the directory ACL. Drop those bits for
1744 * the ACE we're adding to the file list. */
1745 current_ace->ace_flags &= ~(SEC_ACE_FLAG_OBJECT_INHERIT|
1746 SEC_ACE_FLAG_CONTAINER_INHERIT|
1747 SEC_ACE_FLAG_INHERIT_ONLY);
1748 } else {
1749 /*
1750 * We must not free current_ace here as its
1751 * pointer is now owned by the dir_ace list.
1752 */
1753 current_ace = NULL;
1754 }
1755
1756 /*
1757 * current_ace is now either owned by file_ace
1758 * or is NULL. We can safely operate on current_dir_ace
1759 * to treat mapping for default acl entries differently
1760 * than access acl entries.
1761 */
1762
1763 if (current_dir_ace->owner_type == UID_ACE) {
1764 /*
1765 * We already decided above this is a uid,
1766 * for default acls ace's only CREATOR_OWNER
1767 * maps to ACL_USER_OBJ. All other uid
1768 * ace's are ACL_USER.
1769 */
1770 if (dom_sid_equal(&current_dir_ace->trustee,
1771 &global_sid_Creator_Owner)) {
1772 current_dir_ace->type = SMB_ACL_USER_OBJ;
1773 } else {
1774 current_dir_ace->type = SMB_ACL_USER;
1775 }
1776 }
1777
1778 if (current_dir_ace->owner_type == GID_ACE) {
1779 /*
1780 * We already decided above this is a gid,
1781 * for default acls ace's only CREATOR_GROUP
1782 * maps to ACL_GROUP_OBJ. All other uid
1783 * ace's are ACL_GROUP.
1784 */
1785 if (dom_sid_equal(&current_dir_ace->trustee,
1786 &global_sid_Creator_Group)) {
1787 current_dir_ace->type = SMB_ACL_GROUP_OBJ;
1788 } else {
1789 current_dir_ace->type = SMB_ACL_GROUP;
1790 }
1791 }
1792 }
1793 }
1794
1795 /*
1796 * Only add to the file ACL if not inherit only.
1797 */
1798
1799 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1800 DLIST_ADD_END(*file_ace, current_ace, canon_ace *);
1801
1802 /*
1803 * Note if this was an allow ace. We can't process
1804 * any further deny ace's after this.
1805 */
1806
1807 if (current_ace->attr == ALLOW_ACE)
1808 *got_file_allow = True;
1809
1810 if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1811 DEBUG(0,("add_current_ace_to_acl: malformed "
1812 "ACL in file ACL ! Deny entry after "
1813 "Allow entry. Failing to set on file "
1814 "%s.\n", fsp_str_dbg(fsp)));
1815 return False;
1816 }
1817
1818 if( DEBUGLVL( 10 )) {
1819 dbgtext("add_current_ace_to_acl: adding file ACL:\n");
1820 print_canon_ace( current_ace, 0);
1821 }
1822 *all_aces_are_inherit_only = False;
1823 /*
1824 * We must not free current_ace here as its
1825 * pointer is now owned by the file_ace list.
1826 */
1827 current_ace = NULL;
1828 }
1829
1830 /*
1831 * Free if ACE was not added.
1832 */
1833
1834 TALLOC_FREE(current_ace);
1835 return true;
1836 }
1837
1838 /****************************************************************************
1839 Unpack a struct security_descriptor into two canonical ace lists.
1840 ****************************************************************************/
1841
1842 static bool create_canon_ace_lists(files_struct *fsp,
1843 const SMB_STRUCT_STAT *pst,
1844 struct dom_sid *pfile_owner_sid,
1845 struct dom_sid *pfile_grp_sid,
1846 canon_ace **ppfile_ace,
1847 canon_ace **ppdir_ace,
1848 const struct security_acl *dacl)
1849 {
1850 bool all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1851 canon_ace *file_ace = NULL;
1852 canon_ace *dir_ace = NULL;
1853 canon_ace *current_ace = NULL;
1854 bool got_dir_allow = False;
1855 bool got_file_allow = False;
1856 int i, j;
1857
1858 *ppfile_ace = NULL;
1859 *ppdir_ace = NULL;
1860
1861 /*
1862 * Convert the incoming ACL into a more regular form.
1863 */
1864
1865 for(i = 0; i < dacl->num_aces; i++) {
1866 struct security_ace *psa = &dacl->aces[i];
1867
1868 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1869 DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1870 return False;
1871 }
1872 }
1873
1874 /*
1875 * Deal with the fact that NT 4.x re-writes the canonical format
1876 * that we return for default ACLs. If a directory ACE is identical
1877 * to a inherited directory ACE then NT changes the bits so that the
1878 * first ACE is set to OI|IO and the second ACE for this SID is set
1879 * to CI. We need to repair this. JRA.
1880 */
1881
1882 for(i = 0; i < dacl->num_aces; i++) {
1883 struct security_ace *psa1 = &dacl->aces[i];
1884
1885 for (j = i + 1; j < dacl->num_aces; j++) {
1886 struct security_ace *psa2 = &dacl->aces[j];
1887
1888 if (psa1->access_mask != psa2->access_mask)
1889 continue;
1890
1891 if (!dom_sid_equal(&psa1->trustee, &psa2->trustee))
1892 continue;
1893
1894 /*
1895 * Ok - permission bits and SIDs are equal.
1896 * Check if flags were re-written.
1897 */
1898
1899 if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1900
1901 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1902 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1903
1904 } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1905
1906 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1907 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1908
1909 }
1910 }
1911 }
1912
1913 for(i = 0; i < dacl->num_aces; i++) {
1914 struct security_ace *psa = &dacl->aces[i];
1915
1916 /*
1917 * Create a canon_ace entry representing this NT DACL ACE.
1918 */
1919
1920 if ((current_ace = talloc(talloc_tos(), canon_ace)) == NULL) {
1921 free_canon_ace_list(file_ace);
1922 free_canon_ace_list(dir_ace);
1923 DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1924 return False;
1925 }
1926
1927 ZERO_STRUCTP(current_ace);
1928
1929 sid_copy(&current_ace->trustee, &psa->trustee);
1930
1931 /*
1932 * Try and work out if the SID is a user or group
1933 * as we need to flag these differently for POSIX.
1934 * Note what kind of a POSIX ACL this should map to.
1935 */
1936
1937 if( dom_sid_equal(&current_ace->trustee, &global_sid_World)) {
1938 current_ace->owner_type = WORLD_ACE;
1939 current_ace->unix_ug.type = ID_TYPE_NOT_SPECIFIED;
1940 current_ace->unix_ug.id = -1;
1941 current_ace->type = SMB_ACL_OTHER;
1942 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1943 current_ace->owner_type = UID_ACE;
1944 current_ace->unix_ug.type = ID_TYPE_UID;
1945 current_ace->unix_ug.id = pst->st_ex_uid;
1946 current_ace->type = SMB_ACL_USER_OBJ;
1947
1948 /*
1949 * The Creator Owner entry only specifies inheritable permissions,
1950 * never access permissions. WinNT doesn't always set the ACE to
1951 * INHERIT_ONLY, though.
1952 */
1953
1954 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1955
1956 } else if (dom_sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1957 current_ace->owner_type = GID_ACE;
1958 current_ace->unix_ug.type = ID_TYPE_GID;
1959 current_ace->unix_ug.id = pst->st_ex_gid;
1960 current_ace->type = SMB_ACL_GROUP_OBJ;
1961
1962 /*
1963 * The Creator Group entry only specifies inheritable permissions,
1964 * never access permissions. WinNT doesn't always set the ACE to
1965 * INHERIT_ONLY, though.
1966 */
1967 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1968
1969 } else {
1970 struct unixid unixid;
1971
1972 if (!sids_to_unixids(&current_ace->trustee, 1, &unixid)) {
1973 free_canon_ace_list(file_ace);
1974 free_canon_ace_list(dir_ace);
1975 TALLOC_FREE(current_ace);
1976 DEBUG(0, ("create_canon_ace_lists: sids_to_unixids "
1977 "failed for %s (allocation failure)\n",
1978 sid_string_dbg(&current_ace->trustee)));
1979 return false;
1980 }
1981
1982 if (unixid.type == ID_TYPE_BOTH) {
1983 /* If it's the owning user, this is a
1984 * user_obj, not a user. This way, we
1985 * get a valid ACL for groups that own
1986 * files, without putting user ACL
1987 * entries in for groups otherwise */
1988 if (unixid.id == pst->st_ex_uid) {
1989 current_ace->owner_type = UID_ACE;
1990 current_ace->unix_ug.type = ID_TYPE_UID;
1991 current_ace->unix_ug.id = unixid.id;
1992 current_ace->type = SMB_ACL_USER_OBJ;
1993
1994 /* Add the user object to the posix ACL,
1995 and proceed to the group mapping
1996 below. This handles the talloc_free
1997 of current_ace if not added for some
1998 reason */
1999 if (!add_current_ace_to_acl(fsp,
2000 psa,
2001 &file_ace,
2002 &dir_ace,
2003 &got_file_allow,
2004 &got_dir_allow,
2005 &all_aces_are_inherit_only,
2006 current_ace)) {
2007 free_canon_ace_list(file_ace);
2008 free_canon_ace_list(dir_ace);
2009 return false;
2010 }
2011
2012 if ((current_ace = talloc(talloc_tos(),
2013 canon_ace)) == NULL) {
2014 free_canon_ace_list(file_ace);
2015 free_canon_ace_list(dir_ace);
2016 DEBUG(0,("create_canon_ace_lists: "
2017 "malloc fail.\n"));
2018 return False;
2019 }
2020
2021 ZERO_STRUCTP(current_ace);
2022 }
2023
2024 sid_copy(&current_ace->trustee, &psa->trustee);
2025
2026 current_ace->unix_ug.type = ID_TYPE_GID;
2027 current_ace->unix_ug.id = unixid.id;
2028 current_ace->owner_type = GID_ACE;
2029 /* If it's the primary group, this is a
2030 group_obj, not a group. */
2031 if (current_ace->unix_ug.id == pst->st_ex_gid) {
2032 current_ace->type = SMB_ACL_GROUP_OBJ;
2033 } else {
2034 current_ace->type = SMB_ACL_GROUP;
2035 }
2036
2037 } else if (unixid.type == ID_TYPE_UID) {
2038 current_ace->owner_type = UID_ACE;
2039 current_ace->unix_ug.type = ID_TYPE_UID;
2040 current_ace->unix_ug.id = unixid.id;
2041 /* If it's the owning user, this is a user_obj,
2042 not a user. */
2043 if (current_ace->unix_ug.id == pst->st_ex_uid) {
2044 current_ace->type = SMB_ACL_USER_OBJ;
2045 } else {
2046 current_ace->type = SMB_ACL_USER;
2047 }
2048 } else if (unixid.type == ID_TYPE_GID) {
2049 current_ace->unix_ug.type = ID_TYPE_GID;
2050 current_ace->unix_ug.id = unixid.id;
2051 current_ace->owner_type = GID_ACE;
2052 /* If it's the primary group, this is a
2053 group_obj, not a group. */
2054 if (current_ace->unix_ug.id == pst->st_ex_gid) {
2055 current_ace->type = SMB_ACL_GROUP_OBJ;
2056 } else {
2057 current_ace->type = SMB_ACL_GROUP;
2058 }
2059 } else {
2060 /*
2061 * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
2062 */
2063
2064 if (non_mappable_sid(&psa->trustee)) {
2065 DEBUG(10, ("create_canon_ace_lists: ignoring "
2066 "non-mappable SID %s\n",
2067 sid_string_dbg(&psa->trustee)));
2068 TALLOC_FREE(current_ace);
2069 continue;
2070 }
2071
2072 if (lp_force_unknown_acl_user(SNUM(fsp->conn))) {
2073 DEBUG(10, ("create_canon_ace_lists: ignoring "
2074 "unknown or foreign SID %s\n",
2075 sid_string_dbg(&psa->trustee)));
2076 TALLOC_FREE(current_ace);
2077 continue;
2078 }
2079
2080 free_canon_ace_list(file_ace);
2081 free_canon_ace_list(dir_ace);
2082 DEBUG(0, ("create_canon_ace_lists: unable to map SID "
2083 "%s to uid or gid.\n",
2084 sid_string_dbg(&current_ace->trustee)));
2085 TALLOC_FREE(current_ace);
2086 return false;
2087 }
2088 }
2089
2090 /* handles the talloc_free of current_ace if not added for some reason */
2091 if (!add_current_ace_to_acl(fsp, psa, &file_ace, &dir_ace,
2092 &got_file_allow, &got_dir_allow,
2093 &all_aces_are_inherit_only, current_ace)) {
2094 free_canon_ace_list(file_ace);
2095 free_canon_ace_list(dir_ace);
2096 return false;
2097 }
2098 }
2099
2100 if (fsp->is_directory && all_aces_are_inherit_only) {
2101 /*
2102 * Windows 2000 is doing one of these weird 'inherit acl'
2103 * traverses to conserve NTFS ACL resources. Just pretend
2104 * there was no DACL sent. JRA.
2105 */
2106
2107 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
2108 free_canon_ace_list(file_ace);
2109 free_canon_ace_list(dir_ace);
2110 file_ace = NULL;
2111 dir_ace = NULL;
2112 } else {
2113 /*
2114 * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in
2115 * the file ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
2116 * entries can be converted to *_OBJ. Don't do this for the default
2117 * ACL, we will create them separately for this if needed inside
2118 * ensure_canon_entry_valid_on_set().
2119 */
2120 if (file_ace) {
2121 check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
2122 }
2123 }
2124
2125 *ppfile_ace = file_ace;
2126 *ppdir_ace = dir_ace;
2127
2128 return True;
2129 }
2130
2131 /****************************************************************************
2132 ASCII art time again... JRA :-).
2133
2134 We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
2135 we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
2136 entries). Secondly, the merge code has ensured that all duplicate SID entries for
2137 allow or deny have been merged, so the same SID can only appear once in the deny
2138 list or once in the allow list.
2139
2140 We then process as follows :
2141
2142 ---------------------------------------------------------------------------
2143 First pass - look for a Everyone DENY entry.
2144
2145 If it is deny all (rwx) trunate the list at this point.
2146 Else, walk the list from this point and use the deny permissions of this
2147 entry as a mask on all following allow entries. Finally, delete
2148 the Everyone DENY entry (we have applied it to everything possible).
2149
2150 In addition, in this pass we remove any DENY entries that have
2151 no permissions (ie. they are a DENY nothing).
2152 ---------------------------------------------------------------------------
2153 Second pass - only deal with deny user entries.
2154
2155 DENY user1 (perms XXX)
2156
2157 new_perms = 0
2158 for all following allow group entries where user1 is in group
2159 new_perms |= group_perms;
2160
2161 user1 entry perms = new_perms & ~ XXX;
2162
2163 Convert the deny entry to an allow entry with the new perms and
2164 push to the end of the list. Note if the user was in no groups
2165 this maps to a specific allow nothing entry for this user.
2166
2167 The common case from the NT ACL choser (userX deny all) is
2168 optimised so we don't do the group lookup - we just map to
2169 an allow nothing entry.
2170
2171 What we're doing here is inferring the allow permissions the
2172 person setting the ACE on user1 wanted by looking at the allow
2173 permissions on the groups the user is currently in. This will
2174 be a snapshot, depending on group membership but is the best
2175 we can do and has the advantage of failing closed rather than
2176 open.
2177 ---------------------------------------------------------------------------
2178 Third pass - only deal with deny group entries.
2179
2180 DENY group1 (perms XXX)
2181
2182 for all following allow user entries where user is in group1
2183 user entry perms = user entry perms & ~ XXX;
2184
2185 If there is a group Everyone allow entry with permissions YYY,
2186 convert the group1 entry to an allow entry and modify its
2187 permissions to be :
2188
2189 new_perms = YYY & ~ XXX
2190
2191 and push to the end of the list.
2192
2193 If there is no group Everyone allow entry then convert the
2194 group1 entry to a allow nothing entry and push to the end of the list.
2195
2196 Note that the common case from the NT ACL choser (groupX deny all)
2197 cannot be optimised here as we need to modify user entries who are
2198 in the group to change them to a deny all also.
2199
2200 What we're doing here is modifying the allow permissions of
2201 user entries (which are more specific in POSIX ACLs) to mask
2202 out the explicit deny set on the group they are in. This will
2203 be a snapshot depending on current group membership but is the
2204 best we can do and has the advantage of failing closed rather
2205 than open.
2206 ---------------------------------------------------------------------------
2207 Fourth pass - cope with cumulative permissions.
2208
2209 for all allow user entries, if there exists an allow group entry with
2210 more permissive permissions, and the user is in that group, rewrite the
2211 allow user permissions to contain both sets of permissions.
2212
2213 Currently the code for this is #ifdef'ed out as these semantics make
2214 no sense to me. JRA.
2215 ---------------------------------------------------------------------------
2216
2217 Note we *MUST* do the deny user pass first as this will convert deny user
2218 entries into allow user entries which can then be processed by the deny
2219 group pass.
2220
2221 The above algorithm took a *lot* of thinking about - hence this
2222 explaination :-). JRA.
2223 ****************************************************************************/
2224
2225 /****************************************************************************
2226 Process a canon_ace list entries. This is very complex code. We need
2227 to go through and remove the "deny" permissions from any allow entry that matches
2228 the id of this entry. We have already refused any NT ACL that wasn't in correct
2229 order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
2230 we just remove it (to fail safe). We have already removed any duplicate ace
2231 entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
2232 allow entries.
2233 ****************************************************************************/
2234
2235 static void process_deny_list(connection_struct *conn, canon_ace **pp_ace_list )
2236 {
2237 canon_ace *ace_list = *pp_ace_list;
2238 canon_ace *curr_ace = NULL;
2239 canon_ace *curr_ace_next = NULL;
2240
2241 /* Pass 1 above - look for an Everyone, deny entry. */
2242
2243 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2244 canon_ace *allow_ace_p;
2245
2246 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2247
2248 if (curr_ace->attr != DENY_ACE)
2249 continue;
2250
2251 if (curr_ace->perms == (mode_t)0) {
2252
2253 /* Deny nothing entry - delete. */
2254
2255 DLIST_REMOVE(ace_list, curr_ace);
2256 continue;
2257 }
2258
2259 if (!dom_sid_equal(&curr_ace->trustee, &global_sid_World))
2260 continue;
2261
2262 /* JRATEST - assert. */
2263 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
2264
2265 if (curr_ace->perms == ALL_ACE_PERMS) {
2266
2267 /*
2268 * Optimisation. This is a DENY_ALL to Everyone. Truncate the
2269 * list at this point including this entry.
2270 */
2271
2272 canon_ace *prev_entry = DLIST_PREV(curr_ace);
2273
2274 free_canon_ace_list( curr_ace );
2275 if (prev_entry)
2276 DLIST_REMOVE(ace_list, prev_entry);
2277 else {
2278 /* We deleted the entire list. */
2279 ace_list = NULL;
2280 }
2281 break;
2282 }
2283
2284 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2285
2286 /*
2287 * Only mask off allow entries.
2288 */
2289
2290 if (allow_ace_p->attr != ALLOW_ACE)
2291 continue;
2292
2293 allow_ace_p->perms &= ~curr_ace->perms;
2294 }
2295
2296 /*
2297 * Now it's been applied, remove it.
2298 */
2299
2300 DLIST_REMOVE(ace_list, curr_ace);
2301 }
2302
2303 /* Pass 2 above - deal with deny user entries. */
2304
2305 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2306 mode_t new_perms = (mode_t)0;
2307 canon_ace *allow_ace_p;
2308
2309 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2310
2311 if (curr_ace->attr != DENY_ACE)
2312 continue;
2313
2314 if (curr_ace->owner_type != UID_ACE)
2315 continue;
2316
2317 if (curr_ace->perms == ALL_ACE_PERMS) {
2318
2319 /*
2320 * Optimisation - this is a deny everything to this user.
2321 * Convert to an allow nothing and push to the end of the list.
2322 */
2323
2324 curr_ace->attr = ALLOW_ACE;
2325 curr_ace->perms = (mode_t)0;
2326 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2327 continue;
2328 }
2329
2330 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2331
2332 if (allow_ace_p->attr != ALLOW_ACE)
2333 continue;
2334
2335 /* We process GID_ACE and WORLD_ACE entries only. */
2336
2337 if (allow_ace_p->owner_type == UID_ACE)
2338 continue;
2339
2340 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2341 new_perms |= allow_ace_p->perms;
2342 }
2343
2344 /*
2345 * Convert to a allow entry, modify the perms and push to the end
2346 * of the list.
2347 */
2348
2349 curr_ace->attr = ALLOW_ACE;
2350 curr_ace->perms = (new_perms & ~curr_ace->perms);
2351 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2352 }
2353
2354 /* Pass 3 above - deal with deny group entries. */
2355
2356 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2357 canon_ace *allow_ace_p;
2358 canon_ace *allow_everyone_p = NULL;
2359
2360 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2361
2362 if (curr_ace->attr != DENY_ACE)
2363 continue;
2364
2365 if (curr_ace->owner_type != GID_ACE)
2366 continue;
2367
2368 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2369
2370 if (allow_ace_p->attr != ALLOW_ACE)
2371 continue;
2372
2373 /* Store a pointer to the Everyone allow, if it exists. */
2374 if (allow_ace_p->owner_type == WORLD_ACE)
2375 allow_everyone_p = allow_ace_p;
2376
2377 /* We process UID_ACE entries only. */
2378
2379 if (allow_ace_p->owner_type != UID_ACE)
2380 continue;
2381
2382 /* Mask off the deny group perms. */
2383
2384 if (uid_entry_in_group(conn, allow_ace_p, curr_ace))
2385 allow_ace_p->perms &= ~curr_ace->perms;
2386 }
2387
2388 /*
2389 * Convert the deny to an allow with the correct perms and
2390 * push to the end of the list.
2391 */
2392
2393 curr_ace->attr = ALLOW_ACE;
2394 if (allow_everyone_p)
2395 curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
2396 else
2397 curr_ace->perms = (mode_t)0;
2398 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
2399 }
2400
2401 /* Doing this fourth pass allows Windows semantics to be layered
2402 * on top of POSIX semantics. I'm not sure if this is desirable.
2403 * For example, in W2K ACLs there is no way to say, "Group X no
2404 * access, user Y full access" if user Y is a member of group X.
2405 * This seems completely broken semantics to me.... JRA.
2406 */
2407
2408 #if 0
2409 /* Pass 4 above - deal with allow entries. */
2410
2411 for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
2412 canon_ace *allow_ace_p;
2413
2414 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
2415
2416 if (curr_ace->attr != ALLOW_ACE)
2417 continue;
2418
2419 if (curr_ace->owner_type != UID_ACE)
2420 continue;
2421
2422 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
2423
2424 if (allow_ace_p->attr != ALLOW_ACE)
2425 continue;
2426
2427 /* We process GID_ACE entries only. */
2428
2429 if (allow_ace_p->owner_type != GID_ACE)
2430 continue;
2431
2432 /* OR in the group perms. */
2433
2434 if (uid_entry_in_group(conn, curr_ace, allow_ace_p))
2435 curr_ace->perms |= allow_ace_p->perms;
2436 }
2437 }
2438 #endif
2439
2440 *pp_ace_list = ace_list;
2441 }
2442
2443 /****************************************************************************
2444 Unpack a struct security_descriptor into two canonical ace lists. We don't depend on this
2445 succeeding.
2446 ****************************************************************************/
2447
2448 static bool unpack_canon_ace(files_struct *fsp,
2449 const SMB_STRUCT_STAT *pst,
2450 struct dom_sid *pfile_owner_sid,
2451 struct dom_sid *pfile_grp_sid,
2452 canon_ace **ppfile_ace,
2453 canon_ace **ppdir_ace,
2454 uint32 security_info_sent,
2455 const struct security_descriptor *psd)
2456 {
2457 canon_ace *file_ace = NULL;
2458 canon_ace *dir_ace = NULL;
2459
2460 *ppfile_ace = NULL;
2461 *ppdir_ace = NULL;
2462
2463 if(security_info_sent == 0) {
2464 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2465 return False;
2466 }
2467
2468 /*
2469 * If no DACL then this is a chown only security descriptor.
2470 */
2471
2472 if(!(security_info_sent & SECINFO_DACL) || !psd->dacl)
2473 return True;
2474
2475 /*
2476 * Now go through the DACL and create the canon_ace lists.
2477 */
2478
2479 if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2480 &file_ace, &dir_ace, psd->dacl))
2481 return False;
2482
2483 if ((file_ace == NULL) && (dir_ace == NULL)) {
2484 /* W2K traverse DACL set - ignore. */
2485 return True;
2486 }
2487
2488 /*
2489 * Go through the canon_ace list and merge entries
2490 * belonging to identical users of identical allow or deny type.
2491 * We can do this as all deny entries come first, followed by
2492 * all allow entries (we have mandated this before accepting this acl).
2493 */
2494
2495 print_canon_ace_list( "file ace - before merge", file_ace);
2496 merge_aces( &file_ace, false);
2497
2498 print_canon_ace_list( "dir ace - before merge", dir_ace);
2499 merge_aces( &dir_ace, true);
2500
2501 /*
2502 * NT ACLs are order dependent. Go through the acl lists and
2503 * process DENY entries by masking the allow entries.
2504 */
2505
2506 print_canon_ace_list( "file ace - before deny", file_ace);
2507 process_deny_list(fsp->conn, &file_ace);
2508
2509 print_canon_ace_list( "dir ace - before deny", dir_ace);
2510 process_deny_list(fsp->conn, &dir_ace);
2511
2512 /*
2513 * A well formed POSIX file or default ACL has at least 3 entries, a
2514 * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2515 * and optionally a mask entry. Ensure this is the case.
2516 */
2517
2518 print_canon_ace_list( "file ace - before valid", file_ace);
2519
2520 if (!ensure_canon_entry_valid_on_set(fsp->conn, &file_ace, false, fsp->conn->params,
2521 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst)) {
2522 free_canon_ace_list(file_ace);
2523 free_canon_ace_list(dir_ace);
2524 return False;
2525 }
2526
2527 print_canon_ace_list( "dir ace - before valid", dir_ace);
2528
2529 if (dir_ace && !ensure_canon_entry_valid_on_set(fsp->conn, &dir_ace, true, fsp->conn->params,
2530 fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst)) {
2531 free_canon_ace_list(file_ace);
2532 free_canon_ace_list(dir_ace);
2533 return False;
2534 }
2535
2536 print_canon_ace_list( "file ace - return", file_ace);
2537 print_canon_ace_list( "dir ace - return", dir_ace);
2538
2539 *ppfile_ace = file_ace;
2540 *ppdir_ace = dir_ace;
2541 return True;
2542
2543 }
2544
2545 /******************************************************************************
2546 When returning permissions, try and fit NT display
2547 semantics if possible. Note the the canon_entries here must have been malloced.
2548 The list format should be - first entry = owner, followed by group and other user
2549 entries, last entry = other.
2550
2551 Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2552 are not ordered, and match on the most specific entry rather than walking a list,
2553 then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2554
2555 Entry 0: owner : deny all except read and write.
2556 Entry 1: owner : allow read and write.
2557 Entry 2: group : deny all except read.
2558 Entry 3: group : allow read.
2559 Entry 4: Everyone : allow read.
2560
2561 But NT cannot display this in their ACL editor !
2562 ********************************************************************************/
2563
2564 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2565 {
2566 canon_ace *l_head = *pp_list_head;
2567 canon_ace *owner_ace = NULL;
2568 canon_ace *other_ace = NULL;
2569 canon_ace *ace = NULL;
2570
2571 for (ace = l_head; ace; ace = ace->next) {
2572 if (ace->type == SMB_ACL_USER_OBJ)
2573 owner_ace = ace;
2574 else if (ace->type == SMB_ACL_OTHER) {
2575 /* Last ace - this is "other" */
2576 other_ace = ace;
2577 }
2578 }
2579
2580 if (!owner_ace || !other_ace) {
2581 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2582 filename ));
2583 return;
2584 }
2585
2586 /*
2587 * The POSIX algorithm applies to owner first, and other last,
2588 * so ensure they are arranged in this order.
2589 */
2590
2591 if (owner_ace) {
2592 DLIST_PROMOTE(l_head, owner_ace);
2593 }
2594
2595 if (other_ace) {
2596 DLIST_DEMOTE(l_head, other_ace, canon_ace *);
2597 }
2598
2599 /* We have probably changed the head of the list. */
2600
2601 *pp_list_head = l_head;
2602 }
2603
2604 /****************************************************************************
2605 Create a linked list of canonical ACE entries.
2606 ****************************************************************************/
2607
2608 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2609 const char *fname, SMB_ACL_T posix_acl,
2610 const SMB_STRUCT_STAT *psbuf,
2611 const struct dom_sid *powner, const struct dom_sid *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2612 {
2613 mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2614 canon_ace *l_head = NULL;
2615 canon_ace *ace = NULL;
2616 canon_ace *next_ace = NULL;
2617 int entry_id = SMB_ACL_FIRST_ENTRY;
2618 bool is_default_acl = (the_acl_type == SMB_ACL_TYPE_DEFAULT);
2619 SMB_ACL_ENTRY_T entry;
2620 size_t ace_count;
2621
2622 while ( posix_acl && (sys_acl_get_entry(posix_acl, entry_id, &entry) == 1)) {
2623 SMB_ACL_TAG_T tagtype;
2624 SMB_ACL_PERMSET_T permset;
2625 struct dom_sid sid;
2626 struct unixid unix_ug;
2627 enum ace_owner owner_type;
2628
2629 entry_id = SMB_ACL_NEXT_ENTRY;
2630
2631 /* Is this a MASK entry ? */
2632 if (sys_acl_get_tag_type(entry, &tagtype) == -1)
2633 continue;
2634
2635 if (sys_acl_get_permset(entry, &permset) == -1)
2636 continue;
2637
2638 /* Decide which SID to use based on the ACL type. */
2639 switch(tagtype) {
2640 case SMB_ACL_USER_OBJ:
2641 /* Get the SID from the owner. */
2642 sid_copy(&sid, powner);
2643 unix_ug.type = ID_TYPE_UID;
2644 unix_ug.id = psbuf->st_ex_uid;
2645 owner_type = UID_ACE;
2646 break;
2647 case SMB_ACL_USER:
2648 {
2649 uid_t *puid = (uid_t *)sys_acl_get_qualifier(entry);
2650 if (puid == NULL) {
2651 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2652 continue;
2653 }
2654 uid_to_sid( &sid, *puid);
2655 unix_ug.type = ID_TYPE_UID;
2656 unix_ug.id = *puid;
2657 owner_type = UID_ACE;
2658 break;
2659 }
2660 case SMB_ACL_GROUP_OBJ:
2661 /* Get the SID from the owning group. */
2662 sid_copy(&sid, pgroup);
2663 unix_ug.type = ID_TYPE_GID;
2664 unix_ug.id = psbuf->st_ex_gid;
2665 owner_type = GID_ACE;
2666 break;
2667 case SMB_ACL_GROUP:
2668 {
2669 gid_t *pgid = (gid_t *)sys_acl_get_qualifier(entry);
2670 if (pgid == NULL) {
2671 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2672 continue;
2673 }
2674 gid_to_sid( &sid, *pgid);
2675 unix_ug.type = ID_TYPE_GID;
2676 unix_ug.id = *pgid;
2677 owner_type = GID_ACE;
2678 break;
2679 }
2680 case SMB_ACL_MASK:
2681 acl_mask = convert_permset_to_mode_t(permset);
2682 continue; /* Don't count the mask as an entry. */
2683 case SMB_ACL_OTHER:
2684 /* Use the Everyone SID */
2685 sid = global_sid_World;
2686 unix_ug.type = ID_TYPE_NOT_SPECIFIED;
2687 unix_ug.id = -1;
2688 owner_type = WORLD_ACE;
2689 break;
2690 default:
2691 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2692 continue;
2693 }
2694
2695 /*
2696 * Add this entry to the list.
2697 */
2698
2699 if ((ace = talloc(talloc_tos(), canon_ace)) == NULL)
2700 goto fail;
2701
2702 ZERO_STRUCTP(ace);
2703 ace->type = tagtype;
2704 ace->perms = convert_permset_to_mode_t(permset);
2705 ace->attr = ALLOW_ACE;
2706 ace->trustee = sid;
2707 ace->unix_ug = unix_ug;
2708 ace->owner_type = owner_type;
2709 ace->ace_flags = get_pai_flags(pal, ace, is_default_acl);
2710
2711 DLIST_ADD(l_head, ace);
2712 }
2713
2714 /*
2715 * This next call will ensure we have at least a user/group/world set.
2716 */
2717
2718 if (!ensure_canon_entry_valid_on_get(conn, &l_head,
2719 powner, pgroup,
2720 psbuf))
2721 goto fail;
2722
2723 /*
2724 * Now go through the list, masking the permissions with the
2725 * acl_mask. Ensure all DENY Entries are at the start of the list.
2726 */
2727
2728 DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", is_default_acl ? "Default" : "Access"));
2729
2730 for ( ace_count = 0, ace = l_head; ace; ace = next_ace, ace_count++) {
2731 next_ace = ace->next;
2732
2733 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2734 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2735 ace->perms &= acl_mask;
2736
2737 if (ace->perms == 0) {
2738 DLIST_PROMOTE(l_head, ace);
2739 }
2740
2741 if( DEBUGLVL( 10 ) ) {
2742 print_canon_ace(ace, ace_count);
2743 }
2744 }
2745
2746 arrange_posix_perms(fname,&l_head );
2747
2748 print_canon_ace_list( "canonicalise_acl: ace entries after arrange", l_head );
2749
2750 return l_head;
2751
2752 fail:
2753
2754 free_canon_ace_list(l_head);
2755 return NULL;
2756 }
2757
2758 /****************************************************************************
2759 Check if the current user group list contains a given group.
2760 ****************************************************************************/
2761
2762 bool current_user_in_group(connection_struct *conn, gid_t gid)
2763 {
2764 int i;
2765 const struct security_unix_token *utok = get_current_utok(conn);
2766
2767 for (i = 0; i < utok->ngroups; i++) {
2768 if (utok->groups[i] == gid) {
2769 return True;
2770 }
2771 }
2772
2773 return False;
2774 }
2775
2776 /****************************************************************************
2777 Should we override a deny ? Check 'acl group control' and 'dos filemode'.
2778 ****************************************************************************/
2779
2780 static bool acl_group_override(connection_struct *conn,
2781 const struct smb_filename *smb_fname)
2782 {
2783 if ((errno != EPERM) && (errno != EACCES)) {
2784 return false;
2785 }
2786
2787 /* file primary group == user primary or supplementary group */
2788 if (lp_acl_group_control(SNUM(conn)) &&
2789 current_user_in_group(conn, smb_fname->st.st_ex_gid)) {
2790 return true;
2791 }
2792
2793 /* user has writeable permission */
2794 if (lp_dos_filemode(SNUM(conn)) &&
2795 can_write_to_file(conn, smb_fname)) {
2796 return true;
2797 }
2798
2799 return false;
2800 }
2801
2802 /****************************************************************************
2803 Attempt to apply an ACL to a file or directory.
2804 ****************************************************************************/
2805
2806 static bool set_canon_ace_list(files_struct *fsp,
2807 canon_ace *the_ace,
2808 bool default_ace,
2809 const SMB_STRUCT_STAT *psbuf,
2810 bool *pacl_set_support)
2811 {
2812 connection_struct *conn = fsp->conn;
2813 bool ret = False;
2814 SMB_ACL_T the_acl = sys_acl_init(talloc_tos());
2815 canon_ace *p_ace;
2816 int i;
2817 SMB_ACL_ENTRY_T mask_entry;
2818 bool got_mask_entry = False;
2819 SMB_ACL_PERMSET_T mask_permset;
2820 SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2821 bool needs_mask = False;
2822 mode_t mask_perms = 0;
2823
2824 /* Use the psbuf that was passed in. */
2825 if (psbuf != &fsp->fsp_name->st) {
2826 fsp->fsp_name->st = *psbuf;
2827 }
2828
2829 #if defined(POSIX_ACL_NEEDS_MASK)
2830 /* HP-UX always wants to have a mask (called "class" there). */
2831 needs_mask = True;
2832 #endif
2833
2834 if (the_acl == NULL) {
2835 DEBUG(0, ("sys_acl_init failed to allocate an ACL\n"));
2836 return false;
2837 }
2838
2839 if( DEBUGLVL( 10 )) {
2840 dbgtext("set_canon_ace_list: setting ACL:\n");
2841 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2842 print_canon_ace( p_ace, i);
2843 }
2844 }
2845
2846 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2847 SMB_ACL_ENTRY_T the_entry;
2848 SMB_ACL_PERMSET_T the_permset;
2849
2850 /*
2851 * ACLs only "need" an ACL_MASK entry if there are any named user or
2852 * named group entries. But if there is an ACL_MASK entry, it applies
2853 * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2854 * so that it doesn't deny (i.e., mask off) any permissions.
2855 */
2856
2857 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2858 needs_mask = True;
2859 mask_perms |= p_ace->perms;
2860 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2861 mask_perms |= p_ace->perms;
2862 }
2863
2864 /*
2865 * Get the entry for this ACE.
2866 */
2867
2868 if (sys_acl_create_entry(&the_acl, &the_entry) == -1) {
2869 DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2870 i, strerror(errno) ));
2871 goto fail;
2872 }
2873
2874 if (p_ace->type == SMB_ACL_MASK) {
2875 mask_entry = the_entry;
2876 got_mask_entry = True;
2877 }
2878
2879 /*
2880 * Ok - we now know the ACL calls should be working, don't
2881 * allow fallback to chmod.
2882 */
2883
2884 *pacl_set_support = True;
2885
2886 /*
2887 * Initialise the entry from the canon_ace.
2888 */
2889
2890 /*
2891 * First tell the entry what type of ACE this is.
2892 */
2893
2894 if (sys_acl_set_tag_type(the_entry, p_ace->type) == -1) {
2895 DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2896 i, strerror(errno) ));
2897 goto fail;
2898 }
2899
2900 /*
2901 * Only set the qualifier (user or group id) if the entry is a user
2902 * or group id ACE.
2903 */
2904
2905 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2906 if (sys_acl_set_qualifier(the_entry,(void *)&p_ace->unix_ug.id) == -1) {
2907 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2908 i, strerror(errno) ));
2909 goto fail;
2910 }
2911 }
2912
2913 /*
2914 * Convert the mode_t perms in the canon_ace to a POSIX permset.
2915 */
2916
2917 if (sys_acl_get_permset(the_entry, &the_permset) == -1) {
2918 DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2919 i, strerror(errno) ));
2920 goto fail;
2921 }
2922
2923 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2924 DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2925 (unsigned int)p_ace->perms, i, strerror(errno) ));
2926 goto fail;
2927 }
2928
2929 /*
2930 * ..and apply them to the entry.
2931 */
2932
2933 if (sys_acl_set_permset(the_entry, the_permset) == -1) {
2934 DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2935 i, strerror(errno) ));
2936 goto fail;
2937 }
2938
2939 if( DEBUGLVL( 10 ))
2940 print_canon_ace( p_ace, i);
2941
2942 }
2943
2944 if (needs_mask && !got_mask_entry) {
2945 if (sys_acl_create_entry(&the_acl, &mask_entry) == -1) {
2946 DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2947 goto fail;
2948 }
2949
2950 if (sys_acl_set_tag_type(mask_entry, SMB_ACL_MASK) == -1) {
2951 DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2952 goto fail;
2953 }
2954
2955 if (sys_acl_get_permset(mask_entry, &mask_permset) == -1) {
2956 DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2957 goto fail;
2958 }
2959
2960 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2961 DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2962 goto fail;
2963 }
2964
2965 if (sys_acl_set_permset(mask_entry, mask_permset) == -1) {
2966 DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2967 goto fail;
2968 }
2969 }
2970
2971 /*
2972 * Finally apply it to the file or directory.
2973 */
2974
2975 if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2976 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name->base_name,
2977 the_acl_type, the_acl) == -1) {
2978 /*
2979 * Some systems allow all the above calls and only fail with no ACL support
2980 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2981 */
2982 if (no_acl_syscall_error(errno)) {
2983 *pacl_set_support = False;
2984 }
2985
2986 if (acl_group_override(conn, fsp->fsp_name)) {
2987 int sret;
2988
2989 DEBUG(5,("set_canon_ace_list: acl group "
2990 "control on and current user in file "
2991 "%s primary group.\n",
2992 fsp_str_dbg(fsp)));
2993
2994 become_root();
2995 sret = SMB_VFS_SYS_ACL_SET_FILE(conn,
2996 fsp->fsp_name->base_name, the_acl_type,
2997 the_acl);
2998 unbecome_root();
2999 if (sret == 0) {
3000 ret = True;
3001 }
3002 }
3003
3004 if (ret == False) {
3005 DEBUG(2,("set_canon_ace_list: "
3006 "sys_acl_set_file type %s failed for "
3007 "file %s (%s).\n",
3008 the_acl_type == SMB_ACL_TYPE_DEFAULT ?
3009 "directory default" : "file",
3010 fsp_str_dbg(fsp), strerror(errno)));
3011 goto fail;
3012 }
3013 }
3014 } else {
3015 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
3016 /*
3017 * Some systems allow all the above calls and only fail with no ACL support
3018 * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
3019 */
3020 if (no_acl_syscall_error(errno)) {
3021 *pacl_set_support = False;
3022 }
3023
3024 if (acl_group_override(conn, fsp->fsp_name)) {
3025 int sret;
3026
3027 DEBUG(5,("set_canon_ace_list: acl group "
3028 "control on and current user in file "
3029 "%s primary group.\n",
3030 fsp_str_dbg(fsp)));
3031
3032 become_root();
3033 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
3034 unbecome_root();
3035 if (sret == 0) {
3036 ret = True;
3037 }
3038 }
3039
3040 if (ret == False) {
3041 DEBUG(2,("set_canon_ace_list: "
3042 "sys_acl_set_file failed for file %s "
3043 "(%s).\n",
3044 fsp_str_dbg(fsp), strerror(errno)));
3045 goto fail;
3046 }
3047 }
3048 }
3049
3050 ret = True;
3051
3052 fail:
3053
3054 if (the_acl != NULL) {
3055 TALLOC_FREE(the_acl);
3056 }
3057
3058 return ret;
3059 }
3060
3061 /****************************************************************************
3062
3063 ****************************************************************************/
3064
3065 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
3066 {
3067 SMB_ACL_ENTRY_T entry;
3068
3069 if (!the_acl)
3070 return NULL;
3071 if (sys_acl_get_entry(the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
3072 TALLOC_FREE(the_acl);
3073 return NULL;
3074 }
3075 return the_acl;
3076 }
3077
3078 /****************************************************************************
3079 Convert a canon_ace to a generic 3 element permission - if possible.
3080 ****************************************************************************/
3081
3082 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
3083
3084 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
3085 {
3086 int snum = SNUM(fsp->conn);
3087 size_t ace_count = count_canon_ace_list(file_ace_list);
3088 canon_ace *ace_p;
3089 canon_ace *owner_ace = NULL;
3090 canon_ace *group_ace = NULL;
3091 canon_ace *other_ace = NULL;
3092 mode_t and_bits;
3093 mode_t or_bits;
3094
3095 if (ace_count != 3) {
3096 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE "
3097 "entries for file %s to convert to posix perms.\n",
3098 fsp_str_dbg(fsp)));
3099 return False;
3100 }
3101
3102 for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
3103 if (ace_p->owner_type == UID_ACE)
3104 owner_ace = ace_p;
3105 else if (ace_p->owner_type == GID_ACE)
3106 group_ace = ace_p;
3107 else if (ace_p->owner_type == WORLD_ACE)
3108 other_ace = ace_p;
3109 }
3110
3111 if (!owner_ace || !group_ace || !other_ace) {
3112 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get "
3113 "standard entries for file %s.\n", fsp_str_dbg(fsp)));
3114 return False;
3115 }
3116
3117 *posix_perms = (mode_t)0;
3118
3119 *posix_perms |= owner_ace->perms;
3120 *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
3121 *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
3122 *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
3123 *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
3124 *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
3125 *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
3126
3127 /* The owner must have at least read access. */
3128
3129 *posix_perms |= S_IRUSR;
3130 if (fsp->is_directory)
3131 *posix_perms |= (S_IWUSR|S_IXUSR);
3132
3133 /* If requested apply the masks. */
3134
3135 /* Get the initial bits to apply. */
3136
3137 if (fsp->is_directory) {
3138 and_bits = lp_dir_mask(snum);
3139 or_bits = lp_force_dir_mode(snum);
3140 } else {
3141 and_bits = lp_create_mask(snum);
3142 or_bits = lp_force_create_mode(snum);
3143 }
3144
3145 *posix_perms = (((*posix_perms) & and_bits)|or_bits);
3146
3147 DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o "
3148 "to perm=0%o for file %s.\n", (int)owner_ace->perms,
3149 (int)group_ace->perms, (int)other_ace->perms,
3150 (int)*posix_perms, fsp_str_dbg(fsp)));
3151
3152 return True;
3153 }
3154
3155 /****************************************************************************
3156 Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
3157 a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
3158 with CI|OI set so it is inherited and also applies to the directory.
3159 Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
3160 ****************************************************************************/
3161
3162 static size_t merge_default_aces( struct security_ace *nt_ace_list, size_t num_aces)
3163 {
3164 size_t i, j;
3165
3166 for (i = 0; i < num_aces; i++) {
3167 for (j = i+1; j < num_aces; j++) {
3168 uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3169 uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
3170 bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3171 bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
3172
3173 /* We know the lower number ACE's are file entries. */
3174 if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
3175 (nt_ace_list[i].size == nt_ace_list[j].size) &&
3176 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
3177 dom_sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
3178 (i_inh == j_inh) &&
3179 (i_flags_ni == 0) &&
3180 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
3181 SEC_ACE_FLAG_CONTAINER_INHERIT|
3182 SEC_ACE_FLAG_INHERIT_ONLY))) {
3183 /*
3184 * W2K wants to have access allowed zero access ACE's
3185 * at the end of the list. If the mask is zero, merge
3186 * the non-inherited ACE onto the inherited ACE.
3187 */
3188
3189 if (nt_ace_list[i].access_mask == 0) {
3190 nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3191 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3192 if (num_aces - i - 1 > 0)
3193 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
3194 sizeof(struct security_ace));
3195
3196 DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
3197 (unsigned int)i, (unsigned int)j ));
3198 } else {
3199 /*
3200 * These are identical except for the flags.
3201 * Merge the inherited ACE onto the non-inherited ACE.
3202 */
3203
3204 nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
3205 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
3206 if (num_aces - j - 1 > 0)
3207 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
3208 sizeof(struct security_ace));
3209
3210 DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
3211 (unsigned int)j, (unsigned int)i ));
3212 }
3213 num_aces--;
3214 break;
3215 }
3216 }
3217 }
3218
3219 return num_aces;
3220 }
3221
3222 /*
3223 * Add or Replace ACE entry.
3224 * In some cases we need to add a specific ACE for compatibility reasons.
3225 * When doing that we must make sure we are not actually creating a duplicate
3226 * entry. So we need to search whether an ACE entry already exist and eventually
3227 * replacce the access mask, or add a completely new entry if none was found.
3228 *
3229 * This function assumes the array has enough space to add a new entry without
3230 * any reallocation of memory.
3231 */
3232
3233 static void add_or_replace_ace(struct security_ace *nt_ace_list, size_t *num_aces,
3234 const struct dom_sid *sid, enum security_ace_type type,
3235 uint32_t mask, uint8_t flags)
3236 {
3237 int i;
3238
3239 /* first search for a duplicate */
3240 for (i = 0; i < *num_aces; i++) {
3241 if (dom_sid_equal(&nt_ace_list[i].trustee, sid) &&
3242 (nt_ace_list[i].flags == flags)) break;
3243 }
3244
3245 if (i < *num_aces) { /* found */
3246 nt_ace_list[i].type = type;
3247 nt_ace_list[i].access_mask = mask;
3248 DEBUG(10, ("Replacing ACE %d with SID %s and flags %02x\n",
3249 i, sid_string_dbg(sid), flags));
3250 return;
3251 }
3252
3253 /* not found, append it */
3254 init_sec_ace(&nt_ace_list[(*num_aces)++], sid, type, mask, flags);
3255 }
3256
3257
3258 /****************************************************************************
3259 Reply to query a security descriptor from an fsp. If it succeeds it allocates
3260 the space for the return elements and returns the size needed to return the
3261 security descriptor. This should be the only external function needed for
3262 the UNIX style get ACL.
3263 ****************************************************************************/
3264
3265 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
3266 const char *name,
3267 const SMB_STRUCT_STAT *sbuf,
3268 struct pai_val *pal,
3269 SMB_ACL_T posix_acl,
3270 SMB_ACL_T def_acl,
3271 uint32_t security_info,
3272 TALLOC_CTX *mem_ctx,
3273 struct security_descriptor **ppdesc)
3274 {
3275 struct dom_sid owner_sid;
3276 struct dom_sid group_sid;
3277 size_t sd_size = 0;
3278 struct security_acl *psa = NULL;
3279 size_t num_acls = 0;
3280 size_t num_def_acls = 0;
3281 size_t num_aces = 0;
3282 canon_ace *file_ace = NULL;
3283 canon_ace *dir_ace = NULL;
3284 struct security_ace *nt_ace_list = NULL;
3285 size_t num_profile_acls = 0;
3286 struct dom_sid orig_owner_sid;
3287 struct security_descriptor *psd = NULL;
3288 int i;
3289
3290 /*
3291 * Get the owner, group and world SIDs.
3292 */
3293
3294 create_file_sids(sbuf, &owner_sid, &group_sid);
3295
3296 if (lp_profile_acls(SNUM(conn))) {
3297 /* For WXP SP1 the owner must be administrators. */
3298 sid_copy(&orig_owner_sid, &owner_sid);
3299 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
3300 sid_copy(&group_sid, &global_sid_Builtin_Users);
3301 num_profile_acls = 3;
3302 }
3303
3304 if ((security_info & SECINFO_DACL) && !(security_info & SECINFO_PROTECTED_DACL)) {
3305
3306 /*
3307 * In the optimum case Creator Owner and Creator Group would be used for
3308 * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
3309 * would lead to usability problems under Windows: The Creator entries
3310 * are only available in browse lists of directories and not for files;
3311 * additionally the identity of the owning group couldn't be determined.
3312 * We therefore use those identities only for Default ACLs.
3313 */
3314
3315 /* Create the canon_ace lists. */
3316 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
3317 &owner_sid, &group_sid, pal,
3318 SMB_ACL_TYPE_ACCESS);
3319
3320 /* We must have *some* ACLS. */
3321
3322 if (count_canon_ace_list(file_ace) == 0) {
3323 DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
3324 goto done;
3325 }
3326
3327 if (S_ISDIR(sbuf->st_ex_mode) && def_acl) {
3328 dir_ace = canonicalise_acl(conn, name, def_acl,
3329 sbuf,
3330 &global_sid_Creator_Owner,
3331 &global_sid_Creator_Group,
3332 pal, SMB_ACL_TYPE_DEFAULT);
3333 }
3334
3335 /*
3336 * Create the NT ACE list from the canonical ace lists.
3337 */
3338
3339 {
3340 canon_ace *ace;
3341 enum security_ace_type nt_acl_type;
3342
3343 num_acls = count_canon_ace_list(file_ace);
3344 num_def_acls = count_canon_ace_list(dir_ace);
3345
3346 /* Allocate the ace list. */
3347 if ((nt_ace_list = talloc_array(talloc_tos(), struct security_ace,num_acls + num_profile_acls + num_def_acls)) == NULL) {
3348 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
3349 goto done;
3350 }
3351
3352 memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(struct security_ace) );
3353
3354 /*
3355 * Create the NT ACE list from the canonical ace lists.
3356 */
3357
3358 for (ace = file_ace; ace != NULL; ace = ace->next) {
3359 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3360 &nt_acl_type,
3361 ace->perms,
3362 S_ISDIR(sbuf->st_ex_mode));
3363 init_sec_ace(&nt_ace_list[num_aces++],
3364 &ace->trustee,
3365 nt_acl_type,
3366 acc,
3367 ace->ace_flags);
3368 }
3369
3370 /* The User must have access to a profile share - even
3371 * if we can't map the SID. */
3372 if (lp_profile_acls(SNUM(conn))) {
3373 add_or_replace_ace(nt_ace_list, &num_aces,
3374 &global_sid_Builtin_Users,
3375 SEC_ACE_TYPE_ACCESS_ALLOWED,
3376 FILE_GENERIC_ALL, 0);
3377 }
3378
3379 for (ace = dir_ace; ace != NULL; ace = ace->next) {
3380 uint32_t acc = map_canon_ace_perms(SNUM(conn),
3381 &nt_acl_type,
3382 ace->perms,
3383 S_ISDIR(sbuf->st_ex_mode));
3384 init_sec_ace(&nt_ace_list[num_aces++],
3385 &ace->trustee,
3386 nt_acl_type,
3387 acc,
3388 ace->ace_flags |
3389 SEC_ACE_FLAG_OBJECT_INHERIT|
3390 SEC_ACE_FLAG_CONTAINER_INHERIT|
3391 SEC_ACE_FLAG_INHERIT_ONLY);
3392 }
3393
3394 /* The User must have access to a profile share - even
3395 * if we can't map the SID. */
3396 if (lp_profile_acls(SNUM(conn))) {
3397 add_or_replace_ace(nt_ace_list, &num_aces,
3398 &global_sid_Builtin_Users,
3399 SEC_ACE_TYPE_ACCESS_ALLOWED,
3400 FILE_GENERIC_ALL,
3401 SEC_ACE_FLAG_OBJECT_INHERIT |
3402 SEC_ACE_FLAG_CONTAINER_INHERIT |
3403 SEC_ACE_FLAG_INHERIT_ONLY);
3404 }
3405
3406 /*
3407 * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3408 * Win2K needs this to get the inheritance correct when replacing ACLs
3409 * on a directory tree. Based on work by Jim @ IBM.
3410 */
3411
3412 num_aces = merge_default_aces(nt_ace_list, num_aces);
3413
3414 if (lp_profile_acls(SNUM(conn))) {
3415 for (i = 0; i < num_aces; i++) {
3416 if (dom_sid_equal(&nt_ace_list[i].trustee, &owner_sid)) {
3417 add_or_replace_ace(nt_ace_list, &num_aces,
3418 &orig_owner_sid,
3419 nt_ace_list[i].type,
3420 nt_ace_list[i].access_mask,
3421 nt_ace_list[i].flags);
3422 break;
3423 }
3424 }
3425 }
3426 }
3427
3428 if (num_aces) {
3429 if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3430 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3431 goto done;
3432 }
3433 }
3434 } /* security_info & SECINFO_DACL */
3435
3436 psd = make_standard_sec_desc(mem_ctx,
3437 (security_info & SECINFO_OWNER) ? &owner_sid : NULL,
3438 (security_info & SECINFO_GROUP) ? &group_sid : NULL,
3439 psa,
3440 &sd_size);
3441
3442 if(!psd) {
3443 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3444 sd_size = 0;
3445 goto done;
3446 }
3447
3448 /*
3449 * Windows 2000: The DACL_PROTECTED flag in the security
3450 * descriptor marks the ACL as non-inheriting, i.e., no
3451 * ACEs from higher level directories propagate to this
3452 * ACL. In the POSIX ACL model permissions are only
3453 * inherited at file create time, so ACLs never contain
3454 * any ACEs that are inherited dynamically. The DACL_PROTECTED
3455 * flag doesn't seem to bother Windows NT.
3456 * Always set this if map acl inherit is turned off.
3457 */
3458 if (pal == NULL || !lp_map_acl_inherit(SNUM(conn))) {
3459 psd->type |= SEC_DESC_DACL_PROTECTED;
3460 } else {
3461 psd->type |= pal->sd_type;
3462 }
3463
3464 if (psd->dacl) {
3465 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3466 }
3467
3468 *ppdesc = psd;
3469
3470 done:
3471
3472 if (posix_acl) {
3473 TALLOC_FREE(posix_acl);
3474 }
3475 if (def_acl) {
3476 TALLOC_FREE(def_acl);
3477 }
3478 free_canon_ace_list(file_ace);
3479 free_canon_ace_list(dir_ace);
3480 free_inherited_info(pal);
3481 TALLOC_FREE(nt_ace_list);
3482
3483 return NT_STATUS_OK;
3484 }
3485
3486 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3487 TALLOC_CTX *mem_ctx,
3488 struct security_descriptor **ppdesc)
3489 {
3490 SMB_STRUCT_STAT sbuf;
3491 SMB_ACL_T posix_acl = NULL;
3492 struct pai_val *pal;
3493 TALLOC_CTX *frame = talloc_stackframe();
3494 NTSTATUS status;
3495
3496 *ppdesc = NULL;
3497
3498 DEBUG(10,("posix_fget_nt_acl: called for file %s\n",
3499 fsp_str_dbg(fsp)));
3500
3501 /* can it happen that fsp_name == NULL ? */
3502 if (fsp->is_directory || fsp->fh->fd == -1) {
3503 status = posix_get_nt_acl(fsp->conn, fsp->fsp_name->base_name,
3504 security_info, mem_ctx, ppdesc);
3505 TALLOC_FREE(frame);
3506 return status;
3507 }
3508
3509 /* Get the stat struct for the owner info. */
3510 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3511 TALLOC_FREE(frame);
3512 return map_nt_error_from_unix(errno);
3513 }
3514
3515 /* Get the ACL from the fd. */
3516 posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, frame);
3517
3518 pal = fload_inherited_info(fsp);
3519
3520 status = posix_get_nt_acl_common(fsp->conn, fsp->fsp_name->base_name,
3521 &sbuf, pal, posix_acl, NULL,
3522 security_info, mem_ctx, ppdesc);
3523 TALLOC_FREE(frame);
3524 return status;
3525 }
3526
3527 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3528 uint32_t security_info,
3529 TALLOC_CTX *mem_ctx,
3530 struct security_descriptor **ppdesc)
3531 {
3532 SMB_ACL_T posix_acl = NULL;
3533 SMB_ACL_T def_acl = NULL;
3534 struct pai_val *pal;
3535 struct smb_filename smb_fname;
3536 int ret;
3537 TALLOC_CTX *frame = talloc_stackframe();
3538 NTSTATUS status;
3539
3540 *ppdesc = NULL;
3541
3542 DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3543
3544 ZERO_STRUCT(smb_fname);
3545 smb_fname.base_name = discard_const_p(char, name);
3546
3547 /* Get the stat struct for the owner info. */
3548 if (lp_posix_pathnames()) {
3549 ret = SMB_VFS_LSTAT(conn, &smb_fname);
3550 } else {
3551 ret = SMB_VFS_STAT(conn, &smb_fname);
3552 }
3553
3554 if (ret == -1) {
3555 TALLOC_FREE(frame);
3556 return map_nt_error_from_unix(errno);
3557 }
3558
3559 /* Get the ACL from the path. */
3560 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name,
3561 SMB_ACL_TYPE_ACCESS, frame);
3562
3563 /* If it's a directory get the default POSIX ACL. */
3564 if(S_ISDIR(smb_fname.st.st_ex_mode)) {
3565 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name,
3566 SMB_ACL_TYPE_DEFAULT, frame);
3567 def_acl = free_empty_sys_acl(conn, def_acl);
3568 }
3569
3570 pal = load_inherited_info(conn, name);
3571
3572 status = posix_get_nt_acl_common(conn, name, &smb_fname.st, pal,
3573 posix_acl, def_acl, security_info,
3574 mem_ctx,
3575 ppdesc);
3576 TALLOC_FREE(frame);
3577 return status;
3578 }
3579
3580 /****************************************************************************
3581 Try to chown a file. We will be able to chown it under the following conditions.
3582
3583 1) If we have root privileges, then it will just work.
3584 2) If we have SeRestorePrivilege we can change the user + group to any other user.
3585 3) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3586 4) If we have write permission to the file and dos_filemodes is set
3587 then allow chown to the currently authenticated user.
3588 ****************************************************************************/
3589
3590 NTSTATUS try_chown(files_struct *fsp, uid_t uid, gid_t gid)
3591 {
3592 NTSTATUS status;
3593
3594 if(!CAN_WRITE(fsp->conn)) {
3595 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3596 }
3597
3598 /* Case (1). */
3599 status = vfs_chown_fsp(fsp, uid, gid);
3600 if (NT_STATUS_IS_OK(status)) {
3601 return status;
3602 }
3603
3604 /* Case (2) / (3) */
3605 if (lp_enable_privileges()) {
3606 bool has_take_ownership_priv = security_token_has_privilege(
3607 get_current_nttok(fsp->conn),
3608 SEC_PRIV_TAKE_OWNERSHIP);
3609 bool has_restore_priv = security_token_has_privilege(
3610 get_current_nttok(fsp->conn),
3611 SEC_PRIV_RESTORE);
3612
3613 if (has_restore_priv) {
3614 ; /* Case (2) */
3615 } else if (has_take_ownership_priv) {
3616 /* Case (3) */
3617 if (uid == get_current_uid(fsp->conn)) {
3618 gid = (gid_t)-1;
3619 } else {
3620 has_take_ownership_priv = false;
3621 }
3622 }
3623
3624 if (has_take_ownership_priv || has_restore_priv) {
3625 become_root();
3626 status = vfs_chown_fsp(fsp, uid, gid);
3627 unbecome_root();
3628 return status;
3629 }
3630 }
3631
3632 /* Case (4). */
3633 if (!lp_dos_filemode(SNUM(fsp->conn))) {
3634 return NT_STATUS_ACCESS_DENIED;
3635 }
3636
3637 /* only allow chown to the current user. This is more secure,
3638 and also copes with the case where the SID in a take ownership ACL is
3639 a local SID on the users workstation
3640 */
3641 if (uid != get_current_uid(fsp->conn)) {
3642 return NT_STATUS_ACCESS_DENIED;
3643 }
3644
3645 become_root();
3646 /* Keep the current file gid the same. */
3647 status = vfs_chown_fsp(fsp, uid, (gid_t)-1);
3648 unbecome_root();
3649
3650 return status;
3651 }
3652
3653 #if 0
3654 /* Disable this - prevents ACL inheritance from the ACL editor. JRA. */
3655
3656 /****************************************************************************
3657 Take care of parent ACL inheritance.
3658 ****************************************************************************/
3659
3660 NTSTATUS append_parent_acl(files_struct *fsp,
3661 const struct security_descriptor *pcsd,
3662 struct security_descriptor **pp_new_sd)
3663 {
3664 struct smb_filename *smb_dname = NULL;
3665 struct security_descriptor *parent_sd = NULL;
3666 files_struct *parent_fsp = NULL;
3667 TALLOC_CTX *mem_ctx = talloc_tos();
3668 char *parent_name = NULL;
3669 struct security_ace *new_ace = NULL;
3670 unsigned int num_aces = pcsd->dacl->num_aces;
3671 NTSTATUS status;
3672 int info;
3673 unsigned int i, j;
3674 struct security_descriptor *psd = dup_sec_desc(talloc_tos(), pcsd);
3675 bool is_dacl_protected = (pcsd->type & SEC_DESC_DACL_PROTECTED);
3676
3677 if (psd == NULL) {
3678 return NT_STATUS_NO_MEMORY;
3679 }
3680
3681 if (!parent_dirname(mem_ctx, fsp->fsp_name->base_name, &parent_name,
3682 NULL)) {
3683 return NT_STATUS_NO_MEMORY;
3684 }
3685
3686 status = create_synthetic_smb_fname(mem_ctx, parent_name, NULL, NULL,
3687 &smb_dname);
3688 if (!NT_STATUS_IS_OK(status)) {
3689 goto fail;
3690 }
3691
3692 status = SMB_VFS_CREATE_FILE(
3693 fsp->conn, /* conn */
3694 NULL, /* req */
3695 0, /* root_dir_fid */
3696 smb_dname, /* fname */
3697 FILE_READ_ATTRIBUTES, /* access_mask */
3698 FILE_SHARE_NONE, /* share_access */
3699 FILE_OPEN, /* create_disposition*/
3700 FILE_DIRECTORY_FILE, /* create_options */
3701 0, /* file_attributes */
3702 INTERNAL_OPEN_ONLY, /* oplock_request */
3703 0, /* allocation_size */
3704 NULL, /* sd */
3705 NULL, /* ea_list */
3706 &parent_fsp, /* result */
3707 &info); /* pinfo */
3708
3709 if (!NT_STATUS_IS_OK(status)) {
3710 TALLOC_FREE(smb_dname);
3711 return status;
3712 }
3713
3714 status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, smb_dname->base_name,
3715 SECINFO_DACL, &parent_sd );
3716
3717 close_file(NULL, parent_fsp, NORMAL_CLOSE);
3718 TALLOC_FREE(smb_dname);
3719
3720 if (!NT_STATUS_IS_OK(status)) {
3721 return status;
3722 }
3723
3724 /*
3725 * Make room for potentially all the ACLs from
3726 * the parent. We used to add the ugw triple here,
3727 * as we knew we were dealing with POSIX ACLs.
3728 * We no longer need to do so as we can guarentee
3729 * that a default ACL from the parent directory will
3730 * be well formed for POSIX ACLs if it came from a
3731 * POSIX ACL source, and if we're not writing to a
3732 * POSIX ACL sink then we don't care if it's not well
3733 * formed. JRA.
3734 */
3735
3736 num_aces += parent_sd->dacl->num_aces;
3737
3738 if((new_ace = talloc_zero_array(mem_ctx, struct security_ace,
3739 num_aces)) == NULL) {
3740 return NT_STATUS_NO_MEMORY;
3741 }
3742
3743 /* Start by copying in all the given ACE entries. */
3744 for (i = 0; i < psd->dacl->num_aces; i++) {
3745 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3746 }
3747
3748 /*
3749 * Note that we're ignoring "inherit permissions" here
3750 * as that really only applies to newly created files. JRA.
3751 */
3752
3753 /* Finally append any inherited ACEs. */
3754 for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3755 struct security_ace *se = &parent_sd->dacl->aces[j];
3756
3757 if (fsp->is_directory) {
3758 if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3759 /* Doesn't apply to a directory - ignore. */
3760 DEBUG(10,("append_parent_acl: directory %s "
3761 "ignoring non container "
3762 "inherit flags %u on ACE with sid %s "
3763 "from parent %s\n",
3764 fsp_str_dbg(fsp),
3765 (unsigned int)se->flags,
3766 sid_string_dbg(&se->trustee),
3767 parent_name));
3768 continue;
3769 }
3770 } else {
3771 if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3772 /* Doesn't apply to a file - ignore. */
3773 DEBUG(10,("append_parent_acl: file %s "
3774 "ignoring non object "
3775 "inherit flags %u on ACE with sid %s "
3776 "from parent %s\n",
3777 fsp_str_dbg(fsp),
3778 (unsigned int)se->flags,
3779 sid_string_dbg(&se->trustee),
3780 parent_name));
3781 continue;
3782 }
3783 }
3784
3785 if (is_dacl_protected) {
3786 /* If the DACL is protected it means we must
3787 * not overwrite an existing ACE entry with the
3788 * same SID. This is order N^2. Ouch :-(. JRA. */
3789 unsigned int k;
3790 for (k = 0; k < psd->dacl->num_aces; k++) {
3791 if (dom_sid_equal(&psd->dacl->aces[k].trustee,
3792 &se->trustee)) {
3793 break;
3794 }
3795 }
3796 if (k < psd->dacl->num_aces) {
3797 /* SID matched. Ignore. */
3798 DEBUG(10,("append_parent_acl: path %s "
3799 "ignoring ACE with protected sid %s "
3800 "from parent %s\n",
3801 fsp_str_dbg(fsp),
3802 sid_string_dbg(&se->trustee),
3803 parent_name));
3804 continue;
3805 }
3806 }
3807
3808 sec_ace_copy(&new_ace[i], se);
3809 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3810 new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3811 }
3812 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3813
3814 if (fsp->is_directory) {
3815 /*
3816 * Strip off any inherit only. It's applied.
3817 */
3818 new_ace[i].flags &= ~(SEC_ACE_FLAG_INHERIT_ONLY);
3819 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3820 /* No further inheritance. */
3821 new_ace[i].flags &=
3822 ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3823 SEC_ACE_FLAG_OBJECT_INHERIT);
3824 }
3825 } else {
3826 /*
3827 * Strip off any container or inherit
3828 * flags, they can't apply to objects.
3829 */
3830 new_ace[i].flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|
3831 SEC_ACE_FLAG_INHERIT_ONLY|
3832 SEC_ACE_FLAG_NO_PROPAGATE_INHERIT);
3833 }
3834 i++;
3835
3836 DEBUG(10,("append_parent_acl: path %s "
3837 "inheriting ACE with sid %s "
3838 "from parent %s\n",
3839 fsp_str_dbg(fsp),
3840 sid_string_dbg(&se->trustee),
3841 parent_name));
3842 }
3843
3844 psd->dacl->aces = new_ace;
3845 psd->dacl->num_aces = i;
3846 psd->type &= ~(SEC_DESC_DACL_AUTO_INHERITED|
3847 SEC_DESC_DACL_AUTO_INHERIT_REQ);
3848
3849 *pp_new_sd = psd;
3850 return status;
3851 }
3852 #endif
3853
3854 /****************************************************************************
3855 Reply to set a security descriptor on an fsp. security_info_sent is the
3856 description of the following NT ACL.
3857 This should be the only external function needed for the UNIX style set ACL.
3858 We make a copy of psd_orig as internal functions modify the elements inside
3859 it, even though it's a const pointer.
3860 ****************************************************************************/
3861
3862 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, const struct security_descriptor *psd_orig)
3863 {
3864 connection_struct *conn = fsp->conn;
3865 uid_t user = (uid_t)-1;
3866 gid_t grp = (gid_t)-1;
3867 struct dom_sid file_owner_sid;
3868 struct dom_sid file_grp_sid;
3869 canon_ace *file_ace_list = NULL;
3870 canon_ace *dir_ace_list = NULL;
3871 bool acl_perms = False;
3872 mode_t orig_mode = (mode_t)0;
3873 NTSTATUS status;
3874 bool set_acl_as_root = false;
3875 bool acl_set_support = false;
3876 bool ret = false;
3877 struct security_descriptor *psd = NULL;
3878
3879 DEBUG(10,("set_nt_acl: called for file %s\n",
3880 fsp_str_dbg(fsp)));
3881
3882 if (!CAN_WRITE(conn)) {
3883 DEBUG(10,("set acl rejected on read-only share\n"));
3884 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3885 }
3886
3887 if (!psd_orig) {
3888 return NT_STATUS_INVALID_PARAMETER;
3889 }
3890
3891 psd = dup_sec_desc(talloc_tos(), psd_orig);
3892 if (!psd) {
3893 return NT_STATUS_NO_MEMORY;
3894 }
3895
3896 /*
3897 * Get the current state of the file.
3898 */
3899
3900 status = vfs_stat_fsp(fsp);
3901 if (!NT_STATUS_IS_OK(status)) {
3902 return status;
3903 }
3904
3905 /* Save the original element we check against. */
3906 orig_mode = fsp->fsp_name->st.st_ex_mode;
3907
3908 /*
3909 * Unpack the user/group/world id's.
3910 */
3911
3912 /* POSIX can't cope with missing owner/group. */
3913 if ((security_info_sent & SECINFO_OWNER) && (psd->owner_sid == NULL)) {
3914 security_info_sent &= ~SECINFO_OWNER;
3915 }
3916 if ((security_info_sent & SECINFO_GROUP) && (psd->group_sid == NULL)) {
3917 security_info_sent &= ~SECINFO_GROUP;
3918 }
3919
3920 status = unpack_nt_owners( conn, &user, &grp, security_info_sent, psd);
3921 if (!NT_STATUS_IS_OK(status)) {
3922 return status;
3923 }
3924
3925 /*
3926 * Do we need to chown ? If so this must be done first as the incoming
3927 * CREATOR_OWNER acl will be relative to the *new* owner, not the old.
3928 * Noticed by Simo.
3929 */
3930
3931 if (((user != (uid_t)-1) && (fsp->fsp_name->st.st_ex_uid != user)) ||
3932 (( grp != (gid_t)-1) && (fsp->fsp_name->st.st_ex_gid != grp))) {
3933
3934 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3935 fsp_str_dbg(fsp), (unsigned int)user,
3936 (unsigned int)grp));
3937
3938 status = try_chown(fsp, user, grp);
3939 if(!NT_STATUS_IS_OK(status)) {
3940 DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error "
3941 "= %s.\n", fsp_str_dbg(fsp),
3942 (unsigned int)user,
3943 (unsigned int)grp,
3944 nt_errstr(status)));
3945 return status;
3946 }
3947
3948 /*
3949 * Recheck the current state of the file, which may have changed.
3950 * (suid/sgid bits, for instance)
3951 */
3952
3953 status = vfs_stat_fsp(fsp);
3954 if (!NT_STATUS_IS_OK(status)) {
3955 return status;
3956 }
3957
3958 /* Save the original element we check against. */
3959 orig_mode = fsp->fsp_name->st.st_ex_mode;
3960
3961 /* If we successfully chowned, we know we must
3962 * be able to set the acl, so do it as root.
3963 */
3964 set_acl_as_root = true;
3965 }
3966
3967 create_file_sids(&fsp->fsp_name->st, &file_owner_sid, &file_grp_sid);
3968
3969 if((security_info_sent & SECINFO_DACL) &&
3970 (psd->type & SEC_DESC_DACL_PRESENT) &&
3971 (psd->dacl == NULL)) {
3972 struct security_ace ace[3];
3973
3974 /* We can't have NULL DACL in POSIX.
3975 Use owner/group/Everyone -> full access. */
3976
3977 init_sec_ace(&ace[0],
3978 &file_owner_sid,
3979 SEC_ACE_TYPE_ACCESS_ALLOWED,
3980 GENERIC_ALL_ACCESS,
3981 0);
3982 init_sec_ace(&ace[1],
3983 &file_grp_sid,
3984 SEC_ACE_TYPE_ACCESS_ALLOWED,
3985 GENERIC_ALL_ACCESS,
3986 0);
3987 init_sec_ace(&ace[2],
3988 &global_sid_World,
3989 SEC_ACE_TYPE_ACCESS_ALLOWED,
3990 GENERIC_ALL_ACCESS,
3991 0);
3992 psd->dacl = make_sec_acl(talloc_tos(),
3993 NT4_ACL_REVISION,
3994 3,
3995 ace);
3996 if (psd->dacl == NULL) {
3997 return NT_STATUS_NO_MEMORY;
3998 }
3999 security_acl_map_generic(psd->dacl, &file_generic_mapping);
4000 }
4001
4002 acl_perms = unpack_canon_ace(fsp, &fsp->fsp_name->st, &file_owner_sid,
4003 &file_grp_sid, &file_ace_list,
4004 &dir_ace_list, security_info_sent, psd);
4005
4006 /* Ignore W2K traverse DACL set. */
4007 if (!file_ace_list && !dir_ace_list) {
4008 return NT_STATUS_OK;
4009 }
4010
4011 if (!acl_perms) {
4012 DEBUG(3,("set_nt_acl: cannot set permissions\n"));
4013 free_canon_ace_list(file_ace_list);
4014 free_canon_ace_list(dir_ace_list);
4015 return NT_STATUS_ACCESS_DENIED;
4016 }
4017
4018 /*
4019 * Only change security if we got a DACL.
4020 */
4021
4022 if(!(security_info_sent & SECINFO_DACL) || (psd->dacl == NULL)) {
4023 free_canon_ace_list(file_ace_list);
4024 free_canon_ace_list(dir_ace_list);
4025 return NT_STATUS_OK;
4026 }
4027
4028 /*
4029 * Try using the POSIX ACL set first. Fall back to chmod if
4030 * we have no ACL support on this filesystem.
4031 */
4032
4033 if (acl_perms && file_ace_list) {
4034 if (set_acl_as_root) {
4035 become_root();
4036 }
4037 ret = set_canon_ace_list(fsp, file_ace_list, false,
4038 &fsp->fsp_name->st, &acl_set_support);
4039 if (set_acl_as_root) {
4040 unbecome_root();
4041 }
4042 if (acl_set_support && ret == false) {
4043 DEBUG(3,("set_nt_acl: failed to set file acl on file "
4044 "%s (%s).\n", fsp_str_dbg(fsp),
4045 strerror(errno)));
4046 free_canon_ace_list(file_ace_list);
4047 free_canon_ace_list(dir_ace_list);
4048 return map_nt_error_from_unix(errno);
4049 }
4050 }
4051
4052 if (acl_perms && acl_set_support && fsp->is_directory) {
4053 if (dir_ace_list) {
4054 if (set_acl_as_root) {
4055 become_root();
4056 }
4057 ret = set_canon_ace_list(fsp, dir_ace_list, true,
4058 &fsp->fsp_name->st,
4059 &acl_set_support);
4060 if (set_acl_as_root) {
4061 unbecome_root();
4062 }
4063 if (ret == false) {
4064 DEBUG(3,("set_nt_acl: failed to set default "
4065 "acl on directory %s (%s).\n",
4066 fsp_str_dbg(fsp), strerror(errno)));
4067 free_canon_ace_list(file_ace_list);
4068 free_canon_ace_list(dir_ace_list);
4069 return map_nt_error_from_unix(errno);
4070 }
4071 } else {
4072 int sret = -1;
4073
4074 /*
4075 * No default ACL - delete one if it exists.
4076 */
4077
4078 if (set_acl_as_root) {
4079 become_root();
4080 }
4081 sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn,
4082 fsp->fsp_name->base_name);
4083 if (set_acl_as_root) {
4084 unbecome_root();
4085 }
4086 if (sret == -1) {
4087 if (acl_group_override(conn, fsp->fsp_name)) {
4088 DEBUG(5,("set_nt_acl: acl group "
4089 "control on and current user "
4090 "in file %s primary group. "
4091 "Override delete_def_acl\n",
4092 fsp_str_dbg(fsp)));
4093
4094 become_root();
4095 sret =
4096 SMB_VFS_SYS_ACL_DELETE_DEF_FILE(
4097 conn,
4098 fsp->fsp_name->base_name);
4099 unbecome_root();
4100 }
4101
4102 if (sret == -1) {
4103 DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", 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 }
4111
4112 if (acl_set_support) {
4113 if (set_acl_as_root) {
4114 become_root();
4115 }
4116 store_inheritance_attributes(fsp,
4117 file_ace_list,
4118 dir_ace_list,
4119 psd->type);
4120 if (set_acl_as_root) {
4121 unbecome_root();
4122 }
4123 }
4124
4125 /*
4126 * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
4127 */
4128
4129 if(!acl_set_support && acl_perms) {
4130 mode_t posix_perms;
4131
4132 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
4133 free_canon_ace_list(file_ace_list);
4134 free_canon_ace_list(dir_ace_list);
4135 DEBUG(3,("set_nt_acl: failed to convert file acl to "
4136 "posix permissions for file %s.\n",
4137 fsp_str_dbg(fsp)));
4138 return NT_STATUS_ACCESS_DENIED;
4139 }
4140
4141 if (orig_mode != posix_perms) {
4142 int sret = -1;
4143
4144 DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
4145 fsp_str_dbg(fsp), (unsigned int)posix_perms));
4146
4147 if (set_acl_as_root) {
4148 become_root();
4149 }
4150 sret = SMB_VFS_CHMOD(conn, fsp->fsp_name->base_name,
4151 posix_perms);
4152 if (set_acl_as_root) {
4153 unbecome_root();
4154 }
4155 if(sret == -1) {
4156 if (acl_group_override(conn, fsp->fsp_name)) {
4157 DEBUG(5,("set_nt_acl: acl group "
4158 "control on and current user "
4159 "in file %s primary group. "
4160 "Override chmod\n",
4161 fsp_str_dbg(fsp)));
4162
4163 become_root();
4164 sret = SMB_VFS_CHMOD(conn,
4165 fsp->fsp_name->base_name,
4166 posix_perms);
4167 unbecome_root();
4168 }
4169
4170 if (sret == -1) {
4171 DEBUG(3,("set_nt_acl: chmod %s, 0%o "
4172 "failed. Error = %s.\n",
4173 fsp_str_dbg(fsp),
4174 (unsigned int)posix_perms,
4175 strerror(errno)));
4176 free_canon_ace_list(file_ace_list);
4177 free_canon_ace_list(dir_ace_list);
4178 return map_nt_error_from_unix(errno);
4179 }
4180 }
4181 }
4182 }
4183
4184 free_canon_ace_list(file_ace_list);
4185 free_canon_ace_list(dir_ace_list);
4186
4187 /* Ensure the stat struct in the fsp is correct. */
4188 status = vfs_stat_fsp(fsp);
4189
4190 return NT_STATUS_OK;
4191 }
4192
4193 /****************************************************************************
4194 Get the actual group bits stored on a file with an ACL. Has no effect if
4195 the file has no ACL. Needed in dosmode code where the stat() will return
4196 the mask bits, not the real group bits, for a file with an ACL.
4197 ****************************************************************************/
4198
4199 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
4200 {
4201 int entry_id = SMB_ACL_FIRST_ENTRY;
4202 SMB_ACL_ENTRY_T entry;
4203 SMB_ACL_T posix_acl;
4204 int result = -1;
4205
4206 posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname,
4207 SMB_ACL_TYPE_ACCESS, talloc_tos());
4208 if (posix_acl == (SMB_ACL_T)NULL)
4209 return -1;
4210
4211 while (sys_acl_get_entry(posix_acl, entry_id, &entry) == 1) {
4212 SMB_ACL_TAG_T tagtype;
4213 SMB_ACL_PERMSET_T permset;
4214
4215 entry_id = SMB_ACL_NEXT_ENTRY;
4216
4217 if (sys_acl_get_tag_type(entry, &tagtype) ==-1)
4218 break;
4219
4220 if (tagtype == SMB_ACL_GROUP_OBJ) {
4221 if (sys_acl_get_permset(entry, &permset) == -1) {
4222 break;
4223 } else {
4224 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
4225 *mode |= (sys_acl_get_perm(permset, SMB_ACL_READ) ? S_IRGRP : 0);
4226 *mode |= (sys_acl_get_perm(permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
4227 *mode |= (sys_acl_get_perm(permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
4228 result = 0;
4229 break;
4230 }
4231 }
4232 }
4233 TALLOC_FREE(posix_acl);
4234 return result;
4235 }
4236
4237 /****************************************************************************
4238 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4239 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4240 ****************************************************************************/
4241
4242 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
4243 {
4244 int entry_id = SMB_ACL_FIRST_ENTRY;
4245 SMB_ACL_ENTRY_T entry;
4246 int num_entries = 0;
4247
4248 while ( sys_acl_get_entry(posix_acl, entry_id, &entry) == 1) {
4249 SMB_ACL_TAG_T tagtype;
4250 SMB_ACL_PERMSET_T permset;
4251 mode_t perms;
4252
4253 entry_id = SMB_ACL_NEXT_ENTRY;
4254
4255 if (sys_acl_get_tag_type(entry, &tagtype) == -1)
4256 return -1;
4257
4258 if (sys_acl_get_permset(entry, &permset) == -1)
4259 return -1;
4260
4261 num_entries++;
4262
4263 switch(tagtype) {
4264 case SMB_ACL_USER_OBJ:
4265 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
4266 break;
4267 case SMB_ACL_GROUP_OBJ:
4268 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
4269 break;
4270 case SMB_ACL_MASK:
4271 /*
4272 * FIXME: The ACL_MASK entry permissions should really be set to
4273 * the union of the permissions of all ACL_USER,
4274 * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
4275 * acl_calc_mask() does, but Samba ACLs doesn't provide it.
4276 */
4277 perms = S_IRUSR|S_IWUSR|S_IXUSR;
4278 break;
4279 case SMB_ACL_OTHER:
4280 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
4281 break;
4282 default:
4283 continue;
4284 }
4285
4286 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
4287 return -1;
4288
4289 if (sys_acl_set_permset(entry, permset) == -1)
4290 return -1;
4291 }
4292
4293 /*
4294 * If this is a simple 3 element ACL or no elements then it's a standard
4295 * UNIX permission set. Just use chmod...
4296 */
4297
4298 if ((num_entries == 3) || (num_entries == 0))
4299 return -1;
4300
4301 return 0;
4302 }
4303
4304 /****************************************************************************
4305 Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
4306 GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
4307 resulting ACL on TO. Note that name is in UNIX character set.
4308 ****************************************************************************/
4309
4310 static int copy_access_posix_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
4311 {
4312 SMB_ACL_T posix_acl = NULL;
4313 int ret = -1;
4314
4315 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from,
4316 SMB_ACL_TYPE_ACCESS,
4317 talloc_tos())) == NULL)
4318 return -1;
4319
4320 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4321 goto done;
4322
4323 ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
4324
4325 done:
4326
4327 TALLOC_FREE(posix_acl);
4328 return ret;
4329 }
4330
4331 /****************************************************************************
4332 Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4333 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4334 Note that name is in UNIX character set.
4335 ****************************************************************************/
4336
4337 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
4338 {
4339 return copy_access_posix_acl(conn, name, name, mode);
4340 }
4341
4342 /****************************************************************************
4343 Check for an existing default POSIX ACL on a directory.
4344 ****************************************************************************/
4345
4346 static bool directory_has_default_posix_acl(connection_struct *conn, const char *fname)
4347 {
4348 SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname,
4349 SMB_ACL_TYPE_DEFAULT,
4350 talloc_tos());
4351 bool has_acl = False;
4352 SMB_ACL_ENTRY_T entry;
4353
4354 if (def_acl != NULL && (sys_acl_get_entry(def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
4355 has_acl = True;
4356 }
4357
4358 if (def_acl) {
4359 TALLOC_FREE(def_acl);
4360 }
4361 return has_acl;
4362 }
4363
4364 /****************************************************************************
4365 If the parent directory has no default ACL but it does have an Access ACL,
4366 inherit this Access ACL to file name.
4367 ****************************************************************************/
4368
4369 int inherit_access_posix_acl(connection_struct *conn, const char *inherit_from_dir,
4370 const char *name, mode_t mode)
4371 {
4372 if (directory_has_default_posix_acl(conn, inherit_from_dir))
4373 return 0;
4374
4375 return copy_access_posix_acl(conn, inherit_from_dir, name, mode);
4376 }
4377
4378 /****************************************************************************
4379 Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
4380 and set the mask to rwx. Needed to preserve complex ACLs set by NT.
4381 ****************************************************************************/
4382
4383 int fchmod_acl(files_struct *fsp, mode_t mode)
4384 {
4385 connection_struct *conn = fsp->conn;
4386 SMB_ACL_T posix_acl = NULL;
4387 int ret = -1;
4388
4389 if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, talloc_tos())) == NULL)
4390 return -1;
4391
4392 if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
4393 goto done;
4394
4395 ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
4396
4397 done:
4398
4399 TALLOC_FREE(posix_acl);
4400 return ret;
4401 }
4402
4403 /****************************************************************************
4404 Map from wire type to permset.
4405 ****************************************************************************/
4406
4407 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
4408 {
4409 if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
4410 return False;
4411 }
4412
4413 if (sys_acl_clear_perms(*p_permset) == -1) {
4414 return False;
4415 }
4416
4417 if (wire_perm & SMB_POSIX_ACL_READ) {
4418 if (sys_acl_add_perm(*p_permset, SMB_ACL_READ) == -1) {
4419 return False;
4420 }
4421 }
4422 if (wire_perm & SMB_POSIX_ACL_WRITE) {
4423 if (sys_acl_add_perm(*p_permset, SMB_ACL_WRITE) == -1) {
4424 return False;
4425 }
4426 }
4427 if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
4428 if (sys_acl_add_perm(*p_permset, SMB_ACL_EXECUTE) == -1) {
4429 return False;
4430 }
4431 }
4432 return True;
4433 }
4434
4435 /****************************************************************************
4436 Map from wire type to tagtype.
4437 ****************************************************************************/
4438
4439 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
4440 {
4441 switch (wire_tt) {
4442 case SMB_POSIX_ACL_USER_OBJ:
4443 *p_tt = SMB_ACL_USER_OBJ;
4444 break;
4445 case SMB_POSIX_ACL_USER:
4446 *p_tt = SMB_ACL_USER;
4447 break;
4448 case SMB_POSIX_ACL_GROUP_OBJ:
4449 *p_tt = SMB_ACL_GROUP_OBJ;
4450 break;
4451 case SMB_POSIX_ACL_GROUP:
4452 *p_tt = SMB_ACL_GROUP;
4453 break;
4454 case SMB_POSIX_ACL_MASK:
4455 *p_tt = SMB_ACL_MASK;
4456 break;
4457 case SMB_POSIX_ACL_OTHER:
4458 *p_tt = SMB_ACL_OTHER;
4459 break;
4460 default:
4461 return False;
4462 }
4463 return True;
4464 }
4465
4466 /****************************************************************************
4467 Create a new POSIX acl from wire permissions.
4468 FIXME ! How does the share mask/mode fit into this.... ?
4469 ****************************************************************************/
4470
4471 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn,
4472 uint16 num_acls,
4473 const char *pdata,
4474 TALLOC_CTX *mem_ctx)
4475 {
4476 unsigned int i;
4477 SMB_ACL_T the_acl = sys_acl_init(mem_ctx);
4478
4479 if (the_acl == NULL) {
4480 return NULL;
4481 }
4482
4483 for (i = 0; i < num_acls; i++) {
4484 SMB_ACL_ENTRY_T the_entry;
4485 SMB_ACL_PERMSET_T the_permset;
4486 SMB_ACL_TAG_T tag_type;
4487
4488 if (sys_acl_create_entry(&the_acl, &the_entry) == -1) {
4489 DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
4490 i, strerror(errno) ));
4491 goto fail;
4492 }
4493
4494 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
4495 DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
4496 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
4497 goto fail;
4498 }
4499
4500 if (sys_acl_set_tag_type(the_entry, tag_type) == -1) {
4501 DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
4502 i, strerror(errno) ));
4503 goto fail;
4504 }
4505
4506 /* Get the permset pointer from the new ACL entry. */
4507 if (sys_acl_get_permset(the_entry, &the_permset) == -1) {
4508 DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
4509 i, strerror(errno) ));
4510 goto fail;
4511 }
4512
4513 /* Map from wire to permissions. */
4514 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
4515 DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
4516 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
4517 goto fail;
4518 }
4519
4520 /* Now apply to the new ACL entry. */
4521 if (sys_acl_set_permset(the_entry, the_permset) == -1) {
4522 DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
4523 i, strerror(errno) ));
4524 goto fail;
4525 }
4526
4527 if (tag_type == SMB_ACL_USER) {
4528 uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4529 uid_t uid = (uid_t)uidval;
4530 if (sys_acl_set_qualifier(the_entry,(void *)&uid) == -1) {
4531 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
4532 (unsigned int)uid, i, strerror(errno) ));
4533 goto fail;
4534 }
4535 }
4536
4537 if (tag_type == SMB_ACL_GROUP) {
4538 uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
4539 gid_t gid = (uid_t)gidval;
4540 if (sys_acl_set_qualifier(the_entry,(void *)&gid) == -1) {
4541 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
4542 (unsigned int)gid, i, strerror(errno) ));
4543 goto fail;
4544 }
4545 }
4546 }
4547
4548 return the_acl;
4549
4550 fail:
4551
4552 if (the_acl != NULL) {
4553 TALLOC_FREE(the_acl);
4554 }
4555 return NULL;
4556 }
4557
4558 /****************************************************************************
4559 Calls from UNIX extensions - Default POSIX ACL set.
4560 If num_def_acls == 0 and not a directory just return. If it is a directory
4561 and num_def_acls == 0 then remove the default acl. Else set the default acl
4562 on the directory.
4563 ****************************************************************************/
4564
4565 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, const SMB_STRUCT_STAT *psbuf,
4566 uint16 num_def_acls, const char *pdata)
4567 {
4568 SMB_ACL_T def_acl = NULL;
4569
4570 if (!S_ISDIR(psbuf->st_ex_mode)) {
4571 if (num_def_acls) {
4572 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4573 errno = EISDIR;
4574 return False;
4575 } else {
4576 return True;
4577 }
4578 }
4579
4580 if (!num_def_acls) {
4581 /* Remove the default ACL. */
4582 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4583 DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4584 fname, strerror(errno) ));
4585 return False;
4586 }
4587 return True;
4588 }
4589
4590 if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls,
4591 pdata,
4592 talloc_tos())) == NULL) {
4593 return False;
4594 }
4595
4596 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4597 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4598 fname, strerror(errno) ));
4599 TALLOC_FREE(def_acl);
4600 return False;
4601 }
4602
4603 DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4604 TALLOC_FREE(def_acl);
4605 return True;
4606 }
4607
4608 /****************************************************************************
4609 Remove an ACL from a file. As we don't have acl_delete_entry() available
4610 we must read the current acl and copy all entries except MASK, USER and GROUP
4611 to a new acl, then set that. This (at least on Linux) causes any ACL to be
4612 removed.
4613 FIXME ! How does the share mask/mode fit into this.... ?
4614 ****************************************************************************/
4615
4616 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4617 {
4618 SMB_ACL_T file_acl = NULL;
4619 int entry_id = SMB_ACL_FIRST_ENTRY;
4620 SMB_ACL_ENTRY_T entry;
4621 bool ret = False;
4622 /* Create a new ACL with only 3 entries, u/g/w. */
4623 SMB_ACL_T new_file_acl = sys_acl_init(talloc_tos());
4624 SMB_ACL_ENTRY_T user_ent = NULL;
4625 SMB_ACL_ENTRY_T group_ent = NULL;
4626 SMB_ACL_ENTRY_T other_ent = NULL;
4627
4628 if (new_file_acl == NULL) {
4629 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4630 return False;
4631 }
4632
4633 /* Now create the u/g/w entries. */
4634 if (sys_acl_create_entry(&new_file_acl, &user_ent) == -1) {
4635 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4636 fname, strerror(errno) ));
4637 goto done;
4638 }
4639 if (sys_acl_set_tag_type(user_ent, SMB_ACL_USER_OBJ) == -1) {
4640 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4641 fname, strerror(errno) ));
4642 goto done;
4643 }
4644
4645 if (sys_acl_create_entry(&new_file_acl, &group_ent) == -1) {
4646 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4647 fname, strerror(errno) ));
4648 goto done;
4649 }
4650 if (sys_acl_set_tag_type(group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4651 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4652 fname, strerror(errno) ));
4653 goto done;
4654 }
4655
4656 if (sys_acl_create_entry(&new_file_acl, &other_ent) == -1) {
4657 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4658 fname, strerror(errno) ));
4659 goto done;
4660 }
4661 if (sys_acl_set_tag_type(other_ent, SMB_ACL_OTHER) == -1) {
4662 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4663 fname, strerror(errno) ));
4664 goto done;
4665 }
4666
4667 /* Get the current file ACL. */
4668 if (fsp && fsp->fh->fd != -1) {
4669 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp, talloc_tos());
4670 } else {
4671 file_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname,
4672 SMB_ACL_TYPE_ACCESS,
4673 talloc_tos());
4674 }
4675
4676 if (file_acl == NULL) {
4677 /* This is only returned if an error occurred. Even for a file with
4678 no acl a u/g/w acl should be returned. */
4679 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4680 fname, strerror(errno) ));
4681 goto done;
4682 }
4683
4684 while ( sys_acl_get_entry(file_acl, entry_id, &entry) == 1) {
4685 SMB_ACL_TAG_T tagtype;
4686 SMB_ACL_PERMSET_T permset;
4687
4688 entry_id = SMB_ACL_NEXT_ENTRY;
4689
4690 if (sys_acl_get_tag_type(entry, &tagtype) == -1) {
4691 DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4692 fname, strerror(errno) ));
4693 goto done;
4694 }
4695
4696 if (sys_acl_get_permset(entry, &permset) == -1) {
4697 DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4698 fname, strerror(errno) ));
4699 goto done;
4700 }
4701
4702 if (tagtype == SMB_ACL_USER_OBJ) {
4703 if (sys_acl_set_permset(user_ent, permset) == -1) {
4704 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4705 fname, strerror(errno) ));
4706 }
4707 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4708 if (sys_acl_set_permset(group_ent, permset) == -1) {
4709 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4710 fname, strerror(errno) ));
4711 }
4712 } else if (tagtype == SMB_ACL_OTHER) {
4713 if (sys_acl_set_permset(other_ent, permset) == -1) {
4714 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4715 fname, strerror(errno) ));
4716 }
4717 }
4718 }
4719
4720 /* Set the new empty file ACL. */
4721 if (fsp && fsp->fh->fd != -1) {
4722 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4723 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4724 fname, strerror(errno) ));
4725 goto done;
4726 }
4727 } else {
4728 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4729 DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4730 fname, strerror(errno) ));
4731 goto done;
4732 }
4733 }
4734
4735 ret = True;
4736
4737 done:
4738
4739 if (file_acl) {
4740 TALLOC_FREE(file_acl);
4741 }
4742 if (new_file_acl) {
4743 TALLOC_FREE(new_file_acl);
4744 }
4745 return ret;
4746 }
4747
4748 /****************************************************************************
4749 Calls from UNIX extensions - POSIX ACL set.
4750 If num_def_acls == 0 then read/modify/write acl after removing all entries
4751 except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4752 ****************************************************************************/
4753
4754 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4755 {
4756 SMB_ACL_T file_acl = NULL;
4757
4758 if (!num_acls) {
4759 /* Remove the ACL from the file. */
4760 return remove_posix_acl(conn, fsp, fname);
4761 }
4762
4763 if ((file_acl = create_posix_acl_from_wire(conn, num_acls,
4764 pdata,
4765 talloc_tos())) == NULL) {
4766 return False;
4767 }
4768
4769 if (fsp && fsp->fh->fd != -1) {
4770 /* The preferred way - use an open fd. */
4771 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4772 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4773 fname, strerror(errno) ));
4774 TALLOC_FREE(file_acl);
4775 return False;
4776 }
4777 } else {
4778 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4779 DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4780 fname, strerror(errno) ));
4781 TALLOC_FREE(file_acl);
4782 return False;
4783 }
4784 }
4785
4786 DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4787 TALLOC_FREE(file_acl);
4788 return True;
4789 }
4790
4791 /********************************************************************
4792 Pull the NT ACL from a file on disk or the OpenEventlog() access
4793 check. Caller is responsible for freeing the returned security
4794 descriptor via TALLOC_FREE(). This is designed for dealing with
4795 user space access checks in smbd outside of the VFS. For example,
4796 checking access rights in OpenEventlog().
4797
4798 Assume we are dealing with files (for now)
4799 ********************************************************************/
4800
4801 struct security_descriptor *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname, uint32 security_info_wanted)
4802 {
4803 struct security_descriptor *ret_sd;
4804 connection_struct *conn;
4805 files_struct finfo;
4806 struct fd_handle fh;
4807 NTSTATUS status;
4808 TALLOC_CTX *frame = talloc_stackframe();
4809
4810 conn = talloc_zero(frame, connection_struct);
4811 if (conn == NULL) {
4812 DEBUG(0, ("talloc failed\n"));
4813 return NULL;
4814 }
4815
4816 if (!(conn->params = talloc(conn, struct share_params))) {
4817 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4818 TALLOC_FREE(frame);
4819 return NULL;
4820 }
4821
4822 conn->params->service = -1;
4823
4824 set_conn_connectpath(conn, "/");
4825
4826 if (!smbd_vfs_init(conn)) {
4827 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4828 conn_free(conn);
4829 TALLOC_FREE(frame);
4830 return NULL;
4831 }
4832
4833 ZERO_STRUCT( finfo );
4834 ZERO_STRUCT( fh );
4835
4836 finfo.fnum = FNUM_FIELD_INVALID;
4837 finfo.conn = conn;
4838 finfo.fh = &fh;
4839 finfo.fh->fd = -1;
4840
4841 status = create_synthetic_smb_fname(frame, fname, NULL, NULL,
4842 &finfo.fsp_name);
4843 if (!NT_STATUS_IS_OK(status)) {
4844 conn_free(conn);
4845 TALLOC_FREE(frame);
4846 return NULL;
4847 }
4848
4849 if (!NT_STATUS_IS_OK(SMB_VFS_FGET_NT_ACL( &finfo,
4850 security_info_wanted,
4851 ctx, &ret_sd))) {
4852 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4853 TALLOC_FREE(finfo.fsp_name);
4854 conn_free(conn);
4855 TALLOC_FREE(frame);
4856 return NULL;
4857 }
4858
4859 TALLOC_FREE(finfo.fsp_name);
4860 conn_free(conn);
4861 TALLOC_FREE(frame);
4862
4863 return ret_sd;
4864 }
4865
4866 /* Stolen shamelessly from pvfs_default_acl() in source4 :-). */
4867
4868 NTSTATUS make_default_filesystem_acl(TALLOC_CTX *ctx,
4869 const char *name,
4870 SMB_STRUCT_STAT *psbuf,
4871 struct security_descriptor **ppdesc)
4872 {
4873 struct dom_sid owner_sid, group_sid;
4874 size_t size = 0;
4875 struct security_ace aces[4];
4876 uint32_t access_mask = 0;
4877 mode_t mode = psbuf->st_ex_mode;
4878 struct security_acl *new_dacl = NULL;
4879 int idx = 0;
4880
4881 DEBUG(10,("make_default_filesystem_acl: file %s mode = 0%o\n",
4882 name, (int)mode ));
4883
4884 uid_to_sid(&owner_sid, psbuf->st_ex_uid);
4885 gid_to_sid(&group_sid, psbuf->st_ex_gid);
4886
4887 /*
4888 We provide up to 4 ACEs
4889 - Owner
4890 - Group
4891 - Everyone
4892 - NT System
4893 */
4894
4895 if (mode & S_IRUSR) {
4896 if (mode & S_IWUSR) {
4897 access_mask |= SEC_RIGHTS_FILE_ALL;
4898 } else {
4899 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4900 }
4901 }
4902 if (mode & S_IWUSR) {
4903 access_mask |= SEC_RIGHTS_FILE_WRITE | SEC_STD_DELETE;
4904 }
4905
4906 init_sec_ace(&aces[idx],
4907 &owner_sid,
4908 SEC_ACE_TYPE_ACCESS_ALLOWED,
4909 access_mask,
4910 0);
4911 idx++;
4912
4913 access_mask = 0;
4914 if (mode & S_IRGRP) {
4915 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4916 }
4917 if (mode & S_IWGRP) {
4918 /* note that delete is not granted - this matches posix behaviour */
4919 access_mask |= SEC_RIGHTS_FILE_WRITE;
4920 }
4921 if (access_mask) {
4922 init_sec_ace(&aces[idx],
4923 &group_sid,
4924 SEC_ACE_TYPE_ACCESS_ALLOWED,
4925 access_mask,
4926 0);
4927 idx++;
4928 }
4929
4930 access_mask = 0;
4931 if (mode & S_IROTH) {
4932 access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
4933 }
4934 if (mode & S_IWOTH) {
4935 access_mask |= SEC_RIGHTS_FILE_WRITE;
4936 }
4937 if (access_mask) {
4938 init_sec_ace(&aces[idx],
4939 &global_sid_World,
4940 SEC_ACE_TYPE_ACCESS_ALLOWED,
4941 access_mask,
4942 0);
4943 idx++;
4944 }
4945
4946 init_sec_ace(&aces[idx],
4947 &global_sid_System,
4948 SEC_ACE_TYPE_ACCESS_ALLOWED,
4949 SEC_RIGHTS_FILE_ALL,
4950 0);
4951 idx++;
4952
4953 new_dacl = make_sec_acl(ctx,
4954 NT4_ACL_REVISION,
4955 idx,
4956 aces);
4957
4958 if (!new_dacl) {
4959 return NT_STATUS_NO_MEMORY;
4960 }
4961
4962 *ppdesc = make_sec_desc(ctx,
4963 SECURITY_DESCRIPTOR_REVISION_1,
4964 SEC_DESC_SELF_RELATIVE|SEC_DESC_DACL_PRESENT,
4965 &owner_sid,
4966 &group_sid,
4967 NULL,
4968 new_dacl,
4969 &size);
4970 if (!*ppdesc) {
4971 return NT_STATUS_NO_MEMORY;
4972 }
4973 return NT_STATUS_OK;
4974 }
Samba GIT mirror