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 SEC_DESC
*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(SEC_DESC
*, 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
,
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 * Currently this only works for existing files. Need to work on
296 * inheritance for new files.
297 *********************************************************************/
299 static NTSTATUS
inherit_new_acl(vfs_handle_struct
*handle
,
304 TALLOC_CTX
*ctx
= talloc_tos();
306 SEC_DESC
*parent_desc
= NULL
;
307 SEC_DESC
*psd
= NULL
;
312 if (!parent_dirname_talloc(ctx
,
316 return NT_STATUS_NO_MEMORY
;
319 DEBUG(10,("inherit_new_acl: check directory %s\n",
322 status
= get_nt_acl_xattr_internal(handle
,
325 DACL_SECURITY_INFORMATION
,
327 if (!NT_STATUS_IS_OK(status
)) {
328 DEBUG(10,("inherit_new_acl: directory %s failed "
331 nt_errstr(status
) ));
335 /* Create an inherited descriptor from the parent. */
336 status
= se_create_child_secdesc(ctx
,
340 &handle
->conn
->server_info
->ptok
->user_sids
[PRIMARY_USER_SID_INDEX
],
341 &handle
->conn
->server_info
->ptok
->user_sids
[PRIMARY_GROUP_SID_INDEX
],
343 if (!NT_STATUS_IS_OK(status
)) {
346 status
= create_acl_blob(psd
, &blob
);
347 if (!NT_STATUS_IS_OK(status
)) {
351 return store_acl_blob_fsp(fsp
, &blob
);
353 return store_acl_blob_pathname(handle
->conn
, fname
, &blob
);
357 /*********************************************************************
358 Check ACL on open. For new files inherit from parent directory.
359 *********************************************************************/
361 static int open_acl_xattr(vfs_handle_struct
*handle
,
367 uint32_t access_granted
= 0;
368 SEC_DESC
*pdesc
= NULL
;
369 bool file_existed
= true;
370 NTSTATUS status
= get_nt_acl_xattr_internal(handle
,
373 (OWNER_SECURITY_INFORMATION
|
374 GROUP_SECURITY_INFORMATION
|
375 DACL_SECURITY_INFORMATION
),
377 if (NT_STATUS_IS_OK(status
)) {
378 /* See if we can access it. */
379 if (!se_access_check(pdesc
,
380 handle
->conn
->server_info
->ptok
,
384 errno
= map_errno_from_nt_status(status
);
387 } else if (NT_STATUS_EQUAL(status
,NT_STATUS_OBJECT_NAME_NOT_FOUND
)) {
388 file_existed
= false;
391 DEBUG(10,("open_acl_xattr: get_nt_acl_attr_internal for "
392 "file %s returned %s\n",
394 nt_errstr(status
) ));
396 fsp
->fh
->fd
= SMB_VFS_NEXT_OPEN(handle
, fname
, fsp
, flags
, mode
);
398 if (!file_existed
&& fsp
->fh
->fd
!= -1) {
399 /* File was created. Inherit from parent directory. */
400 string_set(&fsp
->fsp_name
, fname
);
401 inherit_new_acl(handle
, fname
, fsp
, false);
407 static int mkdir_acl_xattr(vfs_handle_struct
*handle
, const char *path
, mode_t mode
)
409 int ret
= SMB_VFS_NEXT_MKDIR(handle
, path
, mode
);
414 /* New directory - inherit from parent. */
415 inherit_new_acl(handle
, path
, NULL
, true);
419 static NTSTATUS
fget_nt_acl_xattr(vfs_handle_struct
*handle
, files_struct
*fsp
,
420 uint32 security_info
, SEC_DESC
**ppdesc
)
422 NTSTATUS status
= get_nt_acl_xattr_internal(handle
, fsp
,
423 NULL
, security_info
, ppdesc
);
424 if (NT_STATUS_IS_OK(status
)) {
427 return SMB_VFS_NEXT_FGET_NT_ACL(handle
, fsp
,
428 security_info
, ppdesc
);
431 static NTSTATUS
get_nt_acl_xattr(vfs_handle_struct
*handle
,
432 const char *name
, uint32 security_info
, SEC_DESC
**ppdesc
)
434 NTSTATUS status
= get_nt_acl_xattr_internal(handle
, NULL
,
435 name
, security_info
, ppdesc
);
436 if (NT_STATUS_IS_OK(status
)) {
439 return SMB_VFS_NEXT_GET_NT_ACL(handle
, name
,
440 security_info
, ppdesc
);
443 static NTSTATUS
fset_nt_acl_xattr(vfs_handle_struct
*handle
, files_struct
*fsp
,
444 uint32 security_info_sent
, const SEC_DESC
*psd
)
449 status
= SMB_VFS_NEXT_FSET_NT_ACL(handle
, fsp
, security_info_sent
, psd
);
450 if (!NT_STATUS_IS_OK(status
)) {
454 if ((security_info_sent
& DACL_SECURITY_INFORMATION
) &&
456 (psd
->type
& (SE_DESC_DACL_AUTO_INHERITED
|
457 SE_DESC_DACL_AUTO_INHERIT_REQ
))==
458 (SE_DESC_DACL_AUTO_INHERITED
|
459 SE_DESC_DACL_AUTO_INHERIT_REQ
) ) {
460 SEC_DESC
*new_psd
= NULL
;
461 status
= append_parent_acl(fsp
, psd
, &new_psd
);
462 if (!NT_STATUS_IS_OK(status
)) {
463 /* Lower level acl set succeeded,
464 * so still return OK. */
470 create_acl_blob(psd
, &blob
);
471 store_acl_blob_fsp(fsp
, &blob
);
476 /* VFS operations structure */
478 static vfs_op_tuple skel_op_tuples
[] =
480 {SMB_VFS_OP(mkdir_acl_xattr
), SMB_VFS_OP_MKDIR
, SMB_VFS_LAYER_TRANSPARENT
},
481 {SMB_VFS_OP(open_acl_xattr
), SMB_VFS_OP_OPEN
, SMB_VFS_LAYER_TRANSPARENT
},
483 /* NT File ACL operations */
485 {SMB_VFS_OP(fget_nt_acl_xattr
),SMB_VFS_OP_FGET_NT_ACL
,SMB_VFS_LAYER_TRANSPARENT
},
486 {SMB_VFS_OP(get_nt_acl_xattr
), SMB_VFS_OP_GET_NT_ACL
, SMB_VFS_LAYER_TRANSPARENT
},
487 {SMB_VFS_OP(fset_nt_acl_xattr
),SMB_VFS_OP_FSET_NT_ACL
,SMB_VFS_LAYER_TRANSPARENT
},
489 {SMB_VFS_OP(NULL
), SMB_VFS_OP_NOOP
, SMB_VFS_LAYER_NOOP
}
492 NTSTATUS
vfs_acl_xattr_init(void)
494 return smb_register_vfs(SMB_VFS_INTERFACE_VERSION
, "acl_xattr", skel_op_tuples
);