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.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2011, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/lustre/llite/llite_nfs.c
  33  *
  34  * NFS export of Lustre Light File System
  35  *
  36  * Author: Yury Umanets <umka@clusterfs.com>
  37  * Author: Huang Hua <huanghua@clusterfs.com>
  38  */
  39
  40 #define DEBUG_SUBSYSTEM S_LLITE
  41 #include "llite_internal.h"
  42 #include <linux/exportfs.h>
  43
  44 __u32 get_uuid2int(const char *name, int len)
  45 {
  46         __u32 key0 = 0x12a3fe2d, key1 = 0x37abe8f9;
  47         while (len--) {
  48                 __u32 key = key1 + (key0 ^ (*name++ * 7152373));
  49                 if (key & 0x80000000) key -= 0x7fffffff;
  50                 key1 = key0;
  51                 key0 = key;
  52         }
  53         return (key0 << 1);
  54 }
  55
  56 struct inode *search_inode_for_lustre(struct super_block *sb,
  57                                       const struct lu_fid *fid)
  58 {
  59         struct ll_sb_info     *sbi = ll_s2sbi(sb);
  60         struct ptlrpc_request *req = NULL;
  61         struct inode          *inode = NULL;
  62         int                   eadatalen = 0;
  63         unsigned long         hash = cl_fid_build_ino(fid,
  64                                                       ll_need_32bit_api(sbi));
  65         struct  md_op_data    *op_data;
  66         int                   rc;
  67         ENTRY;
  68
  69         CDEBUG(D_INFO, "searching inode for:(%lu,"DFID")\n", hash, PFID(fid));
  70
  71         inode = ilookup5(sb, hash, ll_test_inode_by_fid, (void *)fid);
  72         if (inode)
  73                 RETURN(inode);
  74
  75         rc = ll_get_default_mdsize(sbi, &eadatalen);
  76         if (rc)
  77                 RETURN(ERR_PTR(rc));
  78
  79         /* Because inode is NULL, ll_prep_md_op_data can not
  80          * be used here. So we allocate op_data ourselves */
  81         OBD_ALLOC_PTR(op_data);
  82         if (op_data == NULL)
  83                 return ERR_PTR(-ENOMEM);
  84
  85         op_data->op_fid1 = *fid;
  86         op_data->op_mode = eadatalen;
  87         op_data->op_valid = OBD_MD_FLEASIZE;
  88
  89         /* mds_fid2dentry ignores f_type */
  90         rc = md_getattr(sbi->ll_md_exp, op_data, &req);
  91         OBD_FREE_PTR(op_data);
  92         if (rc) {
  93                 /* Suppress erroneous/confusing messages when NFS
  94                  * is out of sync and requests old data. */
  95                 CDEBUG(D_INFO, "can't get object attrs, fid "DFID", rc %d\n",
  96                                 PFID(fid), rc);
  97                 RETURN(ERR_PTR(rc));
  98         }
  99         rc = ll_prep_inode(&inode, req, sb, NULL);
 100         ptlrpc_req_finished(req);
 101         if (rc)
 102                 RETURN(ERR_PTR(rc));
 103
 104         RETURN(inode);
 105 }
 106
 107 struct lustre_nfs_fid {
 108         struct lu_fid   lnf_child;
 109         struct lu_fid   lnf_parent;
 110 };
 111
 112 static struct dentry *
 113 ll_iget_for_nfs(struct super_block *sb, struct lu_fid *fid, struct lu_fid *parent)
 114 {
 115         struct inode  *inode;
 116         struct dentry *result;
 117         ENTRY;
 118
 119         if (!fid_is_sane(fid))
 120                 RETURN(ERR_PTR(-ESTALE));
 121
 122         CDEBUG(D_INFO, "Get dentry for fid: "DFID"\n", PFID(fid));
 123
 124         inode = search_inode_for_lustre(sb, fid);
 125         if (IS_ERR(inode))
 126                 RETURN(ERR_PTR(PTR_ERR(inode)));
 127
 128         if (is_bad_inode(inode)) {
 129                 /* we didn't find the right inode.. */
 130                 iput(inode);
 131                 RETURN(ERR_PTR(-ESTALE));
 132         }
 133
 134         /* N.B. d_obtain_alias() drops inode ref on error */
 135         result = d_obtain_alias(inode);
 136         if (!IS_ERR(result)) {
 137                 int rc;
 138
 139                 rc = ll_d_init(result);
 140                 if (rc < 0) {
 141                         dput(result);
 142                         result = ERR_PTR(rc);
 143                 } else {
 144                         struct ll_dentry_data *ldd = ll_d2d(result);
 145
 146                         /*
 147                          * Need to signal to the ll_file_open that
 148                          * we came from NFS and so opencache needs to be
 149                          * enabled for this one
 150                          */
 151                         spin_lock(&result->d_lock);
 152                         ldd->lld_nfs_dentry = 1;
 153                         spin_unlock(&result->d_lock);
 154                 }
 155         }
 156
 157         RETURN(result);
 158 }
 159
 160 #ifndef FILEID_INVALID
 161 #define FILEID_INVALID 0xff
 162 #endif
 163 #ifndef FILEID_LUSTRE
 164 #define FILEID_LUSTRE  0x97
 165 #endif
 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 #ifndef HAVE_ENCODE_FH_PARENT
 177 static int ll_encode_fh(struct dentry *de, __u32 *fh, int *plen,
 178                         int connectable)
 179 {
 180         struct inode *inode = de->d_inode;
 181         struct inode *parent = de->d_parent->d_inode;
 182 #else
 183 static int ll_encode_fh(struct inode *inode, __u32 *fh, int *plen,
 184                         struct inode *parent)
 185 {
 186 #endif
 187         int fileid_len = sizeof(struct lustre_nfs_fid) / 4;
 188         struct lustre_nfs_fid *nfs_fid = (void *)fh;
 189         ENTRY;
 190
 191         CDEBUG(D_INFO, "%s: encoding for ("DFID") maxlen=%d minlen=%d\n",
 192                ll_get_fsname(inode->i_sb, NULL, 0),
 193                PFID(ll_inode2fid(inode)), *plen, fileid_len);
 194
 195         if (*plen < fileid_len) {
 196                 *plen = fileid_len;
 197                 RETURN(FILEID_INVALID);
 198         }
 199
 200         nfs_fid->lnf_child = *ll_inode2fid(inode);
 201         if (parent != NULL)
 202                 nfs_fid->lnf_parent = *ll_inode2fid(parent);
 203         else
 204                 fid_zero(&nfs_fid->lnf_parent);
 205         *plen = fileid_len;
 206
 207         RETURN(FILEID_LUSTRE);
 208 }
 209
 210 static int
 211 #ifndef HAVE_FILLDIR_USE_CTX
 212 ll_nfs_get_name_filldir(void *cookie, const char *name, int namelen,
 213                         loff_t hash, u64 ino, unsigned type)
 214 {
 215         struct ll_getname_data *lgd = cookie;
 216 #else
 217 ll_nfs_get_name_filldir(struct dir_context *ctx, const char *name, int namelen,
 218                         loff_t hash, u64 ino, unsigned type)
 219 {
 220         struct ll_getname_data *lgd =
 221                 container_of(ctx, struct ll_getname_data, ctx);
 222 #endif /* HAVE_FILLDIR_USE_CTX */
 223         /* It is hack to access lde_fid for comparison with lgd_fid.
 224          * So the input 'name' must be part of the 'lu_dirent'. */
 225         struct lu_dirent *lde = container_of0(name, struct lu_dirent, lde_name);
 226         struct lu_fid fid;
 227
 228         fid_le_to_cpu(&fid, &lde->lde_fid);
 229         if (lu_fid_eq(&fid, &lgd->lgd_fid)) {
 230                 memcpy(lgd->lgd_name, name, namelen);
 231                 lgd->lgd_name[namelen] = 0;
 232                 lgd->lgd_found = 1;
 233         }
 234         return lgd->lgd_found;
 235 }
 236
 237 static int ll_get_name(struct dentry *dentry, char *name,
 238                        struct dentry *child)
 239 {
 240         struct inode *dir = dentry->d_inode;
 241         struct ll_getname_data lgd = {
 242                 .lgd_name       = name,
 243                 .lgd_fid        = ll_i2info(child->d_inode)->lli_fid,
 244 #ifdef HAVE_DIR_CONTEXT
 245                 .ctx.actor      = ll_nfs_get_name_filldir,
 246 #endif
 247                 .lgd_found = 0,
 248         };
 249         struct md_op_data *op_data;
 250         __u64   pos = 0;
 251         int rc;
 252         ENTRY;
 253
 254         if (!dir || !S_ISDIR(dir->i_mode))
 255                 GOTO(out, rc = -ENOTDIR);
 256
 257         if (!dir->i_fop)
 258                 GOTO(out, rc = -EINVAL);
 259
 260         op_data = ll_prep_md_op_data(NULL, dir, dir, NULL, 0, 0,
 261                                      LUSTRE_OPC_ANY, dir);
 262         if (IS_ERR(op_data))
 263                 GOTO(out, rc = PTR_ERR(op_data));
 264
 265         inode_lock(dir);
 266 #ifdef HAVE_DIR_CONTEXT
 267         rc = ll_dir_read(dir, &pos, op_data, &lgd.ctx);
 268 #else
 269         rc = ll_dir_read(dir, &pos, op_data, &lgd, ll_nfs_get_name_filldir);
 270 #endif
 271         inode_unlock(dir);
 272         ll_finish_md_op_data(op_data);
 273         if (!rc && !lgd.lgd_found)
 274                 rc = -ENOENT;
 275         EXIT;
 276 out:
 277         return rc;
 278 }
 279
 280 static struct dentry *ll_fh_to_dentry(struct super_block *sb, struct fid *fid,
 281                                       int fh_len, int fh_type)
 282 {
 283         struct lustre_nfs_fid *nfs_fid = (struct lustre_nfs_fid *)fid;
 284
 285         if (fh_type != FILEID_LUSTRE)
 286                 RETURN(ERR_PTR(-EPROTO));
 287
 288         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_child, &nfs_fid->lnf_parent));
 289 }
 290
 291 static struct dentry *ll_fh_to_parent(struct super_block *sb, struct fid *fid,
 292                                       int fh_len, int fh_type)
 293 {
 294         struct lustre_nfs_fid *nfs_fid = (struct lustre_nfs_fid *)fid;
 295
 296         if (fh_type != FILEID_LUSTRE)
 297                 RETURN(ERR_PTR(-EPROTO));
 298
 299         RETURN(ll_iget_for_nfs(sb, &nfs_fid->lnf_parent, NULL));
 300 }
 301
 302 int ll_dir_get_parent_fid(struct inode *dir, struct lu_fid *parent_fid)
 303 {
 304         struct ptlrpc_request   *req = NULL;
 305         struct ll_sb_info       *sbi;
 306         struct mdt_body         *body;
 307         static const char       dotdot[] = "..";
 308         struct md_op_data       *op_data;
 309         int                     rc;
 310         int                     lmmsize;
 311         ENTRY;
 312
 313         LASSERT(dir && S_ISDIR(dir->i_mode));
 314
 315         sbi = ll_s2sbi(dir->i_sb);
 316
 317         CDEBUG(D_INFO, "%s: getting parent for ("DFID")\n",
 318                ll_get_fsname(dir->i_sb, NULL, 0),
 319                PFID(ll_inode2fid(dir)));
 320
 321         rc = ll_get_default_mdsize(sbi, &lmmsize);
 322         if (rc != 0)
 323                 RETURN(rc);
 324
 325         op_data = ll_prep_md_op_data(NULL, dir, NULL, dotdot,
 326                                      strlen(dotdot), lmmsize,
 327                                      LUSTRE_OPC_ANY, NULL);
 328         if (IS_ERR(op_data))
 329                 RETURN(PTR_ERR(op_data));
 330
 331         rc = md_getattr_name(sbi->ll_md_exp, op_data, &req);
 332         ll_finish_md_op_data(op_data);
 333         if (rc != 0) {
 334                 CERROR("%s: failure inode "DFID" get parent: rc = %d\n",
 335                        ll_get_fsname(dir->i_sb, NULL, 0),
 336                        PFID(ll_inode2fid(dir)), rc);
 337                 RETURN(rc);
 338         }
 339         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
 340
 341         /*
 342          * LU-3952: MDT may lost the FID of its parent, we should not crash
 343          * the NFS server, ll_iget_for_nfs() will handle the error.
 344          */
 345         if (body->mbo_valid & OBD_MD_FLID) {
 346                 CDEBUG(D_INFO, "parent for "DFID" is "DFID"\n",
 347                        PFID(ll_inode2fid(dir)), PFID(&body->mbo_fid1));
 348                 *parent_fid = body->mbo_fid1;
 349         }
 350
 351         ptlrpc_req_finished(req);
 352         RETURN(0);
 353 }
 354
 355 static struct dentry *ll_get_parent(struct dentry *dchild)
 356 {
 357         struct lu_fid   parent_fid = { 0 };
 358         int             rc;
 359         struct dentry   *dentry;
 360         ENTRY;
 361
 362         rc = ll_dir_get_parent_fid(dchild->d_inode, &parent_fid);
 363         if (rc != 0)
 364                 RETURN(ERR_PTR(rc));
 365
 366         dentry = ll_iget_for_nfs(dchild->d_inode->i_sb, &parent_fid, NULL);
 367
 368         RETURN(dentry);
 369 }
 370
 371 struct export_operations lustre_export_operations = {
 372        .get_parent = ll_get_parent,
 373        .encode_fh  = ll_encode_fh,
 374        .get_name   = ll_get_name,
 375         .fh_to_dentry = ll_fh_to_dentry,
 376         .fh_to_parent = ll_fh_to_parent,
 377 };