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