4 * Copyright (C) Jim McDonough, 2006
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 #include "nfs4_acls.h"
24 #define SMBACL4_PARAM_TYPE_NAME "nfs4"
26 #define SMB_ACE4_INT_MAGIC 0x76F8A967
27 typedef struct _SMB_ACE4_INT_T
34 #define SMB_ACL4_INT_MAGIC 0x29A3E792
35 typedef struct _SMB_ACL4_INT_T
39 SMB_ACE4_INT_T
*first
;
43 extern struct current_user current_user
;
44 extern int try_chown(connection_struct
*conn
, const char *fname
, uid_t uid
, gid_t gid
);
45 extern BOOL
unpack_nt_owners(int snum
, uid_t
*puser
, gid_t
*pgrp
,
46 uint32 security_info_sent
, SEC_DESC
*psd
);
48 static SMB_ACL4_INT_T
*get_validated_aclint(SMB4ACL_T
*acl
)
50 SMB_ACL4_INT_T
*aclint
= (SMB_ACL4_INT_T
*)acl
;
53 DEBUG(2, ("acl is NULL\n"));
57 if (aclint
->magic
!=SMB_ACL4_INT_MAGIC
)
59 DEBUG(2, ("aclint bad magic 0x%x\n", aclint
->magic
));
66 static SMB_ACE4_INT_T
*get_validated_aceint(SMB4ACE_T
*ace
)
68 SMB_ACE4_INT_T
*aceint
= (SMB_ACE4_INT_T
*)ace
;
71 DEBUG(2, ("ace is NULL\n"));
75 if (aceint
->magic
!=SMB_ACE4_INT_MAGIC
)
77 DEBUG(2, ("aceint bad magic 0x%x\n", aceint
->magic
));
84 SMB4ACL_T
*smb_create_smb4acl(void)
86 TALLOC_CTX
*mem_ctx
= main_loop_talloc_get();
87 SMB_ACL4_INT_T
*acl
= (SMB_ACL4_INT_T
*)talloc_size(mem_ctx
, sizeof(SMB_ACL4_INT_T
));
90 DEBUG(0, ("talloc_size failed\n"));
94 memset(acl
, 0, sizeof(SMB_ACL4_INT_T
));
95 acl
->magic
= SMB_ACL4_INT_MAGIC
;
96 /* acl->first, last = NULL not needed */
97 return (SMB4ACL_T
*)acl
;
100 SMB4ACE_T
*smb_add_ace4(SMB4ACL_T
*acl
, SMB_ACE4PROP_T
*prop
)
102 SMB_ACL4_INT_T
*aclint
= get_validated_aclint(acl
);
103 TALLOC_CTX
*mem_ctx
= main_loop_talloc_get();
106 ace
= (SMB_ACE4_INT_T
*)talloc_size(mem_ctx
, sizeof(SMB_ACE4_INT_T
));
109 DEBUG(0, ("talloc_size failed\n"));
113 memset(ace
, 0, sizeof(SMB_ACE4_INT_T
));
114 ace
->magic
= SMB_ACE4_INT_MAGIC
;
115 /* ace->next = NULL not needed */
116 memcpy(&ace
->prop
, prop
, sizeof(SMB_ACE4PROP_T
));
118 if (aclint
->first
==NULL
)
123 aclint
->last
->next
= (void *)ace
;
128 return (SMB4ACE_T
*)ace
;
131 SMB_ACE4PROP_T
*smb_get_ace4(SMB4ACE_T
*ace
)
133 SMB_ACE4_INT_T
*aceint
= get_validated_aceint(ace
);
137 return &aceint
->prop
;
140 SMB4ACE_T
*smb_next_ace4(SMB4ACE_T
*ace
)
142 SMB_ACE4_INT_T
*aceint
= get_validated_aceint(ace
);
146 return (SMB4ACE_T
*)aceint
->next
;
149 SMB4ACE_T
*smb_first_ace4(SMB4ACL_T
*acl
)
151 SMB_ACL4_INT_T
*aclint
= get_validated_aclint(acl
);
155 return (SMB4ACE_T
*)aclint
->first
;
158 uint32
smb_get_naces(SMB4ACL_T
*acl
)
160 SMB_ACL4_INT_T
*aclint
= get_validated_aclint(acl
);
164 return aclint
->naces
;
167 static int smbacl4_GetFileOwner(files_struct
*fsp
, SMB_STRUCT_STAT
*psbuf
)
169 memset(psbuf
, 0, sizeof(SMB_STRUCT_STAT
));
170 if (fsp
->is_directory
|| fsp
->fh
->fd
== -1) {
171 /* Get the stat struct for the owner info. */
172 if (SMB_VFS_STAT(fsp
->conn
,fsp
->fsp_name
, psbuf
) != 0)
174 DEBUG(8, ("SMB_VFS_STAT failed with error %s\n",
179 if (SMB_VFS_FSTAT(fsp
,fsp
->fh
->fd
, psbuf
) != 0)
181 DEBUG(8, ("SMB_VFS_FSTAT failed with error %s\n",
190 static BOOL
smbacl4_nfs42win(SMB4ACL_T
*acl
, /* in */
191 DOM_SID
*psid_owner
, /* in */
192 DOM_SID
*psid_group
, /* in */
193 SEC_ACE
**ppnt_ace_list
, /* out */
194 int *pgood_aces
/* out */
197 SMB_ACL4_INT_T
*aclint
= (SMB_ACL4_INT_T
*)acl
;
198 SMB_ACE4_INT_T
*aceint
;
199 SEC_ACE
*nt_ace_list
= NULL
;
201 TALLOC_CTX
*mem_ctx
= main_loop_talloc_get();
203 DEBUG(10, ("smbacl_nfs42win entered"));
205 aclint
= get_validated_aclint(acl
);
209 nt_ace_list
= (SEC_ACE
*)talloc_size(mem_ctx
, aclint
->naces
* sizeof(SEC_ACE
));
210 if (nt_ace_list
==NULL
)
212 DEBUG(10, ("talloc error"));
216 memset(nt_ace_list
, 0, aclint
->naces
* sizeof(SEC_ACE
));
218 for (aceint
=aclint
->first
; aceint
!=NULL
; aceint
=(SMB_ACE4_INT_T
*)aceint
->next
) {
221 SMB_ACE4PROP_T
*ace
= &aceint
->prop
;
223 DEBUG(10, ("magic: 0x%x, type: %d, iflags: %x, flags: %x, mask: %x, "
224 "who: %d\n", aceint
->magic
, ace
->aceType
, ace
->flags
,
225 ace
->aceFlags
, ace
->aceMask
, ace
->who
.id
));
227 SMB_ASSERT(aceint
->magic
==SMB_ACE4_INT_MAGIC
);
229 if (ace
->flags
& SMB_ACE4_ID_SPECIAL
) {
230 switch (ace
->who
.special_id
) {
231 case SMB_ACE4_WHO_OWNER
:
232 sid_copy(&sid
, psid_owner
);
234 case SMB_ACE4_WHO_GROUP
:
235 sid_copy(&sid
, psid_group
);
237 case SMB_ACE4_WHO_EVERYONE
:
238 sid_copy(&sid
, &global_sid_World
);
241 DEBUG(8, ("invalid special who id %d "
242 "ignored\n", ace
->who
.special_id
));
245 if (ace
->aceFlags
& SMB_ACE4_IDENTIFIER_GROUP
) {
246 gid_to_sid(&sid
, ace
->who
.gid
);
248 uid_to_sid(&sid
, ace
->who
.uid
);
251 DEBUG(10, ("mapped %d to %s\n", ace
->who
.id
,
252 sid_string_static(&sid
)));
254 init_sec_access(&mask
, ace
->aceMask
);
255 init_sec_ace(&nt_ace_list
[good_aces
++], &sid
,
257 ace
->aceFlags
& 0xf);
260 *ppnt_ace_list
= nt_ace_list
;
261 *pgood_aces
= good_aces
;
266 size_t smb_get_nt_acl_nfs4(files_struct
*fsp
,
267 uint32 security_info
,
268 SEC_DESC
**ppdesc
, SMB4ACL_T
*acl
)
271 SMB_STRUCT_STAT sbuf
;
272 DOM_SID sid_owner
, sid_group
;
274 SEC_ACE
*nt_ace_list
= NULL
;
276 TALLOC_CTX
*mem_ctx
= main_loop_talloc_get();
278 DEBUG(10, ("smb_get_nt_acl_nfs4 invoked for %s\n", fsp
->fsp_name
));
280 if (acl
==NULL
|| smb_get_naces(acl
)==0)
281 return 0; /* special because we shouldn't alloc 0 for win */
283 if (smbacl4_GetFileOwner(fsp
, &sbuf
))
286 uid_to_sid(&sid_owner
, sbuf
.st_uid
);
287 gid_to_sid(&sid_group
, sbuf
.st_gid
);
289 if (smbacl4_nfs42win(acl
,
295 DEBUG(8,("smbacl4_nfs42win failed\n"));
299 psa
= make_sec_acl(mem_ctx
, NT4_ACL_REVISION
,
300 good_aces
, nt_ace_list
);
302 DEBUG(2,("make_sec_acl failed\n"));
306 DEBUG(10,("after make sec_acl\n"));
307 *ppdesc
= make_sec_desc(mem_ctx
, SEC_DESC_REVISION
,
308 SEC_DESC_SELF_RELATIVE
,
309 (security_info
& OWNER_SECURITY_INFORMATION
)
311 (security_info
& GROUP_SECURITY_INFORMATION
)
313 NULL
, psa
, &sd_size
);
315 DEBUG(2,("make_sec_desc failed\n"));
319 DEBUG(10, ("smb_get_nt_acl_nfs4 successfully exited with sd_size %d\n", sd_size
));
323 enum smbacl4_mode_enum
{e_simple
=0, e_special
=1};
324 enum smbacl4_acedup_enum
{e_dontcare
=0, e_reject
=1, e_ignore
=2, e_merge
=3};
326 typedef struct _smbacl4_vfs_params
{
327 enum smbacl4_mode_enum mode
;
329 enum smbacl4_acedup_enum acedup
;
330 } smbacl4_vfs_params
;
333 * Gather special parameters for NFS4 ACL handling
335 static int smbacl4_get_vfs_params(
336 const char *type_name
,
338 smbacl4_vfs_params
*params
341 static const struct enum_list enum_smbacl4_modes
[] = {
342 { e_simple
, "simple" },
343 { e_special
, "special" }
345 static const struct enum_list enum_smbacl4_acedups
[] = {
346 { e_dontcare
, "dontcare" },
347 { e_reject
, "reject" },
348 { e_ignore
, "ignore" },
349 { e_merge
, "merge" },
352 memset(params
, 0, sizeof(smbacl4_vfs_params
));
353 params
->mode
= (enum smbacl4_mode_enum
)lp_parm_enum(
354 SNUM(fsp
->conn
), type_name
,
355 "mode", enum_smbacl4_modes
, e_simple
);
356 params
->do_chown
= lp_parm_bool(SNUM(fsp
->conn
), type_name
,
358 params
->acedup
= (enum smbacl4_acedup_enum
)lp_parm_enum(
359 SNUM(fsp
->conn
), type_name
,
360 "acedup", enum_smbacl4_acedups
, e_dontcare
);
362 DEBUG(10, ("mode:%s, do_chown:%s, acedup: %s\n",
363 enum_smbacl4_modes
[params
->mode
].name
,
364 params
->do_chown
? "true" : "false",
365 enum_smbacl4_acedups
[params
->acedup
].name
));
370 static void smbacl4_dump_nfs4acl(int level
, SMB4ACL_T
*acl
)
372 SMB_ACL4_INT_T
*aclint
= get_validated_aclint(acl
);
373 SMB_ACE4_INT_T
*aceint
;
375 DEBUG(level
, ("NFS4ACL: size=%d\n", aclint
->naces
));
377 for(aceint
= aclint
->first
; aceint
!=NULL
; aceint
=(SMB_ACE4_INT_T
*)aceint
->next
) {
378 SMB_ACE4PROP_T
*ace
= &aceint
->prop
;
380 DEBUG(level
, ("\tACE: type=%d, flags=0x%x, fflags=0x%x, mask=0x%x, id=%d\n",
382 ace
->aceFlags
, ace
->flags
,
389 * Find 2 NFS4 who-special ACE property (non-copy!!!)
390 * match nonzero if "special" and who is equal
391 * return ace if found matching; otherwise NULL
393 static SMB_ACE4PROP_T
*smbacl4_find_equal_special(
395 SMB_ACE4PROP_T
*aceNew
)
397 SMB_ACL4_INT_T
*aclint
= get_validated_aclint(acl
);
398 SMB_ACE4_INT_T
*aceint
;
400 for(aceint
= aclint
->first
; aceint
!=NULL
; aceint
=(SMB_ACE4_INT_T
*)aceint
->next
) {
401 SMB_ACE4PROP_T
*ace
= &aceint
->prop
;
403 if (ace
->flags
== aceNew
->flags
&&
404 ace
->aceType
==aceNew
->aceType
&&
405 (ace
->aceFlags
&SMB_ACE4_IDENTIFIER_GROUP
)==
406 (aceNew
->aceFlags
&SMB_ACE4_IDENTIFIER_GROUP
)
408 /* keep type safety; e.g. gid is an u.short */
409 if (ace
->flags
& SMB_ACE4_ID_SPECIAL
)
411 if (ace
->who
.special_id
==aceNew
->who
.special_id
)
414 if (ace
->aceFlags
& SMB_ACE4_IDENTIFIER_GROUP
)
416 if (ace
->who
.gid
==aceNew
->who
.gid
)
419 if (ace
->who
.uid
==aceNew
->who
.uid
)
429 static int smbacl4_fill_ace4(
431 smbacl4_vfs_params
*params
,
434 SEC_ACE
*ace_nt
, /* input */
435 SMB_ACE4PROP_T
*ace_v4
/* output */
438 const char *dom
, *name
;
439 enum lsa_SidType type
;
443 DEBUG(10, ("got ace for %s\n",
444 sid_string_static(&ace_nt
->trustee
)));
446 memset(ace_v4
, 0, sizeof(SMB_ACE4PROP_T
));
447 ace_v4
->aceType
= ace_nt
->type
; /* only ACCES|DENY supported right now */
448 ace_v4
->aceFlags
= ace_nt
->flags
& SEC_ACE_FLAG_VALID_INHERIT
;
449 ace_v4
->aceMask
= ace_nt
->access_mask
&
450 (STD_RIGHT_ALL_ACCESS
| SA_RIGHT_FILE_ALL_ACCESS
);
452 if (ace_v4
->aceFlags
!=ace_nt
->flags
)
453 DEBUG(9, ("ace_v4->aceFlags(0x%x)!=ace_nt->flags(0x%x)\n",
454 ace_v4
->aceFlags
, ace_nt
->flags
));
456 if (ace_v4
->aceMask
!=ace_nt
->access_mask
)
457 DEBUG(9, ("ace_v4->aceMask(0x%x)!=ace_nt->access_mask(0x%x)\n",
458 ace_v4
->aceMask
, ace_nt
->access_mask
));
460 if (sid_equal(&ace_nt
->trustee
, &global_sid_World
)) {
461 ace_v4
->who
.special_id
= SMB_ACE4_WHO_EVERYONE
;
462 ace_v4
->flags
|= SMB_ACE4_ID_SPECIAL
;
464 if (!lookup_sid(mem_ctx
, &ace_nt
->trustee
, &dom
, &name
, &type
)) {
465 DEBUG(8, ("Could not find %s' type\n",
466 sid_string_static(&ace_nt
->trustee
)));
471 if (type
== SID_NAME_USER
) {
472 if (!sid_to_uid(&ace_nt
->trustee
, &uid
)) {
473 DEBUG(2, ("Could not convert %s to uid\n",
474 sid_string_static(&ace_nt
->trustee
)));
478 if (params
->mode
==e_special
&& uid
==ownerUID
) {
479 ace_v4
->flags
|= SMB_ACE4_ID_SPECIAL
;
480 ace_v4
->who
.special_id
= SMB_ACE4_WHO_OWNER
;
482 ace_v4
->who
.uid
= uid
;
484 } else { /* else group? - TODO check it... */
485 if (!sid_to_gid(&ace_nt
->trustee
, &gid
)) {
486 DEBUG(2, ("Could not convert %s to gid\n",
487 sid_string_static(&ace_nt
->trustee
)));
490 ace_v4
->aceFlags
|= SMB_ACE4_IDENTIFIER_GROUP
;
492 if (params
->mode
==e_special
&& gid
==ownerGID
) {
493 ace_v4
->flags
|= SMB_ACE4_ID_SPECIAL
;
494 ace_v4
->who
.special_id
= SMB_ACE4_WHO_GROUP
;
496 ace_v4
->who
.gid
= gid
;
504 static int smbacl4_MergeIgnoreReject(
505 enum smbacl4_acedup_enum acedup
,
506 SMB4ACL_T
*acl
, /* may modify it */
507 SMB_ACE4PROP_T
*ace
, /* the "new" ACE */
513 SMB_ACE4PROP_T
*ace4found
= smbacl4_find_equal_special(acl
, ace
);
518 case e_merge
: /* "merge" flags */
520 ace4found
->aceFlags
|= ace
->aceFlags
;
521 ace4found
->aceMask
|= ace
->aceMask
;
523 case e_ignore
: /* leave out this record */
526 case e_reject
: /* do an error */
527 DEBUG(8, ("ACL rejected by duplicate nt ace#%d\n", i
));
528 errno
= EINVAL
; /* SHOULD be set on any _real_ error */
538 static SMB4ACL_T
*smbacl4_win2nfs4(
540 smbacl4_vfs_params
*pparams
,
547 TALLOC_CTX
*mem_ctx
= main_loop_talloc_get();
549 DEBUG(10, ("smbacl4_win2nfs4 invoked\n"));
551 acl
= smb_create_smb4acl();
555 for(i
=0; i
<dacl
->num_aces
; i
++) {
556 SMB_ACE4PROP_T ace_v4
;
557 BOOL addNewACE
= True
;
559 if (smbacl4_fill_ace4(mem_ctx
, pparams
, ownerUID
, ownerGID
,
560 dacl
->aces
+ i
, &ace_v4
))
563 if (pparams
->acedup
!=e_dontcare
) {
564 if (smbacl4_MergeIgnoreReject(pparams
->acedup
, acl
,
565 &ace_v4
, &addNewACE
, i
))
570 smb_add_ace4(acl
, &ace_v4
);
576 BOOL
smb_set_nt_acl_nfs4(files_struct
*fsp
,
577 uint32 security_info_sent
,
579 set_nfs4acl_native_fn_t set_nfs4_native
)
581 smbacl4_vfs_params params
;
582 SMB4ACL_T
*acl
= NULL
;
585 SMB_STRUCT_STAT sbuf
;
586 BOOL need_chown
= False
;
587 uid_t newUID
= (uid_t
)-1;
588 gid_t newGID
= (gid_t
)-1;
590 DEBUG(10, ("smb_set_nt_acl_nfs4 invoked for %s\n", fsp
->fsp_name
));
592 if ((security_info_sent
& (DACL_SECURITY_INFORMATION
|
593 GROUP_SECURITY_INFORMATION
| OWNER_SECURITY_INFORMATION
)) == 0)
595 DEBUG(9, ("security_info_sent (0x%x) ignored\n",
596 security_info_sent
));
597 return True
; /* won't show error - later to be refined... */
600 /* Special behaviours */
601 if (smbacl4_get_vfs_params(SMBACL4_PARAM_TYPE_NAME
, fsp
, ¶ms
))
604 if (smbacl4_GetFileOwner(fsp
, &sbuf
))
607 /* chown logic is a copy/paste from posix_acl.c:set_nt_acl */
608 if (!unpack_nt_owners(SNUM(fsp
->conn
), &newUID
, &newGID
, security_info_sent
, psd
))
610 DEBUG(8, ("unpack_nt_owners failed"));
613 if (((newUID
!= (uid_t
)-1) && (sbuf
.st_uid
!= newUID
)) ||
614 ((newGID
!= (gid_t
)-1) && (sbuf
.st_gid
!= newGID
))) {
618 if ((newUID
== (uid_t
)-1 || newUID
== current_user
.ut
.uid
)) {
619 if(try_chown(fsp
->conn
, fsp
->fsp_name
, newUID
, newGID
)) {
620 DEBUG(3,("chown %s, %u, %u failed. Error = %s.\n",
621 fsp
->fsp_name
, (unsigned int)newUID
, (unsigned int)newGID
, strerror(errno
) ));
624 DEBUG(10,("chown %s, %u, %u succeeded.\n",
625 fsp
->fsp_name
, (unsigned int)newUID
, (unsigned int)newGID
));
626 if (smbacl4_GetFileOwner(fsp
, &sbuf
))
629 } else { /* chown is needed, but _after_ changing acl */
630 sbuf
.st_uid
= newUID
; /* OWNER@ in case of e_special */
631 sbuf
.st_gid
= newGID
; /* GROUP@ in case of e_special */
635 if ((security_info_sent
& DACL_SECURITY_INFORMATION
)!=0 && psd
->dacl
!=NULL
)
637 acl
= smbacl4_win2nfs4(psd
->dacl
, ¶ms
, sbuf
.st_uid
, sbuf
.st_gid
);
641 smbacl4_dump_nfs4acl(10, acl
);
643 result
= set_nfs4_native(fsp
, acl
);
646 DEBUG(10, ("set_nfs4_native failed with %s\n", strerror(errno
)));
650 DEBUG(10, ("no dacl found; security_info_sent = 0x%x\n", security_info_sent
));
652 /* Any chown pending? */
654 DEBUG(3,("chown#2 %s. uid = %u, gid = %u.\n",
655 fsp
->fsp_name
, (unsigned int)newUID
, (unsigned int)newGID
));
656 if (try_chown(fsp
->conn
, fsp
->fsp_name
, newUID
, newGID
)) {
657 DEBUG(2,("chown#2 %s, %u, %u failed. Error = %s.\n",
658 fsp
->fsp_name
, (unsigned int)newUID
, (unsigned int)newGID
,
662 DEBUG(10,("chown#2 %s, %u, %u succeeded.\n",
663 fsp
->fsp_name
, (unsigned int)newUID
, (unsigned int)newGID
));
666 DEBUG(10, ("smb_set_nt_acl_nfs4 succeeded\n"));