2 * Store Windows ACLs in xattrs.
4 * Copyright (C) Volker Lendecke, 2008
5 * Copyright (C) Jeremy Allison, 2008
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 3 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, see <http://www.gnu.org/licenses/>.
21 /* NOTE: This is an experimental module, not yet finished. JRA. */
24 #include "librpc/gen_ndr/xattr.h"
25 #include "librpc/gen_ndr/ndr_xattr.h"
28 #define DBGC_CLASS DBGC_VFS
30 static NTSTATUS
parse_acl_blob(const DATA_BLOB
*pblob
,
31 const struct timespec cts
,
33 struct security_descriptor
**ppdesc
)
35 TALLOC_CTX
*ctx
= talloc_tos();
36 struct xattr_NTACL xacl
;
37 enum ndr_err_code ndr_err
;
40 ndr_err
= ndr_pull_struct_blob(pblob
, ctx
, &xacl
,
41 (ndr_pull_flags_fn_t
)ndr_pull_xattr_NTACL
);
43 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
44 DEBUG(5, ("parse_acl_blob: ndr_pull_xattr_NTACL failed: %s\n",
45 ndr_errstr(ndr_err
)));
46 return ndr_map_error2ntstatus(ndr_err
);;
49 if (xacl
.version
!= 2) {
50 return NT_STATUS_REVISION_MISMATCH
;
56 /* Arg. This doesn't work. Too many activities
57 * change the ctime. May have to roll back to
61 * Check that the ctime timestamp is ealier
62 * than the stored timestamp.
65 ts
= nt_time_to_unix_timespec(&xacl
.info
.sd_ts
->last_changed
);
67 if (timespec_compare(&cts
, &ts
) > 0) {
68 DEBUG(5, ("parse_acl_blob: stored ACL out of date "
70 timestring(ctx
, cts
.tv_sec
),
71 timestring(ctx
, ts
.tv_sec
)));
72 return NT_STATUS_EA_CORRUPT_ERROR
;
77 *ppdesc
= make_sec_desc(ctx
, SEC_DESC_REVISION
, SEC_DESC_SELF_RELATIVE
,
78 (security_info
& OWNER_SECURITY_INFORMATION
)
79 ? xacl
.info
.sd_ts
->sd
->owner_sid
: NULL
,
80 (security_info
& GROUP_SECURITY_INFORMATION
)
81 ? xacl
.info
.sd_ts
->sd
->group_sid
: NULL
,
82 (security_info
& SACL_SECURITY_INFORMATION
)
83 ? xacl
.info
.sd_ts
->sd
->sacl
: NULL
,
84 (security_info
& DACL_SECURITY_INFORMATION
)
85 ? xacl
.info
.sd_ts
->sd
->dacl
: NULL
,
88 TALLOC_FREE(xacl
.info
.sd
);
90 return (*ppdesc
!= NULL
) ? NT_STATUS_OK
: NT_STATUS_NO_MEMORY
;
93 static NTSTATUS
get_acl_blob(TALLOC_CTX
*ctx
,
94 vfs_handle_struct
*handle
,
109 tmp
= TALLOC_REALLOC_ARRAY(ctx
, val
, uint8_t, size
);
112 return NT_STATUS_NO_MEMORY
;
117 if (fsp
&& fsp
->fh
->fd
!= -1) {
118 sizeret
= SMB_VFS_FGETXATTR(fsp
, XATTR_NTACL_NAME
, val
, size
);
120 sizeret
= SMB_VFS_GETXATTR(handle
->conn
, name
,
121 XATTR_NTACL_NAME
, val
, size
);
128 /* Max ACL size is 65536 bytes. */
131 if ((errno
== ERANGE
) && (size
!= 65536)) {
132 /* Too small, try again. */
137 /* Real error - exit here. */
139 return map_nt_error_from_unix(errno
);
143 pblob
->length
= sizeret
;
147 static NTSTATUS
create_acl_blob(const struct security_descriptor
*psd
, DATA_BLOB
*pblob
)
149 struct xattr_NTACL xacl
;
150 struct security_descriptor_timestamp sd_ts
;
151 enum ndr_err_code ndr_err
;
152 TALLOC_CTX
*ctx
= talloc_tos();
153 struct timespec curr
= timespec_current();
158 /* Horrid hack as setting an xattr changes the ctime
159 * on Linux. This gives a race of 1 second during
160 * which we would not see a POSIX ACL set.
165 xacl
.info
.sd_ts
= &sd_ts
;
166 xacl
.info
.sd_ts
->sd
= CONST_DISCARD(struct security_descriptor
*, psd
);
167 unix_timespec_to_nt_time(&xacl
.info
.sd_ts
->last_changed
, curr
);
169 DEBUG(10, ("create_acl_blob: timestamp stored as %s\n",
170 timestring(ctx
, curr
.tv_sec
) ));
172 ndr_err
= ndr_push_struct_blob(
174 (ndr_push_flags_fn_t
)ndr_push_xattr_NTACL
);
176 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err
)) {
177 DEBUG(5, ("create_acl_blob: ndr_push_xattr_NTACL failed: %s\n",
178 ndr_errstr(ndr_err
)));
179 return ndr_map_error2ntstatus(ndr_err
);;
185 static NTSTATUS
store_acl_blob_fsp(files_struct
*fsp
,
191 DEBUG(10,("store_acl_blob_fsp: storing blob length %u on file %s\n",
192 (unsigned int)pblob
->length
, fsp
->fsp_name
));
195 if (fsp
->fh
->fd
!= -1) {
196 ret
= SMB_VFS_FSETXATTR(fsp
, XATTR_NTACL_NAME
,
197 pblob
->data
, pblob
->length
, 0);
199 ret
= SMB_VFS_SETXATTR(fsp
->conn
, fsp
->fsp_name
,
201 pblob
->data
, pblob
->length
, 0);
209 DEBUG(5, ("store_acl_blob_fsp: setting attr failed for file %s"
213 return map_nt_error_from_unix(errno
);
218 static NTSTATUS
store_acl_blob_pathname(connection_struct
*conn
,
225 DEBUG(10,("store_acl_blob_pathname: storing blob "
226 "length %u on file %s\n",
227 (unsigned int)pblob
->length
, fname
));
230 ret
= SMB_VFS_SETXATTR(conn
, fname
,
232 pblob
->data
, pblob
->length
, 0);
239 DEBUG(5, ("store_acl_blob_pathname: setting attr failed "
240 "for file %s with error %s\n",
243 return map_nt_error_from_unix(errno
);
249 static NTSTATUS
get_nt_acl_xattr_internal(vfs_handle_struct
*handle
,
252 uint32 security_info
,
253 struct security_descriptor
**ppdesc
)
255 TALLOC_CTX
*ctx
= talloc_tos();
257 SMB_STRUCT_STAT sbuf
;
260 if (fsp
&& name
== NULL
) {
261 name
= fsp
->fsp_name
;
264 DEBUG(10, ("get_nt_acl_xattr_internal: name=%s\n", name
));
266 status
= get_acl_blob(ctx
, handle
, fsp
, name
, &blob
);
267 if (!NT_STATUS_IS_OK(status
)) {
268 DEBUG(10, ("get_acl_blob returned %s\n", nt_errstr(status
)));
272 if (fsp
&& fsp
->fh
->fd
!= -1) {
273 if (SMB_VFS_FSTAT(fsp
, &sbuf
) == -1) {
274 return map_nt_error_from_unix(errno
);
277 if (SMB_VFS_STAT(handle
->conn
, name
, &sbuf
) == -1) {
278 return map_nt_error_from_unix(errno
);
282 status
= parse_acl_blob(&blob
, get_ctimespec(&sbuf
),
283 security_info
, ppdesc
);
284 if (!NT_STATUS_IS_OK(status
)) {
285 DEBUG(10, ("parse_acl_blob returned %s\n",
290 TALLOC_FREE(blob
.data
);
294 /*********************************************************************
295 Create a default security descriptor for a file in case no inheritance
296 exists. All permissions to the owner and SYSTEM.
297 *********************************************************************/
299 static struct security_descriptor
*default_file_sd(TALLOC_CTX
*mem_ctx
,
300 SMB_STRUCT_STAT
*psbuf
)
302 struct dom_sid owner_sid
, group_sid
;
304 struct security_ace
*pace
= NULL
;
305 struct security_acl
*pacl
= NULL
;
307 uid_to_sid(&owner_sid
, psbuf
->st_uid
);
308 gid_to_sid(&group_sid
, psbuf
->st_gid
);
310 pace
= TALLOC_ARRAY(mem_ctx
, struct security_ace
, 2);
315 init_sec_ace(&pace
[0], &owner_sid
, SEC_ACE_TYPE_ACCESS_ALLOWED
,
316 SEC_RIGHTS_FILE_ALL
, 0);
317 init_sec_ace(&pace
[1], &global_sid_System
, SEC_ACE_TYPE_ACCESS_ALLOWED
,
318 SEC_RIGHTS_FILE_ALL
, 0);
320 pacl
= make_sec_acl(mem_ctx
,
327 return make_sec_desc(mem_ctx
,
328 SECURITY_DESCRIPTOR_REVISION_1
,
329 SEC_DESC_SELF_RELATIVE
|SEC_DESC_DACL_PRESENT
|
330 SEC_DESC_DACL_DEFAULTED
,
338 /*********************************************************************
339 *********************************************************************/
341 static NTSTATUS
inherit_new_acl(vfs_handle_struct
*handle
,
346 TALLOC_CTX
*ctx
= talloc_tos();
348 struct security_descriptor
*parent_desc
= NULL
;
349 struct security_descriptor
*psd
= NULL
;
354 if (!parent_dirname_talloc(ctx
,
358 return NT_STATUS_NO_MEMORY
;
361 DEBUG(10,("inherit_new_acl: check directory %s\n",
364 status
= get_nt_acl_xattr_internal(handle
,
367 DACL_SECURITY_INFORMATION
,
369 if (!NT_STATUS_IS_OK(status
)) {
370 DEBUG(10,("inherit_new_acl: directory %s failed "
373 nt_errstr(status
) ));
377 /* Create an inherited descriptor from the parent. */
378 status
= se_create_child_secdesc(ctx
,
382 &handle
->conn
->server_info
->ptok
->user_sids
[PRIMARY_USER_SID_INDEX
],
383 &handle
->conn
->server_info
->ptok
->user_sids
[PRIMARY_GROUP_SID_INDEX
],
385 if (!NT_STATUS_IS_OK(status
)) {
388 if (psd
->dacl
== NULL
) {
389 SMB_STRUCT_STAT sbuf
;
393 if (fsp
&& !fsp
->is_directory
&& fsp
->fh
->fd
!= -1) {
394 ret
= SMB_VFS_FSTAT(fsp
, &sbuf
);
396 ret
= SMB_VFS_STAT(fsp
->conn
,fsp
->fsp_name
, &sbuf
);
399 return map_nt_error_from_unix(errno
);
401 psd
= default_file_sd(ctx
, &sbuf
);
403 return NT_STATUS_NO_MEMORY
;
407 status
= create_acl_blob(psd
, &blob
);
408 if (!NT_STATUS_IS_OK(status
)) {
412 return store_acl_blob_fsp(fsp
, &blob
);
414 return store_acl_blob_pathname(handle
->conn
, fname
, &blob
);
418 /*********************************************************************
419 Check ACL on open. For new files inherit from parent directory.
420 *********************************************************************/
422 static int open_acl_xattr(vfs_handle_struct
*handle
,
428 uint32_t access_granted
= 0;
429 struct security_descriptor
*pdesc
= NULL
;
430 bool file_existed
= true;
431 NTSTATUS status
= get_nt_acl_xattr_internal(handle
,
434 (OWNER_SECURITY_INFORMATION
|
435 GROUP_SECURITY_INFORMATION
|
436 DACL_SECURITY_INFORMATION
),
438 if (NT_STATUS_IS_OK(status
)) {
439 /* See if we can access it. */
440 status
= se_access_check(pdesc
,
441 handle
->conn
->server_info
->ptok
,
444 if (!NT_STATUS_IS_OK(status
)) {
445 errno
= map_errno_from_nt_status(status
);
448 } else if (NT_STATUS_EQUAL(status
,NT_STATUS_OBJECT_NAME_NOT_FOUND
)) {
449 file_existed
= false;
452 DEBUG(10,("open_acl_xattr: get_nt_acl_attr_internal for "
453 "file %s returned %s\n",
455 nt_errstr(status
) ));
457 fsp
->fh
->fd
= SMB_VFS_NEXT_OPEN(handle
, fname
, fsp
, flags
, mode
);
459 if (!file_existed
&& fsp
->fh
->fd
!= -1) {
460 /* File was created. Inherit from parent directory. */
461 string_set(&fsp
->fsp_name
, fname
);
462 inherit_new_acl(handle
, fname
, fsp
, false);
468 static int mkdir_acl_xattr(vfs_handle_struct
*handle
, const char *path
, mode_t mode
)
470 int ret
= SMB_VFS_NEXT_MKDIR(handle
, path
, mode
);
475 /* New directory - inherit from parent. */
476 inherit_new_acl(handle
, path
, NULL
, true);
480 static NTSTATUS
fget_nt_acl_xattr(vfs_handle_struct
*handle
, files_struct
*fsp
,
481 uint32 security_info
, struct security_descriptor
**ppdesc
)
483 NTSTATUS status
= get_nt_acl_xattr_internal(handle
, fsp
,
484 NULL
, security_info
, ppdesc
);
485 if (NT_STATUS_IS_OK(status
)) {
486 if (DEBUGLEVEL
>= 10) {
487 DEBUG(10,("fget_nt_acl_xattr: returning xattr sd for file %s\n",
489 NDR_PRINT_DEBUG(security_descriptor
, *ppdesc
);
493 return SMB_VFS_NEXT_FGET_NT_ACL(handle
, fsp
,
494 security_info
, ppdesc
);
497 static NTSTATUS
get_nt_acl_xattr(vfs_handle_struct
*handle
,
498 const char *name
, uint32 security_info
, struct security_descriptor
**ppdesc
)
500 NTSTATUS status
= get_nt_acl_xattr_internal(handle
, NULL
,
501 name
, security_info
, ppdesc
);
502 if (NT_STATUS_IS_OK(status
)) {
503 if (DEBUGLEVEL
>= 10) {
504 DEBUG(10,("get_nt_acl_xattr: returning xattr sd for file %s\n",
506 NDR_PRINT_DEBUG(security_descriptor
, *ppdesc
);
510 return SMB_VFS_NEXT_GET_NT_ACL(handle
, name
,
511 security_info
, ppdesc
);
514 static NTSTATUS
fset_nt_acl_xattr(vfs_handle_struct
*handle
, files_struct
*fsp
,
515 uint32 security_info_sent
, const struct security_descriptor
*psd
)
520 if (DEBUGLEVEL
>= 10) {
521 DEBUG(10,("fset_nt_acl_xattr: incoming sd for file %s\n",
523 NDR_PRINT_DEBUG(security_descriptor
,
524 CONST_DISCARD(struct security_descriptor
*,psd
));
527 status
= SMB_VFS_NEXT_FSET_NT_ACL(handle
, fsp
, security_info_sent
, psd
);
528 if (!NT_STATUS_IS_OK(status
)) {
532 /* Ensure owner and group are set. */
533 if (!psd
->owner_sid
|| !psd
->group_sid
) {
535 SMB_STRUCT_STAT sbuf
;
536 DOM_SID owner_sid
, group_sid
;
537 struct security_descriptor
*nc_psd
= dup_sec_desc(talloc_tos(), psd
);
542 if (fsp
->is_directory
|| fsp
->fh
->fd
== -1) {
543 ret
= SMB_VFS_STAT(fsp
->conn
,fsp
->fsp_name
, &sbuf
);
545 ret
= SMB_VFS_FSTAT(fsp
, &sbuf
);
548 /* Lower level acl set succeeded,
549 * so still return OK. */
552 create_file_sids(&sbuf
, &owner_sid
, &group_sid
);
553 /* This is safe as nc_psd is discarded at fn exit. */
554 nc_psd
->owner_sid
= &owner_sid
;
555 nc_psd
->group_sid
= &group_sid
;
556 security_info_sent
|= (OWNER_SECURITY_INFORMATION
|GROUP_SECURITY_INFORMATION
);
560 if ((security_info_sent
& DACL_SECURITY_INFORMATION
) &&
562 (psd
->type
& (SE_DESC_DACL_AUTO_INHERITED
|
563 SE_DESC_DACL_AUTO_INHERIT_REQ
))==
564 (SE_DESC_DACL_AUTO_INHERITED
|
565 SE_DESC_DACL_AUTO_INHERIT_REQ
) ) {
566 struct security_descriptor
*new_psd
= NULL
;
567 status
= append_parent_acl(fsp
, psd
, &new_psd
);
568 if (!NT_STATUS_IS_OK(status
)) {
569 /* Lower level acl set succeeded,
570 * so still return OK. */
576 if (DEBUGLEVEL
>= 10) {
577 DEBUG(10,("fset_nt_acl_xattr: storing xattr sd for file %s\n",
579 NDR_PRINT_DEBUG(security_descriptor
,
580 CONST_DISCARD(struct security_descriptor
*,psd
));
582 create_acl_blob(psd
, &blob
);
583 store_acl_blob_fsp(fsp
, &blob
);
588 /* VFS operations structure */
590 static vfs_op_tuple skel_op_tuples
[] =
592 {SMB_VFS_OP(mkdir_acl_xattr
), SMB_VFS_OP_MKDIR
, SMB_VFS_LAYER_TRANSPARENT
},
593 {SMB_VFS_OP(open_acl_xattr
), SMB_VFS_OP_OPEN
, SMB_VFS_LAYER_TRANSPARENT
},
595 /* NT File ACL operations */
597 {SMB_VFS_OP(fget_nt_acl_xattr
),SMB_VFS_OP_FGET_NT_ACL
,SMB_VFS_LAYER_TRANSPARENT
},
598 {SMB_VFS_OP(get_nt_acl_xattr
), SMB_VFS_OP_GET_NT_ACL
, SMB_VFS_LAYER_TRANSPARENT
},
599 {SMB_VFS_OP(fset_nt_acl_xattr
),SMB_VFS_OP_FSET_NT_ACL
,SMB_VFS_LAYER_TRANSPARENT
},
601 {SMB_VFS_OP(NULL
), SMB_VFS_OP_NOOP
, SMB_VFS_LAYER_NOOP
}
604 NTSTATUS
vfs_acl_xattr_init(void)
606 return smb_register_vfs(SMB_VFS_INTERFACE_VERSION
, "acl_xattr", skel_op_tuples
);