4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2 only,
8 * as published by the Free Software Foundation.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License version 2 for more details (a copy is included
14 * in the LICENSE file that accompanied this code).
16 * You should have received a copy of the GNU General Public License
17 * version 2 along with this program; If not, see
18 * http://www.gnu.org/licenses/gpl-2.0.html
23 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
24 * Use is subject to license terms.
26 * Copyright (c) 2011, 2017, Intel Corporation.
29 * This file is part of Lustre, http://www.lustre.org/
30 * Lustre is a trademark of Sun Microsystems, Inc.
34 #include <linux/sched.h>
36 #include <linux/xattr.h>
37 #include <linux/selinux.h>
39 #define DEBUG_SUBSYSTEM S_LLITE
41 #include <obd_support.h>
42 #include <lustre_dlm.h>
43 #include <uapi/linux/lustre/lustre_ver.h>
44 #include <lustre_eacl.h>
46 #include "llite_internal.h"
48 /* xattr related to IMA(Integrity Measurement Architecture) */
49 #ifndef XATTR_NAME_IMA
50 #define XATTR_NAME_IMA "security.ima"
52 #ifndef XATTR_NAME_EVM
53 #define XATTR_NAME_EVM "security.evm"
57 int get_xattr26_type(const char *name)
59 if (!strcmp(name, XATTR_NAME_POSIX_ACL_ACCESS))
60 return XATTR_ACL_ACCESS_T;
62 if (!strcmp(name, XATTR_NAME_POSIX_ACL_DEFAULT))
63 return XATTR_ACL_DEFAULT_T;
65 if (!strncmp(name, XATTR_USER_PREFIX,
66 sizeof(XATTR_USER_PREFIX) - 1))
69 if (!strncmp(name, XATTR_TRUSTED_PREFIX,
70 sizeof(XATTR_TRUSTED_PREFIX) - 1))
71 return XATTR_TRUSTED_T;
73 if (!strncmp(name, XATTR_SECURITY_PREFIX,
74 sizeof(XATTR_SECURITY_PREFIX) - 1))
75 return XATTR_SECURITY_T;
77 if (!strncmp(name, XATTR_LUSTRE_PREFIX,
78 sizeof(XATTR_LUSTRE_PREFIX) - 1))
79 return XATTR_LUSTRE_T;
85 int xattr_type_filter(struct ll_sb_info *sbi, int xattr_type)
87 if ((xattr_type == XATTR_ACL_ACCESS_T ||
88 xattr_type == XATTR_ACL_DEFAULT_T) &&
89 !(sbi->ll_flags & LL_SBI_ACL))
92 if (xattr_type == XATTR_USER_T && !(sbi->ll_flags & LL_SBI_USER_XATTR))
94 if (xattr_type == XATTR_TRUSTED_T && !cfs_capable(CFS_CAP_SYS_ADMIN))
96 if (xattr_type == XATTR_OTHER_T)
103 int ll_setxattr_common(struct inode *inode, const char *name,
104 const void *value, size_t size,
105 int flags, __u64 valid)
107 struct ll_sb_info *sbi = ll_i2sbi(inode);
108 struct ptlrpc_request *req = NULL;
110 const char *pv = value;
113 /*FIXME: enable IMA when the conditions are ready */
114 if (strncmp(name, XATTR_NAME_IMA,
115 sizeof(XATTR_NAME_IMA)) == 0 ||
116 strncmp(name, XATTR_NAME_EVM,
117 sizeof(XATTR_NAME_EVM)) == 0)
120 xattr_type = get_xattr26_type(name);
121 rc = xattr_type_filter(sbi, xattr_type);
125 if ((xattr_type == XATTR_ACL_ACCESS_T ||
126 xattr_type == XATTR_ACL_DEFAULT_T) &&
127 !inode_owner_or_capable(inode))
130 /* b10667: ignore lustre special xattr for now */
131 if (strcmp(name, XATTR_NAME_HSM) == 0 ||
132 (xattr_type == XATTR_TRUSTED_T &&
133 strcmp(name, XATTR_NAME_LOV) == 0) ||
134 (xattr_type == XATTR_LUSTRE_T &&
135 strcmp(name, "lustre.lov") == 0))
138 /* LU-549: Disable security.selinux when selinux is disabled */
139 if (xattr_type == XATTR_SECURITY_T && !selinux_is_enabled() &&
140 strcmp(name, "security.selinux") == 0)
143 /* In user.* namespace, only regular files and directories can have
144 * extended attributes. */
145 if (xattr_type == XATTR_USER_T) {
146 if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
150 rc = md_setxattr(sbi->ll_md_exp, ll_inode2fid(inode), valid, name, pv,
151 size, flags, ll_i2suppgid(inode), &req);
153 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
154 LCONSOLE_INFO("Disabling user_xattr feature because "
155 "it is not supported on the server\n");
156 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
161 ptlrpc_req_finished(req);
165 static int get_hsm_state(struct inode *inode, __u32 *hus_states)
167 struct md_op_data *op_data;
168 struct hsm_user_state *hus;
175 op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
176 LUSTRE_OPC_ANY, hus);
177 if (!IS_ERR(op_data)) {
178 rc = obd_iocontrol(LL_IOC_HSM_STATE_GET, ll_i2mdexp(inode),
179 sizeof(*op_data), op_data, NULL);
181 *hus_states = hus->hus_states;
183 CDEBUG(D_VFSTRACE, "obd_iocontrol failed. rc = %d\n",
186 ll_finish_md_op_data(op_data);
188 rc = PTR_ERR(op_data);
189 CDEBUG(D_VFSTRACE, "Could not prepare the opdata. rc = %d\n",
196 static int ll_adjust_lum(struct inode *inode, struct lov_user_md *lump)
198 struct lov_comp_md_v1 *comp_v1 = (struct lov_comp_md_v1 *)lump;
199 struct lov_user_md *v1 = lump;
200 bool release_checked = false;
201 bool need_clear_release = false;
202 __u16 entry_count = 1;
203 bool is_composite = false;
210 if (lump->lmm_magic == LOV_USER_MAGIC_COMP_V1) {
211 entry_count = comp_v1->lcm_entry_count;
215 for (i = 0; i < entry_count; i++) {
216 if (lump->lmm_magic == LOV_USER_MAGIC_COMP_V1)
217 v1 = (struct lov_user_md *)((char *)comp_v1 +
218 comp_v1->lcm_entries[i].lcme_offset);
220 /* Attributes that are saved via getxattr will always
221 * have the stripe_offset as 0. Instead, the MDS
222 * should be allowed to pick the starting OST index.
224 if (!is_composite && v1->lmm_stripe_offset == 0)
225 v1->lmm_stripe_offset = -1;
227 /* Avoid anyone directly setting the RELEASED flag. */
228 if (v1->lmm_pattern & LOV_PATTERN_F_RELEASED) {
229 if (!release_checked) {
230 __u32 state = HS_NONE;
231 rc = get_hsm_state(inode, &state);
234 if (!(state & HS_ARCHIVED))
235 need_clear_release = true;
236 release_checked = true;
238 if (need_clear_release)
239 v1->lmm_pattern ^= LOV_PATTERN_F_RELEASED;
246 static int ll_setstripe_ea(struct dentry *dentry, struct lov_user_md *lump,
249 struct inode *inode = dentry->d_inode;
252 rc = ll_adjust_lum(inode, lump);
256 if (lump != NULL && S_ISREG(inode->i_mode)) {
257 u64 it_flags = FMODE_WRITE;
260 lum_size = ll_lov_user_md_size(lump);
261 if (lum_size < 0 || size < lum_size)
264 rc = ll_lov_setstripe_ea_info(inode, dentry, it_flags, lump,
267 * b=10667: ignore -EEXIST.
268 * Silently eat error on setting trusted.lov/lustre.lov
269 * attribute for SuSE 9, it added default option to copy
270 * all attributes in 'cp' command. rsync, tar --xattrs
271 * also will try to set LOVEA for existing files.
275 } else if (S_ISDIR(inode->i_mode)) {
276 rc = ll_dir_setstripe(inode, lump, 0);
282 int ll_setxattr(struct dentry *dentry, const char *name,
283 const void *value, size_t size, int flags)
285 struct inode *inode = dentry->d_inode;
290 CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p), xattr %s\n",
291 PFID(ll_inode2fid(inode)), inode, name);
293 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_SETXATTR, 1);
295 /* lustre/trusted.lov.xxx would be passed through xattr API */
296 if (strcmp(name, XATTR_NAME_LOV) == 0 ||
297 strcmp(name, XATTR_LUSTRE_LOV) == 0)
298 return ll_setstripe_ea(dentry, (struct lov_user_md *)value,
300 else if (strcmp(name, XATTR_NAME_LMA) == 0 ||
301 strcmp(name, XATTR_NAME_LINK) == 0)
304 return ll_setxattr_common(inode, name, value, size, flags,
308 int ll_removexattr(struct dentry *dentry, const char *name)
310 struct inode *inode = dentry->d_inode;
315 CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p), xattr %s\n",
316 PFID(ll_inode2fid(inode)), inode, name);
318 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_REMOVEXATTR, 1);
319 return ll_setxattr_common(inode, name, NULL, 0, 0,
323 int ll_getxattr_common(struct inode *inode, const char *name,
324 void *buffer, size_t size, __u64 valid)
326 struct ll_sb_info *sbi = ll_i2sbi(inode);
327 struct ptlrpc_request *req = NULL;
330 struct ll_inode_info *lli = ll_i2info(inode);
333 CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p)\n",
334 PFID(ll_inode2fid(inode)), inode);
336 /* listxattr have slightly different behavior from of ext3:
337 * without 'user_xattr' ext3 will list all xattr names but
338 * filtered out "^user..*"; we list them all for simplicity.
341 xattr_type = XATTR_OTHER_T;
345 xattr_type = get_xattr26_type(name);
346 rc = xattr_type_filter(sbi, xattr_type);
350 /* LU-549: Disable security.selinux when selinux is disabled */
351 if (xattr_type == XATTR_SECURITY_T && !selinux_is_enabled() &&
352 strcmp(name, "security.selinux") == 0)
355 #ifdef CONFIG_FS_POSIX_ACL
356 /* posix acl is under protection of LOOKUP lock. when calling to this,
357 * we just have path resolution to the target inode, so we have great
358 * chance that cached ACL is uptodate.
360 if (xattr_type == XATTR_ACL_ACCESS_T) {
361 struct posix_acl *acl;
363 spin_lock(&lli->lli_lock);
364 acl = posix_acl_dup(lli->lli_posix_acl);
365 spin_unlock(&lli->lli_lock);
370 rc = posix_acl_to_xattr(&init_user_ns, acl, buffer, size);
371 posix_acl_release(acl);
374 if (xattr_type == XATTR_ACL_DEFAULT_T && !S_ISDIR(inode->i_mode))
379 if (sbi->ll_xattr_cache_enabled &&
380 xattr_type != XATTR_ACL_ACCESS_T &&
381 (xattr_type != XATTR_SECURITY_T ||
382 strcmp(name, "security.selinux") != 0)) {
383 rc = ll_xattr_cache_get(inode, name, buffer, size, valid);
385 goto getxattr_nocache;
389 /* Add "system.posix_acl_access" to the list */
390 if (lli->lli_posix_acl != NULL && valid & OBD_MD_FLXATTRLS) {
392 rc += sizeof(XATTR_NAME_ACL_ACCESS);
393 } else if (size - rc >= sizeof(XATTR_NAME_ACL_ACCESS)) {
394 memcpy(buffer + rc, XATTR_NAME_ACL_ACCESS,
395 sizeof(XATTR_NAME_ACL_ACCESS));
396 rc += sizeof(XATTR_NAME_ACL_ACCESS);
398 GOTO(out_xattr, rc = -ERANGE);
403 rc = md_getxattr(sbi->ll_md_exp, ll_inode2fid(inode), valid,
408 /* only detect the xattr size */
413 GOTO(out, rc = -ERANGE);
415 /* do not need swab xattr data */
416 xdata = req_capsule_server_sized_get(&req->rq_pill, &RMF_EADATA,
419 GOTO(out, rc = -EPROTO);
421 memcpy(buffer, xdata, rc);
427 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
428 LCONSOLE_INFO("%s: disabling user_xattr feature because "
429 "it is not supported on the server: rc = %d\n",
430 ll_i2sbi(inode)->ll_fsname, rc);
431 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
434 ptlrpc_req_finished(req);
438 static ssize_t ll_getxattr_lov(struct inode *inode, void *buf, size_t buf_size)
442 if (S_ISREG(inode->i_mode)) {
443 struct cl_object *obj = ll_i2info(inode)->lli_clob;
445 struct cl_layout cl = {
446 .cl_buf.lb_buf = buf,
447 .cl_buf.lb_len = buf_size,
455 env = cl_env_get(&refcheck);
457 RETURN(PTR_ERR(env));
459 rc = cl_object_layout_get(env, obj, &cl);
464 GOTO(out_env, rc = -ENODATA);
471 LASSERT(buf != NULL && rc <= buf_size);
473 /* Do not return layout gen for getxattr() since
474 * otherwise it would confuse tar --xattr by
475 * recognizing layout gen as stripe offset when the
476 * file is restored. See LU-2809. */
477 magic = ((struct lov_mds_md *)buf)->lmm_magic;
478 if (magic == LOV_MAGIC_COMP_V1 || magic == LOV_MAGIC_FOREIGN)
481 ((struct lov_mds_md *)buf)->lmm_layout_gen = 0;
483 cl_env_put(env, &refcheck);
486 } else if (S_ISDIR(inode->i_mode)) {
487 struct lov_mds_md *lmm = NULL;
489 struct ptlrpc_request *req = NULL;
491 rc = ll_dir_getstripe(inode, (void **)&lmm, &lmm_size,
497 GOTO(out_req, rc = lmm_size);
499 if (buf_size < lmm_size)
500 GOTO(out_req, rc = -ERANGE);
502 memcpy(buf, lmm, lmm_size);
503 GOTO(out_req, rc = lmm_size);
506 ptlrpc_req_finished(req);
514 ssize_t ll_getxattr(struct dentry *dentry, const char *name, void *buf,
517 struct inode *inode = dentry->d_inode;
522 CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p), xattr %s\n",
523 PFID(ll_inode2fid(inode)), inode, name);
525 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_GETXATTR, 1);
527 if (strcmp(name, XATTR_LUSTRE_LOV) == 0 ||
528 strcmp(name, XATTR_NAME_LOV) == 0)
529 return ll_getxattr_lov(inode, buf, buf_size);
531 return ll_getxattr_common(inode, name, buf, buf_size,
535 ssize_t ll_listxattr(struct dentry *dentry, char *buf, size_t buf_size)
537 struct inode *inode = dentry->d_inode;
538 struct ll_sb_info *sbi = ll_i2sbi(inode);
543 CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p)\n",
544 PFID(ll_inode2fid(inode)), inode);
546 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_LISTXATTR, 1);
548 rc = ll_getxattr_common(inode, NULL, buf, buf_size, OBD_MD_FLXATTRLS);
552 /* If we're being called to get the size of the xattr list
553 * (buf_size == 0) then just assume that a lustre.lov xattr
556 RETURN(rc + sizeof(XATTR_LUSTRE_LOV));
562 len = strnlen(xattr_name, rem - 1) + 1;
564 if (xattr_type_filter(sbi, get_xattr26_type(xattr_name)) == 0) {
565 /* Skip OK xattr type, leave it in buffer. */
570 /* Move up remaining xattrs in buffer removing the
571 * xattr that is not OK. */
572 memmove(xattr_name, xattr_name + len, rem);
576 rc2 = ll_getxattr_lov(inode, NULL, 0);
583 if (buf_size < rc + sizeof(XATTR_LUSTRE_LOV))
586 memcpy(buf + rc, XATTR_LUSTRE_LOV, sizeof(XATTR_LUSTRE_LOV));
588 RETURN(rc + sizeof(XATTR_LUSTRE_LOV));