Whamcloud - gitweb
a0d581b5caaad4a741d07c1bd168a02df9c6a72b
[fs/lustre-release.git] / lustre / llite / llite_nfs.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) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, Whamcloud, Inc.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/lustre/llite/llite_nfs.c
37  *
38  * NFS export of Lustre Light File System
39  *
40  * Author: Yury Umanets <umka@clusterfs.com>
41  * Author: Huang Hua <huanghua@clusterfs.com>
42  */
43
44 #define DEBUG_SUBSYSTEM S_LLITE
45 #include <lustre_lite.h>
46 #include "llite_internal.h"
47 #ifdef HAVE_LINUX_EXPORTFS_H
48 #include <linux/exportfs.h>
49 #endif
50
51 __u32 get_uuid2int(const char *name, int len)
52 {
53         __u32 key0 = 0x12a3fe2d, key1 = 0x37abe8f9;
54         while (len--) {
55                 __u32 key = key1 + (key0 ^ (*name++ * 7152373));
56                 if (key & 0x80000000) key -= 0x7fffffff;
57                 key1 = key0;
58                 key0 = key;
59         }
60         return (key0 << 1);
61 }
62
63 static int ll_nfs_test_inode(struct inode *inode, void *opaque)
64 {
65         return lu_fid_eq(&ll_i2info(inode)->lli_fid,
66                          (struct lu_fid *)opaque);
67 }
68
69 static struct inode *search_inode_for_lustre(struct super_block *sb,
70                                              const struct lu_fid *fid)
71 {
72         struct ll_sb_info     *sbi = ll_s2sbi(sb);
73         struct ptlrpc_request *req = NULL;
74         struct inode          *inode = NULL;
75         int                   eadatalen = 0;
76         unsigned long         hash = (unsigned long) cl_fid_build_ino(fid, 0);
77         struct  md_op_data    *op_data;
78         int                   rc;
79         ENTRY;
80
81         CDEBUG(D_INFO, "searching inode for:(%lu,"DFID")\n", hash, PFID(fid));
82
83         inode = ilookup5(sb, hash, ll_nfs_test_inode, (void *)fid);
84         if (inode)
85                 RETURN(inode);
86
87         rc = ll_get_max_mdsize(sbi, &eadatalen);
88         if (rc)
89                 RETURN(ERR_PTR(rc));
90
91         /* Because inode is NULL, ll_prep_md_op_data can not
92          * be used here. So we allocate op_data ourselves */
93         OBD_ALLOC_PTR(op_data);
94         if (op_data == NULL)
95                 return ERR_PTR(-ENOMEM);
96
97         op_data->op_fid1 = *fid;
98         op_data->op_mode = eadatalen;
99         op_data->op_valid = OBD_MD_FLEASIZE;
100
101         /* mds_fid2dentry ignores f_type */
102         rc = md_getattr(sbi->ll_md_exp, op_data, &req);
103         OBD_FREE_PTR(op_data);
104         if (rc) {
105                 CERROR("can't get object attrs, fid "DFID", rc %d\n",
106                        PFID(fid), rc);
107                 RETURN(ERR_PTR(rc));
108         }
109         rc = ll_prep_inode(&inode, req, sb);
110         ptlrpc_req_finished(req);
111         if (rc)
112                 RETURN(ERR_PTR(rc));
113
114         RETURN(inode);
115 }
116
117 struct lustre_nfs_fid {
118         struct lu_fid   lnf_child;
119         struct lu_fid   lnf_parent;
120 };
121
122 static struct dentry *
123 ll_iget_for_nfs(struct super_block *sb, struct lu_fid *fid, struct lu_fid *parent)
124 {
125         struct inode  *inode;
126         struct dentry *result;
127         ENTRY;
128
129         CDEBUG(D_INFO, "Get dentry for fid: "DFID"\n", PFID(fid));
130         if (!fid_is_sane(fid))
131                 RETURN(ERR_PTR(-ESTALE));
132
133         inode = search_inode_for_lustre(sb, fid);
134         if (IS_ERR(inode))
135                 RETURN(ERR_PTR(PTR_ERR(inode)));
136
137         if (is_bad_inode(inode)) {
138                 /* we didn't find the right inode.. */
139                 iput(inode);
140                 RETURN(ERR_PTR(-ESTALE));
141         }
142
143         /**
144          * It is an anonymous dentry without OST objects created yet.
145          * We have to find the parent to tell MDS how to init lov objects.
146          */
147         if (S_ISREG(inode->i_mode) && ll_i2info(inode)->lli_smd == NULL &&
148             parent != NULL) {
149                 struct ll_inode_info *lli = ll_i2info(inode);
150
151                 cfs_spin_lock(&lli->lli_lock);
152                 lli->lli_pfid = *parent;
153                 cfs_spin_unlock(&lli->lli_lock);
154         }
155
156         result = d_obtain_alias(inode);
157         if (IS_ERR(result))
158                 RETURN(result);
159
160         ll_dops_init(result, 1, 0);
161
162         RETURN(result);
163 }
164
165 #define LUSTRE_NFS_FID          0x97
166
167 /**
168  * \a connectable - is nfsd will connect himself or this should be done
169  *                  at lustre
170  *
171  * The return value is file handle type:
172  * 1 -- contains child file handle;
173  * 2 -- contains child file handle and parent file handle;
174  * 255 -- error.
175  */
176 static int ll_encode_fh(struct dentry *de, __u32 *fh, int *plen,
177                         int connectable)
178 {
179         struct inode *inode = de->d_inode;
180         struct inode *parent = de->d_parent->d_inode;
181         struct lustre_nfs_fid *nfs_fid = (void *)fh;
182         ENTRY;
183
184         CDEBUG(D_INFO, "encoding for (%lu,"DFID") maxlen=%d minlen=%d\n",
185               inode->i_ino, PFID(ll_inode2fid(inode)), *plen,
186               (int)sizeof(struct lustre_nfs_fid));
187
188         if (*plen < sizeof(struct lustre_nfs_fid)/4)
189                 RETURN(255);
190
191         nfs_fid->lnf_child = *ll_inode2fid(inode);
192         nfs_fid->lnf_parent = *ll_inode2fid(parent);
193         *plen = sizeof(struct lustre_nfs_fid)/4;
194
195         RETURN(LUSTRE_NFS_FID);
196 }
197
198 static int ll_nfs_get_name_filldir(void *cookie, const char *name, int namelen,
199                                    loff_t hash, u64 ino, unsigned type)
200 {
201         /* It is hack to access lde_fid for comparison with lgd_fid.
202          * So the input 'name' must be part of the 'lu_dirent'. */
203         struct lu_dirent *lde = container_of0(name, struct lu_dirent, lde_name);
204         struct ll_getname_data *lgd = cookie;
205         struct lu_fid fid;
206
207         fid_le_to_cpu(&fid, &lde->lde_fid);
208         if (lu_fid_eq(&fid, &lgd->lgd_fid)) {
209                 memcpy(lgd->lgd_name, name, namelen);
210                 lgd->lgd_name[namelen] = 0;
211                 lgd->lgd_found = 1;
212         }
213         return lgd->lgd_found;
214 }
215
216 static int ll_get_name(struct dentry *dentry, char *name,
217                        struct dentry *child)
218 {
219         struct inode *dir = dentry->d_inode;
220         struct file *filp;
221         struct ll_getname_data lgd;
222         int rc;
223         ENTRY;
224
225         if (!dir || !S_ISDIR(dir->i_mode))
226                 GOTO(out, rc = -ENOTDIR);
227
228         if (!dir->i_fop)
229                 GOTO(out, rc = -EINVAL);
230
231         filp = ll_dentry_open(dget(dentry), mntget(ll_i2sbi(dir)->ll_mnt),
232                               O_RDONLY, current_cred());
233         if (IS_ERR(filp))
234                 GOTO(out, rc = PTR_ERR(filp));
235
236         if (!filp->f_op->readdir)
237                 GOTO(out_close, rc = -EINVAL);
238
239         lgd.lgd_name = name;
240         lgd.lgd_fid = ll_i2info(child->d_inode)->lli_fid;
241         lgd.lgd_found = 0;
242
243         cfs_mutex_lock(&dir->i_mutex);
244         rc = ll_readdir(filp, &lgd, ll_nfs_get_name_filldir);
245         cfs_mutex_unlock(&dir->i_mutex);
246         if (!rc && !lgd.lgd_found)
247                 rc = -ENOENT;
248         EXIT;
249
250 out_close:
251         fput(filp);
252 out:
253         return rc;
254 }
255
256 #ifdef HAVE_FH_TO_DENTRY
257 static struct dentry *ll_fh_to_dentry(struct super_block *sb, struct fid *fid,
258                                       int fh_len, int fh_type)
259 {
260         struct lustre_nfs_fid *nfs_fid = (struct lustre_nfs_fid *)fid;
261
262         if (fh_type != LUSTRE_NFS_FID)
263                 RETURN(ERR_PTR(-EPROTO));
264
265         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_child, &nfs_fid->lnf_parent));
266 }
267
268 static struct dentry *ll_fh_to_parent(struct super_block *sb, struct fid *fid,
269                                       int fh_len, int fh_type)
270 {
271         struct lustre_nfs_fid *nfs_fid = (struct lustre_nfs_fid *)fid;
272
273         if (fh_type != LUSTRE_NFS_FID)
274                 RETURN(ERR_PTR(-EPROTO));
275
276         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_parent, NULL));
277 }
278
279 #else
280
281 /*
282  * This length is counted as amount of __u32,
283  *  It is composed of a fid and a mode
284  */
285 static struct dentry *ll_decode_fh(struct super_block *sb, __u32 *fh, int fh_len,
286                                    int fh_type,
287                                    int (*acceptable)(void *, struct dentry *),
288                                    void *context)
289 {
290         struct lustre_nfs_fid *nfs_fid = (void *)fh;
291         struct dentry *entry;
292         ENTRY;
293
294         CDEBUG(D_INFO, "decoding for "DFID" fh_len=%d fh_type=%x\n", 
295                 PFID(&nfs_fid->lnf_child), fh_len, fh_type);
296
297         if (fh_type != LUSTRE_NFS_FID)
298                 RETURN(ERR_PTR(-EPROTO));
299
300         entry = sb->s_export_op->find_exported_dentry(sb, &nfs_fid->lnf_child,
301                                                       &nfs_fid->lnf_parent,
302                                                       acceptable, context);
303         RETURN(entry);
304 }
305
306 static struct dentry *ll_get_dentry(struct super_block *sb, void *data)
307 {
308         struct dentry *entry;
309         ENTRY;
310
311         entry = ll_iget_for_nfs(sb, data, NULL);
312         RETURN(entry);
313 }
314 #endif
315 static struct dentry *ll_get_parent(struct dentry *dchild)
316 {
317         struct ptlrpc_request *req = NULL;
318         struct inode          *dir = dchild->d_inode;
319         struct ll_sb_info     *sbi;
320         struct dentry         *result = NULL;
321         struct mdt_body       *body;
322         static char           dotdot[] = "..";
323         struct md_op_data     *op_data;
324         int                   rc;
325         ENTRY;
326
327         LASSERT(dir && S_ISDIR(dir->i_mode));
328
329         sbi = ll_s2sbi(dir->i_sb);
330
331         CDEBUG(D_INFO, "getting parent for (%lu,"DFID")\n",
332                         dir->i_ino, PFID(ll_inode2fid(dir)));
333
334         op_data = ll_prep_md_op_data(NULL, dir, NULL, dotdot,
335                                      strlen(dotdot), 0,
336                                      LUSTRE_OPC_ANY, NULL);
337         if (IS_ERR(op_data))
338                 RETURN((void *)op_data);
339
340         rc = md_getattr_name(sbi->ll_md_exp, op_data, &req);
341         ll_finish_md_op_data(op_data);
342         if (rc) {
343                 CERROR("failure %d inode %lu get parent\n", rc, dir->i_ino);
344                 RETURN(ERR_PTR(rc));
345         }
346         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
347         LASSERT(body->valid & OBD_MD_FLID);
348
349         CDEBUG(D_INFO, "parent for "DFID" is "DFID"\n",
350                 PFID(ll_inode2fid(dir)), PFID(&body->fid1));
351
352         result = ll_iget_for_nfs(dir->i_sb, &body->fid1, NULL);
353
354         ptlrpc_req_finished(req);
355         RETURN(result);
356 }
357
358 struct export_operations lustre_export_operations = {
359        .get_parent = ll_get_parent,
360        .encode_fh  = ll_encode_fh,
361        .get_name   = ll_get_name,
362 #ifdef HAVE_FH_TO_DENTRY
363         .fh_to_dentry = ll_fh_to_dentry,
364         .fh_to_parent = ll_fh_to_parent,
365 #else
366        .get_dentry = ll_get_dentry,
367        .decode_fh  = ll_decode_fh,
368 #endif
369 };