Whamcloud - gitweb
b=18127
[fs/lustre-release.git] / lustre / llite / xattr.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 only,
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License version 2 for more details (a copy is included
16  * in the LICENSE file that accompanied this code).
17  *
18  * You should have received a copy of the GNU General Public License
19  * version 2 along with this program; If not, see
20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
21  *
22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23  * CA 95054 USA or visit www.sun.com if you need additional information or
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
30  * Use is subject to license terms.
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/smp_lock.h>
41
42 #define DEBUG_SUBSYSTEM S_LLITE
43
44 #include <obd_support.h>
45 #include <lustre_lite.h>
46 #include <lustre_dlm.h>
47 #include <lustre_ver.h>
48 //#include <lustre_mdc.h>
49 #include <lustre_acl.h>
50
51 #include "llite_internal.h"
52
53 #define XATTR_USER_T            (1)
54 #define XATTR_TRUSTED_T         (2)
55 #define XATTR_SECURITY_T        (3)
56 #define XATTR_ACL_ACCESS_T      (4)
57 #define XATTR_ACL_DEFAULT_T     (5)
58 #define XATTR_LUSTRE_T          (6)
59 #define XATTR_OTHER_T           (7)
60
61 static
62 int get_xattr_type(const char *name)
63 {
64         if (!strcmp(name, POSIX_ACL_XATTR_ACCESS))
65                 return XATTR_ACL_ACCESS_T;
66
67         if (!strcmp(name, POSIX_ACL_XATTR_DEFAULT))
68                 return XATTR_ACL_DEFAULT_T;
69
70         if (!strncmp(name, XATTR_USER_PREFIX,
71                      sizeof(XATTR_USER_PREFIX) - 1))
72                 return XATTR_USER_T;
73
74         if (!strncmp(name, XATTR_TRUSTED_PREFIX,
75                      sizeof(XATTR_TRUSTED_PREFIX) - 1))
76                 return XATTR_TRUSTED_T;
77
78         if (!strncmp(name, XATTR_SECURITY_PREFIX,
79                      sizeof(XATTR_SECURITY_PREFIX) - 1))
80                 return XATTR_SECURITY_T;
81
82         if (!strncmp(name, XATTR_LUSTRE_PREFIX,
83                      sizeof(XATTR_LUSTRE_PREFIX) - 1))
84                 return XATTR_LUSTRE_T;
85
86         return XATTR_OTHER_T;
87 }
88
89 static
90 int xattr_type_filter(struct ll_sb_info *sbi, int xattr_type)
91 {
92         if ((xattr_type == XATTR_ACL_ACCESS_T ||
93              xattr_type == XATTR_ACL_DEFAULT_T) &&
94            !(sbi->ll_flags & LL_SBI_ACL))
95                 return -EOPNOTSUPP;
96
97         if (xattr_type == XATTR_USER_T && !(sbi->ll_flags & LL_SBI_USER_XATTR))
98                 return -EOPNOTSUPP;
99         if (xattr_type == XATTR_TRUSTED_T && !cfs_capable(CFS_CAP_SYS_ADMIN))
100                 return -EPERM;
101         if (xattr_type == XATTR_OTHER_T)
102                 return -EOPNOTSUPP;
103
104         return 0;
105 }
106
107 static
108 int ll_setxattr_common(struct inode *inode, const char *name,
109                        const void *value, size_t size,
110                        int flags, __u64 valid)
111 {
112         struct ll_sb_info *sbi = ll_i2sbi(inode);
113         struct ptlrpc_request *req;
114         int xattr_type, rc;
115         struct obd_capa *oc;
116         posix_acl_xattr_header *new_value = NULL;
117         struct rmtacl_ctl_entry *rce = NULL;
118         ext_acl_xattr_header *acl = NULL;
119         const char *pv = value;
120         ENTRY;
121
122         xattr_type = get_xattr_type(name);
123         rc = xattr_type_filter(sbi, xattr_type);
124         if (rc)
125                 RETURN(rc);
126
127         /* b10667: ignore lustre special xattr for now */
128         if ((xattr_type == XATTR_TRUSTED_T && strcmp(name, "trusted.lov") == 0) ||
129             (xattr_type == XATTR_LUSTRE_T && strcmp(name, "lustre.lov") == 0))
130                 RETURN(0);
131
132 #ifdef CONFIG_FS_POSIX_ACL
133         if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
134             (xattr_type == XATTR_ACL_ACCESS_T ||
135             xattr_type == XATTR_ACL_DEFAULT_T)) {
136                 rce = rct_search(&sbi->ll_rct, cfs_curproc_pid());
137                 if (rce == NULL ||
138                     (rce->rce_ops != RMT_LSETFACL &&
139                     rce->rce_ops != RMT_RSETFACL))
140                         RETURN(-EOPNOTSUPP);
141
142                 if (rce->rce_ops == RMT_LSETFACL) {
143                         struct eacl_entry *ee;
144
145                         ee = et_search_del(&sbi->ll_et, cfs_curproc_pid(),
146                                            ll_inode2fid(inode), xattr_type);
147                         LASSERT(ee != NULL);
148                         if (valid & OBD_MD_FLXATTR) {
149                                 acl = lustre_acl_xattr_merge2ext(
150                                                 (posix_acl_xattr_header *)value,
151                                                 size, ee->ee_acl);
152                                 if (IS_ERR(acl)) {
153                                         ee_free(ee);
154                                         RETURN(PTR_ERR(acl));
155                                 }
156                                 size =  CFS_ACL_XATTR_SIZE(\
157                                                 le32_to_cpu(acl->a_count), \
158                                                 ext_acl_xattr);
159                                 pv = (const char *)acl;
160                         }
161                         ee_free(ee);
162                 } else if (rce->rce_ops == RMT_RSETFACL) {
163                         size = lustre_posix_acl_xattr_filter(
164                                                 (posix_acl_xattr_header *)value,
165                                                 size, &new_value);
166                         if (unlikely(size < 0))
167                                 RETURN(size);
168
169                         pv = (const char *)new_value;
170                 } else
171                         RETURN(-EOPNOTSUPP);
172
173                 valid |= rce_ops2valid(rce->rce_ops);
174         }
175 #endif
176         oc = ll_mdscapa_get(inode);
177         rc = md_setxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
178                          valid, name, pv, size, 0, flags, ll_i2suppgid(inode),
179                          &req);
180         capa_put(oc);
181 #ifdef CONFIG_FS_POSIX_ACL
182         if (new_value != NULL)
183                 lustre_posix_acl_xattr_free(new_value, size);
184         if (acl != NULL)
185                 lustre_ext_acl_xattr_free(acl);
186 #endif
187         if (rc) {
188                 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
189                         LCONSOLE_INFO("Disabling user_xattr feature because "
190                                       "it is not supported on the server\n");
191                         sbi->ll_flags &= ~LL_SBI_USER_XATTR;
192                 }
193                 RETURN(rc);
194         }
195
196         ptlrpc_req_finished(req);
197         RETURN(0);
198 }
199
200 int ll_setxattr(struct dentry *dentry, const char *name,
201                 const void *value, size_t size, int flags)
202 {
203         struct inode *inode = dentry->d_inode;
204
205         LASSERT(inode);
206         LASSERT(name);
207
208         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
209                inode->i_ino, inode->i_generation, inode, name);
210
211         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_SETXATTR, 1);
212
213         if ((strncmp(name, XATTR_TRUSTED_PREFIX,
214                      sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
215              strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
216             (strncmp(name, XATTR_LUSTRE_PREFIX,
217                      sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
218              strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
219                 struct lov_user_md *lump = (struct lov_user_md *)value;
220                 int rc = 0;
221
222                 if (S_ISREG(inode->i_mode)) {
223                         struct file f;
224                         int flags = FMODE_WRITE;
225
226                         f.f_dentry = dentry;
227                         rc = ll_lov_setstripe_ea_info(inode, &f, flags,
228                                                       lump, sizeof(*lump));
229                         /* b10667: rc always be 0 here for now */
230                         rc = 0;
231                 } else if (S_ISDIR(inode->i_mode)) {
232                         rc = ll_dir_setstripe(inode, lump, 0);
233                 }
234
235                 return rc;
236
237         } else if (strcmp(name, XATTR_NAME_LMA) == 0 ||
238                    strcmp(name, XATTR_NAME_LINK) == 0)
239                 return 0;
240
241         return ll_setxattr_common(inode, name, value, size, flags,
242                                   OBD_MD_FLXATTR);
243 }
244
245 int ll_removexattr(struct dentry *dentry, const char *name)
246 {
247         struct inode *inode = dentry->d_inode;
248
249         LASSERT(inode);
250         LASSERT(name);
251
252         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
253                inode->i_ino, inode->i_generation, inode, name);
254
255         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_REMOVEXATTR, 1);
256         return ll_setxattr_common(inode, name, NULL, 0, 0,
257                                   OBD_MD_FLXATTRRM);
258 }
259
260 static
261 int ll_getxattr_common(struct inode *inode, const char *name,
262                        void *buffer, size_t size, __u64 valid)
263 {
264         struct ll_sb_info *sbi = ll_i2sbi(inode);
265         struct ptlrpc_request *req = NULL;
266         struct mdt_body *body;
267         int xattr_type, rc;
268         void *xdata;
269         struct obd_capa *oc;
270         struct rmtacl_ctl_entry *rce = NULL;
271         ENTRY;
272
273         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
274                inode->i_ino, inode->i_generation, inode);
275
276         /* listxattr have slightly different behavior from of ext3:
277          * without 'user_xattr' ext3 will list all xattr names but
278          * filtered out "^user..*"; we list them all for simplicity.
279          */
280         if (!name) {
281                 xattr_type = XATTR_OTHER_T;
282                 goto do_getxattr;
283         }
284
285         xattr_type = get_xattr_type(name);
286         rc = xattr_type_filter(sbi, xattr_type);
287         if (rc)
288                 RETURN(rc);
289
290 #ifdef CONFIG_FS_POSIX_ACL
291         if (sbi->ll_flags & LL_SBI_RMT_CLIENT &&
292             (xattr_type == XATTR_ACL_ACCESS_T ||
293             xattr_type == XATTR_ACL_DEFAULT_T)) {
294                 rce = rct_search(&sbi->ll_rct, cfs_curproc_pid());
295                 if (rce == NULL ||
296                     (rce->rce_ops != RMT_LSETFACL &&
297                     rce->rce_ops != RMT_LGETFACL &&
298                     rce->rce_ops != RMT_RSETFACL &&
299                     rce->rce_ops != RMT_RGETFACL))
300                         RETURN(-EOPNOTSUPP);
301         }
302 #endif
303
304         /* posix acl is under protection of LOOKUP lock. when calling to this,
305          * we just have path resolution to the target inode, so we have great
306          * chance that cached ACL is uptodate.
307          */
308 #ifdef CONFIG_FS_POSIX_ACL
309         if (xattr_type == XATTR_ACL_ACCESS_T &&
310             !(sbi->ll_flags & LL_SBI_RMT_CLIENT)) {
311                 struct ll_inode_info *lli = ll_i2info(inode);
312                 struct posix_acl *acl;
313
314                 spin_lock(&lli->lli_lock);
315                 acl = posix_acl_dup(lli->lli_posix_acl);
316                 spin_unlock(&lli->lli_lock);
317
318                 if (!acl)
319                         RETURN(-ENODATA);
320
321                 rc = posix_acl_to_xattr(acl, buffer, size);
322                 posix_acl_release(acl);
323                 RETURN(rc);
324         }
325         if (xattr_type == XATTR_ACL_DEFAULT_T && !S_ISDIR(inode->i_mode))
326                 RETURN(-ENODATA);
327 #endif
328
329 do_getxattr:
330         oc = ll_mdscapa_get(inode);
331         rc = md_getxattr(sbi->ll_md_exp, ll_inode2fid(inode), oc,
332                          valid | (rce ? rce_ops2valid(rce->rce_ops) : 0),
333                          name, NULL, 0, size, 0, &req);
334         capa_put(oc);
335         if (rc) {
336                 if (rc == -EOPNOTSUPP && xattr_type == XATTR_USER_T) {
337                         LCONSOLE_INFO("Disabling user_xattr feature because "
338                                       "it is not supported on the server\n");
339                         sbi->ll_flags &= ~LL_SBI_USER_XATTR;
340                 }
341                 RETURN(rc);
342         }
343
344         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
345         LASSERT(body);
346
347         /* only detect the xattr size */
348         if (size == 0)
349                 GOTO(out, rc = body->eadatasize);
350
351         if (size < body->eadatasize) {
352                 CERROR("server bug: replied size %u > %u\n",
353                        body->eadatasize, (int)size);
354                 GOTO(out, rc = -ERANGE);
355         }
356
357         /* do not need swab xattr data */
358         xdata = req_capsule_server_sized_get(&req->rq_pill, &RMF_EADATA,
359                                              body->eadatasize);
360         if (!xdata)
361                 GOTO(out, rc = -EFAULT);
362
363 #ifdef CONFIG_FS_POSIX_ACL
364         if (body->eadatasize >= 0 && rce && rce->rce_ops == RMT_LSETFACL) {
365                 ext_acl_xattr_header *acl;
366
367                 acl = lustre_posix_acl_xattr_2ext((posix_acl_xattr_header *)xdata,
368                                                   body->eadatasize);
369                 if (IS_ERR(acl))
370                         GOTO(out, rc = PTR_ERR(acl));
371
372                 rc = ee_add(&sbi->ll_et, cfs_curproc_pid(), ll_inode2fid(inode),
373                             xattr_type, acl);
374                 if (unlikely(rc < 0)) {
375                         lustre_ext_acl_xattr_free(acl);
376                         GOTO(out, rc);
377                 }
378         }
379
380         if (xattr_type == XATTR_ACL_ACCESS_T && !body->eadatasize)
381                 GOTO(out, rc = -ENODATA);
382 #endif
383         LASSERT(buffer);
384         memcpy(buffer, xdata, body->eadatasize);
385         rc = body->eadatasize;
386         EXIT;
387 out:
388         ptlrpc_req_finished(req);
389         return rc;
390 }
391
392 ssize_t ll_getxattr(struct dentry *dentry, const char *name,
393                     void *buffer, size_t size)
394 {
395         struct inode *inode = dentry->d_inode;
396
397         LASSERT(inode);
398         LASSERT(name);
399
400         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p), xattr %s\n",
401                inode->i_ino, inode->i_generation, inode, name);
402
403         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_GETXATTR, 1);
404
405         if ((strncmp(name, XATTR_TRUSTED_PREFIX,
406                      sizeof(XATTR_TRUSTED_PREFIX) - 1) == 0 &&
407              strcmp(name + sizeof(XATTR_TRUSTED_PREFIX) - 1, "lov") == 0) ||
408             (strncmp(name, XATTR_LUSTRE_PREFIX,
409                      sizeof(XATTR_LUSTRE_PREFIX) - 1) == 0 &&
410              strcmp(name + sizeof(XATTR_LUSTRE_PREFIX) - 1, "lov") == 0)) {
411                 struct lov_user_md *lump;
412                 struct lov_mds_md *lmm = NULL;
413                 struct ptlrpc_request *request = NULL;
414                 int rc = 0, lmmsize = 0;
415
416                 if (S_ISREG(inode->i_mode)) {
417                         rc = ll_lov_getstripe_ea_info(dentry->d_parent->d_inode,
418                                                       dentry->d_name.name, &lmm,
419                                                       &lmmsize, &request);
420                 } else if (S_ISDIR(inode->i_mode)) {
421                         rc = ll_dir_getstripe(inode, &lmm, &lmmsize, &request);
422                 } else {
423                         rc = -ENODATA;
424                 }
425
426                 if (rc < 0)
427                        GOTO(out, rc);
428                 if (size == 0)
429                        GOTO(out, rc = lmmsize);
430
431                 if (size < lmmsize) {
432                         CERROR("server bug: replied size %d > %d for %s (%s)\n",
433                                lmmsize, (int)size, dentry->d_name.name, name);
434                         GOTO(out, rc = -ERANGE);
435                 }
436
437                 lump = (struct lov_user_md *)buffer;
438                 memcpy(lump, lmm, lmmsize);
439
440                 rc = lmmsize;
441 out:
442                 ptlrpc_req_finished(request);
443                 return(rc);
444         }
445
446         return ll_getxattr_common(inode, name, buffer, size, OBD_MD_FLXATTR);
447 }
448
449 ssize_t ll_listxattr(struct dentry *dentry, char *buffer, size_t size)
450 {
451         struct inode *inode = dentry->d_inode;
452         int rc = 0, rc2 = 0;
453         struct lov_mds_md *lmm = NULL;
454         struct ptlrpc_request *request = NULL;
455         int lmmsize;
456
457         LASSERT(inode);
458
459         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n",
460                inode->i_ino, inode->i_generation, inode);
461
462         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_LISTXATTR, 1);
463
464         rc = ll_getxattr_common(inode, NULL, buffer, size, OBD_MD_FLXATTRLS);
465
466         if (S_ISREG(inode->i_mode)) {
467                 struct ll_inode_info *lli = ll_i2info(inode);
468                 struct lov_stripe_md *lsm = NULL;
469                 lsm = lli->lli_smd;
470                 if (lsm == NULL)
471                         rc2 = -1;
472         } else if (S_ISDIR(inode->i_mode)) {
473                 rc2 = ll_dir_getstripe(inode, &lmm, &lmmsize, &request);
474         }
475
476         if (rc2 < 0) {
477                 GOTO(out, rc2 = 0);
478         } else {
479                 const int prefix_len = sizeof(XATTR_LUSTRE_PREFIX) - 1;
480                 const size_t name_len   = sizeof("lov") - 1;
481                 const size_t total_len  = prefix_len + name_len + 1;
482
483                 if (buffer && (rc + total_len) <= size) {
484                         buffer += rc;
485                         memcpy(buffer,XATTR_LUSTRE_PREFIX, prefix_len);
486                         memcpy(buffer+prefix_len, "lov", name_len);
487                         buffer[prefix_len + name_len] = '\0';
488                 }
489                 rc2 = total_len;
490         }
491 out:
492         ptlrpc_req_finished(request);
493         rc = rc + rc2;
494
495         return rc;
496 }