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.sun.com/software/products/lustre/docs/GPLv2.pdf
20 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21 * CA 95054 USA or visit www.sun.com if you need additional information or
27 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
30 * Copyright (c) 2011, 2012, Whamcloud, Inc.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
38 #include <linux/sched.h>
40 #include <linux/smp_lock.h>
41 #ifdef HAVE_SELINUX_IS_ENABLED
42 #include <linux/selinux.h>
45 #define DEBUG_SUBSYSTEM S_LLITE
47 #include <obd_support.h>
48 #include <lustre_lite.h>
49 #include <lustre_dlm.h>
50 #include <lustre_ver.h>
51 #include <lustre_acl.h>
53 #include "llite_internal.h"
55 #define XATTR_USER_T (1)
56 #define XATTR_TRUSTED_T (2)
57 #define XATTR_SECURITY_T (3)
58 #define XATTR_ACL_ACCESS_T (4)
59 #define XATTR_ACL_DEFAULT_T (5)
60 #define XATTR_LUSTRE_T (6)
61 #define XATTR_OTHER_T (7)
64 int get_xattr_type(const char *name)
66 if (!strcmp(name, POSIX_ACL_XATTR_ACCESS))
67 return XATTR_ACL_ACCESS_T;
69 if (!strcmp(name, POSIX_ACL_XATTR_DEFAULT))
70 return XATTR_ACL_DEFAULT_T;
72 if (!strncmp(name, XATTR_USER_PREFIX,
73 sizeof(XATTR_USER_PREFIX) - 1))
76 if (!strncmp(name, XATTR_TRUSTED_PREFIX,
77 sizeof(XATTR_TRUSTED_PREFIX) - 1))
78 return XATTR_TRUSTED_T;
80 if (!strncmp(name, XATTR_SECURITY_PREFIX,
81 sizeof(XATTR_SECURITY_PREFIX) - 1))
82 return XATTR_SECURITY_T;
84 if (!strncmp(name, XATTR_LUSTRE_PREFIX,
85 sizeof(XATTR_LUSTRE_PREFIX) - 1))
86 return XATTR_LUSTRE_T;
92 int xattr_type_filter(struct ll_sb_info *sbi, int xattr_type)
94 if ((xattr_type == XATTR_ACL_ACCESS_T ||
95 xattr_type == XATTR_ACL_DEFAULT_T) &&
96 !(sbi->ll_flags & LL_SBI_ACL))
99 if (xattr_type == XATTR_SECURITY_T && !selinux_is_enabled())
101 if (xattr_type == XATTR_USER_T && !(sbi->ll_flags & LL_SBI_USER_XATTR))
103 if (xattr_type == XATTR_TRUSTED_T && !cfs_capable(CFS_CAP_SYS_ADMIN))
105 if (xattr_type == XATTR_OTHER_T)
112 int ll_setxattr_common(struct inode *inode, const char *name,
113 const void *value, size_t size,
114 int flags, __u64 valid)
116 struct ll_sb_info *sbi = ll_i2sbi(inode);
117 struct ptlrpc_request *req;
120 posix_acl_xattr_header *new_value = NULL;
121 struct rmtacl_ctl_entry *rce = NULL;
122 ext_acl_xattr_header *acl = NULL;
123 const char *pv = value;
126 xattr_type = get_xattr_type(name);
127 rc = xattr_type_filter(sbi, xattr_type);
131 /* b10667: ignore lustre special xattr for now */
132 if ((xattr_type == XATTR_TRUSTED_T && strcmp(name, "trusted.lov") == 0) ||
133 (xattr_type == XATTR_LUSTRE_T && strcmp(name, "lustre.lov") == 0))
136 /* b15587: ignore security.capability xattr for now */
137 if ((xattr_type == XATTR_SECURITY_T &&
138 strcmp(name, "security.capability") == 0))
141 #ifdef CONFIG_FS_POSIX_ACL
142 if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
143 (xattr_type == XATTR_ACL_ACCESS_T ||
144 xattr_type == XATTR_ACL_DEFAULT_T)) {
145 rce = rct_search(&sbi->ll_rct, cfs_curproc_pid());
147 (rce->rce_ops != RMT_LSETFACL &&
148 rce->rce_ops != RMT_RSETFACL))
151 if (rce->rce_ops == RMT_LSETFACL) {
152 struct eacl_entry *ee;
154 ee = et_search_del(&sbi->ll_et, cfs_curproc_pid(),
155 ll_inode2fid(inode), xattr_type);
157 if (valid & OBD_MD_FLXATTR) {
158 acl = lustre_acl_xattr_merge2ext(
159 (posix_acl_xattr_header *)value,
163 RETURN(PTR_ERR(acl));
165 size = CFS_ACL_XATTR_SIZE(\
166 le32_to_cpu(acl->a_count), \
168 pv = (const char *)acl;
171 } else if (rce->rce_ops == RMT_RSETFACL) {
172 size = lustre_posix_acl_xattr_filter(
173 (posix_acl_xattr_header *)value,
175 if (unlikely(size < 0))
178 pv = (const char *)new_value;
182 valid |= rce_ops2valid(rce->rce_ops);
185 oc = ll_mdscapa_get(inode);
186 rc = md_setxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
187 valid, name, pv, size, 0, flags, ll_i2suppgid(inode),
190 #ifdef CONFIG_FS_POSIX_ACL
191 if (new_value != NULL)
192 lustre_posix_acl_xattr_free(new_value, size);
194 lustre_ext_acl_xattr_free(acl);
197 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
198 LCONSOLE_INFO("Disabling user_xattr feature because "
199 "it is not supported on the server\n");
200 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
205 ptlrpc_req_finished(req);
209 int ll_setxattr(struct dentry *dentry, const char *name,
210 const void *value, size_t size, int flags)
212 struct inode *inode = dentry->d_inode;
217 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
218 inode->i_ino, inode->i_generation, inode, name);
220 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_SETXATTR, 1);
222 if ((strncmp(name, XATTR_TRUSTED_PREFIX,
223 sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
224 strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
225 (strncmp(name, XATTR_LUSTRE_PREFIX,
226 sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
227 strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
228 struct lov_user_md *lump = (struct lov_user_md *)value;
231 /* Attributes that are saved via getxattr will always have
232 * the stripe_offset as 0. Instead, the MDS should be
233 * allowed to pick the starting OST index. b=17846 */
234 if (lump != NULL && lump->lmm_stripe_offset == 0)
235 lump->lmm_stripe_offset = -1;
237 if (lump != NULL && S_ISREG(inode->i_mode)) {
239 int flags = FMODE_WRITE;
242 rc = ll_lov_setstripe_ea_info(inode, &f, flags,
243 lump, sizeof(*lump));
244 /* b10667: rc always be 0 here for now */
246 } else if (S_ISDIR(inode->i_mode)) {
247 rc = ll_dir_setstripe(inode, lump, 0);
252 } else if (strcmp(name, XATTR_NAME_LMA) == 0 ||
253 strcmp(name, XATTR_NAME_LINK) == 0)
256 return ll_setxattr_common(inode, name, value, size, flags,
260 int ll_removexattr(struct dentry *dentry, const char *name)
262 struct inode *inode = dentry->d_inode;
267 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
268 inode->i_ino, inode->i_generation, inode, name);
270 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_REMOVEXATTR, 1);
271 return ll_setxattr_common(inode, name, NULL, 0, 0,
276 int ll_getxattr_common(struct inode *inode, const char *name,
277 void *buffer, size_t size, __u64 valid)
279 struct ll_sb_info *sbi = ll_i2sbi(inode);
280 struct ptlrpc_request *req = NULL;
281 struct mdt_body *body;
285 struct rmtacl_ctl_entry *rce = NULL;
288 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
289 inode->i_ino, inode->i_generation, inode);
291 /* listxattr have slightly different behavior from of ext3:
292 * without 'user_xattr' ext3 will list all xattr names but
293 * filtered out "^user..*"; we list them all for simplicity.
296 xattr_type = XATTR_OTHER_T;
300 xattr_type = get_xattr_type(name);
301 rc = xattr_type_filter(sbi, xattr_type);
305 /* b15587: ignore security.capability xattr for now */
306 if ((xattr_type == XATTR_SECURITY_T &&
307 strcmp(name, "security.capability") == 0))
310 #ifdef CONFIG_FS_POSIX_ACL
311 if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
312 (xattr_type == XATTR_ACL_ACCESS_T ||
313 xattr_type == XATTR_ACL_DEFAULT_T)) {
314 rce = rct_search(&sbi->ll_rct, cfs_curproc_pid());
316 (rce->rce_ops != RMT_LSETFACL &&
317 rce->rce_ops != RMT_LGETFACL &&
318 rce->rce_ops != RMT_RSETFACL &&
319 rce->rce_ops != RMT_RGETFACL))
323 /* posix acl is under protection of LOOKUP lock. when calling to this,
324 * we just have path resolution to the target inode, so we have great
325 * chance that cached ACL is uptodate.
327 if (xattr_type == XATTR_ACL_ACCESS_T &&
328 !(sbi->ll_flags & LL_SBI_RMT_CLIENT)) {
329 struct ll_inode_info *lli = ll_i2info(inode);
330 struct posix_acl *acl;
332 cfs_spin_lock(&lli->lli_lock);
333 acl = posix_acl_dup(lli->lli_posix_acl);
334 cfs_spin_unlock(&lli->lli_lock);
339 rc = posix_acl_to_xattr(acl, buffer, size);
340 posix_acl_release(acl);
343 if (xattr_type == XATTR_ACL_DEFAULT_T && !S_ISDIR(inode->i_mode))
348 oc = ll_mdscapa_get(inode);
349 rc = md_getxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
350 valid | (rce ? rce_ops2valid(rce->rce_ops) : 0),
351 name, NULL, 0, size, 0, &req);
354 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
355 LCONSOLE_INFO("Disabling user_xattr feature because "
356 "it is not supported on the server\n");
357 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
362 body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
365 /* only detect the xattr size */
367 GOTO(out, rc = body->eadatasize);
369 if (size < body->eadatasize) {
370 CERROR("server bug: replied size %u > %u\n",
371 body->eadatasize, (int)size);
372 GOTO(out, rc = -ERANGE);
375 if (body->eadatasize == 0)
376 GOTO(out, rc = -ENODATA);
378 /* do not need swab xattr data */
379 xdata = req_capsule_server_sized_get(&req->rq_pill, &RMF_EADATA,
382 GOTO(out, rc = -EFAULT);
384 #ifdef CONFIG_FS_POSIX_ACL
385 if (body->eadatasize >= 0 && rce && rce->rce_ops == RMT_LSETFACL) {
386 ext_acl_xattr_header *acl;
388 acl = lustre_posix_acl_xattr_2ext((posix_acl_xattr_header *)xdata,
391 GOTO(out, rc = PTR_ERR(acl));
393 rc = ee_add(&sbi->ll_et, cfs_curproc_pid(), ll_inode2fid(inode),
395 if (unlikely(rc < 0)) {
396 lustre_ext_acl_xattr_free(acl);
402 if (body->eadatasize == 0) {
406 memcpy(buffer, xdata, body->eadatasize);
407 rc = body->eadatasize;
411 ptlrpc_req_finished(req);
415 ssize_t ll_getxattr(struct dentry *dentry, const char *name,
416 void *buffer, size_t size)
418 struct inode *inode = dentry->d_inode;
423 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
424 inode->i_ino, inode->i_generation, inode, name);
426 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_GETXATTR, 1);
428 if ((strncmp(name, XATTR_TRUSTED_PREFIX,
429 sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
430 strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
431 (strncmp(name, XATTR_LUSTRE_PREFIX,
432 sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
433 strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
434 struct lov_stripe_md *lsm;
435 struct lov_user_md *lump;
436 struct lov_mds_md *lmm = NULL;
437 struct ptlrpc_request *request = NULL;
438 int rc = 0, lmmsize = 0;
440 if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
443 if (size == 0 && S_ISDIR(inode->i_mode)) {
444 /* XXX directory EA is fix for now, optimize to save
446 GOTO(out, rc = sizeof(struct lov_user_md));
449 lsm = ccc_inode_lsm_get(inode);
451 if (S_ISDIR(inode->i_mode)) {
452 rc = ll_dir_getstripe(inode, &lmm,
458 /* LSM is present already after lookup/getattr call.
459 * we need to grab layout lock once it is implemented */
460 rc = obd_packmd(ll_i2dtexp(inode), &lmm, lsm);
463 ccc_inode_lsm_put(inode, lsm);
469 /* used to call ll_get_max_mdsize() forward to get
470 * the maximum buffer size, while some apps (such as
471 * rsync 3.0.x) care much about the exact xattr value
477 if (size < lmmsize) {
478 CERROR("server bug: replied size %d > %d for %s (%s)\n",
479 lmmsize, (int)size, dentry->d_name.name, name);
480 GOTO(out, rc = -ERANGE);
483 lump = (struct lov_user_md *)buffer;
484 memcpy(lump, lmm, lmmsize);
489 ptlrpc_req_finished(request);
491 obd_free_diskmd(ll_i2dtexp(inode), &lmm);
495 return ll_getxattr_common(inode, name, buffer, size, OBD_MD_FLXATTR);
498 ssize_t ll_listxattr(struct dentry *dentry, char *buffer, size_t size)
500 struct inode *inode = dentry->d_inode;
502 struct lov_mds_md *lmm = NULL;
503 struct ptlrpc_request *request = NULL;
508 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
509 inode->i_ino, inode->i_generation, inode);
511 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_LISTXATTR, 1);
513 rc = ll_getxattr_common(inode, NULL, buffer, size, OBD_MD_FLXATTRLS);
517 if (buffer != NULL) {
518 struct ll_sb_info *sbi = ll_i2sbi(inode);
519 char *xattr_name = buffer;
523 xlen = strnlen(xattr_name, rem - 1) + 1;
525 if (xattr_type_filter(sbi,
526 get_xattr_type(xattr_name)) == 0) {
527 /* skip OK xattr type
533 /* move up remaining xattrs in buffer
534 * removing the xattr that is not OK
536 memmove(xattr_name, xattr_name + xlen, rem);
540 if (S_ISREG(inode->i_mode)) {
541 if (!ll_i2info(inode)->lli_has_smd)
543 } else if (S_ISDIR(inode->i_mode)) {
544 rc2 = ll_dir_getstripe(inode, &lmm, &lmmsize, &request);
549 } else if (S_ISREG(inode->i_mode) || S_ISDIR(inode->i_mode)) {
550 const int prefix_len = sizeof(XATTR_LUSTRE_PREFIX) - 1;
551 const size_t name_len = sizeof("lov") - 1;
552 const size_t total_len = prefix_len + name_len + 1;
554 if (buffer && (rc + total_len) <= size) {
556 memcpy(buffer, XATTR_LUSTRE_PREFIX, prefix_len);
557 memcpy(buffer + prefix_len, "lov", name_len);
558 buffer[prefix_len + name_len] = '\0';
563 ptlrpc_req_finished(request);