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  * cl code shared between vvp and liblustre (and other Lustre clients in the
  37  * future).
  38  *
  39  *   Author: Nikita Danilov <nikita.danilov@sun.com>
  40  */
  41
  42 #define DEBUG_SUBSYSTEM S_LLITE
  43
  44 #include <libcfs/libcfs.h>
  45 #include <linux/fs.h>
  46 #include <linux/sched.h>
  47 #include <linux/mm.h>
  48 #include <linux/quotaops.h>
  49 #include <linux/highmem.h>
  50 #include <linux/pagemap.h>
  51 #include <linux/rbtree.h>
  52
  53 #include <obd.h>
  54 #include <obd_support.h>
  55 #include <lustre_fid.h>
  56 #include <lustre_dlm.h>
  57 #include <lustre_ver.h>
  58 #include <lustre_mdc.h>
  59 #include <cl_object.h>
  60
  61 #include "llite_internal.h"
  62
  63 static const struct cl_req_operations ccc_req_ops;
  64
  65 /*
  66  * ccc_ prefix stands for "Common Client Code".
  67  */
  68
  69 static struct kmem_cache *ccc_thread_kmem;
  70 static struct kmem_cache *ccc_session_kmem;
  71 static struct kmem_cache *ccc_req_kmem;
  72
  73 static struct lu_kmem_descr ccc_caches[] = {
  74         {
  75                 .ckd_cache = &ccc_thread_kmem,
  76                 .ckd_name  = "ccc_thread_kmem",
  77                 .ckd_size  = sizeof (struct ccc_thread_info),
  78         },
  79         {
  80                 .ckd_cache = &ccc_session_kmem,
  81                 .ckd_name  = "ccc_session_kmem",
  82                 .ckd_size  = sizeof (struct ccc_session)
  83         },
  84         {
  85                 .ckd_cache = &ccc_req_kmem,
  86                 .ckd_name  = "ccc_req_kmem",
  87                 .ckd_size  = sizeof (struct ccc_req)
  88         },
  89         {
  90                 .ckd_cache = NULL
  91         }
  92 };
  93
  94 /*****************************************************************************
  95  *
  96  * Vvp device and device type functions.
  97  *
  98  */
  99
 100 void *ccc_key_init(const struct lu_context *ctx, struct lu_context_key *key)
 101 {
 102         struct ccc_thread_info *info;
 103
 104         OBD_SLAB_ALLOC_PTR_GFP(info, ccc_thread_kmem, GFP_NOFS);
 105         if (info == NULL)
 106                 info = ERR_PTR(-ENOMEM);
 107         return info;
 108 }
 109
 110 void ccc_key_fini(const struct lu_context *ctx,
 111                          struct lu_context_key *key, void *data)
 112 {
 113         struct ccc_thread_info *info = data;
 114         OBD_SLAB_FREE_PTR(info, ccc_thread_kmem);
 115 }
 116
 117 void *ccc_session_key_init(const struct lu_context *ctx,
 118                            struct lu_context_key *key)
 119 {
 120         struct ccc_session *session;
 121
 122         OBD_SLAB_ALLOC_PTR_GFP(session, ccc_session_kmem, GFP_NOFS);
 123         if (session == NULL)
 124                 session = ERR_PTR(-ENOMEM);
 125         return session;
 126 }
 127
 128 void ccc_session_key_fini(const struct lu_context *ctx,
 129                                  struct lu_context_key *key, void *data)
 130 {
 131         struct ccc_session *session = data;
 132         OBD_SLAB_FREE_PTR(session, ccc_session_kmem);
 133 }
 134
 135 struct lu_context_key ccc_key = {
 136         .lct_tags = LCT_CL_THREAD,
 137         .lct_init = ccc_key_init,
 138         .lct_fini = ccc_key_fini
 139 };
 140
 141 struct lu_context_key ccc_session_key = {
 142         .lct_tags = LCT_SESSION,
 143         .lct_init = ccc_session_key_init,
 144         .lct_fini = ccc_session_key_fini
 145 };
 146
 147 int ccc_req_init(const struct lu_env *env, struct cl_device *dev,
 148                  struct cl_req *req)
 149 {
 150         struct ccc_req *vrq;
 151         int result;
 152
 153         OBD_SLAB_ALLOC_PTR_GFP(vrq, ccc_req_kmem, GFP_NOFS);
 154         if (vrq != NULL) {
 155                 cl_req_slice_add(req, &vrq->crq_cl, dev, &ccc_req_ops);
 156                 result = 0;
 157         } else
 158                 result = -ENOMEM;
 159         return result;
 160 }
 161
 162 /**
 163  * An `emergency' environment used by ccc_inode_fini() when cl_env_get()
 164  * fails. Access to this environment is serialized by ccc_inode_fini_guard
 165  * mutex.
 166  */
 167 static struct lu_env *ccc_inode_fini_env = NULL;
 168
 169 /**
 170  * A mutex serializing calls to slp_inode_fini() under extreme memory
 171  * pressure, when environments cannot be allocated.
 172  */
 173 static DEFINE_MUTEX(ccc_inode_fini_guard);
 174 static int dummy_refcheck;
 175
 176 int ccc_global_init(struct lu_device_type *device_type)
 177 {
 178         int result;
 179
 180         result = lu_kmem_init(ccc_caches);
 181         if (result)
 182                 return result;
 183
 184         result = lu_device_type_init(device_type);
 185         if (result)
 186                 goto out_kmem;
 187
 188         ccc_inode_fini_env = cl_env_alloc(&dummy_refcheck,
 189                                           LCT_REMEMBER|LCT_NOREF);
 190         if (IS_ERR(ccc_inode_fini_env)) {
 191                 result = PTR_ERR(ccc_inode_fini_env);
 192                 goto out_device;
 193         }
 194
 195         ccc_inode_fini_env->le_ctx.lc_cookie = 0x4;
 196         return 0;
 197 out_device:
 198         lu_device_type_fini(device_type);
 199 out_kmem:
 200         lu_kmem_fini(ccc_caches);
 201         return result;
 202 }
 203
 204 void ccc_global_fini(struct lu_device_type *device_type)
 205 {
 206         if (ccc_inode_fini_env != NULL) {
 207                 cl_env_put(ccc_inode_fini_env, &dummy_refcheck);
 208                 ccc_inode_fini_env = NULL;
 209         }
 210         lu_device_type_fini(device_type);
 211         lu_kmem_fini(ccc_caches);
 212 }
 213
 214 static void vvp_object_size_lock(struct cl_object *obj)
 215 {
 216         struct inode *inode = vvp_object_inode(obj);
 217
 218         ll_inode_size_lock(inode);
 219         cl_object_attr_lock(obj);
 220 }
 221
 222 static void vvp_object_size_unlock(struct cl_object *obj)
 223 {
 224         struct inode *inode = vvp_object_inode(obj);
 225
 226         cl_object_attr_unlock(obj);
 227         ll_inode_size_unlock(inode);
 228 }
 229
 230 /*****************************************************************************
 231  *
 232  * io operations.
 233  *
 234  */
 235
 236 void ccc_io_fini(const struct lu_env *env, const struct cl_io_slice *ios)
 237 {
 238         struct cl_io *io = ios->cis_io;
 239
 240         CLOBINVRNT(env, io->ci_obj, vvp_object_invariant(io->ci_obj));
 241 }
 242
 243 int ccc_io_one_lock_index(const struct lu_env *env, struct cl_io *io,
 244                           __u32 enqflags, enum cl_lock_mode mode,
 245                           pgoff_t start, pgoff_t end)
 246 {
 247         struct ccc_io          *cio   = ccc_env_io(env);
 248         struct cl_lock_descr   *descr = &cio->cui_link.cill_descr;
 249         struct cl_object       *obj   = io->ci_obj;
 250
 251         CLOBINVRNT(env, obj, vvp_object_invariant(obj));
 252         ENTRY;
 253
 254         CDEBUG(D_VFSTRACE, "lock: %d [%lu, %lu]\n", mode, start, end);
 255
 256         memset(&cio->cui_link, 0, sizeof cio->cui_link);
 257
 258         if (cio->cui_fd && (cio->cui_fd->fd_flags & LL_FILE_GROUP_LOCKED)) {
 259                 descr->cld_mode = CLM_GROUP;
 260                 descr->cld_gid  = cio->cui_fd->fd_grouplock.cg_gid;
 261         } else {
 262                 descr->cld_mode  = mode;
 263         }
 264         descr->cld_obj   = obj;
 265         descr->cld_start = start;
 266         descr->cld_end   = end;
 267         descr->cld_enq_flags = enqflags;
 268
 269         cl_io_lock_add(env, io, &cio->cui_link);
 270         RETURN(0);
 271 }
 272
 273 void ccc_io_update_iov(const struct lu_env *env,
 274                        struct ccc_io *cio, struct cl_io *io)
 275 {
 276         int i;
 277         size_t size = io->u.ci_rw.crw_count;
 278
 279         cio->cui_iov_olen = 0;
 280         if (!cl_is_normalio(env, io) || cio->cui_tot_nrsegs == 0)
 281                 return;
 282
 283         for (i = 0; i < cio->cui_tot_nrsegs; i++) {
 284                 struct iovec *iv = &cio->cui_iov[i];
 285
 286                 if (iv->iov_len < size)
 287                         size -= iv->iov_len;
 288                 else {
 289                         if (iv->iov_len > size) {
 290                                 cio->cui_iov_olen = iv->iov_len;
 291                                 iv->iov_len = size;
 292                         }
 293                         break;
 294                 }
 295         }
 296
 297         cio->cui_nrsegs = i + 1;
 298         LASSERTF(cio->cui_tot_nrsegs >= cio->cui_nrsegs,
 299                  "tot_nrsegs: %lu, nrsegs: %lu\n",
 300                  cio->cui_tot_nrsegs, cio->cui_nrsegs);
 301 }
 302
 303 int ccc_io_one_lock(const struct lu_env *env, struct cl_io *io,
 304                     __u32 enqflags, enum cl_lock_mode mode,
 305                     loff_t start, loff_t end)
 306 {
 307         struct cl_object *obj = io->ci_obj;
 308         return ccc_io_one_lock_index(env, io, enqflags, mode,
 309                                      cl_index(obj, start), cl_index(obj, end));
 310 }
 311
 312 void ccc_io_end(const struct lu_env *env, const struct cl_io_slice *ios)
 313 {
 314         CLOBINVRNT(env, ios->cis_io->ci_obj,
 315                    vvp_object_invariant(ios->cis_io->ci_obj));
 316 }
 317
 318 void ccc_io_advance(const struct lu_env *env,
 319                     const struct cl_io_slice *ios,
 320                     size_t nob)
 321 {
 322         struct ccc_io    *cio = cl2ccc_io(env, ios);
 323         struct cl_io     *io  = ios->cis_io;
 324         struct cl_object *obj = ios->cis_io->ci_obj;
 325
 326         CLOBINVRNT(env, obj, vvp_object_invariant(obj));
 327
 328         if (!cl_is_normalio(env, io))
 329                 return;
 330
 331         LASSERT(cio->cui_tot_nrsegs >= cio->cui_nrsegs);
 332         LASSERT(cio->cui_tot_count  >= nob);
 333
 334         cio->cui_iov        += cio->cui_nrsegs;
 335         cio->cui_tot_nrsegs -= cio->cui_nrsegs;
 336         cio->cui_tot_count  -= nob;
 337
 338         /* update the iov */
 339         if (cio->cui_iov_olen > 0) {
 340                 struct iovec *iv;
 341
 342                 cio->cui_iov--;
 343                 cio->cui_tot_nrsegs++;
 344                 iv = &cio->cui_iov[0];
 345                 if (io->ci_continue) {
 346                         iv->iov_base += iv->iov_len;
 347                         LASSERT(cio->cui_iov_olen > iv->iov_len);
 348                         iv->iov_len = cio->cui_iov_olen - iv->iov_len;
 349                 } else {
 350                         /* restore the iov_len, in case of restart io. */
 351                         iv->iov_len = cio->cui_iov_olen;
 352                 }
 353                 cio->cui_iov_olen = 0;
 354         }
 355 }
 356
 357 /**
 358  * Helper function that if necessary adjusts file size (inode->i_size), when
 359  * position at the offset \a pos is accessed. File size can be arbitrary stale
 360  * on a Lustre client, but client at least knows KMS. If accessed area is
 361  * inside [0, KMS], set file size to KMS, otherwise glimpse file size.
 362  *
 363  * Locking: cl_isize_lock is used to serialize changes to inode size and to
 364  * protect consistency between inode size and cl_object
 365  * attributes. cl_object_size_lock() protects consistency between cl_attr's of
 366  * top-object and sub-objects.
 367  */
 368 int ccc_prep_size(const struct lu_env *env, struct cl_object *obj,
 369                   struct cl_io *io, loff_t start, size_t count, int *exceed)
 370 {
 371         struct cl_attr *attr  = ccc_env_thread_attr(env);
 372         struct inode   *inode = vvp_object_inode(obj);
 373         loff_t          pos   = start + count - 1;
 374         loff_t kms;
 375         int result;
 376
 377         /*
 378          * Consistency guarantees: following possibilities exist for the
 379          * relation between region being accessed and real file size at this
 380          * moment:
 381          *
 382          *  (A): the region is completely inside of the file;
 383          *
 384          *  (B-x): x bytes of region are inside of the file, the rest is
 385          *  outside;
 386          *
 387          *  (C): the region is completely outside of the file.
 388          *
 389          * This classification is stable under DLM lock already acquired by
 390          * the caller, because to change the class, other client has to take
 391          * DLM lock conflicting with our lock. Also, any updates to ->i_size
 392          * by other threads on this client are serialized by
 393          * ll_inode_size_lock(). This guarantees that short reads are handled
 394          * correctly in the face of concurrent writes and truncates.
 395          */
 396         vvp_object_size_lock(obj);
 397         result = cl_object_attr_get(env, obj, attr);
 398         if (result == 0) {
 399                 kms = attr->cat_kms;
 400                 if (pos > kms) {
 401                         /*
 402                          * A glimpse is necessary to determine whether we
 403                          * return a short read (B) or some zeroes at the end
 404                          * of the buffer (C)
 405                          */
 406                         vvp_object_size_unlock(obj);
 407                         result = cl_glimpse_lock(env, io, inode, obj, 0);
 408                         if (result == 0 && exceed != NULL) {
 409                                 /* If objective page index exceed end-of-file
 410                                  * page index, return directly. Do not expect
 411                                  * kernel will check such case correctly.
 412                                  * linux-2.6.18-128.1.1 miss to do that.
 413                                  * --bug 17336 */
 414                                 loff_t size = i_size_read(inode);
 415                                 unsigned long cur_index = start >>
 416                                                           PAGE_CACHE_SHIFT;
 417
 418                                 if ((size == 0 && cur_index != 0) ||
 419                                     (((size - 1) >> PAGE_CACHE_SHIFT) <
 420                                      cur_index))
 421                                 *exceed = 1;
 422                         }
 423                         return result;
 424                 } else {
 425                         /*
 426                          * region is within kms and, hence, within real file
 427                          * size (A). We need to increase i_size to cover the
 428                          * read region so that generic_file_read() will do its
 429                          * job, but that doesn't mean the kms size is
 430                          * _correct_, it is only the _minimum_ size. If
 431                          * someone does a stat they will get the correct size
 432                          * which will always be >= the kms value here.
 433                          * b=11081
 434                          */
 435                         if (i_size_read(inode) < kms) {
 436                                 i_size_write(inode, kms);
 437                                 CDEBUG(D_VFSTRACE,
 438                                        DFID" updating i_size "LPU64"\n",
 439                                        PFID(lu_object_fid(&obj->co_lu)),
 440                                        (__u64)i_size_read(inode));
 441
 442                         }
 443                 }
 444         }
 445
 446         vvp_object_size_unlock(obj);
 447
 448         return result;
 449 }
 450
 451 /*****************************************************************************
 452  *
 453  * Transfer operations.
 454  *
 455  */
 456
 457 void ccc_req_completion(const struct lu_env *env,
 458                         const struct cl_req_slice *slice, int ioret)
 459 {
 460         struct ccc_req *vrq;
 461
 462         if (ioret > 0)
 463                 cl_stats_tally(slice->crs_dev, slice->crs_req->crq_type, ioret);
 464
 465         vrq = cl2ccc_req(slice);
 466         OBD_SLAB_FREE_PTR(vrq, ccc_req_kmem);
 467 }
 468
 469 /**
 470  * Implementation of struct cl_req_operations::cro_attr_set() for ccc
 471  * layer. ccc is responsible for
 472  *
 473  *    - o_[mac]time
 474  *
 475  *    - o_mode
 476  *
 477  *    - o_parent_seq
 478  *
 479  *    - o_[ug]id
 480  *
 481  *    - o_parent_oid
 482  *
 483  *    - o_parent_ver
 484  *
 485  *    - o_ioepoch,
 486  *
 487  *  and capability.
 488  */
 489 void ccc_req_attr_set(const struct lu_env *env,
 490                       const struct cl_req_slice *slice,
 491                       const struct cl_object *obj,
 492                       struct cl_req_attr *attr, u64 flags)
 493 {
 494         struct inode    *inode;
 495         struct obdo     *oa;
 496         u32              valid_flags;
 497
 498         oa = attr->cra_oa;
 499         inode = vvp_object_inode(obj);
 500         valid_flags = OBD_MD_FLTYPE;
 501
 502         if ((flags & OBD_MD_FLOSSCAPA) != 0) {
 503                 LASSERT(attr->cra_capa == NULL);
 504                 attr->cra_capa = cl_capa_lookup(inode,
 505                                                 slice->crs_req->crq_type);
 506         }
 507
 508         if (slice->crs_req->crq_type == CRT_WRITE) {
 509                 if (flags & OBD_MD_FLEPOCH) {
 510                         oa->o_valid |= OBD_MD_FLEPOCH;
 511                         oa->o_ioepoch = ll_i2info(inode)->lli_ioepoch;
 512                         valid_flags |= OBD_MD_FLMTIME | OBD_MD_FLCTIME |
 513                                        OBD_MD_FLUID | OBD_MD_FLGID;
 514                 }
 515         }
 516         obdo_from_inode(oa, inode, valid_flags & flags);
 517         obdo_set_parent_fid(oa, &ll_i2info(inode)->lli_fid);
 518         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_INVALID_PFID))
 519                 oa->o_parent_oid++;
 520         memcpy(attr->cra_jobid, ll_i2info(inode)->lli_jobid,
 521                LUSTRE_JOBID_SIZE);
 522 }
 523
 524 static const struct cl_req_operations ccc_req_ops = {
 525         .cro_attr_set   = ccc_req_attr_set,
 526         .cro_completion = ccc_req_completion
 527 };
 528
 529 int cl_setattr_ost(struct inode *inode, const struct iattr *attr,
 530                    struct obd_capa *capa)
 531 {
 532         struct lu_env *env;
 533         struct cl_io  *io;
 534         int            result;
 535         int            refcheck;
 536
 537         ENTRY;
 538
 539         env = cl_env_get(&refcheck);
 540         if (IS_ERR(env))
 541                 RETURN(PTR_ERR(env));
 542
 543         io = ccc_env_thread_io(env);
 544         io->ci_obj = ll_i2info(inode)->lli_clob;
 545
 546         io->u.ci_setattr.sa_attr.lvb_atime = LTIME_S(attr->ia_atime);
 547         io->u.ci_setattr.sa_attr.lvb_mtime = LTIME_S(attr->ia_mtime);
 548         io->u.ci_setattr.sa_attr.lvb_ctime = LTIME_S(attr->ia_ctime);
 549         io->u.ci_setattr.sa_attr.lvb_size = attr->ia_size;
 550         io->u.ci_setattr.sa_valid = attr->ia_valid;
 551         io->u.ci_setattr.sa_capa = capa;
 552
 553 again:
 554         if (cl_io_init(env, io, CIT_SETATTR, io->ci_obj) == 0) {
 555                 struct ccc_io *cio = ccc_env_io(env);
 556
 557                 if (attr->ia_valid & ATTR_FILE)
 558                         /* populate the file descriptor for ftruncate to honor
 559                          * group lock - see LU-787 */
 560                         cio->cui_fd = LUSTRE_FPRIVATE(attr->ia_file);
 561
 562                 result = cl_io_loop(env, io);
 563         } else {
 564                 result = io->ci_result;
 565         }
 566         cl_io_fini(env, io);
 567         if (unlikely(io->ci_need_restart))
 568                 goto again;
 569         /* HSM import case: file is released, cannot be restored
 570          * no need to fail except if restore registration failed
 571          * with -ENODATA */
 572         if (result == -ENODATA && io->ci_restore_needed &&
 573             io->ci_result != -ENODATA)
 574                 result = 0;
 575         cl_env_put(env, &refcheck);
 576         RETURN(result);
 577 }
 578
 579 /*****************************************************************************
 580  *
 581  * Type conversions.
 582  *
 583  */
 584
 585 struct ccc_io *cl2ccc_io(const struct lu_env *env,
 586                          const struct cl_io_slice *slice)
 587 {
 588         struct ccc_io *cio;
 589
 590         cio = container_of(slice, struct ccc_io, cui_cl);
 591         LASSERT(cio == ccc_env_io(env));
 592         return cio;
 593 }
 594
 595 struct ccc_req *cl2ccc_req(const struct cl_req_slice *slice)
 596 {
 597         return container_of0(slice, struct ccc_req, crq_cl);
 598 }
 599
 600 /**
 601  * Initialize or update CLIO structures for regular files when new
 602  * meta-data arrives from the server.
 603  *
 604  * \param inode regular file inode
 605  * \param md    new file metadata from MDS
 606  * - allocates cl_object if necessary,
 607  * - updated layout, if object was already here.
 608  */
 609 int cl_file_inode_init(struct inode *inode, struct lustre_md *md)
 610 {
 611         struct lu_env        *env;
 612         struct ll_inode_info *lli;
 613         struct cl_object     *clob;
 614         struct lu_site       *site;
 615         struct lu_fid        *fid;
 616         struct cl_object_conf conf = {
 617                 .coc_inode = inode,
 618                 .u = {
 619                         .coc_md    = md
 620                 }
 621         };
 622         int result = 0;
 623         int refcheck;
 624
 625         LASSERT(md->body->mbo_valid & OBD_MD_FLID);
 626         LASSERT(S_ISREG(inode->i_mode));
 627
 628         env = cl_env_get(&refcheck);
 629         if (IS_ERR(env))
 630                 return PTR_ERR(env);
 631
 632         site = ll_i2sbi(inode)->ll_site;
 633         lli  = ll_i2info(inode);
 634         fid  = &lli->lli_fid;
 635         LASSERT(fid_is_sane(fid));
 636
 637         if (lli->lli_clob == NULL) {
 638                 /* clob is slave of inode, empty lli_clob means for new inode,
 639                  * there is no clob in cache with the given fid, so it is
 640                  * unnecessary to perform lookup-alloc-lookup-insert, just
 641                  * alloc and insert directly. */
 642                 LASSERT(inode->i_state & I_NEW);
 643                 conf.coc_lu.loc_flags = LOC_F_NEW;
 644                 clob = cl_object_find(env, lu2cl_dev(site->ls_top_dev),
 645                                       fid, &conf);
 646                 if (!IS_ERR(clob)) {
 647                         /*
 648                          * No locking is necessary, as new inode is
 649                          * locked by I_NEW bit.
 650                          */
 651                         lli->lli_clob = clob;
 652                         lli->lli_has_smd = lsm_has_objects(md->lsm);
 653                         lu_object_ref_add(&clob->co_lu, "inode", inode);
 654                 } else
 655                         result = PTR_ERR(clob);
 656         } else {
 657                 result = cl_conf_set(env, lli->lli_clob, &conf);
 658         }
 659
 660         cl_env_put(env, &refcheck);
 661
 662         if (result != 0)
 663                 CERROR("Failure to initialize cl object "DFID": %d\n",
 664                        PFID(fid), result);
 665         return result;
 666 }
 667
 668 /**
 669  * Wait for others drop their references of the object at first, then we drop
 670  * the last one, which will lead to the object be destroyed immediately.
 671  * Must be called after cl_object_kill() against this object.
 672  *
 673  * The reason we want to do this is: destroying top object will wait for sub
 674  * objects being destroyed first, so we can't let bottom layer (e.g. from ASTs)
 675  * to initiate top object destroying which may deadlock. See bz22520.
 676  */
 677 static void cl_object_put_last(struct lu_env *env, struct cl_object *obj)
 678 {
 679         struct lu_object_header *header = obj->co_lu.lo_header;
 680         wait_queue_t           waiter;
 681
 682         if (unlikely(atomic_read(&header->loh_ref) != 1)) {
 683                 struct lu_site *site = obj->co_lu.lo_dev->ld_site;
 684                 struct lu_site_bkt_data *bkt;
 685
 686                 bkt = lu_site_bkt_from_fid(site, &header->loh_fid);
 687
 688                 init_waitqueue_entry_current(&waiter);
 689                 add_wait_queue(&bkt->lsb_marche_funebre, &waiter);
 690
 691                 while (1) {
 692                         set_current_state(TASK_UNINTERRUPTIBLE);
 693                         if (atomic_read(&header->loh_ref) == 1)
 694                                 break;
 695                         waitq_wait(&waiter, TASK_UNINTERRUPTIBLE);
 696                 }
 697
 698                 set_current_state(TASK_RUNNING);
 699                 remove_wait_queue(&bkt->lsb_marche_funebre, &waiter);
 700         }
 701
 702         cl_object_put(env, obj);
 703 }
 704
 705 void cl_inode_fini(struct inode *inode)
 706 {
 707         struct lu_env           *env;
 708         struct ll_inode_info    *lli  = ll_i2info(inode);
 709         struct cl_object        *clob = lli->lli_clob;
 710         int refcheck;
 711         int emergency;
 712
 713         if (clob != NULL) {
 714                 void                    *cookie;
 715
 716                 cookie = cl_env_reenter();
 717                 env = cl_env_get(&refcheck);
 718                 emergency = IS_ERR(env);
 719                 if (emergency) {
 720                         mutex_lock(&ccc_inode_fini_guard);
 721                         LASSERT(ccc_inode_fini_env != NULL);
 722                         cl_env_implant(ccc_inode_fini_env, &refcheck);
 723                         env = ccc_inode_fini_env;
 724                 }
 725                 /*
 726                  * cl_object cache is a slave to inode cache (which, in turn
 727                  * is a slave to dentry cache), don't keep cl_object in memory
 728                  * when its master is evicted.
 729                  */
 730                 cl_object_kill(env, clob);
 731                 lu_object_ref_del(&clob->co_lu, "inode", inode);
 732                 cl_object_put_last(env, clob);
 733                 lli->lli_clob = NULL;
 734                 if (emergency) {
 735                         cl_env_unplant(ccc_inode_fini_env, &refcheck);
 736                         mutex_unlock(&ccc_inode_fini_guard);
 737                 } else
 738                         cl_env_put(env, &refcheck);
 739                 cl_env_reexit(cookie);
 740         }
 741 }
 742
 743 /**
 744  * return IF_* type for given lu_dirent entry.
 745  * IF_* flag shld be converted to particular OS file type in
 746  * platform llite module.
 747  */
 748 __u16 ll_dirent_type_get(struct lu_dirent *ent)
 749 {
 750         __u16 type = 0;
 751         struct luda_type *lt;
 752         int len = 0;
 753
 754         if (le32_to_cpu(ent->lde_attrs) & LUDA_TYPE) {
 755                 const unsigned align = sizeof(struct luda_type) - 1;
 756
 757                 len = le16_to_cpu(ent->lde_namelen);
 758                 len = (len + align) & ~align;
 759                 lt = (void *)ent->lde_name + len;
 760                 type = IFTODT(le16_to_cpu(lt->lt_type));
 761         }
 762         return type;
 763 }
 764
 765 /**
 766  * build inode number from passed @fid */
 767 __u64 cl_fid_build_ino(const struct lu_fid *fid, int api32)
 768 {
 769         if (BITS_PER_LONG == 32 || api32)
 770                 RETURN(fid_flatten32(fid));
 771         else
 772                 RETURN(fid_flatten(fid));
 773 }
 774
 775 /**
 776  * build inode generation from passed @fid.  If our FID overflows the 32-bit
 777  * inode number then return a non-zero generation to distinguish them. */
 778 __u32 cl_fid_build_gen(const struct lu_fid *fid)
 779 {
 780         __u32 gen;
 781         ENTRY;
 782
 783         if (fid_is_igif(fid)) {
 784                 gen = lu_igif_gen(fid);
 785                 RETURN(gen);
 786         }
 787
 788         gen = (fid_flatten(fid) >> 32);
 789         RETURN(gen);
 790 }
 791
 792 /* lsm is unreliable after hsm implementation as layout can be changed at
 793  * any time. This is only to support old, non-clio-ized interfaces. It will
 794  * cause deadlock if clio operations are called with this extra layout refcount
 795  * because in case the layout changed during the IO, ll_layout_refresh() will
 796  * have to wait for the refcount to become zero to destroy the older layout.
 797  *
 798  * Notice that the lsm returned by this function may not be valid unless called
 799  * inside layout lock - MDS_INODELOCK_LAYOUT. */
 800 struct lov_stripe_md *ccc_inode_lsm_get(struct inode *inode)
 801 {
 802         return lov_lsm_get(ll_i2info(inode)->lli_clob);
 803 }
 804
 805 void inline ccc_inode_lsm_put(struct inode *inode, struct lov_stripe_md *lsm)
 806 {
 807         lov_lsm_put(ll_i2info(inode)->lli_clob, lsm);
 808 }