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