lustre/osd-zfs/osd_object.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2009, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2012, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/osd-zfs/osd_object.c
  33  *
  34  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
  35  * Author: Mike Pershin <tappro@whamcloud.com>
  36  * Author: Johann Lombardi <johann@whamcloud.com>
  37  */
  38
  39 #define DEBUG_SUBSYSTEM S_OSD
  40
  41 #include <libcfs/libcfs.h>
  42 #include <obd_support.h>
  43 #include <lustre_net.h>
  44 #include <obd.h>
  45 #include <obd_class.h>
  46 #include <lustre_disk.h>
  47 #include <lustre_fid.h>
  48
  49 #include "osd_internal.h"
  50
  51 #include <sys/dnode.h>
  52 #include <sys/dbuf.h>
  53 #include <sys/spa.h>
  54 #include <sys/stat.h>
  55 #include <sys/zap.h>
  56 #include <sys/spa_impl.h>
  57 #include <sys/zfs_znode.h>
  58 #include <sys/dmu_tx.h>
  59 #include <sys/dmu_objset.h>
  60 #include <sys/dsl_prop.h>
  61 #include <sys/sa_impl.h>
  62 #include <sys/txg.h>
  63
  64 char *osd_obj_tag = "osd_object";
  65 static int osd_object_sync_delay_us = -1;
  66
  67 static struct dt_object_operations osd_obj_ops;
  68 static struct lu_object_operations osd_lu_obj_ops;
  69 static struct dt_object_operations osd_obj_otable_it_ops;
  70
  71 static void
  72 osd_object_sa_fini(struct osd_object *obj)
  73 {
  74         if (obj->oo_sa_hdl) {
  75                 sa_handle_destroy(obj->oo_sa_hdl);
  76                 obj->oo_sa_hdl = NULL;
  77         }
  78 }
  79
  80 static int
  81 osd_object_sa_init(struct osd_object *obj, struct osd_device *o)
  82 {
  83         int rc;
  84
  85         LASSERT(obj->oo_sa_hdl == NULL);
  86         LASSERT(obj->oo_dn != NULL);
  87
  88         rc = osd_sa_handle_get(obj);
  89         if (rc)
  90                 return rc;
  91
  92         /* Cache the xattr object id, valid for the life of the object */
  93         rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_XATTR(o), &obj->oo_xattr, 8);
  94         if (rc == -ENOENT) {
  95                 obj->oo_xattr = ZFS_NO_OBJECT;
  96                 rc = 0;
  97         } else if (rc) {
  98                 osd_object_sa_fini(obj);
  99         }
 100
 101         return rc;
 102 }
 103
 104 /*
 105  * Add object to list of dirty objects in tx handle.
 106  */
 107 void osd_object_sa_dirty_add(struct osd_object *obj, struct osd_thandle *oh)
 108 {
 109         if (!list_empty(&obj->oo_sa_linkage))
 110                 return;
 111
 112         write_lock(&obj->oo_attr_lock);
 113         if (likely(list_empty(&obj->oo_sa_linkage)))
 114                 list_add(&obj->oo_sa_linkage, &oh->ot_sa_list);
 115         write_unlock(&obj->oo_attr_lock);
 116 }
 117
 118 /*
 119  * Release spill block dbuf hold for all dirty SAs.
 120  */
 121 void osd_object_sa_dirty_rele(const struct lu_env *env, struct osd_thandle *oh)
 122 {
 123         struct osd_object *obj;
 124
 125         while (!list_empty(&oh->ot_sa_list)) {
 126                 obj = list_entry(oh->ot_sa_list.next,
 127                                  struct osd_object, oo_sa_linkage);
 128                 write_lock(&obj->oo_attr_lock);
 129                 list_del_init(&obj->oo_sa_linkage);
 130                 write_unlock(&obj->oo_attr_lock);
 131                 if (obj->oo_late_xattr) {
 132                         /*
 133                          * take oo_guard to protect oo_sa_xattr buffer
 134                          * from concurrent update by osd_xattr_set()
 135                          */
 136                         LASSERT(oh->ot_assigned != 0);
 137                         down_write(&obj->oo_guard);
 138                         if (obj->oo_late_attr_set)
 139                                 __osd_sa_attr_init(env, obj, oh);
 140                         else if (obj->oo_late_xattr)
 141                                 __osd_sa_xattr_update(env, obj, oh);
 142                         up_write(&obj->oo_guard);
 143                 }
 144                 sa_spill_rele(obj->oo_sa_hdl);
 145         }
 146 }
 147
 148 /*
 149  * Update the SA and add the object to the dirty list.
 150  */
 151 int osd_object_sa_update(struct osd_object *obj, sa_attr_type_t type,
 152                          void *buf, uint32_t buflen, struct osd_thandle *oh)
 153 {
 154         int rc;
 155
 156         LASSERT(obj->oo_sa_hdl != NULL);
 157         LASSERT(oh->ot_tx != NULL);
 158
 159         rc = -sa_update(obj->oo_sa_hdl, type, buf, buflen, oh->ot_tx);
 160         osd_object_sa_dirty_add(obj, oh);
 161
 162         return rc;
 163 }
 164
 165 /*
 166  * Bulk update the SA and add the object to the dirty list.
 167  */
 168 static int
 169 osd_object_sa_bulk_update(struct osd_object *obj, sa_bulk_attr_t *attrs,
 170                           int count, struct osd_thandle *oh)
 171 {
 172         int rc;
 173
 174         LASSERT(obj->oo_sa_hdl != NULL);
 175         LASSERT(oh->ot_tx != NULL);
 176
 177         rc = -sa_bulk_update(obj->oo_sa_hdl, attrs, count, oh->ot_tx);
 178         osd_object_sa_dirty_add(obj, oh);
 179
 180         return rc;
 181 }
 182
 183 /*
 184  * Retrieve the attributes of a DMU object
 185  */
 186 static int __osd_object_attr_get(const struct lu_env *env, struct osd_device *o,
 187                                  struct osd_object *obj, struct lu_attr *la)
 188 {
 189         struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
 190         sa_bulk_attr_t  *bulk = osd_oti_get(env)->oti_attr_bulk;
 191         int              cnt = 0;
 192         int              rc;
 193         ENTRY;
 194
 195         LASSERT(obj->oo_dn != NULL);
 196
 197         la->la_valid |= LA_ATIME | LA_MTIME | LA_CTIME | LA_MODE | LA_TYPE |
 198                         LA_SIZE | LA_UID | LA_GID | LA_FLAGS | LA_NLINK;
 199
 200         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(o), NULL, osa->atime, 16);
 201         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(o), NULL, osa->mtime, 16);
 202         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(o), NULL, osa->ctime, 16);
 203         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(o), NULL, &osa->mode, 8);
 204         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(o), NULL, &osa->size, 8);
 205         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(o), NULL, &osa->nlink, 8);
 206         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(o), NULL, &osa->uid, 8);
 207         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(o), NULL, &osa->gid, 8);
 208         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(o), NULL, &osa->flags, 8);
 209         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
 210
 211         rc = -sa_bulk_lookup(obj->oo_sa_hdl, bulk, cnt);
 212         if (rc)
 213                 GOTO(out_sa, rc);
 214
 215 #ifdef ZFS_PROJINHERIT
 216         if (o->od_projectused_dn && osa->flags & ZFS_PROJID) {
 217                 rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_PROJID(o),
 218                                 &osa->projid, 8);
 219                 if (rc)
 220                         GOTO(out_sa, rc);
 221
 222                 la->la_projid = osa->projid;
 223                 la->la_valid |= LA_PROJID;
 224                 obj->oo_with_projid = 1;
 225         } else {
 226                 la->la_projid = ZFS_DEFAULT_PROJID;
 227                 la->la_valid &= ~LA_PROJID;
 228         }
 229 #else
 230         la->la_projid = 0;
 231         la->la_valid &= ~LA_PROJID;
 232 #endif
 233
 234         la->la_atime = osa->atime[0];
 235         la->la_mtime = osa->mtime[0];
 236         la->la_ctime = osa->ctime[0];
 237         la->la_mode = osa->mode;
 238         la->la_uid = osa->uid;
 239         la->la_gid = osa->gid;
 240         la->la_nlink = osa->nlink;
 241         la->la_flags = attrs_zfs2fs(osa->flags);
 242         la->la_size = osa->size;
 243
 244         /* Try to get extra flag from LMA. Right now, only LMAI_ORPHAN
 245          * flags is stored in LMA, and it is only for orphan directory */
 246         if (S_ISDIR(la->la_mode) && dt_object_exists(&obj->oo_dt)) {
 247                 struct osd_thread_info *info = osd_oti_get(env);
 248                 struct lustre_mdt_attrs *lma;
 249                 struct lu_buf buf;
 250
 251                 lma = (struct lustre_mdt_attrs *)info->oti_buf;
 252                 buf.lb_buf = lma;
 253                 buf.lb_len = sizeof(info->oti_buf);
 254                 rc = osd_xattr_get(env, &obj->oo_dt, &buf, XATTR_NAME_LMA);
 255                 if (rc > 0) {
 256                         rc = 0;
 257                         lma->lma_incompat = le32_to_cpu(lma->lma_incompat);
 258                         obj->oo_lma_flags =
 259                                 lma_to_lustre_flags(lma->lma_incompat);
 260
 261                 } else if (rc == -ENODATA) {
 262                         rc = 0;
 263                 }
 264         }
 265
 266         if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode)) {
 267                 rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_RDEV(o), &osa->rdev, 8);
 268                 if (rc)
 269                         GOTO(out_sa, rc);
 270                 la->la_rdev = osa->rdev;
 271                 la->la_valid |= LA_RDEV;
 272         }
 273 out_sa:
 274
 275         RETURN(rc);
 276 }
 277
 278 int __osd_obj2dnode(objset_t *os, uint64_t oid, dnode_t **dnp)
 279 {
 280         dmu_buf_t *db;
 281         dmu_buf_impl_t *dbi;
 282         int rc;
 283
 284         rc = -dmu_bonus_hold(os, oid, osd_obj_tag, &db);
 285         if (rc)
 286                 return rc;
 287
 288         dbi = (dmu_buf_impl_t *)db;
 289         DB_DNODE_ENTER(dbi);
 290         *dnp = DB_DNODE(dbi);
 291         DB_DNODE_EXIT(dbi);
 292         LASSERT(*dnp != NULL);
 293
 294         return 0;
 295 }
 296
 297 /*
 298  * Concurrency: no concurrent access is possible that early in object
 299  * life-cycle.
 300  */
 301 struct lu_object *osd_object_alloc(const struct lu_env *env,
 302                                    const struct lu_object_header *hdr,
 303                                    struct lu_device *d)
 304 {
 305         struct osd_object *mo;
 306
 307         OBD_SLAB_ALLOC_PTR_GFP(mo, osd_object_kmem, GFP_NOFS);
 308         if (mo != NULL) {
 309                 struct lu_object *l;
 310                 struct lu_object_header *h;
 311                 struct osd_device *o = osd_dev(d);
 312
 313                 l = &mo->oo_dt.do_lu;
 314                 if (unlikely(o->od_in_init)) {
 315                         OBD_ALLOC_PTR(h);
 316                         if (!h) {
 317                                 OBD_FREE_PTR(mo);
 318                                 return NULL;
 319                         }
 320
 321                         lu_object_header_init(h);
 322                         lu_object_init(l, h, d);
 323                         lu_object_add_top(h, l);
 324                         mo->oo_header = h;
 325                 } else {
 326                         dt_object_init(&mo->oo_dt, NULL, d);
 327                         mo->oo_header = NULL;
 328                 }
 329
 330                 mo->oo_dt.do_ops = &osd_obj_ops;
 331                 l->lo_ops = &osd_lu_obj_ops;
 332                 INIT_LIST_HEAD(&mo->oo_sa_linkage);
 333                 INIT_LIST_HEAD(&mo->oo_unlinked_linkage);
 334                 init_rwsem(&mo->oo_sem);
 335                 init_rwsem(&mo->oo_guard);
 336                 rwlock_init(&mo->oo_attr_lock);
 337                 mo->oo_destroy = OSD_DESTROY_NONE;
 338                 return l;
 339         } else {
 340                 return NULL;
 341         }
 342 }
 343
 344 static void osd_obj_set_blksize(const struct lu_env *env,
 345                                 struct osd_device *osd, struct osd_object *obj)
 346 {
 347         const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
 348         dmu_tx_t *tx;
 349         dnode_t *dn = obj->oo_dn;
 350         uint32_t blksz;
 351         int rc = 0;
 352         ENTRY;
 353
 354         LASSERT(!osd_oti_get(env)->oti_in_trans);
 355
 356         tx = dmu_tx_create(osd->od_os);
 357         if (!tx) {
 358                 CERROR("%s: fail to create tx to set blksize for "DFID"\n",
 359                        osd->od_svname, PFID(fid));
 360                 RETURN_EXIT;
 361         }
 362
 363         dmu_tx_hold_bonus(tx, dn->dn_object);
 364         rc = -dmu_tx_assign(tx, TXG_WAIT);
 365         if (rc) {
 366                 dmu_tx_abort(tx);
 367                 CERROR("%s: fail to assign tx to set blksize for "DFID
 368                        ": rc = %d\n", osd->od_svname, PFID(fid), rc);
 369                 RETURN_EXIT;
 370         }
 371
 372         down_write(&obj->oo_guard);
 373         if (unlikely((1 << dn->dn_datablkshift) >= PAGE_SIZE))
 374                 GOTO(out, rc = 1);
 375
 376         blksz = dn->dn_datablksz;
 377         if (!is_power_of_2(blksz))
 378                 blksz = size_roundup_power2(blksz);
 379
 380         if (blksz > osd->od_max_blksz)
 381                 blksz = osd->od_max_blksz;
 382         else if (blksz < PAGE_SIZE)
 383                 blksz = PAGE_SIZE;
 384         rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object, blksz, 0, tx);
 385
 386         GOTO(out, rc);
 387
 388 out:
 389         up_write(&obj->oo_guard);
 390         if (rc) {
 391                 dmu_tx_abort(tx);
 392                 if (unlikely(obj->oo_dn->dn_maxblkid > 0))
 393                         rc = 1;
 394                 if (rc < 0)
 395                         CERROR("%s: fail to set blksize for "DFID": rc = %d\n",
 396                                osd->od_svname, PFID(fid), rc);
 397         } else {
 398                 dmu_tx_commit(tx);
 399                 CDEBUG(D_INODE, "%s: set blksize as %u for "DFID"\n",
 400                        osd->od_svname, blksz, PFID(fid));
 401         }
 402 }
 403
 404 /*
 405  * Concurrency: shouldn't matter.
 406  */
 407 static int osd_object_init0(const struct lu_env *env, struct osd_object *obj)
 408 {
 409         struct osd_device       *osd = osd_obj2dev(obj);
 410         const struct lu_fid     *fid = lu_object_fid(&obj->oo_dt.do_lu);
 411         int                      rc = 0;
 412         ENTRY;
 413
 414         LASSERT(obj->oo_dn);
 415
 416         rc = osd_object_sa_init(obj, osd);
 417         if (rc)
 418                 RETURN(rc);
 419
 420         /* cache attrs in object */
 421         rc = __osd_object_attr_get(env, osd, obj, &obj->oo_attr);
 422         if (rc)
 423                 RETURN(rc);
 424
 425         if (likely(!fid_is_acct(fid))) {
 426                 /* no body operations for accounting objects */
 427                 obj->oo_dt.do_body_ops = &osd_body_ops;
 428
 429                 if (S_ISREG(obj->oo_attr.la_mode) &&
 430                     obj->oo_dn->dn_maxblkid == 0 &&
 431                     (1 << obj->oo_dn->dn_datablkshift) < PAGE_SIZE &&
 432                     (fid_is_idif(fid) || fid_is_norm(fid) ||
 433                      fid_is_echo(fid)) &&
 434                     osd->od_is_ost && !osd->od_dt_dev.dd_rdonly)
 435                         osd_obj_set_blksize(env, osd, obj);
 436         }
 437
 438         /*
 439          * initialize object before marking it existing
 440          */
 441         obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
 442
 443         smp_mb();
 444         obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
 445
 446         RETURN(0);
 447 }
 448
 449 static int osd_check_lma(const struct lu_env *env, struct osd_object *obj)
 450 {
 451         struct osd_thread_info  *info = osd_oti_get(env);
 452         struct lu_buf           buf;
 453         int                     rc;
 454         struct lustre_mdt_attrs *lma;
 455         const struct lu_fid *rfid = lu_object_fid(&obj->oo_dt.do_lu);
 456         ENTRY;
 457
 458         BUILD_BUG_ON(sizeof(info->oti_buf) < sizeof(*lma));
 459         lma = (struct lustre_mdt_attrs *)info->oti_buf;
 460         buf.lb_buf = lma;
 461         buf.lb_len = sizeof(info->oti_buf);
 462
 463         rc = osd_xattr_get(env, &obj->oo_dt, &buf, XATTR_NAME_LMA);
 464         if (rc > 0) {
 465                 rc = 0;
 466                 lustre_lma_swab(lma);
 467                 if (unlikely((lma->lma_incompat & ~LMA_INCOMPAT_SUPP) ||
 468                              CFS_FAIL_CHECK(OBD_FAIL_OSD_LMA_INCOMPAT))) {
 469                         CWARN("%s: unsupported incompat LMA feature(s) %#x for "
 470                               "fid = "DFID"\n", osd_obj2dev(obj)->od_svname,
 471                               lma->lma_incompat & ~LMA_INCOMPAT_SUPP,
 472                               PFID(rfid));
 473                         rc = -EOPNOTSUPP;
 474                 } else if (unlikely(!lu_fid_eq(rfid, &lma->lma_self_fid))) {
 475                         CERROR("%s: FID-in-LMA "DFID" does not match the "
 476                               "object self-fid "DFID"\n",
 477                               osd_obj2dev(obj)->od_svname,
 478                               PFID(&lma->lma_self_fid), PFID(rfid));
 479                         rc = -EREMCHG;
 480                 } else {
 481                         struct osd_device *osd = osd_obj2dev(obj);
 482
 483                         if (lma->lma_compat & LMAC_STRIPE_INFO &&
 484                             osd->od_is_ost)
 485                                 obj->oo_pfid_in_lma = 1;
 486                         if (unlikely(lma->lma_incompat & LMAI_REMOTE_PARENT) &&
 487                             osd->od_remote_parent_dir != ZFS_NO_OBJECT)
 488                                 lu_object_set_agent_entry(&obj->oo_dt.do_lu);
 489                 }
 490         } else if (rc == -ENODATA) {
 491                 /* haven't initialize LMA xattr */
 492                 rc = 0;
 493         }
 494
 495         RETURN(rc);
 496 }
 497
 498 /**
 499  * Helper function to retrieve DMU object id from fid for accounting object
 500  */
 501 static dnode_t *osd_quota_fid2dmu(const struct osd_device *osd,
 502                                   const struct lu_fid *fid)
 503 {
 504         dnode_t *dn = NULL;
 505
 506         LASSERT(fid_is_acct(fid));
 507
 508         switch (fid_oid(fid)) {
 509         case ACCT_USER_OID:
 510                 dn = osd->od_userused_dn;
 511                 break;
 512         case ACCT_GROUP_OID:
 513                 dn = osd->od_groupused_dn;
 514                 break;
 515 #ifdef ZFS_PROJINHERIT
 516         case ACCT_PROJECT_OID:
 517                 dn = osd->od_projectused_dn;
 518                 break;
 519 #endif
 520         default:
 521                 break;
 522         }
 523
 524         return dn;
 525 }
 526
 527 /*
 528  * Concurrency: no concurrent access is possible that early in object
 529  * life-cycle.
 530  */
 531 static int osd_object_init(const struct lu_env *env, struct lu_object *l,
 532                            const struct lu_object_conf *conf)
 533 {
 534         struct osd_object *obj = osd_obj(l);
 535         struct osd_device *osd = osd_obj2dev(obj);
 536         const struct lu_fid *fid = lu_object_fid(l);
 537         struct lustre_scrub *scrub = &osd->od_scrub;
 538         struct osd_thread_info *info = osd_oti_get(env);
 539         struct luz_direntry *zde = &info->oti_zde;
 540         struct osd_idmap_cache *idc;
 541         char *name = info->oti_str;
 542         uint64_t oid;
 543         int rc = 0;
 544         int rc1;
 545         bool remote = false;
 546         ENTRY;
 547
 548         LASSERT(osd_invariant(obj));
 549
 550         if (fid_is_otable_it(&l->lo_header->loh_fid)) {
 551                 obj->oo_dt.do_ops = &osd_obj_otable_it_ops;
 552                 l->lo_header->loh_attr |= LOHA_EXISTS;
 553
 554                 GOTO(out, rc = 0);
 555         }
 556
 557         if (conf && conf->loc_flags & LOC_F_NEW)
 558                 GOTO(out, rc = 0);
 559
 560         if (unlikely(fid_is_acct(fid))) {
 561                 obj->oo_dn = osd_quota_fid2dmu(osd, fid);
 562                 if (obj->oo_dn) {
 563                         obj->oo_dt.do_index_ops = &osd_acct_index_ops;
 564                         l->lo_header->loh_attr |= LOHA_EXISTS;
 565                 }
 566
 567                 GOTO(out, rc = 0);
 568         }
 569
 570         idc = osd_idc_find(env, osd, fid);
 571         if (idc && !idc->oic_remote && idc->oic_dnode != ZFS_NO_OBJECT) {
 572                 oid = idc->oic_dnode;
 573                 goto zget;
 574         }
 575
 576         rc = -ENOENT;
 577         if (!list_empty(&osd->od_scrub.os_inconsistent_items))
 578                 rc = osd_oii_lookup(osd, fid, &oid);
 579
 580         if (rc)
 581                 rc = osd_fid_lookup(env, osd, fid, &oid);
 582
 583         if (rc == -ENOENT) {
 584                 if (likely(!(fid_is_norm(fid) || fid_is_igif(fid)) ||
 585                            fid_is_on_ost(env, osd, fid) ||
 586                            !zfs_test_bit(osd_oi_fid2idx(osd, fid),
 587                                          scrub->os_file.sf_oi_bitmap)))
 588                         GOTO(out, rc = 0);
 589
 590                 rc = -EREMCHG;
 591                 goto trigger;
 592         }
 593
 594         if (rc)
 595                 GOTO(out, rc);
 596
 597 zget:
 598         LASSERT(obj->oo_dn == NULL);
 599
 600         rc = __osd_obj2dnode(osd->od_os, oid, &obj->oo_dn);
 601         /* EEXIST will be returned if object is being deleted in ZFS */
 602         if (rc == -EEXIST)
 603                 GOTO(out, rc = 0);
 604
 605         if (rc) {
 606                 CERROR("%s: lookup "DFID"/%#llx failed: rc = %d\n",
 607                        osd->od_svname, PFID(lu_object_fid(l)), oid, rc);
 608                 GOTO(out, rc);
 609         }
 610
 611         rc = osd_object_init0(env, obj);
 612         if (rc)
 613                 GOTO(out, rc);
 614
 615         if (unlikely(obj->oo_header))
 616                 GOTO(out, rc = 0);
 617
 618         rc = osd_check_lma(env, obj);
 619         if ((!rc && !remote) || (rc != -EREMCHG))
 620                 GOTO(out, rc);
 621
 622 trigger:
 623         /* We still have chance to get the valid dnode: for the object that is
 624          * referenced by remote name entry, the object on the local MDT will be
 625          * linked under the dir /REMOTE_PARENT_DIR with its FID string as name.
 626          *
 627          * During the OI scrub, if we cannot find the OI mapping, we may still
 628          * have change to map the FID to local OID via lookup the dir
 629          * /REMOTE_PARENT_DIR. */
 630         if (!remote && !fid_is_on_ost(env, osd, fid)) {
 631                 osd_fid2str(name, fid, sizeof(info->oti_str));
 632                 rc = osd_zap_lookup(osd, osd->od_remote_parent_dir,
 633                                     NULL, name, 8, 3, (void *)zde);
 634                 if (!rc) {
 635                         oid = zde->lzd_reg.zde_dnode;
 636                         osd_dnode_rele(obj->oo_dn);
 637                         obj->oo_dn = NULL;
 638                         remote = true;
 639                         goto zget;
 640                 }
 641         }
 642
 643         /* The case someone triggered the OI scrub already. */
 644         if (thread_is_running(&scrub->os_thread)) {
 645                 if (!rc) {
 646                         LASSERT(remote);
 647
 648                         lu_object_set_agent_entry(l);
 649                         osd_oii_insert(env, osd, fid, oid, false);
 650                 } else {
 651                         rc = -EINPROGRESS;
 652                 }
 653
 654                 GOTO(out, rc);
 655         }
 656
 657         /* The case NOT allow to trigger OI scrub automatically. */
 658         if (osd->od_auto_scrub_interval == AS_NEVER)
 659                 GOTO(out, rc);
 660
 661         /* It is me to trigger the OI scrub. */
 662         rc1 = osd_scrub_start(env, osd, SS_CLEAR_DRYRUN |
 663                               SS_CLEAR_FAILOUT | SS_AUTO_FULL);
 664         LCONSOLE_WARN("%s: trigger OI scrub by RPC for the "DFID": rc = %d\n",
 665                       osd_name(osd), PFID(fid), rc1);
 666         if (!rc) {
 667                 LASSERT(remote);
 668
 669                 lu_object_set_agent_entry(l);
 670                 if (!rc1)
 671                         osd_oii_insert(env, osd, fid, oid, false);
 672         } else {
 673                 if (!rc1)
 674                         rc = -EINPROGRESS;
 675                 else
 676                         rc = -EREMCHG;
 677         }
 678
 679         GOTO(out, rc);
 680
 681 out:
 682         RETURN(rc);
 683 }
 684
 685 /*
 686  * Concurrency: no concurrent access is possible that late in object
 687  * life-cycle.
 688  */
 689 static void osd_object_free(const struct lu_env *env, struct lu_object *l)
 690 {
 691         struct osd_object *obj = osd_obj(l);
 692         struct lu_object_header *h = obj->oo_header;
 693
 694         LASSERT(osd_invariant(obj));
 695
 696         dt_object_fini(&obj->oo_dt);
 697         OBD_SLAB_FREE_PTR(obj, osd_object_kmem);
 698         if (unlikely(h)) {
 699                 lu_object_header_fini(h);
 700                 OBD_FREE_PTR(h);
 701         }
 702 }
 703
 704 static int
 705 osd_object_unlinked_add(struct osd_object *obj, struct osd_thandle *oh)
 706 {
 707         int rc = -EBUSY;
 708
 709         LASSERT(obj->oo_destroy == OSD_DESTROY_ASYNC);
 710
 711         /* the object is supposed to be exclusively locked by
 712          * the caller (osd_destroy()), while the transaction
 713          * (oh) is per-thread and not shared */
 714         if (likely(list_empty(&obj->oo_unlinked_linkage))) {
 715                 list_add(&obj->oo_unlinked_linkage, &oh->ot_unlinked_list);
 716                 rc = 0;
 717         }
 718
 719         return rc;
 720 }
 721
 722 /* Default to max data size covered by a level-1 indirect block */
 723 static unsigned long osd_sync_destroy_max_size =
 724         1UL << (DN_MAX_INDBLKSHIFT - SPA_BLKPTRSHIFT + SPA_MAXBLOCKSHIFT);
 725 module_param(osd_sync_destroy_max_size, ulong, 0444);
 726 MODULE_PARM_DESC(osd_sync_destroy_max_size, "Maximum object size to use synchronous destroy.");
 727
 728 static inline void
 729 osd_object_set_destroy_type(struct osd_object *obj)
 730 {
 731         /*
 732          * Lock-less OST_WRITE can race with OST_DESTROY, so set destroy type
 733          * only once and use it consistently thereafter.
 734          */
 735         down_write(&obj->oo_guard);
 736         if (obj->oo_destroy == OSD_DESTROY_NONE) {
 737                 if (obj->oo_attr.la_size <= osd_sync_destroy_max_size)
 738                         obj->oo_destroy = OSD_DESTROY_SYNC;
 739                 else /* Larger objects are destroyed asynchronously */
 740                         obj->oo_destroy = OSD_DESTROY_ASYNC;
 741         }
 742         up_write(&obj->oo_guard);
 743 }
 744
 745 static int osd_declare_destroy(const struct lu_env *env, struct dt_object *dt,
 746                                struct thandle *th)
 747 {
 748         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
 749         struct osd_object       *obj = osd_dt_obj(dt);
 750         struct osd_device       *osd = osd_obj2dev(obj);
 751         struct osd_thandle      *oh;
 752         dnode_t *dn;
 753         int                      rc;
 754         uint64_t                 zapid;
 755         ENTRY;
 756
 757         LASSERT(th != NULL);
 758         LASSERT(dt_object_exists(dt));
 759
 760         oh = container_of0(th, struct osd_thandle, ot_super);
 761         LASSERT(oh->ot_tx != NULL);
 762
 763         dmu_tx_mark_netfree(oh->ot_tx);
 764
 765         /* declare that we'll remove object from fid-dnode mapping */
 766         zapid = osd_get_name_n_idx(env, osd, fid, NULL, 0, &dn);
 767         osd_tx_hold_zap(oh->ot_tx, zapid, dn, FALSE, NULL);
 768
 769         osd_declare_xattrs_destroy(env, obj, oh);
 770
 771         /* one less inode */
 772         rc = osd_declare_quota(env, osd, obj->oo_attr.la_uid,
 773                                obj->oo_attr.la_gid, obj->oo_attr.la_projid,
 774                                -1, oh, NULL, OSD_QID_INODE);
 775         if (rc)
 776                 RETURN(rc);
 777
 778         /* data to be truncated */
 779         rc = osd_declare_quota(env, osd, obj->oo_attr.la_uid,
 780                                obj->oo_attr.la_gid, obj->oo_attr.la_projid,
 781                                0, oh, NULL, OSD_QID_BLK);
 782         if (rc)
 783                 RETURN(rc);
 784
 785         osd_object_set_destroy_type(obj);
 786         if (obj->oo_destroy == OSD_DESTROY_SYNC)
 787                 dmu_tx_hold_free(oh->ot_tx, obj->oo_dn->dn_object,
 788                                  0, DMU_OBJECT_END);
 789         else
 790                 osd_tx_hold_zap(oh->ot_tx, osd->od_unlinked->dn_object,
 791                                 osd->od_unlinked, TRUE, NULL);
 792
 793         /* remove agent entry (if have) from remote parent */
 794         if (lu_object_has_agent_entry(&obj->oo_dt.do_lu))
 795                 osd_tx_hold_zap(oh->ot_tx, osd->od_remote_parent_dir,
 796                                 NULL, FALSE, NULL);
 797
 798         /* will help to find FID->ino when this object is being
 799          * added to PENDING/ */
 800         osd_idc_find_and_init(env, osd, obj);
 801
 802         RETURN(0);
 803 }
 804
 805 static int osd_destroy(const struct lu_env *env, struct dt_object *dt,
 806                        struct thandle *th)
 807 {
 808         struct osd_thread_info  *info = osd_oti_get(env);
 809         char                    *buf = info->oti_str;
 810         struct osd_object       *obj = osd_dt_obj(dt);
 811         struct osd_device       *osd = osd_obj2dev(obj);
 812         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
 813         struct osd_thandle      *oh;
 814         int                      rc;
 815         uint64_t                 oid, zapid;
 816         dnode_t *zdn;
 817         ENTRY;
 818
 819         down_write(&obj->oo_guard);
 820
 821         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
 822                 GOTO(out, rc = -ENOENT);
 823
 824         LASSERT(obj->oo_dn != NULL);
 825
 826         oh = container_of0(th, struct osd_thandle, ot_super);
 827         LASSERT(oh != NULL);
 828         LASSERT(oh->ot_tx != NULL);
 829
 830         /* remove obj ref from index dir (it depends) */
 831         zapid = osd_get_name_n_idx(env, osd, fid, buf,
 832                                    sizeof(info->oti_str), &zdn);
 833         rc = osd_xattrs_destroy(env, obj, oh);
 834         if (rc) {
 835                 CERROR("%s: cannot destroy xattrs for %s: rc = %d\n",
 836                        osd->od_svname, buf, rc);
 837                 GOTO(out, rc);
 838         }
 839
 840         if (lu_object_has_agent_entry(&obj->oo_dt.do_lu)) {
 841                 rc = osd_delete_from_remote_parent(env, osd, obj, oh, true);
 842                 if (rc)
 843                         GOTO(out, rc);
 844         }
 845
 846         oid = obj->oo_dn->dn_object;
 847         if (unlikely(obj->oo_destroy == OSD_DESTROY_NONE)) {
 848                 /* this may happen if the destroy wasn't declared
 849                  * e.g. when the object is created and then destroyed
 850                  * in the same transaction - we don't need additional
 851                  * space for destroy specifically */
 852                 LASSERT(obj->oo_attr.la_size <= osd_sync_destroy_max_size);
 853                 rc = -dmu_object_free(osd->od_os, oid, oh->ot_tx);
 854                 if (rc)
 855                         CERROR("%s: failed to free %s %llu: rc = %d\n",
 856                                osd->od_svname, buf, oid, rc);
 857         } else if (obj->oo_destroy == OSD_DESTROY_SYNC) {
 858                 rc = -dmu_object_free(osd->od_os, oid, oh->ot_tx);
 859                 if (rc)
 860                         CERROR("%s: failed to free %s %llu: rc = %d\n",
 861                                osd->od_svname, buf, oid, rc);
 862         } else { /* asynchronous destroy */
 863                 char *key = info->oti_key;
 864
 865                 rc = osd_object_unlinked_add(obj, oh);
 866                 if (rc)
 867                         GOTO(out, rc);
 868
 869                 snprintf(key, sizeof(info->oti_key), "%llx", oid);
 870                 rc = osd_zap_add(osd, osd->od_unlinked->dn_object,
 871                                  osd->od_unlinked, key, 8, 1, &oid, oh->ot_tx);
 872                 if (rc)
 873                         CERROR("%s: zap_add_int() failed %s %llu: rc = %d\n",
 874                                osd->od_svname, buf, oid, rc);
 875         }
 876
 877         /* Remove the OI mapping after the destroy to handle the race with
 878          * OI scrub that may insert missed OI mapping during the interval. */
 879         rc = osd_zap_remove(osd, zapid, zdn, buf, oh->ot_tx);
 880         if (unlikely(rc == -ENOENT))
 881                 rc = 0;
 882         if (rc)
 883                 CERROR("%s: zap_remove(%s) failed: rc = %d\n",
 884                        osd->od_svname, buf, rc);
 885
 886         GOTO(out, rc);
 887
 888 out:
 889         /* not needed in the cache anymore */
 890         set_bit(LU_OBJECT_HEARD_BANSHEE, &dt->do_lu.lo_header->loh_flags);
 891         if (rc == 0)
 892                 obj->oo_destroyed = 1;
 893         up_write(&obj->oo_guard);
 894         RETURN (0);
 895 }
 896
 897 static void osd_object_delete(const struct lu_env *env, struct lu_object *l)
 898 {
 899         struct osd_object *obj = osd_obj(l);
 900         const struct lu_fid *fid = lu_object_fid(l);
 901
 902         if (obj->oo_dn) {
 903                 if (likely(!fid_is_acct(fid))) {
 904                         osd_object_sa_fini(obj);
 905                         if (obj->oo_sa_xattr) {
 906                                 nvlist_free(obj->oo_sa_xattr);
 907                                 obj->oo_sa_xattr = NULL;
 908                         }
 909                         osd_dnode_rele(obj->oo_dn);
 910                         list_del(&obj->oo_sa_linkage);
 911                 }
 912                 obj->oo_dn = NULL;
 913         }
 914 }
 915
 916 /*
 917  * Concurrency: ->loo_object_release() is called under site spin-lock.
 918  */
 919 static void osd_object_release(const struct lu_env *env,
 920                                struct lu_object *l)
 921 {
 922 }
 923
 924 /*
 925  * Concurrency: shouldn't matter.
 926  */
 927 static int osd_object_print(const struct lu_env *env, void *cookie,
 928                             lu_printer_t p, const struct lu_object *l)
 929 {
 930         struct osd_object *o = osd_obj(l);
 931
 932         return (*p)(env, cookie, LUSTRE_OSD_ZFS_NAME"-object@%p", o);
 933 }
 934
 935 static void osd_read_lock(const struct lu_env *env, struct dt_object *dt,
 936                           unsigned role)
 937 {
 938         struct osd_object *obj = osd_dt_obj(dt);
 939
 940         LASSERT(osd_invariant(obj));
 941
 942         down_read_nested(&obj->oo_sem, role);
 943 }
 944
 945 static void osd_write_lock(const struct lu_env *env, struct dt_object *dt,
 946                            unsigned role)
 947 {
 948         struct osd_object *obj = osd_dt_obj(dt);
 949
 950         LASSERT(osd_invariant(obj));
 951
 952         down_write_nested(&obj->oo_sem, role);
 953 }
 954
 955 static void osd_read_unlock(const struct lu_env *env, struct dt_object *dt)
 956 {
 957         struct osd_object *obj = osd_dt_obj(dt);
 958
 959         LASSERT(osd_invariant(obj));
 960         up_read(&obj->oo_sem);
 961 }
 962
 963 static void osd_write_unlock(const struct lu_env *env, struct dt_object *dt)
 964 {
 965         struct osd_object *obj = osd_dt_obj(dt);
 966
 967         LASSERT(osd_invariant(obj));
 968         up_write(&obj->oo_sem);
 969 }
 970
 971 static int osd_write_locked(const struct lu_env *env, struct dt_object *dt)
 972 {
 973         struct osd_object *obj = osd_dt_obj(dt);
 974         int rc = 1;
 975
 976         LASSERT(osd_invariant(obj));
 977
 978         if (down_write_trylock(&obj->oo_sem)) {
 979                 rc = 0;
 980                 up_write(&obj->oo_sem);
 981         }
 982         return rc;
 983 }
 984
 985 static int osd_attr_get(const struct lu_env *env, struct dt_object *dt,
 986                         struct lu_attr *attr)
 987 {
 988         struct osd_object       *obj = osd_dt_obj(dt);
 989         uint64_t                 blocks;
 990         uint32_t                 blksize;
 991         int                      rc = 0;
 992
 993         down_read(&obj->oo_guard);
 994
 995         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
 996                 GOTO(out, rc = -ENOENT);
 997
 998         if (unlikely(fid_is_acct(lu_object_fid(&dt->do_lu))))
 999                 GOTO(out, rc = 0);
1000
1001         LASSERT(osd_invariant(obj));
1002         LASSERT(obj->oo_dn);
1003
1004         read_lock(&obj->oo_attr_lock);
1005         *attr = obj->oo_attr;
1006         if (obj->oo_lma_flags & LUSTRE_ORPHAN_FL) {
1007                 attr->la_valid |= LA_FLAGS;
1008                 attr->la_flags |= LUSTRE_ORPHAN_FL;
1009         }
1010         read_unlock(&obj->oo_attr_lock);
1011         if (attr->la_valid & LA_FLAGS && attr->la_flags & LUSTRE_ORPHAN_FL)
1012                 CDEBUG(D_INFO, "%s: set orphan flag on "DFID" (%llx/%x)\n",
1013                        osd_obj2dev(obj)->od_svname,
1014                        PFID(lu_object_fid(&dt->do_lu)),
1015                        attr->la_valid, obj->oo_lma_flags);
1016
1017         /* with ZFS_DEBUG zrl_add_debug() called by DB_DNODE_ENTER()
1018          * from within sa_object_size() can block on a mutex, so
1019          * we can't call sa_object_size() holding rwlock */
1020         sa_object_size(obj->oo_sa_hdl, &blksize, &blocks);
1021         /* we do not control size of indices, so always calculate
1022          * it from number of blocks reported by DMU */
1023         if (S_ISDIR(attr->la_mode))
1024                 attr->la_size = 512 * blocks;
1025         /* Block size may be not set; suggest maximal I/O transfers. */
1026         if (blksize == 0)
1027                 blksize = osd_spa_maxblocksize(
1028                         dmu_objset_spa(osd_obj2dev(obj)->od_os));
1029
1030         attr->la_blksize = blksize;
1031         attr->la_blocks = blocks;
1032         attr->la_valid |= LA_BLOCKS | LA_BLKSIZE;
1033
1034 out:
1035         up_read(&obj->oo_guard);
1036         return rc;
1037 }
1038
1039 /* Simple wrapper on top of qsd API which implement quota transfer for osd
1040  * setattr needs. As a reminder, only the root user can change ownership of
1041  * a file, that's why EDQUOT & EINPROGRESS errors are discarded */
1042 static inline int qsd_transfer(const struct lu_env *env,
1043                                struct qsd_instance *qsd,
1044                                struct lquota_trans *trans, int qtype,
1045                                __u64 orig_id, __u64 new_id, __u64 bspace,
1046                                struct lquota_id_info *qi, bool ignore_edquot)
1047 {
1048         int     rc;
1049
1050         if (unlikely(qsd == NULL))
1051                 return 0;
1052
1053         LASSERT(qtype >= 0 && qtype < LL_MAXQUOTAS);
1054         qi->lqi_type = qtype;
1055
1056         /* inode accounting */
1057         qi->lqi_is_blk = false;
1058
1059         /* one more inode for the new owner ... */
1060         qi->lqi_id.qid_uid = new_id;
1061         qi->lqi_space      = 1;
1062         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1063         if (ignore_edquot && (rc == -EDQUOT || rc == -EINPROGRESS))
1064                 rc = 0;
1065         if (rc)
1066                 return rc;
1067
1068         /* and one less inode for the current id */
1069         qi->lqi_id.qid_uid = orig_id;;
1070         qi->lqi_space      = -1;
1071         /* can't get EDQUOT when reducing usage */
1072         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1073         if (rc == -EINPROGRESS)
1074                 rc = 0;
1075         if (rc)
1076                 return rc;
1077
1078         /* block accounting */
1079         qi->lqi_is_blk = true;
1080
1081         /* more blocks for the new owner ... */
1082         qi->lqi_id.qid_uid = new_id;
1083         qi->lqi_space      = bspace;
1084         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1085         if (ignore_edquot && (rc == -EDQUOT || rc == -EINPROGRESS))
1086                 rc = 0;
1087         if (rc)
1088                 return rc;
1089
1090         /* and finally less blocks for the current owner */
1091         qi->lqi_id.qid_uid = orig_id;
1092         qi->lqi_space      = -bspace;
1093         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1094         /* can't get EDQUOT when reducing usage */
1095         if (rc == -EINPROGRESS)
1096                 rc = 0;
1097         return rc;
1098 }
1099
1100 static int osd_declare_attr_set(const struct lu_env *env,
1101                                 struct dt_object *dt,
1102                                 const struct lu_attr *attr,
1103                                 struct thandle *handle)
1104 {
1105         struct osd_thread_info  *info = osd_oti_get(env);
1106         struct osd_object       *obj = osd_dt_obj(dt);
1107         struct osd_device       *osd = osd_obj2dev(obj);
1108         dmu_tx_hold_t           *txh;
1109         struct osd_thandle      *oh;
1110         uint64_t                 bspace;
1111         uint32_t                 blksize;
1112         int                      rc = 0;
1113         bool                     found;
1114         ENTRY;
1115
1116
1117         LASSERT(handle != NULL);
1118         LASSERT(osd_invariant(obj));
1119
1120         oh = container_of0(handle, struct osd_thandle, ot_super);
1121
1122         down_read(&obj->oo_guard);
1123         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
1124                 GOTO(out, rc = 0);
1125
1126         LASSERT(obj->oo_sa_hdl != NULL);
1127         LASSERT(oh->ot_tx != NULL);
1128         /* regular attributes are part of the bonus buffer */
1129         /* let's check whether this object is already part of
1130          * transaction.. */
1131         found = false;
1132         for (txh = list_head(&oh->ot_tx->tx_holds); txh;
1133              txh = list_next(&oh->ot_tx->tx_holds, txh)) {
1134                 if (txh->txh_dnode == NULL)
1135                         continue;
1136                 if (txh->txh_dnode->dn_object != obj->oo_dn->dn_object)
1137                         continue;
1138                 /* this object is part of the transaction already
1139                  * we don't need to declare bonus again */
1140                 found = true;
1141                 break;
1142         }
1143         if (!found)
1144                 dmu_tx_hold_bonus(oh->ot_tx, obj->oo_dn->dn_object);
1145         if (oh->ot_tx->tx_err != 0)
1146                 GOTO(out, rc = -oh->ot_tx->tx_err);
1147
1148         if (attr && attr->la_valid & LA_FLAGS) {
1149                 /* LMA is usually a part of bonus, no need to declare
1150                  * anything else */
1151         }
1152
1153         if (attr && (attr->la_valid & (LA_UID | LA_GID | LA_PROJID))) {
1154                 sa_object_size(obj->oo_sa_hdl, &blksize, &bspace);
1155                 bspace = toqb(bspace * 512);
1156
1157                 CDEBUG(D_QUOTA, "%s: enforce quota on UID %u, GID %u,"
1158                        "the quota space is %lld (%u)\n", osd->od_svname,
1159                        attr->la_uid, attr->la_gid, bspace, blksize);
1160         }
1161
1162         if (attr && attr->la_valid & LA_UID) {
1163                 /* quota enforcement for user */
1164                 if (attr->la_uid != obj->oo_attr.la_uid) {
1165                         rc = qsd_transfer(env, osd_def_qsd(osd),
1166                                           &oh->ot_quota_trans, USRQUOTA,
1167                                           obj->oo_attr.la_uid, attr->la_uid,
1168                                           bspace, &info->oti_qi, true);
1169                         if (rc)
1170                                 GOTO(out, rc);
1171                 }
1172         }
1173         if (attr && attr->la_valid & LA_GID) {
1174                 /* quota enforcement for group */
1175                 if (attr->la_gid != obj->oo_attr.la_gid) {
1176                         rc = qsd_transfer(env, osd_def_qsd(osd),
1177                                           &oh->ot_quota_trans, GRPQUOTA,
1178                                           obj->oo_attr.la_gid, attr->la_gid,
1179                                           bspace, &info->oti_qi,
1180                                           !(attr->la_flags &
1181                                                         LUSTRE_SET_SYNC_FL));
1182                         if (rc)
1183                                 GOTO(out, rc);
1184                 }
1185         }
1186 #ifdef ZFS_PROJINHERIT
1187         if (attr && attr->la_valid & LA_PROJID) {
1188                 /* quota enforcement for project */
1189                 if (attr->la_projid != obj->oo_attr.la_projid) {
1190                         if (!osd->od_projectused_dn)
1191                                 GOTO(out, rc = -EOPNOTSUPP);
1192
1193                         /* Usually, if project quota is upgradable for the
1194                          * device, then the upgrade will be done before or when
1195                          * mount the device. So when we come here, this project
1196                          * should have project ID attribute already (that is
1197                          * zero by default).  Otherwise, there was something
1198                          * wrong during the former upgrade, let's return failure
1199                          * to report that.
1200                          *
1201                          * Please note that, different from other attributes,
1202                          * you can NOT simply set the project ID attribute under
1203                          * such case, because adding (NOT change) project ID
1204                          * attribute needs to change the object's attribute
1205                          * layout to match zfs backend quota accounting
1206                          * requirement. */
1207                         if (unlikely(!obj->oo_with_projid))
1208                                 GOTO(out, rc = -ENXIO);
1209
1210                         rc = qsd_transfer(env, osd_def_qsd(osd),
1211                                           &oh->ot_quota_trans, PRJQUOTA,
1212                                           obj->oo_attr.la_projid,
1213                                           attr->la_projid, bspace,
1214                                           &info->oti_qi, true);
1215                         if (rc)
1216                                 GOTO(out, rc);
1217                 }
1218         }
1219 #endif
1220 out:
1221         up_read(&obj->oo_guard);
1222         RETURN(rc);
1223 }
1224
1225 /*
1226  * Set the attributes of an object
1227  *
1228  * The transaction passed to this routine must have
1229  * dmu_tx_hold_bonus(tx, oid) called and then assigned
1230  * to a transaction group.
1231  */
1232 static int osd_attr_set(const struct lu_env *env, struct dt_object *dt,
1233                         const struct lu_attr *la, struct thandle *handle)
1234 {
1235         struct osd_thread_info  *info = osd_oti_get(env);
1236         sa_bulk_attr_t          *bulk = osd_oti_get(env)->oti_attr_bulk;
1237         struct osd_object       *obj = osd_dt_obj(dt);
1238         struct osd_device       *osd = osd_obj2dev(obj);
1239         struct osd_thandle      *oh;
1240         struct osa_attr         *osa = &info->oti_osa;
1241         __u64                    valid = la->la_valid;
1242         int                      cnt;
1243         int                      rc = 0;
1244
1245         ENTRY;
1246
1247         down_read(&obj->oo_guard);
1248         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
1249                 GOTO(out, rc = -ENOENT);
1250
1251         LASSERT(handle != NULL);
1252         LASSERT(osd_invariant(obj));
1253         LASSERT(obj->oo_sa_hdl);
1254
1255         oh = container_of0(handle, struct osd_thandle, ot_super);
1256         /* Assert that the transaction has been assigned to a
1257            transaction group. */
1258         LASSERT(oh->ot_tx->tx_txg != 0);
1259
1260         if (OBD_FAIL_CHECK(OBD_FAIL_OSD_FID_MAPPING) && !osd->od_is_ost) {
1261                 struct zpl_direntry *zde = &info->oti_zde.lzd_reg;
1262                 char *buf = info->oti_str;
1263                 dnode_t *zdn = NULL;
1264                 uint64_t zapid;
1265
1266                 zapid = osd_get_name_n_idx(env, osd, lu_object_fid(&dt->do_lu),
1267                                            buf, sizeof(info->oti_str), &zdn);
1268                 rc = osd_zap_lookup(osd, zapid, zdn, buf, 8,
1269                                     sizeof(*zde) / 8, zde);
1270                 if (!rc) {
1271                         zde->zde_dnode -= 1;
1272                         rc = -zap_update(osd->od_os, zapid, buf, 8,
1273                                          sizeof(*zde) / 8, zde, oh->ot_tx);
1274                 }
1275                 if (rc > 0)
1276                         rc = 0;
1277                 GOTO(out, rc);
1278         }
1279
1280         /* Only allow set size for regular file */
1281         if (!S_ISREG(dt->do_lu.lo_header->loh_attr))
1282                 valid &= ~(LA_SIZE | LA_BLOCKS);
1283
1284         if (valid & LA_CTIME && la->la_ctime == obj->oo_attr.la_ctime)
1285                 valid &= ~LA_CTIME;
1286
1287         if (valid & LA_MTIME && la->la_mtime == obj->oo_attr.la_mtime)
1288                 valid &= ~LA_MTIME;
1289
1290         if (valid & LA_ATIME && la->la_atime == obj->oo_attr.la_atime)
1291                 valid &= ~LA_ATIME;
1292
1293         if (valid == 0)
1294                 GOTO(out, rc = 0);
1295
1296         if (valid & LA_FLAGS) {
1297                 struct lustre_mdt_attrs *lma;
1298                 struct lu_buf buf;
1299                 int size = 0;
1300
1301                 if (la->la_flags & LUSTRE_LMA_FL_MASKS) {
1302                         LASSERT(!obj->oo_pfid_in_lma);
1303                         BUILD_BUG_ON(sizeof(info->oti_buf) < sizeof(*lma));
1304                         lma = (struct lustre_mdt_attrs *)&info->oti_buf;
1305                         buf.lb_buf = lma;
1306                         buf.lb_len = sizeof(info->oti_buf);
1307
1308                         /* Please do NOT call osd_xattr_get() directly, that
1309                          * will cause recursive down_read() on oo_guard. */
1310                         rc = osd_xattr_get_internal(env, obj, &buf,
1311                                                     XATTR_NAME_LMA, &size);
1312                         if (!rc && unlikely(size < sizeof(*lma))) {
1313                                 rc = -EINVAL;
1314                         } else if (!rc) {
1315                                 lma->lma_incompat =
1316                                         le32_to_cpu(lma->lma_incompat);
1317                                 lma->lma_incompat |=
1318                                         lustre_to_lma_flags(la->la_flags);
1319                                 lma->lma_incompat =
1320                                         cpu_to_le32(lma->lma_incompat);
1321                                 buf.lb_buf = lma;
1322                                 buf.lb_len = sizeof(*lma);
1323                                 rc = osd_xattr_set_internal(env, obj, &buf,
1324                                                             XATTR_NAME_LMA,
1325                                                             LU_XATTR_REPLACE,
1326                                                             oh);
1327                         }
1328                         if (rc < 0) {
1329                                 CWARN("%s: failed to set LMA flags: rc = %d\n",
1330                                        osd->od_svname, rc);
1331                                 GOTO(out, rc);
1332                         }
1333                 }
1334         }
1335
1336         write_lock(&obj->oo_attr_lock);
1337         cnt = 0;
1338
1339         if (valid & LA_PROJID) {
1340 #ifdef ZFS_PROJINHERIT
1341                 if (osd->od_projectused_dn) {
1342                         LASSERT(obj->oo_with_projid);
1343
1344                         osa->projid = obj->oo_attr.la_projid = la->la_projid;
1345                         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1346                                          &osa->projid, 8);
1347                 } else
1348 #endif
1349                         valid &= ~LA_PROJID;
1350         }
1351
1352         if (valid & LA_ATIME) {
1353                 osa->atime[0] = obj->oo_attr.la_atime = la->la_atime;
1354                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL,
1355                                  osa->atime, 16);
1356         }
1357         if (valid & LA_MTIME) {
1358                 osa->mtime[0] = obj->oo_attr.la_mtime = la->la_mtime;
1359                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL,
1360                                  osa->mtime, 16);
1361         }
1362         if (valid & LA_CTIME) {
1363                 osa->ctime[0] = obj->oo_attr.la_ctime = la->la_ctime;
1364                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL,
1365                                  osa->ctime, 16);
1366         }
1367         if (valid & LA_MODE) {
1368                 /* mode is stored along with type, so read it first */
1369                 obj->oo_attr.la_mode = (obj->oo_attr.la_mode & S_IFMT) |
1370                         (la->la_mode & ~S_IFMT);
1371                 osa->mode = obj->oo_attr.la_mode;
1372                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL,
1373                                  &osa->mode, 8);
1374         }
1375         if (valid & LA_SIZE) {
1376                 osa->size = obj->oo_attr.la_size = la->la_size;
1377                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL,
1378                                  &osa->size, 8);
1379         }
1380         if (valid & LA_NLINK) {
1381                 osa->nlink = obj->oo_attr.la_nlink = la->la_nlink;
1382                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL,
1383                                  &osa->nlink, 8);
1384         }
1385         if (valid & LA_RDEV) {
1386                 osa->rdev = obj->oo_attr.la_rdev = la->la_rdev;
1387                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL,
1388                                  &osa->rdev, 8);
1389         }
1390         if (valid & LA_FLAGS) {
1391                 osa->flags = attrs_fs2zfs(la->la_flags);
1392                 /* many flags are not supported by zfs, so ensure a good cached
1393                  * copy */
1394                 obj->oo_attr.la_flags = attrs_zfs2fs(osa->flags);
1395 #ifdef ZFS_PROJINHERIT
1396                 if (obj->oo_with_projid && osd->od_projectused_dn)
1397                         osa->flags |= ZFS_PROJID;
1398 #endif
1399                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL,
1400                                  &osa->flags, 8);
1401         }
1402         if (valid & LA_UID) {
1403                 osa->uid = obj->oo_attr.la_uid = la->la_uid;
1404                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL,
1405                                  &osa->uid, 8);
1406         }
1407         if (valid & LA_GID) {
1408                 osa->gid = obj->oo_attr.la_gid = la->la_gid;
1409                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL,
1410                                  &osa->gid, 8);
1411         }
1412         obj->oo_attr.la_valid |= valid;
1413         write_unlock(&obj->oo_attr_lock);
1414
1415         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1416         rc = osd_object_sa_bulk_update(obj, bulk, cnt, oh);
1417
1418 out:
1419         up_read(&obj->oo_guard);
1420         RETURN(rc);
1421 }
1422
1423 /*
1424  * Object creation.
1425  *
1426  * XXX temporary solution.
1427  */
1428
1429 static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
1430                         struct dt_object *parent, struct dt_object *child,
1431                         umode_t child_mode)
1432 {
1433         LASSERT(ah);
1434
1435         ah->dah_parent = parent;
1436         ah->dah_mode = child_mode;
1437
1438         if (parent != NULL && !dt_object_remote(parent)) {
1439                 /* will help to find FID->ino at dt_insert("..") */
1440                 struct osd_object *pobj = osd_dt_obj(parent);
1441
1442                 osd_idc_find_and_init(env, osd_obj2dev(pobj), pobj);
1443         }
1444 }
1445
1446 static int osd_declare_create(const struct lu_env *env, struct dt_object *dt,
1447                               struct lu_attr *attr,
1448                               struct dt_allocation_hint *hint,
1449                               struct dt_object_format *dof,
1450                               struct thandle *handle)
1451 {
1452         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1453         struct osd_object       *obj = osd_dt_obj(dt);
1454         struct osd_device       *osd = osd_obj2dev(obj);
1455         struct osd_thandle      *oh;
1456         uint64_t                 zapid;
1457         dnode_t                 *dn;
1458         int                      rc, dnode_size;
1459         ENTRY;
1460
1461         LASSERT(dof);
1462
1463         switch (dof->dof_type) {
1464                 case DFT_REGULAR:
1465                 case DFT_SYM:
1466                 case DFT_NODE:
1467                         if (obj->oo_dt.do_body_ops == NULL)
1468                                 obj->oo_dt.do_body_ops = &osd_body_ops;
1469                         break;
1470                 default:
1471                         break;
1472         }
1473
1474         LASSERT(handle != NULL);
1475         oh = container_of0(handle, struct osd_thandle, ot_super);
1476         LASSERT(oh->ot_tx != NULL);
1477
1478         /* this is the minimum set of EAs on every Lustre object */
1479         obj->oo_ea_in_bonus = OSD_BASE_EA_IN_BONUS;
1480         /* reserve 32 bytes for extra stuff like ACLs */
1481         dnode_size = size_roundup_power2(obj->oo_ea_in_bonus + 32);
1482
1483         switch (dof->dof_type) {
1484                 case DFT_DIR:
1485                         dt->do_index_ops = &osd_dir_ops;
1486                         /* fallthrough */
1487                 case DFT_INDEX:
1488                         /* for zap create */
1489                         dmu_tx_hold_zap(oh->ot_tx, DMU_NEW_OBJECT, FALSE, NULL);
1490                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1491                         break;
1492                 case DFT_REGULAR:
1493                 case DFT_SYM:
1494                 case DFT_NODE:
1495                         /* first, we'll create new object */
1496                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1497                         break;
1498
1499                 default:
1500                         LBUG();
1501                         break;
1502         }
1503
1504         /* and we'll add it to some mapping */
1505         zapid = osd_get_name_n_idx(env, osd, fid, NULL, 0, &dn);
1506         osd_tx_hold_zap(oh->ot_tx, zapid, dn, TRUE, NULL);
1507
1508         /* will help to find FID->ino mapping at dt_insert() */
1509         osd_idc_find_and_init(env, osd, obj);
1510
1511         rc = osd_declare_quota(env, osd, attr->la_uid, attr->la_gid,
1512                                attr->la_projid, 1, oh, NULL, OSD_QID_INODE);
1513
1514         RETURN(rc);
1515 }
1516
1517 int __osd_attr_init(const struct lu_env *env, struct osd_device *osd,
1518                     struct osd_object *obj, sa_handle_t *sa_hdl, dmu_tx_t *tx,
1519                     struct lu_attr *la, uint64_t parent,
1520                     nvlist_t *xattr)
1521 {
1522         sa_bulk_attr_t *bulk = osd_oti_get(env)->oti_attr_bulk;
1523         struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
1524         uint64_t gen;
1525         uint64_t crtime[2];
1526         inode_timespec_t now;
1527         int cnt;
1528         int rc;
1529         char *dxattr = NULL;
1530         size_t sa_size;
1531
1532
1533         LASSERT(sa_hdl);
1534
1535         gen = dmu_tx_get_txg(tx);
1536         gethrestime(&now);
1537         ZFS_TIME_ENCODE(&now, crtime);
1538
1539         osa->atime[0] = la->la_atime;
1540         osa->ctime[0] = la->la_ctime;
1541         osa->mtime[0] = la->la_mtime;
1542         osa->mode = la->la_mode;
1543         osa->uid = la->la_uid;
1544         osa->gid = la->la_gid;
1545         osa->rdev = la->la_rdev;
1546         osa->nlink = la->la_nlink;
1547         if (la->la_valid & LA_FLAGS)
1548                 osa->flags = attrs_fs2zfs(la->la_flags);
1549         else
1550                 osa->flags = 0;
1551         osa->size  = la->la_size;
1552 #ifdef ZFS_PROJINHERIT
1553         if (osd->od_projectused_dn) {
1554                 if (la->la_valid & LA_PROJID)
1555                         osa->projid = la->la_projid;
1556                 else
1557                         osa->projid = ZFS_DEFAULT_PROJID;
1558                 osa->flags |= ZFS_PROJID;
1559                 if (obj)
1560                         obj->oo_with_projid = 1;
1561         } else {
1562                 osa->flags &= ~ZFS_PROJID;
1563         }
1564 #endif
1565
1566         /*
1567          * we need to create all SA below upon object create.
1568          *
1569          * XXX The attribute order matters since the accounting callback relies
1570          * on static offsets (i.e. SA_*_OFFSET, see zfs_space_delta_cb()) to
1571          * look up the UID/GID/PROJID attributes. Moreover, the callback does
1572          * not seem to support the spill block.
1573          * We define attributes in the same order as SA_*_OFFSET in order to
1574          * work around the problem. See ORI-610.
1575          */
1576         cnt = 0;
1577         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL, &osa->mode, 8);
1578         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL, &osa->size, 8);
1579         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GEN(osd), NULL, &gen, 8);
1580         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL, &osa->uid, 8);
1581         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL, &osa->gid, 8);
1582         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PARENT(osd), NULL, &parent, 8);
1583         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL, &osa->flags, 8);
1584         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL, osa->atime, 16);
1585         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL, osa->mtime, 16);
1586         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL, osa->ctime, 16);
1587         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(osd), NULL, crtime, 16);
1588         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL, &osa->nlink, 8);
1589 #ifdef ZFS_PROJINHERIT
1590         if (osd->od_projectused_dn)
1591                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1592                                  &osa->projid, 8);
1593 #endif
1594         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL, &osa->rdev, 8);
1595         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1596
1597         if (xattr) {
1598                 rc = -nvlist_size(xattr, &sa_size, NV_ENCODE_XDR);
1599                 LASSERT(rc == 0);
1600
1601                 dxattr = osd_zio_buf_alloc(sa_size);
1602                 LASSERT(dxattr);
1603
1604                 rc = -nvlist_pack(xattr, &dxattr, &sa_size,
1605                                 NV_ENCODE_XDR, KM_SLEEP);
1606                 LASSERT(rc == 0);
1607
1608                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_DXATTR(osd),
1609                                 NULL, dxattr, sa_size);
1610         }
1611
1612         rc = -sa_replace_all_by_template(sa_hdl, bulk, cnt, tx);
1613         if (dxattr)
1614                 osd_zio_buf_free(dxattr, sa_size);
1615
1616         return rc;
1617 }
1618
1619 int osd_find_new_dnode(const struct lu_env *env, dmu_tx_t *tx,
1620                        uint64_t oid, dnode_t **dnp)
1621 {
1622         dmu_tx_hold_t *txh;
1623         int rc = 0;
1624
1625         /* take dnode_t from tx to save on dnode#->dnode_t lookup */
1626         for (txh = list_tail(&tx->tx_holds); txh;
1627              txh = list_prev(&tx->tx_holds, txh)) {
1628                 dnode_t *dn = txh->txh_dnode;
1629                 dmu_buf_impl_t *db;
1630
1631                 if (dn == NULL)
1632                         continue;
1633                 if (dn->dn_object != oid)
1634                         continue;
1635                 db = dn->dn_bonus;
1636                 if (db == NULL) {
1637                         rw_enter(&dn->dn_struct_rwlock, RW_WRITER);
1638                         if (dn->dn_bonus == NULL)
1639                                 dbuf_create_bonus(dn);
1640                         rw_exit(&dn->dn_struct_rwlock);
1641                 }
1642                 db = dn->dn_bonus;
1643                 LASSERT(db);
1644                 LASSERT(dn->dn_handle);
1645                 DB_DNODE_ENTER(db);
1646                 if (zfs_refcount_add(&db->db_holds, osd_obj_tag) == 1) {
1647                         zfs_refcount_add(&dn->dn_holds, osd_obj_tag);
1648                         atomic_inc_32(&dn->dn_dbufs_count);
1649                 }
1650                 *dnp = dn;
1651                 DB_DNODE_EXIT(db);
1652                 dbuf_read(db, NULL, DB_RF_MUST_SUCCEED | DB_RF_NOPREFETCH);
1653                 break;
1654         }
1655
1656         if (unlikely(*dnp == NULL))
1657                 rc = __osd_obj2dnode(tx->tx_objset, oid, dnp);
1658
1659         return rc;
1660 }
1661
1662 #ifdef HAVE_DMU_OBJECT_ALLOC_DNSIZE
1663 int osd_find_dnsize(struct osd_device *osd, int ea_in_bonus)
1664 {
1665         int dnsize;
1666
1667         if (osd->od_dnsize == ZFS_DNSIZE_AUTO) {
1668                 dnsize = DNODE_MIN_SIZE;
1669                 do {
1670                         if (DN_BONUS_SIZE(dnsize) >= ea_in_bonus + 32)
1671                                 break;
1672                         dnsize <<= 1;
1673                 } while (dnsize < DNODE_MAX_SIZE);
1674                 if (dnsize > DNODE_MAX_SIZE)
1675                         dnsize = DNODE_MAX_SIZE;
1676         } else if (osd->od_dnsize == ZFS_DNSIZE_1K) {
1677                 dnsize = 1024;
1678         } else if (osd->od_dnsize == ZFS_DNSIZE_2K) {
1679                 dnsize = 2048;
1680         } else if (osd->od_dnsize == ZFS_DNSIZE_4K) {
1681                 dnsize = 4096;
1682         } else if (osd->od_dnsize == ZFS_DNSIZE_8K) {
1683                 dnsize = 8192;
1684         } else if (osd->od_dnsize == ZFS_DNSIZE_16K) {
1685                 dnsize = 16384;
1686         } else {
1687                 dnsize = DNODE_MIN_SIZE;
1688         }
1689         return dnsize;
1690 }
1691 #endif
1692
1693 /*
1694  * The transaction passed to this routine must have
1695  * dmu_tx_hold_bonus(tx, DMU_NEW_OBJECT) called and then assigned
1696  * to a transaction group.
1697  */
1698 int __osd_object_create(const struct lu_env *env, struct osd_device *osd,
1699                         struct osd_object *obj, const struct lu_fid *fid,
1700                         dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la)
1701 {
1702         dmu_object_type_t type = DMU_OT_PLAIN_FILE_CONTENTS;
1703         uint64_t oid;
1704         int size;
1705
1706         /* Use DMU_OTN_UINT8_METADATA for local objects so their data blocks
1707          * would get an additional ditto copy */
1708         if (unlikely(S_ISREG(la->la_mode) &&
1709                      fid_seq_is_local_file(fid_seq(fid))))
1710                 type = DMU_OTN_UINT8_METADATA;
1711
1712         /* Create a new DMU object using the default dnode size. */
1713         if (obj)
1714                 size = obj->oo_ea_in_bonus;
1715         else
1716                 size = OSD_BASE_EA_IN_BONUS;
1717         oid = osd_dmu_object_alloc(osd->od_os, type, 0,
1718                                    osd_find_dnsize(osd, size), tx);
1719
1720         LASSERT(la->la_valid & LA_MODE);
1721         la->la_size = 0;
1722         la->la_nlink = 1;
1723
1724         return osd_find_new_dnode(env, tx, oid, dnp);
1725 }
1726
1727 /*
1728  * The transaction passed to this routine must have
1729  * dmu_tx_hold_zap(tx, DMU_NEW_OBJECT, ...) called and then assigned
1730  * to a transaction group.
1731  *
1732  * Using ZAP_FLAG_HASH64 will force the ZAP to always be a FAT ZAP.
1733  * This is fine for directories today, because storing the FID in the dirent
1734  * will also require a FAT ZAP.  If there is a new type of micro ZAP created
1735  * then we might need to re-evaluate the use of this flag and instead do
1736  * a conversion from the different internal ZAP hash formats being used. */
1737 int __osd_zap_create(const struct lu_env *env, struct osd_device *osd,
1738                      dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la,
1739                      unsigned dnsize, zap_flags_t flags)
1740 {
1741         uint64_t oid;
1742
1743         /* Assert that the transaction has been assigned to a
1744            transaction group. */
1745         LASSERT(tx->tx_txg != 0);
1746         *dnp = NULL;
1747
1748         oid = osd_zap_create_flags(osd->od_os, 0, flags | ZAP_FLAG_HASH64,
1749                                    DMU_OT_DIRECTORY_CONTENTS,
1750                                    14, /* == ZFS fzap_default_blockshift */
1751                                    DN_MAX_INDBLKSHIFT, /* indirect blockshift */
1752                                    dnsize, tx);
1753
1754         la->la_size = 2;
1755         la->la_nlink = 1;
1756
1757         return osd_find_new_dnode(env, tx, oid, dnp);
1758 }
1759
1760 static dnode_t *osd_mkidx(const struct lu_env *env, struct osd_object *obj,
1761                           struct lu_attr *la, struct osd_thandle *oh)
1762 {
1763         struct osd_device *osd = osd_obj2dev(obj);
1764         dnode_t *dn;
1765         int rc;
1766
1767         /* Index file should be created as regular file in order not to confuse
1768          * ZPL which could interpret them as directory.
1769          * We set ZAP_FLAG_UINT64_KEY to let ZFS know than we are going to use
1770          * binary keys */
1771         LASSERT(S_ISREG(la->la_mode));
1772         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1773                 osd_find_dnsize(osd, obj->oo_ea_in_bonus), ZAP_FLAG_UINT64_KEY);
1774         if (rc)
1775                 return ERR_PTR(rc);
1776         return dn;
1777 }
1778
1779 static dnode_t *osd_mkdir(const struct lu_env *env, struct osd_object *obj,
1780                           struct lu_attr *la, struct osd_thandle *oh)
1781 {
1782         struct osd_device *osd = osd_obj2dev(obj);
1783         dnode_t *dn;
1784         int rc;
1785
1786         LASSERT(S_ISDIR(la->la_mode));
1787         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1788                               osd_find_dnsize(osd, obj->oo_ea_in_bonus), 0);
1789         if (rc)
1790                 return ERR_PTR(rc);
1791         return dn;
1792 }
1793
1794 static dnode_t *osd_mkreg(const struct lu_env *env, struct osd_object *obj,
1795                           struct lu_attr *la, struct osd_thandle *oh)
1796 {
1797         const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
1798         struct osd_device *osd = osd_obj2dev(obj);
1799         dnode_t *dn;
1800         int rc;
1801
1802         LASSERT(S_ISREG(la->la_mode));
1803         rc = __osd_object_create(env, osd, obj, fid, &dn, oh->ot_tx, la);
1804         if (rc)
1805                 return ERR_PTR(rc);
1806
1807         if ((fid_is_idif(fid) || fid_is_norm(fid) || fid_is_echo(fid))) {
1808                 /* The minimum block size must be at least page size otherwise
1809                  * it will break the assumption in tgt_thread_big_cache where
1810                  * the array size is PTLRPC_MAX_BRW_PAGES. It will also affect
1811                  * RDMA due to subpage transfer size */
1812                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1813                                                PAGE_SIZE, 0, oh->ot_tx);
1814                 if (unlikely(rc)) {
1815                         CERROR("%s: can't change blocksize: %d\n",
1816                                osd->od_svname, rc);
1817                         return ERR_PTR(rc);
1818                 }
1819         } else if ((fid_is_llog(fid))) {
1820                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1821                                                LLOG_MIN_CHUNK_SIZE, 0, oh->ot_tx);
1822                 if (unlikely(rc)) {
1823                         CERROR("%s: can't change blocksize: %d\n",
1824                                osd->od_svname, rc);
1825                         return ERR_PTR(rc);
1826                 }
1827         }
1828
1829         return dn;
1830 }
1831
1832 static dnode_t *osd_mksym(const struct lu_env *env, struct osd_object *obj,
1833                           struct lu_attr *la, struct osd_thandle *oh)
1834 {
1835         dnode_t *dn;
1836         int rc;
1837
1838         LASSERT(S_ISLNK(la->la_mode));
1839         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1840                                  lu_object_fid(&obj->oo_dt.do_lu),
1841                                  &dn, oh->ot_tx, la);
1842         if (rc)
1843                 return ERR_PTR(rc);
1844         return dn;
1845 }
1846
1847 static dnode_t *osd_mknod(const struct lu_env *env, struct osd_object *obj,
1848                           struct lu_attr *la, struct osd_thandle *oh)
1849 {
1850         dnode_t *dn;
1851         int rc;
1852
1853         if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode))
1854                 la->la_valid |= LA_RDEV;
1855
1856         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1857                                  lu_object_fid(&obj->oo_dt.do_lu),
1858                                  &dn, oh->ot_tx, la);
1859         if (rc)
1860                 return ERR_PTR(rc);
1861         return dn;
1862 }
1863
1864 typedef dnode_t *(*osd_obj_type_f)(const struct lu_env *env,
1865                                    struct osd_object *obj,
1866                                    struct lu_attr *la,
1867                                    struct osd_thandle *oh);
1868
1869 static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
1870 {
1871         osd_obj_type_f result;
1872
1873         switch (type) {
1874         case DFT_DIR:
1875                 result = osd_mkdir;
1876                 break;
1877         case DFT_INDEX:
1878                 result = osd_mkidx;
1879                 break;
1880         case DFT_REGULAR:
1881                 result = osd_mkreg;
1882                 break;
1883         case DFT_SYM:
1884                 result = osd_mksym;
1885                 break;
1886         case DFT_NODE:
1887                 result = osd_mknod;
1888                 break;
1889         default:
1890                 LBUG();
1891                 break;
1892         }
1893         return result;
1894 }
1895
1896 /*
1897  * Concurrency: @dt is write locked.
1898  */
1899 static int osd_create(const struct lu_env *env, struct dt_object *dt,
1900                       struct lu_attr *attr, struct dt_allocation_hint *hint,
1901                       struct dt_object_format *dof, struct thandle *th)
1902 {
1903         struct osd_thread_info  *info = osd_oti_get(env);
1904         struct lustre_mdt_attrs *lma = &info->oti_mdt_attrs;
1905         struct zpl_direntry     *zde = &info->oti_zde.lzd_reg;
1906         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1907         struct osd_object       *obj = osd_dt_obj(dt);
1908         struct osd_device       *osd = osd_obj2dev(obj);
1909         char                    *buf = info->oti_str;
1910         struct osd_thandle      *oh;
1911         dnode_t *dn = NULL, *zdn = NULL;
1912         uint64_t                 zapid, parent = 0;
1913         int                      rc;
1914         __u32 compat = 0;
1915
1916         ENTRY;
1917
1918         LASSERT(!fid_is_acct(fid));
1919
1920         /* concurrent create declarations should not see
1921          * the object inconsistent (db, attr, etc).
1922          * in regular cases acquisition should be cheap */
1923         down_write(&obj->oo_guard);
1924
1925         if (unlikely(dt_object_exists(dt)))
1926                 GOTO(out, rc = -EEXIST);
1927
1928         LASSERT(osd_invariant(obj));
1929         LASSERT(dof != NULL);
1930
1931         LASSERT(th != NULL);
1932         oh = container_of0(th, struct osd_thandle, ot_super);
1933
1934         LASSERT(obj->oo_dn == NULL);
1935
1936         /* to follow ZFS on-disk format we need
1937          * to initialize parent dnode properly */
1938         if (hint != NULL && hint->dah_parent != NULL &&
1939             !dt_object_remote(hint->dah_parent))
1940                 parent = osd_dt_obj(hint->dah_parent)->oo_dn->dn_object;
1941
1942         /* we may fix some attributes, better do not change the source */
1943         obj->oo_attr = *attr;
1944         obj->oo_attr.la_valid |= LA_SIZE | LA_NLINK | LA_TYPE;
1945
1946 #ifdef ZFS_PROJINHERIT
1947         if (osd->od_projectused_dn) {
1948                 if (!(obj->oo_attr.la_valid & LA_PROJID))
1949                         obj->oo_attr.la_projid = ZFS_DEFAULT_PROJID;
1950                 obj->oo_with_projid = 1;
1951         }
1952 #endif
1953
1954         dn = osd_create_type_f(dof->dof_type)(env, obj, &obj->oo_attr, oh);
1955         if (IS_ERR(dn)) {
1956                 rc = PTR_ERR(dn);
1957                 dn = NULL;
1958                 GOTO(out, rc);
1959         }
1960
1961         zde->zde_pad = 0;
1962         zde->zde_dnode = dn->dn_object;
1963         zde->zde_type = IFTODT(attr->la_mode & S_IFMT);
1964
1965         zapid = osd_get_name_n_idx(env, osd, fid, buf,
1966                                    sizeof(info->oti_str), &zdn);
1967         if (CFS_FAIL_CHECK(OBD_FAIL_OSD_NO_OI_ENTRY) ||
1968             (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_NO_ENTRY)))
1969                 goto skip_add;
1970
1971         if (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_INVALID_ENTRY))
1972                 zde->zde_dnode++;
1973
1974         rc = osd_zap_add(osd, zapid, zdn, buf, 8, 1, zde, oh->ot_tx);
1975         if (rc)
1976                 GOTO(out, rc);
1977
1978 skip_add:
1979         obj->oo_dn = dn;
1980         /* Now add in all of the "SA" attributes */
1981         rc = osd_sa_handle_get(obj);
1982         if (rc)
1983                 GOTO(out, rc);
1984
1985         rc = -nvlist_alloc(&obj->oo_sa_xattr, NV_UNIQUE_NAME, KM_SLEEP);
1986         if (rc)
1987                 GOTO(out, rc);
1988
1989         /* initialize LMA */
1990         if (fid_is_idif(fid) || (fid_is_norm(fid) && osd->od_is_ost))
1991                 compat |= LMAC_FID_ON_OST;
1992         lustre_lma_init(lma, fid, compat, 0);
1993         lustre_lma_swab(lma);
1994         rc = -nvlist_add_byte_array(obj->oo_sa_xattr, XATTR_NAME_LMA,
1995                                     (uchar_t *)lma, sizeof(*lma));
1996         if (rc)
1997                 GOTO(out, rc);
1998
1999         /* configure new osd object */
2000         obj->oo_parent = parent != 0 ? parent : zapid;
2001         obj->oo_late_attr_set = 1;
2002         rc = __osd_sa_xattr_schedule_update(env, obj, oh);
2003         if (rc)
2004                 GOTO(out, rc);
2005
2006         /* XXX: oo_lma_flags */
2007         obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
2008         if (likely(!fid_is_acct(lu_object_fid(&obj->oo_dt.do_lu))))
2009                 /* no body operations for accounting objects */
2010                 obj->oo_dt.do_body_ops = &osd_body_ops;
2011
2012         osd_idc_find_and_init(env, osd, obj);
2013
2014 out:
2015         if (unlikely(rc && dn)) {
2016                 dmu_object_free(osd->od_os, dn->dn_object, oh->ot_tx);
2017                 osd_dnode_rele(dn);
2018                 obj->oo_dn = NULL;
2019         } else if (!rc) {
2020                 obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
2021         }
2022         up_write(&obj->oo_guard);
2023         RETURN(rc);
2024 }
2025
2026 static int osd_declare_ref_add(const struct lu_env *env, struct dt_object *dt,
2027                                struct thandle *th)
2028 {
2029         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2030         return osd_declare_attr_set(env, dt, NULL, th);
2031 }
2032
2033 /*
2034  * Concurrency: @dt is write locked.
2035  */
2036 static int osd_ref_add(const struct lu_env *env, struct dt_object *dt,
2037                        struct thandle *handle)
2038 {
2039         struct osd_object       *obj = osd_dt_obj(dt);
2040         struct osd_thandle      *oh;
2041         struct osd_device       *osd = osd_obj2dev(obj);
2042         uint64_t                 nlink;
2043         int rc;
2044
2045         ENTRY;
2046
2047         down_read(&obj->oo_guard);
2048         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2049                 GOTO(out, rc = -ENOENT);
2050
2051         LASSERT(osd_invariant(obj));
2052         LASSERT(obj->oo_sa_hdl != NULL);
2053
2054         oh = container_of0(handle, struct osd_thandle, ot_super);
2055
2056         write_lock(&obj->oo_attr_lock);
2057         nlink = ++obj->oo_attr.la_nlink;
2058         write_unlock(&obj->oo_attr_lock);
2059
2060         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2061
2062 out:
2063         up_read(&obj->oo_guard);
2064         RETURN(rc);
2065 }
2066
2067 static int osd_declare_ref_del(const struct lu_env *env, struct dt_object *dt,
2068                                struct thandle *handle)
2069 {
2070         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2071         return osd_declare_attr_set(env, dt, NULL, handle);
2072 }
2073
2074 /*
2075  * Concurrency: @dt is write locked.
2076  */
2077 static int osd_ref_del(const struct lu_env *env, struct dt_object *dt,
2078                        struct thandle *handle)
2079 {
2080         struct osd_object       *obj = osd_dt_obj(dt);
2081         struct osd_thandle      *oh;
2082         struct osd_device       *osd = osd_obj2dev(obj);
2083         uint64_t                 nlink;
2084         int                      rc;
2085
2086         ENTRY;
2087
2088         down_read(&obj->oo_guard);
2089
2090         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2091                 GOTO(out, rc = -ENOENT);
2092
2093         LASSERT(osd_invariant(obj));
2094         LASSERT(obj->oo_sa_hdl != NULL);
2095
2096         oh = container_of0(handle, struct osd_thandle, ot_super);
2097         LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
2098
2099         write_lock(&obj->oo_attr_lock);
2100         nlink = --obj->oo_attr.la_nlink;
2101         write_unlock(&obj->oo_attr_lock);
2102
2103         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2104
2105 out:
2106         up_read(&obj->oo_guard);
2107         RETURN(rc);
2108 }
2109
2110 static int osd_object_sync(const struct lu_env *env, struct dt_object *dt,
2111                            __u64 start, __u64 end)
2112 {
2113         struct osd_device *osd = osd_obj2dev(osd_dt_obj(dt));
2114         struct dmu_buf_impl *db = osd_dt_obj(dt)->oo_dn->dn_dbuf;
2115         uint64_t txg = 0;
2116         ENTRY;
2117
2118         if (osd->od_dt_dev.dd_rdonly)
2119                 RETURN(0);
2120
2121         mutex_enter(&db->db_mtx);
2122         if (db->db_last_dirty)
2123                 txg = db->db_last_dirty->dr_txg;
2124         mutex_exit(&db->db_mtx);
2125
2126         if (txg) {
2127                 /* the object is dirty or being synced */
2128                 if (osd_object_sync_delay_us < 0)
2129                         txg_wait_synced(dmu_objset_pool(osd->od_os), txg);
2130                 else
2131                         udelay(osd_object_sync_delay_us);
2132         }
2133
2134         RETURN(0);
2135 }
2136
2137 static int osd_invalidate(const struct lu_env *env, struct dt_object *dt)
2138 {
2139         return 0;
2140 }
2141
2142 static struct dt_object_operations osd_obj_ops = {
2143         .do_read_lock           = osd_read_lock,
2144         .do_write_lock          = osd_write_lock,
2145         .do_read_unlock         = osd_read_unlock,
2146         .do_write_unlock        = osd_write_unlock,
2147         .do_write_locked        = osd_write_locked,
2148         .do_attr_get            = osd_attr_get,
2149         .do_declare_attr_set    = osd_declare_attr_set,
2150         .do_attr_set            = osd_attr_set,
2151         .do_ah_init             = osd_ah_init,
2152         .do_declare_create      = osd_declare_create,
2153         .do_create              = osd_create,
2154         .do_declare_destroy     = osd_declare_destroy,
2155         .do_destroy             = osd_destroy,
2156         .do_index_try           = osd_index_try,
2157         .do_declare_ref_add     = osd_declare_ref_add,
2158         .do_ref_add             = osd_ref_add,
2159         .do_declare_ref_del     = osd_declare_ref_del,
2160         .do_ref_del             = osd_ref_del,
2161         .do_xattr_get           = osd_xattr_get,
2162         .do_declare_xattr_set   = osd_declare_xattr_set,
2163         .do_xattr_set           = osd_xattr_set,
2164         .do_declare_xattr_del   = osd_declare_xattr_del,
2165         .do_xattr_del           = osd_xattr_del,
2166         .do_xattr_list          = osd_xattr_list,
2167         .do_object_sync         = osd_object_sync,
2168         .do_invalidate          = osd_invalidate,
2169 };
2170
2171 static struct lu_object_operations osd_lu_obj_ops = {
2172         .loo_object_init        = osd_object_init,
2173         .loo_object_delete      = osd_object_delete,
2174         .loo_object_release     = osd_object_release,
2175         .loo_object_free        = osd_object_free,
2176         .loo_object_print       = osd_object_print,
2177         .loo_object_invariant   = osd_object_invariant,
2178 };
2179
2180 static int osd_otable_it_attr_get(const struct lu_env *env,
2181                                 struct dt_object *dt,
2182                                 struct lu_attr *attr)
2183 {
2184         attr->la_valid = 0;
2185         return 0;
2186 }
2187
2188 static struct dt_object_operations osd_obj_otable_it_ops = {
2189         .do_attr_get            = osd_otable_it_attr_get,
2190         .do_index_try           = osd_index_try,
2191 };
2192
2193 module_param(osd_object_sync_delay_us, int, 0644);
2194 MODULE_PARM_DESC(osd_object_sync_delay_us,
2195                  "If zero or larger delay N usec instead of doing object sync");