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