Whamcloud - gitweb
4eb433fc79ee96da74597072c934dfddb8ccf1cd
[fs/lustre-release.git] / 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         struct lustre_mdt_attrs *lma;
192         struct lu_buf buf;
193         int cnt = 0;
194         int              rc;
195         ENTRY;
196
197         LASSERT(obj->oo_dn != NULL);
198
199         la->la_valid |= LA_ATIME | LA_MTIME | LA_CTIME | LA_BTIME | LA_MODE |
200                         LA_TYPE | LA_SIZE | LA_UID | LA_GID | LA_FLAGS |
201                         LA_NLINK;
202
203         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(o), NULL, osa->atime, 16);
204         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(o), NULL, osa->mtime, 16);
205         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(o), NULL, osa->ctime, 16);
206         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(o), NULL, osa->btime, 16);
207         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(o), NULL, &osa->mode, 8);
208         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(o), NULL, &osa->size, 8);
209         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(o), NULL, &osa->nlink, 8);
210         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(o), NULL, &osa->uid, 8);
211         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(o), NULL, &osa->gid, 8);
212         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(o), NULL, &osa->flags, 8);
213         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
214
215         rc = -sa_bulk_lookup(obj->oo_sa_hdl, bulk, cnt);
216         if (rc)
217                 GOTO(out_sa, rc);
218
219 #ifdef ZFS_PROJINHERIT
220         if (o->od_projectused_dn && osa->flags & ZFS_PROJID) {
221                 rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_PROJID(o),
222                                 &osa->projid, 8);
223                 if (rc)
224                         GOTO(out_sa, rc);
225
226                 la->la_projid = osa->projid;
227                 la->la_valid |= LA_PROJID;
228                 obj->oo_with_projid = 1;
229         } else {
230                 la->la_projid = ZFS_DEFAULT_PROJID;
231                 la->la_valid &= ~LA_PROJID;
232         }
233 #else
234         la->la_projid = 0;
235         la->la_valid &= ~LA_PROJID;
236 #endif
237
238         la->la_atime = osa->atime[0];
239         la->la_mtime = osa->mtime[0];
240         la->la_ctime = osa->ctime[0];
241         la->la_btime = osa->btime[0];
242         la->la_mode = osa->mode;
243         la->la_uid = osa->uid;
244         la->la_gid = osa->gid;
245         la->la_nlink = osa->nlink;
246         la->la_flags = attrs_zfs2fs(osa->flags);
247         la->la_size = osa->size;
248
249         /* Try to get extra flags from LMA */
250         lma = (struct lustre_mdt_attrs *)osd_oti_get(env)->oti_buf;
251         buf.lb_buf = lma;
252         buf.lb_len = sizeof(osd_oti_get(env)->oti_buf);
253         down_read(&obj->oo_guard);
254         rc = osd_xattr_get_lma(env, obj, &buf);
255         if (!rc) {
256                 lma->lma_incompat = le32_to_cpu(lma->lma_incompat);
257                 obj->oo_lma_flags =
258                         lma_to_lustre_flags(lma->lma_incompat);
259         } else if (rc == -ENODATA ||
260                    !(S_ISDIR(la->la_mode) &&
261                      dt_object_exists(&obj->oo_dt))) {
262                 rc = 0;
263         }
264         up_read(&obj->oo_guard);
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 (scrub->os_running) {
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         /* obj doesn't contain an lu_object_header, so we don't need call_rcu */
698         OBD_SLAB_FREE_PTR(obj, osd_object_kmem);
699         if (unlikely(h)) {
700                 lu_object_header_fini(h);
701                 OBD_FREE_PRE(h, sizeof(*h), "kfreed");
702                 kfree_rcu(h, loh_rcu);
703         }
704 }
705
706 static int
707 osd_object_unlinked_add(struct osd_object *obj, struct osd_thandle *oh)
708 {
709         int rc = -EBUSY;
710
711         LASSERT(obj->oo_destroy == OSD_DESTROY_ASYNC);
712
713         /* the object is supposed to be exclusively locked by
714          * the caller (osd_destroy()), while the transaction
715          * (oh) is per-thread and not shared */
716         if (likely(list_empty(&obj->oo_unlinked_linkage))) {
717                 list_add(&obj->oo_unlinked_linkage, &oh->ot_unlinked_list);
718                 rc = 0;
719         }
720
721         return rc;
722 }
723
724 /* Default to max data size covered by a level-1 indirect block */
725 static unsigned long osd_sync_destroy_max_size =
726         1UL << (DN_MAX_INDBLKSHIFT - SPA_BLKPTRSHIFT + SPA_MAXBLOCKSHIFT);
727 module_param(osd_sync_destroy_max_size, ulong, 0444);
728 MODULE_PARM_DESC(osd_sync_destroy_max_size, "Maximum object size to use synchronous destroy.");
729
730 static inline void
731 osd_object_set_destroy_type(struct osd_object *obj)
732 {
733         /*
734          * Lock-less OST_WRITE can race with OST_DESTROY, so set destroy type
735          * only once and use it consistently thereafter.
736          */
737         down_write(&obj->oo_guard);
738         if (obj->oo_destroy == OSD_DESTROY_NONE) {
739                 if (obj->oo_attr.la_size <= osd_sync_destroy_max_size)
740                         obj->oo_destroy = OSD_DESTROY_SYNC;
741                 else /* Larger objects are destroyed asynchronously */
742                         obj->oo_destroy = OSD_DESTROY_ASYNC;
743         }
744         up_write(&obj->oo_guard);
745 }
746
747 static int osd_declare_destroy(const struct lu_env *env, struct dt_object *dt,
748                                struct thandle *th)
749 {
750         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
751         struct osd_object       *obj = osd_dt_obj(dt);
752         struct osd_device       *osd = osd_obj2dev(obj);
753         struct osd_thandle      *oh;
754         dnode_t *dn;
755         int                      rc;
756         uint64_t                 zapid;
757         ENTRY;
758
759         LASSERT(th != NULL);
760         LASSERT(dt_object_exists(dt));
761
762         oh = container_of(th, struct osd_thandle, ot_super);
763         LASSERT(oh->ot_tx != NULL);
764
765         dmu_tx_mark_netfree(oh->ot_tx);
766
767         /* declare that we'll remove object from fid-dnode mapping */
768         zapid = osd_get_name_n_idx(env, osd, fid, NULL, 0, &dn);
769         osd_tx_hold_zap(oh->ot_tx, zapid, dn, FALSE, NULL);
770
771         osd_declare_xattrs_destroy(env, obj, oh);
772
773         /* one less inode */
774         rc = osd_declare_quota(env, osd, obj->oo_attr.la_uid,
775                                obj->oo_attr.la_gid, obj->oo_attr.la_projid,
776                                -1, oh, NULL, OSD_QID_INODE);
777         if (rc)
778                 RETURN(rc);
779
780         /* data to be truncated */
781         rc = osd_declare_quota(env, osd, obj->oo_attr.la_uid,
782                                obj->oo_attr.la_gid, obj->oo_attr.la_projid,
783                                0, oh, NULL, OSD_QID_BLK);
784         if (rc)
785                 RETURN(rc);
786
787         osd_object_set_destroy_type(obj);
788         if (obj->oo_destroy == OSD_DESTROY_SYNC)
789                 dmu_tx_hold_free(oh->ot_tx, obj->oo_dn->dn_object,
790                                  0, DMU_OBJECT_END);
791         else
792                 osd_tx_hold_zap(oh->ot_tx, osd->od_unlinked->dn_object,
793                                 osd->od_unlinked, TRUE, NULL);
794
795         /* remove agent entry (if have) from remote parent */
796         if (lu_object_has_agent_entry(&obj->oo_dt.do_lu))
797                 osd_tx_hold_zap(oh->ot_tx, osd->od_remote_parent_dir,
798                                 NULL, FALSE, NULL);
799
800         /* will help to find FID->ino when this object is being
801          * added to PENDING/ */
802         osd_idc_find_and_init(env, osd, obj);
803
804         RETURN(0);
805 }
806
807 static int osd_destroy(const struct lu_env *env, struct dt_object *dt,
808                        struct thandle *th)
809 {
810         struct osd_thread_info  *info = osd_oti_get(env);
811         char                    *buf = info->oti_str;
812         struct osd_object       *obj = osd_dt_obj(dt);
813         struct osd_device       *osd = osd_obj2dev(obj);
814         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
815         struct osd_thandle      *oh;
816         int                      rc;
817         uint64_t                 oid, zapid;
818         dnode_t *zdn;
819         ENTRY;
820
821         down_write(&obj->oo_guard);
822
823         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
824                 GOTO(out, rc = -ENOENT);
825
826         LASSERT(obj->oo_dn != NULL);
827
828         oh = container_of(th, struct osd_thandle, ot_super);
829         LASSERT(oh != NULL);
830         LASSERT(oh->ot_tx != NULL);
831
832         /* remove obj ref from index dir (it depends) */
833         zapid = osd_get_name_n_idx(env, osd, fid, buf,
834                                    sizeof(info->oti_str), &zdn);
835         rc = osd_xattrs_destroy(env, obj, oh);
836         if (rc) {
837                 CERROR("%s: cannot destroy xattrs for %s: rc = %d\n",
838                        osd->od_svname, buf, rc);
839                 GOTO(out, rc);
840         }
841
842         if (lu_object_has_agent_entry(&obj->oo_dt.do_lu)) {
843                 rc = osd_delete_from_remote_parent(env, osd, obj, oh, true);
844                 if (rc)
845                         GOTO(out, rc);
846         }
847
848         oid = obj->oo_dn->dn_object;
849         if (unlikely(obj->oo_destroy == OSD_DESTROY_NONE)) {
850                 /* this may happen if the destroy wasn't declared
851                  * e.g. when the object is created and then destroyed
852                  * in the same transaction - we don't need additional
853                  * space for destroy specifically */
854                 LASSERT(obj->oo_attr.la_size <= osd_sync_destroy_max_size);
855                 rc = -dmu_object_free(osd->od_os, oid, oh->ot_tx);
856                 if (rc)
857                         CERROR("%s: failed to free %s %llu: rc = %d\n",
858                                osd->od_svname, buf, oid, rc);
859         } else if (obj->oo_destroy == OSD_DESTROY_SYNC) {
860                 rc = -dmu_object_free(osd->od_os, oid, oh->ot_tx);
861                 if (rc)
862                         CERROR("%s: failed to free %s %llu: rc = %d\n",
863                                osd->od_svname, buf, oid, rc);
864         } else { /* asynchronous destroy */
865                 char *key = info->oti_key;
866
867                 rc = osd_object_unlinked_add(obj, oh);
868                 if (rc)
869                         GOTO(out, rc);
870
871                 snprintf(key, sizeof(info->oti_key), "%llx", oid);
872                 rc = osd_zap_add(osd, osd->od_unlinked->dn_object,
873                                  osd->od_unlinked, key, 8, 1, &oid, oh->ot_tx);
874                 if (rc)
875                         CERROR("%s: zap_add_int() failed %s %llu: rc = %d\n",
876                                osd->od_svname, buf, oid, rc);
877         }
878
879         /* Remove the OI mapping after the destroy to handle the race with
880          * OI scrub that may insert missed OI mapping during the interval. */
881         rc = osd_zap_remove(osd, zapid, zdn, buf, oh->ot_tx);
882         if (unlikely(rc == -ENOENT))
883                 rc = 0;
884         if (rc)
885                 CERROR("%s: zap_remove(%s) failed: rc = %d\n",
886                        osd->od_svname, buf, rc);
887
888         GOTO(out, rc);
889
890 out:
891         /* not needed in the cache anymore */
892         set_bit(LU_OBJECT_HEARD_BANSHEE, &dt->do_lu.lo_header->loh_flags);
893         if (rc == 0)
894                 obj->oo_destroyed = 1;
895         up_write(&obj->oo_guard);
896         RETURN (0);
897 }
898
899 static void osd_object_delete(const struct lu_env *env, struct lu_object *l)
900 {
901         struct osd_object *obj = osd_obj(l);
902         const struct lu_fid *fid = lu_object_fid(l);
903
904         if (obj->oo_dn) {
905                 if (likely(!fid_is_acct(fid))) {
906                         osd_object_sa_fini(obj);
907                         if (obj->oo_sa_xattr) {
908                                 nvlist_free(obj->oo_sa_xattr);
909                                 obj->oo_sa_xattr = NULL;
910                         }
911                         osd_dnode_rele(obj->oo_dn);
912                         list_del(&obj->oo_sa_linkage);
913                 }
914                 obj->oo_dn = NULL;
915         }
916 }
917
918 /*
919  * Concurrency: ->loo_object_release() is called under site spin-lock.
920  */
921 static void osd_object_release(const struct lu_env *env,
922                                struct lu_object *l)
923 {
924 }
925
926 /*
927  * Concurrency: shouldn't matter.
928  */
929 static int osd_object_print(const struct lu_env *env, void *cookie,
930                             lu_printer_t p, const struct lu_object *l)
931 {
932         struct osd_object *o = osd_obj(l);
933
934         return (*p)(env, cookie, LUSTRE_OSD_ZFS_NAME"-object@%p", o);
935 }
936
937 static void osd_read_lock(const struct lu_env *env, struct dt_object *dt,
938                           unsigned role)
939 {
940         struct osd_object *obj = osd_dt_obj(dt);
941
942         LASSERT(osd_invariant(obj));
943
944         down_read_nested(&obj->oo_sem, role);
945 }
946
947 static void osd_write_lock(const struct lu_env *env, struct dt_object *dt,
948                            unsigned role)
949 {
950         struct osd_object *obj = osd_dt_obj(dt);
951
952         LASSERT(osd_invariant(obj));
953
954         down_write_nested(&obj->oo_sem, role);
955 }
956
957 static void osd_read_unlock(const struct lu_env *env, struct dt_object *dt)
958 {
959         struct osd_object *obj = osd_dt_obj(dt);
960
961         LASSERT(osd_invariant(obj));
962         up_read(&obj->oo_sem);
963 }
964
965 static void osd_write_unlock(const struct lu_env *env, struct dt_object *dt)
966 {
967         struct osd_object *obj = osd_dt_obj(dt);
968
969         LASSERT(osd_invariant(obj));
970         up_write(&obj->oo_sem);
971 }
972
973 static int osd_write_locked(const struct lu_env *env, struct dt_object *dt)
974 {
975         struct osd_object *obj = osd_dt_obj(dt);
976         int rc = 1;
977
978         LASSERT(osd_invariant(obj));
979
980         if (down_write_trylock(&obj->oo_sem)) {
981                 rc = 0;
982                 up_write(&obj->oo_sem);
983         }
984         return rc;
985 }
986
987 static int osd_attr_get(const struct lu_env *env, struct dt_object *dt,
988                         struct lu_attr *attr)
989 {
990         struct osd_object *obj = osd_dt_obj(dt);
991         struct osd_device *osd = osd_obj2dev(obj);
992         uint64_t blocks;
993         uint32_t blksize;
994         int rc = 0;
995
996         down_read(&obj->oo_guard);
997
998         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
999                 GOTO(out, rc = -ENOENT);
1000
1001         if (unlikely(fid_is_acct(lu_object_fid(&dt->do_lu))))
1002                 GOTO(out, rc = 0);
1003
1004         LASSERT(osd_invariant(obj));
1005         LASSERT(obj->oo_dn);
1006
1007         read_lock(&obj->oo_attr_lock);
1008         *attr = obj->oo_attr;
1009         if (obj->oo_lma_flags & LUSTRE_ORPHAN_FL) {
1010                 attr->la_valid |= LA_FLAGS;
1011                 attr->la_flags |= LUSTRE_ORPHAN_FL;
1012         }
1013         if (obj->oo_lma_flags & LUSTRE_ENCRYPT_FL) {
1014                 attr->la_valid |= LA_FLAGS;
1015                 attr->la_flags |= LUSTRE_ENCRYPT_FL;
1016         }
1017         read_unlock(&obj->oo_attr_lock);
1018         if (attr->la_valid & LA_FLAGS && attr->la_flags & LUSTRE_ORPHAN_FL)
1019                 CDEBUG(D_INFO, "%s: set orphan flag on "DFID" (%llx/%x)\n",
1020                        osd_obj2dev(obj)->od_svname,
1021                        PFID(lu_object_fid(&dt->do_lu)),
1022                        attr->la_valid, obj->oo_lma_flags);
1023
1024         /* with ZFS_DEBUG zrl_add_debug() called by DB_DNODE_ENTER()
1025          * from within sa_object_size() can block on a mutex, so
1026          * we can't call sa_object_size() holding rwlock */
1027         sa_object_size(obj->oo_sa_hdl, &blksize, &blocks);
1028         /* we do not control size of indices, so always calculate
1029          * it from number of blocks reported by DMU */
1030         if (S_ISDIR(attr->la_mode)) {
1031                 attr->la_size = 512 * blocks;
1032                 rc = -zap_count(osd->od_os, obj->oo_dn->dn_object,
1033                                 &attr->la_dirent_count);
1034         }
1035         /* Block size may be not set; suggest maximal I/O transfers. */
1036         if (blksize == 0)
1037                 blksize = osd_spa_maxblocksize(
1038                         dmu_objset_spa(osd_obj2dev(obj)->od_os));
1039
1040         attr->la_blksize = blksize;
1041         attr->la_blocks = blocks;
1042         attr->la_valid |= LA_BLOCKS | LA_BLKSIZE;
1043
1044 out:
1045         up_read(&obj->oo_guard);
1046         return rc;
1047 }
1048
1049 /* Simple wrapper on top of qsd API which implement quota transfer for osd
1050  * setattr needs. As a reminder, only the root user can change ownership of
1051  * a file, that's why EDQUOT & EINPROGRESS errors are discarded */
1052 static inline int qsd_transfer(const struct lu_env *env,
1053                                struct qsd_instance *qsd,
1054                                struct lquota_trans *trans, int qtype,
1055                                __u64 orig_id, __u64 new_id, __u64 bspace,
1056                                struct lquota_id_info *qi, bool ignore_edquot)
1057 {
1058         int     rc;
1059
1060         if (unlikely(qsd == NULL))
1061                 return 0;
1062
1063         LASSERT(qtype >= 0 && qtype < LL_MAXQUOTAS);
1064         qi->lqi_type = qtype;
1065
1066         /* inode accounting */
1067         qi->lqi_is_blk = false;
1068
1069         /* one more inode for the new owner ... */
1070         qi->lqi_id.qid_uid = new_id;
1071         qi->lqi_space      = 1;
1072         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1073         if (ignore_edquot && (rc == -EDQUOT || rc == -EINPROGRESS))
1074                 rc = 0;
1075         if (rc)
1076                 return rc;
1077
1078         /* and one less inode for the current id */
1079         qi->lqi_id.qid_uid = orig_id;;
1080         qi->lqi_space      = -1;
1081         /* can't get EDQUOT when reducing usage */
1082         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1083         if (rc == -EINPROGRESS)
1084                 rc = 0;
1085         if (rc)
1086                 return rc;
1087
1088         /* block accounting */
1089         qi->lqi_is_blk = true;
1090
1091         /* more blocks for the new owner ... */
1092         qi->lqi_id.qid_uid = new_id;
1093         qi->lqi_space      = bspace;
1094         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1095         if (ignore_edquot && (rc == -EDQUOT || rc == -EINPROGRESS))
1096                 rc = 0;
1097         if (rc)
1098                 return rc;
1099
1100         /* and finally less blocks for the current owner */
1101         qi->lqi_id.qid_uid = orig_id;
1102         qi->lqi_space      = -bspace;
1103         rc = qsd_op_begin(env, qsd, trans, qi, NULL);
1104         /* can't get EDQUOT when reducing usage */
1105         if (rc == -EINPROGRESS)
1106                 rc = 0;
1107         return rc;
1108 }
1109
1110 static int osd_declare_attr_set(const struct lu_env *env,
1111                                 struct dt_object *dt,
1112                                 const struct lu_attr *attr,
1113                                 struct thandle *handle)
1114 {
1115         struct osd_thread_info  *info = osd_oti_get(env);
1116         struct osd_object       *obj = osd_dt_obj(dt);
1117         struct osd_device       *osd = osd_obj2dev(obj);
1118         dmu_tx_hold_t           *txh;
1119         struct osd_thandle      *oh;
1120         uint64_t                 bspace;
1121         uint32_t                 blksize;
1122         int                      rc = 0;
1123         bool                     found;
1124         ENTRY;
1125
1126
1127         LASSERT(handle != NULL);
1128         LASSERT(osd_invariant(obj));
1129
1130         oh = container_of(handle, struct osd_thandle, ot_super);
1131
1132         down_read(&obj->oo_guard);
1133         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
1134                 GOTO(out, rc = 0);
1135
1136         LASSERT(obj->oo_sa_hdl != NULL);
1137         LASSERT(oh->ot_tx != NULL);
1138         /* regular attributes are part of the bonus buffer */
1139         /* let's check whether this object is already part of
1140          * transaction.. */
1141         found = false;
1142         for (txh = list_head(&oh->ot_tx->tx_holds); txh;
1143              txh = list_next(&oh->ot_tx->tx_holds, txh)) {
1144                 if (txh->txh_dnode == NULL)
1145                         continue;
1146                 if (txh->txh_dnode->dn_object != obj->oo_dn->dn_object)
1147                         continue;
1148                 /* this object is part of the transaction already
1149                  * we don't need to declare bonus again */
1150                 found = true;
1151                 break;
1152         }
1153         if (!found)
1154                 dmu_tx_hold_bonus(oh->ot_tx, obj->oo_dn->dn_object);
1155         if (oh->ot_tx->tx_err != 0)
1156                 GOTO(out, rc = -oh->ot_tx->tx_err);
1157
1158         if (attr && attr->la_valid & LA_FLAGS) {
1159                 /* LMA is usually a part of bonus, no need to declare
1160                  * anything else */
1161         }
1162
1163         if (attr && (attr->la_valid & (LA_UID | LA_GID | LA_PROJID))) {
1164                 sa_object_size(obj->oo_sa_hdl, &blksize, &bspace);
1165                 bspace = toqb(bspace * 512);
1166
1167                 CDEBUG(D_QUOTA,
1168                        "%s: enforce quota on UID %u, GID %u, the quota space is %lld (%u)\n",
1169                        osd->od_svname,
1170                        attr->la_uid, attr->la_gid, bspace, blksize);
1171         }
1172
1173         if (attr && attr->la_valid & LA_UID) {
1174                 /* quota enforcement for user */
1175                 if (attr->la_uid != obj->oo_attr.la_uid) {
1176                         rc = qsd_transfer(env, osd_def_qsd(osd),
1177                                           &oh->ot_quota_trans, USRQUOTA,
1178                                           obj->oo_attr.la_uid, attr->la_uid,
1179                                           bspace, &info->oti_qi, true);
1180                         if (rc)
1181                                 GOTO(out, rc);
1182                 }
1183         }
1184         if (attr && attr->la_valid & LA_GID) {
1185                 /* quota enforcement for group */
1186                 if (attr->la_gid != obj->oo_attr.la_gid) {
1187                         rc = qsd_transfer(env, osd_def_qsd(osd),
1188                                           &oh->ot_quota_trans, GRPQUOTA,
1189                                           obj->oo_attr.la_gid, attr->la_gid,
1190                                           bspace, &info->oti_qi,
1191                                           !(attr->la_flags &
1192                                                         LUSTRE_SET_SYNC_FL));
1193                         if (rc)
1194                                 GOTO(out, rc);
1195                 }
1196         }
1197 #ifdef ZFS_PROJINHERIT
1198         if (attr && attr->la_valid & LA_PROJID) {
1199                 /* quota enforcement for project */
1200                 if (attr->la_projid != obj->oo_attr.la_projid) {
1201                         if (!osd->od_projectused_dn)
1202                                 GOTO(out, rc = -EOPNOTSUPP);
1203
1204                         /* Usually, if project quota is upgradable for the
1205                          * device, then the upgrade will be done before or when
1206                          * mount the device. So when we come here, this project
1207                          * should have project ID attribute already (that is
1208                          * zero by default).  Otherwise, there was something
1209                          * wrong during the former upgrade, let's return failure
1210                          * to report that.
1211                          *
1212                          * Please note that, different from other attributes,
1213                          * you can NOT simply set the project ID attribute under
1214                          * such case, because adding (NOT change) project ID
1215                          * attribute needs to change the object's attribute
1216                          * layout to match zfs backend quota accounting
1217                          * requirement. */
1218                         if (unlikely(!obj->oo_with_projid))
1219                                 GOTO(out, rc = -ENXIO);
1220
1221                         rc = qsd_transfer(env, osd_def_qsd(osd),
1222                                           &oh->ot_quota_trans, PRJQUOTA,
1223                                           obj->oo_attr.la_projid,
1224                                           attr->la_projid, bspace,
1225                                           &info->oti_qi, true);
1226                         if (rc)
1227                                 GOTO(out, rc);
1228                 }
1229         }
1230 #endif
1231 out:
1232         up_read(&obj->oo_guard);
1233         RETURN(rc);
1234 }
1235
1236 /*
1237  * Set the attributes of an object
1238  *
1239  * The transaction passed to this routine must have
1240  * dmu_tx_hold_bonus(tx, oid) called and then assigned
1241  * to a transaction group.
1242  */
1243 static int osd_attr_set(const struct lu_env *env, struct dt_object *dt,
1244                         const struct lu_attr *la, struct thandle *handle)
1245 {
1246         struct osd_thread_info  *info = osd_oti_get(env);
1247         sa_bulk_attr_t          *bulk = osd_oti_get(env)->oti_attr_bulk;
1248         struct osd_object       *obj = osd_dt_obj(dt);
1249         struct osd_device       *osd = osd_obj2dev(obj);
1250         struct osd_thandle      *oh;
1251         struct osa_attr         *osa = &info->oti_osa;
1252         __u64                    valid = la->la_valid;
1253         int                      cnt;
1254         int                      rc = 0;
1255
1256         ENTRY;
1257
1258         down_read(&obj->oo_guard);
1259         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
1260                 GOTO(out, rc = -ENOENT);
1261
1262         LASSERT(handle != NULL);
1263         LASSERT(osd_invariant(obj));
1264         LASSERT(obj->oo_sa_hdl);
1265
1266         oh = container_of(handle, struct osd_thandle, ot_super);
1267         /* Assert that the transaction has been assigned to a
1268            transaction group. */
1269         LASSERT(oh->ot_tx->tx_txg != 0);
1270
1271         if (OBD_FAIL_CHECK(OBD_FAIL_OSD_FID_MAPPING) && !osd->od_is_ost) {
1272                 struct zpl_direntry *zde = &info->oti_zde.lzd_reg;
1273                 char *buf = info->oti_str;
1274                 dnode_t *zdn = NULL;
1275                 uint64_t zapid;
1276
1277                 zapid = osd_get_name_n_idx(env, osd, lu_object_fid(&dt->do_lu),
1278                                            buf, sizeof(info->oti_str), &zdn);
1279                 rc = osd_zap_lookup(osd, zapid, zdn, buf, 8,
1280                                     sizeof(*zde) / 8, zde);
1281                 if (!rc) {
1282                         zde->zde_dnode -= 1;
1283                         rc = -zap_update(osd->od_os, zapid, buf, 8,
1284                                          sizeof(*zde) / 8, zde, oh->ot_tx);
1285                 }
1286                 if (rc > 0)
1287                         rc = 0;
1288                 GOTO(out, rc);
1289         }
1290
1291         /* Only allow set size for regular file */
1292         if (!S_ISREG(dt->do_lu.lo_header->loh_attr))
1293                 valid &= ~(LA_SIZE | LA_BLOCKS);
1294
1295         if (valid & LA_CTIME && la->la_ctime == obj->oo_attr.la_ctime)
1296                 valid &= ~LA_CTIME;
1297
1298         if (valid & LA_MTIME && la->la_mtime == obj->oo_attr.la_mtime)
1299                 valid &= ~LA_MTIME;
1300
1301         if (valid & LA_ATIME && la->la_atime == obj->oo_attr.la_atime)
1302                 valid &= ~LA_ATIME;
1303
1304         if (valid == 0)
1305                 GOTO(out, rc = 0);
1306
1307         if (valid & LA_FLAGS) {
1308                 struct lustre_mdt_attrs *lma;
1309                 struct lu_buf buf;
1310                 int size = 0;
1311
1312                 if (la->la_flags & LUSTRE_LMA_FL_MASKS) {
1313                         LASSERT(!obj->oo_pfid_in_lma);
1314                         BUILD_BUG_ON(sizeof(info->oti_buf) < sizeof(*lma));
1315                         lma = (struct lustre_mdt_attrs *)&info->oti_buf;
1316                         buf.lb_buf = lma;
1317                         buf.lb_len = sizeof(info->oti_buf);
1318
1319                         /* Please do NOT call osd_xattr_get() directly, that
1320                          * will cause recursive down_read() on oo_guard. */
1321                         rc = osd_xattr_get_internal(env, obj, &buf,
1322                                                     XATTR_NAME_LMA, &size);
1323                         if (!rc && unlikely(size < sizeof(*lma))) {
1324                                 rc = -EINVAL;
1325                         } else if (!rc) {
1326                                 lma->lma_incompat =
1327                                         le32_to_cpu(lma->lma_incompat);
1328                                 lma->lma_incompat |=
1329                                         lustre_to_lma_flags(la->la_flags);
1330                                 lma->lma_incompat =
1331                                         cpu_to_le32(lma->lma_incompat);
1332                                 buf.lb_buf = lma;
1333                                 buf.lb_len = sizeof(*lma);
1334                                 rc = osd_xattr_set_internal(env, obj, &buf,
1335                                                             XATTR_NAME_LMA,
1336                                                             LU_XATTR_REPLACE,
1337                                                             oh);
1338                         }
1339                         if (rc < 0) {
1340                                 CWARN("%s: failed to set LMA flags: rc = %d\n",
1341                                        osd->od_svname, rc);
1342                                 GOTO(out, rc);
1343                         } else {
1344                                 obj->oo_lma_flags =
1345                                         la->la_flags & LUSTRE_LMA_FL_MASKS;
1346                         }
1347                 }
1348         }
1349
1350         write_lock(&obj->oo_attr_lock);
1351         cnt = 0;
1352
1353         if (valid & LA_PROJID) {
1354 #ifdef ZFS_PROJINHERIT
1355                 if (osd->od_projectused_dn) {
1356                         LASSERT(obj->oo_with_projid);
1357
1358                         osa->projid = obj->oo_attr.la_projid = la->la_projid;
1359                         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1360                                          &osa->projid, 8);
1361                 } else
1362 #endif
1363                         valid &= ~LA_PROJID;
1364         }
1365
1366         if (valid & LA_ATIME) {
1367                 osa->atime[0] = obj->oo_attr.la_atime = la->la_atime;
1368                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL,
1369                                  osa->atime, 16);
1370         }
1371         if (valid & LA_MTIME) {
1372                 osa->mtime[0] = obj->oo_attr.la_mtime = la->la_mtime;
1373                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL,
1374                                  osa->mtime, 16);
1375         }
1376         if (valid & LA_CTIME) {
1377                 osa->ctime[0] = obj->oo_attr.la_ctime = la->la_ctime;
1378                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL,
1379                                  osa->ctime, 16);
1380         }
1381         if (valid & LA_MODE) {
1382                 /* mode is stored along with type, so read it first */
1383                 obj->oo_attr.la_mode = (obj->oo_attr.la_mode & S_IFMT) |
1384                         (la->la_mode & ~S_IFMT);
1385                 osa->mode = obj->oo_attr.la_mode;
1386                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL,
1387                                  &osa->mode, 8);
1388         }
1389         if (valid & LA_SIZE) {
1390                 osa->size = obj->oo_attr.la_size = la->la_size;
1391                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL,
1392                                  &osa->size, 8);
1393         }
1394         if (valid & LA_NLINK) {
1395                 osa->nlink = obj->oo_attr.la_nlink = la->la_nlink;
1396                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL,
1397                                  &osa->nlink, 8);
1398         }
1399         if (valid & LA_RDEV) {
1400                 osa->rdev = obj->oo_attr.la_rdev = la->la_rdev;
1401                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL,
1402                                  &osa->rdev, 8);
1403         }
1404         if (valid & LA_FLAGS) {
1405                 osa->flags = attrs_fs2zfs(la->la_flags);
1406                 /* many flags are not supported by zfs, so ensure a good cached
1407                  * copy */
1408                 obj->oo_attr.la_flags = attrs_zfs2fs(osa->flags);
1409 #ifdef ZFS_PROJINHERIT
1410                 if (obj->oo_with_projid && osd->od_projectused_dn)
1411                         osa->flags |= ZFS_PROJID;
1412 #endif
1413                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL,
1414                                  &osa->flags, 8);
1415         }
1416         if (valid & LA_UID) {
1417                 osa->uid = obj->oo_attr.la_uid = la->la_uid;
1418                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL,
1419                                  &osa->uid, 8);
1420         }
1421         if (valid & LA_GID) {
1422                 osa->gid = obj->oo_attr.la_gid = la->la_gid;
1423                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL,
1424                                  &osa->gid, 8);
1425         }
1426         obj->oo_attr.la_valid |= valid;
1427         write_unlock(&obj->oo_attr_lock);
1428
1429         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1430         rc = osd_object_sa_bulk_update(obj, bulk, cnt, oh);
1431
1432 out:
1433         up_read(&obj->oo_guard);
1434         RETURN(rc);
1435 }
1436
1437 /*
1438  * Object creation.
1439  *
1440  * XXX temporary solution.
1441  */
1442
1443 static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
1444                         struct dt_object *parent, struct dt_object *child,
1445                         umode_t child_mode)
1446 {
1447         LASSERT(ah);
1448
1449         ah->dah_parent = parent;
1450         ah->dah_mode = child_mode;
1451
1452         if (parent != NULL && !dt_object_remote(parent)) {
1453                 /* will help to find FID->ino at dt_insert("..") */
1454                 struct osd_object *pobj = osd_dt_obj(parent);
1455
1456                 osd_idc_find_and_init(env, osd_obj2dev(pobj), pobj);
1457         }
1458 }
1459
1460 static int osd_declare_create(const struct lu_env *env, struct dt_object *dt,
1461                               struct lu_attr *attr,
1462                               struct dt_allocation_hint *hint,
1463                               struct dt_object_format *dof,
1464                               struct thandle *handle)
1465 {
1466         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1467         struct osd_object       *obj = osd_dt_obj(dt);
1468         struct osd_device       *osd = osd_obj2dev(obj);
1469         struct osd_thandle      *oh;
1470         uint64_t                 zapid;
1471         dnode_t                 *dn;
1472         int                      rc, dnode_size;
1473         ENTRY;
1474
1475         LASSERT(dof);
1476
1477         switch (dof->dof_type) {
1478                 case DFT_REGULAR:
1479                 case DFT_SYM:
1480                 case DFT_NODE:
1481                         if (obj->oo_dt.do_body_ops == NULL)
1482                                 obj->oo_dt.do_body_ops = &osd_body_ops;
1483                         break;
1484                 default:
1485                         break;
1486         }
1487
1488         LASSERT(handle != NULL);
1489         oh = container_of(handle, struct osd_thandle, ot_super);
1490         LASSERT(oh->ot_tx != NULL);
1491
1492         /* this is the minimum set of EAs on every Lustre object */
1493         obj->oo_ea_in_bonus = OSD_BASE_EA_IN_BONUS;
1494         /* reserve 32 bytes for extra stuff like ACLs */
1495         dnode_size = size_roundup_power2(obj->oo_ea_in_bonus + 32);
1496
1497         switch (dof->dof_type) {
1498                 case DFT_DIR:
1499                         dt->do_index_ops = &osd_dir_ops;
1500                         /* fallthrough */
1501                 case DFT_INDEX:
1502                         /* for zap create */
1503                         dmu_tx_hold_zap(oh->ot_tx, DMU_NEW_OBJECT, FALSE, NULL);
1504                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1505                         break;
1506                 case DFT_REGULAR:
1507                 case DFT_SYM:
1508                 case DFT_NODE:
1509                         /* first, we'll create new object */
1510                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1511                         break;
1512
1513                 default:
1514                         LBUG();
1515                         break;
1516         }
1517
1518         /* and we'll add it to some mapping */
1519         zapid = osd_get_name_n_idx(env, osd, fid, NULL, 0, &dn);
1520         osd_tx_hold_zap(oh->ot_tx, zapid, dn, TRUE, NULL);
1521
1522         /* will help to find FID->ino mapping at dt_insert() */
1523         osd_idc_find_and_init(env, osd, obj);
1524
1525         rc = osd_declare_quota(env, osd, attr->la_uid, attr->la_gid,
1526                                attr->la_projid, 1, oh, NULL, OSD_QID_INODE);
1527
1528         RETURN(rc);
1529 }
1530
1531 int __osd_attr_init(const struct lu_env *env, struct osd_device *osd,
1532                     struct osd_object *obj, sa_handle_t *sa_hdl, dmu_tx_t *tx,
1533                     struct lu_attr *la, uint64_t parent,
1534                     nvlist_t *xattr)
1535 {
1536         sa_bulk_attr_t *bulk = osd_oti_get(env)->oti_attr_bulk;
1537         struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
1538         uint64_t gen;
1539         inode_timespec_t now;
1540         int cnt;
1541         int rc;
1542         char *dxattr = NULL;
1543         size_t sa_size;
1544
1545
1546         LASSERT(sa_hdl);
1547
1548         gen = dmu_tx_get_txg(tx);
1549         gethrestime(&now);
1550         ZFS_TIME_ENCODE(&now, osa->btime);
1551
1552         osa->atime[0] = la->la_atime;
1553         osa->ctime[0] = la->la_ctime;
1554         osa->mtime[0] = la->la_mtime;
1555         osa->mode = la->la_mode;
1556         osa->uid = la->la_uid;
1557         osa->gid = la->la_gid;
1558         osa->rdev = la->la_rdev;
1559         osa->nlink = la->la_nlink;
1560         if (la->la_valid & LA_FLAGS)
1561                 osa->flags = attrs_fs2zfs(la->la_flags);
1562         else
1563                 osa->flags = 0;
1564         osa->size  = la->la_size;
1565 #ifdef ZFS_PROJINHERIT
1566         if (osd->od_projectused_dn) {
1567                 if (la->la_valid & LA_PROJID)
1568                         osa->projid = la->la_projid;
1569                 else
1570                         osa->projid = ZFS_DEFAULT_PROJID;
1571                 osa->flags |= ZFS_PROJID;
1572                 if (obj)
1573                         obj->oo_with_projid = 1;
1574         } else {
1575                 osa->flags &= ~ZFS_PROJID;
1576         }
1577 #endif
1578
1579         /*
1580          * we need to create all SA below upon object create.
1581          *
1582          * XXX The attribute order matters since the accounting callback relies
1583          * on static offsets (i.e. SA_*_OFFSET, see zfs_space_delta_cb()) to
1584          * look up the UID/GID/PROJID attributes. Moreover, the callback does
1585          * not seem to support the spill block.
1586          * We define attributes in the same order as SA_*_OFFSET in order to
1587          * work around the problem. See ORI-610.
1588          */
1589         cnt = 0;
1590         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL, &osa->mode, 8);
1591         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL, &osa->size, 8);
1592         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GEN(osd), NULL, &gen, 8);
1593         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL, &osa->uid, 8);
1594         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL, &osa->gid, 8);
1595         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PARENT(osd), NULL, &parent, 8);
1596         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL, &osa->flags, 8);
1597         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL, osa->atime, 16);
1598         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL, osa->mtime, 16);
1599         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL, osa->ctime, 16);
1600         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(osd), NULL, osa->btime, 16);
1601         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL, &osa->nlink, 8);
1602 #ifdef ZFS_PROJINHERIT
1603         if (osd->od_projectused_dn)
1604                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1605                                  &osa->projid, 8);
1606 #endif
1607         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL, &osa->rdev, 8);
1608         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1609
1610         if (xattr) {
1611                 rc = -nvlist_size(xattr, &sa_size, NV_ENCODE_XDR);
1612                 LASSERT(rc == 0);
1613
1614                 dxattr = osd_zio_buf_alloc(sa_size);
1615                 LASSERT(dxattr);
1616
1617                 rc = -nvlist_pack(xattr, &dxattr, &sa_size,
1618                                 NV_ENCODE_XDR, KM_SLEEP);
1619                 LASSERT(rc == 0);
1620
1621                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_DXATTR(osd),
1622                                 NULL, dxattr, sa_size);
1623         }
1624
1625         rc = -sa_replace_all_by_template(sa_hdl, bulk, cnt, tx);
1626         if (dxattr)
1627                 osd_zio_buf_free(dxattr, sa_size);
1628
1629         return rc;
1630 }
1631
1632 int osd_find_new_dnode(const struct lu_env *env, dmu_tx_t *tx,
1633                        uint64_t oid, dnode_t **dnp)
1634 {
1635         dmu_tx_hold_t *txh;
1636         int rc = 0;
1637
1638         /* take dnode_t from tx to save on dnode#->dnode_t lookup */
1639         for (txh = list_tail(&tx->tx_holds); txh;
1640              txh = list_prev(&tx->tx_holds, txh)) {
1641                 dnode_t *dn = txh->txh_dnode;
1642                 dmu_buf_impl_t *db;
1643
1644                 if (dn == NULL)
1645                         continue;
1646                 if (dn->dn_object != oid)
1647                         continue;
1648                 db = dn->dn_bonus;
1649                 if (db == NULL) {
1650                         rw_enter(&dn->dn_struct_rwlock, RW_WRITER);
1651                         if (dn->dn_bonus == NULL)
1652                                 dbuf_create_bonus(dn);
1653                         rw_exit(&dn->dn_struct_rwlock);
1654                 }
1655                 db = dn->dn_bonus;
1656                 LASSERT(db);
1657                 LASSERT(dn->dn_handle);
1658                 DB_DNODE_ENTER(db);
1659                 if (zfs_refcount_add(&db->db_holds, osd_obj_tag) == 1) {
1660                         zfs_refcount_add(&dn->dn_holds, osd_obj_tag);
1661                         atomic_inc_32(&dn->dn_dbufs_count);
1662                 }
1663                 *dnp = dn;
1664                 DB_DNODE_EXIT(db);
1665                 dbuf_read(db, NULL, DB_RF_MUST_SUCCEED | DB_RF_NOPREFETCH);
1666                 break;
1667         }
1668
1669         if (unlikely(*dnp == NULL))
1670                 rc = __osd_obj2dnode(tx->tx_objset, oid, dnp);
1671
1672         return rc;
1673 }
1674
1675 #ifdef HAVE_DMU_OBJECT_ALLOC_DNSIZE
1676 int osd_find_dnsize(struct osd_device *osd, int ea_in_bonus)
1677 {
1678         int dnsize;
1679
1680         if (osd->od_dnsize == ZFS_DNSIZE_AUTO) {
1681                 dnsize = DNODE_MIN_SIZE;
1682                 do {
1683                         if (DN_BONUS_SIZE(dnsize) >= ea_in_bonus + 32)
1684                                 break;
1685                         dnsize <<= 1;
1686                 } while (dnsize < DNODE_MAX_SIZE);
1687                 if (dnsize > DNODE_MAX_SIZE)
1688                         dnsize = DNODE_MAX_SIZE;
1689         } else if (osd->od_dnsize == ZFS_DNSIZE_1K) {
1690                 dnsize = 1024;
1691         } else if (osd->od_dnsize == ZFS_DNSIZE_2K) {
1692                 dnsize = 2048;
1693         } else if (osd->od_dnsize == ZFS_DNSIZE_4K) {
1694                 dnsize = 4096;
1695         } else if (osd->od_dnsize == ZFS_DNSIZE_8K) {
1696                 dnsize = 8192;
1697         } else if (osd->od_dnsize == ZFS_DNSIZE_16K) {
1698                 dnsize = 16384;
1699         } else {
1700                 dnsize = DNODE_MIN_SIZE;
1701         }
1702         return dnsize;
1703 }
1704 #endif
1705
1706 /*
1707  * The transaction passed to this routine must have
1708  * dmu_tx_hold_bonus(tx, DMU_NEW_OBJECT) called and then assigned
1709  * to a transaction group.
1710  */
1711 int __osd_object_create(const struct lu_env *env, struct osd_device *osd,
1712                         struct osd_object *obj, const struct lu_fid *fid,
1713                         dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la)
1714 {
1715         dmu_object_type_t type = DMU_OT_PLAIN_FILE_CONTENTS;
1716         uint64_t oid;
1717         int size;
1718
1719         /* Use DMU_OTN_UINT8_METADATA for local objects so their data blocks
1720          * would get an additional ditto copy */
1721         if (unlikely(S_ISREG(la->la_mode) &&
1722                      fid_seq_is_local_file(fid_seq(fid))))
1723                 type = DMU_OTN_UINT8_METADATA;
1724
1725         /* Create a new DMU object using the default dnode size. */
1726         if (obj)
1727                 size = obj->oo_ea_in_bonus;
1728         else
1729                 size = OSD_BASE_EA_IN_BONUS;
1730         oid = osd_dmu_object_alloc(osd->od_os, type, 0,
1731                                    osd_find_dnsize(osd, size), tx);
1732
1733         LASSERT(la->la_valid & LA_MODE);
1734         la->la_size = 0;
1735         la->la_nlink = 1;
1736
1737         return osd_find_new_dnode(env, tx, oid, dnp);
1738 }
1739
1740 /*
1741  * The transaction passed to this routine must have
1742  * dmu_tx_hold_zap(tx, DMU_NEW_OBJECT, ...) called and then assigned
1743  * to a transaction group.
1744  *
1745  * Using ZAP_FLAG_HASH64 will force the ZAP to always be a FAT ZAP.
1746  * This is fine for directories today, because storing the FID in the dirent
1747  * will also require a FAT ZAP.  If there is a new type of micro ZAP created
1748  * then we might need to re-evaluate the use of this flag and instead do
1749  * a conversion from the different internal ZAP hash formats being used. */
1750 int __osd_zap_create(const struct lu_env *env, struct osd_device *osd,
1751                      dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la,
1752                      unsigned dnsize, zap_flags_t flags)
1753 {
1754         uint64_t oid;
1755
1756         /* Assert that the transaction has been assigned to a
1757            transaction group. */
1758         LASSERT(tx->tx_txg != 0);
1759         *dnp = NULL;
1760
1761         oid = osd_zap_create_flags(osd->od_os, 0, flags | ZAP_FLAG_HASH64,
1762                                    DMU_OT_DIRECTORY_CONTENTS,
1763                                    14, /* == ZFS fzap_default_blockshift */
1764                                    DN_MAX_INDBLKSHIFT, /* indirect blockshift */
1765                                    dnsize, tx);
1766
1767         la->la_size = 2;
1768         la->la_nlink = 1;
1769
1770         return osd_find_new_dnode(env, tx, oid, dnp);
1771 }
1772
1773 static dnode_t *osd_mkidx(const struct lu_env *env, struct osd_object *obj,
1774                           struct lu_attr *la, struct osd_thandle *oh)
1775 {
1776         struct osd_device *osd = osd_obj2dev(obj);
1777         dnode_t *dn;
1778         int rc;
1779
1780         /* Index file should be created as regular file in order not to confuse
1781          * ZPL which could interpret them as directory.
1782          * We set ZAP_FLAG_UINT64_KEY to let ZFS know than we are going to use
1783          * binary keys */
1784         LASSERT(S_ISREG(la->la_mode));
1785         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1786                 osd_find_dnsize(osd, obj->oo_ea_in_bonus), ZAP_FLAG_UINT64_KEY);
1787         if (rc)
1788                 return ERR_PTR(rc);
1789         return dn;
1790 }
1791
1792 static dnode_t *osd_mkdir(const struct lu_env *env, struct osd_object *obj,
1793                           struct lu_attr *la, struct osd_thandle *oh)
1794 {
1795         struct osd_device *osd = osd_obj2dev(obj);
1796         dnode_t *dn;
1797         int rc;
1798
1799         LASSERT(S_ISDIR(la->la_mode));
1800         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1801                               osd_find_dnsize(osd, obj->oo_ea_in_bonus), 0);
1802         if (rc)
1803                 return ERR_PTR(rc);
1804         return dn;
1805 }
1806
1807 static dnode_t *osd_mkreg(const struct lu_env *env, struct osd_object *obj,
1808                           struct lu_attr *la, struct osd_thandle *oh)
1809 {
1810         const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
1811         struct osd_device *osd = osd_obj2dev(obj);
1812         dnode_t *dn;
1813         int rc;
1814
1815         LASSERT(S_ISREG(la->la_mode));
1816         rc = __osd_object_create(env, osd, obj, fid, &dn, oh->ot_tx, la);
1817         if (rc)
1818                 return ERR_PTR(rc);
1819
1820         if ((fid_is_idif(fid) || fid_is_norm(fid) || fid_is_echo(fid))) {
1821                 /* The minimum block size must be at least page size otherwise
1822                  * it will break the assumption in tgt_thread_big_cache where
1823                  * the array size is PTLRPC_MAX_BRW_PAGES. It will also affect
1824                  * RDMA due to subpage transfer size */
1825                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1826                                                PAGE_SIZE, 0, oh->ot_tx);
1827                 if (unlikely(rc)) {
1828                         CERROR("%s: can't change blocksize: %d\n",
1829                                osd->od_svname, rc);
1830                         return ERR_PTR(rc);
1831                 }
1832         } else if ((fid_is_llog(fid))) {
1833                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1834                                                LLOG_MIN_CHUNK_SIZE, 0, oh->ot_tx);
1835                 if (unlikely(rc)) {
1836                         CERROR("%s: can't change blocksize: %d\n",
1837                                osd->od_svname, rc);
1838                         return ERR_PTR(rc);
1839                 }
1840         }
1841
1842         return dn;
1843 }
1844
1845 static dnode_t *osd_mksym(const struct lu_env *env, struct osd_object *obj,
1846                           struct lu_attr *la, struct osd_thandle *oh)
1847 {
1848         dnode_t *dn;
1849         int rc;
1850
1851         LASSERT(S_ISLNK(la->la_mode));
1852         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1853                                  lu_object_fid(&obj->oo_dt.do_lu),
1854                                  &dn, oh->ot_tx, la);
1855         if (rc)
1856                 return ERR_PTR(rc);
1857         return dn;
1858 }
1859
1860 static dnode_t *osd_mknod(const struct lu_env *env, struct osd_object *obj,
1861                           struct lu_attr *la, struct osd_thandle *oh)
1862 {
1863         dnode_t *dn;
1864         int rc;
1865
1866         if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode))
1867                 la->la_valid |= LA_RDEV;
1868
1869         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1870                                  lu_object_fid(&obj->oo_dt.do_lu),
1871                                  &dn, oh->ot_tx, la);
1872         if (rc)
1873                 return ERR_PTR(rc);
1874         return dn;
1875 }
1876
1877 typedef dnode_t *(*osd_obj_type_f)(const struct lu_env *env,
1878                                    struct osd_object *obj,
1879                                    struct lu_attr *la,
1880                                    struct osd_thandle *oh);
1881
1882 static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
1883 {
1884         osd_obj_type_f result;
1885
1886         switch (type) {
1887         case DFT_DIR:
1888                 result = osd_mkdir;
1889                 break;
1890         case DFT_INDEX:
1891                 result = osd_mkidx;
1892                 break;
1893         case DFT_REGULAR:
1894                 result = osd_mkreg;
1895                 break;
1896         case DFT_SYM:
1897                 result = osd_mksym;
1898                 break;
1899         case DFT_NODE:
1900                 result = osd_mknod;
1901                 break;
1902         default:
1903                 LBUG();
1904                 break;
1905         }
1906         return result;
1907 }
1908
1909 /*
1910  * Concurrency: @dt is write locked.
1911  */
1912 static int osd_create(const struct lu_env *env, struct dt_object *dt,
1913                       struct lu_attr *attr, struct dt_allocation_hint *hint,
1914                       struct dt_object_format *dof, struct thandle *th)
1915 {
1916         struct osd_thread_info  *info = osd_oti_get(env);
1917         struct lustre_mdt_attrs *lma = &info->oti_mdt_attrs;
1918         struct zpl_direntry     *zde = &info->oti_zde.lzd_reg;
1919         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1920         struct osd_object       *obj = osd_dt_obj(dt);
1921         struct osd_device       *osd = osd_obj2dev(obj);
1922         char                    *buf = info->oti_str;
1923         struct osd_thandle      *oh;
1924         dnode_t *dn = NULL, *zdn = NULL;
1925         uint64_t                 zapid, parent = 0;
1926         int                      rc;
1927         __u32 compat = 0;
1928
1929         ENTRY;
1930
1931         LASSERT(!fid_is_acct(fid));
1932
1933         /* concurrent create declarations should not see
1934          * the object inconsistent (db, attr, etc).
1935          * in regular cases acquisition should be cheap */
1936         down_write(&obj->oo_guard);
1937
1938         if (unlikely(dt_object_exists(dt)))
1939                 GOTO(out, rc = -EEXIST);
1940
1941         LASSERT(osd_invariant(obj));
1942         LASSERT(dof != NULL);
1943
1944         LASSERT(th != NULL);
1945         oh = container_of(th, struct osd_thandle, ot_super);
1946
1947         LASSERT(obj->oo_dn == NULL);
1948
1949         /* to follow ZFS on-disk format we need
1950          * to initialize parent dnode properly */
1951         if (hint != NULL && hint->dah_parent != NULL &&
1952             !dt_object_remote(hint->dah_parent))
1953                 parent = osd_dt_obj(hint->dah_parent)->oo_dn->dn_object;
1954
1955         /* we may fix some attributes, better do not change the source */
1956         obj->oo_attr = *attr;
1957         obj->oo_attr.la_valid |= LA_SIZE | LA_NLINK | LA_TYPE;
1958
1959 #ifdef ZFS_PROJINHERIT
1960         if (osd->od_projectused_dn) {
1961                 if (!(obj->oo_attr.la_valid & LA_PROJID))
1962                         obj->oo_attr.la_projid = ZFS_DEFAULT_PROJID;
1963                 obj->oo_with_projid = 1;
1964         }
1965 #endif
1966
1967         dn = osd_create_type_f(dof->dof_type)(env, obj, &obj->oo_attr, oh);
1968         if (IS_ERR(dn)) {
1969                 rc = PTR_ERR(dn);
1970                 dn = NULL;
1971                 GOTO(out, rc);
1972         }
1973
1974         zde->zde_pad = 0;
1975         zde->zde_dnode = dn->dn_object;
1976         zde->zde_type = IFTODT(attr->la_mode & S_IFMT);
1977
1978         zapid = osd_get_name_n_idx(env, osd, fid, buf,
1979                                    sizeof(info->oti_str), &zdn);
1980         if (CFS_FAIL_CHECK(OBD_FAIL_OSD_NO_OI_ENTRY) ||
1981             (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_NO_ENTRY)))
1982                 goto skip_add;
1983
1984         if (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_INVALID_ENTRY))
1985                 zde->zde_dnode++;
1986
1987         rc = osd_zap_add(osd, zapid, zdn, buf, 8, 1, zde, oh->ot_tx);
1988         if (rc)
1989                 GOTO(out, rc);
1990
1991 skip_add:
1992         obj->oo_dn = dn;
1993         /* Now add in all of the "SA" attributes */
1994         rc = osd_sa_handle_get(obj);
1995         if (rc)
1996                 GOTO(out, rc);
1997
1998         rc = -nvlist_alloc(&obj->oo_sa_xattr, NV_UNIQUE_NAME, KM_SLEEP);
1999         if (rc)
2000                 GOTO(out, rc);
2001
2002         /* initialize LMA */
2003         if (fid_is_idif(fid) || (fid_is_norm(fid) && osd->od_is_ost))
2004                 compat |= LMAC_FID_ON_OST;
2005         lustre_lma_init(lma, fid, compat, 0);
2006         lustre_lma_swab(lma);
2007         rc = -nvlist_add_byte_array(obj->oo_sa_xattr, XATTR_NAME_LMA,
2008                                     (uchar_t *)lma, sizeof(*lma));
2009         if (rc)
2010                 GOTO(out, rc);
2011
2012         /* configure new osd object */
2013         obj->oo_parent = parent != 0 ? parent : zapid;
2014         obj->oo_late_attr_set = 1;
2015         rc = __osd_sa_xattr_schedule_update(env, obj, oh);
2016         if (rc)
2017                 GOTO(out, rc);
2018
2019         /* XXX: oo_lma_flags */
2020         obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
2021         if (likely(!fid_is_acct(lu_object_fid(&obj->oo_dt.do_lu))))
2022                 /* no body operations for accounting objects */
2023                 obj->oo_dt.do_body_ops = &osd_body_ops;
2024
2025         osd_idc_find_and_init(env, osd, obj);
2026
2027 out:
2028         if (unlikely(rc && dn)) {
2029                 dmu_object_free(osd->od_os, dn->dn_object, oh->ot_tx);
2030                 osd_dnode_rele(dn);
2031                 obj->oo_dn = NULL;
2032         } else if (!rc) {
2033                 obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
2034         }
2035         up_write(&obj->oo_guard);
2036         RETURN(rc);
2037 }
2038
2039 static int osd_declare_ref_add(const struct lu_env *env, struct dt_object *dt,
2040                                struct thandle *th)
2041 {
2042         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2043         return osd_declare_attr_set(env, dt, NULL, th);
2044 }
2045
2046 /*
2047  * Concurrency: @dt is write locked.
2048  */
2049 static int osd_ref_add(const struct lu_env *env, struct dt_object *dt,
2050                        struct thandle *handle)
2051 {
2052         struct osd_object       *obj = osd_dt_obj(dt);
2053         struct osd_thandle      *oh;
2054         struct osd_device       *osd = osd_obj2dev(obj);
2055         uint64_t                 nlink;
2056         int rc;
2057
2058         ENTRY;
2059
2060         down_read(&obj->oo_guard);
2061         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2062                 GOTO(out, rc = -ENOENT);
2063
2064         LASSERT(osd_invariant(obj));
2065         LASSERT(obj->oo_sa_hdl != NULL);
2066
2067         oh = container_of(handle, struct osd_thandle, ot_super);
2068
2069         write_lock(&obj->oo_attr_lock);
2070         nlink = ++obj->oo_attr.la_nlink;
2071         write_unlock(&obj->oo_attr_lock);
2072
2073         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2074
2075 out:
2076         up_read(&obj->oo_guard);
2077         RETURN(rc);
2078 }
2079
2080 static int osd_declare_ref_del(const struct lu_env *env, struct dt_object *dt,
2081                                struct thandle *handle)
2082 {
2083         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2084         return osd_declare_attr_set(env, dt, NULL, handle);
2085 }
2086
2087 /*
2088  * Concurrency: @dt is write locked.
2089  */
2090 static int osd_ref_del(const struct lu_env *env, struct dt_object *dt,
2091                        struct thandle *handle)
2092 {
2093         struct osd_object       *obj = osd_dt_obj(dt);
2094         struct osd_thandle      *oh;
2095         struct osd_device       *osd = osd_obj2dev(obj);
2096         uint64_t                 nlink;
2097         int                      rc;
2098
2099         ENTRY;
2100
2101         down_read(&obj->oo_guard);
2102
2103         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2104                 GOTO(out, rc = -ENOENT);
2105
2106         LASSERT(osd_invariant(obj));
2107         LASSERT(obj->oo_sa_hdl != NULL);
2108
2109         oh = container_of(handle, struct osd_thandle, ot_super);
2110         LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
2111
2112         write_lock(&obj->oo_attr_lock);
2113         nlink = --obj->oo_attr.la_nlink;
2114         write_unlock(&obj->oo_attr_lock);
2115
2116         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2117
2118 out:
2119         up_read(&obj->oo_guard);
2120         RETURN(rc);
2121 }
2122
2123 static int osd_object_sync(const struct lu_env *env, struct dt_object *dt,
2124                            __u64 start, __u64 end)
2125 {
2126         struct osd_device *osd = osd_obj2dev(osd_dt_obj(dt));
2127         struct dmu_buf_impl *db = osd_dt_obj(dt)->oo_dn->dn_dbuf;
2128         uint64_t txg = 0;
2129         ENTRY;
2130
2131         if (osd->od_dt_dev.dd_rdonly)
2132                 RETURN(0);
2133
2134         mutex_enter(&db->db_mtx);
2135         if (db->db_last_dirty)
2136                 txg = db->db_last_dirty->dr_txg;
2137         mutex_exit(&db->db_mtx);
2138
2139         if (txg) {
2140                 /* the object is dirty or being synced */
2141                 if (osd_object_sync_delay_us < 0)
2142                         txg_wait_synced(dmu_objset_pool(osd->od_os), txg);
2143                 else
2144                         udelay(osd_object_sync_delay_us);
2145         }
2146
2147         RETURN(0);
2148 }
2149
2150 static int osd_invalidate(const struct lu_env *env, struct dt_object *dt)
2151 {
2152         return 0;
2153 }
2154
2155 static struct dt_object_operations osd_obj_ops = {
2156         .do_read_lock           = osd_read_lock,
2157         .do_write_lock          = osd_write_lock,
2158         .do_read_unlock         = osd_read_unlock,
2159         .do_write_unlock        = osd_write_unlock,
2160         .do_write_locked        = osd_write_locked,
2161         .do_attr_get            = osd_attr_get,
2162         .do_declare_attr_set    = osd_declare_attr_set,
2163         .do_attr_set            = osd_attr_set,
2164         .do_ah_init             = osd_ah_init,
2165         .do_declare_create      = osd_declare_create,
2166         .do_create              = osd_create,
2167         .do_declare_destroy     = osd_declare_destroy,
2168         .do_destroy             = osd_destroy,
2169         .do_index_try           = osd_index_try,
2170         .do_declare_ref_add     = osd_declare_ref_add,
2171         .do_ref_add             = osd_ref_add,
2172         .do_declare_ref_del     = osd_declare_ref_del,
2173         .do_ref_del             = osd_ref_del,
2174         .do_xattr_get           = osd_xattr_get,
2175         .do_declare_xattr_set   = osd_declare_xattr_set,
2176         .do_xattr_set           = osd_xattr_set,
2177         .do_declare_xattr_del   = osd_declare_xattr_del,
2178         .do_xattr_del           = osd_xattr_del,
2179         .do_xattr_list          = osd_xattr_list,
2180         .do_object_sync         = osd_object_sync,
2181         .do_invalidate          = osd_invalidate,
2182 };
2183
2184 static struct lu_object_operations osd_lu_obj_ops = {
2185         .loo_object_init        = osd_object_init,
2186         .loo_object_delete      = osd_object_delete,
2187         .loo_object_release     = osd_object_release,
2188         .loo_object_free        = osd_object_free,
2189         .loo_object_print       = osd_object_print,
2190         .loo_object_invariant   = osd_object_invariant,
2191 };
2192
2193 static int osd_otable_it_attr_get(const struct lu_env *env,
2194                                 struct dt_object *dt,
2195                                 struct lu_attr *attr)
2196 {
2197         attr->la_valid = 0;
2198         return 0;
2199 }
2200
2201 static struct dt_object_operations osd_obj_otable_it_ops = {
2202         .do_attr_get            = osd_otable_it_attr_get,
2203         .do_index_try           = osd_index_try,
2204 };
2205
2206 module_param(osd_object_sync_delay_us, int, 0644);
2207 MODULE_PARM_DESC(osd_object_sync_delay_us,
2208                  "If zero or larger delay N usec instead of doing object sync");