+/*
+ * GPL HEADER START
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2 only,
+ * as published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License version 2 for more details (a copy is included
+ * in the LICENSE file that accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License
+ * version 2 along with this program; If not, see
+ * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ * GPL HEADER END
+ */
+/*
+ * Copyright (c) 2009, 2010, Oracle and/or its affiliates. All rights reserved.
+ * Use is subject to license terms.
+ */
+/*
+ * Copyright (c) 2011, 2012 Whamcloud, Inc.
+ * Use is subject to license terms.
+ */
+/*
+ * This file is part of Lustre, http://www.lustre.org/
+ * Lustre is a trademark of Sun Microsystems, Inc.
+ *
+ * lustre/osd-zfs/osd_object.c
+ *
+ * Author: Alex Zhuravlev <bzzz@whamcloud.com>
+ * Author: Mike Pershin <tappro@whamcloud.com>
+ * Author: Johann Lombardi <johann@whamcloud.com>
+ */
+
+#ifndef EXPORT_SYMTAB
+# define EXPORT_SYMTAB
+#endif
+#define DEBUG_SUBSYSTEM S_OSD
+
+#include <lustre_ver.h>
+#include <libcfs/libcfs.h>
+#include <lustre_fsfilt.h>
+#include <obd_support.h>
+#include <lustre_net.h>
+#include <obd.h>
+#include <obd_class.h>
+#include <lustre_disk.h>
+#include <lustre_fid.h>
+
+#include "osd_internal.h"
+
+#include <sys/dnode.h>
+#include <sys/dbuf.h>
+#include <sys/spa.h>
+#include <sys/stat.h>
+#include <sys/zap.h>
+#include <sys/spa_impl.h>
+#include <sys/zfs_znode.h>
+#include <sys/dmu_tx.h>
+#include <sys/dmu_objset.h>
+#include <sys/dsl_prop.h>
+#include <sys/sa_impl.h>
+#include <sys/txg.h>
+
+static char *osd_obj_tag = "osd_object";
+
+static struct dt_object_operations osd_obj_ops;
+static struct lu_object_operations osd_lu_obj_ops;
+extern struct dt_body_operations osd_body_ops;
+
+extern cfs_mem_cache_t *osd_object_kmem;
+
+static void
+osd_object_sa_fini(struct osd_object *obj)
+{
+ if (obj->oo_sa_hdl) {
+ sa_handle_destroy(obj->oo_sa_hdl);
+ obj->oo_sa_hdl = NULL;
+ }
+}
+
+static int
+osd_object_sa_init(struct osd_object *obj, udmu_objset_t *uos)
+{
+ int rc;
+
+ LASSERT(obj->oo_sa_hdl == NULL);
+ LASSERT(obj->oo_db != NULL);
+
+ rc = -sa_handle_get(uos->os, obj->oo_db->db_object, obj,
+ SA_HDL_PRIVATE, &obj->oo_sa_hdl);
+ if (rc)
+ return rc;
+
+ /* Cache the xattr object id, valid for the life of the object */
+ rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_XATTR(uos), &obj->oo_xattr, 8);
+ if (rc == -ENOENT) {
+ obj->oo_xattr = ZFS_NO_OBJECT;
+ rc = 0;
+ } else if (rc) {
+ osd_object_sa_fini(obj);
+ }
+
+ return rc;
+}
+
+/*
+ * Add object to list of dirty objects in tx handle.
+ */
+static void
+osd_object_sa_dirty_add(struct osd_object *obj, struct osd_thandle *oh)
+{
+ if (!cfs_list_empty(&obj->oo_sa_linkage))
+ return;
+
+ cfs_down(&oh->ot_sa_lock);
+ if (likely(cfs_list_empty(&obj->oo_sa_linkage)))
+ cfs_list_add(&obj->oo_sa_linkage, &oh->ot_sa_list);
+ cfs_up(&oh->ot_sa_lock);
+}
+
+/*
+ * Release spill block dbuf hold for all dirty SAs.
+ */
+void osd_object_sa_dirty_rele(struct osd_thandle *oh)
+{
+ struct osd_object *obj;
+
+ cfs_down(&oh->ot_sa_lock);
+ while (!cfs_list_empty(&oh->ot_sa_list)) {
+ obj = cfs_list_entry(oh->ot_sa_list.next,
+ struct osd_object, oo_sa_linkage);
+ sa_spill_rele(obj->oo_sa_hdl);
+ cfs_list_del_init(&obj->oo_sa_linkage);
+ }
+ cfs_up(&oh->ot_sa_lock);
+}
+
+/*
+ * Update the SA and add the object to the dirty list.
+ */
+int osd_object_sa_update(struct osd_object *obj, sa_attr_type_t type,
+ void *buf, uint32_t buflen, struct osd_thandle *oh)
+{
+ int rc;
+
+ LASSERT(obj->oo_sa_hdl != NULL);
+ LASSERT(oh->ot_tx != NULL);
+
+ rc = -sa_update(obj->oo_sa_hdl, type, buf, buflen, oh->ot_tx);
+ osd_object_sa_dirty_add(obj, oh);
+
+ return rc;
+}
+
+/*
+ * Bulk update the SA and add the object to the dirty list.
+ */
+static int
+osd_object_sa_bulk_update(struct osd_object *obj, sa_bulk_attr_t *attrs,
+ int count, struct osd_thandle *oh)
+{
+ int rc;
+
+ LASSERT(obj->oo_sa_hdl != NULL);
+ LASSERT(oh->ot_tx != NULL);
+
+ rc = -sa_bulk_update(obj->oo_sa_hdl, attrs, count, oh->ot_tx);
+ osd_object_sa_dirty_add(obj, oh);
+
+ return rc;
+}
+
+/*
+ * Retrieve the attributes of a DMU object
+ */
+int __osd_object_attr_get(const struct lu_env *env, udmu_objset_t *uos,
+ struct osd_object *obj, struct lu_attr *la)
+{
+ struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
+ sa_handle_t *sa_hdl;
+ sa_bulk_attr_t *bulk;
+ int cnt = 0;
+ int rc;
+ ENTRY;
+
+ LASSERT(obj->oo_db != NULL);
+
+ rc = -sa_handle_get(uos->os, obj->oo_db->db_object, NULL,
+ SA_HDL_PRIVATE, &sa_hdl);
+ if (rc)
+ RETURN(rc);
+
+ OBD_ALLOC(bulk, sizeof(sa_bulk_attr_t) * 9);
+ if (bulk == NULL)
+ GOTO(out_sa, rc = -ENOMEM);
+
+ la->la_valid |= LA_ATIME | LA_MTIME | LA_CTIME | LA_MODE | LA_TYPE |
+ LA_SIZE | LA_UID | LA_GID | LA_FLAGS | LA_NLINK;
+
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(uos), NULL, osa->atime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(uos), NULL, osa->mtime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(uos), NULL, osa->ctime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(uos), NULL, &osa->mode, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(uos), NULL, &osa->size, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(uos), NULL, &osa->nlink, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(uos), NULL, &osa->uid, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(uos), NULL, &osa->gid, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(uos), NULL, &osa->flags, 8);
+
+ rc = -sa_bulk_lookup(sa_hdl, bulk, cnt);
+ if (rc)
+ GOTO(out_bulk, rc);
+
+ la->la_atime = osa->atime[0];
+ la->la_mtime = osa->mtime[0];
+ la->la_ctime = osa->ctime[0];
+ la->la_mode = osa->mode;
+ la->la_uid = osa->uid;
+ la->la_gid = osa->gid;
+ la->la_nlink = osa->nlink;
+ la->la_flags = osa->flags;
+ la->la_size = osa->size;
+
+ if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode)) {
+ rc = -sa_lookup(sa_hdl, SA_ZPL_RDEV(uos), &osa->rdev, 8);
+ if (rc)
+ GOTO(out_bulk, rc);
+ la->la_rdev = osa->rdev;
+ la->la_valid |= LA_RDEV;
+ }
+out_bulk:
+ OBD_FREE(bulk, sizeof(sa_bulk_attr_t) * 9);
+out_sa:
+ sa_handle_destroy(sa_hdl);
+
+ RETURN(rc);
+}
+
+int __osd_obj2dbuf(const struct lu_env *env, objset_t *os,
+ uint64_t oid, dmu_buf_t **dbp, void *tag)
+{
+ dmu_object_info_t *doi = &osd_oti_get(env)->oti_doi;
+ int rc;
+
+ LASSERT(tag);
+
+ rc = -sa_buf_hold(os, oid, tag, dbp);
+ if (rc)
+ return rc;
+
+ dmu_object_info_from_db(*dbp, doi);
+ if (unlikely (oid != DMU_USERUSED_OBJECT &&
+ oid != DMU_GROUPUSED_OBJECT && doi->doi_bonus_type != DMU_OT_SA)) {
+ sa_buf_rele(*dbp, tag);
+ *dbp = NULL;
+ return -EINVAL;
+ }
+
+ LASSERT(*dbp);
+ LASSERT((*dbp)->db_object == oid);
+ LASSERT((*dbp)->db_offset == -1);
+ LASSERT((*dbp)->db_data != NULL);
+
+ return 0;
+}
+
+/*
+ * Concurrency: no concurrent access is possible that early in object
+ * life-cycle.
+ */
+struct lu_object *osd_object_alloc(const struct lu_env *env,
+ const struct lu_object_header *hdr,
+ struct lu_device *d)
+{
+ struct osd_object *mo;
+
+ OBD_SLAB_ALLOC_PTR_GFP(mo, osd_object_kmem, CFS_ALLOC_IO);
+ if (mo != NULL) {
+ struct lu_object *l;
+
+ l = &mo->oo_dt.do_lu;
+ dt_object_init(&mo->oo_dt, NULL, d);
+ mo->oo_dt.do_ops = &osd_obj_ops;
+ l->lo_ops = &osd_lu_obj_ops;
+ CFS_INIT_LIST_HEAD(&mo->oo_sa_linkage);
+ cfs_init_rwsem(&mo->oo_sem);
+ cfs_sema_init(&mo->oo_guard, 1);
+ cfs_rwlock_init(&mo->oo_attr_lock);
+ return l;
+ } else {
+ return NULL;
+ }
+}
+
+/*
+ * Concurrency: shouldn't matter.
+ */
+int osd_object_init0(const struct lu_env *env, struct osd_object *obj)
+{
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
+ int rc = 0;
+ ENTRY;
+
+ if (obj->oo_db == NULL)
+ RETURN(0);
+
+ /* object exist */
+
+ rc = osd_object_sa_init(obj, uos);
+ if (rc)
+ RETURN(rc);
+
+ /* cache attrs in object */
+ rc = __osd_object_attr_get(env, &osd->od_objset,
+ obj, &obj->oo_attr);
+ if (rc)
+ RETURN(rc);
+
+ if (likely(!fid_is_acct(fid)))
+ /* no body operations for accounting objects */
+ obj->oo_dt.do_body_ops = &osd_body_ops;
+
+ /*
+ * initialize object before marking it existing
+ */
+ obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
+
+ cfs_mb();
+ obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
+
+ RETURN(0);
+}
+
+/*
+ * Concurrency: no concurrent access is possible that early in object
+ * life-cycle.
+ */
+static int osd_object_init(const struct lu_env *env, struct lu_object *l,
+ const struct lu_object_conf *conf)
+{
+ struct osd_object *obj = osd_obj(l);
+ struct osd_device *osd = osd_obj2dev(obj);
+ uint64_t oid;
+ int rc;
+ ENTRY;
+
+ LASSERT(osd_invariant(obj));
+
+ rc = osd_fid_lookup(env, osd, lu_object_fid(l), &oid);
+ if (rc == 0) {
+ LASSERT(obj->oo_db == NULL);
+ rc = __osd_obj2dbuf(env, osd->od_objset.os, oid,
+ &obj->oo_db, osd_obj_tag);
+ if (rc == 0) {
+ LASSERT(obj->oo_db);
+ rc = osd_object_init0(env, obj);
+ } else {
+ CERROR("%s: lookup "DFID"/"LPX64" failed: rc = %d\n",
+ osd->od_svname, PFID(lu_object_fid(l)), oid, rc);
+ }
+ } else if (rc == -ENOENT) {
+ rc = 0;
+ }
+ LASSERT(osd_invariant(obj));
+ RETURN(rc);
+}
+
+/*
+ * Concurrency: no concurrent access is possible that late in object
+ * life-cycle.
+ */
+static void osd_object_free(const struct lu_env *env, struct lu_object *l)
+{
+ struct osd_object *obj = osd_obj(l);
+
+ LASSERT(osd_invariant(obj));
+
+ dt_object_fini(&obj->oo_dt);
+ OBD_SLAB_FREE_PTR(obj, osd_object_kmem);
+}
+
+static void __osd_declare_object_destroy(const struct lu_env *env,
+ struct osd_object *obj,
+ struct osd_thandle *oh)
+{
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ dmu_buf_t *db = obj->oo_db;
+ zap_attribute_t *za = &osd_oti_get(env)->oti_za;
+ uint64_t oid = db->db_object, xid;
+ dmu_tx_t *tx = oh->ot_tx;
+ zap_cursor_t *zc;
+ int rc = 0;
+
+ dmu_tx_hold_free(tx, oid, 0, DMU_OBJECT_END);
+
+ /* zap holding xattrs */
+ if (obj->oo_xattr != ZFS_NO_OBJECT) {
+ oid = obj->oo_xattr;
+
+ dmu_tx_hold_free(tx, oid, 0, DMU_OBJECT_END);
+
+ rc = -udmu_zap_cursor_init(&zc, uos, oid, 0);
+ if (rc)
+ goto out;
+
+ while ((rc = -zap_cursor_retrieve(zc, za)) == 0) {
+ BUG_ON(za->za_integer_length != sizeof(uint64_t));
+ BUG_ON(za->za_num_integers != 1);
+
+ rc = -zap_lookup(uos->os, obj->oo_xattr, za->za_name,
+ sizeof(uint64_t), 1, &xid);
+ if (rc) {
+ CERROR("%s: xattr lookup failed: rc = %d\n",
+ osd->od_svname, rc);
+ goto out_err;
+ }
+ dmu_tx_hold_free(tx, xid, 0, DMU_OBJECT_END);
+
+ zap_cursor_advance(zc);
+ }
+ if (rc == -ENOENT)
+ rc = 0;
+out_err:
+ udmu_zap_cursor_fini(zc);
+ }
+out:
+ if (rc && tx->tx_err == 0)
+ tx->tx_err = -rc;
+}
+
+static int osd_declare_object_destroy(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *th)
+{
+ char *buf = osd_oti_get(env)->oti_str;
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ struct osd_thandle *oh;
+ uint64_t zapid;
+ ENTRY;
+
+ LASSERT(th != NULL);
+ LASSERT(dt_object_exists(dt));
+
+ oh = container_of0(th, struct osd_thandle, ot_super);
+ LASSERT(oh->ot_tx != NULL);
+
+ /* declare that we'll destroy the object */
+ __osd_declare_object_destroy(env, obj, oh);
+
+ /* declare that we'll remove object from fid-dnode mapping */
+ zapid = osd_get_name_n_idx(env, osd, fid, buf);
+ dmu_tx_hold_bonus(oh->ot_tx, zapid);
+ dmu_tx_hold_zap(oh->ot_tx, zapid, 0, buf);
+
+ /* declare that we'll remove object from inode accounting ZAPs */
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_iusr_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_iusr_oid, 0, buf);
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_igrp_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_igrp_oid, 0, buf);
+
+ RETURN(0);
+}
+
+int __osd_object_free(udmu_objset_t *uos, uint64_t oid, dmu_tx_t *tx)
+{
+ LASSERT(uos->objects != 0);
+ cfs_spin_lock(&uos->lock);
+ uos->objects--;
+ cfs_spin_unlock(&uos->lock);
+
+ return -dmu_object_free(uos->os, oid, tx);
+}
+
+/*
+ * Delete a DMU object
+ *
+ * The transaction passed to this routine must have
+ * dmu_tx_hold_free(tx, oid, 0, DMU_OBJECT_END) called
+ * and then assigned to a transaction group.
+ *
+ * This will release db and set it to NULL to prevent further dbuf releases.
+ */
+static int __osd_object_destroy(const struct lu_env *env,
+ struct osd_object *obj,
+ dmu_tx_t *tx, void *tag)
+{
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ uint64_t xid;
+ zap_attribute_t *za = &osd_oti_get(env)->oti_za;
+ zap_cursor_t *zc;
+ int rc;
+
+ /* Assert that the transaction has been assigned to a
+ transaction group. */
+ LASSERT(tx->tx_txg != 0);
+
+ /* zap holding xattrs */
+ if (obj->oo_xattr != ZFS_NO_OBJECT) {
+ rc = -udmu_zap_cursor_init(&zc, uos, obj->oo_xattr, 0);
+ if (rc)
+ return rc;
+ while ((rc = -zap_cursor_retrieve(zc, za)) == 0) {
+ BUG_ON(za->za_integer_length != sizeof(uint64_t));
+ BUG_ON(za->za_num_integers != 1);
+
+ rc = -zap_lookup(uos->os, obj->oo_xattr, za->za_name,
+ sizeof(uint64_t), 1, &xid);
+ if (rc) {
+ CERROR("%s: lookup xattr %s failed: rc = %d\n",
+ osd->od_svname, za->za_name, rc);
+ continue;
+ }
+ rc = __osd_object_free(uos, xid, tx);
+ if (rc)
+ CERROR("%s: fetch xattr %s failed: rc = %d\n",
+ osd->od_svname, za->za_name, rc);
+ zap_cursor_advance(zc);
+ }
+ udmu_zap_cursor_fini(zc);
+
+ rc = __osd_object_free(uos, obj->oo_xattr, tx);
+ if (rc)
+ CERROR("%s: freeing xattr failed: rc = %d\n",
+ osd->od_svname, rc);
+ }
+
+ return __osd_object_free(uos, obj->oo_db->db_object, tx);
+}
+
+static int osd_object_destroy(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *th)
+{
+ char *buf = osd_oti_get(env)->oti_str;
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_thandle *oh;
+ int rc;
+ uint64_t zapid;
+ ENTRY;
+
+ LASSERT(obj->oo_db != NULL);
+ LASSERT(dt_object_exists(dt));
+ LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
+
+ oh = container_of0(th, struct osd_thandle, ot_super);
+ LASSERT(oh != NULL);
+ LASSERT(oh->ot_tx != NULL);
+
+ zapid = osd_get_name_n_idx(env, osd, fid, buf);
+
+ /* remove obj ref from index dir (it depends) */
+ rc = -zap_remove(osd->od_objset.os, zapid, buf, oh->ot_tx);
+ if (rc) {
+ CERROR("%s: zap_remove() failed: rc = %d\n",
+ osd->od_svname, rc);
+ GOTO(out, rc);
+ }
+
+ /* Remove object from inode accounting. It is not fatal for the destroy
+ * operation if something goes wrong while updating accounting, but we
+ * still log an error message to notify the administrator */
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_iusr_oid,
+ obj->oo_attr.la_uid, -1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to remove "DFID" from accounting ZAP for usr"
+ " %d: rc = %d\n", osd->od_svname, PFID(fid),
+ obj->oo_attr.la_uid, rc);
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_igrp_oid,
+ obj->oo_attr.la_gid, -1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to remove "DFID" from accounting ZAP for grp"
+ " %d: rc = %d\n", osd->od_svname, PFID(fid),
+ obj->oo_attr.la_gid, rc);
+
+ /* kill object */
+ rc = __osd_object_destroy(env, obj, oh->ot_tx, osd_obj_tag);
+ if (rc) {
+ CERROR("%s: __osd_object_destroy() failed: rc = %d\n",
+ osd->od_svname, rc);
+ GOTO(out, rc);
+ }
+
+out:
+ /* not needed in the cache anymore */
+ set_bit(LU_OBJECT_HEARD_BANSHEE, &dt->do_lu.lo_header->loh_flags);
+
+ RETURN (0);
+}
+
+static void osd_object_delete(const struct lu_env *env, struct lu_object *l)
+{
+ struct osd_object *obj = osd_obj(l);
+
+ if (obj->oo_db != NULL) {
+ osd_object_sa_fini(obj);
+ if (obj->oo_sa_xattr) {
+ nvlist_free(obj->oo_sa_xattr);
+ obj->oo_sa_xattr = NULL;
+ }
+ sa_buf_rele(obj->oo_db, osd_obj_tag);
+ cfs_list_del(&obj->oo_sa_linkage);
+ obj->oo_db = NULL;
+ }
+}
+
+/*
+ * Concurrency: ->loo_object_release() is called under site spin-lock.
+ */
+static void osd_object_release(const struct lu_env *env,
+ struct lu_object *l)
+{
+}
+
+/*
+ * Concurrency: shouldn't matter.
+ */
+static int osd_object_print(const struct lu_env *env, void *cookie,
+ lu_printer_t p, const struct lu_object *l)
+{
+ struct osd_object *o = osd_obj(l);
+
+ return (*p)(env, cookie, LUSTRE_OSD_ZFS_NAME"-object@%p", o);
+}
+
+static void osd_object_read_lock(const struct lu_env *env,
+ struct dt_object *dt, unsigned role)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+
+ LASSERT(osd_invariant(obj));
+
+ cfs_down_read(&obj->oo_sem);
+}
+
+static void osd_object_write_lock(const struct lu_env *env,
+ struct dt_object *dt, unsigned role)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+
+ LASSERT(osd_invariant(obj));
+
+ cfs_down_write(&obj->oo_sem);
+}
+
+static void osd_object_read_unlock(const struct lu_env *env,
+ struct dt_object *dt)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+
+ LASSERT(osd_invariant(obj));
+ cfs_up_read(&obj->oo_sem);
+}
+
+static void osd_object_write_unlock(const struct lu_env *env,
+ struct dt_object *dt)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+
+ LASSERT(osd_invariant(obj));
+ cfs_up_write(&obj->oo_sem);
+}
+
+static int osd_object_write_locked(const struct lu_env *env,
+ struct dt_object *dt)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+ int rc = 1;
+
+ LASSERT(osd_invariant(obj));
+
+ if (cfs_down_write_trylock(&obj->oo_sem)) {
+ rc = 0;
+ cfs_up_write(&obj->oo_sem);
+ }
+ return rc;
+}
+
+static int osd_attr_get(const struct lu_env *env,
+ struct dt_object *dt,
+ struct lu_attr *attr,
+ struct lustre_capa *capa)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+ uint64_t blocks;
+ uint32_t blksize;
+
+ LASSERT(dt_object_exists(dt));
+ LASSERT(osd_invariant(obj));
+ LASSERT(obj->oo_db);
+
+ cfs_read_lock(&obj->oo_attr_lock);
+ *attr = obj->oo_attr;
+ cfs_read_unlock(&obj->oo_attr_lock);
+
+ /* with ZFS_DEBUG zrl_add_debug() called by DB_DNODE_ENTER()
+ * from within sa_object_size() can block on a mutex, so
+ * we can't call sa_object_size() holding rwlock */
+ sa_object_size(obj->oo_sa_hdl, &blksize, &blocks);
+ /* Block size may be not set; suggest maximal I/O transfers. */
+ if (blksize == 0)
+ blksize = 1ULL << SPA_MAXBLOCKSHIFT;
+
+ attr->la_blksize = blksize;
+ attr->la_blocks = blocks;
+ attr->la_valid |= LA_BLOCKS | LA_BLKSIZE;
+
+ return 0;
+}
+
+static int osd_declare_attr_set(const struct lu_env *env,
+ struct dt_object *dt,
+ const struct lu_attr *attr,
+ struct thandle *handle)
+{
+ char *buf = osd_oti_get(env)->oti_str;
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ struct osd_thandle *oh;
+ ENTRY;
+
+ if (!dt_object_exists(dt)) {
+ /* XXX: sanity check that object creation is declared */
+ RETURN(0);
+ }
+
+ LASSERT(handle != NULL);
+ LASSERT(osd_invariant(obj));
+
+ oh = container_of0(handle, struct osd_thandle, ot_super);
+
+ LASSERT(obj->oo_sa_hdl != NULL);
+ dmu_tx_hold_sa(oh->ot_tx, obj->oo_sa_hdl, 0);
+
+ if (attr && attr->la_valid & LA_UID) {
+ /* account for user inode tracking ZAP update */
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_iusr_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_iusr_oid, TRUE, buf);
+ }
+ if (attr && attr->la_valid & LA_GID) {
+ /* account for user inode tracking ZAP update */
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_igrp_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_igrp_oid, TRUE, buf);
+ }
+
+ RETURN(0);
+}
+
+/*
+ * Set the attributes of an object
+ *
+ * The transaction passed to this routine must have
+ * dmu_tx_hold_bonus(tx, oid) called and then assigned
+ * to a transaction group.
+ */
+static int osd_attr_set(const struct lu_env *env, struct dt_object *dt,
+ const struct lu_attr *la, struct thandle *handle,
+ struct lustre_capa *capa)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ struct osd_thandle *oh;
+ struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
+ sa_bulk_attr_t *bulk;
+ int cnt;
+ int rc = 0;
+
+ ENTRY;
+ LASSERT(handle != NULL);
+ LASSERT(dt_object_exists(dt));
+ LASSERT(osd_invariant(obj));
+ LASSERT(obj->oo_sa_hdl);
+
+ oh = container_of0(handle, struct osd_thandle, ot_super);
+ /* Assert that the transaction has been assigned to a
+ transaction group. */
+ LASSERT(oh->ot_tx->tx_txg != 0);
+
+ if (la->la_valid == 0)
+ RETURN(0);
+
+ OBD_ALLOC(bulk, sizeof(sa_bulk_attr_t) * 10);
+ if (bulk == NULL)
+ RETURN(-ENOMEM);
+
+ /* do both accounting updates outside oo_attr_lock below */
+ if ((la->la_valid & LA_UID) && (la->la_uid != obj->oo_attr.la_uid)) {
+ /* Update user accounting. Failure isn't fatal, but we still
+ * log an error message */
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_iusr_oid,
+ la->la_uid, 1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to update accounting ZAP for user "
+ "%d (%d)\n", osd->od_svname, la->la_uid, rc);
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_iusr_oid,
+ obj->oo_attr.la_uid, -1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to update accounting ZAP for user "
+ "%d (%d)\n", osd->od_svname,
+ obj->oo_attr.la_uid, rc);
+ }
+ if ((la->la_valid & LA_GID) && (la->la_gid != obj->oo_attr.la_gid)) {
+ /* Update group accounting. Failure isn't fatal, but we still
+ * log an error message */
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_igrp_oid,
+ la->la_gid, 1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to update accounting ZAP for user "
+ "%d (%d)\n", osd->od_svname, la->la_gid, rc);
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_igrp_oid,
+ obj->oo_attr.la_gid, -1, oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to update accounting ZAP for user "
+ "%d (%d)\n", osd->od_svname,
+ obj->oo_attr.la_gid, rc);
+ }
+
+ cfs_write_lock(&obj->oo_attr_lock);
+ cnt = 0;
+ if (la->la_valid & LA_ATIME) {
+ osa->atime[0] = obj->oo_attr.la_atime = la->la_atime;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(uos), NULL,
+ osa->atime, 16);
+ }
+ if (la->la_valid & LA_MTIME) {
+ osa->mtime[0] = obj->oo_attr.la_mtime = la->la_mtime;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(uos), NULL,
+ osa->mtime, 16);
+ }
+ if (la->la_valid & LA_CTIME) {
+ osa->ctime[0] = obj->oo_attr.la_ctime = la->la_ctime;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(uos), NULL,
+ osa->ctime, 16);
+ }
+ if (la->la_valid & LA_MODE) {
+ /* mode is stored along with type, so read it first */
+ obj->oo_attr.la_mode = (obj->oo_attr.la_mode & S_IFMT) |
+ (la->la_mode & ~S_IFMT);
+ osa->mode = obj->oo_attr.la_mode;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(uos), NULL,
+ &osa->mode, 8);
+ }
+ if (la->la_valid & LA_SIZE) {
+ osa->size = obj->oo_attr.la_size = la->la_size;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(uos), NULL,
+ &osa->size, 8);
+ }
+ if (la->la_valid & LA_NLINK) {
+ osa->nlink = obj->oo_attr.la_nlink = la->la_nlink;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(uos), NULL,
+ &osa->nlink, 8);
+ }
+ if (la->la_valid & LA_RDEV) {
+ osa->rdev = obj->oo_attr.la_rdev = la->la_rdev;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(uos), NULL,
+ &osa->rdev, 8);
+ }
+ if (la->la_valid & LA_FLAGS) {
+ osa->flags = obj->oo_attr.la_flags = la->la_flags;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(uos), NULL,
+ &osa->flags, 8);
+ }
+ if (la->la_valid & LA_UID) {
+ osa->uid = obj->oo_attr.la_uid = la->la_uid;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(uos), NULL,
+ &osa->uid, 8);
+ }
+ if (la->la_valid & LA_GID) {
+ osa->gid = obj->oo_attr.la_gid = la->la_gid;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(uos), NULL,
+ &osa->gid, 8);
+ }
+ obj->oo_attr.la_valid |= la->la_valid;
+ cfs_write_unlock(&obj->oo_attr_lock);
+
+ rc = osd_object_sa_bulk_update(obj, bulk, cnt, oh);
+
+ OBD_FREE(bulk, sizeof(sa_bulk_attr_t) * 10);
+ RETURN(rc);
+}
+
+/*
+ * Object creation.
+ *
+ * XXX temporary solution.
+ */
+
+static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
+ struct dt_object *parent, cfs_umode_t child_mode)
+{
+ LASSERT(ah);
+
+ memset(ah, 0, sizeof(*ah));
+ ah->dah_mode = child_mode;
+}
+
+static int osd_declare_object_create(const struct lu_env *env,
+ struct dt_object *dt,
+ struct lu_attr *attr,
+ struct dt_allocation_hint *hint,
+ struct dt_object_format *dof,
+ struct thandle *handle)
+{
+ char *buf = osd_oti_get(env)->oti_str;
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ struct osd_thandle *oh;
+ uint64_t zapid;
+ ENTRY;
+
+ LASSERT(dof);
+
+ switch (dof->dof_type) {
+ case DFT_REGULAR:
+ case DFT_SYM:
+ case DFT_NODE:
+ if (obj->oo_dt.do_body_ops == NULL)
+ obj->oo_dt.do_body_ops = &osd_body_ops;
+ break;
+ default:
+ break;
+ }
+
+ LASSERT(handle != NULL);
+ oh = container_of0(handle, struct osd_thandle, ot_super);
+ LASSERT(oh->ot_tx != NULL);
+
+ switch (dof->dof_type) {
+ case DFT_DIR:
+ case DFT_INDEX:
+ /* for zap create */
+ dmu_tx_hold_zap(oh->ot_tx, DMU_NEW_OBJECT, 1, NULL);
+ break;
+ case DFT_REGULAR:
+ case DFT_SYM:
+ case DFT_NODE:
+ /* first, we'll create new object */
+ dmu_tx_hold_bonus(oh->ot_tx, DMU_NEW_OBJECT);
+ break;
+
+ default:
+ LBUG();
+ break;
+ }
+
+ /* and we'll add it to some mapping */
+ zapid = osd_get_name_n_idx(env, osd, fid, buf);
+ dmu_tx_hold_bonus(oh->ot_tx, zapid);
+ dmu_tx_hold_zap(oh->ot_tx, zapid, TRUE, buf);
+
+ /* we will also update inode accounting ZAPs */
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_iusr_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_iusr_oid, TRUE, buf);
+ dmu_tx_hold_bonus(oh->ot_tx, osd->od_igrp_oid);
+ dmu_tx_hold_zap(oh->ot_tx, osd->od_igrp_oid, TRUE, buf);
+
+ dmu_tx_hold_sa_create(oh->ot_tx, ZFS_SA_BASE_ATTR_SIZE);
+
+ RETURN(0);
+}
+
+int __osd_attr_init(const struct lu_env *env, udmu_objset_t *uos,
+ uint64_t oid, dmu_tx_t *tx, struct lu_attr *la)
+{
+ sa_bulk_attr_t *bulk;
+ sa_handle_t *sa_hdl;
+ struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
+ uint64_t gen;
+ uint64_t parent;
+ uint64_t crtime[2];
+ timestruc_t now;
+ int cnt;
+ int rc;
+
+ gethrestime(&now);
+ gen = dmu_tx_get_txg(tx);
+
+ ZFS_TIME_ENCODE(&now, crtime);
+ /* XXX: this should be real id of parent for ZPL access, but we have no
+ * such info in OSD, probably it can be part of dt_object_format */
+ parent = 0;
+
+ osa->atime[0] = la->la_atime;
+ osa->ctime[0] = la->la_ctime;
+ osa->mtime[0] = la->la_mtime;
+ osa->mode = la->la_mode;
+ osa->uid = la->la_uid;
+ osa->gid = la->la_gid;
+ osa->rdev = la->la_rdev;
+ osa->nlink = la->la_nlink;
+ osa->flags = la->la_flags;
+ osa->size = la->la_size;
+
+ /* Now add in all of the "SA" attributes */
+ rc = -sa_handle_get(uos->os, oid, NULL, SA_HDL_PRIVATE, &sa_hdl);
+ if (rc)
+ return rc;
+
+ OBD_ALLOC(bulk, sizeof(sa_bulk_attr_t) * 13);
+ if (bulk == NULL) {
+ rc = -ENOMEM;
+ goto out;
+ }
+ /*
+ * we need to create all SA below upon object create.
+ *
+ * XXX The attribute order matters since the accounting callback relies
+ * on static offsets (i.e. SA_*_OFFSET, see zfs_space_delta_cb()) to
+ * look up the UID/GID attributes. Moreover, the callback does not seem
+ * to support the spill block.
+ * We define attributes in the same order as SA_*_OFFSET in order to
+ * work around the problem. See ORI-610.
+ */
+ cnt = 0;
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(uos), NULL, &osa->mode, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(uos), NULL, &osa->size, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GEN(uos), NULL, &gen, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(uos), NULL, &osa->uid, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(uos), NULL, &osa->gid, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PARENT(uos), NULL, &parent, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(uos), NULL, &osa->flags, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(uos), NULL, osa->atime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(uos), NULL, osa->mtime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(uos), NULL, osa->ctime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(uos), NULL, crtime, 16);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(uos), NULL, &osa->nlink, 8);
+ SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(uos), NULL, &osa->rdev, 8);
+
+ rc = -sa_replace_all_by_template(sa_hdl, bulk, cnt, tx);
+
+ OBD_FREE(bulk, sizeof(sa_bulk_attr_t) * 13);
+out:
+ sa_handle_destroy(sa_hdl);
+ return rc;
+}
+
+/*
+ * The transaction passed to this routine must have
+ * dmu_tx_hold_bonus(tx, DMU_NEW_OBJECT) called and then assigned
+ * to a transaction group.
+ */
+int __osd_object_create(const struct lu_env *env, udmu_objset_t *uos,
+ dmu_buf_t **dbp, dmu_tx_t *tx,
+ struct lu_attr *la, void *tag)
+{
+ uint64_t oid;
+ int rc;
+
+ LASSERT(tag);
+ cfs_spin_lock(&uos->lock);
+ uos->objects++;
+ cfs_spin_unlock(&uos->lock);
+
+ /* Assert that the transaction has been assigned to a
+ transaction group. */
+ LASSERT(tx->tx_txg != 0);
+
+ /* Create a new DMU object. */
+ oid = dmu_object_alloc(uos->os, DMU_OT_PLAIN_FILE_CONTENTS, 0,
+ DMU_OT_SA, DN_MAX_BONUSLEN, tx);
+ rc = -sa_buf_hold(uos->os, oid, tag, dbp);
+ if (rc)
+ return rc;
+
+ LASSERT(la->la_valid & LA_MODE);
+ la->la_size = 0;
+ la->la_nlink = 1;
+
+ return __osd_attr_init(env, uos, oid, tx, la);
+}
+
+/*
+ * The transaction passed to this routine must have
+ * dmu_tx_hold_zap(tx, DMU_NEW_OBJECT, ...) called and then assigned
+ * to a transaction group.
+ *
+ * Using ZAP_FLAG_HASH64 will force the ZAP to always be a FAT ZAP.
+ * This is fine for directories today, because storing the FID in the dirent
+ * will also require a FAT ZAP. If there is a new type of micro ZAP created
+ * then we might need to re-evaluate the use of this flag and instead do
+ * a conversion from the different internal ZAP hash formats being used. */
+int __osd_zap_create(const struct lu_env *env, udmu_objset_t *uos,
+ dmu_buf_t **zap_dbp, dmu_tx_t *tx,
+ struct lu_attr *la, void *tag, zap_flags_t flags)
+{
+ uint64_t oid;
+ int rc;
+
+ LASSERT(tag);
+
+ cfs_spin_lock(&uos->lock);
+ uos->objects++;
+ cfs_spin_unlock(&uos->lock);
+
+ /* Assert that the transaction has been assigned to a
+ transaction group. */
+ LASSERT(tx->tx_txg != 0);
+
+ oid = zap_create_flags(uos->os, 0, flags | ZAP_FLAG_HASH64,
+ DMU_OT_DIRECTORY_CONTENTS, 12, 12,
+ DMU_OT_SA, DN_MAX_BONUSLEN, tx);
+
+ rc = -sa_buf_hold(uos->os, oid, tag, zap_dbp);
+ if (rc)
+ return rc;
+
+ LASSERT(la->la_valid & LA_MODE);
+ la->la_size = 2;
+ la->la_nlink = 1;
+
+ return __osd_attr_init(env, uos, oid, tx, la);
+}
+
+static dmu_buf_t *osd_mkidx(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh)
+{
+ dmu_buf_t *db;
+ int rc;
+
+ /* Index file should be created as regular file in order not to confuse
+ * ZPL which could interpret them as directory.
+ * We set ZAP_FLAG_UINT64_KEY to let ZFS know than we are going to use
+ * binary keys */
+ LASSERT(S_ISREG(la->la_mode));
+ rc = __osd_zap_create(env, &osd->od_objset, &db, oh->ot_tx, la,
+ osd_obj_tag, ZAP_FLAG_UINT64_KEY);
+ if (rc)
+ return ERR_PTR(rc);
+ return db;
+}
+
+static dmu_buf_t *osd_mkdir(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh)
+{
+ dmu_buf_t *db;
+ int rc;
+
+ LASSERT(S_ISDIR(la->la_mode));
+ rc = __osd_zap_create(env, &osd->od_objset, &db, oh->ot_tx, la,
+ osd_obj_tag, 0);
+ if (rc)
+ return ERR_PTR(rc);
+ return db;
+}
+
+static dmu_buf_t* osd_mkreg(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh)
+{
+ dmu_buf_t *db;
+ int rc;
+
+ LASSERT(S_ISREG(la->la_mode));
+ rc = __osd_object_create(env, &osd->od_objset, &db, oh->ot_tx, la,
+ osd_obj_tag);
+ if (rc)
+ return ERR_PTR(rc);
+
+ /*
+ * XXX: a hack, OST to use bigger blocksize. we need
+ * a method in OSD API to control this from OFD/MDD
+ */
+ if (!lu_device_is_md(osd2lu_dev(osd))) {
+ rc = -dmu_object_set_blocksize(osd->od_objset.os,
+ db->db_object,
+ 128 << 10, 0, oh->ot_tx);
+ if (unlikely(rc)) {
+ CERROR("%s: can't change blocksize: %d\n",
+ osd->od_svname, rc);
+ return ERR_PTR(rc);
+ }
+ }
+
+ return db;
+}
+
+static dmu_buf_t *osd_mksym(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh)
+{
+ dmu_buf_t *db;
+ int rc;
+
+ LASSERT(S_ISLNK(la->la_mode));
+ rc = __osd_object_create(env, &osd->od_objset, &db, oh->ot_tx, la,
+ osd_obj_tag);
+ if (rc)
+ return ERR_PTR(rc);
+ return db;
+}
+
+static dmu_buf_t *osd_mknod(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh)
+{
+ dmu_buf_t *db;
+ int rc;
+
+ la->la_valid = LA_MODE;
+ if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode))
+ la->la_valid |= LA_RDEV;
+
+ rc = __osd_object_create(env, &osd->od_objset, &db, oh->ot_tx, la,
+ osd_obj_tag);
+ if (rc)
+ return ERR_PTR(rc);
+ return db;
+}
+
+typedef dmu_buf_t *(*osd_obj_type_f)(const struct lu_env *env, struct osd_device *osd,
+ struct lu_attr *la, struct osd_thandle *oh);
+
+static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
+{
+ osd_obj_type_f result;
+
+ switch (type) {
+ case DFT_DIR:
+ result = osd_mkdir;
+ break;
+ case DFT_INDEX:
+ result = osd_mkidx;
+ break;
+ case DFT_REGULAR:
+ result = osd_mkreg;
+ break;
+ case DFT_SYM:
+ result = osd_mksym;
+ break;
+ case DFT_NODE:
+ result = osd_mknod;
+ break;
+ default:
+ LBUG();
+ break;
+ }
+ return result;
+}
+
+/*
+ * Primitives for directory (i.e. ZAP) handling
+ */
+
+/*
+ * Concurrency: @dt is write locked.
+ */
+static int osd_object_create(const struct lu_env *env, struct dt_object *dt,
+ struct lu_attr *attr,
+ struct dt_allocation_hint *hint,
+ struct dt_object_format *dof,
+ struct thandle *th)
+{
+ struct zpl_direntry *zde = &osd_oti_get(env)->oti_zde.lzd_reg;
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *osd = osd_obj2dev(obj);
+ char *buf = osd_oti_get(env)->oti_str;
+ struct osd_thandle *oh;
+ dmu_buf_t *db;
+ uint64_t zapid;
+ int rc;
+
+ ENTRY;
+
+ /* concurrent create declarations should not see
+ * the object inconsistent (db, attr, etc).
+ * in regular cases acquisition should be cheap */
+ cfs_down(&obj->oo_guard);
+
+ LASSERT(osd_invariant(obj));
+ LASSERT(!dt_object_exists(dt));
+ LASSERT(dof != NULL);
+
+ LASSERT(th != NULL);
+ oh = container_of0(th, struct osd_thandle, ot_super);
+
+ /*
+ * XXX missing: Quote handling.
+ */
+
+ LASSERT(obj->oo_db == NULL);
+
+ db = osd_create_type_f(dof->dof_type)(env, osd, attr, oh);
+ if (IS_ERR(db))
+ GOTO(out, rc = PTR_ERR(th));
+
+ zde->zde_pad = 0;
+ zde->zde_dnode = db->db_object;
+ zde->zde_type = IFTODT(attr->la_mode & S_IFMT);
+
+ zapid = osd_get_name_n_idx(env, osd, fid, buf);
+
+ rc = -zap_add(osd->od_objset.os, zapid, buf, 8, 1, zde, oh->ot_tx);
+ if (rc)
+ GOTO(out, rc);
+
+ /* Add new object to inode accounting.
+ * Errors are not considered as fatal */
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_iusr_oid,
+ (attr->la_valid & LA_UID) ? attr->la_uid : 0, 1,
+ oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to add "DFID" to accounting ZAP for usr %d "
+ "(%d)\n", osd->od_svname, PFID(fid), attr->la_uid, rc);
+ rc = -zap_increment_int(osd->od_objset.os, osd->od_igrp_oid,
+ (attr->la_valid & LA_GID) ? attr->la_gid : 0, 1,
+ oh->ot_tx);
+ if (rc)
+ CERROR("%s: failed to add "DFID" to accounting ZAP for grp %d "
+ "(%d)\n", osd->od_svname, PFID(fid), attr->la_gid, rc);
+
+ /* configure new osd object */
+ obj->oo_db = db;
+ rc = osd_object_init0(env, obj);
+ LASSERT(ergo(rc == 0, dt_object_exists(dt)));
+ LASSERT(osd_invariant(obj));
+
+out:
+ cfs_up(&obj->oo_guard);
+ RETURN(rc);
+}
+
+static int osd_declare_object_ref_add(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *th)
+{
+ return osd_declare_attr_set(env, dt, NULL, th);
+}
+
+/*
+ * Concurrency: @dt is write locked.
+ */
+static int osd_object_ref_add(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *handle)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_thandle *oh;
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ uint64_t nlink;
+ int rc;
+
+ ENTRY;
+
+ LASSERT(osd_invariant(obj));
+ LASSERT(dt_object_exists(dt));
+ LASSERT(obj->oo_sa_hdl != NULL);
+
+ oh = container_of0(handle, struct osd_thandle, ot_super);
+
+ cfs_write_lock(&obj->oo_attr_lock);
+ nlink = ++obj->oo_attr.la_nlink;
+ cfs_write_unlock(&obj->oo_attr_lock);
+
+ rc = osd_object_sa_update(obj, SA_ZPL_LINKS(uos), &nlink, 8, oh);
+ return rc;
+}
+
+static int osd_declare_object_ref_del(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *handle)
+{
+ return osd_declare_attr_set(env, dt, NULL, handle);
+}
+
+/*
+ * Concurrency: @dt is write locked.
+ */
+static int osd_object_ref_del(const struct lu_env *env,
+ struct dt_object *dt,
+ struct thandle *handle)
+{
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_thandle *oh;
+ struct osd_device *osd = osd_obj2dev(obj);
+ udmu_objset_t *uos = &osd->od_objset;
+ uint64_t nlink;
+ int rc;
+
+ ENTRY;
+
+ LASSERT(osd_invariant(obj));
+ LASSERT(dt_object_exists(dt));
+ LASSERT(obj->oo_sa_hdl != NULL);
+
+ oh = container_of0(handle, struct osd_thandle, ot_super);
+ LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
+
+ cfs_write_lock(&obj->oo_attr_lock);
+ nlink = --obj->oo_attr.la_nlink;
+ cfs_write_unlock(&obj->oo_attr_lock);
+
+ rc = osd_object_sa_update(obj, SA_ZPL_LINKS(uos), &nlink, 8, oh);
+ return rc;
+}
+
+static int capa_is_sane(const struct lu_env *env, struct osd_device *dev,
+ struct lustre_capa *capa, struct lustre_capa_key *keys)
+{
+ struct osd_thread_info *oti = osd_oti_get(env);
+ struct obd_capa *oc;
+ int i, rc = 0;
+ ENTRY;
+
+ oc = capa_lookup(dev->od_capa_hash, capa, 0);
+ if (oc) {
+ if (capa_is_expired(oc)) {
+ DEBUG_CAPA(D_ERROR, capa, "expired");
+ rc = -ESTALE;
+ }
+ capa_put(oc);
+ RETURN(rc);
+ }
+
+ cfs_spin_lock(&capa_lock);
+ for (i = 0; i < 2; i++) {
+ if (keys[i].lk_keyid == capa->lc_keyid) {
+ oti->oti_capa_key = keys[i];
+ break;
+ }
+ }
+ cfs_spin_unlock(&capa_lock);
+
+ if (i == 2) {
+ DEBUG_CAPA(D_ERROR, capa, "no matched capa key");
+ RETURN(-ESTALE);
+ }
+
+ rc = capa_hmac(oti->oti_capa.lc_hmac, capa, oti->oti_capa_key.lk_key);
+ if (rc)
+ RETURN(rc);
+ if (memcmp(oti->oti_capa.lc_hmac, capa->lc_hmac, sizeof(capa->lc_hmac)))
+ {
+ DEBUG_CAPA(D_ERROR, capa, "HMAC mismatch");
+ RETURN(-EACCES);
+ }
+
+ oc = capa_add(dev->od_capa_hash, capa);
+ capa_put(oc);
+
+ RETURN(0);
+}
+
+static int osd_object_auth(const struct lu_env *env, struct dt_object *dt,
+ struct lustre_capa *capa, __u64 opc)
+{
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_device *dev = osd_dev(dt->do_lu.lo_dev);
+ int rc;
+
+ if (!dev->od_fl_capa)
+ return 0;
+
+ if (capa == BYPASS_CAPA)
+ return 0;
+
+ if (!capa) {
+ CERROR("no capability is provided for fid "DFID"\n", PFID(fid));
+ return -EACCES;
+ }
+
+ if (!lu_fid_eq(fid, &capa->lc_fid)) {
+ DEBUG_CAPA(D_ERROR, capa, "fid "DFID" mismatch with",PFID(fid));
+ return -EACCES;
+ }
+
+ if (!capa_opc_supported(capa, opc)) {
+ DEBUG_CAPA(D_ERROR, capa, "opc "LPX64" not supported by", opc);
+ return -EACCES;
+ }
+
+ if ((rc = capa_is_sane(env, dev, capa, dev->od_capa_keys))) {
+ DEBUG_CAPA(D_ERROR, capa, "insane (rc %d)", rc);
+ return -EACCES;
+ }
+
+ return 0;
+}
+
+static struct obd_capa *osd_capa_get(const struct lu_env *env,
+ struct dt_object *dt,
+ struct lustre_capa *old,
+ __u64 opc)
+{
+ struct osd_thread_info *info = osd_oti_get(env);
+ const struct lu_fid *fid = lu_object_fid(&dt->do_lu);
+ struct osd_object *obj = osd_dt_obj(dt);
+ struct osd_device *dev = osd_obj2dev(obj);
+ struct lustre_capa_key *key = &info->oti_capa_key;
+ struct lustre_capa *capa = &info->oti_capa;
+ struct obd_capa *oc;
+ int rc;
+ ENTRY;
+
+ if (!dev->od_fl_capa)
+ RETURN(ERR_PTR(-ENOENT));
+
+ LASSERT(dt_object_exists(dt));
+ LASSERT(osd_invariant(obj));
+
+ /* renewal sanity check */
+ if (old && osd_object_auth(env, dt, old, opc))
+ RETURN(ERR_PTR(-EACCES));
+
+ capa->lc_fid = *fid;
+ capa->lc_opc = opc;
+ capa->lc_uid = 0;
+ capa->lc_flags = dev->od_capa_alg << 24;
+ capa->lc_timeout = dev->od_capa_timeout;
+ capa->lc_expiry = 0;
+
+ oc = capa_lookup(dev->od_capa_hash, capa, 1);
+ if (oc) {
+ LASSERT(!capa_is_expired(oc));
+ RETURN(oc);
+ }
+
+ cfs_spin_lock(&capa_lock);
+ *key = dev->od_capa_keys[1];
+ cfs_spin_unlock(&capa_lock);
+
+ capa->lc_keyid = key->lk_keyid;
+ capa->lc_expiry = cfs_time_current_sec() + dev->od_capa_timeout;
+
+ rc = capa_hmac(capa->lc_hmac, capa, key->lk_key);
+ if (rc) {
+ DEBUG_CAPA(D_ERROR, capa, "HMAC failed: %d for", rc);
+ LBUG();
+ RETURN(ERR_PTR(rc));
+ }
+
+ oc = capa_add(dev->od_capa_hash, capa);
+ RETURN(oc);
+}
+
+static int osd_object_sync(const struct lu_env *env, struct dt_object *dt)
+{
+ struct osd_device *osd = osd_obj2dev(osd_dt_obj(dt));
+ ENTRY;
+
+ /* XXX: no other option than syncing the whole filesystem until we
+ * support ZIL */
+ txg_wait_synced(dmu_objset_pool(osd->od_objset.os), 0ULL);
+
+ RETURN(0);
+}
+
+static struct dt_object_operations osd_obj_ops = {
+ .do_read_lock = osd_object_read_lock,
+ .do_write_lock = osd_object_write_lock,
+ .do_read_unlock = osd_object_read_unlock,
+ .do_write_unlock = osd_object_write_unlock,
+ .do_write_locked = osd_object_write_locked,
+ .do_attr_get = osd_attr_get,
+ .do_declare_attr_set = osd_declare_attr_set,
+ .do_attr_set = osd_attr_set,
+ .do_ah_init = osd_ah_init,
+ .do_declare_create = osd_declare_object_create,
+ .do_create = osd_object_create,
+ .do_declare_destroy = osd_declare_object_destroy,
+ .do_destroy = osd_object_destroy,
+ .do_index_try = osd_index_try,
+ .do_declare_ref_add = osd_declare_object_ref_add,
+ .do_ref_add = osd_object_ref_add,
+ .do_declare_ref_del = osd_declare_object_ref_del,
+ .do_ref_del = osd_object_ref_del,
+ .do_xattr_get = osd_xattr_get,
+ .do_declare_xattr_set = osd_declare_xattr_set,
+ .do_xattr_set = osd_xattr_set,
+ .do_declare_xattr_del = osd_declare_xattr_del,
+ .do_xattr_del = osd_xattr_del,
+ .do_xattr_list = osd_xattr_list,
+ .do_capa_get = osd_capa_get,
+ .do_object_sync = osd_object_sync,
+};
+
+static struct lu_object_operations osd_lu_obj_ops = {
+ .loo_object_init = osd_object_init,
+ .loo_object_delete = osd_object_delete,
+ .loo_object_release = osd_object_release,
+ .loo_object_free = osd_object_free,
+ .loo_object_print = osd_object_print,
+ .loo_object_invariant = osd_object_invariant,
+};
+
git://git.whamcloud.com / fs / lustre-release.git / commitdiff