lustre/osd-ldiskfs/osd_handler.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) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  *
  30  * Copyright (c) 2011, 2012, Whamcloud, Inc.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  *
  36  * lustre/osd/osd_handler.c
  37  *
  38  * Top-level entry points into osd module
  39  *
  40  * Author: Nikita Danilov <nikita@clusterfs.com>
  41  *         Pravin Shelar <pravin.shelar@sun.com> : Added fid in dirent
  42  */
  43
  44 #define DEBUG_SUBSYSTEM S_MDS
  45
  46 #include <linux/module.h>
  47
  48 /* LUSTRE_VERSION_CODE */
  49 #include <lustre_ver.h>
  50 /* prerequisite for linux/xattr.h */
  51 #include <linux/types.h>
  52 /* prerequisite for linux/xattr.h */
  53 #include <linux/fs.h>
  54 /* XATTR_{REPLACE,CREATE} */
  55 #include <linux/xattr.h>
  56 /* simple_mkdir() */
  57 #include <lvfs.h>
  58
  59 /*
  60  * struct OBD_{ALLOC,FREE}*()
  61  * OBD_FAIL_CHECK
  62  */
  63 #include <obd_support.h>
  64 /* struct ptlrpc_thread */
  65 #include <lustre_net.h>
  66
  67 /* fid_is_local() */
  68 #include <lustre_fid.h>
  69
  70 #include "osd_internal.h"
  71 #include "osd_igif.h"
  72
  73 /* llo_* api support */
  74 #include <md_object.h>
  75 /* dt_acct_features */
  76 #include <lquota.h>
  77
  78 #ifdef HAVE_LDISKFS_PDO
  79 int ldiskfs_pdo = 1;
  80 CFS_MODULE_PARM(ldiskfs_pdo, "i", int, 0644,
  81                 "ldiskfs with parallel directory operations");
  82 #else
  83 int ldiskfs_pdo = 0;
  84 #endif
  85
  86 static const char dot[] = ".";
  87 static const char dotdot[] = "..";
  88 static const char remote_obj_dir[] = "REM_OBJ_DIR";
  89
  90 static const struct lu_object_operations      osd_lu_obj_ops;
  91 static const struct dt_object_operations      osd_obj_ops;
  92 static const struct dt_object_operations      osd_obj_ea_ops;
  93 static const struct dt_object_operations      osd_obj_otable_it_ops;
  94 static const struct dt_index_operations       osd_index_iam_ops;
  95 static const struct dt_index_operations       osd_index_ea_ops;
  96
  97 static int osd_has_index(const struct osd_object *obj)
  98 {
  99         return obj->oo_dt.do_index_ops != NULL;
 100 }
 101
 102 static int osd_object_invariant(const struct lu_object *l)
 103 {
 104         return osd_invariant(osd_obj(l));
 105 }
 106
 107 #ifdef HAVE_QUOTA_SUPPORT
 108 static inline void
 109 osd_push_ctxt(const struct lu_env *env, struct osd_ctxt *save, bool is_md)
 110 {
 111         struct md_ucred *uc;
 112         struct cred     *tc;
 113
 114         if (!is_md)
 115                 /* OFD support */
 116                 return;
 117
 118         uc = md_ucred(env);
 119
 120         LASSERT(uc != NULL);
 121
 122         save->oc_uid = current_fsuid();
 123         save->oc_gid = current_fsgid();
 124         save->oc_cap = current_cap();
 125         if ((tc = prepare_creds())) {
 126                 tc->fsuid         = uc->mu_fsuid;
 127                 tc->fsgid         = uc->mu_fsgid;
 128                 commit_creds(tc);
 129         }
 130         /* XXX not suboptimal */
 131         cfs_curproc_cap_unpack(uc->mu_cap);
 132 }
 133
 134 static inline void
 135 osd_pop_ctxt(struct osd_ctxt *save, bool is_md)
 136 {
 137         struct cred *tc;
 138
 139         if (!is_md)
 140                 /* OFD support */
 141                 return;
 142
 143         if ((tc = prepare_creds())) {
 144                 tc->fsuid         = save->oc_uid;
 145                 tc->fsgid         = save->oc_gid;
 146                 tc->cap_effective = save->oc_cap;
 147                 commit_creds(tc);
 148         }
 149 }
 150 #endif
 151
 152 /*
 153  * Concurrency: doesn't matter
 154  */
 155 static int osd_read_locked(const struct lu_env *env, struct osd_object *o)
 156 {
 157         return osd_oti_get(env)->oti_r_locks > 0;
 158 }
 159
 160 /*
 161  * Concurrency: doesn't matter
 162  */
 163 static int osd_write_locked(const struct lu_env *env, struct osd_object *o)
 164 {
 165         struct osd_thread_info *oti = osd_oti_get(env);
 166         return oti->oti_w_locks > 0 && o->oo_owner == env;
 167 }
 168
 169 /*
 170  * Concurrency: doesn't access mutable data
 171  */
 172 static int osd_root_get(const struct lu_env *env,
 173                         struct dt_device *dev, struct lu_fid *f)
 174 {
 175         lu_local_obj_fid(f, OSD_FS_ROOT_OID);
 176         return 0;
 177 }
 178
 179 /*
 180  * OSD object methods.
 181  */
 182
 183 /*
 184  * Concurrency: no concurrent access is possible that early in object
 185  * life-cycle.
 186  */
 187 static struct lu_object *osd_object_alloc(const struct lu_env *env,
 188                                           const struct lu_object_header *hdr,
 189                                           struct lu_device *d)
 190 {
 191         struct osd_object *mo;
 192
 193         OBD_ALLOC_PTR(mo);
 194         if (mo != NULL) {
 195                 struct lu_object *l;
 196
 197                 l = &mo->oo_dt.do_lu;
 198                 dt_object_init(&mo->oo_dt, NULL, d);
 199                 if (osd_dev(d)->od_iop_mode)
 200                         mo->oo_dt.do_ops = &osd_obj_ea_ops;
 201                 else
 202                         mo->oo_dt.do_ops = &osd_obj_ops;
 203
 204                 l->lo_ops = &osd_lu_obj_ops;
 205                 cfs_init_rwsem(&mo->oo_sem);
 206                 cfs_init_rwsem(&mo->oo_ext_idx_sem);
 207                 cfs_spin_lock_init(&mo->oo_guard);
 208                 return l;
 209         } else {
 210                 return NULL;
 211         }
 212 }
 213
 214 static int osd_get_lma(struct inode *inode, struct dentry *dentry,
 215                        struct lustre_mdt_attrs *lma)
 216 {
 217         int rc;
 218
 219         dentry->d_inode = inode;
 220         rc = inode->i_op->getxattr(dentry, XATTR_NAME_LMA, (void *)lma,
 221                                    sizeof(*lma));
 222         if (rc > 0) {
 223                 /* Check LMA compatibility */
 224                 if (lma->lma_incompat & ~cpu_to_le32(LMA_INCOMPAT_SUPP)) {
 225                         CWARN("%.16s: unsupported incompat LMA feature(s) "
 226                               "%lx/%#x\n",
 227                               LDISKFS_SB(inode->i_sb)->s_es->s_volume_name,
 228                               inode->i_ino, le32_to_cpu(lma->lma_incompat) &
 229                                                         ~LMA_INCOMPAT_SUPP);
 230                         rc = -ENOSYS;
 231                 } else {
 232                         lustre_lma_swab(lma);
 233                         rc = 0;
 234                 }
 235         } else if (rc == 0) {
 236                 rc = -ENODATA;
 237         }
 238
 239         return rc;
 240 }
 241
 242 /*
 243  * retrieve object from backend ext fs.
 244  **/
 245 struct inode *osd_iget(struct osd_thread_info *info, struct osd_device *dev,
 246                        struct osd_inode_id *id)
 247 {
 248         struct inode *inode = NULL;
 249
 250         inode = ldiskfs_iget(osd_sb(dev), id->oii_ino);
 251         if (IS_ERR(inode)) {
 252                 CDEBUG(D_INODE, "no inode: ino = %u, rc = %ld\n",
 253                        id->oii_ino, PTR_ERR(inode));
 254         } else if (id->oii_gen != OSD_OII_NOGEN &&
 255                    inode->i_generation != id->oii_gen) {
 256                 CDEBUG(D_INODE, "unmatched inode: ino = %u, gen0 = %u, "
 257                        "gen1 = %u\n",
 258                        id->oii_ino, id->oii_gen, inode->i_generation);
 259                 iput(inode);
 260                 inode = ERR_PTR(-ESTALE);
 261         } else if (inode->i_nlink == 0) {
 262                 /* due to parallel readdir and unlink,
 263                 * we can have dead inode here. */
 264                 CDEBUG(D_INODE, "stale inode: ino = %u\n", id->oii_ino);
 265                 make_bad_inode(inode);
 266                 iput(inode);
 267                 inode = ERR_PTR(-ESTALE);
 268         } else if (is_bad_inode(inode)) {
 269                 CWARN("%.16s: bad inode: ino = %u\n",
 270                 LDISKFS_SB(osd_sb(dev))->s_es->s_volume_name, id->oii_ino);
 271                 iput(inode);
 272                 inode = ERR_PTR(-ENOENT);
 273         } else {
 274                 if (id->oii_gen == OSD_OII_NOGEN)
 275                         osd_id_gen(id, inode->i_ino, inode->i_generation);
 276
 277                 /* Do not update file c/mtime in ldiskfs.
 278                  * NB: we don't have any lock to protect this because we don't
 279                  * have reference on osd_object now, but contention with
 280                  * another lookup + attr_set can't happen in the tiny window
 281                  * between if (...) and set S_NOCMTIME. */
 282                 if (!(inode->i_flags & S_NOCMTIME))
 283                         inode->i_flags |= S_NOCMTIME;
 284         }
 285         return inode;
 286 }
 287
 288 struct inode *osd_iget_fid(struct osd_thread_info *info, struct osd_device *dev,
 289                            struct osd_inode_id *id, struct lu_fid *fid)
 290 {
 291         struct lustre_mdt_attrs *lma   = &info->oti_mdt_attrs;
 292         struct inode            *inode;
 293         int                      rc;
 294
 295         inode = osd_iget(info, dev, id);
 296         if (IS_ERR(inode))
 297                 return inode;
 298
 299         rc = osd_get_lma(inode, &info->oti_obj_dentry, lma);
 300         if (rc == 0) {
 301                 *fid = lma->lma_self_fid;
 302         } else if (rc == -ENODATA) {
 303                 LU_IGIF_BUILD(fid, inode->i_ino, inode->i_generation);
 304         } else {
 305                 iput(inode);
 306                 inode = ERR_PTR(rc);
 307         }
 308         return inode;
 309 }
 310
 311 static struct inode *
 312 osd_iget_verify(struct osd_thread_info *info, struct osd_device *dev,
 313                 struct osd_inode_id *id, const struct lu_fid *fid)
 314 {
 315         struct lustre_mdt_attrs *lma   = &info->oti_mdt_attrs;
 316         struct inode            *inode;
 317         int                      rc;
 318
 319         inode = osd_iget(info, dev, id);
 320         if (IS_ERR(inode))
 321                 return inode;
 322
 323         rc = osd_get_lma(inode, &info->oti_obj_dentry, lma);
 324         if (rc != 0) {
 325                 if (rc == -ENODATA) {
 326                         CDEBUG(D_LFSCK, "inconsistent obj: NULL, %lu, "DFID"\n",
 327                                inode->i_ino, PFID(fid));
 328                         rc = -EREMCHG;
 329                 }
 330                 iput(inode);
 331                 return ERR_PTR(rc);
 332         }
 333
 334         if (!lu_fid_eq(fid, &lma->lma_self_fid)) {
 335                 CDEBUG(D_LFSCK, "inconsistent obj: "DFID", %lu, "DFID"\n",
 336                        PFID(&lma->lma_self_fid), inode->i_ino, PFID(fid));
 337                 iput(inode);
 338                 return ERR_PTR(EREMCHG);
 339         }
 340         return inode;
 341 }
 342
 343 static int osd_fid_lookup(const struct lu_env *env, struct osd_object *obj,
 344                           const struct lu_fid *fid,
 345                           const struct lu_object_conf *conf)
 346 {
 347         struct osd_thread_info *info;
 348         struct lu_device       *ldev   = obj->oo_dt.do_lu.lo_dev;
 349         struct osd_device      *dev;
 350         struct osd_idmap_cache *oic;
 351         struct osd_inode_id    *id;
 352         struct inode           *inode;
 353         struct osd_scrub       *scrub;
 354         struct scrub_file      *sf;
 355         int                     result;
 356         int                     verify = 0;
 357         ENTRY;
 358
 359         LINVRNT(osd_invariant(obj));
 360         LASSERT(obj->oo_inode == NULL);
 361         LASSERTF(fid_is_sane(fid) || fid_is_idif(fid), DFID, PFID(fid));
 362
 363         dev = osd_dev(ldev);
 364         scrub = &dev->od_scrub;
 365         sf = &scrub->os_file;
 366         info = osd_oti_get(env);
 367         LASSERT(info);
 368         oic = &info->oti_cache;
 369         id  = &oic->oic_lid;
 370
 371         if (OBD_FAIL_CHECK(OBD_FAIL_OST_ENOENT))
 372                 RETURN(-ENOENT);
 373
 374         if (fid_is_norm(fid)) {
 375                 /* Search order: 1. per-thread cache. */
 376                 if (lu_fid_eq(fid, &oic->oic_fid)) {
 377                         goto iget;
 378                 } else if (!cfs_list_empty(&scrub->os_inconsistent_items)) {
 379                         /* Search order: 2. OI scrub pending list. */
 380                         result = osd_oii_lookup(dev, fid, id);
 381                         if (result == 0)
 382                                 goto iget;
 383                 }
 384
 385                 if (sf->sf_flags & SF_INCONSISTENT)
 386                         verify = 1;
 387         }
 388
 389         /*
 390          * Objects are created as locking anchors or place holders for objects
 391          * yet to be created. No need to osd_oi_lookup() at here because FID
 392          * shouldn't never be re-used, if it's really a duplicate FID from
 393          * unexpected reason, we should be able to detect it later by calling
 394          * do_create->osd_oi_insert()
 395          */
 396         if (conf != NULL && (conf->loc_flags & LOC_F_NEW) != 0)
 397                 GOTO(out, result = 0);
 398
 399         /* Search order: 3. OI files. */
 400         result = osd_oi_lookup(info, dev, fid, id);
 401         if (result == -ENOENT) {
 402                 if (!fid_is_norm(fid) ||
 403                     !ldiskfs_test_bit(osd_oi_fid2idx(dev,fid),
 404                                       sf->sf_oi_bitmap))
 405                         GOTO(out, result = 0);
 406
 407                 goto trigger;
 408         }
 409
 410         if (result != 0)
 411                 GOTO(out, result);
 412
 413 iget:
 414         if (verify == 0)
 415                 inode = osd_iget(info, dev, id);
 416         else
 417                 inode = osd_iget_verify(info, dev, id, fid);
 418         if (IS_ERR(inode)) {
 419                 result = PTR_ERR(inode);
 420                 if (result == -ENOENT || result == -ESTALE) {
 421                         fid_zero(&oic->oic_fid);
 422                         result = 0;
 423                 } else if (result == -EREMCHG) {
 424
 425 trigger:
 426                         if (thread_is_running(&scrub->os_thread)) {
 427                                 result = -EINPROGRESS;
 428                         } else if (!scrub->os_no_scrub) {
 429                                 result = osd_scrub_start(dev);
 430                                 LCONSOLE_ERROR("%.16s: trigger OI scrub by RPC "
 431                                                "for "DFID", rc = %d [1]\n",
 432                                                LDISKFS_SB(osd_sb(dev))->s_es->\
 433                                                s_volume_name,PFID(fid), result);
 434                                 if (result == 0 || result == -EALREADY)
 435                                         result = -EINPROGRESS;
 436                                 else
 437                                         result = -EREMCHG;
 438                         }
 439                 }
 440
 441                 GOTO(out, result);
 442         }
 443
 444         obj->oo_inode = inode;
 445         LASSERT(obj->oo_inode->i_sb == osd_sb(dev));
 446         if (dev->od_iop_mode) {
 447                 obj->oo_compat_dot_created = 1;
 448                 obj->oo_compat_dotdot_created = 1;
 449         }
 450
 451         if (!S_ISDIR(inode->i_mode) || !ldiskfs_pdo) /* done */
 452                 GOTO(out, result = 0);
 453
 454         LASSERT(obj->oo_hl_head == NULL);
 455         obj->oo_hl_head = ldiskfs_htree_lock_head_alloc(HTREE_HBITS_DEF);
 456         if (obj->oo_hl_head == NULL) {
 457                 obj->oo_inode = NULL;
 458                 iput(inode);
 459                 GOTO(out, result = -ENOMEM);
 460         }
 461         GOTO(out, result = 0);
 462
 463 out:
 464         LINVRNT(osd_invariant(obj));
 465         return result;
 466 }
 467
 468 /*
 469  * Concurrency: shouldn't matter.
 470  */
 471 static void osd_object_init0(struct osd_object *obj)
 472 {
 473         LASSERT(obj->oo_inode != NULL);
 474         obj->oo_dt.do_body_ops = &osd_body_ops;
 475         obj->oo_dt.do_lu.lo_header->loh_attr |=
 476                 (LOHA_EXISTS | (obj->oo_inode->i_mode & S_IFMT));
 477 }
 478
 479 /*
 480  * Concurrency: no concurrent access is possible that early in object
 481  * life-cycle.
 482  */
 483 static int osd_object_init(const struct lu_env *env, struct lu_object *l,
 484                            const struct lu_object_conf *conf)
 485 {
 486         struct osd_object *obj = osd_obj(l);
 487         int result;
 488
 489         LINVRNT(osd_invariant(obj));
 490
 491         result = osd_fid_lookup(env, obj, lu_object_fid(l), conf);
 492         obj->oo_dt.do_body_ops = &osd_body_ops_new;
 493         if (result == 0) {
 494                 if (obj->oo_inode != NULL) {
 495                         osd_object_init0(obj);
 496                 } else if (fid_is_otable_it(&l->lo_header->loh_fid)) {
 497                         obj->oo_dt.do_ops = &osd_obj_otable_it_ops;
 498                         /* LFSCK iterator object is special without inode */
 499                         l->lo_header->loh_attr |= LOHA_EXISTS;
 500                 }
 501         }
 502         LINVRNT(osd_invariant(obj));
 503         return result;
 504 }
 505
 506 /*
 507  * Concurrency: no concurrent access is possible that late in object
 508  * life-cycle.
 509  */
 510 static void osd_object_free(const struct lu_env *env, struct lu_object *l)
 511 {
 512         struct osd_object *obj = osd_obj(l);
 513
 514         LINVRNT(osd_invariant(obj));
 515
 516         dt_object_fini(&obj->oo_dt);
 517         if (obj->oo_hl_head != NULL)
 518                 ldiskfs_htree_lock_head_free(obj->oo_hl_head);
 519         OBD_FREE_PTR(obj);
 520 }
 521
 522 /*
 523  * Concurrency: no concurrent access is possible that late in object
 524  * life-cycle.
 525  */
 526 static void osd_index_fini(struct osd_object *o)
 527 {
 528         struct iam_container *bag;
 529
 530         if (o->oo_dir != NULL) {
 531                 bag = &o->oo_dir->od_container;
 532                 if (o->oo_inode != NULL) {
 533                         if (bag->ic_object == o->oo_inode)
 534                                 iam_container_fini(bag);
 535                 }
 536                 OBD_FREE_PTR(o->oo_dir);
 537                 o->oo_dir = NULL;
 538         }
 539 }
 540
 541 /*
 542  * Concurrency: no concurrent access is possible that late in object
 543  * life-cycle (for all existing callers, that is. New callers have to provide
 544  * their own locking.)
 545  */
 546 static int osd_inode_unlinked(const struct inode *inode)
 547 {
 548         return inode->i_nlink == 0;
 549 }
 550
 551 enum {
 552         OSD_TXN_OI_DELETE_CREDITS    = 20,
 553         OSD_TXN_INODE_DELETE_CREDITS = 20
 554 };
 555
 556 /*
 557  * Journal
 558  */
 559
 560 #if OSD_THANDLE_STATS
 561 /**
 562  * Set time when the handle is allocated
 563  */
 564 static void osd_th_alloced(struct osd_thandle *oth)
 565 {
 566         oth->oth_alloced = cfs_time_current();
 567 }
 568
 569 /**
 570  * Set time when the handle started
 571  */
 572 static void osd_th_started(struct osd_thandle *oth)
 573 {
 574         oth->oth_started = cfs_time_current();
 575 }
 576
 577 /**
 578  * Helper function to convert time interval to microseconds packed in
 579  * long int (default time units for the counter in "stats" initialized
 580  * by lu_time_init() )
 581  */
 582 static long interval_to_usec(cfs_time_t start, cfs_time_t end)
 583 {
 584         struct timeval val;
 585
 586         cfs_duration_usec(cfs_time_sub(end, start), &val);
 587         return val.tv_sec * 1000000 + val.tv_usec;
 588 }
 589
 590 /**
 591  * Check whether the we deal with this handle for too long.
 592  */
 593 static void __osd_th_check_slow(void *oth, struct osd_device *dev,
 594                                 cfs_time_t alloced, cfs_time_t started,
 595                                 cfs_time_t closed)
 596 {
 597         cfs_time_t now = cfs_time_current();
 598
 599         LASSERT(dev != NULL);
 600
 601         lprocfs_counter_add(dev->od_stats, LPROC_OSD_THANDLE_STARTING,
 602                             interval_to_usec(alloced, started));
 603         lprocfs_counter_add(dev->od_stats, LPROC_OSD_THANDLE_OPEN,
 604                             interval_to_usec(started, closed));
 605         lprocfs_counter_add(dev->od_stats, LPROC_OSD_THANDLE_CLOSING,
 606                             interval_to_usec(closed, now));
 607
 608         if (cfs_time_before(cfs_time_add(alloced, cfs_time_seconds(30)), now)) {
 609                 CWARN("transaction handle %p was open for too long: "
 610                       "now "CFS_TIME_T" ,"
 611                       "alloced "CFS_TIME_T" ,"
 612                       "started "CFS_TIME_T" ,"
 613                       "closed "CFS_TIME_T"\n",
 614                       oth, now, alloced, started, closed);
 615                 libcfs_debug_dumpstack(NULL);
 616         }
 617 }
 618
 619 #define OSD_CHECK_SLOW_TH(oth, dev, expr)                               \
 620 {                                                                       \
 621         cfs_time_t __closed = cfs_time_current();                       \
 622         cfs_time_t __alloced = oth->oth_alloced;                        \
 623         cfs_time_t __started = oth->oth_started;                        \
 624                                                                         \
 625         expr;                                                           \
 626         __osd_th_check_slow(oth, dev, __alloced, __started, __closed);  \
 627 }
 628
 629 #else /* OSD_THANDLE_STATS */
 630
 631 #define osd_th_alloced(h)                  do {} while(0)
 632 #define osd_th_started(h)                  do {} while(0)
 633 #define OSD_CHECK_SLOW_TH(oth, dev, expr)  expr
 634
 635 #endif /* OSD_THANDLE_STATS */
 636
 637 /*
 638  * Concurrency: doesn't access mutable data.
 639  */
 640 static int osd_param_is_sane(const struct osd_device *dev,
 641                              const struct thandle *th)
 642 {
 643         struct osd_thandle *oh;
 644         oh = container_of0(th, struct osd_thandle, ot_super);
 645         return oh->ot_credits <= osd_journal(dev)->j_max_transaction_buffers;
 646 }
 647
 648 /*
 649  * Concurrency: shouldn't matter.
 650  */
 651 #ifdef HAVE_LDISKFS_JOURNAL_CALLBACK_ADD
 652 static void osd_trans_commit_cb(struct super_block *sb,
 653                                 struct journal_callback *jcb, int error)
 654 #else
 655 static void osd_trans_commit_cb(struct journal_callback *jcb, int error)
 656 #endif
 657 {
 658         struct osd_thandle *oh = container_of0(jcb, struct osd_thandle, ot_jcb);
 659         struct thandle     *th  = &oh->ot_super;
 660         struct lu_device   *lud = &th->th_dev->dd_lu_dev;
 661         struct dt_txn_commit_cb *dcb, *tmp;
 662
 663         LASSERT(oh->ot_handle == NULL);
 664
 665         if (error)
 666                 CERROR("transaction @0x%p commit error: %d\n", th, error);
 667
 668         dt_txn_hook_commit(th);
 669
 670         /* call per-transaction callbacks if any */
 671         cfs_list_for_each_entry_safe(dcb, tmp, &oh->ot_dcb_list, dcb_linkage) {
 672                 LASSERTF(dcb->dcb_magic == TRANS_COMMIT_CB_MAGIC,
 673                          "commit callback entry: magic=%x name='%s'\n",
 674                          dcb->dcb_magic, dcb->dcb_name);
 675                 cfs_list_del_init(&dcb->dcb_linkage);
 676                 dcb->dcb_func(NULL, th, dcb, error);
 677         }
 678
 679         lu_ref_del_at(&lud->ld_reference, oh->ot_dev_link, "osd-tx", th);
 680         lu_device_put(lud);
 681         th->th_dev = NULL;
 682
 683         lu_context_exit(&th->th_ctx);
 684         lu_context_fini(&th->th_ctx);
 685         OBD_FREE_PTR(oh);
 686 }
 687
 688 static struct thandle *osd_trans_create(const struct lu_env *env,
 689                                         struct dt_device *d)
 690 {
 691         struct osd_thread_info *oti = osd_oti_get(env);
 692         struct osd_iobuf       *iobuf = &oti->oti_iobuf;
 693         struct osd_thandle     *oh;
 694         struct thandle         *th;
 695         ENTRY;
 696
 697         /* on pending IO in this thread should left from prev. request */
 698         LASSERT(cfs_atomic_read(&iobuf->dr_numreqs) == 0);
 699
 700         th = ERR_PTR(-ENOMEM);
 701         OBD_ALLOC_GFP(oh, sizeof *oh, CFS_ALLOC_IO);
 702         if (oh != NULL) {
 703                 oh->ot_quota_trans = &oti->oti_quota_trans;
 704                 memset(oh->ot_quota_trans, 0, sizeof(*oh->ot_quota_trans));
 705                 th = &oh->ot_super;
 706                 th->th_dev = d;
 707                 th->th_result = 0;
 708                 th->th_tags = LCT_TX_HANDLE;
 709                 oh->ot_credits = 0;
 710                 oti->oti_dev = osd_dt_dev(d);
 711                 CFS_INIT_LIST_HEAD(&oh->ot_dcb_list);
 712                 osd_th_alloced(oh);
 713         }
 714         RETURN(th);
 715 }
 716
 717 /*
 718  * Concurrency: shouldn't matter.
 719  */
 720 int osd_trans_start(const struct lu_env *env, struct dt_device *d,
 721                     struct thandle *th)
 722 {
 723         struct osd_thread_info *oti = osd_oti_get(env);
 724         struct osd_device  *dev = osd_dt_dev(d);
 725         handle_t           *jh;
 726         struct osd_thandle *oh;
 727         int rc;
 728
 729         ENTRY;
 730
 731         LASSERT(current->journal_info == NULL);
 732
 733         oh = container_of0(th, struct osd_thandle, ot_super);
 734         LASSERT(oh != NULL);
 735         LASSERT(oh->ot_handle == NULL);
 736
 737         rc = dt_txn_hook_start(env, d, th);
 738         if (rc != 0)
 739                 GOTO(out, rc);
 740
 741         if (!osd_param_is_sane(dev, th)) {
 742                 CWARN("%.16s: too many transaction credits (%d > %d)\n",
 743                       LDISKFS_SB(osd_sb(dev))->s_es->s_volume_name,
 744                       oh->ot_credits,
 745                       osd_journal(dev)->j_max_transaction_buffers);
 746                 /* XXX Limit the credits to 'max_transaction_buffers', and
 747                  *     let the underlying filesystem to catch the error if
 748                  *     we really need so many credits.
 749                  *
 750                  *     This should be removed when we can calculate the
 751                  *     credits precisely. */
 752                 oh->ot_credits = osd_journal(dev)->j_max_transaction_buffers;
 753 #ifdef OSD_TRACK_DECLARES
 754                 CERROR("  attr_set: %d, punch: %d, xattr_set: %d,\n",
 755                        oh->ot_declare_attr_set, oh->ot_declare_punch,
 756                        oh->ot_declare_xattr_set);
 757                 CERROR("  create: %d, ref_add: %d, ref_del: %d, write: %d\n",
 758                        oh->ot_declare_create, oh->ot_declare_ref_add,
 759                        oh->ot_declare_ref_del, oh->ot_declare_write);
 760                 CERROR("  insert: %d, delete: %d, destroy: %d\n",
 761                        oh->ot_declare_insert, oh->ot_declare_delete,
 762                        oh->ot_declare_destroy);
 763 #endif
 764         }
 765
 766         /*
 767          * XXX temporary stuff. Some abstraction layer should
 768          * be used.
 769          */
 770         jh = ldiskfs_journal_start_sb(osd_sb(dev), oh->ot_credits);
 771         osd_th_started(oh);
 772         if (!IS_ERR(jh)) {
 773                 oh->ot_handle = jh;
 774                 LASSERT(oti->oti_txns == 0);
 775                 lu_context_init(&th->th_ctx, th->th_tags);
 776                 lu_context_enter(&th->th_ctx);
 777
 778                 lu_device_get(&d->dd_lu_dev);
 779                 oh->ot_dev_link = lu_ref_add(&d->dd_lu_dev.ld_reference,
 780                                              "osd-tx", th);
 781
 782                 /*
 783                  * XXX: current rule is that we first start tx,
 784                  *      then lock object(s), but we can't use
 785                  *      this rule for data (due to locking specifics
 786                  *      in ldiskfs). also in long-term we'd like to
 787                  *      use usually-used (locks;tx) ordering. so,
 788                  *      UGLY thing is that we'll use one ordering for
 789                  *      data (ofd) and reverse ordering for metadata
 790                  *      (mdd). then at some point we'll fix the latter
 791                  */
 792                 if (dev->od_is_md) {
 793                         LASSERT(oti->oti_r_locks == 0);
 794                         LASSERT(oti->oti_w_locks == 0);
 795                 }
 796
 797                 oti->oti_txns++;
 798                 rc = 0;
 799         } else {
 800                 rc = PTR_ERR(jh);
 801         }
 802 out:
 803         RETURN(rc);
 804 }
 805
 806 /*
 807  * Concurrency: shouldn't matter.
 808  */
 809 static int osd_trans_stop(const struct lu_env *env, struct thandle *th)
 810 {
 811         int                     rc = 0;
 812         struct osd_thandle     *oh;
 813         struct osd_thread_info *oti = osd_oti_get(env);
 814         struct osd_iobuf       *iobuf = &oti->oti_iobuf;
 815         struct qsd_instance    *qsd = oti->oti_dev->od_quota_slave;
 816         ENTRY;
 817
 818         oh = container_of0(th, struct osd_thandle, ot_super);
 819
 820         if (qsd != NULL)
 821                 /* inform the quota slave device that the transaction is
 822                  * stopping */
 823                 qsd_op_end(env, qsd, oh->ot_quota_trans);
 824         oh->ot_quota_trans = NULL;
 825
 826         if (oh->ot_handle != NULL) {
 827                 handle_t *hdl = oh->ot_handle;
 828
 829                 /*
 830                  * add commit callback
 831                  * notice we don't do this in osd_trans_start()
 832                  * as underlying transaction can change during truncate
 833                  */
 834                 osd_journal_callback_set(hdl, osd_trans_commit_cb,
 835                                          &oh->ot_jcb);
 836
 837                 LASSERT(oti->oti_txns == 1);
 838                 oti->oti_txns--;
 839                 /*
 840                  * XXX: current rule is that we first start tx,
 841                  *      then lock object(s), but we can't use
 842                  *      this rule for data (due to locking specifics
 843                  *      in ldiskfs). also in long-term we'd like to
 844                  *      use usually-used (locks;tx) ordering. so,
 845                  *      UGLY thing is that we'll use one ordering for
 846                  *      data (ofd) and reverse ordering for metadata
 847                  *      (mdd). then at some point we'll fix the latter
 848                  */
 849                 if (osd_dt_dev(th->th_dev)->od_is_md) {
 850                         LASSERT(oti->oti_r_locks == 0);
 851                         LASSERT(oti->oti_w_locks == 0);
 852                 }
 853                 rc = dt_txn_hook_stop(env, th);
 854                 if (rc != 0)
 855                         CERROR("Failure in transaction hook: %d\n", rc);
 856
 857                 /* hook functions might modify th_sync */
 858                 hdl->h_sync = th->th_sync;
 859
 860                 oh->ot_handle = NULL;
 861                 OSD_CHECK_SLOW_TH(oh, oti->oti_dev,
 862                                   rc = ldiskfs_journal_stop(hdl));
 863                 if (rc != 0)
 864                         CERROR("Failure to stop transaction: %d\n", rc);
 865         } else {
 866                 OBD_FREE_PTR(oh);
 867         }
 868
 869         /* as we want IO to journal and data IO be concurrent, we don't block
 870          * awaiting data IO completion in osd_do_bio(), instead we wait here
 871          * once transaction is submitted to the journal. all reqular requests
 872          * don't do direct IO (except read/write), thus this wait_event becomes
 873          * no-op for them.
 874          *
 875          * IMPORTANT: we have to wait till any IO submited by the thread is
 876          * completed otherwise iobuf may be corrupted by different request
 877          */
 878         cfs_wait_event(iobuf->dr_wait,
 879                        cfs_atomic_read(&iobuf->dr_numreqs) == 0);
 880         if (!rc)
 881                 rc = iobuf->dr_error;
 882
 883         RETURN(rc);
 884 }
 885
 886 static int osd_trans_cb_add(struct thandle *th, struct dt_txn_commit_cb *dcb)
 887 {
 888         struct osd_thandle *oh = container_of0(th, struct osd_thandle,
 889                                                ot_super);
 890
 891         LASSERT(dcb->dcb_magic == TRANS_COMMIT_CB_MAGIC);
 892         LASSERT(&dcb->dcb_func != NULL);
 893         cfs_list_add(&dcb->dcb_linkage, &oh->ot_dcb_list);
 894
 895         return 0;
 896 }
 897
 898 /*
 899  * Called just before object is freed. Releases all resources except for
 900  * object itself (that is released by osd_object_free()).
 901  *
 902  * Concurrency: no concurrent access is possible that late in object
 903  * life-cycle.
 904  */
 905 static void osd_object_delete(const struct lu_env *env, struct lu_object *l)
 906 {
 907         struct osd_object *obj   = osd_obj(l);
 908         struct inode      *inode = obj->oo_inode;
 909
 910         LINVRNT(osd_invariant(obj));
 911
 912         /*
 913          * If object is unlinked remove fid->ino mapping from object index.
 914          */
 915
 916         osd_index_fini(obj);
 917         if (inode != NULL) {
 918                 iput(inode);
 919                 obj->oo_inode = NULL;
 920         }
 921 }
 922
 923 /*
 924  * Concurrency: ->loo_object_release() is called under site spin-lock.
 925  */
 926 static void osd_object_release(const struct lu_env *env,
 927                                struct lu_object *l)
 928 {
 929 }
 930
 931 /*
 932  * Concurrency: shouldn't matter.
 933  */
 934 static int osd_object_print(const struct lu_env *env, void *cookie,
 935                             lu_printer_t p, const struct lu_object *l)
 936 {
 937         struct osd_object *o = osd_obj(l);
 938         struct iam_descr  *d;
 939
 940         if (o->oo_dir != NULL)
 941                 d = o->oo_dir->od_container.ic_descr;
 942         else
 943                 d = NULL;
 944         return (*p)(env, cookie,
 945                     LUSTRE_OSD_LDISKFS_NAME"-object@%p(i:%p:%lu/%u)[%s]",
 946                     o, o->oo_inode,
 947                     o->oo_inode ? o->oo_inode->i_ino : 0UL,
 948                     o->oo_inode ? o->oo_inode->i_generation : 0,
 949                     d ? d->id_ops->id_name : "plain");
 950 }
 951
 952 /*
 953  * Concurrency: shouldn't matter.
 954  */
 955 int osd_statfs(const struct lu_env *env, struct dt_device *d,
 956                struct obd_statfs *sfs)
 957 {
 958         struct osd_device  *osd = osd_dt_dev(d);
 959         struct super_block *sb = osd_sb(osd);
 960         struct kstatfs     *ksfs;
 961         int result = 0;
 962
 963         if (unlikely(osd->od_mnt == NULL))
 964                 return -EINPROGRESS;
 965
 966         /* osd_lproc.c call this without env, allocate ksfs for that case */
 967         if (unlikely(env == NULL)) {
 968                 OBD_ALLOC_PTR(ksfs);
 969                 if (ksfs == NULL)
 970                         return -ENOMEM;
 971         } else {
 972                 ksfs = &osd_oti_get(env)->oti_ksfs;
 973         }
 974
 975         cfs_spin_lock(&osd->od_osfs_lock);
 976         /* cache 1 second */
 977         if (cfs_time_before_64(osd->od_osfs_age, cfs_time_shift_64(-1))) {
 978                 result = sb->s_op->statfs(sb->s_root, ksfs);
 979                 if (likely(result == 0)) { /* N.B. statfs can't really fail */
 980                         osd->od_osfs_age = cfs_time_current_64();
 981                         statfs_pack(&osd->od_statfs, ksfs);
 982                 }
 983         }
 984
 985         if (likely(result == 0))
 986                 *sfs = osd->od_statfs;
 987         cfs_spin_unlock(&osd->od_osfs_lock);
 988
 989         if (unlikely(env == NULL))
 990                 OBD_FREE_PTR(ksfs);
 991
 992         return result;
 993 }
 994
 995 /*
 996  * Concurrency: doesn't access mutable data.
 997  */
 998 static void osd_conf_get(const struct lu_env *env,
 999                          const struct dt_device *dev,
1000                          struct dt_device_param *param)
1001 {
1002         struct super_block *sb = osd_sb(osd_dt_dev(dev));
1003
1004         /*
1005          * XXX should be taken from not-yet-existing fs abstraction layer.
1006          */
1007         param->ddp_mnt = osd_dt_dev(dev)->od_mnt;
1008         param->ddp_max_name_len = LDISKFS_NAME_LEN;
1009         param->ddp_max_nlink    = LDISKFS_LINK_MAX;
1010         param->ddp_block_shift  = sb->s_blocksize_bits;
1011         param->ddp_mntopts      = 0;
1012         if (test_opt(sb, XATTR_USER))
1013                 param->ddp_mntopts |= MNTOPT_USERXATTR;
1014         if (test_opt(sb, POSIX_ACL))
1015                 param->ddp_mntopts |= MNTOPT_ACL;
1016
1017 #if defined(LDISKFS_FEATURE_INCOMPAT_EA_INODE)
1018         if (LDISKFS_HAS_INCOMPAT_FEATURE(sb, LDISKFS_FEATURE_INCOMPAT_EA_INODE))
1019                 param->ddp_max_ea_size = LDISKFS_XATTR_MAX_LARGE_EA_SIZE;
1020         else
1021 #endif
1022                 param->ddp_max_ea_size = sb->s_blocksize;
1023
1024 }
1025
1026 /**
1027  * Helper function to get and fill the buffer with input values.
1028  */
1029 static struct lu_buf *osd_buf_get(const struct lu_env *env, void *area, ssize_t len)
1030 {
1031         struct lu_buf *buf;
1032
1033         buf = &osd_oti_get(env)->oti_buf;
1034         buf->lb_buf = area;
1035         buf->lb_len = len;
1036         return buf;
1037 }
1038
1039 /*
1040  * Concurrency: shouldn't matter.
1041  */
1042 static int osd_sync(const struct lu_env *env, struct dt_device *d)
1043 {
1044         CDEBUG(D_HA, "syncing OSD %s\n", LUSTRE_OSD_LDISKFS_NAME);
1045         return ldiskfs_force_commit(osd_sb(osd_dt_dev(d)));
1046 }
1047
1048 /**
1049  * Start commit for OSD device.
1050  *
1051  * An implementation of dt_commit_async method for OSD device.
1052  * Asychronously starts underlayng fs sync and thereby a transaction
1053  * commit.
1054  *
1055  * \param env environment
1056  * \param d dt device
1057  *
1058  * \see dt_device_operations
1059  */
1060 static int osd_commit_async(const struct lu_env *env,
1061                             struct dt_device *d)
1062 {
1063         struct super_block *s = osd_sb(osd_dt_dev(d));
1064         ENTRY;
1065
1066         CDEBUG(D_HA, "async commit OSD %s\n", LUSTRE_OSD_LDISKFS_NAME);
1067         RETURN(s->s_op->sync_fs(s, 0));
1068 }
1069
1070 /*
1071  * Concurrency: shouldn't matter.
1072  */
1073
1074 static int osd_ro(const struct lu_env *env, struct dt_device *d)
1075 {
1076         struct super_block *sb = osd_sb(osd_dt_dev(d));
1077         int rc;
1078         ENTRY;
1079
1080         CERROR("*** setting %s read-only ***\n", osd_dt_dev(d)->od_svname);
1081
1082         rc = __lvfs_set_rdonly(sb->s_bdev, LDISKFS_SB(sb)->journal_bdev);
1083         RETURN(rc);
1084 }
1085
1086 /*
1087  * Concurrency: serialization provided by callers.
1088  */
1089 static int osd_init_capa_ctxt(const struct lu_env *env, struct dt_device *d,
1090                               int mode, unsigned long timeout, __u32 alg,
1091                               struct lustre_capa_key *keys)
1092 {
1093         struct osd_device *dev = osd_dt_dev(d);
1094         ENTRY;
1095
1096         dev->od_fl_capa = mode;
1097         dev->od_capa_timeout = timeout;
1098         dev->od_capa_alg = alg;
1099         dev->od_capa_keys = keys;
1100         RETURN(0);
1101 }
1102
1103 /**
1104  * Concurrency: serialization provided by callers.
1105  */
1106 static void osd_init_quota_ctxt(const struct lu_env *env, struct dt_device *d,
1107                                struct dt_quota_ctxt *ctxt, void *data)
1108 {
1109         struct obd_device *obd = (void *)ctxt;
1110         struct vfsmount *mnt = (struct vfsmount *)data;
1111         ENTRY;
1112
1113         obd->u.obt.obt_sb = mnt->mnt_root->d_inode->i_sb;
1114         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
1115         obd->obd_lvfs_ctxt.pwdmnt = mnt;
1116         obd->obd_lvfs_ctxt.pwd = mnt->mnt_root;
1117         obd->obd_lvfs_ctxt.fs = get_ds();
1118
1119         EXIT;
1120 }
1121
1122 /**
1123  * Note: we do not count into QUOTA here.
1124  * If we mount with --data_journal we may need more.
1125  */
1126 const int osd_dto_credits_noquota[DTO_NR] = {
1127         /**
1128          * Insert/Delete.
1129          * INDEX_EXTRA_TRANS_BLOCKS(8) +
1130          * SINGLEDATA_TRANS_BLOCKS(8)
1131          * XXX Note: maybe iam need more, since iam have more level than
1132          *           EXT3 htree.
1133          */
1134         [DTO_INDEX_INSERT]  = 16,
1135         [DTO_INDEX_DELETE]  = 16,
1136         /**
1137          * Used for OI scrub
1138          */
1139         [DTO_INDEX_UPDATE]  = 16,
1140         /**
1141          * Create a object. The same as create object in EXT3.
1142          * DATA_TRANS_BLOCKS(14) +
1143          * INDEX_EXTRA_BLOCKS(8) +
1144          * 3(inode bits, groups, GDT)
1145          */
1146         [DTO_OBJECT_CREATE] = 25,
1147         /**
1148          * XXX: real credits to be fixed
1149          */
1150         [DTO_OBJECT_DELETE] = 25,
1151         /**
1152          * Attr set credits (inode)
1153          */
1154         [DTO_ATTR_SET_BASE] = 1,
1155         /**
1156          * Xattr set. The same as xattr of EXT3.
1157          * DATA_TRANS_BLOCKS(14)
1158          * XXX Note: in original MDS implmentation INDEX_EXTRA_TRANS_BLOCKS
1159          * are also counted in. Do not know why?
1160          */
1161         [DTO_XATTR_SET]     = 14,
1162         [DTO_LOG_REC]       = 14,
1163         /**
1164          * credits for inode change during write.
1165          */
1166         [DTO_WRITE_BASE]    = 3,
1167         /**
1168          * credits for single block write.
1169          */
1170         [DTO_WRITE_BLOCK]   = 14,
1171         /**
1172          * Attr set credits for chown.
1173          * This is extra credits for setattr, and it is null without quota
1174          */
1175         [DTO_ATTR_SET_CHOWN]= 0
1176 };
1177
1178 static const struct dt_device_operations osd_dt_ops = {
1179         .dt_root_get       = osd_root_get,
1180         .dt_statfs         = osd_statfs,
1181         .dt_trans_create   = osd_trans_create,
1182         .dt_trans_start    = osd_trans_start,
1183         .dt_trans_stop     = osd_trans_stop,
1184         .dt_trans_cb_add   = osd_trans_cb_add,
1185         .dt_conf_get       = osd_conf_get,
1186         .dt_sync           = osd_sync,
1187         .dt_ro             = osd_ro,
1188         .dt_commit_async   = osd_commit_async,
1189         .dt_init_capa_ctxt = osd_init_capa_ctxt,
1190         .dt_init_quota_ctxt= osd_init_quota_ctxt,
1191 };
1192
1193 static void osd_object_read_lock(const struct lu_env *env,
1194                                  struct dt_object *dt, unsigned role)
1195 {
1196         struct osd_object *obj = osd_dt_obj(dt);
1197         struct osd_thread_info *oti = osd_oti_get(env);
1198
1199         LINVRNT(osd_invariant(obj));
1200
1201         LASSERT(obj->oo_owner != env);
1202         cfs_down_read_nested(&obj->oo_sem, role);
1203
1204         LASSERT(obj->oo_owner == NULL);
1205         oti->oti_r_locks++;
1206 }
1207
1208 static void osd_object_write_lock(const struct lu_env *env,
1209                                   struct dt_object *dt, unsigned role)
1210 {
1211         struct osd_object *obj = osd_dt_obj(dt);
1212         struct osd_thread_info *oti = osd_oti_get(env);
1213
1214         LINVRNT(osd_invariant(obj));
1215
1216         LASSERT(obj->oo_owner != env);
1217         cfs_down_write_nested(&obj->oo_sem, role);
1218
1219         LASSERT(obj->oo_owner == NULL);
1220         obj->oo_owner = env;
1221         oti->oti_w_locks++;
1222 }
1223
1224 static void osd_object_read_unlock(const struct lu_env *env,
1225                                    struct dt_object *dt)
1226 {
1227         struct osd_object *obj = osd_dt_obj(dt);
1228         struct osd_thread_info *oti = osd_oti_get(env);
1229
1230         LINVRNT(osd_invariant(obj));
1231
1232         LASSERT(oti->oti_r_locks > 0);
1233         oti->oti_r_locks--;
1234         cfs_up_read(&obj->oo_sem);
1235 }
1236
1237 static void osd_object_write_unlock(const struct lu_env *env,
1238                                     struct dt_object *dt)
1239 {
1240         struct osd_object *obj = osd_dt_obj(dt);
1241         struct osd_thread_info *oti = osd_oti_get(env);
1242
1243         LINVRNT(osd_invariant(obj));
1244
1245         LASSERT(obj->oo_owner == env);
1246         LASSERT(oti->oti_w_locks > 0);
1247         oti->oti_w_locks--;
1248         obj->oo_owner = NULL;
1249         cfs_up_write(&obj->oo_sem);
1250 }
1251
1252 static int osd_object_write_locked(const struct lu_env *env,
1253                                    struct dt_object *dt)
1254 {
1255         struct osd_object *obj = osd_dt_obj(dt);
1256
1257         LINVRNT(osd_invariant(obj));
1258
1259         return obj->oo_owner == env;
1260 }
1261
1262 static int capa_is_sane(const struct lu_env *env,
1263                         struct osd_device *dev,
1264                         struct lustre_capa *capa,
1265                         struct lustre_capa_key *keys)
1266 {
1267         struct osd_thread_info *oti = osd_oti_get(env);
1268         struct lustre_capa *tcapa = &oti->oti_capa;
1269         struct obd_capa *oc;
1270         int i, rc = 0;
1271         ENTRY;
1272
1273         oc = capa_lookup(dev->od_capa_hash, capa, 0);
1274         if (oc) {
1275                 if (capa_is_expired(oc)) {
1276                         DEBUG_CAPA(D_ERROR, capa, "expired");
1277                         rc = -ESTALE;
1278                 }
1279                 capa_put(oc);
1280                 RETURN(rc);
1281         }
1282
1283         if (capa_is_expired_sec(capa)) {
1284                 DEBUG_CAPA(D_ERROR, capa, "expired");
1285                 RETURN(-ESTALE);
1286         }
1287
1288         cfs_spin_lock(&capa_lock);
1289         for (i = 0; i < 2; i++) {
1290                 if (keys[i].lk_keyid == capa->lc_keyid) {
1291                         oti->oti_capa_key = keys[i];
1292                         break;
1293                 }
1294         }
1295         cfs_spin_unlock(&capa_lock);
1296
1297         if (i == 2) {
1298                 DEBUG_CAPA(D_ERROR, capa, "no matched capa key");
1299                 RETURN(-ESTALE);
1300         }
1301
1302         rc = capa_hmac(tcapa->lc_hmac, capa, oti->oti_capa_key.lk_key);
1303         if (rc)
1304                 RETURN(rc);
1305
1306         if (memcmp(tcapa->lc_hmac, capa->lc_hmac, sizeof(capa->lc_hmac))) {
1307                 DEBUG_CAPA(D_ERROR, capa, "HMAC mismatch");
1308                 RETURN(-EACCES);
1309         }
1310
1311         oc = capa_add(dev->od_capa_hash, capa);
1312         capa_put(oc);
1313
1314         RETURN(0);
1315 }
1316
1317 int osd_object_auth(const struct lu_env *env, struct dt_object *dt,
1318                     struct lustre_capa *capa, __u64 opc)
1319 {
1320         const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
1321         struct osd_device *dev = osd_dev(dt->do_lu.lo_dev);
1322         struct md_capainfo *ci;
1323         int rc;
1324
1325         if (!dev->od_fl_capa)
1326                 return 0;
1327
1328         if (capa == BYPASS_CAPA)
1329                 return 0;
1330
1331         ci = md_capainfo(env);
1332         if (unlikely(!ci))
1333                 return 0;
1334
1335         if (ci->mc_auth == LC_ID_NONE)
1336                 return 0;
1337
1338         if (!capa) {
1339                 CERROR("no capability is provided for fid "DFID"\n", PFID(fid));
1340                 return -EACCES;
1341         }
1342
1343         if (!lu_fid_eq(fid, &capa->lc_fid)) {
1344                 DEBUG_CAPA(D_ERROR, capa, "fid "DFID" mismatch with",
1345                            PFID(fid));
1346                 return -EACCES;
1347         }
1348
1349         if (!capa_opc_supported(capa, opc)) {
1350                 DEBUG_CAPA(D_ERROR, capa, "opc "LPX64" not supported by", opc);
1351                 return -EACCES;
1352         }
1353
1354         if ((rc = capa_is_sane(env, dev, capa, dev->od_capa_keys))) {
1355                 DEBUG_CAPA(D_ERROR, capa, "insane (rc %d)", rc);
1356                 return -EACCES;
1357         }
1358
1359         return 0;
1360 }
1361
1362 static struct timespec *osd_inode_time(const struct lu_env *env,
1363                                        struct inode *inode, __u64 seconds)
1364 {
1365         struct osd_thread_info  *oti = osd_oti_get(env);
1366         struct timespec         *t   = &oti->oti_time;
1367
1368         t->tv_sec = seconds;
1369         t->tv_nsec = 0;
1370         *t = timespec_trunc(*t, inode->i_sb->s_time_gran);
1371         return t;
1372 }
1373
1374
1375 static void osd_inode_getattr(const struct lu_env *env,
1376                               struct inode *inode, struct lu_attr *attr)
1377 {
1378         attr->la_valid      |= LA_ATIME | LA_MTIME | LA_CTIME | LA_MODE |
1379                                LA_SIZE | LA_BLOCKS | LA_UID | LA_GID |
1380                                LA_FLAGS | LA_NLINK | LA_RDEV | LA_BLKSIZE;
1381
1382         attr->la_atime      = LTIME_S(inode->i_atime);
1383         attr->la_mtime      = LTIME_S(inode->i_mtime);
1384         attr->la_ctime      = LTIME_S(inode->i_ctime);
1385         attr->la_mode       = inode->i_mode;
1386         attr->la_size       = i_size_read(inode);
1387         attr->la_blocks     = inode->i_blocks;
1388         attr->la_uid        = inode->i_uid;
1389         attr->la_gid        = inode->i_gid;
1390         attr->la_flags      = LDISKFS_I(inode)->i_flags;
1391         attr->la_nlink      = inode->i_nlink;
1392         attr->la_rdev       = inode->i_rdev;
1393         attr->la_blksize    = 1 << inode->i_blkbits;
1394         attr->la_blkbits    = inode->i_blkbits;
1395 }
1396
1397 static int osd_attr_get(const struct lu_env *env,
1398                         struct dt_object *dt,
1399                         struct lu_attr *attr,
1400                         struct lustre_capa *capa)
1401 {
1402         struct osd_object *obj = osd_dt_obj(dt);
1403
1404         LASSERT(dt_object_exists(dt));
1405         LINVRNT(osd_invariant(obj));
1406
1407         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
1408                 return -EACCES;
1409
1410         cfs_spin_lock(&obj->oo_guard);
1411         osd_inode_getattr(env, obj->oo_inode, attr);
1412         cfs_spin_unlock(&obj->oo_guard);
1413         return 0;
1414 }
1415
1416 static int osd_declare_attr_set(const struct lu_env *env,
1417                                 struct dt_object *dt,
1418                                 const struct lu_attr *attr,
1419                                 struct thandle *handle)
1420 {
1421         struct osd_thandle     *oh;
1422         struct osd_object      *obj;
1423         struct osd_thread_info *info = osd_oti_get(env);
1424         struct lquota_id_info  *qi = &info->oti_qi;
1425         long long               bspace;
1426         int                     rc = 0;
1427         bool                    allocated;
1428         ENTRY;
1429
1430         LASSERT(dt != NULL);
1431         LASSERT(handle != NULL);
1432
1433         obj = osd_dt_obj(dt);
1434         LASSERT(osd_invariant(obj));
1435
1436         oh = container_of0(handle, struct osd_thandle, ot_super);
1437         LASSERT(oh->ot_handle == NULL);
1438
1439         OSD_DECLARE_OP(oh, attr_set);
1440         oh->ot_credits += osd_dto_credits_noquota[DTO_ATTR_SET_BASE];
1441
1442         if (attr == NULL || obj->oo_inode == NULL)
1443                 RETURN(rc);
1444
1445         bspace   = obj->oo_inode->i_blocks;
1446         bspace <<= obj->oo_inode->i_sb->s_blocksize_bits;
1447         bspace   = toqb(bspace);
1448
1449         /* Changing ownership is always preformed by super user, it should not
1450          * fail with EDQUOT.
1451          *
1452          * We still need to call the osd_declare_qid() to calculate the journal
1453          * credits for updating quota accounting files and to trigger quota
1454          * space adjustment once the operation is completed.*/
1455         if ((attr->la_valid & LA_UID) != 0 &&
1456              attr->la_uid != obj->oo_inode->i_uid) {
1457                 qi->lqi_type = USRQUOTA;
1458
1459                 /* inode accounting */
1460                 qi->lqi_is_blk = false;
1461
1462                 /* one more inode for the new owner ... */
1463                 qi->lqi_id.qid_uid = attr->la_uid;
1464                 qi->lqi_space      = 1;
1465                 allocated = (attr->la_uid == 0) ? true : false;
1466                 rc = osd_declare_qid(env, oh, qi, allocated, NULL);
1467                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1468                         rc = 0;
1469                 if (rc)
1470                         RETURN(rc);
1471
1472                 /* and one less inode for the current uid */
1473                 qi->lqi_id.qid_uid = obj->oo_inode->i_uid;
1474                 qi->lqi_space      = -1;
1475                 rc = osd_declare_qid(env, oh, qi, true, NULL);
1476                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1477                         rc = 0;
1478                 if (rc)
1479                         RETURN(rc);
1480
1481                 /* block accounting */
1482                 qi->lqi_is_blk = true;
1483
1484                 /* more blocks for the new owner ... */
1485                 qi->lqi_id.qid_uid = attr->la_uid;
1486                 qi->lqi_space      = bspace;
1487                 allocated = (attr->la_uid == 0) ? true : false;
1488                 rc = osd_declare_qid(env, oh, qi, allocated, NULL);
1489                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1490                         rc = 0;
1491                 if (rc)
1492                         RETURN(rc);
1493
1494                 /* and finally less blocks for the current owner */
1495                 qi->lqi_id.qid_uid = obj->oo_inode->i_uid;
1496                 qi->lqi_space      = -bspace;
1497                 rc = osd_declare_qid(env, oh, qi, true, NULL);
1498                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1499                         rc = 0;
1500                 if (rc)
1501                         RETURN(rc);
1502         }
1503
1504         if (attr->la_valid & LA_GID &&
1505             attr->la_gid != obj->oo_inode->i_gid) {
1506                 qi->lqi_type = GRPQUOTA;
1507
1508                 /* inode accounting */
1509                 qi->lqi_is_blk = false;
1510
1511                 /* one more inode for the new group owner ... */
1512                 qi->lqi_id.qid_gid = attr->la_gid;
1513                 qi->lqi_space      = 1;
1514                 allocated = (attr->la_gid == 0) ? true : false;
1515                 rc = osd_declare_qid(env, oh, qi, allocated, NULL);
1516                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1517                         rc = 0;
1518                 if (rc)
1519                         RETURN(rc);
1520
1521                 /* and one less inode for the current gid */
1522                 qi->lqi_id.qid_gid = obj->oo_inode->i_gid;
1523                 qi->lqi_space      = -1;
1524                 rc = osd_declare_qid(env, oh, qi, true, NULL);
1525                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1526                         rc = 0;
1527                 if (rc)
1528                         RETURN(rc);
1529
1530                 /* block accounting */
1531                 qi->lqi_is_blk = true;
1532
1533                 /* more blocks for the new owner ... */
1534                 qi->lqi_id.qid_gid = attr->la_gid;
1535                 qi->lqi_space      = bspace;
1536                 allocated = (attr->la_gid == 0) ? true : false;
1537                 rc = osd_declare_qid(env, oh, qi, allocated, NULL);
1538                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1539                         rc = 0;
1540                 if (rc)
1541                         RETURN(rc);
1542
1543                 /* and finally less blocks for the current owner */
1544                 qi->lqi_id.qid_gid = obj->oo_inode->i_gid;
1545                 qi->lqi_space      = -bspace;
1546                 rc = osd_declare_qid(env, oh, qi, true, NULL);
1547                 if (rc == -EDQUOT || rc == -EINPROGRESS)
1548                         rc = 0;
1549                 if (rc)
1550                         RETURN(rc);
1551         }
1552
1553         RETURN(rc);
1554 }
1555
1556 static int osd_inode_setattr(const struct lu_env *env,
1557                              struct inode *inode, const struct lu_attr *attr)
1558 {
1559         __u64 bits;
1560
1561         bits = attr->la_valid;
1562
1563         LASSERT(!(bits & LA_TYPE)); /* Huh? You want too much. */
1564
1565         if (bits & LA_ATIME)
1566                 inode->i_atime  = *osd_inode_time(env, inode, attr->la_atime);
1567         if (bits & LA_CTIME)
1568                 inode->i_ctime  = *osd_inode_time(env, inode, attr->la_ctime);
1569         if (bits & LA_MTIME)
1570                 inode->i_mtime  = *osd_inode_time(env, inode, attr->la_mtime);
1571         if (bits & LA_SIZE) {
1572                 LDISKFS_I(inode)->i_disksize = attr->la_size;
1573                 i_size_write(inode, attr->la_size);
1574         }
1575
1576 #if 0
1577         /* OSD should not change "i_blocks" which is used by quota.
1578          * "i_blocks" should be changed by ldiskfs only. */
1579         if (bits & LA_BLOCKS)
1580                 inode->i_blocks = attr->la_blocks;
1581 #endif
1582         if (bits & LA_MODE)
1583                 inode->i_mode   = (inode->i_mode & S_IFMT) |
1584                         (attr->la_mode & ~S_IFMT);
1585         if (bits & LA_UID)
1586                 inode->i_uid    = attr->la_uid;
1587         if (bits & LA_GID)
1588                 inode->i_gid    = attr->la_gid;
1589         if (bits & LA_NLINK)
1590                 inode->i_nlink  = attr->la_nlink;
1591         if (bits & LA_RDEV)
1592                 inode->i_rdev   = attr->la_rdev;
1593
1594         if (bits & LA_FLAGS) {
1595                 /* always keep S_NOCMTIME */
1596                 inode->i_flags = ll_ext_to_inode_flags(attr->la_flags) |
1597                                  S_NOCMTIME;
1598         }
1599         return 0;
1600 }
1601
1602 static int osd_quota_transfer(struct inode *inode, const struct lu_attr *attr)
1603 {
1604         if ((attr->la_valid & LA_UID && attr->la_uid != inode->i_uid) ||
1605             (attr->la_valid & LA_GID && attr->la_gid != inode->i_gid)) {
1606                 struct iattr    iattr;
1607                 int             rc;
1608
1609                 iattr.ia_valid = 0;
1610                 if (attr->la_valid & LA_UID)
1611                         iattr.ia_valid |= ATTR_UID;
1612                 if (attr->la_valid & LA_GID)
1613                         iattr.ia_valid |= ATTR_GID;
1614                 iattr.ia_uid = attr->la_uid;
1615                 iattr.ia_gid = attr->la_gid;
1616
1617                 rc = ll_vfs_dq_transfer(inode, &iattr);
1618                 if (rc) {
1619                         CERROR("%s: quota transfer failed: rc = %d. Is quota "
1620                                "enforcement enabled on the ldiskfs filesystem?",
1621                                inode->i_sb->s_id, rc);
1622                         return rc;
1623                 }
1624         }
1625         return 0;
1626 }
1627
1628 static int osd_attr_set(const struct lu_env *env,
1629                         struct dt_object *dt,
1630                         const struct lu_attr *attr,
1631                         struct thandle *handle,
1632                         struct lustre_capa *capa)
1633 {
1634         struct osd_object *obj = osd_dt_obj(dt);
1635         struct inode      *inode;
1636         int rc;
1637
1638         LASSERT(handle != NULL);
1639         LASSERT(dt_object_exists(dt));
1640         LASSERT(osd_invariant(obj));
1641
1642         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
1643                 return -EACCES;
1644
1645         OSD_EXEC_OP(handle, attr_set);
1646
1647         inode = obj->oo_inode;
1648         if (!osd_dt_dev(handle->th_dev)->od_is_md) {
1649                 /* OFD support */
1650                 rc = osd_quota_transfer(inode, attr);
1651                 if (rc)
1652                         return rc;
1653         } else {
1654 #ifdef HAVE_QUOTA_SUPPORT
1655                 if ((attr->la_valid & LA_UID && attr->la_uid != inode->i_uid) ||
1656                     (attr->la_valid & LA_GID && attr->la_gid != inode->i_gid)) {
1657                         struct osd_ctxt *save = &osd_oti_get(env)->oti_ctxt;
1658                         struct           iattr iattr;
1659                         int              rc;
1660
1661                         iattr.ia_valid = 0;
1662                         if (attr->la_valid & LA_UID)
1663                                 iattr.ia_valid |= ATTR_UID;
1664                         if (attr->la_valid & LA_GID)
1665                                 iattr.ia_valid |= ATTR_GID;
1666                         iattr.ia_uid = attr->la_uid;
1667                         iattr.ia_gid = attr->la_gid;
1668                         osd_push_ctxt(env, save, 1);
1669                         rc = ll_vfs_dq_transfer(inode, &iattr) ? -EDQUOT : 0;
1670                         osd_pop_ctxt(save, 1);
1671                         if (rc != 0)
1672                                 return rc;
1673                 }
1674 #endif
1675         }
1676         cfs_spin_lock(&obj->oo_guard);
1677         rc = osd_inode_setattr(env, inode, attr);
1678         cfs_spin_unlock(&obj->oo_guard);
1679
1680         if (!rc)
1681                 inode->i_sb->s_op->dirty_inode(inode);
1682         return rc;
1683 }
1684
1685 struct dentry *osd_child_dentry_get(const struct lu_env *env,
1686                                     struct osd_object *obj,
1687                                     const char *name, const int namelen)
1688 {
1689         return osd_child_dentry_by_inode(env, obj->oo_inode, name, namelen);
1690 }
1691
1692 static int osd_mkfile(struct osd_thread_info *info, struct osd_object *obj,
1693                       cfs_umode_t mode,
1694                       struct dt_allocation_hint *hint,
1695                       struct thandle *th)
1696 {
1697         int result;
1698         struct osd_device  *osd = osd_obj2dev(obj);
1699         struct osd_thandle *oth;
1700         struct dt_object   *parent = NULL;
1701         struct inode       *inode;
1702 #ifdef HAVE_QUOTA_SUPPORT
1703         struct osd_ctxt    *save = &info->oti_ctxt;
1704 #endif
1705
1706         LINVRNT(osd_invariant(obj));
1707         LASSERT(obj->oo_inode == NULL);
1708         LASSERT(obj->oo_hl_head == NULL);
1709
1710         if (S_ISDIR(mode) && ldiskfs_pdo) {
1711                 obj->oo_hl_head =ldiskfs_htree_lock_head_alloc(HTREE_HBITS_DEF);
1712                 if (obj->oo_hl_head == NULL)
1713                         return -ENOMEM;
1714         }
1715
1716         oth = container_of(th, struct osd_thandle, ot_super);
1717         LASSERT(oth->ot_handle->h_transaction != NULL);
1718
1719         if (hint && hint->dah_parent)
1720                 parent = hint->dah_parent;
1721
1722 #ifdef HAVE_QUOTA_SUPPORT
1723         osd_push_ctxt(info->oti_env, save, osd_dt_dev(th->th_dev)->od_is_md);
1724 #endif
1725         inode = ldiskfs_create_inode(oth->ot_handle,
1726                                      parent ? osd_dt_obj(parent)->oo_inode :
1727                                               osd_sb(osd)->s_root->d_inode,
1728                                      mode);
1729 #ifdef HAVE_QUOTA_SUPPORT
1730         osd_pop_ctxt(save, osd_dt_dev(th->th_dev)->od_is_md);
1731 #endif
1732         if (!IS_ERR(inode)) {
1733                 /* Do not update file c/mtime in ldiskfs.
1734                  * NB: don't need any lock because no contention at this
1735                  * early stage */
1736                 inode->i_flags |= S_NOCMTIME;
1737                 inode->i_state |= I_LUSTRE_NOSCRUB;
1738                 obj->oo_inode = inode;
1739                 result = 0;
1740         } else {
1741                 if (obj->oo_hl_head != NULL) {
1742                         ldiskfs_htree_lock_head_free(obj->oo_hl_head);
1743                         obj->oo_hl_head = NULL;
1744                 }
1745                 result = PTR_ERR(inode);
1746         }
1747         LINVRNT(osd_invariant(obj));
1748         return result;
1749 }
1750
1751 enum {
1752         OSD_NAME_LEN = 255
1753 };
1754
1755 static int osd_mkdir(struct osd_thread_info *info, struct osd_object *obj,
1756                      struct lu_attr *attr,
1757                      struct dt_allocation_hint *hint,
1758                      struct dt_object_format *dof,
1759                      struct thandle *th)
1760 {
1761         int result;
1762         struct osd_thandle *oth;
1763         struct osd_device *osd = osd_obj2dev(obj);
1764         __u32 mode = (attr->la_mode & (S_IFMT | S_IRWXUGO | S_ISVTX));
1765
1766         LASSERT(S_ISDIR(attr->la_mode));
1767
1768         oth = container_of(th, struct osd_thandle, ot_super);
1769         LASSERT(oth->ot_handle->h_transaction != NULL);
1770         result = osd_mkfile(info, obj, mode, hint, th);
1771         if (result == 0 && osd->od_iop_mode == 0) {
1772                 LASSERT(obj->oo_inode != NULL);
1773                 /*
1774                  * XXX uh-oh... call low-level iam function directly.
1775                  */
1776
1777                 result = iam_lvar_create(obj->oo_inode, OSD_NAME_LEN, 4,
1778                                          sizeof (struct osd_fid_pack),
1779                                          oth->ot_handle);
1780         }
1781         return result;
1782 }
1783
1784 static int osd_mk_index(struct osd_thread_info *info, struct osd_object *obj,
1785                         struct lu_attr *attr,
1786                         struct dt_allocation_hint *hint,
1787                         struct dt_object_format *dof,
1788                         struct thandle *th)
1789 {
1790         int result;
1791         struct osd_thandle *oth;
1792         const struct dt_index_features *feat = dof->u.dof_idx.di_feat;
1793
1794         __u32 mode = (attr->la_mode & (S_IFMT | S_IALLUGO | S_ISVTX));
1795
1796         LASSERT(S_ISREG(attr->la_mode));
1797
1798         oth = container_of(th, struct osd_thandle, ot_super);
1799         LASSERT(oth->ot_handle->h_transaction != NULL);
1800
1801         result = osd_mkfile(info, obj, mode, hint, th);
1802         if (result == 0) {
1803                 LASSERT(obj->oo_inode != NULL);
1804                 if (feat->dif_flags & DT_IND_VARKEY)
1805                         result = iam_lvar_create(obj->oo_inode,
1806                                                  feat->dif_keysize_max,
1807                                                  feat->dif_ptrsize,
1808                                                  feat->dif_recsize_max,
1809                                                  oth->ot_handle);
1810                 else
1811                         result = iam_lfix_create(obj->oo_inode,
1812                                                  feat->dif_keysize_max,
1813                                                  feat->dif_ptrsize,
1814                                                  feat->dif_recsize_max,
1815                                                  oth->ot_handle);
1816
1817         }
1818         return result;
1819 }
1820
1821 static int osd_mkreg(struct osd_thread_info *info, struct osd_object *obj,
1822                      struct lu_attr *attr,
1823                      struct dt_allocation_hint *hint,
1824                      struct dt_object_format *dof,
1825                      struct thandle *th)
1826 {
1827         LASSERT(S_ISREG(attr->la_mode));
1828         return osd_mkfile(info, obj, (attr->la_mode &
1829                                (S_IFMT | S_IALLUGO | S_ISVTX)), hint, th);
1830 }
1831
1832 static int osd_mksym(struct osd_thread_info *info, struct osd_object *obj,
1833                      struct lu_attr *attr,
1834                      struct dt_allocation_hint *hint,
1835                      struct dt_object_format *dof,
1836                      struct thandle *th)
1837 {
1838         LASSERT(S_ISLNK(attr->la_mode));
1839         return osd_mkfile(info, obj, (attr->la_mode &
1840                               (S_IFMT | S_IALLUGO | S_ISVTX)), hint, th);
1841 }
1842
1843 static int osd_mknod(struct osd_thread_info *info, struct osd_object *obj,
1844                      struct lu_attr *attr,
1845                      struct dt_allocation_hint *hint,
1846                      struct dt_object_format *dof,
1847                      struct thandle *th)
1848 {
1849         cfs_umode_t mode = attr->la_mode & (S_IFMT | S_IALLUGO | S_ISVTX);
1850         int result;
1851
1852         LINVRNT(osd_invariant(obj));
1853         LASSERT(obj->oo_inode == NULL);
1854         LASSERT(S_ISCHR(mode) || S_ISBLK(mode) ||
1855                 S_ISFIFO(mode) || S_ISSOCK(mode));
1856
1857         result = osd_mkfile(info, obj, mode, hint, th);
1858         if (result == 0) {
1859                 LASSERT(obj->oo_inode != NULL);
1860                 /*
1861                  * This inode should be marked dirty for i_rdev.  Currently
1862                  * that is done in the osd_attr_init().
1863                  */
1864                 init_special_inode(obj->oo_inode, mode, attr->la_rdev);
1865         }
1866         LINVRNT(osd_invariant(obj));
1867         return result;
1868 }
1869
1870 typedef int (*osd_obj_type_f)(struct osd_thread_info *, struct osd_object *,
1871                               struct lu_attr *,
1872                               struct dt_allocation_hint *hint,
1873                               struct dt_object_format *dof,
1874                               struct thandle *);
1875
1876 static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
1877 {
1878         osd_obj_type_f result;
1879
1880         switch (type) {
1881         case DFT_DIR:
1882                 result = osd_mkdir;
1883                 break;
1884         case DFT_REGULAR:
1885                 result = osd_mkreg;
1886                 break;
1887         case DFT_SYM:
1888                 result = osd_mksym;
1889                 break;
1890         case DFT_NODE:
1891                 result = osd_mknod;
1892                 break;
1893         case DFT_INDEX:
1894                 result = osd_mk_index;
1895                 break;
1896
1897         default:
1898                 LBUG();
1899                 break;
1900         }
1901         return result;
1902 }
1903
1904
1905 static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
1906                         struct dt_object *parent, struct dt_object *child,
1907                         cfs_umode_t child_mode)
1908 {
1909         LASSERT(ah);
1910
1911         memset(ah, 0, sizeof(*ah));
1912         ah->dah_parent = parent;
1913         ah->dah_mode = child_mode;
1914 }
1915
1916 static void osd_attr_init(struct osd_thread_info *info, struct osd_object *obj,
1917                           struct lu_attr *attr, struct dt_object_format *dof)
1918 {
1919         struct inode   *inode = obj->oo_inode;
1920         __u64           valid = attr->la_valid;
1921         int             result;
1922
1923         attr->la_valid &= ~(LA_TYPE | LA_MODE);
1924
1925         if (dof->dof_type != DFT_NODE)
1926                 attr->la_valid &= ~LA_RDEV;
1927         if ((valid & LA_ATIME) && (attr->la_atime == LTIME_S(inode->i_atime)))
1928                 attr->la_valid &= ~LA_ATIME;
1929         if ((valid & LA_CTIME) && (attr->la_ctime == LTIME_S(inode->i_ctime)))
1930                 attr->la_valid &= ~LA_CTIME;
1931         if ((valid & LA_MTIME) && (attr->la_mtime == LTIME_S(inode->i_mtime)))
1932                 attr->la_valid &= ~LA_MTIME;
1933
1934         if (!osd_obj2dev(obj)->od_is_md) {
1935                 /* OFD support */
1936                 result = osd_quota_transfer(inode, attr);
1937                 if (result)
1938                         return;
1939         } else {
1940 #ifdef HAVE_QUOTA_SUPPORT
1941                 attr->la_valid &= ~(LA_UID | LA_GID);
1942 #endif
1943         }
1944
1945         if (attr->la_valid != 0) {
1946                 result = osd_inode_setattr(info->oti_env, inode, attr);
1947                 /*
1948                  * The osd_inode_setattr() should always succeed here.  The
1949                  * only error that could be returned is EDQUOT when we are
1950                  * trying to change the UID or GID of the inode. However, this
1951                  * should not happen since quota enforcement is no longer
1952                  * enabled on ldiskfs (lquota takes care of it).
1953                  */
1954                 LASSERTF(result == 0, "%d", result);
1955                 inode->i_sb->s_op->dirty_inode(inode);
1956         }
1957
1958         attr->la_valid = valid;
1959 }
1960
1961 /**
1962  * Helper function for osd_object_create()
1963  *
1964  * \retval 0, on success
1965  */
1966 static int __osd_object_create(struct osd_thread_info *info,
1967                                struct osd_object *obj, struct lu_attr *attr,
1968                                struct dt_allocation_hint *hint,
1969                                struct dt_object_format *dof,
1970                                struct thandle *th)
1971 {
1972         int     result;
1973         __u32   umask;
1974
1975         /* we drop umask so that permissions we pass are not affected */
1976         umask = current->fs->umask;
1977         current->fs->umask = 0;
1978
1979         result = osd_create_type_f(dof->dof_type)(info, obj, attr, hint, dof,
1980                                                   th);
1981         if (result == 0) {
1982                 osd_attr_init(info, obj, attr, dof);
1983                 osd_object_init0(obj);
1984                 /* bz 24037 */
1985                 if (obj->oo_inode && (obj->oo_inode->i_state & I_NEW))
1986                         unlock_new_inode(obj->oo_inode);
1987         }
1988
1989         /* restore previous umask value */
1990         current->fs->umask = umask;
1991
1992         return result;
1993 }
1994
1995 /**
1996  * Helper function for osd_object_create()
1997  *
1998  * \retval 0, on success
1999  */
2000 static int __osd_oi_insert(const struct lu_env *env, struct osd_object *obj,
2001                            const struct lu_fid *fid, struct thandle *th)
2002 {
2003         struct osd_thread_info *info = osd_oti_get(env);
2004         struct osd_inode_id    *id   = &info->oti_id;
2005         struct osd_device      *osd  = osd_obj2dev(obj);
2006
2007         LASSERT(obj->oo_inode != NULL);
2008
2009         if (osd->od_is_md) {
2010                 struct md_ucred *uc = md_ucred(env);
2011                 LASSERT(uc != NULL);
2012         }
2013
2014         osd_id_gen(id, obj->oo_inode->i_ino, obj->oo_inode->i_generation);
2015         return osd_oi_insert(info, osd, fid, id, th);
2016 }
2017
2018 static int osd_declare_object_create(const struct lu_env *env,
2019                                      struct dt_object *dt,
2020                                      struct lu_attr *attr,
2021                                      struct dt_allocation_hint *hint,
2022                                      struct dt_object_format *dof,
2023                                      struct thandle *handle)
2024 {
2025         struct osd_thandle      *oh;
2026         int                      rc;
2027         ENTRY;
2028
2029         LASSERT(handle != NULL);
2030
2031         oh = container_of0(handle, struct osd_thandle, ot_super);
2032         LASSERT(oh->ot_handle == NULL);
2033
2034         OSD_DECLARE_OP(oh, create);
2035         oh->ot_credits += osd_dto_credits_noquota[DTO_OBJECT_CREATE];
2036         /* XXX: So far, only normal fid needs be inserted into the oi,
2037          *      things could be changed later. Revise following code then. */
2038         if (fid_is_norm(lu_object_fid(&dt->do_lu))) {
2039                 OSD_DECLARE_OP(oh, insert);
2040                 oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_INSERT];
2041                 /* Reuse idle OI block may cause additional one OI block
2042                  * to be changed. */
2043                 oh->ot_credits += 1;
2044         }
2045         /* If this is directory, then we expect . and .. to be inserted as
2046          * well. The one directory block always needs to be created for the
2047          * directory, so we could use DTO_WRITE_BASE here (GDT, block bitmap,
2048          * block), there is no danger of needing a tree for the first block.
2049          */
2050         if (attr && S_ISDIR(attr->la_mode)) {
2051                 OSD_DECLARE_OP(oh, insert);
2052                 OSD_DECLARE_OP(oh, insert);
2053                 oh->ot_credits += osd_dto_credits_noquota[DTO_WRITE_BASE];
2054         }
2055
2056         if (!attr)
2057                 RETURN(0);
2058
2059         rc = osd_declare_inode_qid(env, attr->la_uid, attr->la_gid, 1, oh,
2060                                    false, false, NULL, false);
2061         RETURN(rc);
2062 }
2063
2064 static int osd_object_create(const struct lu_env *env, struct dt_object *dt,
2065                              struct lu_attr *attr,
2066                              struct dt_allocation_hint *hint,
2067                              struct dt_object_format *dof,
2068                              struct thandle *th)
2069 {
2070         const struct lu_fid    *fid    = lu_object_fid(&dt->do_lu);
2071         struct osd_object      *obj    = osd_dt_obj(dt);
2072         struct osd_thread_info *info   = osd_oti_get(env);
2073         int result;
2074
2075         ENTRY;
2076
2077         LINVRNT(osd_invariant(obj));
2078         LASSERT(!dt_object_exists(dt));
2079         LASSERT(osd_write_locked(env, obj));
2080         LASSERT(th != NULL);
2081
2082         if (unlikely(fid_is_acct(fid)))
2083                 /* Quota files can't be created from the kernel any more,
2084                  * 'tune2fs -O quota' will take care of creating them */
2085                 RETURN(-EPERM);
2086
2087         OSD_EXEC_OP(th, create);
2088
2089         result = __osd_object_create(info, obj, attr, hint, dof, th);
2090         if (result == 0)
2091                 result = __osd_oi_insert(env, obj, fid, th);
2092
2093         LASSERT(ergo(result == 0, dt_object_exists(dt)));
2094         LASSERT(osd_invariant(obj));
2095         RETURN(result);
2096 }
2097
2098 /**
2099  * Called to destroy on-disk representation of the object
2100  *
2101  * Concurrency: must be locked
2102  */
2103 static int osd_declare_object_destroy(const struct lu_env *env,
2104                                       struct dt_object *dt,
2105                                       struct thandle *th)
2106 {
2107         struct osd_object  *obj = osd_dt_obj(dt);
2108         struct inode       *inode = obj->oo_inode;
2109         struct osd_thandle *oh;
2110         int                 rc;
2111         ENTRY;
2112
2113         oh = container_of0(th, struct osd_thandle, ot_super);
2114         LASSERT(oh->ot_handle == NULL);
2115         LASSERT(inode);
2116
2117         OSD_DECLARE_OP(oh, destroy);
2118         OSD_DECLARE_OP(oh, delete);
2119         oh->ot_credits += osd_dto_credits_noquota[DTO_OBJECT_DELETE];
2120         /* XXX: So far, only normal fid needs to be inserted into the OI,
2121          *      so only normal fid needs to be removed from the OI also. */
2122         if (fid_is_norm(lu_object_fid(&dt->do_lu))) {
2123                 oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_DELETE];
2124                 /* Recycle idle OI leaf may cause additional three OI blocks
2125                  * to be changed. */
2126                 oh->ot_credits += 3;
2127         }
2128
2129         /* one less inode */
2130         rc = osd_declare_inode_qid(env, inode->i_uid, inode->i_gid, -1, oh,
2131                                    false, true, NULL, false);
2132         if (rc)
2133                 RETURN(rc);
2134         /* data to be truncated */
2135         rc = osd_declare_inode_qid(env, inode->i_uid, inode->i_gid, 0, oh, true,
2136                                    true, NULL, false);
2137         RETURN(rc);
2138 }
2139
2140 static int osd_object_destroy(const struct lu_env *env,
2141                               struct dt_object *dt,
2142                               struct thandle *th)
2143 {
2144         const struct lu_fid    *fid = lu_object_fid(&dt->do_lu);
2145         struct osd_object      *obj = osd_dt_obj(dt);
2146         struct inode           *inode = obj->oo_inode;
2147         struct osd_device      *osd = osd_obj2dev(obj);
2148         struct osd_thandle     *oh;
2149         int                     result;
2150         ENTRY;
2151
2152         oh = container_of0(th, struct osd_thandle, ot_super);
2153         LASSERT(oh->ot_handle);
2154         LASSERT(inode);
2155         LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
2156
2157         if (unlikely(fid_is_acct(fid)))
2158                 RETURN(-EPERM);
2159
2160         /* Parallel control for OI scrub. For most of cases, there is no
2161          * lock contention. So it will not affect unlink performance. */
2162         cfs_mutex_lock(&inode->i_mutex);
2163         if (S_ISDIR(inode->i_mode)) {
2164                 LASSERT(osd_inode_unlinked(inode) ||
2165                         inode->i_nlink == 1);
2166                 cfs_spin_lock(&obj->oo_guard);
2167                 inode->i_nlink = 0;
2168                 cfs_spin_unlock(&obj->oo_guard);
2169                 inode->i_sb->s_op->dirty_inode(inode);
2170         } else {
2171                 LASSERT(osd_inode_unlinked(inode));
2172         }
2173
2174         OSD_EXEC_OP(th, destroy);
2175
2176         result = osd_oi_delete(osd_oti_get(env), osd, fid, th);
2177         cfs_mutex_unlock(&inode->i_mutex);
2178
2179         /* XXX: add to ext3 orphan list */
2180         /* rc = ext3_orphan_add(handle_t *handle, struct inode *inode) */
2181
2182         /* not needed in the cache anymore */
2183         set_bit(LU_OBJECT_HEARD_BANSHEE, &dt->do_lu.lo_header->loh_flags);
2184
2185         RETURN(0);
2186 }
2187
2188 /**
2189  * Helper function for osd_xattr_set()
2190  */
2191 static int __osd_xattr_set(const struct lu_env *env, struct dt_object *dt,
2192                            const struct lu_buf *buf, const char *name, int fl)
2193 {
2194         struct osd_object      *obj      = osd_dt_obj(dt);
2195         struct inode           *inode    = obj->oo_inode;
2196         struct osd_thread_info *info     = osd_oti_get(env);
2197         struct dentry          *dentry   = &info->oti_child_dentry;
2198         int                     fs_flags = 0;
2199         int                     rc;
2200
2201         LASSERT(dt_object_exists(dt));
2202         LASSERT(inode->i_op != NULL && inode->i_op->setxattr != NULL);
2203
2204         if (fl & LU_XATTR_REPLACE)
2205                 fs_flags |= XATTR_REPLACE;
2206
2207         if (fl & LU_XATTR_CREATE)
2208                 fs_flags |= XATTR_CREATE;
2209
2210         dentry->d_inode = inode;
2211         rc = inode->i_op->setxattr(dentry, name, buf->lb_buf,
2212                                    buf->lb_len, fs_flags);
2213         return rc;
2214 }
2215
2216 /**
2217  * Put the fid into lustre_mdt_attrs, and then place the structure
2218  * inode's ea. This fid should not be altered during the life time
2219  * of the inode.
2220  *
2221  * \retval +ve, on success
2222  * \retval -ve, on error
2223  *
2224  * FIXME: It is good to have/use ldiskfs_xattr_set_handle() here
2225  */
2226 static int osd_ea_fid_set(const struct lu_env *env, struct dt_object *dt,
2227                           const struct lu_fid *fid)
2228 {
2229         struct osd_thread_info  *info      = osd_oti_get(env);
2230         struct lustre_mdt_attrs *mdt_attrs = &info->oti_mdt_attrs;
2231
2232         lustre_lma_init(mdt_attrs, fid);
2233         lustre_lma_swab(mdt_attrs);
2234         return __osd_xattr_set(env, dt,
2235                                osd_buf_get(env, mdt_attrs, sizeof *mdt_attrs),
2236                                XATTR_NAME_LMA, LU_XATTR_CREATE);
2237
2238 }
2239
2240 /**
2241  * ldiskfs supports fid in dirent, it is passed in dentry->d_fsdata.
2242  * lustre 1.8 also uses d_fsdata for passing other info to ldiskfs.
2243  * To have compatilibility with 1.8 ldiskfs driver we need to have
2244  * magic number at start of fid data.
2245  * \ldiskfs_dentry_param is used only to pass fid from osd to ldiskfs.
2246  * its inmemory API.
2247  */
2248 void osd_get_ldiskfs_dirent_param(struct ldiskfs_dentry_param *param,
2249                                   const struct dt_rec *fid)
2250 {
2251         param->edp_magic = LDISKFS_LUFID_MAGIC;
2252         param->edp_len =  sizeof(struct lu_fid) + 1;
2253
2254         fid_cpu_to_be((struct lu_fid *)param->edp_data,
2255                       (struct lu_fid *)fid);
2256 }
2257
2258 /**
2259  * Try to read the fid from inode ea into dt_rec, if return value
2260  * i.e. rc is +ve, then we got fid, otherwise we will have to form igif
2261  *
2262  * \param fid object fid.
2263  *
2264  * \retval 0 on success
2265  */
2266 static int osd_ea_fid_get(const struct lu_env *env, struct osd_object *obj,
2267                           __u32 ino, struct lu_fid *fid,
2268                           struct osd_inode_id *id)
2269 {
2270         struct osd_thread_info *info  = osd_oti_get(env);
2271         struct inode           *inode;
2272         ENTRY;
2273
2274         osd_id_gen(id, ino, OSD_OII_NOGEN);
2275         inode = osd_iget_fid(info, osd_obj2dev(obj), id, fid);
2276         if (IS_ERR(inode))
2277                 RETURN(PTR_ERR(inode));
2278
2279         iput(inode);
2280         RETURN(0);
2281 }
2282
2283 /**
2284  * OSD layer object create function for interoperability mode (b11826).
2285  * This is mostly similar to osd_object_create(). Only difference being, fid is
2286  * inserted into inode ea here.
2287  *
2288  * \retval   0, on success
2289  * \retval -ve, on error
2290  */
2291 static int osd_object_ea_create(const struct lu_env *env, struct dt_object *dt,
2292                                 struct lu_attr *attr,
2293                                 struct dt_allocation_hint *hint,
2294                                 struct dt_object_format *dof,
2295                                 struct thandle *th)
2296 {
2297         const struct lu_fid    *fid    = lu_object_fid(&dt->do_lu);
2298         struct osd_object      *obj    = osd_dt_obj(dt);
2299         struct osd_thread_info *info   = osd_oti_get(env);
2300         int                     result;
2301
2302         ENTRY;
2303
2304         LASSERT(osd_invariant(obj));
2305         LASSERT(!dt_object_exists(dt));
2306         LASSERT(osd_write_locked(env, obj));
2307         LASSERT(th != NULL);
2308
2309         if (unlikely(fid_is_acct(fid)))
2310                 /* Quota files can't be created from the kernel any more,
2311                  * 'tune2fs -O quota' will take care of creating them */
2312                 RETURN(-EPERM);
2313
2314         OSD_EXEC_OP(th, create);
2315
2316         result = __osd_object_create(info, obj, attr, hint, dof, th);
2317         /* objects under osd root shld have igif fid, so dont add fid EA */
2318         if (result == 0 && fid_seq(fid) >= FID_SEQ_NORMAL)
2319                 result = osd_ea_fid_set(env, dt, fid);
2320
2321         if (result == 0)
2322                 result = __osd_oi_insert(env, obj, fid, th);
2323
2324         LASSERT(ergo(result == 0, dt_object_exists(dt)));
2325         LINVRNT(osd_invariant(obj));
2326         RETURN(result);
2327 }
2328
2329 static int osd_declare_object_ref_add(const struct lu_env *env,
2330                                       struct dt_object *dt,
2331                                       struct thandle *handle)
2332 {
2333         struct osd_thandle *oh;
2334
2335         /* it's possible that object doesn't exist yet */
2336         LASSERT(handle != NULL);
2337
2338         oh = container_of0(handle, struct osd_thandle, ot_super);
2339         LASSERT(oh->ot_handle == NULL);
2340
2341         OSD_DECLARE_OP(oh, ref_add);
2342         oh->ot_credits += osd_dto_credits_noquota[DTO_ATTR_SET_BASE];
2343
2344         return 0;
2345 }
2346
2347 /*
2348  * Concurrency: @dt is write locked.
2349  */
2350 static int osd_object_ref_add(const struct lu_env *env,
2351                               struct dt_object *dt, struct thandle *th)
2352 {
2353         struct osd_object *obj = osd_dt_obj(dt);
2354         struct inode      *inode = obj->oo_inode;
2355
2356         LINVRNT(osd_invariant(obj));
2357         LASSERT(dt_object_exists(dt));
2358         LASSERT(osd_write_locked(env, obj));
2359         LASSERT(th != NULL);
2360
2361         OSD_EXEC_OP(th, ref_add);
2362
2363         /*
2364          * DIR_NLINK feature is set for compatibility reasons if:
2365          * 1) nlinks > LDISKFS_LINK_MAX, or
2366          * 2) nlinks == 2, since this indicates i_nlink was previously 1.
2367          *
2368          * It is easier to always set this flag (rather than check and set),
2369          * since it has less overhead, and the superblock will be dirtied
2370          * at some point. Both e2fsprogs and any Lustre-supported ldiskfs
2371          * do not actually care whether this flag is set or not.
2372          */
2373         cfs_spin_lock(&obj->oo_guard);
2374         inode->i_nlink++;
2375         if (S_ISDIR(inode->i_mode) && inode->i_nlink > 1) {
2376                 if (inode->i_nlink >= LDISKFS_LINK_MAX ||
2377                     inode->i_nlink == 2)
2378                         inode->i_nlink = 1;
2379         }
2380         LASSERT(inode->i_nlink <= LDISKFS_LINK_MAX);
2381         cfs_spin_unlock(&obj->oo_guard);
2382         inode->i_sb->s_op->dirty_inode(inode);
2383         LINVRNT(osd_invariant(obj));
2384
2385         return 0;
2386 }
2387
2388 static int osd_declare_object_ref_del(const struct lu_env *env,
2389                                       struct dt_object *dt,
2390                                       struct thandle *handle)
2391 {
2392         struct osd_thandle *oh;
2393
2394         LASSERT(dt_object_exists(dt));
2395         LASSERT(handle != NULL);
2396
2397         oh = container_of0(handle, struct osd_thandle, ot_super);
2398         LASSERT(oh->ot_handle == NULL);
2399
2400         OSD_DECLARE_OP(oh, ref_del);
2401         oh->ot_credits += osd_dto_credits_noquota[DTO_ATTR_SET_BASE];
2402
2403         return 0;
2404 }
2405
2406 /*
2407  * Concurrency: @dt is write locked.
2408  */
2409 static int osd_object_ref_del(const struct lu_env *env, struct dt_object *dt,
2410                               struct thandle *th)
2411 {
2412         struct osd_object *obj = osd_dt_obj(dt);
2413         struct inode      *inode = obj->oo_inode;
2414
2415         LINVRNT(osd_invariant(obj));
2416         LASSERT(dt_object_exists(dt));
2417         LASSERT(osd_write_locked(env, obj));
2418         LASSERT(th != NULL);
2419
2420         OSD_EXEC_OP(th, ref_del);
2421
2422         cfs_spin_lock(&obj->oo_guard);
2423         LASSERT(inode->i_nlink > 0);
2424         inode->i_nlink--;
2425         /* If this is/was a many-subdir directory (nlink > LDISKFS_LINK_MAX)
2426          * then the nlink count is 1. Don't let it be set to 0 or the directory
2427          * inode will be deleted incorrectly. */
2428         if (S_ISDIR(inode->i_mode) && inode->i_nlink == 0)
2429                 inode->i_nlink++;
2430         cfs_spin_unlock(&obj->oo_guard);
2431         inode->i_sb->s_op->dirty_inode(inode);
2432         LINVRNT(osd_invariant(obj));
2433
2434         return 0;
2435 }
2436
2437 /*
2438  * Get the 64-bit version for an inode.
2439  */
2440 static int osd_object_version_get(const struct lu_env *env,
2441                                   struct dt_object *dt, dt_obj_version_t *ver)
2442 {
2443         struct inode *inode = osd_dt_obj(dt)->oo_inode;
2444
2445         CDEBUG(D_INODE, "Get version "LPX64" for inode %lu\n",
2446                LDISKFS_I(inode)->i_fs_version, inode->i_ino);
2447         *ver = LDISKFS_I(inode)->i_fs_version;
2448         return 0;
2449 }
2450
2451 /*
2452  * Concurrency: @dt is read locked.
2453  */
2454 static int osd_xattr_get(const struct lu_env *env, struct dt_object *dt,
2455                          struct lu_buf *buf, const char *name,
2456                          struct lustre_capa *capa)
2457 {
2458         struct osd_object      *obj    = osd_dt_obj(dt);
2459         struct inode           *inode  = obj->oo_inode;
2460         struct osd_thread_info *info   = osd_oti_get(env);
2461         struct dentry          *dentry = &info->oti_obj_dentry;
2462
2463         /* version get is not real XATTR but uses xattr API */
2464         if (strcmp(name, XATTR_NAME_VERSION) == 0) {
2465                 /* for version we are just using xattr API but change inode
2466                  * field instead */
2467                 LASSERT(buf->lb_len == sizeof(dt_obj_version_t));
2468                 osd_object_version_get(env, dt, buf->lb_buf);
2469                 return sizeof(dt_obj_version_t);
2470         }
2471
2472         LASSERT(dt_object_exists(dt));
2473         LASSERT(inode->i_op != NULL && inode->i_op->getxattr != NULL);
2474         LASSERT(osd_read_locked(env, obj) || osd_write_locked(env, obj));
2475
2476         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
2477                 return -EACCES;
2478
2479         dentry->d_inode = inode;
2480         return inode->i_op->getxattr(dentry, name, buf->lb_buf, buf->lb_len);
2481 }
2482
2483
2484 static int osd_declare_xattr_set(const struct lu_env *env,
2485                                  struct dt_object *dt,
2486                                  const struct lu_buf *buf, const char *name,
2487                                  int fl, struct thandle *handle)
2488 {
2489         struct osd_thandle *oh;
2490
2491         LASSERT(handle != NULL);
2492
2493         oh = container_of0(handle, struct osd_thandle, ot_super);
2494         LASSERT(oh->ot_handle == NULL);
2495
2496         OSD_DECLARE_OP(oh, xattr_set);
2497         if (strcmp(name, XATTR_NAME_VERSION) == 0)
2498                 oh->ot_credits += osd_dto_credits_noquota[DTO_ATTR_SET_BASE];
2499         else
2500                 oh->ot_credits += osd_dto_credits_noquota[DTO_XATTR_SET];
2501
2502         return 0;
2503 }
2504
2505 /*
2506  * Set the 64-bit version for object
2507  */
2508 static void osd_object_version_set(const struct lu_env *env,
2509                                    struct dt_object *dt,
2510                                    dt_obj_version_t *new_version)
2511 {
2512         struct inode *inode = osd_dt_obj(dt)->oo_inode;
2513
2514         CDEBUG(D_INODE, "Set version "LPX64" (old "LPX64") for inode %lu\n",
2515                *new_version, LDISKFS_I(inode)->i_fs_version, inode->i_ino);
2516
2517         LDISKFS_I(inode)->i_fs_version = *new_version;
2518         /** Version is set after all inode operations are finished,
2519          *  so we should mark it dirty here */
2520         inode->i_sb->s_op->dirty_inode(inode);
2521 }
2522
2523 /*
2524  * Concurrency: @dt is write locked.
2525  */
2526 static int osd_xattr_set(const struct lu_env *env, struct dt_object *dt,
2527                          const struct lu_buf *buf, const char *name, int fl,
2528                          struct thandle *handle, struct lustre_capa *capa)
2529 {
2530         LASSERT(handle != NULL);
2531
2532         /* version set is not real XATTR */
2533         if (strcmp(name, XATTR_NAME_VERSION) == 0) {
2534                 /* for version we are just using xattr API but change inode
2535                  * field instead */
2536                 LASSERT(buf->lb_len == sizeof(dt_obj_version_t));
2537                 osd_object_version_set(env, dt, buf->lb_buf);
2538                 return sizeof(dt_obj_version_t);
2539         }
2540
2541         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
2542                 return -EACCES;
2543
2544         OSD_EXEC_OP(handle, xattr_set);
2545         return __osd_xattr_set(env, dt, buf, name, fl);
2546 }
2547
2548 /*
2549  * Concurrency: @dt is read locked.
2550  */
2551 static int osd_xattr_list(const struct lu_env *env, struct dt_object *dt,
2552                           struct lu_buf *buf, struct lustre_capa *capa)
2553 {
2554         struct osd_object      *obj    = osd_dt_obj(dt);
2555         struct inode           *inode  = obj->oo_inode;
2556         struct osd_thread_info *info   = osd_oti_get(env);
2557         struct dentry          *dentry = &info->oti_obj_dentry;
2558
2559         LASSERT(dt_object_exists(dt));
2560         LASSERT(inode->i_op != NULL && inode->i_op->listxattr != NULL);
2561         LASSERT(osd_read_locked(env, obj) || osd_write_locked(env, obj));
2562
2563         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_READ))
2564                 return -EACCES;
2565
2566         dentry->d_inode = inode;
2567         return inode->i_op->listxattr(dentry, buf->lb_buf, buf->lb_len);
2568 }
2569
2570 static int osd_declare_xattr_del(const struct lu_env *env,
2571                                  struct dt_object *dt, const char *name,
2572                                  struct thandle *handle)
2573 {
2574         struct osd_thandle *oh;
2575
2576         LASSERT(dt_object_exists(dt));
2577         LASSERT(handle != NULL);
2578
2579         oh = container_of0(handle, struct osd_thandle, ot_super);
2580         LASSERT(oh->ot_handle == NULL);
2581
2582         OSD_DECLARE_OP(oh, xattr_set);
2583         oh->ot_credits += osd_dto_credits_noquota[DTO_XATTR_SET];
2584
2585         return 0;
2586 }
2587
2588 /*
2589  * Concurrency: @dt is write locked.
2590  */
2591 static int osd_xattr_del(const struct lu_env *env, struct dt_object *dt,
2592                          const char *name, struct thandle *handle,
2593                          struct lustre_capa *capa)
2594 {
2595         struct osd_object      *obj    = osd_dt_obj(dt);
2596         struct inode           *inode  = obj->oo_inode;
2597         struct osd_thread_info *info   = osd_oti_get(env);
2598         struct dentry          *dentry = &info->oti_obj_dentry;
2599         int                     rc;
2600
2601         LASSERT(dt_object_exists(dt));
2602         LASSERT(inode->i_op != NULL && inode->i_op->removexattr != NULL);
2603         LASSERT(osd_write_locked(env, obj));
2604         LASSERT(handle != NULL);
2605
2606         if (osd_object_auth(env, dt, capa, CAPA_OPC_META_WRITE))
2607                 return -EACCES;
2608
2609         OSD_EXEC_OP(handle, xattr_set);
2610
2611         dentry->d_inode = inode;
2612         rc = inode->i_op->removexattr(dentry, name);
2613         return rc;
2614 }
2615
2616 static struct obd_capa *osd_capa_get(const struct lu_env *env,
2617                                      struct dt_object *dt,
2618                                      struct lustre_capa *old,
2619                                      __u64 opc)
2620 {
2621         struct osd_thread_info *info = osd_oti_get(env);
2622         const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
2623         struct osd_object *obj = osd_dt_obj(dt);
2624         struct osd_device *dev = osd_obj2dev(obj);
2625         struct lustre_capa_key *key = &info->oti_capa_key;
2626         struct lustre_capa *capa = &info->oti_capa;
2627         struct obd_capa *oc;
2628         struct md_capainfo *ci;
2629         int rc;
2630         ENTRY;
2631
2632         if (!dev->od_fl_capa)
2633                 RETURN(ERR_PTR(-ENOENT));
2634
2635         LASSERT(dt_object_exists(dt));
2636         LINVRNT(osd_invariant(obj));
2637
2638         /* renewal sanity check */
2639         if (old && osd_object_auth(env, dt, old, opc))
2640                 RETURN(ERR_PTR(-EACCES));
2641
2642         ci = md_capainfo(env);
2643         if (unlikely(!ci))
2644                 RETURN(ERR_PTR(-ENOENT));
2645
2646         switch (ci->mc_auth) {
2647         case LC_ID_NONE:
2648                 RETURN(NULL);
2649         case LC_ID_PLAIN:
2650                 capa->lc_uid = obj->oo_inode->i_uid;
2651                 capa->lc_gid = obj->oo_inode->i_gid;
2652                 capa->lc_flags = LC_ID_PLAIN;
2653                 break;
2654         case LC_ID_CONVERT: {
2655                 __u32 d[4], s[4];
2656
2657                 s[0] = obj->oo_inode->i_uid;
2658                 cfs_get_random_bytes(&(s[1]), sizeof(__u32));
2659                 s[2] = obj->oo_inode->i_gid;
2660                 cfs_get_random_bytes(&(s[3]), sizeof(__u32));
2661                 rc = capa_encrypt_id(d, s, key->lk_key, CAPA_HMAC_KEY_MAX_LEN);
2662                 if (unlikely(rc))
2663                         RETURN(ERR_PTR(rc));
2664
2665                 capa->lc_uid   = ((__u64)d[1] << 32) | d[0];
2666                 capa->lc_gid   = ((__u64)d[3] << 32) | d[2];
2667                 capa->lc_flags = LC_ID_CONVERT;
2668                 break;
2669         }
2670         default:
2671                 RETURN(ERR_PTR(-EINVAL));
2672         }
2673
2674         capa->lc_fid = *fid;
2675         capa->lc_opc = opc;
2676         capa->lc_flags |= dev->od_capa_alg << 24;
2677         capa->lc_timeout = dev->od_capa_timeout;
2678         capa->lc_expiry = 0;
2679
2680         oc = capa_lookup(dev->od_capa_hash, capa, 1);
2681         if (oc) {
2682                 LASSERT(!capa_is_expired(oc));
2683                 RETURN(oc);
2684         }
2685
2686         cfs_spin_lock(&capa_lock);
2687         *key = dev->od_capa_keys[1];
2688         cfs_spin_unlock(&capa_lock);
2689
2690         capa->lc_keyid = key->lk_keyid;
2691         capa->lc_expiry = cfs_time_current_sec() + dev->od_capa_timeout;
2692
2693         rc = capa_hmac(capa->lc_hmac, capa, key->lk_key);
2694         if (rc) {
2695                 DEBUG_CAPA(D_ERROR, capa, "HMAC failed: %d for", rc);
2696                 RETURN(ERR_PTR(rc));
2697         }
2698
2699         oc = capa_add(dev->od_capa_hash, capa);
2700         RETURN(oc);
2701 }
2702
2703 static int osd_object_sync(const struct lu_env *env, struct dt_object *dt)
2704 {
2705         struct osd_object       *obj    = osd_dt_obj(dt);
2706         struct inode            *inode  = obj->oo_inode;
2707         struct osd_thread_info  *info   = osd_oti_get(env);
2708         struct dentry           *dentry = &info->oti_obj_dentry;
2709         struct file             *file   = &info->oti_file;
2710         int                     rc;
2711
2712         ENTRY;
2713
2714         dentry->d_inode = inode;
2715         file->f_dentry = dentry;
2716         file->f_mapping = inode->i_mapping;
2717         file->f_op = inode->i_fop;
2718         mutex_lock(&inode->i_mutex);
2719         rc = file->f_op->fsync(file, dentry, 0);
2720         mutex_unlock(&inode->i_mutex);
2721         RETURN(rc);
2722 }
2723
2724 static int osd_data_get(const struct lu_env *env, struct dt_object *dt,
2725                         void **data)
2726 {
2727         struct osd_object *obj = osd_dt_obj(dt);
2728         ENTRY;
2729
2730         *data = (void *)obj->oo_inode;
2731         RETURN(0);
2732 }
2733
2734 /*
2735  * Index operations.
2736  */
2737
2738 static int osd_iam_index_probe(const struct lu_env *env, struct osd_object *o,
2739                            const struct dt_index_features *feat)
2740 {
2741         struct iam_descr *descr;
2742
2743         if (osd_object_is_root(o))
2744                 return feat == &dt_directory_features;
2745
2746         LASSERT(o->oo_dir != NULL);
2747
2748         descr = o->oo_dir->od_container.ic_descr;
2749         if (feat == &dt_directory_features) {
2750                 if (descr->id_rec_size == sizeof(struct osd_fid_pack))
2751                         return 1;
2752                 else
2753                         return 0;
2754         } else {
2755                 return
2756                         feat->dif_keysize_min <= descr->id_key_size &&
2757                         descr->id_key_size <= feat->dif_keysize_max &&
2758                         feat->dif_recsize_min <= descr->id_rec_size &&
2759                         descr->id_rec_size <= feat->dif_recsize_max &&
2760                         !(feat->dif_flags & (DT_IND_VARKEY |
2761                                              DT_IND_VARREC | DT_IND_NONUNQ)) &&
2762                         ergo(feat->dif_flags & DT_IND_UPDATE,
2763                              1 /* XXX check that object (and file system) is
2764                                 * writable */);
2765         }
2766 }
2767
2768 static int osd_iam_container_init(const struct lu_env *env,
2769                                   struct osd_object *obj,
2770                                   struct osd_directory *dir)
2771 {
2772         struct iam_container *bag = &dir->od_container;
2773         int result;
2774
2775         result = iam_container_init(bag, &dir->od_descr, obj->oo_inode);
2776         if (result != 0)
2777                 return result;
2778
2779         result = iam_container_setup(bag);
2780         if (result == 0)
2781                 obj->oo_dt.do_index_ops = &osd_index_iam_ops;
2782         else
2783                 iam_container_fini(bag);
2784
2785         return result;
2786 }
2787
2788
2789 /*
2790  * Concurrency: no external locking is necessary.
2791  */
2792 static int osd_index_try(const struct lu_env *env, struct dt_object *dt,
2793                          const struct dt_index_features *feat)
2794 {
2795         int                      result;
2796         int                      skip_iam = 0;
2797         struct osd_object       *obj = osd_dt_obj(dt);
2798         struct osd_device       *osd = osd_obj2dev(obj);
2799
2800         LINVRNT(osd_invariant(obj));
2801         LASSERT(dt_object_exists(dt));
2802
2803         if (osd_object_is_root(obj)) {
2804                 dt->do_index_ops = &osd_index_ea_ops;
2805                 result = 0;
2806         } else if (feat == &dt_directory_features && osd->od_iop_mode) {
2807                 dt->do_index_ops = &osd_index_ea_ops;
2808                 if (S_ISDIR(obj->oo_inode->i_mode))
2809                         result = 0;
2810                 else
2811                         result = -ENOTDIR;
2812                 skip_iam = 1;
2813         } else if (unlikely(feat == &dt_otable_features)) {
2814                 dt->do_index_ops = &osd_otable_ops;
2815                 return 0;
2816         } else if (feat == &dt_acct_features) {
2817                 dt->do_index_ops = &osd_acct_index_ops;
2818                 result = 0;
2819                 skip_iam = 1;
2820         } else if (!osd_has_index(obj)) {
2821                 struct osd_directory *dir;
2822
2823                 OBD_ALLOC_PTR(dir);
2824                 if (dir != NULL) {
2825
2826                         cfs_spin_lock(&obj->oo_guard);
2827                         if (obj->oo_dir == NULL)
2828                                 obj->oo_dir = dir;
2829                         else
2830                                 /*
2831                                  * Concurrent thread allocated container data.
2832                                  */
2833                                 OBD_FREE_PTR(dir);
2834                         cfs_spin_unlock(&obj->oo_guard);
2835                         /*
2836                          * Now, that we have container data, serialize its
2837                          * initialization.
2838                          */
2839                         cfs_down_write(&obj->oo_ext_idx_sem);
2840                         /*
2841                          * recheck under lock.
2842                          */
2843                         if (!osd_has_index(obj))
2844                                 result = osd_iam_container_init(env, obj, dir);
2845                         else
2846                                 result = 0;
2847                         cfs_up_write(&obj->oo_ext_idx_sem);
2848                 } else {
2849                         result = -ENOMEM;
2850                 }
2851         } else {
2852                 result = 0;
2853         }
2854
2855         if (result == 0 && skip_iam == 0) {
2856                 if (!osd_iam_index_probe(env, obj, feat))
2857                         result = -ENOTDIR;
2858         }
2859         LINVRNT(osd_invariant(obj));
2860
2861         return result;
2862 }
2863
2864 static int osd_otable_it_attr_get(const struct lu_env *env,
2865                                  struct dt_object *dt,
2866                                  struct lu_attr *attr,
2867                                  struct lustre_capa *capa)
2868 {
2869         attr->la_valid = 0;
2870         return 0;
2871 }
2872
2873 static const struct dt_object_operations osd_obj_ops = {
2874         .do_read_lock         = osd_object_read_lock,
2875         .do_write_lock        = osd_object_write_lock,
2876         .do_read_unlock       = osd_object_read_unlock,
2877         .do_write_unlock      = osd_object_write_unlock,
2878         .do_write_locked      = osd_object_write_locked,
2879         .do_attr_get          = osd_attr_get,
2880         .do_declare_attr_set  = osd_declare_attr_set,
2881         .do_attr_set          = osd_attr_set,
2882         .do_ah_init           = osd_ah_init,
2883         .do_declare_create    = osd_declare_object_create,
2884         .do_create            = osd_object_create,
2885         .do_declare_destroy   = osd_declare_object_destroy,
2886         .do_destroy           = osd_object_destroy,
2887         .do_index_try         = osd_index_try,
2888         .do_declare_ref_add   = osd_declare_object_ref_add,
2889         .do_ref_add           = osd_object_ref_add,
2890         .do_declare_ref_del   = osd_declare_object_ref_del,
2891         .do_ref_del           = osd_object_ref_del,
2892         .do_xattr_get         = osd_xattr_get,
2893         .do_declare_xattr_set = osd_declare_xattr_set,
2894         .do_xattr_set         = osd_xattr_set,
2895         .do_declare_xattr_del = osd_declare_xattr_del,
2896         .do_xattr_del         = osd_xattr_del,
2897         .do_xattr_list        = osd_xattr_list,
2898         .do_capa_get          = osd_capa_get,
2899         .do_object_sync       = osd_object_sync,
2900         .do_data_get          = osd_data_get,
2901 };
2902
2903 /**
2904  * dt_object_operations for interoperability mode
2905  * (i.e. to run 2.0 mds on 1.8 disk) (b11826)
2906  */
2907 static const struct dt_object_operations osd_obj_ea_ops = {
2908         .do_read_lock         = osd_object_read_lock,
2909         .do_write_lock        = osd_object_write_lock,
2910         .do_read_unlock       = osd_object_read_unlock,
2911         .do_write_unlock      = osd_object_write_unlock,
2912         .do_write_locked      = osd_object_write_locked,
2913         .do_attr_get          = osd_attr_get,
2914         .do_declare_attr_set  = osd_declare_attr_set,
2915         .do_attr_set          = osd_attr_set,
2916         .do_ah_init           = osd_ah_init,
2917         .do_declare_create    = osd_declare_object_create,
2918         .do_create            = osd_object_ea_create,
2919         .do_declare_destroy   = osd_declare_object_destroy,
2920         .do_destroy           = osd_object_destroy,
2921         .do_index_try         = osd_index_try,
2922         .do_declare_ref_add   = osd_declare_object_ref_add,
2923         .do_ref_add           = osd_object_ref_add,
2924         .do_declare_ref_del   = osd_declare_object_ref_del,
2925         .do_ref_del           = osd_object_ref_del,
2926         .do_xattr_get         = osd_xattr_get,
2927         .do_declare_xattr_set = osd_declare_xattr_set,
2928         .do_xattr_set         = osd_xattr_set,
2929         .do_declare_xattr_del = osd_declare_xattr_del,
2930         .do_xattr_del         = osd_xattr_del,
2931         .do_xattr_list        = osd_xattr_list,
2932         .do_capa_get          = osd_capa_get,
2933         .do_object_sync       = osd_object_sync,
2934         .do_data_get          = osd_data_get,
2935 };
2936
2937 static const struct dt_object_operations osd_obj_otable_it_ops = {
2938         .do_attr_get    = osd_otable_it_attr_get,
2939         .do_index_try   = osd_index_try,
2940 };
2941
2942 static int osd_index_declare_iam_delete(const struct lu_env *env,
2943                                         struct dt_object *dt,
2944                                         const struct dt_key *key,
2945                                         struct thandle *handle)
2946 {
2947         struct osd_thandle    *oh;
2948
2949         oh = container_of0(handle, struct osd_thandle, ot_super);
2950         LASSERT(oh->ot_handle == NULL);
2951
2952         OSD_DECLARE_OP(oh, delete);
2953         oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_DELETE];
2954
2955         return 0;
2956 }
2957
2958 /**
2959  *      delete a (key, value) pair from index \a dt specified by \a key
2960  *
2961  *      \param  dt      osd index object
2962  *      \param  key     key for index
2963  *      \param  rec     record reference
2964  *      \param  handle  transaction handler
2965  *
2966  *      \retval  0  success
2967  *      \retval -ve   failure
2968  */
2969
2970 static int osd_index_iam_delete(const struct lu_env *env, struct dt_object *dt,
2971                                 const struct dt_key *key,
2972                                 struct thandle *handle,
2973                                 struct lustre_capa *capa)
2974 {
2975         struct osd_thread_info *oti = osd_oti_get(env);
2976         struct osd_object      *obj = osd_dt_obj(dt);
2977         struct osd_thandle     *oh;
2978         struct iam_path_descr  *ipd;
2979         struct iam_container   *bag = &obj->oo_dir->od_container;
2980         int                     rc;
2981
2982         ENTRY;
2983
2984         LINVRNT(osd_invariant(obj));
2985         LASSERT(dt_object_exists(dt));
2986         LASSERT(bag->ic_object == obj->oo_inode);
2987         LASSERT(handle != NULL);
2988
2989         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_DELETE))
2990                 RETURN(-EACCES);
2991
2992         OSD_EXEC_OP(handle, delete);
2993
2994         ipd = osd_idx_ipd_get(env, bag);
2995         if (unlikely(ipd == NULL))
2996                 RETURN(-ENOMEM);
2997
2998         oh = container_of0(handle, struct osd_thandle, ot_super);
2999         LASSERT(oh->ot_handle != NULL);
3000         LASSERT(oh->ot_handle->h_transaction != NULL);
3001
3002         if (fid_is_quota(lu_object_fid(&dt->do_lu))) {
3003                 /* swab quota uid/gid provided by caller */
3004                 oti->oti_quota_id = cpu_to_le64(*((__u64 *)key));
3005                 key = (const struct dt_key *)&oti->oti_quota_id;
3006         }
3007
3008         rc = iam_delete(oh->ot_handle, bag, (const struct iam_key *)key, ipd);
3009         osd_ipd_put(env, bag, ipd);
3010         LINVRNT(osd_invariant(obj));
3011         RETURN(rc);
3012 }
3013
3014 static int osd_index_declare_ea_delete(const struct lu_env *env,
3015                                        struct dt_object *dt,
3016                                        const struct dt_key *key,
3017                                        struct thandle *handle)
3018 {
3019         struct osd_thandle *oh;
3020         struct inode       *inode;
3021         int                 rc;
3022         ENTRY;
3023
3024         LASSERT(dt_object_exists(dt));
3025         LASSERT(handle != NULL);
3026
3027         oh = container_of0(handle, struct osd_thandle, ot_super);
3028         LASSERT(oh->ot_handle == NULL);
3029
3030         OSD_DECLARE_OP(oh, delete);
3031         oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_DELETE];
3032
3033         inode = osd_dt_obj(dt)->oo_inode;
3034         LASSERT(inode);
3035
3036         rc = osd_declare_inode_qid(env, inode->i_uid, inode->i_gid, 0, oh,
3037                                    true, true, NULL, false);
3038         RETURN(rc);
3039 }
3040
3041 static inline int osd_get_fid_from_dentry(struct ldiskfs_dir_entry_2 *de,
3042                                           struct dt_rec *fid)
3043 {
3044         struct osd_fid_pack *rec;
3045         int                  rc = -ENODATA;
3046
3047         if (de->file_type & LDISKFS_DIRENT_LUFID) {
3048                 rec = (struct osd_fid_pack *) (de->name + de->name_len + 1);
3049                 rc = osd_fid_unpack((struct lu_fid *)fid, rec);
3050         }
3051         RETURN(rc);
3052 }
3053
3054 /**
3055  * Index delete function for interoperability mode (b11826).
3056  * It will remove the directory entry added by osd_index_ea_insert().
3057  * This entry is needed to maintain name->fid mapping.
3058  *
3059  * \param key,  key i.e. file entry to be deleted
3060  *
3061  * \retval   0, on success
3062  * \retval -ve, on error
3063  */
3064 static int osd_index_ea_delete(const struct lu_env *env, struct dt_object *dt,
3065                                const struct dt_key *key,
3066                                struct thandle *handle,
3067                                struct lustre_capa *capa)
3068 {
3069         struct osd_object          *obj    = osd_dt_obj(dt);
3070         struct inode               *dir    = obj->oo_inode;
3071         struct dentry              *dentry;
3072         struct osd_thandle         *oh;
3073         struct ldiskfs_dir_entry_2 *de;
3074         struct buffer_head         *bh;
3075         struct htree_lock          *hlock = NULL;
3076         int                         rc;
3077
3078         ENTRY;
3079
3080         LINVRNT(osd_invariant(obj));
3081         LASSERT(dt_object_exists(dt));
3082         LASSERT(handle != NULL);
3083
3084         OSD_EXEC_OP(handle, delete);
3085
3086         oh = container_of(handle, struct osd_thandle, ot_super);
3087         LASSERT(oh->ot_handle != NULL);
3088         LASSERT(oh->ot_handle->h_transaction != NULL);
3089
3090         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_DELETE))
3091                 RETURN(-EACCES);
3092
3093         dentry = osd_child_dentry_get(env, obj,
3094                                       (char *)key, strlen((char *)key));
3095
3096         if (obj->oo_hl_head != NULL) {
3097                 hlock = osd_oti_get(env)->oti_hlock;
3098                 ldiskfs_htree_lock(hlock, obj->oo_hl_head,
3099                                    dir, LDISKFS_HLOCK_DEL);
3100         } else {
3101                 cfs_down_write(&obj->oo_ext_idx_sem);
3102         }
3103
3104         bh = osd_ldiskfs_find_entry(dir, dentry, &de, hlock);
3105         if (bh) {
3106                 rc = ldiskfs_delete_entry(oh->ot_handle,
3107                                           dir, de, bh);
3108                 brelse(bh);
3109         } else {
3110                 rc = -ENOENT;
3111         }
3112         if (hlock != NULL)
3113                 ldiskfs_htree_unlock(hlock);
3114         else
3115                 cfs_up_write(&obj->oo_ext_idx_sem);
3116
3117         LASSERT(osd_invariant(obj));
3118         RETURN(rc);
3119 }
3120
3121 /**
3122  *      Lookup index for \a key and copy record to \a rec.
3123  *
3124  *      \param  dt      osd index object
3125  *      \param  key     key for index
3126  *      \param  rec     record reference
3127  *
3128  *      \retval  +ve  success : exact mach
3129  *      \retval  0    return record with key not greater than \a key
3130  *      \retval -ve   failure
3131  */
3132 static int osd_index_iam_lookup(const struct lu_env *env, struct dt_object *dt,
3133                                 struct dt_rec *rec, const struct dt_key *key,
3134                                 struct lustre_capa *capa)
3135 {
3136         struct osd_object      *obj = osd_dt_obj(dt);
3137         struct iam_path_descr  *ipd;
3138         struct iam_container   *bag = &obj->oo_dir->od_container;
3139         struct osd_thread_info *oti = osd_oti_get(env);
3140         struct iam_iterator    *it = &oti->oti_idx_it;
3141         struct iam_rec         *iam_rec;
3142         int                     rc;
3143
3144         ENTRY;
3145
3146         LASSERT(osd_invariant(obj));
3147         LASSERT(dt_object_exists(dt));
3148         LASSERT(bag->ic_object == obj->oo_inode);
3149
3150         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_LOOKUP))
3151                 RETURN(-EACCES);
3152
3153         ipd = osd_idx_ipd_get(env, bag);
3154         if (IS_ERR(ipd))
3155                 RETURN(-ENOMEM);
3156
3157         /* got ipd now we can start iterator. */
3158         iam_it_init(it, bag, 0, ipd);
3159
3160         if (fid_is_quota(lu_object_fid(&dt->do_lu))) {
3161                 /* swab quota uid/gid provided by caller */
3162                 oti->oti_quota_id = cpu_to_le64(*((__u64 *)key));
3163                 key = (const struct dt_key *)&oti->oti_quota_id;
3164         }
3165
3166         rc = iam_it_get(it, (struct iam_key *)key);
3167         if (rc >= 0) {
3168                 if (S_ISDIR(obj->oo_inode->i_mode))
3169                         iam_rec = (struct iam_rec *)oti->oti_ldp;
3170                 else
3171                         iam_rec = (struct iam_rec *) rec;
3172
3173                 iam_reccpy(&it->ii_path.ip_leaf, (struct iam_rec *)iam_rec);
3174
3175                 if (S_ISDIR(obj->oo_inode->i_mode))
3176                         osd_fid_unpack((struct lu_fid *) rec,
3177                                        (struct osd_fid_pack *)iam_rec);
3178                 else if (fid_is_quota(lu_object_fid(&dt->do_lu)))
3179                         osd_quota_unpack(obj, rec);
3180         }
3181
3182         iam_it_put(it);
3183         iam_it_fini(it);
3184         osd_ipd_put(env, bag, ipd);
3185
3186         LINVRNT(osd_invariant(obj));
3187
3188         RETURN(rc);
3189 }
3190
3191 static int osd_index_declare_iam_insert(const struct lu_env *env,
3192                                         struct dt_object *dt,
3193                                         const struct dt_rec *rec,
3194                                         const struct dt_key *key,
3195                                         struct thandle *handle)
3196 {
3197         struct osd_thandle *oh;
3198
3199         LASSERT(dt_object_exists(dt));
3200         LASSERT(handle != NULL);
3201
3202         oh = container_of0(handle, struct osd_thandle, ot_super);
3203         LASSERT(oh->ot_handle == NULL);
3204
3205         OSD_DECLARE_OP(oh, insert);
3206         oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_INSERT];
3207
3208         return 0;
3209 }
3210
3211 /**
3212  *      Inserts (key, value) pair in \a dt index object.
3213  *
3214  *      \param  dt      osd index object
3215  *      \param  key     key for index
3216  *      \param  rec     record reference
3217  *      \param  th      transaction handler
3218  *
3219  *      \retval  0  success
3220  *      \retval -ve failure
3221  */
3222 static int osd_index_iam_insert(const struct lu_env *env, struct dt_object *dt,
3223                                 const struct dt_rec *rec,
3224                                 const struct dt_key *key, struct thandle *th,
3225                                 struct lustre_capa *capa, int ignore_quota)
3226 {
3227         struct osd_object     *obj = osd_dt_obj(dt);
3228         struct iam_path_descr *ipd;
3229         struct osd_thandle    *oh;
3230         struct iam_container  *bag = &obj->oo_dir->od_container;
3231 #ifdef HAVE_QUOTA_SUPPORT
3232         cfs_cap_t              save = cfs_curproc_cap_pack();
3233 #endif
3234         struct osd_thread_info *oti = osd_oti_get(env);
3235         struct iam_rec         *iam_rec;
3236         int                     rc;
3237
3238         ENTRY;
3239
3240         LINVRNT(osd_invariant(obj));
3241         LASSERT(dt_object_exists(dt));
3242         LASSERT(bag->ic_object == obj->oo_inode);
3243         LASSERT(th != NULL);
3244
3245         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_INSERT))
3246                 RETURN(-EACCES);
3247
3248         OSD_EXEC_OP(th, insert);
3249
3250         ipd = osd_idx_ipd_get(env, bag);
3251         if (unlikely(ipd == NULL))
3252                 RETURN(-ENOMEM);
3253
3254         oh = container_of0(th, struct osd_thandle, ot_super);
3255         LASSERT(oh->ot_handle != NULL);
3256         LASSERT(oh->ot_handle->h_transaction != NULL);
3257 #ifdef HAVE_QUOTA_SUPPORT
3258         if (ignore_quota)
3259                 cfs_cap_raise(CFS_CAP_SYS_RESOURCE);
3260         else
3261                 cfs_cap_lower(CFS_CAP_SYS_RESOURCE);
3262 #endif
3263         if (S_ISDIR(obj->oo_inode->i_mode)) {
3264                 iam_rec = (struct iam_rec *)oti->oti_ldp;
3265                 osd_fid_pack((struct osd_fid_pack *)iam_rec, rec, &oti->oti_fid);
3266         } else if (fid_is_quota(lu_object_fid(&dt->do_lu))) {
3267                 /* pack quota uid/gid */
3268                 oti->oti_quota_id = cpu_to_le64(*((__u64 *)key));
3269                 key = (const struct dt_key *)&oti->oti_quota_id;
3270                 /* pack quota record */
3271                 rec = osd_quota_pack(obj, rec, &oti->oti_quota_rec);
3272                 iam_rec = (struct iam_rec *)rec;
3273         } else {
3274                 iam_rec = (struct iam_rec *)rec;
3275         }
3276
3277         rc = iam_insert(oh->ot_handle, bag, (const struct iam_key *)key,
3278                         iam_rec, ipd);
3279 #ifdef HAVE_QUOTA_SUPPORT
3280         cfs_curproc_cap_unpack(save);
3281 #endif
3282         osd_ipd_put(env, bag, ipd);
3283         LINVRNT(osd_invariant(obj));
3284         RETURN(rc);
3285 }
3286
3287 /**
3288  * Calls ldiskfs_add_entry() to add directory entry
3289  * into the directory. This is required for
3290  * interoperability mode (b11826)
3291  *
3292  * \retval   0, on success
3293  * \retval -ve, on error
3294  */
3295 static int __osd_ea_add_rec(struct osd_thread_info *info,
3296                             struct osd_object *pobj, struct inode  *cinode,
3297                             const char *name, const struct dt_rec *fid,
3298                             struct htree_lock *hlock, struct thandle *th)
3299 {
3300         struct ldiskfs_dentry_param *ldp;
3301         struct dentry               *child;
3302         struct osd_thandle          *oth;
3303         int                          rc;
3304
3305         oth = container_of(th, struct osd_thandle, ot_super);
3306         LASSERT(oth->ot_handle != NULL);
3307         LASSERT(oth->ot_handle->h_transaction != NULL);
3308
3309         child = osd_child_dentry_get(info->oti_env, pobj, name, strlen(name));
3310
3311         /* XXX: remove fid_is_igif() check here.
3312          * IGIF check is just to handle insertion of .. when it is 'ROOT',
3313          * it is IGIF now but needs FID in dir entry as well for readdir
3314          * to work.
3315          * LU-838 should fix that and remove fid_is_igif() check */
3316         if (fid_is_igif((struct lu_fid *)fid) ||
3317             fid_is_norm((struct lu_fid *)fid)) {
3318                 ldp = (struct ldiskfs_dentry_param *)info->oti_ldp;
3319                 osd_get_ldiskfs_dirent_param(ldp, fid);
3320                 child->d_fsdata = (void *)ldp;
3321         } else {
3322                 child->d_fsdata = NULL;
3323         }
3324         rc = osd_ldiskfs_add_entry(oth->ot_handle, child, cinode, hlock);
3325
3326         RETURN(rc);
3327 }
3328
3329 /**
3330  * Calls ldiskfs_add_dot_dotdot() to add dot and dotdot entries
3331  * into the directory.Also sets flags into osd object to
3332  * indicate dot and dotdot are created. This is required for
3333  * interoperability mode (b11826)
3334  *
3335  * \param dir   directory for dot and dotdot fixup.
3336  * \param obj   child object for linking
3337  *
3338  * \retval   0, on success
3339  * \retval -ve, on error
3340  */
3341 static int osd_add_dot_dotdot(struct osd_thread_info *info,
3342                               struct osd_object *dir,
3343                               struct inode  *parent_dir, const char *name,
3344                               const struct dt_rec *dot_fid,
3345                               const struct dt_rec *dot_dot_fid,
3346                               struct thandle *th)
3347 {
3348         struct inode                *inode = dir->oo_inode;
3349         struct ldiskfs_dentry_param *dot_ldp;
3350         struct ldiskfs_dentry_param *dot_dot_ldp;
3351         struct osd_thandle          *oth;
3352         int result = 0;
3353
3354         oth = container_of(th, struct osd_thandle, ot_super);
3355         LASSERT(oth->ot_handle->h_transaction != NULL);
3356         LASSERT(S_ISDIR(dir->oo_inode->i_mode));
3357
3358         if (strcmp(name, dot) == 0) {
3359                 if (dir->oo_compat_dot_created) {
3360                         result = -EEXIST;
3361                 } else {
3362                         LASSERT(inode == parent_dir);
3363                         dir->oo_compat_dot_created = 1;
3364                         result = 0;
3365                 }
3366         } else if(strcmp(name, dotdot) == 0) {
3367                 dot_ldp = (struct ldiskfs_dentry_param *)info->oti_ldp;
3368                 dot_dot_ldp = (struct ldiskfs_dentry_param *)info->oti_ldp2;
3369
3370                 if (!dir->oo_compat_dot_created)
3371                         return -EINVAL;
3372                 if (!fid_is_igif((struct lu_fid *)dot_fid)) {
3373                         osd_get_ldiskfs_dirent_param(dot_ldp, dot_fid);
3374                         osd_get_ldiskfs_dirent_param(dot_dot_ldp, dot_dot_fid);
3375                 } else {
3376                         dot_ldp = NULL;
3377                         dot_dot_ldp = NULL;
3378                 }
3379                 /* in case of rename, dotdot is already created */
3380                 if (dir->oo_compat_dotdot_created) {
3381                         return __osd_ea_add_rec(info, dir, parent_dir, name,
3382                                                 dot_dot_fid, NULL, th);
3383                 }
3384
3385                 result = ldiskfs_add_dot_dotdot(oth->ot_handle, parent_dir,
3386                                                 inode, dot_ldp, dot_dot_ldp);
3387                 if (result == 0)
3388                        dir->oo_compat_dotdot_created = 1;
3389         }
3390
3391         return result;
3392 }
3393
3394
3395 /**
3396  * It will call the appropriate osd_add* function and return the
3397  * value, return by respective functions.
3398  */
3399 static int osd_ea_add_rec(const struct lu_env *env, struct osd_object *pobj,
3400                           struct inode *cinode, const char *name,
3401                           const struct dt_rec *fid, struct thandle *th)
3402 {
3403         struct osd_thread_info *info   = osd_oti_get(env);
3404         struct htree_lock      *hlock;
3405         int                     rc;
3406
3407         hlock = pobj->oo_hl_head != NULL ? info->oti_hlock : NULL;
3408
3409         if (name[0] == '.' && (name[1] == '\0' || (name[1] == '.' &&
3410                                                    name[2] =='\0'))) {
3411                 if (hlock != NULL) {
3412                         ldiskfs_htree_lock(hlock, pobj->oo_hl_head,
3413                                            pobj->oo_inode, 0);
3414                 } else {
3415                         cfs_down_write(&pobj->oo_ext_idx_sem);
3416                 }
3417                 rc = osd_add_dot_dotdot(info, pobj, cinode, name,
3418                      (struct dt_rec *)lu_object_fid(&pobj->oo_dt.do_lu),
3419                                         fid, th);
3420         } else {
3421                 if (hlock != NULL) {
3422                         ldiskfs_htree_lock(hlock, pobj->oo_hl_head,
3423                                            pobj->oo_inode, LDISKFS_HLOCK_ADD);
3424                 } else {
3425                         cfs_down_write(&pobj->oo_ext_idx_sem);
3426                 }
3427
3428                 rc = __osd_ea_add_rec(info, pobj, cinode, name, fid,
3429                                       hlock, th);
3430         }
3431         if (hlock != NULL)
3432                 ldiskfs_htree_unlock(hlock);
3433         else
3434                 cfs_up_write(&pobj->oo_ext_idx_sem);
3435
3436         return rc;
3437 }
3438
3439 static int
3440 osd_consistency_check(struct osd_thread_info *oti, struct osd_device *dev,
3441                       struct osd_idmap_cache *oic)
3442 {
3443         struct osd_scrub    *scrub = &dev->od_scrub;
3444         struct lu_fid       *fid   = &oic->oic_fid;
3445         struct osd_inode_id *id    = &oti->oti_id;
3446         int                  once  = 0;
3447         int                  rc;
3448         ENTRY;
3449
3450 again:
3451         rc = osd_oi_lookup(oti, dev, fid, id);
3452         if (rc != 0 && rc != -ENOENT)
3453                 RETURN(rc);
3454
3455         if (rc == 0 && osd_id_eq(id, &oic->oic_lid))
3456                 RETURN(0);
3457
3458         if (thread_is_running(&scrub->os_thread)) {
3459                 rc = osd_oii_insert(dev, oic, rc == -ENOENT);
3460                 /* There is race condition between osd_oi_lookup and OI scrub.
3461                  * The OI scrub finished just after osd_oi_lookup() failure.
3462                  * Under such case, it is unnecessary to trigger OI scrub again,
3463                  * but try to call osd_oi_lookup() again. */
3464                 if (unlikely(rc == -EAGAIN))
3465                         goto again;
3466
3467                 RETURN(rc);
3468         }
3469
3470         if (!scrub->os_no_scrub && ++once == 1) {
3471                 CDEBUG(D_LFSCK, "Trigger OI scrub by RPC for "DFID"\n",
3472                        PFID(fid));
3473                 rc = osd_scrub_start(dev);
3474                 LCONSOLE_ERROR("%.16s: trigger OI scrub by RPC for "DFID
3475                                ", rc = %d [2]\n",
3476                                LDISKFS_SB(osd_sb(dev))->s_es->s_volume_name,
3477                                PFID(fid), rc);
3478                 if (rc == 0)
3479                         goto again;
3480         }
3481
3482         RETURN(rc = -EREMCHG);
3483 }
3484
3485 /**
3486  * Calls ->lookup() to find dentry. From dentry get inode and
3487  * read inode's ea to get fid. This is required for  interoperability
3488  * mode (b11826)
3489  *
3490  * \retval   0, on success
3491  * \retval -ve, on error
3492  */
3493 static int osd_ea_lookup_rec(const struct lu_env *env, struct osd_object *obj,
3494                              struct dt_rec *rec, const struct dt_key *key)
3495 {
3496         struct inode               *dir    = obj->oo_inode;
3497         struct dentry              *dentry;
3498         struct ldiskfs_dir_entry_2 *de;
3499         struct buffer_head         *bh;
3500         struct lu_fid              *fid = (struct lu_fid *) rec;
3501         struct htree_lock          *hlock = NULL;
3502         int                         ino;
3503         int                         rc;
3504
3505         LASSERT(dir->i_op != NULL && dir->i_op->lookup != NULL);
3506
3507         dentry = osd_child_dentry_get(env, obj,
3508                                       (char *)key, strlen((char *)key));
3509
3510         if (obj->oo_hl_head != NULL) {
3511                 hlock = osd_oti_get(env)->oti_hlock;
3512                 ldiskfs_htree_lock(hlock, obj->oo_hl_head,
3513                                    dir, LDISKFS_HLOCK_LOOKUP);
3514         } else {
3515                 cfs_down_read(&obj->oo_ext_idx_sem);
3516         }
3517
3518         bh = osd_ldiskfs_find_entry(dir, dentry, &de, hlock);
3519         if (bh) {
3520                 struct osd_thread_info *oti = osd_oti_get(env);
3521                 struct osd_idmap_cache *oic = &oti->oti_cache;
3522                 struct osd_device *dev = osd_obj2dev(obj);
3523                 struct osd_scrub *scrub = &dev->od_scrub;
3524                 struct scrub_file *sf = &scrub->os_file;
3525
3526                 ino = le32_to_cpu(de->inode);
3527                 rc = osd_get_fid_from_dentry(de, rec);
3528
3529                 /* done with de, release bh */
3530                 brelse(bh);
3531                 if (rc != 0)
3532                         rc = osd_ea_fid_get(env, obj, ino, fid, &oic->oic_lid);
3533                 else
3534                         osd_id_gen(&oic->oic_lid, ino, OSD_OII_NOGEN);
3535                 if (rc != 0 || !fid_is_norm(fid)) {
3536                         fid_zero(&oic->oic_fid);
3537                         GOTO(out, rc);
3538                 }
3539
3540                 oic->oic_fid = *fid;
3541                 if ((scrub->os_pos_current <= ino) &&
3542                     (sf->sf_flags & SF_INCONSISTENT ||
3543                      ldiskfs_test_bit(osd_oi_fid2idx(dev, fid),
3544                                       sf->sf_oi_bitmap)))
3545                         rc = osd_consistency_check(oti, dev, oic);
3546         } else {
3547                 rc = -ENOENT;
3548         }
3549
3550         GOTO(out, rc);
3551
3552 out:
3553         if (hlock != NULL)
3554                 ldiskfs_htree_unlock(hlock);
3555         else
3556                 cfs_up_read(&obj->oo_ext_idx_sem);
3557         return rc;
3558 }
3559
3560 /**
3561  * Find the osd object for given fid.
3562  *
3563  * \param fid need to find the osd object having this fid
3564  *
3565  * \retval osd_object on success
3566  * \retval        -ve on error
3567  */
3568 struct osd_object *osd_object_find(const struct lu_env *env,
3569                                    struct dt_object *dt,
3570                                    const struct lu_fid *fid)
3571 {
3572         struct lu_device  *ludev = dt->do_lu.lo_dev;
3573         struct osd_object *child = NULL;
3574         struct lu_object  *luch;
3575         struct lu_object  *lo;
3576
3577         /*
3578          * at this point topdev might not exist yet
3579          * (i.e. MGS is preparing profiles). so we can
3580          * not rely on topdev and instead lookup with
3581          * our device passed as topdev. this can't work
3582          * if the object isn't cached yet (as osd doesn't
3583          * allocate lu_header). IOW, the object must be
3584          * in the cache, otherwise lu_object_alloc() crashes
3585          * -bzzz
3586          */
3587         luch = lu_object_find_at(env, ludev, fid, NULL);
3588         if (!IS_ERR(luch)) {
3589                 if (lu_object_exists(luch)) {
3590                         lo = lu_object_locate(luch->lo_header, ludev->ld_type);
3591                         if (lo != NULL)
3592                                 child = osd_obj(lo);
3593                         else
3594                                 LU_OBJECT_DEBUG(D_ERROR, env, luch,
3595                                                 "lu_object can't be located"
3596                                                 DFID"\n", PFID(fid));
3597
3598                         if (child == NULL) {
3599                                 lu_object_put(env, luch);
3600                                 CERROR("Unable to get osd_object\n");
3601                                 child = ERR_PTR(-ENOENT);
3602                         }
3603                 } else {
3604                         LU_OBJECT_DEBUG(D_ERROR, env, luch,
3605                                         "lu_object does not exists "DFID"\n",
3606                                         PFID(fid));
3607                         lu_object_put(env, luch);
3608                         child = ERR_PTR(-ENOENT);
3609                 }
3610         } else
3611                 child = (void *)luch;
3612
3613         return child;
3614 }
3615
3616 /**
3617  * Put the osd object once done with it.
3618  *
3619  * \param obj osd object that needs to be put
3620  */
3621 static inline void osd_object_put(const struct lu_env *env,
3622                                   struct osd_object *obj)
3623 {
3624         lu_object_put(env, &obj->oo_dt.do_lu);
3625 }
3626
3627 static int osd_index_declare_ea_insert(const struct lu_env *env,
3628                                        struct dt_object *dt,
3629                                        const struct dt_rec *rec,
3630                                        const struct dt_key *key,
3631                                        struct thandle *handle)
3632 {
3633         struct osd_thandle *oh;
3634         struct inode       *inode;
3635         int                 rc;
3636         ENTRY;
3637
3638         LASSERT(dt_object_exists(dt));
3639         LASSERT(handle != NULL);
3640
3641         oh = container_of0(handle, struct osd_thandle, ot_super);
3642         LASSERT(oh->ot_handle == NULL);
3643
3644         OSD_DECLARE_OP(oh, insert);
3645         oh->ot_credits += osd_dto_credits_noquota[DTO_INDEX_INSERT];
3646
3647         inode = osd_dt_obj(dt)->oo_inode;
3648         LASSERT(inode);
3649
3650         /* We ignore block quota on meta pool (MDTs), so needn't
3651          * calculate how many blocks will be consumed by this index
3652          * insert */
3653         rc = osd_declare_inode_qid(env, inode->i_uid, inode->i_gid, 0, oh,
3654                                    true, true, NULL, false);
3655         RETURN(rc);
3656 }
3657
3658 /**
3659  * Index add function for interoperability mode (b11826).
3660  * It will add the directory entry.This entry is needed to
3661  * maintain name->fid mapping.
3662  *
3663  * \param key it is key i.e. file entry to be inserted
3664  * \param rec it is value of given key i.e. fid
3665  *
3666  * \retval   0, on success
3667  * \retval -ve, on error
3668  */
3669 static int osd_index_ea_insert(const struct lu_env *env, struct dt_object *dt,
3670                                const struct dt_rec *rec,
3671                                const struct dt_key *key, struct thandle *th,
3672                                struct lustre_capa *capa, int ignore_quota)
3673 {
3674         struct osd_object *obj   = osd_dt_obj(dt);
3675         struct lu_fid     *fid   = (struct lu_fid *) rec;
3676         const char        *name  = (const char *)key;
3677         struct osd_object *child;
3678 #ifdef HAVE_QUOTA_SUPPORT
3679         cfs_cap_t          save  = cfs_curproc_cap_pack();
3680 #endif
3681         int                rc;
3682
3683         ENTRY;
3684
3685         LASSERT(osd_invariant(obj));
3686         LASSERT(dt_object_exists(dt));
3687         LASSERT(th != NULL);
3688
3689         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_INSERT))
3690                 RETURN(-EACCES);
3691
3692         child = osd_object_find(env, dt, fid);
3693         if (!IS_ERR(child)) {
3694 #ifdef HAVE_QUOTA_SUPPORT
3695                 if (ignore_quota)
3696                         cfs_cap_raise(CFS_CAP_SYS_RESOURCE);
3697                 else
3698                         cfs_cap_lower(CFS_CAP_SYS_RESOURCE);
3699 #endif
3700                 rc = osd_ea_add_rec(env, obj, child->oo_inode, name, rec, th);
3701 #ifdef HAVE_QUOTA_SUPPORT
3702                 cfs_curproc_cap_unpack(save);
3703 #endif
3704                 osd_object_put(env, child);
3705         } else {
3706                 rc = PTR_ERR(child);
3707         }
3708
3709         LASSERT(osd_invariant(obj));
3710         RETURN(rc);
3711 }
3712
3713 /**
3714  *  Initialize osd Iterator for given osd index object.
3715  *
3716  *  \param  dt      osd index object
3717  */
3718
3719 static struct dt_it *osd_it_iam_init(const struct lu_env *env,
3720                                      struct dt_object *dt,
3721                                      __u32 unused,
3722                                      struct lustre_capa *capa)
3723 {
3724         struct osd_it_iam      *it;
3725         struct osd_thread_info *oti = osd_oti_get(env);
3726         struct osd_object      *obj = osd_dt_obj(dt);
3727         struct lu_object       *lo  = &dt->do_lu;
3728         struct iam_path_descr  *ipd;
3729         struct iam_container   *bag = &obj->oo_dir->od_container;
3730
3731         LASSERT(lu_object_exists(lo));
3732
3733         if (osd_object_auth(env, dt, capa, CAPA_OPC_BODY_READ))
3734                 return ERR_PTR(-EACCES);
3735
3736         it = &oti->oti_it;
3737         ipd = osd_it_ipd_get(env, bag);
3738         if (likely(ipd != NULL)) {
3739                 it->oi_obj = obj;
3740                 it->oi_ipd = ipd;
3741                 lu_object_get(lo);
3742                 iam_it_init(&it->oi_it, bag, IAM_IT_MOVE, ipd);
3743                 return (struct dt_it *)it;
3744         }
3745         return ERR_PTR(-ENOMEM);
3746 }
3747
3748 /**
3749  * free given Iterator.
3750  */
3751
3752 static void osd_it_iam_fini(const struct lu_env *env, struct dt_it *di)
3753 {
3754         struct osd_it_iam *it = (struct osd_it_iam *)di;
3755         struct osd_object *obj = it->oi_obj;
3756
3757         iam_it_fini(&it->oi_it);
3758         osd_ipd_put(env, &obj->oo_dir->od_container, it->oi_ipd);
3759         lu_object_put(env, &obj->oo_dt.do_lu);
3760 }
3761
3762 /**
3763  *  Move Iterator to record specified by \a key
3764  *
3765  *  \param  di      osd iterator
3766  *  \param  key     key for index
3767  *
3768  *  \retval +ve  di points to record with least key not larger than key
3769  *  \retval  0   di points to exact matched key
3770  *  \retval -ve  failure
3771  */
3772
3773 static int osd_it_iam_get(const struct lu_env *env,
3774                           struct dt_it *di, const struct dt_key *key)
3775 {
3776         struct osd_thread_info  *oti = osd_oti_get(env);
3777         struct osd_it_iam       *it = (struct osd_it_iam *)di;
3778
3779         if (fid_is_quota(lu_object_fid(&it->oi_obj->oo_dt.do_lu))) {
3780                 /* swab quota uid/gid */
3781                 oti->oti_quota_id = cpu_to_le64(*((__u64 *)key));
3782                 key = (struct dt_key *)&oti->oti_quota_id;
3783         }
3784
3785         return iam_it_get(&it->oi_it, (const struct iam_key *)key);
3786 }
3787
3788 /**
3789  *  Release Iterator
3790  *
3791  *  \param  di      osd iterator
3792  */
3793
3794 static void osd_it_iam_put(const struct lu_env *env, struct dt_it *di)
3795 {
3796         struct osd_it_iam *it = (struct osd_it_iam *)di;
3797
3798         iam_it_put(&it->oi_it);
3799 }
3800
3801 /**
3802  *  Move iterator by one record
3803  *
3804  *  \param  di      osd iterator
3805  *
3806  *  \retval +1   end of container reached
3807  *  \retval  0   success
3808  *  \retval -ve  failure
3809  */
3810
3811 static int osd_it_iam_next(const struct lu_env *env, struct dt_it *di)
3812 {
3813         struct osd_it_iam *it = (struct osd_it_iam *)di;
3814
3815         return iam_it_next(&it->oi_it);
3816 }
3817
3818 /**
3819  * Return pointer to the key under iterator.
3820  */
3821
3822 static struct dt_key *osd_it_iam_key(const struct lu_env *env,
3823                                  const struct dt_it *di)
3824 {
3825         struct osd_thread_info *oti = osd_oti_get(env);
3826         struct osd_it_iam      *it = (struct osd_it_iam *)di;
3827         struct osd_object      *obj = it->oi_obj;
3828         struct dt_key          *key;
3829
3830         key = (struct dt_key *)iam_it_key_get(&it->oi_it);
3831
3832         if (!IS_ERR(key) && fid_is_quota(lu_object_fid(&obj->oo_dt.do_lu))) {
3833                 /* swab quota uid/gid */
3834                 oti->oti_quota_id = le64_to_cpu(*((__u64 *)key));
3835                 key = (struct dt_key *)&oti->oti_quota_id;
3836         }
3837
3838         return key;
3839 }
3840
3841 /**
3842  * Return size of key under iterator (in bytes)
3843  */
3844
3845 static int osd_it_iam_key_size(const struct lu_env *env, const struct dt_it *di)
3846 {
3847         struct osd_it_iam *it = (struct osd_it_iam *)di;
3848
3849         return iam_it_key_size(&it->oi_it);
3850 }
3851
3852 static inline void osd_it_append_attrs(struct lu_dirent *ent, __u32 attr,
3853                                        int len, __u16 type)
3854 {
3855         struct luda_type *lt;
3856         const unsigned    align = sizeof(struct luda_type) - 1;
3857
3858         /* check if file type is required */
3859         if (attr & LUDA_TYPE) {
3860                         len = (len + align) & ~align;
3861
3862                         lt = (void *) ent->lde_name + len;
3863                         lt->lt_type = cpu_to_le16(CFS_DTTOIF(type));
3864                         ent->lde_attrs |= LUDA_TYPE;
3865         }
3866
3867         ent->lde_attrs = cpu_to_le32(ent->lde_attrs);
3868 }
3869
3870 /**
3871  * build lu direct from backend fs dirent.
3872  */
3873
3874 static inline void osd_it_pack_dirent(struct lu_dirent *ent,
3875                                       struct lu_fid *fid, __u64 offset,
3876                                       char *name, __u16 namelen,
3877                                       __u16 type, __u32 attr)
3878 {
3879         fid_cpu_to_le(&ent->lde_fid, fid);
3880         ent->lde_attrs = LUDA_FID;
3881
3882         ent->lde_hash = cpu_to_le64(offset);
3883         ent->lde_reclen = cpu_to_le16(lu_dirent_calc_size(namelen, attr));
3884
3885         strncpy(ent->lde_name, name, namelen);
3886         ent->lde_namelen = cpu_to_le16(namelen);
3887
3888         /* append lustre attributes */
3889         osd_it_append_attrs(ent, attr, namelen, type);
3890 }
3891
3892 /**
3893  * Return pointer to the record under iterator.
3894  */
3895 static int osd_it_iam_rec(const struct lu_env *env,
3896                           const struct dt_it *di,
3897                           struct dt_rec *dtrec, __u32 attr)
3898 {
3899         struct osd_it_iam      *it   = (struct osd_it_iam *)di;
3900         struct osd_thread_info *info = osd_oti_get(env);
3901         ENTRY;
3902
3903         if (S_ISDIR(it->oi_obj->oo_inode->i_mode)) {
3904                 const struct osd_fid_pack *rec;
3905                 struct lu_fid             *fid = &info->oti_fid;
3906                 struct lu_dirent          *lde = (struct lu_dirent *)dtrec;
3907                 char                      *name;
3908                 int                        namelen;
3909                 __u64                      hash;
3910                 int                        rc;
3911
3912                 name = (char *)iam_it_key_get(&it->oi_it);
3913                 if (IS_ERR(name))
3914                         RETURN(PTR_ERR(name));
3915
3916                 namelen = iam_it_key_size(&it->oi_it);
3917
3918                 rec = (const struct osd_fid_pack *)iam_it_rec_get(&it->oi_it);
3919                 if (IS_ERR(rec))
3920                         RETURN(PTR_ERR(rec));
3921
3922                 rc = osd_fid_unpack(fid, rec);
3923                 if (rc)
3924                         RETURN(rc);
3925
3926                 hash = iam_it_store(&it->oi_it);
3927
3928                 /* IAM does not store object type in IAM index (dir) */
3929                 osd_it_pack_dirent(lde, fid, hash, name, namelen,
3930                                    0, LUDA_FID);
3931         } else if (fid_is_quota(lu_object_fid(&it->oi_obj->oo_dt.do_lu))) {
3932                 iam_reccpy(&it->oi_it.ii_path.ip_leaf,
3933                            (struct iam_rec *)dtrec);
3934                 osd_quota_unpack(it->oi_obj, dtrec);
3935         } else {
3936                 iam_reccpy(&it->oi_it.ii_path.ip_leaf,
3937                            (struct iam_rec *)dtrec);
3938         }
3939
3940         RETURN(0);
3941 }
3942
3943 /**
3944  * Returns cookie for current Iterator position.
3945  */
3946 static __u64 osd_it_iam_store(const struct lu_env *env, const struct dt_it *di)
3947 {
3948         struct osd_it_iam *it = (struct osd_it_iam *)di;
3949
3950         return iam_it_store(&it->oi_it);
3951 }
3952
3953 /**
3954  * Restore iterator from cookie.
3955  *
3956  * \param  di      osd iterator
3957  * \param  hash    Iterator location cookie
3958  *
3959  * \retval +ve  di points to record with least key not larger than key.
3960  * \retval  0   di points to exact matched key
3961  * \retval -ve  failure
3962  */
3963
3964 static int osd_it_iam_load(const struct lu_env *env,
3965                            const struct dt_it *di, __u64 hash)
3966 {
3967         struct osd_it_iam *it = (struct osd_it_iam *)di;
3968
3969         return iam_it_load(&it->oi_it, hash);
3970 }
3971
3972 static const struct dt_index_operations osd_index_iam_ops = {
3973         .dio_lookup         = osd_index_iam_lookup,
3974         .dio_declare_insert = osd_index_declare_iam_insert,
3975         .dio_insert         = osd_index_iam_insert,
3976         .dio_declare_delete = osd_index_declare_iam_delete,
3977         .dio_delete         = osd_index_iam_delete,
3978         .dio_it     = {
3979                 .init     = osd_it_iam_init,
3980                 .fini     = osd_it_iam_fini,
3981                 .get      = osd_it_iam_get,
3982                 .put      = osd_it_iam_put,
3983                 .next     = osd_it_iam_next,
3984                 .key      = osd_it_iam_key,
3985                 .key_size = osd_it_iam_key_size,
3986                 .rec      = osd_it_iam_rec,
3987                 .store    = osd_it_iam_store,
3988                 .load     = osd_it_iam_load
3989         }
3990 };
3991
3992 /**
3993  * Creates or initializes iterator context.
3994  *
3995  * \retval struct osd_it_ea, iterator structure on success
3996  *
3997  */
3998 static struct dt_it *osd_it_ea_init(const struct lu_env *env,
3999                                     struct dt_object *dt,
4000                                     __u32 attr,
4001                                     struct lustre_capa *capa)
4002 {
4003         struct osd_object       *obj  = osd_dt_obj(dt);
4004         struct osd_thread_info  *info = osd_oti_get(env);
4005         struct osd_it_ea        *it   = &info->oti_it_ea;
4006         struct lu_object        *lo   = &dt->do_lu;
4007         struct dentry           *obj_dentry = &info->oti_it_dentry;
4008         ENTRY;
4009         LASSERT(lu_object_exists(lo));
4010
4011         obj_dentry->d_inode = obj->oo_inode;
4012         obj_dentry->d_sb = osd_sb(osd_obj2dev(obj));
4013         obj_dentry->d_name.hash = 0;
4014
4015         it->oie_rd_dirent       = 0;
4016         it->oie_it_dirent       = 0;
4017         it->oie_dirent          = NULL;
4018         it->oie_buf             = info->oti_it_ea_buf;
4019         it->oie_obj             = obj;
4020         it->oie_file.f_pos      = 0;
4021         it->oie_file.f_dentry   = obj_dentry;
4022         if (attr & LUDA_64BITHASH)
4023                 it->oie_file.f_mode |= FMODE_64BITHASH;
4024         else
4025                 it->oie_file.f_mode |= FMODE_32BITHASH;
4026         it->oie_file.f_mapping    = obj->oo_inode->i_mapping;
4027         it->oie_file.f_op         = obj->oo_inode->i_fop;
4028         it->oie_file.private_data = NULL;
4029         lu_object_get(lo);
4030         RETURN((struct dt_it *) it);
4031 }
4032
4033 /**
4034  * Destroy or finishes iterator context.
4035  *
4036  * \param di iterator structure to be destroyed
4037  */
4038 static void osd_it_ea_fini(const struct lu_env *env, struct dt_it *di)
4039 {
4040         struct osd_it_ea     *it   = (struct osd_it_ea *)di;
4041         struct osd_object    *obj  = it->oie_obj;
4042         struct inode       *inode  = obj->oo_inode;
4043
4044         ENTRY;
4045         it->oie_file.f_op->release(inode, &it->oie_file);
4046         lu_object_put(env, &obj->oo_dt.do_lu);
4047         EXIT;
4048 }
4049
4050 /**
4051  * It position the iterator at given key, so that next lookup continues from
4052  * that key Or it is similar to dio_it->load() but based on a key,
4053  * rather than file position.
4054  *
4055  * As a special convention, osd_it_ea_get(env, di, "") has to rewind iterator
4056  * to the beginning.
4057  *
4058  * TODO: Presently return +1 considering it is only used by mdd_dir_is_empty().
4059  */
4060 static int osd_it_ea_get(const struct lu_env *env,
4061                          struct dt_it *di, const struct dt_key *key)
4062 {
4063         struct osd_it_ea     *it   = (struct osd_it_ea *)di;
4064
4065         ENTRY;
4066         LASSERT(((const char *)key)[0] == '\0');
4067         it->oie_file.f_pos      = 0;
4068         it->oie_rd_dirent       = 0;
4069         it->oie_it_dirent       = 0;
4070         it->oie_dirent          = NULL;
4071
4072         RETURN(+1);
4073 }
4074
4075 /**
4076  * Does nothing
4077  */
4078 static void osd_it_ea_put(const struct lu_env *env, struct dt_it *di)
4079 {
4080 }
4081
4082 /**
4083  * It is called internally by ->readdir(). It fills the
4084  * iterator's in-memory data structure with required
4085  * information i.e. name, namelen, rec_size etc.
4086  *
4087  * \param buf in which information to be filled in.
4088  * \param name name of the file in given dir
4089  *
4090  * \retval 0 on success
4091  * \retval 1 on buffer full
4092  */
4093 static int osd_ldiskfs_filldir(char *buf, const char *name, int namelen,
4094                                loff_t offset, __u64 ino,
4095                                unsigned d_type)
4096 {
4097         struct osd_it_ea        *it   = (struct osd_it_ea *)buf;
4098         struct osd_it_ea_dirent *ent  = it->oie_dirent;
4099         struct lu_fid           *fid  = &ent->oied_fid;
4100         struct osd_fid_pack     *rec;
4101         ENTRY;
4102
4103         /* this should never happen */
4104         if (unlikely(namelen == 0 || namelen > LDISKFS_NAME_LEN)) {
4105                 CERROR("ldiskfs return invalid namelen %d\n", namelen);
4106                 RETURN(-EIO);
4107         }
4108
4109         if ((void *) ent - it->oie_buf + sizeof(*ent) + namelen >
4110             OSD_IT_EA_BUFSIZE)
4111                 RETURN(1);
4112
4113         if (d_type & LDISKFS_DIRENT_LUFID) {
4114                 rec = (struct osd_fid_pack*) (name + namelen + 1);
4115
4116                 if (osd_fid_unpack(fid, rec) != 0)
4117                         fid_zero(fid);
4118
4119                 d_type &= ~LDISKFS_DIRENT_LUFID;
4120         } else {
4121                 fid_zero(fid);
4122         }
4123
4124         ent->oied_ino     = ino;
4125         ent->oied_off     = offset;
4126         ent->oied_namelen = namelen;
4127         ent->oied_type    = d_type;
4128
4129         memcpy(ent->oied_name, name, namelen);
4130
4131         it->oie_rd_dirent++;
4132         it->oie_dirent = (void *) ent + cfs_size_round(sizeof(*ent) + namelen);
4133         RETURN(0);
4134 }
4135
4136 /**
4137  * Calls ->readdir() to load a directory entry at a time
4138  * and stored it in iterator's in-memory data structure.
4139  *
4140  * \param di iterator's in memory structure
4141  *
4142  * \retval   0 on success
4143  * \retval -ve on error
4144  */
4145 static int osd_ldiskfs_it_fill(const struct lu_env *env,
4146                                const struct dt_it *di)
4147 {
4148         struct osd_it_ea   *it    = (struct osd_it_ea *)di;
4149         struct osd_object  *obj   = it->oie_obj;
4150         struct inode       *inode = obj->oo_inode;
4151         struct htree_lock  *hlock = NULL;
4152         int                 result = 0;
4153
4154         ENTRY;
4155         it->oie_dirent = it->oie_buf;
4156         it->oie_rd_dirent = 0;
4157
4158         if (obj->oo_hl_head != NULL) {
4159                 hlock = osd_oti_get(env)->oti_hlock;
4160                 ldiskfs_htree_lock(hlock, obj->oo_hl_head,
4161                                    inode, LDISKFS_HLOCK_READDIR);
4162         } else {
4163                 cfs_down_read(&obj->oo_ext_idx_sem);
4164         }
4165
4166         result = inode->i_fop->readdir(&it->oie_file, it,
4167                                        (filldir_t) osd_ldiskfs_filldir);
4168
4169         if (hlock != NULL)
4170                 ldiskfs_htree_unlock(hlock);
4171         else
4172                 cfs_up_read(&obj->oo_ext_idx_sem);
4173
4174         if (it->oie_rd_dirent == 0) {
4175                 result = -EIO;
4176         } else {
4177                 it->oie_dirent = it->oie_buf;
4178                 it->oie_it_dirent = 1;
4179         }
4180
4181         RETURN(result);
4182 }
4183
4184 /**
4185  * It calls osd_ldiskfs_it_fill() which will use ->readdir()
4186  * to load a directory entry at a time and stored it in
4187  * iterator's in-memory data structure.
4188  *
4189  * \param di iterator's in memory structure
4190  *
4191  * \retval +ve iterator reached to end
4192  * \retval   0 iterator not reached to end
4193  * \retval -ve on error
4194  */
4195 static int osd_it_ea_next(const struct lu_env *env, struct dt_it *di)
4196 {
4197         struct osd_it_ea *it = (struct osd_it_ea *)di;
4198         int rc;
4199
4200         ENTRY;
4201
4202         if (it->oie_it_dirent < it->oie_rd_dirent) {
4203                 it->oie_dirent =
4204                         (void *) it->oie_dirent +
4205                         cfs_size_round(sizeof(struct osd_it_ea_dirent) +
4206                                        it->oie_dirent->oied_namelen);
4207                 it->oie_it_dirent++;
4208                 RETURN(0);
4209         } else {
4210                 if (it->oie_file.f_pos == ldiskfs_get_htree_eof(&it->oie_file))
4211                         rc = +1;
4212                 else
4213                         rc = osd_ldiskfs_it_fill(env, di);
4214         }
4215
4216         RETURN(rc);
4217 }
4218
4219 /**
4220  * Returns the key at current position from iterator's in memory structure.
4221  *
4222  * \param di iterator's in memory structure
4223  *
4224  * \retval key i.e. struct dt_key on success
4225  */
4226 static struct dt_key *osd_it_ea_key(const struct lu_env *env,
4227                                     const struct dt_it *di)
4228 {
4229         struct osd_it_ea *it = (struct osd_it_ea *)di;
4230
4231         return (struct dt_key *)it->oie_dirent->oied_name;
4232 }
4233
4234 /**
4235  * Returns the key's size at current position from iterator's in memory structure.
4236  *
4237  * \param di iterator's in memory structure
4238  *
4239  * \retval key_size i.e. struct dt_key on success
4240  */
4241 static int osd_it_ea_key_size(const struct lu_env *env, const struct dt_it *di)
4242 {
4243         struct osd_it_ea *it = (struct osd_it_ea *)di;
4244
4245         return it->oie_dirent->oied_namelen;
4246 }
4247
4248
4249 /**
4250  * Returns the value (i.e. fid/igif) at current position from iterator's
4251  * in memory structure.
4252  *
4253  * \param di struct osd_it_ea, iterator's in memory structure
4254  * \param attr attr requested for dirent.
4255  * \param lde lustre dirent
4256  *
4257  * \retval   0 no error and \param lde has correct lustre dirent.
4258  * \retval -ve on error
4259  */
4260 static inline int osd_it_ea_rec(const struct lu_env *env,
4261                                 const struct dt_it *di,
4262                                 struct dt_rec *dtrec, __u32 attr)
4263 {
4264         struct osd_it_ea       *it    = (struct osd_it_ea *)di;
4265         struct osd_object      *obj   = it->oie_obj;
4266         struct osd_device      *dev   = osd_obj2dev(obj);
4267         struct osd_scrub       *scrub = &dev->od_scrub;
4268         struct scrub_file      *sf    = &scrub->os_file;
4269         struct osd_thread_info *oti   = osd_oti_get(env);
4270         struct osd_idmap_cache *oic   = &oti->oti_cache;
4271         struct lu_fid          *fid   = &it->oie_dirent->oied_fid;
4272         struct lu_dirent       *lde   = (struct lu_dirent *)dtrec;
4273         __u32                   ino   = it->oie_dirent->oied_ino;
4274         int                     rc    = 0;
4275         ENTRY;
4276
4277         if (!fid_is_sane(fid)) {
4278                 rc = osd_ea_fid_get(env, obj, ino, fid, &oic->oic_lid);
4279                 if (rc != 0)
4280                         RETURN(rc);
4281         } else {
4282                 osd_id_gen(&oic->oic_lid, ino, OSD_OII_NOGEN);
4283         }
4284
4285         osd_it_pack_dirent(lde, fid, it->oie_dirent->oied_off,
4286                            it->oie_dirent->oied_name,
4287                            it->oie_dirent->oied_namelen,
4288                            it->oie_dirent->oied_type, attr);
4289         if (!fid_is_norm(fid)) {
4290                 fid_zero(&oic->oic_fid);
4291                 RETURN(0);
4292         }
4293
4294         oic->oic_fid = *fid;
4295         if ((scrub->os_pos_current <= ino) &&
4296             (sf->sf_flags & SF_INCONSISTENT ||
4297              ldiskfs_test_bit(osd_oi_fid2idx(dev, fid), sf->sf_oi_bitmap)))
4298                 rc = osd_consistency_check(oti, dev, oic);
4299
4300         RETURN(rc);
4301 }
4302
4303 /**
4304  * Returns a cookie for current position of the iterator head, so that
4305  * user can use this cookie to load/start the iterator next time.
4306  *
4307  * \param di iterator's in memory structure
4308  *
4309  * \retval cookie for current position, on success
4310  */
4311 static __u64 osd_it_ea_store(const struct lu_env *env, const struct dt_it *di)
4312 {
4313         struct osd_it_ea *it = (struct osd_it_ea *)di;
4314
4315         return it->oie_dirent->oied_off;
4316 }
4317
4318 /**
4319  * It calls osd_ldiskfs_it_fill() which will use ->readdir()
4320  * to load a directory entry at a time and stored it i inn,
4321  * in iterator's in-memory data structure.
4322  *
4323  * \param di struct osd_it_ea, iterator's in memory structure
4324  *
4325  * \retval +ve on success
4326  * \retval -ve on error
4327  */
4328 static int osd_it_ea_load(const struct lu_env *env,
4329                           const struct dt_it *di, __u64 hash)
4330 {
4331         struct osd_it_ea *it = (struct osd_it_ea *)di;
4332         int rc;
4333
4334         ENTRY;
4335         it->oie_file.f_pos = hash;
4336
4337         rc =  osd_ldiskfs_it_fill(env, di);
4338         if (rc == 0)
4339                 rc = +1;
4340
4341         RETURN(rc);
4342 }
4343
4344 /**
4345  * Index lookup function for interoperability mode (b11826).
4346  *
4347  * \param key,  key i.e. file name to be searched
4348  *
4349  * \retval +ve, on success
4350  * \retval -ve, on error
4351  */
4352 static int osd_index_ea_lookup(const struct lu_env *env, struct dt_object *dt,
4353                                struct dt_rec *rec, const struct dt_key *key,
4354                                struct lustre_capa *capa)
4355 {
4356         struct osd_object *obj = osd_dt_obj(dt);
4357         int rc = 0;
4358
4359         ENTRY;
4360
4361         LASSERT(S_ISDIR(obj->oo_inode->i_mode));
4362         LINVRNT(osd_invariant(obj));
4363
4364         if (osd_object_auth(env, dt, capa, CAPA_OPC_INDEX_LOOKUP))
4365                 return -EACCES;
4366
4367         rc = osd_ea_lookup_rec(env, obj, rec, key);
4368
4369         if (rc == 0)
4370                 rc = +1;
4371         RETURN(rc);
4372 }
4373
4374 /**
4375  * Index and Iterator operations for interoperability
4376  * mode (i.e. to run 2.0 mds on 1.8 disk) (b11826)
4377  */
4378 static const struct dt_index_operations osd_index_ea_ops = {
4379         .dio_lookup         = osd_index_ea_lookup,
4380         .dio_declare_insert = osd_index_declare_ea_insert,
4381         .dio_insert         = osd_index_ea_insert,
4382         .dio_declare_delete = osd_index_declare_ea_delete,
4383         .dio_delete         = osd_index_ea_delete,
4384         .dio_it     = {
4385                 .init     = osd_it_ea_init,
4386                 .fini     = osd_it_ea_fini,
4387                 .get      = osd_it_ea_get,
4388                 .put      = osd_it_ea_put,
4389                 .next     = osd_it_ea_next,
4390                 .key      = osd_it_ea_key,
4391                 .key_size = osd_it_ea_key_size,
4392                 .rec      = osd_it_ea_rec,
4393                 .store    = osd_it_ea_store,
4394                 .load     = osd_it_ea_load
4395         }
4396 };
4397
4398 static void *osd_key_init(const struct lu_context *ctx,
4399                           struct lu_context_key *key)
4400 {
4401         struct osd_thread_info *info;
4402
4403         OBD_ALLOC_PTR(info);
4404         if (info == NULL)
4405                 return ERR_PTR(-ENOMEM);
4406
4407         OBD_ALLOC(info->oti_it_ea_buf, OSD_IT_EA_BUFSIZE);
4408         if (info->oti_it_ea_buf == NULL)
4409                 goto out_free_info;
4410
4411         info->oti_env = container_of(ctx, struct lu_env, le_ctx);
4412
4413         info->oti_hlock = ldiskfs_htree_lock_alloc();
4414         if (info->oti_hlock == NULL)
4415                 goto out_free_ea;
4416
4417         return info;
4418
4419  out_free_ea:
4420         OBD_FREE(info->oti_it_ea_buf, OSD_IT_EA_BUFSIZE);
4421  out_free_info:
4422         OBD_FREE_PTR(info);
4423         return ERR_PTR(-ENOMEM);
4424 }
4425
4426 static void osd_key_fini(const struct lu_context *ctx,
4427                          struct lu_context_key *key, void* data)
4428 {
4429         struct osd_thread_info *info = data;
4430
4431         if (info->oti_hlock != NULL)
4432                 ldiskfs_htree_lock_free(info->oti_hlock);
4433         OBD_FREE(info->oti_it_ea_buf, OSD_IT_EA_BUFSIZE);
4434         OBD_FREE_PTR(info);
4435 }
4436
4437 static void osd_key_exit(const struct lu_context *ctx,
4438                          struct lu_context_key *key, void *data)
4439 {
4440         struct osd_thread_info *info = data;
4441
4442         LASSERT(info->oti_r_locks == 0);
4443         LASSERT(info->oti_w_locks == 0);
4444         LASSERT(info->oti_txns    == 0);
4445 }
4446
4447 /* type constructor/destructor: osd_type_init, osd_type_fini */
4448 LU_TYPE_INIT_FINI(osd, &osd_key);
4449
4450 struct lu_context_key osd_key = {
4451         .lct_tags = LCT_DT_THREAD | LCT_MD_THREAD | LCT_MG_THREAD | LCT_LOCAL,
4452         .lct_init = osd_key_init,
4453         .lct_fini = osd_key_fini,
4454         .lct_exit = osd_key_exit
4455 };
4456
4457
4458 static int osd_device_init(const struct lu_env *env, struct lu_device *d,
4459                            const char *name, struct lu_device *next)
4460 {
4461         struct osd_device *osd = osd_dev(d);
4462
4463         strncpy(osd->od_svname, name, MAX_OBD_NAME);
4464         return osd_procfs_init(osd, name);
4465 }
4466
4467 static int osd_shutdown(const struct lu_env *env, struct osd_device *o)
4468 {
4469         ENTRY;
4470
4471         osd_scrub_cleanup(env, o);
4472
4473         if (o->od_fsops) {
4474                 fsfilt_put_ops(o->od_fsops);
4475                 o->od_fsops = NULL;
4476         }
4477
4478         /* shutdown quota slave instance associated with the device */
4479         if (o->od_quota_slave != NULL) {
4480                 qsd_fini(env, o->od_quota_slave);
4481                 o->od_quota_slave = NULL;
4482         }
4483
4484         RETURN(0);
4485 }
4486
4487 static int osd_mount(const struct lu_env *env,
4488                      struct osd_device *o, struct lustre_cfg *cfg)
4489 {
4490         const char              *name  = lustre_cfg_string(cfg, 0);
4491         const char              *dev  = lustre_cfg_string(cfg, 1);
4492         const char              *opts;
4493         unsigned long            page, s_flags, lmd_flags = 0;
4494         struct page             *__page;
4495         struct file_system_type *type;
4496         char                    *options = NULL;
4497         char                    *str;
4498         int                       rc = 0;
4499         ENTRY;
4500
4501         if (o->od_mnt != NULL)
4502                 RETURN(0);
4503
4504         o->od_fsops = fsfilt_get_ops(mt_str(LDD_MT_LDISKFS));
4505         if (o->od_fsops == NULL) {
4506                 CERROR("Can't find fsfilt_ldiskfs\n");
4507                 RETURN(-ENOTSUPP);
4508         }
4509
4510         OBD_PAGE_ALLOC(__page, CFS_ALLOC_STD);
4511         if (__page == NULL)
4512                 RETURN(-ENOMEM);
4513
4514         str = lustre_cfg_string(cfg, 2);
4515         s_flags = simple_strtoul(str, NULL, 0);
4516         str = strstr(str, ":");
4517         if (str)
4518                 lmd_flags = simple_strtoul(str + 1, NULL, 0);
4519         opts = lustre_cfg_string(cfg, 3);
4520         page = (unsigned long)cfs_page_address(__page);
4521         options = (char *)page;
4522         *options = '\0';
4523         if (opts == NULL)
4524                 strcat(options, "user_xattr,acl");
4525         else
4526                 strcat(options, opts);
4527
4528         /* Glom up mount options */
4529         if (*options != '\0')
4530                 strcat(options, ",");
4531         strlcat(options, "no_mbcache", CFS_PAGE_SIZE);
4532
4533         type = get_fs_type("ldiskfs");
4534         if (!type) {
4535                 CERROR("%s: cannot find ldiskfs module\n", name);
4536                 GOTO(out, rc = -ENODEV);
4537         }
4538
4539         o->od_mnt = vfs_kern_mount(type, s_flags, dev, options);
4540         cfs_module_put(type->owner);
4541
4542         if (IS_ERR(o->od_mnt)) {
4543                 rc = PTR_ERR(o->od_mnt);
4544                 CERROR("%s: can't mount %s: %d\n", name, dev, rc);
4545                 o->od_mnt = NULL;
4546                 GOTO(out, rc);
4547         }
4548
4549         if (lvfs_check_rdonly(o->od_mnt->mnt_sb->s_bdev)) {
4550                 CERROR("%s: underlying device %s is marked as read-only. "
4551                        "Setup failed\n", name, dev);
4552                 mntput(o->od_mnt);
4553                 o->od_mnt = NULL;
4554                 GOTO(out, rc = -EROFS);
4555         }
4556
4557         if (!LDISKFS_HAS_COMPAT_FEATURE(o->od_mnt->mnt_sb,
4558             LDISKFS_FEATURE_COMPAT_HAS_JOURNAL)) {
4559                 CERROR("%s: device %s is mounted w/o journal\n", name, dev);
4560                 mntput(o->od_mnt);
4561                 o->od_mnt = NULL;
4562                 GOTO(out, rc = -EINVAL);
4563         }
4564
4565         if (lmd_flags & LMD_FLG_IAM) {
4566                 o->od_iop_mode = 0;
4567                 LCONSOLE_WARN("%s: OSD: IAM mode enabled\n", name);
4568         } else
4569                 o->od_iop_mode = 1;
4570         if (lmd_flags & LMD_FLG_NOSCRUB)
4571                 o->od_scrub.os_no_scrub = 1;
4572
4573 out:
4574         if (__page)
4575                 OBD_PAGE_FREE(__page);
4576
4577         RETURN(rc);
4578 }
4579
4580 static struct lu_device *osd_device_fini(const struct lu_env *env,
4581                                          struct lu_device *d)
4582 {
4583         int rc;
4584         ENTRY;
4585
4586         rc = osd_shutdown(env, osd_dev(d));
4587
4588         osd_compat_fini(osd_dev(d));
4589
4590         shrink_dcache_sb(osd_sb(osd_dev(d)));
4591         osd_sync(env, lu2dt_dev(d));
4592
4593         rc = osd_procfs_fini(osd_dev(d));
4594         if (rc) {
4595                 CERROR("proc fini error %d \n", rc);
4596                 RETURN (ERR_PTR(rc));
4597         }
4598
4599         if (osd_dev(d)->od_mnt) {
4600                 mntput(osd_dev(d)->od_mnt);
4601                 osd_dev(d)->od_mnt = NULL;
4602         }
4603
4604         RETURN(NULL);
4605 }
4606
4607 static int osd_device_init0(const struct lu_env *env,
4608                             struct osd_device *o,
4609                             struct lustre_cfg *cfg)
4610 {
4611         struct lu_device        *l = osd2lu_dev(o);
4612         struct osd_thread_info *info;
4613         int                     rc;
4614
4615         /* if the module was re-loaded, env can loose its keys */
4616         rc = lu_env_refill((struct lu_env *) env);
4617         if (rc)
4618                 GOTO(out, rc);
4619         info = osd_oti_get(env);
4620         LASSERT(info);
4621
4622         l->ld_ops = &osd_lu_ops;
4623         o->od_dt_dev.dd_ops = &osd_dt_ops;
4624
4625         cfs_spin_lock_init(&o->od_osfs_lock);
4626         cfs_mutex_init(&o->od_otable_mutex);
4627         o->od_osfs_age = cfs_time_shift_64(-1000);
4628
4629         o->od_capa_hash = init_capa_hash();
4630         if (o->od_capa_hash == NULL)
4631                 GOTO(out, rc = -ENOMEM);
4632
4633         o->od_read_cache = 1;
4634         o->od_writethrough_cache = 1;
4635
4636         rc = osd_mount(env, o, cfg);
4637         if (rc)
4638                 GOTO(out_capa, rc);
4639
4640         /* setup scrub, including OI files initialization */
4641         rc = osd_scrub_setup(env, o);
4642         if (rc < 0)
4643                 GOTO(out_mnt, rc);
4644
4645         strncpy(o->od_svname, lustre_cfg_string(cfg, 4),
4646                         sizeof(o->od_svname) - 1);
4647
4648         if (strstr(o->od_svname, "-OST")) {
4649                 rc = osd_compat_init(o);
4650                 if (rc != 0)
4651                         GOTO(out_mnt, rc);
4652         }
4653
4654         rc = lu_site_init(&o->od_site, l);
4655         if (rc)
4656                 GOTO(out_compat, rc);
4657
4658         rc = lu_site_init_finish(&o->od_site);
4659         if (rc)
4660                 GOTO(out_compat, rc);
4661
4662         rc = osd_procfs_init(o, o->od_svname);
4663         if (rc != 0) {
4664                 CERROR("%s: can't initialize procfs: rc = %d\n",
4665                        o->od_svname, rc);
4666                 GOTO(out_compat, rc);
4667         }
4668
4669         LASSERT(l->ld_site->ls_linkage.next && l->ld_site->ls_linkage.prev);
4670
4671         RETURN(0);
4672 out_compat:
4673         osd_compat_fini(o);
4674 out_mnt:
4675         osd_oi_fini(info, o);
4676         osd_shutdown(env, o);
4677         mntput(o->od_mnt);
4678         o->od_mnt = NULL;
4679 out_capa:
4680         cleanup_capa_hash(o->od_capa_hash);
4681 out:
4682         RETURN(rc);
4683 }
4684
4685 static struct lu_device *osd_device_alloc(const struct lu_env *env,
4686                                           struct lu_device_type *t,
4687                                           struct lustre_cfg *cfg)
4688 {
4689         struct osd_device *o;
4690         int                rc;
4691
4692         OBD_ALLOC_PTR(o);
4693         if (o == NULL)
4694                 return ERR_PTR(-ENOMEM);
4695
4696         rc = dt_device_init(&o->od_dt_dev, t);
4697         if (rc == 0) {
4698                 rc = osd_device_init0(env, o, cfg);
4699                 if (rc)
4700                         dt_device_fini(&o->od_dt_dev);
4701         }
4702
4703         if (unlikely(rc != 0))
4704                 OBD_FREE_PTR(o);
4705
4706         return rc == 0 ? osd2lu_dev(o) : ERR_PTR(rc);
4707 }
4708
4709 static struct lu_device *osd_device_free(const struct lu_env *env,
4710                                          struct lu_device *d)
4711 {
4712         struct osd_device *o = osd_dev(d);
4713         ENTRY;
4714
4715         cleanup_capa_hash(o->od_capa_hash);
4716         /* XXX: make osd top device in order to release reference */
4717         d->ld_site->ls_top_dev = d;
4718         lu_site_purge(env, d->ld_site, -1);
4719         if (!cfs_hash_is_empty(d->ld_site->ls_obj_hash)) {
4720                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_ERROR, NULL);
4721                 lu_site_print(env, d->ld_site, &msgdata, lu_cdebug_printer);
4722         }
4723         lu_site_fini(&o->od_site);
4724         dt_device_fini(&o->od_dt_dev);
4725         OBD_FREE_PTR(o);
4726         RETURN(NULL);
4727 }
4728
4729 static int osd_process_config(const struct lu_env *env,
4730                               struct lu_device *d, struct lustre_cfg *cfg)
4731 {
4732         struct osd_device *o = osd_dev(d);
4733         int err;
4734         ENTRY;
4735
4736         switch(cfg->lcfg_command) {
4737         case LCFG_SETUP:
4738                 err = osd_mount(env, o, cfg);
4739                 break;
4740         case LCFG_CLEANUP:
4741                 lu_dev_del_linkage(d->ld_site, d);
4742                 err = 0;
4743                 break;
4744         default:
4745                 err = -ENOSYS;
4746         }
4747
4748         RETURN(err);
4749 }
4750
4751 static int osd_recovery_complete(const struct lu_env *env,
4752                                  struct lu_device *d)
4753 {
4754         RETURN(0);
4755 }
4756
4757 /*
4758  * we use exports to track all osd users
4759  */
4760 static int osd_obd_connect(const struct lu_env *env, struct obd_export **exp,
4761                            struct obd_device *obd, struct obd_uuid *cluuid,
4762                            struct obd_connect_data *data, void *localdata)
4763 {
4764         struct osd_device    *osd = osd_dev(obd->obd_lu_dev);
4765         struct lustre_handle  conn;
4766         int                   rc;
4767         ENTRY;
4768
4769         CDEBUG(D_CONFIG, "connect #%d\n", osd->od_connects);
4770
4771         rc = class_connect(&conn, obd, cluuid);
4772         if (rc)
4773                 RETURN(rc);
4774
4775         *exp = class_conn2export(&conn);
4776
4777         cfs_spin_lock(&osd->od_osfs_lock);
4778         osd->od_connects++;
4779         cfs_spin_unlock(&osd->od_osfs_lock);
4780
4781         RETURN(0);
4782 }
4783
4784 /*
4785  * once last export (we don't count self-export) disappeared
4786  * osd can be released
4787  */
4788 static int osd_obd_disconnect(struct obd_export *exp)
4789 {
4790         struct obd_device *obd = exp->exp_obd;
4791         struct osd_device *osd = osd_dev(obd->obd_lu_dev);
4792         int                rc, release = 0;
4793         ENTRY;
4794
4795         /* Only disconnect the underlying layers on the final disconnect. */
4796         cfs_spin_lock(&osd->od_osfs_lock);
4797         osd->od_connects--;
4798         if (osd->od_connects == 0)
4799                 release = 1;
4800         cfs_spin_unlock(&osd->od_osfs_lock);
4801
4802         rc = class_disconnect(exp); /* bz 9811 */
4803
4804         if (rc == 0 && release)
4805                 class_manual_cleanup(obd);
4806         RETURN(rc);
4807 }
4808
4809 static int osd_prepare(const struct lu_env *env, struct lu_device *pdev,
4810                        struct lu_device *dev)
4811 {
4812         struct osd_device *osd = osd_dev(dev);
4813         int                result;
4814         ENTRY;
4815
4816         /* 2. setup quota slave instance */
4817         osd->od_quota_slave = qsd_init(env, osd->od_svname, &osd->od_dt_dev,
4818                                        osd->od_proc_entry);
4819         if (IS_ERR(osd->od_quota_slave)) {
4820                 result = PTR_ERR(osd->od_quota_slave);
4821                 osd->od_quota_slave = NULL;
4822                 RETURN(result);
4823         }
4824
4825 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 3, 55, 0)
4826         /* Unfortunately, the current MDD implementation relies on some specific
4827          * code to be executed in the OSD layer. Since OFD now also uses the OSD
4828          * module, we need a way to skip the metadata-specific code when running
4829          * with OFD.
4830          * The hack here is to check the type of the parent device which is
4831          * either MD (i.e. MDD device) with the current MDT stack or DT (i.e.
4832          * OFD device) on an OST. As a reminder, obdfilter does not use the OSD
4833          * layer and still relies on lvfs. This hack won't work any more when
4834          * LOD is landed since LOD is of DT type.
4835          * This code should be removed once the orion MDT changes (LOD/OSP, ...)
4836          * have been landed */
4837         osd->od_is_md = lu_device_is_md(pdev);
4838 #else
4839 #warning "all is_md checks must be removed from osd-ldiskfs"
4840 #endif
4841
4842         if (!osd->od_is_md)
4843                 RETURN(0);
4844
4845         /* 3. setup local objects */
4846         result = llo_local_objects_setup(env, lu2md_dev(pdev), lu2dt_dev(dev));
4847         RETURN(result);
4848 }
4849
4850 static const struct lu_object_operations osd_lu_obj_ops = {
4851         .loo_object_init      = osd_object_init,
4852         .loo_object_delete    = osd_object_delete,
4853         .loo_object_release   = osd_object_release,
4854         .loo_object_free      = osd_object_free,
4855         .loo_object_print     = osd_object_print,
4856         .loo_object_invariant = osd_object_invariant
4857 };
4858
4859 const struct lu_device_operations osd_lu_ops = {
4860         .ldo_object_alloc      = osd_object_alloc,
4861         .ldo_process_config    = osd_process_config,
4862         .ldo_recovery_complete = osd_recovery_complete,
4863         .ldo_prepare           = osd_prepare,
4864 };
4865
4866 static const struct lu_device_type_operations osd_device_type_ops = {
4867         .ldto_init = osd_type_init,
4868         .ldto_fini = osd_type_fini,
4869
4870         .ldto_start = osd_type_start,
4871         .ldto_stop  = osd_type_stop,
4872
4873         .ldto_device_alloc = osd_device_alloc,
4874         .ldto_device_free  = osd_device_free,
4875
4876         .ldto_device_init    = osd_device_init,
4877         .ldto_device_fini    = osd_device_fini
4878 };
4879
4880 struct lu_device_type osd_device_type = {
4881         .ldt_tags     = LU_DEVICE_DT,
4882         .ldt_name     = LUSTRE_OSD_LDISKFS_NAME,
4883         .ldt_ops      = &osd_device_type_ops,
4884         .ldt_ctx_tags = LCT_LOCAL,
4885 };
4886
4887 /*
4888  * lprocfs legacy support.
4889  */
4890 static struct obd_ops osd_obd_device_ops = {
4891         .o_owner = THIS_MODULE,
4892         .o_connect      = osd_obd_connect,
4893         .o_disconnect   = osd_obd_disconnect
4894 };
4895
4896 static int __init osd_mod_init(void)
4897 {
4898         struct lprocfs_static_vars lvars;
4899
4900         osd_oi_mod_init();
4901         lprocfs_osd_init_vars(&lvars);
4902         return class_register_type(&osd_obd_device_ops, NULL, lvars.module_vars,
4903                                    LUSTRE_OSD_LDISKFS_NAME, &osd_device_type);
4904 }
4905
4906 static void __exit osd_mod_exit(void)
4907 {
4908         class_unregister_type(LUSTRE_OSD_LDISKFS_NAME);
4909 }
4910
4911 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
4912 MODULE_DESCRIPTION("Lustre Object Storage Device ("LUSTRE_OSD_LDISKFS_NAME")");
4913 MODULE_LICENSE("GPL");
4914
4915 cfs_module(osd, "0.1.0", osd_mod_init, osd_mod_exit);