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, NULL, &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(
173 pblob, ctx, NULL, &xacl,
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);