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