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