staging: lustre: Coalesce string fragments
[deliverable/linux.git] / drivers / staging / lustre / lustre / llite / xattr.c
1 /*
2 * GPL HEADER START
3 *
4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5 *
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.
9 *
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).
15 *
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
19 *
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
22 * have any questions.
23 *
24 * GPL HEADER END
25 */
26 /*
27 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
29 *
30 * Copyright (c) 2011, 2012, Intel Corporation.
31 */
32 /*
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
35 */
36
37 #include <linux/fs.h>
38 #include <linux/sched.h>
39 #include <linux/mm.h>
40 #include <linux/selinux.h>
41
42 #define DEBUG_SUBSYSTEM S_LLITE
43
44 #include "../include/obd_support.h"
45 #include "../include/lustre_lite.h"
46 #include "../include/lustre_dlm.h"
47 #include "../include/lustre_ver.h"
48 #include "../include/lustre_eacl.h"
49
50 #include "llite_internal.h"
51
52 #define XATTR_USER_T (1)
53 #define XATTR_TRUSTED_T (2)
54 #define XATTR_SECURITY_T (3)
55 #define XATTR_ACL_ACCESS_T (4)
56 #define XATTR_ACL_DEFAULT_T (5)
57 #define XATTR_LUSTRE_T (6)
58 #define XATTR_OTHER_T (7)
59
60 static
61 int get_xattr_type(const char *name)
62 {
63 if (!strcmp(name, POSIX_ACL_XATTR_ACCESS))
64 return XATTR_ACL_ACCESS_T;
65
66 if (!strcmp(name, POSIX_ACL_XATTR_DEFAULT))
67 return XATTR_ACL_DEFAULT_T;
68
69 if (!strncmp(name, XATTR_USER_PREFIX,
70 sizeof(XATTR_USER_PREFIX) - 1))
71 return XATTR_USER_T;
72
73 if (!strncmp(name, XATTR_TRUSTED_PREFIX,
74 sizeof(XATTR_TRUSTED_PREFIX) - 1))
75 return XATTR_TRUSTED_T;
76
77 if (!strncmp(name, XATTR_SECURITY_PREFIX,
78 sizeof(XATTR_SECURITY_PREFIX) - 1))
79 return XATTR_SECURITY_T;
80
81 if (!strncmp(name, XATTR_LUSTRE_PREFIX,
82 sizeof(XATTR_LUSTRE_PREFIX) - 1))
83 return XATTR_LUSTRE_T;
84
85 return XATTR_OTHER_T;
86 }
87
88 static
89 int xattr_type_filter(struct ll_sb_info *sbi, int xattr_type)
90 {
91 if ((xattr_type == XATTR_ACL_ACCESS_T ||
92 xattr_type == XATTR_ACL_DEFAULT_T) &&
93 !(sbi->ll_flags & LL_SBI_ACL))
94 return -EOPNOTSUPP;
95
96 if (xattr_type == XATTR_USER_T && !(sbi->ll_flags & LL_SBI_USER_XATTR))
97 return -EOPNOTSUPP;
98 if (xattr_type == XATTR_TRUSTED_T && !capable(CFS_CAP_SYS_ADMIN))
99 return -EPERM;
100 if (xattr_type == XATTR_OTHER_T)
101 return -EOPNOTSUPP;
102
103 return 0;
104 }
105
106 static
107 int ll_setxattr_common(struct inode *inode, const char *name,
108 const void *value, size_t size,
109 int flags, __u64 valid)
110 {
111 struct ll_sb_info *sbi = ll_i2sbi(inode);
112 struct ptlrpc_request *req = NULL;
113 int xattr_type, rc;
114 struct obd_capa *oc;
115 #ifdef CONFIG_FS_POSIX_ACL
116 struct rmtacl_ctl_entry *rce = NULL;
117 posix_acl_xattr_header *new_value = NULL;
118 ext_acl_xattr_header *acl = NULL;
119 #endif
120 const char *pv = value;
121
122 xattr_type = get_xattr_type(name);
123 rc = xattr_type_filter(sbi, xattr_type);
124 if (rc)
125 return rc;
126
127 if ((xattr_type == XATTR_ACL_ACCESS_T ||
128 xattr_type == XATTR_ACL_DEFAULT_T) &&
129 !inode_owner_or_capable(inode))
130 return -EPERM;
131
132 /* b10667: ignore lustre special xattr for now */
133 if ((xattr_type == XATTR_TRUSTED_T && strcmp(name, "trusted.lov") == 0) ||
134 (xattr_type == XATTR_LUSTRE_T && strcmp(name, "lustre.lov") == 0))
135 return 0;
136
137 /* b15587: ignore security.capability xattr for now */
138 if ((xattr_type == XATTR_SECURITY_T &&
139 strcmp(name, "security.capability") == 0))
140 return 0;
141
142 /* LU-549: Disable security.selinux when selinux is disabled */
143 if (xattr_type == XATTR_SECURITY_T && !selinux_is_enabled() &&
144 strcmp(name, "security.selinux") == 0)
145 return -EOPNOTSUPP;
146
147 #ifdef CONFIG_FS_POSIX_ACL
148 if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
149 (xattr_type == XATTR_ACL_ACCESS_T ||
150 xattr_type == XATTR_ACL_DEFAULT_T)) {
151 rce = rct_search(&sbi->ll_rct, current_pid());
152 if (rce == NULL ||
153 (rce->rce_ops != RMT_LSETFACL &&
154 rce->rce_ops != RMT_RSETFACL))
155 return -EOPNOTSUPP;
156
157 if (rce->rce_ops == RMT_LSETFACL) {
158 struct eacl_entry *ee;
159
160 ee = et_search_del(&sbi->ll_et, current_pid(),
161 ll_inode2fid(inode), xattr_type);
162 LASSERT(ee != NULL);
163 if (valid & OBD_MD_FLXATTR) {
164 acl = lustre_acl_xattr_merge2ext(
165 (posix_acl_xattr_header *)value,
166 size, ee->ee_acl);
167 if (IS_ERR(acl)) {
168 ee_free(ee);
169 return PTR_ERR(acl);
170 }
171 size = CFS_ACL_XATTR_SIZE(\
172 le32_to_cpu(acl->a_count), \
173 ext_acl_xattr);
174 pv = (const char *)acl;
175 }
176 ee_free(ee);
177 } else if (rce->rce_ops == RMT_RSETFACL) {
178 size = lustre_posix_acl_xattr_filter(
179 (posix_acl_xattr_header *)value,
180 size, &new_value);
181 if (unlikely(size < 0))
182 return size;
183
184 pv = (const char *)new_value;
185 } else
186 return -EOPNOTSUPP;
187
188 valid |= rce_ops2valid(rce->rce_ops);
189 }
190 #endif
191 oc = ll_mdscapa_get(inode);
192 rc = md_setxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
193 valid, name, pv, size, 0, flags,
194 ll_i2suppgid(inode), &req);
195 capa_put(oc);
196 #ifdef CONFIG_FS_POSIX_ACL
197 if (new_value != NULL)
198 lustre_posix_acl_xattr_free(new_value, size);
199 if (acl != NULL)
200 lustre_ext_acl_xattr_free(acl);
201 #endif
202 if (rc) {
203 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
204 LCONSOLE_INFO("Disabling user_xattr feature because it is not supported on the server\n");
205 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
206 }
207 return rc;
208 }
209
210 ptlrpc_req_finished(req);
211 return 0;
212 }
213
214 int ll_setxattr(struct dentry *dentry, const char *name,
215 const void *value, size_t size, int flags)
216 {
217 struct inode *inode = dentry->d_inode;
218
219 LASSERT(inode);
220 LASSERT(name);
221
222 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
223 inode->i_ino, inode->i_generation, inode, name);
224
225 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_SETXATTR, 1);
226
227 if ((strncmp(name, XATTR_TRUSTED_PREFIX,
228 sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
229 strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
230 (strncmp(name, XATTR_LUSTRE_PREFIX,
231 sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
232 strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
233 struct lov_user_md *lump = (struct lov_user_md *)value;
234 int rc = 0;
235
236 if (size != 0 && size < sizeof(struct lov_user_md))
237 return -EINVAL;
238
239 /* Attributes that are saved via getxattr will always have
240 * the stripe_offset as 0. Instead, the MDS should be
241 * allowed to pick the starting OST index. b=17846 */
242 if (lump != NULL && lump->lmm_stripe_offset == 0)
243 lump->lmm_stripe_offset = -1;
244
245 if (lump != NULL && S_ISREG(inode->i_mode)) {
246 struct file f;
247 int flags = FMODE_WRITE;
248 int lum_size = (lump->lmm_magic == LOV_USER_MAGIC_V1) ?
249 sizeof(*lump) : sizeof(struct lov_user_md_v3);
250
251 memset(&f, 0, sizeof(f)); /* f.f_flags is used below */
252 f.f_dentry = dentry;
253 rc = ll_lov_setstripe_ea_info(inode, &f, flags, lump,
254 lum_size);
255 /* b10667: rc always be 0 here for now */
256 rc = 0;
257 } else if (S_ISDIR(inode->i_mode)) {
258 rc = ll_dir_setstripe(inode, lump, 0);
259 }
260
261 return rc;
262
263 } else if (strcmp(name, XATTR_NAME_LMA) == 0 ||
264 strcmp(name, XATTR_NAME_LINK) == 0)
265 return 0;
266
267 return ll_setxattr_common(inode, name, value, size, flags,
268 OBD_MD_FLXATTR);
269 }
270
271 int ll_removexattr(struct dentry *dentry, const char *name)
272 {
273 struct inode *inode = dentry->d_inode;
274
275 LASSERT(inode);
276 LASSERT(name);
277
278 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
279 inode->i_ino, inode->i_generation, inode, name);
280
281 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_REMOVEXATTR, 1);
282 return ll_setxattr_common(inode, name, NULL, 0, 0,
283 OBD_MD_FLXATTRRM);
284 }
285
286 static
287 int ll_getxattr_common(struct inode *inode, const char *name,
288 void *buffer, size_t size, __u64 valid)
289 {
290 struct ll_sb_info *sbi = ll_i2sbi(inode);
291 struct ptlrpc_request *req = NULL;
292 struct mdt_body *body;
293 int xattr_type, rc;
294 void *xdata;
295 struct obd_capa *oc;
296 struct rmtacl_ctl_entry *rce = NULL;
297 struct ll_inode_info *lli = ll_i2info(inode);
298
299 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
300 inode->i_ino, inode->i_generation, inode);
301
302 /* listxattr have slightly different behavior from of ext3:
303 * without 'user_xattr' ext3 will list all xattr names but
304 * filtered out "^user..*"; we list them all for simplicity.
305 */
306 if (!name) {
307 xattr_type = XATTR_OTHER_T;
308 goto do_getxattr;
309 }
310
311 xattr_type = get_xattr_type(name);
312 rc = xattr_type_filter(sbi, xattr_type);
313 if (rc)
314 return rc;
315
316 /* b15587: ignore security.capability xattr for now */
317 if ((xattr_type == XATTR_SECURITY_T &&
318 strcmp(name, "security.capability") == 0))
319 return -ENODATA;
320
321 /* LU-549: Disable security.selinux when selinux is disabled */
322 if (xattr_type == XATTR_SECURITY_T && !selinux_is_enabled() &&
323 strcmp(name, "security.selinux") == 0)
324 return -EOPNOTSUPP;
325
326 #ifdef CONFIG_FS_POSIX_ACL
327 if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
328 (xattr_type == XATTR_ACL_ACCESS_T ||
329 xattr_type == XATTR_ACL_DEFAULT_T)) {
330 rce = rct_search(&sbi->ll_rct, current_pid());
331 if (rce == NULL ||
332 (rce->rce_ops != RMT_LSETFACL &&
333 rce->rce_ops != RMT_LGETFACL &&
334 rce->rce_ops != RMT_RSETFACL &&
335 rce->rce_ops != RMT_RGETFACL))
336 return -EOPNOTSUPP;
337 }
338
339 /* posix acl is under protection of LOOKUP lock. when calling to this,
340 * we just have path resolution to the target inode, so we have great
341 * chance that cached ACL is uptodate.
342 */
343 if (xattr_type == XATTR_ACL_ACCESS_T &&
344 !(sbi->ll_flags & LL_SBI_RMT_CLIENT)) {
345
346 struct posix_acl *acl;
347
348 spin_lock(&lli->lli_lock);
349 acl = posix_acl_dup(lli->lli_posix_acl);
350 spin_unlock(&lli->lli_lock);
351
352 if (!acl)
353 return -ENODATA;
354
355 rc = posix_acl_to_xattr(&init_user_ns, acl, buffer, size);
356 posix_acl_release(acl);
357 return rc;
358 }
359 if (xattr_type == XATTR_ACL_DEFAULT_T && !S_ISDIR(inode->i_mode))
360 return -ENODATA;
361 #endif
362
363 do_getxattr:
364 if (sbi->ll_xattr_cache_enabled && xattr_type != XATTR_ACL_ACCESS_T) {
365 rc = ll_xattr_cache_get(inode, name, buffer, size, valid);
366 if (rc == -EAGAIN)
367 goto getxattr_nocache;
368 if (rc < 0)
369 goto out_xattr;
370
371 /* Add "system.posix_acl_access" to the list */
372 if (lli->lli_posix_acl != NULL && valid & OBD_MD_FLXATTRLS) {
373 if (size == 0) {
374 rc += sizeof(XATTR_NAME_ACL_ACCESS);
375 } else if (size - rc >= sizeof(XATTR_NAME_ACL_ACCESS)) {
376 memcpy(buffer + rc, XATTR_NAME_ACL_ACCESS,
377 sizeof(XATTR_NAME_ACL_ACCESS));
378 rc += sizeof(XATTR_NAME_ACL_ACCESS);
379 } else {
380 rc = -ERANGE;
381 goto out_xattr;
382 }
383 }
384 } else {
385 getxattr_nocache:
386 oc = ll_mdscapa_get(inode);
387 rc = md_getxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
388 valid | (rce ? rce_ops2valid(rce->rce_ops) : 0),
389 name, NULL, 0, size, 0, &req);
390 capa_put(oc);
391
392 if (rc < 0)
393 goto out_xattr;
394
395 body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
396 LASSERT(body);
397
398 /* only detect the xattr size */
399 if (size == 0) {
400 rc = body->eadatasize;
401 goto out;
402 }
403
404 if (size < body->eadatasize) {
405 CERROR("server bug: replied size %u > %u\n",
406 body->eadatasize, (int)size);
407 rc = -ERANGE;
408 goto out;
409 }
410
411 if (body->eadatasize == 0) {
412 rc = -ENODATA;
413 goto out;
414 }
415
416 /* do not need swab xattr data */
417 xdata = req_capsule_server_sized_get(&req->rq_pill, &RMF_EADATA,
418 body->eadatasize);
419 if (!xdata) {
420 rc = -EFAULT;
421 goto out;
422 }
423
424 memcpy(buffer, xdata, body->eadatasize);
425 rc = body->eadatasize;
426 }
427
428 #ifdef CONFIG_FS_POSIX_ACL
429 if (rce && rce->rce_ops == RMT_LSETFACL) {
430 ext_acl_xattr_header *acl;
431
432 acl = lustre_posix_acl_xattr_2ext(
433 (posix_acl_xattr_header *)buffer, rc);
434 if (IS_ERR(acl)) {
435 rc = PTR_ERR(acl);
436 goto out;
437 }
438
439 rc = ee_add(&sbi->ll_et, current_pid(), ll_inode2fid(inode),
440 xattr_type, acl);
441 if (unlikely(rc < 0)) {
442 lustre_ext_acl_xattr_free(acl);
443 goto out;
444 }
445 }
446 #endif
447
448 out_xattr:
449 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
450 LCONSOLE_INFO(
451 "%s: disabling user_xattr feature because it is not supported on the server: rc = %d\n",
452 ll_get_fsname(inode->i_sb, NULL, 0), rc);
453 sbi->ll_flags &= ~LL_SBI_USER_XATTR;
454 }
455 out:
456 ptlrpc_req_finished(req);
457 return rc;
458 }
459
460 ssize_t ll_getxattr(struct dentry *dentry, const char *name,
461 void *buffer, size_t size)
462 {
463 struct inode *inode = dentry->d_inode;
464
465 LASSERT(inode);
466 LASSERT(name);
467
468 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
469 inode->i_ino, inode->i_generation, inode, name);
470
471 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_GETXATTR, 1);
472
473 if ((strncmp(name, XATTR_TRUSTED_PREFIX,
474 sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
475 strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
476 (strncmp(name, XATTR_LUSTRE_PREFIX,
477 sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
478 strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
479 struct lov_stripe_md *lsm;
480 struct lov_user_md *lump;
481 struct lov_mds_md *lmm = NULL;
482 struct ptlrpc_request *request = NULL;
483 int rc = 0, lmmsize = 0;
484
485 if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
486 return -ENODATA;
487
488 if (size == 0 && S_ISDIR(inode->i_mode)) {
489 /* XXX directory EA is fix for now, optimize to save
490 * RPC transfer */
491 rc = sizeof(struct lov_user_md);
492 goto out;
493 }
494
495 lsm = ccc_inode_lsm_get(inode);
496 if (lsm == NULL) {
497 if (S_ISDIR(inode->i_mode)) {
498 rc = ll_dir_getstripe(inode, &lmm,
499 &lmmsize, &request);
500 } else {
501 rc = -ENODATA;
502 }
503 } else {
504 /* LSM is present already after lookup/getattr call.
505 * we need to grab layout lock once it is implemented */
506 rc = obd_packmd(ll_i2dtexp(inode), &lmm, lsm);
507 lmmsize = rc;
508 }
509 ccc_inode_lsm_put(inode, lsm);
510
511 if (rc < 0)
512 goto out;
513
514 if (size == 0) {
515 /* used to call ll_get_max_mdsize() forward to get
516 * the maximum buffer size, while some apps (such as
517 * rsync 3.0.x) care much about the exact xattr value
518 * size */
519 rc = lmmsize;
520 goto out;
521 }
522
523 if (size < lmmsize) {
524 CERROR("server bug: replied size %d > %d for %s (%s)\n",
525 lmmsize, (int)size, dentry->d_name.name, name);
526 rc = -ERANGE;
527 goto out;
528 }
529
530 lump = (struct lov_user_md *)buffer;
531 memcpy(lump, lmm, lmmsize);
532 /* do not return layout gen for getxattr otherwise it would
533 * confuse tar --xattr by recognizing layout gen as stripe
534 * offset when the file is restored. See LU-2809. */
535 lump->lmm_layout_gen = 0;
536
537 rc = lmmsize;
538 out:
539 if (request)
540 ptlrpc_req_finished(request);
541 else if (lmm)
542 obd_free_diskmd(ll_i2dtexp(inode), &lmm);
543 return rc;
544 }
545
546 return ll_getxattr_common(inode, name, buffer, size, OBD_MD_FLXATTR);
547 }
548
549 ssize_t ll_listxattr(struct dentry *dentry, char *buffer, size_t size)
550 {
551 struct inode *inode = dentry->d_inode;
552 int rc = 0, rc2 = 0;
553 struct lov_mds_md *lmm = NULL;
554 struct ptlrpc_request *request = NULL;
555 int lmmsize;
556
557 LASSERT(inode);
558
559 CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
560 inode->i_ino, inode->i_generation, inode);
561
562 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_LISTXATTR, 1);
563
564 rc = ll_getxattr_common(inode, NULL, buffer, size, OBD_MD_FLXATTRLS);
565 if (rc < 0)
566 goto out;
567
568 if (buffer != NULL) {
569 struct ll_sb_info *sbi = ll_i2sbi(inode);
570 char *xattr_name = buffer;
571 int xlen, rem = rc;
572
573 while (rem > 0) {
574 xlen = strnlen(xattr_name, rem - 1) + 1;
575 rem -= xlen;
576 if (xattr_type_filter(sbi,
577 get_xattr_type(xattr_name)) == 0) {
578 /* skip OK xattr type
579 * leave it in buffer
580 */
581 xattr_name += xlen;
582 continue;
583 }
584 /* move up remaining xattrs in buffer
585 * removing the xattr that is not OK
586 */
587 memmove(xattr_name, xattr_name + xlen, rem);
588 rc -= xlen;
589 }
590 }
591 if (S_ISREG(inode->i_mode)) {
592 if (!ll_i2info(inode)->lli_has_smd)
593 rc2 = -1;
594 } else if (S_ISDIR(inode->i_mode)) {
595 rc2 = ll_dir_getstripe(inode, &lmm, &lmmsize, &request);
596 }
597
598 if (rc2 < 0) {
599 rc2 = 0;
600 goto out;
601 } else if (S_ISREG(inode->i_mode) || S_ISDIR(inode->i_mode)) {
602 const int prefix_len = sizeof(XATTR_LUSTRE_PREFIX) - 1;
603 const size_t name_len = sizeof("lov") - 1;
604 const size_t total_len = prefix_len + name_len + 1;
605
606 if (((rc + total_len) > size) && (buffer != NULL)) {
607 ptlrpc_req_finished(request);
608 return -ERANGE;
609 }
610
611 if (buffer != NULL) {
612 buffer += rc;
613 memcpy(buffer, XATTR_LUSTRE_PREFIX, prefix_len);
614 memcpy(buffer + prefix_len, "lov", name_len);
615 buffer[prefix_len + name_len] = '\0';
616 }
617 rc2 = total_len;
618 }
619 out:
620 ptlrpc_req_finished(request);
621 rc = rc + rc2;
622
623 return rc;
624 }
This page took 0.04691 seconds and 5 git commands to generate.