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, 2014, 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 "llite_internal.h"
  46 #include <linux/exportfs.h>
  47
  48 __u32 get_uuid2int(const char *name, int len)
  49 {
  50         __u32 key0 = 0x12a3fe2d, key1 = 0x37abe8f9;
  51         while (len--) {
  52                 __u32 key = key1 + (key0 ^ (*name++ * 7152373));
  53                 if (key & 0x80000000) key -= 0x7fffffff;
  54                 key1 = key0;
  55                 key0 = key;
  56         }
  57         return (key0 << 1);
  58 }
  59
  60 struct inode *search_inode_for_lustre(struct super_block *sb,
  61                                       const struct lu_fid *fid)
  62 {
  63         struct ll_sb_info     *sbi = ll_s2sbi(sb);
  64         struct ptlrpc_request *req = NULL;
  65         struct inode          *inode = NULL;
  66         int                   eadatalen = 0;
  67         unsigned long         hash = cl_fid_build_ino(fid,
  68                                                       ll_need_32bit_api(sbi));
  69         struct  md_op_data    *op_data;
  70         int                   rc;
  71         ENTRY;
  72
  73         CDEBUG(D_INFO, "searching inode for:(%lu,"DFID")\n", hash, PFID(fid));
  74
  75         inode = ilookup5(sb, hash, ll_test_inode_by_fid, (void *)fid);
  76         if (inode)
  77                 RETURN(inode);
  78
  79         rc = ll_get_default_mdsize(sbi, &eadatalen);
  80         if (rc)
  81                 RETURN(ERR_PTR(rc));
  82
  83         /* Because inode is NULL, ll_prep_md_op_data can not
  84          * be used here. So we allocate op_data ourselves */
  85         OBD_ALLOC_PTR(op_data);
  86         if (op_data == NULL)
  87                 return ERR_PTR(-ENOMEM);
  88
  89         op_data->op_fid1 = *fid;
  90         op_data->op_mode = eadatalen;
  91         op_data->op_valid = OBD_MD_FLEASIZE;
  92
  93         /* mds_fid2dentry ignores f_type */
  94         rc = md_getattr(sbi->ll_md_exp, op_data, &req);
  95         OBD_FREE_PTR(op_data);
  96         if (rc) {
  97                 /* Suppress erroneous/confusing messages when NFS
  98                  * is out of sync and requests old data. */
  99                 CDEBUG(D_INFO, "can't get object attrs, fid "DFID", rc %d\n",
 100                                 PFID(fid), rc);
 101                 RETURN(ERR_PTR(rc));
 102         }
 103         rc = ll_prep_inode(&inode, req, sb, NULL);
 104         ptlrpc_req_finished(req);
 105         if (rc)
 106                 RETURN(ERR_PTR(rc));
 107
 108         RETURN(inode);
 109 }
 110
 111 struct lustre_nfs_fid {
 112         struct lu_fid   lnf_child;
 113         struct lu_fid   lnf_parent;
 114 };
 115
 116 static struct dentry *
 117 ll_iget_for_nfs(struct super_block *sb, struct lu_fid *fid, struct lu_fid *parent)
 118 {
 119         struct inode  *inode;
 120         struct dentry *result;
 121         ENTRY;
 122
 123         if (!fid_is_sane(fid))
 124                 RETURN(ERR_PTR(-ESTALE));
 125
 126         CDEBUG(D_INFO, "Get dentry for fid: "DFID"\n", PFID(fid));
 127
 128         inode = search_inode_for_lustre(sb, fid);
 129         if (IS_ERR(inode))
 130                 RETURN(ERR_PTR(PTR_ERR(inode)));
 131
 132         if (is_bad_inode(inode)) {
 133                 /* we didn't find the right inode.. */
 134                 iput(inode);
 135                 RETURN(ERR_PTR(-ESTALE));
 136         }
 137
 138         result = d_obtain_alias(inode);
 139         if (IS_ERR(result)) {
 140                 iput(inode);
 141                 RETURN(result);
 142         }
 143
 144         RETURN(result);
 145 }
 146
 147 #ifndef FILEID_INVALID
 148 #define FILEID_INVALID 0xff
 149 #endif
 150 #ifndef FILEID_LUSTRE
 151 #define FILEID_LUSTRE  0x97
 152 #endif
 153
 154 /**
 155  * \a connectable - is nfsd will connect himself or this should be done
 156  *                  at lustre
 157  *
 158  * The return value is file handle type:
 159  * 1 -- contains child file handle;
 160  * 2 -- contains child file handle and parent file handle;
 161  * 255 -- error.
 162  */
 163 #ifndef HAVE_ENCODE_FH_PARENT
 164 static int ll_encode_fh(struct dentry *de, __u32 *fh, int *plen,
 165                         int connectable)
 166 {
 167         struct inode *inode = de->d_inode;
 168         struct inode *parent = de->d_parent->d_inode;
 169 #else
 170 static int ll_encode_fh(struct inode *inode, __u32 *fh, int *plen,
 171                         struct inode *parent)
 172 {
 173 #endif
 174         int fileid_len = sizeof(struct lustre_nfs_fid) / 4;
 175         struct lustre_nfs_fid *nfs_fid = (void *)fh;
 176         ENTRY;
 177
 178         CDEBUG(D_INFO, "%s: encoding for ("DFID") maxlen=%d minlen=%d\n",
 179                ll_get_fsname(inode->i_sb, NULL, 0),
 180                PFID(ll_inode2fid(inode)), *plen, fileid_len);
 181
 182         if (*plen < fileid_len) {
 183                 *plen = fileid_len;
 184                 RETURN(FILEID_INVALID);
 185         }
 186
 187         nfs_fid->lnf_child = *ll_inode2fid(inode);
 188         if (parent != NULL)
 189                 nfs_fid->lnf_parent = *ll_inode2fid(parent);
 190         else
 191                 fid_zero(&nfs_fid->lnf_parent);
 192         *plen = fileid_len;
 193
 194         RETURN(FILEID_LUSTRE);
 195 }
 196
 197 static int
 198 #ifndef HAVE_FILLDIR_USE_CTX
 199 ll_nfs_get_name_filldir(void *cookie, const char *name, int namelen,
 200                         loff_t hash, u64 ino, unsigned type)
 201 {
 202         struct ll_getname_data *lgd = cookie;
 203 #else
 204 ll_nfs_get_name_filldir(struct dir_context *ctx, const char *name, int namelen,
 205                         loff_t hash, u64 ino, unsigned type)
 206 {
 207         struct ll_getname_data *lgd =
 208                 container_of(ctx, struct ll_getname_data, ctx);
 209 #endif /* HAVE_FILLDIR_USE_CTX */
 210         /* It is hack to access lde_fid for comparison with lgd_fid.
 211          * So the input 'name' must be part of the 'lu_dirent'. */
 212         struct lu_dirent *lde = container_of0(name, struct lu_dirent, lde_name);
 213         struct lu_fid fid;
 214
 215         fid_le_to_cpu(&fid, &lde->lde_fid);
 216         if (lu_fid_eq(&fid, &lgd->lgd_fid)) {
 217                 memcpy(lgd->lgd_name, name, namelen);
 218                 lgd->lgd_name[namelen] = 0;
 219                 lgd->lgd_found = 1;
 220         }
 221         return lgd->lgd_found;
 222 }
 223
 224 static int ll_get_name(struct dentry *dentry, char *name,
 225                        struct dentry *child)
 226 {
 227         struct inode *dir = dentry->d_inode;
 228         struct ll_getname_data lgd = {
 229                 .lgd_name       = name,
 230                 .lgd_fid        = ll_i2info(child->d_inode)->lli_fid,
 231 #ifdef HAVE_DIR_CONTEXT
 232                 .ctx.actor      = ll_nfs_get_name_filldir,
 233 #endif
 234                 .lgd_found = 0,
 235         };
 236         struct md_op_data *op_data;
 237         __u64   pos = 0;
 238         int rc;
 239         ENTRY;
 240
 241         if (!dir || !S_ISDIR(dir->i_mode))
 242                 GOTO(out, rc = -ENOTDIR);
 243
 244         if (!dir->i_fop)
 245                 GOTO(out, rc = -EINVAL);
 246
 247         op_data = ll_prep_md_op_data(NULL, dir, dir, NULL, 0, 0,
 248                                      LUSTRE_OPC_ANY, dir);
 249         if (IS_ERR(op_data))
 250                 GOTO(out, rc = PTR_ERR(op_data));
 251
 252         op_data->op_max_pages = ll_i2sbi(dir)->ll_md_brw_pages;
 253         mutex_lock(&dir->i_mutex);
 254 #ifdef HAVE_DIR_CONTEXT
 255         rc = ll_dir_read(dir, &pos, op_data, &lgd.ctx);
 256 #else
 257         rc = ll_dir_read(dir, &pos, op_data, &lgd, ll_nfs_get_name_filldir);
 258 #endif
 259         mutex_unlock(&dir->i_mutex);
 260         ll_finish_md_op_data(op_data);
 261         if (!rc && !lgd.lgd_found)
 262                 rc = -ENOENT;
 263         EXIT;
 264 out:
 265         return rc;
 266 }
 267
 268 static struct dentry *ll_fh_to_dentry(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 != FILEID_LUSTRE)
 274                 RETURN(ERR_PTR(-EPROTO));
 275
 276         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_child, &nfs_fid->lnf_parent));
 277 }
 278
 279 static struct dentry *ll_fh_to_parent(struct super_block *sb, struct fid *fid,
 280                                       int fh_len, int fh_type)
 281 {
 282         struct lustre_nfs_fid *nfs_fid = (struct lustre_nfs_fid *)fid;
 283
 284         if (fh_type != FILEID_LUSTRE)
 285                 RETURN(ERR_PTR(-EPROTO));
 286
 287         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_parent, NULL));
 288 }
 289
 290 int ll_dir_get_parent_fid(struct inode *dir, struct lu_fid *parent_fid)
 291 {
 292         struct ptlrpc_request   *req = NULL;
 293         struct ll_sb_info       *sbi;
 294         struct mdt_body         *body;
 295         static const char       dotdot[] = "..";
 296         struct md_op_data       *op_data;
 297         int                     rc;
 298         int                     lmmsize;
 299         ENTRY;
 300
 301         LASSERT(dir && S_ISDIR(dir->i_mode));
 302
 303         sbi = ll_s2sbi(dir->i_sb);
 304
 305         CDEBUG(D_INFO, "%s: getting parent for ("DFID")\n",
 306                ll_get_fsname(dir->i_sb, NULL, 0),
 307                PFID(ll_inode2fid(dir)));
 308
 309         rc = ll_get_default_mdsize(sbi, &lmmsize);
 310         if (rc != 0)
 311                 RETURN(rc);
 312
 313         op_data = ll_prep_md_op_data(NULL, dir, NULL, dotdot,
 314                                      strlen(dotdot), lmmsize,
 315                                      LUSTRE_OPC_ANY, NULL);
 316         if (IS_ERR(op_data))
 317                 RETURN(PTR_ERR(op_data));
 318
 319         rc = md_getattr_name(sbi->ll_md_exp, op_data, &req);
 320         ll_finish_md_op_data(op_data);
 321         if (rc != 0) {
 322                 CERROR("%s: failure inode "DFID" get parent: rc = %d\n",
 323                        ll_get_fsname(dir->i_sb, NULL, 0),
 324                        PFID(ll_inode2fid(dir)), rc);
 325                 RETURN(rc);
 326         }
 327         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
 328
 329         /*
 330          * LU-3952: MDT may lost the FID of its parent, we should not crash
 331          * the NFS server, ll_iget_for_nfs() will handle the error.
 332          */
 333         if (body->mbo_valid & OBD_MD_FLID) {
 334                 CDEBUG(D_INFO, "parent for "DFID" is "DFID"\n",
 335                        PFID(ll_inode2fid(dir)), PFID(&body->mbo_fid1));
 336                 *parent_fid = body->mbo_fid1;
 337         }
 338
 339         ptlrpc_req_finished(req);
 340         RETURN(0);
 341 }
 342
 343 static struct dentry *ll_get_parent(struct dentry *dchild)
 344 {
 345         struct lu_fid   parent_fid = { 0 };
 346         int             rc;
 347         struct dentry   *dentry;
 348         ENTRY;
 349
 350         rc = ll_dir_get_parent_fid(dchild->d_inode, &parent_fid);
 351         if (rc != 0)
 352                 RETURN(ERR_PTR(rc));
 353
 354         dentry = ll_iget_for_nfs(dchild->d_inode->i_sb, &parent_fid, NULL);
 355
 356         RETURN(dentry);
 357 }
 358
 359 struct export_operations lustre_export_operations = {
 360        .get_parent = ll_get_parent,
 361        .encode_fh  = ll_encode_fh,
 362        .get_name   = ll_get_name,
 363         .fh_to_dentry = ll_fh_to_dentry,
 364         .fh_to_parent = ll_fh_to_parent,
 365 };