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