lustre/llite/lcommon_cl.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) 2008, 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  *   Author: Nikita Danilov <nikita.danilov@sun.com>
  37  */
  38
  39 #define DEBUG_SUBSYSTEM S_LLITE
  40
  41 #include <libcfs/libcfs.h>
  42 #include <linux/fs.h>
  43 #include <linux/sched.h>
  44 #include <linux/mm.h>
  45 #include <linux/quotaops.h>
  46 #include <linux/highmem.h>
  47 #include <linux/pagemap.h>
  48 #include <linux/rbtree.h>
  49
  50 #include <obd.h>
  51 #include <obd_support.h>
  52 #include <lustre_fid.h>
  53 #include <lustre_dlm.h>
  54 #include <lustre_ver.h>
  55 #include <lustre_mdc.h>
  56 #include <cl_object.h>
  57
  58 #include "llite_internal.h"
  59 #include "vvp_internal.h"
  60
  61 /**
  62  * An `emergency' environment used by cl_inode_fini() when cl_env_get()
  63  * fails. Access to this environment is serialized by cl_inode_fini_guard
  64  * mutex.
  65  */
  66 struct lu_env *cl_inode_fini_env;
  67 int cl_inode_fini_refcheck;
  68
  69 /**
  70  * A mutex serializing calls to slp_inode_fini() under extreme memory
  71  * pressure, when environments cannot be allocated.
  72  */
  73 static DEFINE_MUTEX(cl_inode_fini_guard);
  74
  75 int cl_setattr_ost(struct cl_object *obj, const struct iattr *attr,
  76                    unsigned int attr_flags)
  77 {
  78         struct lu_env *env;
  79         struct cl_io  *io;
  80         int            result;
  81         int            refcheck;
  82
  83         ENTRY;
  84
  85         env = cl_env_get(&refcheck);
  86         if (IS_ERR(env))
  87                 RETURN(PTR_ERR(env));
  88
  89         io = vvp_env_thread_io(env);
  90         io->ci_obj = obj;
  91
  92         io->u.ci_setattr.sa_attr.lvb_atime = LTIME_S(attr->ia_atime);
  93         io->u.ci_setattr.sa_attr.lvb_mtime = LTIME_S(attr->ia_mtime);
  94         io->u.ci_setattr.sa_attr.lvb_ctime = LTIME_S(attr->ia_ctime);
  95         io->u.ci_setattr.sa_attr.lvb_size = attr->ia_size;
  96         io->u.ci_setattr.sa_attr_flags = attr_flags;
  97         io->u.ci_setattr.sa_valid = attr->ia_valid;
  98         io->u.ci_setattr.sa_parent_fid = lu_object_fid(&obj->co_lu);
  99
 100 again:
 101         if (cl_io_init(env, io, CIT_SETATTR, io->ci_obj) == 0) {
 102                 struct vvp_io *vio = vvp_env_io(env);
 103
 104                 if (attr->ia_valid & ATTR_FILE)
 105                         /* populate the file descriptor for ftruncate to honor
 106                          * group lock - see LU-787 */
 107                         vio->vui_fd = LUSTRE_FPRIVATE(attr->ia_file);
 108
 109                 result = cl_io_loop(env, io);
 110         } else {
 111                 result = io->ci_result;
 112         }
 113         cl_io_fini(env, io);
 114         if (unlikely(io->ci_need_restart))
 115                 goto again;
 116         /* HSM import case: file is released, cannot be restored
 117          * no need to fail except if restore registration failed
 118          * with -ENODATA */
 119         if (result == -ENODATA && io->ci_restore_needed &&
 120             io->ci_result != -ENODATA)
 121                 result = 0;
 122         cl_env_put(env, &refcheck);
 123         RETURN(result);
 124 }
 125
 126 /**
 127  * Initialize or update CLIO structures for regular files when new
 128  * meta-data arrives from the server.
 129  *
 130  * \param inode regular file inode
 131  * \param md    new file metadata from MDS
 132  * - allocates cl_object if necessary,
 133  * - updated layout, if object was already here.
 134  */
 135 int cl_file_inode_init(struct inode *inode, struct lustre_md *md)
 136 {
 137         struct lu_env        *env;
 138         struct ll_inode_info *lli;
 139         struct cl_object     *clob;
 140         struct lu_site       *site;
 141         struct lu_fid        *fid;
 142         struct cl_object_conf conf = {
 143                 .coc_inode = inode,
 144                 .u = {
 145                         .coc_layout = md->layout,
 146                 }
 147         };
 148         int result = 0;
 149         int refcheck;
 150
 151         LASSERT(md->body->mbo_valid & OBD_MD_FLID);
 152         LASSERT(S_ISREG(inode->i_mode));
 153
 154         env = cl_env_get(&refcheck);
 155         if (IS_ERR(env))
 156                 return PTR_ERR(env);
 157
 158         site = ll_i2sbi(inode)->ll_site;
 159         lli  = ll_i2info(inode);
 160         fid  = &lli->lli_fid;
 161         LASSERT(fid_is_sane(fid));
 162
 163         if (lli->lli_clob == NULL) {
 164                 /* clob is slave of inode, empty lli_clob means for new inode,
 165                  * there is no clob in cache with the given fid, so it is
 166                  * unnecessary to perform lookup-alloc-lookup-insert, just
 167                  * alloc and insert directly. */
 168                 LASSERT(inode->i_state & I_NEW);
 169                 conf.coc_lu.loc_flags = LOC_F_NEW;
 170                 clob = cl_object_find(env, lu2cl_dev(site->ls_top_dev),
 171                                       fid, &conf);
 172                 if (!IS_ERR(clob)) {
 173                         /*
 174                          * No locking is necessary, as new inode is
 175                          * locked by I_NEW bit.
 176                          */
 177                         lli->lli_clob = clob;
 178                         lu_object_ref_add(&clob->co_lu, "inode", inode);
 179                 } else
 180                         result = PTR_ERR(clob);
 181         } else {
 182                 result = cl_conf_set(env, lli->lli_clob, &conf);
 183         }
 184
 185         cl_env_put(env, &refcheck);
 186
 187         if (result != 0)
 188                 CERROR("Failure to initialize cl object "DFID": %d\n",
 189                        PFID(fid), result);
 190         return result;
 191 }
 192
 193 /**
 194  * Wait for others drop their references of the object at first, then we drop
 195  * the last one, which will lead to the object be destroyed immediately.
 196  * Must be called after cl_object_kill() against this object.
 197  *
 198  * The reason we want to do this is: destroying top object will wait for sub
 199  * objects being destroyed first, so we can't let bottom layer (e.g. from ASTs)
 200  * to initiate top object destroying which may deadlock. See bz22520.
 201  */
 202 static void cl_object_put_last(struct lu_env *env, struct cl_object *obj)
 203 {
 204         struct lu_object_header *header = obj->co_lu.lo_header;
 205         wait_queue_t           waiter;
 206
 207         if (unlikely(atomic_read(&header->loh_ref) != 1)) {
 208                 struct lu_site *site = obj->co_lu.lo_dev->ld_site;
 209                 struct lu_site_bkt_data *bkt;
 210
 211                 bkt = lu_site_bkt_from_fid(site, &header->loh_fid);
 212
 213                 init_waitqueue_entry(&waiter, current);
 214                 add_wait_queue(&bkt->lsb_marche_funebre, &waiter);
 215
 216                 while (1) {
 217                         set_current_state(TASK_UNINTERRUPTIBLE);
 218                         if (atomic_read(&header->loh_ref) == 1)
 219                                 break;
 220                         schedule();
 221                 }
 222
 223                 set_current_state(TASK_RUNNING);
 224                 remove_wait_queue(&bkt->lsb_marche_funebre, &waiter);
 225         }
 226
 227         cl_object_put(env, obj);
 228 }
 229
 230 void cl_inode_fini(struct inode *inode)
 231 {
 232         struct lu_env           *env;
 233         struct ll_inode_info    *lli  = ll_i2info(inode);
 234         struct cl_object        *clob = lli->lli_clob;
 235         int refcheck;
 236         int emergency;
 237
 238         if (clob != NULL) {
 239                 void                    *cookie;
 240
 241                 cookie = cl_env_reenter();
 242                 env = cl_env_get(&refcheck);
 243                 emergency = IS_ERR(env);
 244                 if (emergency) {
 245                         mutex_lock(&cl_inode_fini_guard);
 246                         LASSERT(cl_inode_fini_env != NULL);
 247                         cl_env_implant(cl_inode_fini_env, &refcheck);
 248                         env = cl_inode_fini_env;
 249                 }
 250
 251                 /*
 252                  * cl_object cache is a slave to inode cache (which, in turn
 253                  * is a slave to dentry cache), don't keep cl_object in memory
 254                  * when its master is evicted.
 255                  */
 256                 cl_object_kill(env, clob);
 257                 lu_object_ref_del(&clob->co_lu, "inode", inode);
 258                 cl_object_put_last(env, clob);
 259                 lli->lli_clob = NULL;
 260                 if (emergency) {
 261                         cl_env_unplant(cl_inode_fini_env, &refcheck);
 262                         mutex_unlock(&cl_inode_fini_guard);
 263                 } else {
 264                         cl_env_put(env, &refcheck);
 265                 }
 266
 267                 cl_env_reexit(cookie);
 268         }
 269 }
 270
 271 /**
 272  * build inode number from passed @fid */
 273 __u64 cl_fid_build_ino(const struct lu_fid *fid, int api32)
 274 {
 275         if (BITS_PER_LONG == 32 || api32)
 276                 RETURN(fid_flatten32(fid));
 277         else
 278                 RETURN(fid_flatten(fid));
 279 }
 280
 281 /**
 282  * build inode generation from passed @fid.  If our FID overflows the 32-bit
 283  * inode number then return a non-zero generation to distinguish them. */
 284 __u32 cl_fid_build_gen(const struct lu_fid *fid)
 285 {
 286         __u32 gen;
 287         ENTRY;
 288
 289         if (fid_is_igif(fid)) {
 290                 gen = lu_igif_gen(fid);
 291                 RETURN(gen);
 292         }
 293
 294         gen = (fid_flatten(fid) >> 32);
 295         RETURN(gen);
 296 }