Context Navigation

source: branches/samba-3.3.x/source/smbd/posix_acls.c

Visit:

Last change on this file was 370, checked in by Herwig Bauernfeind, 16 years ago
Update Samba 3.3 to 3.3.10 (source)
File size: 132.5 KB

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

Note: See TracBrowser for help on using the repository browser.

Download in other formats: