Whamcloud - gitweb
LU-14740 quota: reject invalid project id on server side
[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  *
31  * lustre/osd-zfs/osd_object.c
32  *
33  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
34  * Author: Mike Pershin <tappro@whamcloud.com>
35  * Author: Johann Lombardi <johann@whamcloud.com>
36  */
37
38 #define DEBUG_SUBSYSTEM S_OSD
39
40 #include <libcfs/libcfs.h>
41 #include <obd_support.h>
42 #include <lustre_net.h>
43 #include <obd.h>
44 #include <obd_class.h>
45 #include <lustre_disk.h>
46 #include <lustre_fid.h>
47
48 #include "osd_internal.h"
49
50 #include <sys/dnode.h>
51 #include <sys/dbuf.h>
52 #include <sys/spa.h>
53 #include <sys/stat.h>
54 #include <sys/zap.h>
55 #include <sys/spa_impl.h>
56 #include <sys/zfs_znode.h>
57 #include <sys/dmu_tx.h>
58 #include <sys/dmu_objset.h>
59 #include <sys/dsl_prop.h>
60 #include <sys/sa_impl.h>
61 #include <sys/txg.h>
62
63 char *osd_obj_tag = "osd_object";
64 static int osd_object_sync_delay_us = -1;
65
66 static const struct dt_object_operations osd_obj_ops;
67 static const struct lu_object_operations osd_lu_obj_ops;
68 static const struct dt_object_operations osd_obj_otable_it_ops;
69
70 static void
71 osd_object_sa_fini(struct osd_object *obj)
72 {
73         if (obj->oo_sa_hdl) {
74                 sa_handle_destroy(obj->oo_sa_hdl);
75                 obj->oo_sa_hdl = NULL;
76         }
77 }
78
79 static int
80 osd_object_sa_init(struct osd_object *obj, struct osd_device *o)
81 {
82         int rc;
83
84         LASSERT(obj->oo_sa_hdl == NULL);
85         LASSERT(obj->oo_dn != NULL);
86
87         rc = osd_sa_handle_get(obj);
88         if (rc)
89                 return rc;
90
91         /* Cache the xattr object id, valid for the life of the object */
92         rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_XATTR(o), &obj->oo_xattr, 8);
93         if (rc == -ENOENT) {
94                 obj->oo_xattr = ZFS_NO_OBJECT;
95                 rc = 0;
96         } else if (rc) {
97                 osd_object_sa_fini(obj);
98         }
99
100         return rc;
101 }
102
103 /*
104  * Add object to list of dirty objects in tx handle.
105  */
106 void osd_object_sa_dirty_add(struct osd_object *obj, struct osd_thandle *oh)
107 {
108         if (!list_empty(&obj->oo_sa_linkage))
109                 return;
110
111         write_lock(&obj->oo_attr_lock);
112         if (likely(list_empty(&obj->oo_sa_linkage)))
113                 list_add(&obj->oo_sa_linkage, &oh->ot_sa_list);
114         write_unlock(&obj->oo_attr_lock);
115 }
116
117 /*
118  * Release spill block dbuf hold for all dirty SAs.
119  */
120 void osd_object_sa_dirty_rele(const struct lu_env *env, struct osd_thandle *oh)
121 {
122         struct osd_object *obj;
123
124         while (!list_empty(&oh->ot_sa_list)) {
125                 obj = list_entry(oh->ot_sa_list.next,
126                                  struct osd_object, oo_sa_linkage);
127                 write_lock(&obj->oo_attr_lock);
128                 list_del_init(&obj->oo_sa_linkage);
129                 write_unlock(&obj->oo_attr_lock);
130                 if (obj->oo_late_xattr) {
131                         /*
132                          * take oo_guard to protect oo_sa_xattr buffer
133                          * from concurrent update by osd_xattr_set()
134                          */
135                         LASSERT(oh->ot_assigned != 0);
136                         down_write(&obj->oo_guard);
137                         if (obj->oo_late_attr_set)
138                                 __osd_sa_attr_init(env, obj, oh);
139                         else if (obj->oo_late_xattr)
140                                 __osd_sa_xattr_update(env, obj, oh);
141                         up_write(&obj->oo_guard);
142                 }
143                 sa_spill_rele(obj->oo_sa_hdl);
144         }
145 }
146
147 /*
148  * Update the SA and add the object to the dirty list.
149  */
150 int osd_object_sa_update(struct osd_object *obj, sa_attr_type_t type,
151                          void *buf, uint32_t buflen, struct osd_thandle *oh)
152 {
153         int rc;
154
155         LASSERT(obj->oo_sa_hdl != NULL);
156         LASSERT(oh->ot_tx != NULL);
157
158         rc = -sa_update(obj->oo_sa_hdl, type, buf, buflen, oh->ot_tx);
159         osd_object_sa_dirty_add(obj, oh);
160
161         return rc;
162 }
163
164 /*
165  * Bulk update the SA and add the object to the dirty list.
166  */
167 static int
168 osd_object_sa_bulk_update(struct osd_object *obj, sa_bulk_attr_t *attrs,
169                           int count, struct osd_thandle *oh)
170 {
171         int rc;
172
173         LASSERT(obj->oo_sa_hdl != NULL);
174         LASSERT(oh->ot_tx != NULL);
175
176         rc = -sa_bulk_update(obj->oo_sa_hdl, attrs, count, oh->ot_tx);
177         osd_object_sa_dirty_add(obj, oh);
178
179         return rc;
180 }
181
182 /*
183  * Retrieve the attributes of a DMU object
184  */
185 static int __osd_object_attr_get(const struct lu_env *env, struct osd_device *o,
186                                  struct osd_object *obj, struct lu_attr *la)
187 {
188         struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
189         sa_bulk_attr_t *bulk = osd_oti_get(env)->oti_attr_bulk;
190         struct lustre_mdt_attrs *lma;
191         struct lu_buf buf;
192         int cnt = 0;
193         int              rc;
194         ENTRY;
195
196         LASSERT(obj->oo_dn != NULL);
197
198         la->la_valid |= LA_ATIME | LA_MTIME | LA_CTIME | LA_BTIME | LA_MODE |
199                         LA_TYPE | LA_SIZE | LA_UID | LA_GID | LA_FLAGS |
200                         LA_NLINK;
201
202         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(o), NULL, osa->atime, 16);
203         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(o), NULL, osa->mtime, 16);
204         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(o), NULL, osa->ctime, 16);
205         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(o), NULL, osa->btime, 16);
206         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(o), NULL, &osa->mode, 8);
207         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(o), NULL, &osa->size, 8);
208         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(o), NULL, &osa->nlink, 8);
209         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(o), NULL, &osa->uid, 8);
210         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(o), NULL, &osa->gid, 8);
211         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(o), NULL, &osa->flags, 8);
212         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
213
214         rc = -sa_bulk_lookup(obj->oo_sa_hdl, bulk, cnt);
215         if (rc)
216                 GOTO(out_sa, rc);
217
218 #ifdef ZFS_PROJINHERIT
219         if (o->od_projectused_dn && osa->flags & ZFS_PROJID) {
220                 rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_PROJID(o),
221                                 &osa->projid, 8);
222                 if (rc)
223                         GOTO(out_sa, rc);
224
225                 la->la_projid = osa->projid;
226                 la->la_valid |= LA_PROJID;
227                 obj->oo_with_projid = 1;
228         } else {
229                 la->la_projid = ZFS_DEFAULT_PROJID;
230                 la->la_valid &= ~LA_PROJID;
231         }
232 #else
233         la->la_projid = 0;
234         la->la_valid &= ~LA_PROJID;
235 #endif
236
237         la->la_atime = osa->atime[0];
238         la->la_mtime = osa->mtime[0];
239         la->la_ctime = osa->ctime[0];
240         la->la_btime = osa->btime[0];
241         la->la_mode = osa->mode;
242         la->la_uid = osa->uid;
243         la->la_gid = osa->gid;
244         la->la_nlink = osa->nlink;
245         la->la_flags = attrs_zfs2fs(osa->flags);
246         la->la_size = osa->size;
247
248         /* Try to get extra flags from LMA */
249         lma = (struct lustre_mdt_attrs *)osd_oti_get(env)->oti_buf;
250         buf.lb_buf = lma;
251         buf.lb_len = sizeof(osd_oti_get(env)->oti_buf);
252         down_read(&obj->oo_guard);
253         rc = osd_xattr_get_lma(env, obj, &buf);
254         if (!rc) {
255                 lma->lma_incompat = le32_to_cpu(lma->lma_incompat);
256                 obj->oo_lma_flags =
257                         lma_to_lustre_flags(lma->lma_incompat);
258         } else if (rc == -ENODATA ||
259                    !(S_ISDIR(la->la_mode) &&
260                      dt_object_exists(&obj->oo_dt))) {
261                 rc = 0;
262         }
263         up_read(&obj->oo_guard);
264
265         if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode)) {
266                 rc = -sa_lookup(obj->oo_sa_hdl, SA_ZPL_RDEV(o), &osa->rdev, 8);
267                 if (rc)
268                         GOTO(out_sa, rc);
269                 la->la_rdev = osa->rdev;
270                 la->la_valid |= LA_RDEV;
271         }
272 out_sa:
273
274         RETURN(rc);
275 }
276
277 int __osd_obj2dnode(objset_t *os, uint64_t oid, dnode_t **dnp)
278 {
279         dmu_buf_t *db;
280         dmu_buf_impl_t *dbi;
281         int rc;
282
283         rc = -dmu_bonus_hold(os, oid, osd_obj_tag, &db);
284         if (rc)
285                 return rc;
286
287         dbi = (dmu_buf_impl_t *)db;
288         DB_DNODE_ENTER(dbi);
289         *dnp = DB_DNODE(dbi);
290         DB_DNODE_EXIT(dbi);
291         LASSERT(*dnp != NULL);
292
293         return 0;
294 }
295
296 /*
297  * Concurrency: no concurrent access is possible that early in object
298  * life-cycle.
299  */
300 struct lu_object *osd_object_alloc(const struct lu_env *env,
301                                    const struct lu_object_header *hdr,
302                                    struct lu_device *d)
303 {
304         struct osd_object *mo;
305
306         OBD_SLAB_ALLOC_PTR_GFP(mo, osd_object_kmem, GFP_NOFS);
307         if (mo != NULL) {
308                 struct lu_object *l;
309                 struct lu_object_header *h;
310                 struct osd_device *o = osd_dev(d);
311
312                 l = &mo->oo_dt.do_lu;
313                 if (unlikely(o->od_in_init)) {
314                         OBD_ALLOC_PTR(h);
315                         if (!h) {
316                                 OBD_FREE_PTR(mo);
317                                 return NULL;
318                         }
319
320                         lu_object_header_init(h);
321                         lu_object_init(l, h, d);
322                         lu_object_add_top(h, l);
323                         mo->oo_header = h;
324                 } else {
325                         dt_object_init(&mo->oo_dt, NULL, d);
326                         mo->oo_header = NULL;
327                 }
328
329                 mo->oo_dt.do_ops = &osd_obj_ops;
330                 l->lo_ops = &osd_lu_obj_ops;
331                 INIT_LIST_HEAD(&mo->oo_sa_linkage);
332                 INIT_LIST_HEAD(&mo->oo_unlinked_linkage);
333                 init_rwsem(&mo->oo_sem);
334                 init_rwsem(&mo->oo_guard);
335                 rwlock_init(&mo->oo_attr_lock);
336                 mo->oo_destroy = OSD_DESTROY_NONE;
337                 return l;
338         } else {
339                 return NULL;
340         }
341 }
342
343 static void osd_obj_set_blksize(const struct lu_env *env,
344                                 struct osd_device *osd, struct osd_object *obj)
345 {
346         const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
347         dmu_tx_t *tx;
348         dnode_t *dn = obj->oo_dn;
349         uint32_t blksz;
350         int rc = 0;
351         ENTRY;
352
353         LASSERT(!osd_oti_get(env)->oti_in_trans);
354
355         tx = dmu_tx_create(osd->od_os);
356         if (!tx) {
357                 CERROR("%s: fail to create tx to set blksize for "DFID"\n",
358                        osd->od_svname, PFID(fid));
359                 RETURN_EXIT;
360         }
361
362         dmu_tx_hold_bonus(tx, dn->dn_object);
363         rc = -dmu_tx_assign(tx, TXG_WAIT);
364         if (rc) {
365                 dmu_tx_abort(tx);
366                 CERROR("%s: fail to assign tx to set blksize for "DFID
367                        ": rc = %d\n", osd->od_svname, PFID(fid), rc);
368                 RETURN_EXIT;
369         }
370
371         down_write(&obj->oo_guard);
372         if (unlikely((1 << dn->dn_datablkshift) >= PAGE_SIZE))
373                 GOTO(out, rc = 1);
374
375         blksz = dn->dn_datablksz;
376         if (!is_power_of_2(blksz))
377                 blksz = size_roundup_power2(blksz);
378
379         if (blksz > osd->od_max_blksz)
380                 blksz = osd->od_max_blksz;
381         else if (blksz < PAGE_SIZE)
382                 blksz = PAGE_SIZE;
383         rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object, blksz, 0, tx);
384
385         GOTO(out, rc);
386
387 out:
388         up_write(&obj->oo_guard);
389         if (rc) {
390                 dmu_tx_abort(tx);
391                 if (unlikely(obj->oo_dn->dn_maxblkid > 0))
392                         rc = 1;
393                 if (rc < 0)
394                         CERROR("%s: fail to set blksize for "DFID": rc = %d\n",
395                                osd->od_svname, PFID(fid), rc);
396         } else {
397                 dmu_tx_commit(tx);
398                 CDEBUG(D_INODE, "%s: set blksize as %u for "DFID"\n",
399                        osd->od_svname, blksz, PFID(fid));
400         }
401 }
402
403 /*
404  * Concurrency: shouldn't matter.
405  */
406 static int osd_object_init0(const struct lu_env *env, struct osd_object *obj)
407 {
408         struct osd_device       *osd = osd_obj2dev(obj);
409         const struct lu_fid     *fid = lu_object_fid(&obj->oo_dt.do_lu);
410         int                      rc = 0;
411         ENTRY;
412
413         LASSERT(obj->oo_dn);
414
415         rc = osd_object_sa_init(obj, osd);
416         if (rc)
417                 RETURN(rc);
418
419         /* cache attrs in object */
420         rc = __osd_object_attr_get(env, osd, obj, &obj->oo_attr);
421         if (rc)
422                 RETURN(rc);
423
424         if (likely(!fid_is_acct(fid))) {
425                 /* no body operations for accounting objects */
426                 obj->oo_dt.do_body_ops = &osd_body_ops;
427
428                 if (S_ISREG(obj->oo_attr.la_mode) &&
429                     obj->oo_dn->dn_maxblkid == 0 &&
430                     (1 << obj->oo_dn->dn_datablkshift) < PAGE_SIZE &&
431                     (fid_is_idif(fid) || fid_is_norm(fid) ||
432                      fid_is_echo(fid)) &&
433                     osd->od_is_ost && !osd->od_dt_dev.dd_rdonly)
434                         osd_obj_set_blksize(env, osd, obj);
435         }
436
437         /*
438          * initialize object before marking it existing
439          */
440         obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
441
442         smp_mb();
443         obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
444
445         RETURN(0);
446 }
447
448 static int osd_check_lma(const struct lu_env *env, struct osd_object *obj)
449 {
450         struct osd_thread_info  *info = osd_oti_get(env);
451         struct lu_buf           buf;
452         int                     rc;
453         struct lustre_mdt_attrs *lma;
454         const struct lu_fid *rfid = lu_object_fid(&obj->oo_dt.do_lu);
455         ENTRY;
456
457         BUILD_BUG_ON(sizeof(info->oti_buf) < sizeof(*lma));
458         lma = (struct lustre_mdt_attrs *)info->oti_buf;
459         buf.lb_buf = lma;
460         buf.lb_len = sizeof(info->oti_buf);
461
462         rc = osd_xattr_get(env, &obj->oo_dt, &buf, XATTR_NAME_LMA);
463         if (rc > 0) {
464                 rc = 0;
465                 lustre_lma_swab(lma);
466                 if (unlikely((lma->lma_incompat & ~LMA_INCOMPAT_SUPP) ||
467                              CFS_FAIL_CHECK(OBD_FAIL_OSD_LMA_INCOMPAT))) {
468                         CWARN("%s: unsupported incompat LMA feature(s) %#x for "
469                               "fid = "DFID"\n", osd_obj2dev(obj)->od_svname,
470                               lma->lma_incompat & ~LMA_INCOMPAT_SUPP,
471                               PFID(rfid));
472                         rc = -EOPNOTSUPP;
473                 } else if (unlikely(!lu_fid_eq(rfid, &lma->lma_self_fid))) {
474                         CERROR("%s: FID-in-LMA "DFID" does not match the "
475                               "object self-fid "DFID"\n",
476                               osd_obj2dev(obj)->od_svname,
477                               PFID(&lma->lma_self_fid), PFID(rfid));
478                         rc = -EREMCHG;
479                 } else {
480                         struct osd_device *osd = osd_obj2dev(obj);
481
482                         if (lma->lma_compat & LMAC_STRIPE_INFO &&
483                             osd->od_is_ost)
484                                 obj->oo_pfid_in_lma = 1;
485                         if (unlikely(lma->lma_incompat & LMAI_REMOTE_PARENT) &&
486                             osd->od_remote_parent_dir != ZFS_NO_OBJECT)
487                                 lu_object_set_agent_entry(&obj->oo_dt.do_lu);
488                 }
489         } else if (rc == -ENODATA) {
490                 /* haven't initialize LMA xattr */
491                 rc = 0;
492         }
493
494         RETURN(rc);
495 }
496
497 /**
498  * Helper function to retrieve DMU object id from fid for accounting object
499  */
500 static dnode_t *osd_quota_fid2dmu(const struct osd_device *osd,
501                                   const struct lu_fid *fid)
502 {
503         dnode_t *dn = NULL;
504
505         LASSERT(fid_is_acct(fid));
506
507         switch (fid_oid(fid)) {
508         case ACCT_USER_OID:
509                 dn = osd->od_userused_dn;
510                 break;
511         case ACCT_GROUP_OID:
512                 dn = osd->od_groupused_dn;
513                 break;
514 #ifdef ZFS_PROJINHERIT
515         case ACCT_PROJECT_OID:
516                 dn = osd->od_projectused_dn;
517                 break;
518 #endif
519         default:
520                 break;
521         }
522
523         return dn;
524 }
525
526 /*
527  * Concurrency: no concurrent access is possible that early in object
528  * life-cycle.
529  */
530 static int osd_object_init(const struct lu_env *env, struct lu_object *l,
531                            const struct lu_object_conf *conf)
532 {
533         struct osd_object *obj = osd_obj(l);
534         struct osd_device *osd = osd_obj2dev(obj);
535         const struct lu_fid *fid = lu_object_fid(l);
536         struct lustre_scrub *scrub = &osd->od_scrub;
537         struct osd_thread_info *info = osd_oti_get(env);
538         struct luz_direntry *zde = &info->oti_zde;
539         struct osd_idmap_cache *idc;
540         char *name = info->oti_str;
541         uint64_t oid;
542         int rc = 0;
543         int rc1;
544         bool remote = false;
545         ENTRY;
546
547         LASSERT(osd_invariant(obj));
548
549         if (fid_is_otable_it(&l->lo_header->loh_fid)) {
550                 obj->oo_dt.do_ops = &osd_obj_otable_it_ops;
551                 l->lo_header->loh_attr |= LOHA_EXISTS;
552
553                 GOTO(out, rc = 0);
554         }
555
556         if (conf && conf->loc_flags & LOC_F_NEW)
557                 GOTO(out, rc = 0);
558
559         if (unlikely(fid_is_acct(fid))) {
560                 obj->oo_dn = osd_quota_fid2dmu(osd, fid);
561                 if (obj->oo_dn) {
562                         obj->oo_dt.do_index_ops = &osd_acct_index_ops;
563                         l->lo_header->loh_attr |= LOHA_EXISTS;
564                 }
565
566                 GOTO(out, rc = 0);
567         }
568
569         idc = osd_idc_find(env, osd, fid);
570         if (idc && !idc->oic_remote && idc->oic_dnode != ZFS_NO_OBJECT) {
571                 oid = idc->oic_dnode;
572                 goto zget;
573         }
574
575         rc = -ENOENT;
576         if (!list_empty(&osd->od_scrub.os_inconsistent_items))
577                 rc = osd_oii_lookup(osd, fid, &oid);
578
579         if (rc)
580                 rc = osd_fid_lookup(env, osd, fid, &oid);
581
582         if (rc == -ENOENT) {
583                 if (likely(!(fid_is_norm(fid) || fid_is_igif(fid)) ||
584                            fid_is_on_ost(env, osd, fid) ||
585                            !zfs_test_bit(osd_oi_fid2idx(osd, fid),
586                                          scrub->os_file.sf_oi_bitmap)))
587                         GOTO(out, rc = 0);
588
589                 rc = -EREMCHG;
590                 goto trigger;
591         }
592
593         if (rc)
594                 GOTO(out, rc);
595
596 zget:
597         LASSERT(obj->oo_dn == NULL);
598
599         rc = __osd_obj2dnode(osd->od_os, oid, &obj->oo_dn);
600         /* EEXIST will be returned if object is being deleted in ZFS */
601         if (rc == -EEXIST)
602                 GOTO(out, rc = 0);
603
604         if (rc) {
605                 CERROR("%s: lookup "DFID"/%#llx failed: rc = %d\n",
606                        osd->od_svname, PFID(lu_object_fid(l)), oid, rc);
607                 GOTO(out, rc);
608         }
609
610         rc = osd_object_init0(env, obj);
611         if (rc)
612                 GOTO(out, rc);
613
614         if (unlikely(obj->oo_header))
615                 GOTO(out, rc = 0);
616
617         rc = osd_check_lma(env, obj);
618         if (rc != -EREMCHG)
619                 GOTO(out, rc);
620
621         osd_scrub_refresh_mapping(env, osd, fid, oid, DTO_INDEX_DELETE, true,
622                                   NULL);
623
624 trigger:
625         /* We still have chance to get the valid dnode: for the object that is
626          * referenced by remote name entry, the object on the local MDT will be
627          * linked under the dir /REMOTE_PARENT_DIR with its FID string as name.
628          *
629          * During the OI scrub, if we cannot find the OI mapping, we may still
630          * have change to map the FID to local OID via lookup the dir
631          * /REMOTE_PARENT_DIR. */
632         if (!remote && !fid_is_on_ost(env, osd, fid)) {
633                 osd_fid2str(name, fid, sizeof(info->oti_str));
634                 rc = osd_zap_lookup(osd, osd->od_remote_parent_dir,
635                                     NULL, name, 8, 3, (void *)zde);
636                 if (!rc) {
637                         oid = zde->lzd_reg.zde_dnode;
638                         osd_dnode_rele(obj->oo_dn);
639                         obj->oo_dn = NULL;
640                         remote = true;
641                         goto zget;
642                 }
643         }
644
645         /* The case someone triggered the OI scrub already. */
646         if (scrub->os_running) {
647                 if (!rc) {
648                         LASSERT(remote);
649
650                         lu_object_set_agent_entry(l);
651                         osd_oii_insert(env, osd, fid, oid, false);
652                 } else {
653                         rc = -EINPROGRESS;
654                 }
655
656                 GOTO(out, rc);
657         }
658
659         /* The case NOT allow to trigger OI scrub automatically. */
660         if (osd->od_auto_scrub_interval == AS_NEVER)
661                 GOTO(out, rc);
662
663         /* It is me to trigger the OI scrub. */
664         rc1 = osd_scrub_start(env, osd, SS_CLEAR_DRYRUN |
665                               SS_CLEAR_FAILOUT | SS_AUTO_FULL);
666         CDEBUG_LIMIT(D_LFSCK | D_CONSOLE | D_WARNING,
667                      "%s: trigger OI scrub by RPC for "DFID"/%#llx: rc = %d\n",
668                      osd_name(osd), PFID(fid), oid, rc1);
669         if (!rc) {
670                 LASSERT(remote);
671
672                 lu_object_set_agent_entry(l);
673                 if (!rc1)
674                         osd_oii_insert(env, osd, fid, oid, false);
675         } else {
676                 if (!rc1)
677                         rc = -EINPROGRESS;
678                 else
679                         rc = -EREMCHG;
680         }
681
682         GOTO(out, rc);
683
684 out:
685         RETURN(rc);
686 }
687
688 /*
689  * Concurrency: no concurrent access is possible that late in object
690  * life-cycle.
691  */
692 static void osd_object_free(const struct lu_env *env, struct lu_object *l)
693 {
694         struct osd_object *obj = osd_obj(l);
695         struct lu_object_header *h = obj->oo_header;
696
697         LASSERT(osd_invariant(obj));
698
699         dt_object_fini(&obj->oo_dt);
700         /* obj doesn't contain an lu_object_header, so we don't need call_rcu */
701         OBD_SLAB_FREE_PTR(obj, osd_object_kmem);
702         if (unlikely(h))
703                 lu_object_header_free(h);
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/%#llx: 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/%#llx: 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/%#llx: 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_sem, 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_sem, 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         /* to preserve locking order - qsd_transfer() may need to flush
1173          * currently running transaction when we're out of quota. */
1174         up_read(&obj->oo_guard);
1175
1176         if (attr && attr->la_valid & LA_UID) {
1177                 /* quota enforcement for user */
1178                 if (attr->la_uid != obj->oo_attr.la_uid) {
1179                         rc = qsd_transfer(env, osd_def_qsd(osd),
1180                                           &oh->ot_quota_trans, USRQUOTA,
1181                                           obj->oo_attr.la_uid, attr->la_uid,
1182                                           bspace, &info->oti_qi, true);
1183                         if (rc)
1184                                 GOTO(out, rc);
1185                 }
1186         }
1187         if (attr && attr->la_valid & LA_GID) {
1188                 /* quota enforcement for group */
1189                 if (attr->la_gid != obj->oo_attr.la_gid) {
1190                         rc = qsd_transfer(env, osd_def_qsd(osd),
1191                                           &oh->ot_quota_trans, GRPQUOTA,
1192                                           obj->oo_attr.la_gid, attr->la_gid,
1193                                           bspace, &info->oti_qi,
1194                                           !(attr->la_flags &
1195                                                         LUSTRE_SET_SYNC_FL));
1196                         if (rc)
1197                                 GOTO(out, rc);
1198                 }
1199         }
1200 #ifdef ZFS_PROJINHERIT
1201         if (attr && attr->la_valid & LA_PROJID) {
1202                 /* quota enforcement for project */
1203                 if (attr->la_projid != obj->oo_attr.la_projid) {
1204                         if (!osd->od_projectused_dn)
1205                                 GOTO(out, rc = -EOPNOTSUPP);
1206
1207                         if (!projid_valid(make_kprojid(&init_user_ns, attr->la_projid)))
1208                                 GOTO(out, rc = -EINVAL);
1209
1210                         /* Usually, if project quota is upgradable for the
1211                          * device, then the upgrade will be done before or when
1212                          * mount the device. So when we come here, this project
1213                          * should have project ID attribute already (that is
1214                          * zero by default).  Otherwise, there was something
1215                          * wrong during the former upgrade, let's return failure
1216                          * to report that.
1217                          *
1218                          * Please note that, different from other attributes,
1219                          * you can NOT simply set the project ID attribute under
1220                          * such case, because adding (NOT change) project ID
1221                          * attribute needs to change the object's attribute
1222                          * layout to match zfs backend quota accounting
1223                          * requirement. */
1224                         if (unlikely(!obj->oo_with_projid))
1225                                 GOTO(out, rc = -ENXIO);
1226
1227                         rc = qsd_transfer(env, osd_def_qsd(osd),
1228                                           &oh->ot_quota_trans, PRJQUOTA,
1229                                           obj->oo_attr.la_projid,
1230                                           attr->la_projid, bspace,
1231                                           &info->oti_qi, true);
1232                         if (rc)
1233                                 GOTO(out, rc);
1234                 }
1235         }
1236 #endif
1237 out:
1238         RETURN(rc);
1239 out_sem:
1240         up_read(&obj->oo_guard);
1241         RETURN(rc);
1242 }
1243
1244 /*
1245  * Set the attributes of an object
1246  *
1247  * The transaction passed to this routine must have
1248  * dmu_tx_hold_bonus(tx, oid) called and then assigned
1249  * to a transaction group.
1250  */
1251 static int osd_attr_set(const struct lu_env *env, struct dt_object *dt,
1252                         const struct lu_attr *la, struct thandle *handle)
1253 {
1254         struct osd_thread_info  *info = osd_oti_get(env);
1255         sa_bulk_attr_t          *bulk = osd_oti_get(env)->oti_attr_bulk;
1256         struct osd_object       *obj = osd_dt_obj(dt);
1257         struct osd_device       *osd = osd_obj2dev(obj);
1258         struct osd_thandle      *oh;
1259         struct osa_attr         *osa = &info->oti_osa;
1260         __u64                    valid = la->la_valid;
1261         int                      cnt;
1262         int                      rc = 0;
1263
1264         ENTRY;
1265
1266         down_read(&obj->oo_guard);
1267         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
1268                 GOTO(out, rc = -ENOENT);
1269
1270         LASSERT(handle != NULL);
1271         LASSERT(osd_invariant(obj));
1272         LASSERT(obj->oo_sa_hdl);
1273
1274         oh = container_of(handle, struct osd_thandle, ot_super);
1275         /* Assert that the transaction has been assigned to a
1276            transaction group. */
1277         LASSERT(oh->ot_tx->tx_txg != 0);
1278
1279         if (OBD_FAIL_CHECK(OBD_FAIL_OSD_FID_MAPPING) && !osd->od_is_ost) {
1280                 struct zpl_direntry *zde = &info->oti_zde.lzd_reg;
1281                 char *buf = info->oti_str;
1282                 dnode_t *zdn = NULL;
1283                 uint64_t zapid;
1284
1285                 zapid = osd_get_name_n_idx(env, osd, lu_object_fid(&dt->do_lu),
1286                                            buf, sizeof(info->oti_str), &zdn);
1287                 rc = osd_zap_lookup(osd, zapid, zdn, buf, 8,
1288                                     sizeof(*zde) / 8, zde);
1289                 if (!rc) {
1290                         zde->zde_dnode -= 1;
1291                         rc = -zap_update(osd->od_os, zapid, buf, 8,
1292                                          sizeof(*zde) / 8, zde, oh->ot_tx);
1293                 }
1294                 if (rc > 0)
1295                         rc = 0;
1296                 GOTO(out, rc);
1297         }
1298
1299         /* Only allow set size for regular file */
1300         if (!S_ISREG(dt->do_lu.lo_header->loh_attr))
1301                 valid &= ~(LA_SIZE | LA_BLOCKS);
1302
1303         if (valid & LA_CTIME && la->la_ctime == obj->oo_attr.la_ctime)
1304                 valid &= ~LA_CTIME;
1305
1306         if (valid & LA_MTIME && la->la_mtime == obj->oo_attr.la_mtime)
1307                 valid &= ~LA_MTIME;
1308
1309         if (valid & LA_ATIME && la->la_atime == obj->oo_attr.la_atime)
1310                 valid &= ~LA_ATIME;
1311
1312         if (valid == 0)
1313                 GOTO(out, rc = 0);
1314
1315         if (valid & LA_FLAGS) {
1316                 struct lustre_mdt_attrs *lma;
1317                 struct lu_buf buf;
1318                 int size = 0;
1319
1320                 if (la->la_flags & LUSTRE_LMA_FL_MASKS) {
1321                         LASSERT(!obj->oo_pfid_in_lma);
1322                         BUILD_BUG_ON(sizeof(info->oti_buf) < sizeof(*lma));
1323                         lma = (struct lustre_mdt_attrs *)&info->oti_buf;
1324                         buf.lb_buf = lma;
1325                         buf.lb_len = sizeof(info->oti_buf);
1326
1327                         /* Please do NOT call osd_xattr_get() directly, that
1328                          * will cause recursive down_read() on oo_guard. */
1329                         rc = osd_xattr_get_internal(env, obj, &buf,
1330                                                     XATTR_NAME_LMA, &size);
1331                         if (!rc && unlikely(size < sizeof(*lma))) {
1332                                 rc = -EINVAL;
1333                         } else if (!rc) {
1334                                 lma->lma_incompat =
1335                                         le32_to_cpu(lma->lma_incompat);
1336                                 lma->lma_incompat |=
1337                                         lustre_to_lma_flags(la->la_flags);
1338                                 lma->lma_incompat =
1339                                         cpu_to_le32(lma->lma_incompat);
1340                                 buf.lb_buf = lma;
1341                                 buf.lb_len = sizeof(*lma);
1342                                 rc = osd_xattr_set_internal(env, obj, &buf,
1343                                                             XATTR_NAME_LMA,
1344                                                             LU_XATTR_REPLACE,
1345                                                             oh);
1346                         }
1347                         if (rc < 0) {
1348                                 CWARN("%s: failed to set LMA flags: rc = %d\n",
1349                                        osd->od_svname, rc);
1350                                 GOTO(out, rc);
1351                         } else {
1352                                 obj->oo_lma_flags =
1353                                         la->la_flags & LUSTRE_LMA_FL_MASKS;
1354                         }
1355                 }
1356         }
1357
1358         write_lock(&obj->oo_attr_lock);
1359         cnt = 0;
1360
1361         if (valid & LA_PROJID) {
1362 #ifdef ZFS_PROJINHERIT
1363                 if (osd->od_projectused_dn) {
1364                         LASSERT(obj->oo_with_projid);
1365
1366                         osa->projid = obj->oo_attr.la_projid = la->la_projid;
1367                         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1368                                          &osa->projid, 8);
1369                 } else
1370 #endif
1371                         valid &= ~LA_PROJID;
1372         }
1373
1374         if (valid & LA_ATIME) {
1375                 osa->atime[0] = obj->oo_attr.la_atime = la->la_atime;
1376                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL,
1377                                  osa->atime, 16);
1378         }
1379         if (valid & LA_MTIME) {
1380                 osa->mtime[0] = obj->oo_attr.la_mtime = la->la_mtime;
1381                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL,
1382                                  osa->mtime, 16);
1383         }
1384         if (valid & LA_CTIME) {
1385                 osa->ctime[0] = obj->oo_attr.la_ctime = la->la_ctime;
1386                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL,
1387                                  osa->ctime, 16);
1388         }
1389         if (valid & LA_MODE) {
1390                 /* mode is stored along with type, so read it first */
1391                 obj->oo_attr.la_mode = (obj->oo_attr.la_mode & S_IFMT) |
1392                         (la->la_mode & ~S_IFMT);
1393                 osa->mode = obj->oo_attr.la_mode;
1394                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL,
1395                                  &osa->mode, 8);
1396         }
1397         if (valid & LA_SIZE) {
1398                 osa->size = obj->oo_attr.la_size = la->la_size;
1399                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL,
1400                                  &osa->size, 8);
1401         }
1402         if (valid & LA_NLINK) {
1403                 osa->nlink = obj->oo_attr.la_nlink = la->la_nlink;
1404                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL,
1405                                  &osa->nlink, 8);
1406         }
1407         if (valid & LA_RDEV) {
1408                 osa->rdev = obj->oo_attr.la_rdev = la->la_rdev;
1409                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL,
1410                                  &osa->rdev, 8);
1411         }
1412         if (valid & LA_FLAGS) {
1413                 osa->flags = attrs_fs2zfs(la->la_flags);
1414                 /* many flags are not supported by zfs, so ensure a good cached
1415                  * copy */
1416                 obj->oo_attr.la_flags = attrs_zfs2fs(osa->flags);
1417 #ifdef ZFS_PROJINHERIT
1418                 if (obj->oo_with_projid && osd->od_projectused_dn)
1419                         osa->flags |= ZFS_PROJID;
1420 #endif
1421                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL,
1422                                  &osa->flags, 8);
1423         }
1424         if (valid & LA_UID) {
1425                 osa->uid = obj->oo_attr.la_uid = la->la_uid;
1426                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL,
1427                                  &osa->uid, 8);
1428         }
1429         if (valid & LA_GID) {
1430                 osa->gid = obj->oo_attr.la_gid = la->la_gid;
1431                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL,
1432                                  &osa->gid, 8);
1433         }
1434         obj->oo_attr.la_valid |= valid;
1435         write_unlock(&obj->oo_attr_lock);
1436
1437         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1438         rc = osd_object_sa_bulk_update(obj, bulk, cnt, oh);
1439
1440 out:
1441         up_read(&obj->oo_guard);
1442         RETURN(rc);
1443 }
1444
1445 /*
1446  * Object creation.
1447  *
1448  * XXX temporary solution.
1449  */
1450
1451 static void osd_ah_init(const struct lu_env *env, struct dt_allocation_hint *ah,
1452                         struct dt_object *parent, struct dt_object *child,
1453                         umode_t child_mode)
1454 {
1455         LASSERT(ah);
1456
1457         ah->dah_parent = parent;
1458         ah->dah_mode = child_mode;
1459
1460         if (parent != NULL && !dt_object_remote(parent)) {
1461                 /* will help to find FID->ino at dt_insert("..") */
1462                 struct osd_object *pobj = osd_dt_obj(parent);
1463
1464                 osd_idc_find_and_init(env, osd_obj2dev(pobj), pobj);
1465         }
1466 }
1467
1468 static int osd_declare_create(const struct lu_env *env, struct dt_object *dt,
1469                               struct lu_attr *attr,
1470                               struct dt_allocation_hint *hint,
1471                               struct dt_object_format *dof,
1472                               struct thandle *handle)
1473 {
1474         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1475         struct osd_object       *obj = osd_dt_obj(dt);
1476         struct osd_device       *osd = osd_obj2dev(obj);
1477         struct osd_thandle      *oh;
1478         uint64_t                 zapid;
1479         dnode_t                 *dn;
1480         int                      rc, dnode_size;
1481         ENTRY;
1482
1483         LASSERT(dof);
1484
1485         switch (dof->dof_type) {
1486                 case DFT_REGULAR:
1487                 case DFT_SYM:
1488                 case DFT_NODE:
1489                         if (obj->oo_dt.do_body_ops == NULL)
1490                                 obj->oo_dt.do_body_ops = &osd_body_ops;
1491                         break;
1492                 default:
1493                         break;
1494         }
1495
1496         LASSERT(handle != NULL);
1497         oh = container_of(handle, struct osd_thandle, ot_super);
1498         LASSERT(oh->ot_tx != NULL);
1499
1500         /* this is the minimum set of EAs on every Lustre object */
1501         obj->oo_ea_in_bonus = OSD_BASE_EA_IN_BONUS;
1502         /* reserve 32 bytes for extra stuff like ACLs */
1503         dnode_size = size_roundup_power2(obj->oo_ea_in_bonus + 32);
1504
1505         switch (dof->dof_type) {
1506                 case DFT_DIR:
1507                         dt->do_index_ops = &osd_dir_ops;
1508                         /* fallthrough */
1509                 case DFT_INDEX:
1510                         /* for zap create */
1511                         dmu_tx_hold_zap(oh->ot_tx, DMU_NEW_OBJECT, FALSE, NULL);
1512                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1513                         break;
1514                 case DFT_REGULAR:
1515                 case DFT_SYM:
1516                 case DFT_NODE:
1517                         /* first, we'll create new object */
1518                         dmu_tx_hold_sa_create(oh->ot_tx, dnode_size);
1519                         break;
1520
1521                 default:
1522                         LBUG();
1523                         break;
1524         }
1525
1526         /* and we'll add it to some mapping */
1527         zapid = osd_get_name_n_idx(env, osd, fid, NULL, 0, &dn);
1528         osd_tx_hold_zap(oh->ot_tx, zapid, dn, TRUE, NULL);
1529
1530         /* will help to find FID->ino mapping at dt_insert() */
1531         osd_idc_find_and_init(env, osd, obj);
1532
1533         rc = osd_declare_quota(env, osd, attr->la_uid, attr->la_gid,
1534                                attr->la_projid, 1, oh, NULL, OSD_QID_INODE);
1535
1536         RETURN(rc);
1537 }
1538
1539 int __osd_attr_init(const struct lu_env *env, struct osd_device *osd,
1540                     struct osd_object *obj, sa_handle_t *sa_hdl, dmu_tx_t *tx,
1541                     struct lu_attr *la, uint64_t parent,
1542                     nvlist_t *xattr)
1543 {
1544         sa_bulk_attr_t *bulk = osd_oti_get(env)->oti_attr_bulk;
1545         struct osa_attr *osa = &osd_oti_get(env)->oti_osa;
1546         uint64_t gen;
1547         inode_timespec_t now;
1548         int cnt;
1549         int rc;
1550         char *dxattr = NULL;
1551         size_t sa_size;
1552
1553
1554         LASSERT(sa_hdl);
1555
1556         gen = dmu_tx_get_txg(tx);
1557         gethrestime(&now);
1558         ZFS_TIME_ENCODE(&now, osa->btime);
1559
1560         osa->atime[0] = la->la_atime;
1561         osa->ctime[0] = la->la_ctime;
1562         osa->mtime[0] = la->la_mtime;
1563         osa->mode = la->la_mode;
1564         osa->uid = la->la_uid;
1565         osa->gid = la->la_gid;
1566         osa->rdev = la->la_rdev;
1567         osa->nlink = la->la_nlink;
1568         if (la->la_valid & LA_FLAGS)
1569                 osa->flags = attrs_fs2zfs(la->la_flags);
1570         else
1571                 osa->flags = 0;
1572         osa->size  = la->la_size;
1573 #ifdef ZFS_PROJINHERIT
1574         if (osd->od_projectused_dn) {
1575                 if (la->la_valid & LA_PROJID)
1576                         osa->projid = la->la_projid;
1577                 else
1578                         osa->projid = ZFS_DEFAULT_PROJID;
1579                 osa->flags |= ZFS_PROJID;
1580                 if (obj)
1581                         obj->oo_with_projid = 1;
1582         } else {
1583                 osa->flags &= ~ZFS_PROJID;
1584         }
1585 #endif
1586
1587         /*
1588          * we need to create all SA below upon object create.
1589          *
1590          * XXX The attribute order matters since the accounting callback relies
1591          * on static offsets (i.e. SA_*_OFFSET, see zfs_space_delta_cb()) to
1592          * look up the UID/GID/PROJID attributes. Moreover, the callback does
1593          * not seem to support the spill block.
1594          * We define attributes in the same order as SA_*_OFFSET in order to
1595          * work around the problem. See ORI-610.
1596          */
1597         cnt = 0;
1598         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MODE(osd), NULL, &osa->mode, 8);
1599         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_SIZE(osd), NULL, &osa->size, 8);
1600         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GEN(osd), NULL, &gen, 8);
1601         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_UID(osd), NULL, &osa->uid, 8);
1602         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_GID(osd), NULL, &osa->gid, 8);
1603         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PARENT(osd), NULL, &parent, 8);
1604         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_FLAGS(osd), NULL, &osa->flags, 8);
1605         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_ATIME(osd), NULL, osa->atime, 16);
1606         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_MTIME(osd), NULL, osa->mtime, 16);
1607         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CTIME(osd), NULL, osa->ctime, 16);
1608         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_CRTIME(osd), NULL, osa->btime, 16);
1609         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_LINKS(osd), NULL, &osa->nlink, 8);
1610 #ifdef ZFS_PROJINHERIT
1611         if (osd->od_projectused_dn)
1612                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_PROJID(osd), NULL,
1613                                  &osa->projid, 8);
1614 #endif
1615         SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_RDEV(osd), NULL, &osa->rdev, 8);
1616         LASSERT(cnt <= ARRAY_SIZE(osd_oti_get(env)->oti_attr_bulk));
1617
1618         if (xattr) {
1619                 rc = -nvlist_size(xattr, &sa_size, NV_ENCODE_XDR);
1620                 LASSERT(rc == 0);
1621
1622                 dxattr = osd_zio_buf_alloc(sa_size);
1623                 LASSERT(dxattr);
1624
1625                 rc = -nvlist_pack(xattr, &dxattr, &sa_size,
1626                                 NV_ENCODE_XDR, KM_SLEEP);
1627                 LASSERT(rc == 0);
1628
1629                 SA_ADD_BULK_ATTR(bulk, cnt, SA_ZPL_DXATTR(osd),
1630                                 NULL, dxattr, sa_size);
1631         }
1632
1633         rc = -sa_replace_all_by_template(sa_hdl, bulk, cnt, tx);
1634         if (dxattr)
1635                 osd_zio_buf_free(dxattr, sa_size);
1636
1637         return rc;
1638 }
1639
1640 int osd_find_new_dnode(const struct lu_env *env, dmu_tx_t *tx,
1641                        uint64_t oid, dnode_t **dnp)
1642 {
1643         dmu_tx_hold_t *txh;
1644         int rc = 0;
1645
1646         /* take dnode_t from tx to save on dnode#->dnode_t lookup */
1647         for (txh = list_tail(&tx->tx_holds); txh;
1648              txh = list_prev(&tx->tx_holds, txh)) {
1649                 dnode_t *dn = txh->txh_dnode;
1650                 dmu_buf_impl_t *db;
1651
1652                 if (dn == NULL)
1653                         continue;
1654                 if (dn->dn_object != oid)
1655                         continue;
1656                 db = dn->dn_bonus;
1657                 if (db == NULL) {
1658                         rw_enter(&dn->dn_struct_rwlock, RW_WRITER);
1659                         if (dn->dn_bonus == NULL)
1660                                 dbuf_create_bonus(dn);
1661                         rw_exit(&dn->dn_struct_rwlock);
1662                 }
1663                 db = dn->dn_bonus;
1664                 LASSERT(db);
1665                 LASSERT(dn->dn_handle);
1666                 DB_DNODE_ENTER(db);
1667                 if (zfs_refcount_add(&db->db_holds, osd_obj_tag) == 1) {
1668                         zfs_refcount_add(&dn->dn_holds, osd_obj_tag);
1669                         atomic_inc_32(&dn->dn_dbufs_count);
1670                 }
1671                 *dnp = dn;
1672                 DB_DNODE_EXIT(db);
1673                 dbuf_read(db, NULL, DB_RF_MUST_SUCCEED | DB_RF_NOPREFETCH);
1674                 break;
1675         }
1676
1677         if (unlikely(*dnp == NULL))
1678                 rc = __osd_obj2dnode(tx->tx_objset, oid, dnp);
1679
1680         return rc;
1681 }
1682
1683 #ifdef HAVE_DMU_OBJECT_ALLOC_DNSIZE
1684 int osd_find_dnsize(struct osd_device *osd, int ea_in_bonus)
1685 {
1686         int dnsize;
1687
1688         if (osd->od_dnsize == ZFS_DNSIZE_AUTO) {
1689                 dnsize = DNODE_MIN_SIZE;
1690                 do {
1691                         if (DN_BONUS_SIZE(dnsize) >= ea_in_bonus + 32)
1692                                 break;
1693                         dnsize <<= 1;
1694                 } while (dnsize < DNODE_MAX_SIZE);
1695                 if (dnsize > DNODE_MAX_SIZE)
1696                         dnsize = DNODE_MAX_SIZE;
1697         } else if (osd->od_dnsize == ZFS_DNSIZE_1K) {
1698                 dnsize = 1024;
1699         } else if (osd->od_dnsize == ZFS_DNSIZE_2K) {
1700                 dnsize = 2048;
1701         } else if (osd->od_dnsize == ZFS_DNSIZE_4K) {
1702                 dnsize = 4096;
1703         } else if (osd->od_dnsize == ZFS_DNSIZE_8K) {
1704                 dnsize = 8192;
1705         } else if (osd->od_dnsize == ZFS_DNSIZE_16K) {
1706                 dnsize = 16384;
1707         } else {
1708                 dnsize = DNODE_MIN_SIZE;
1709         }
1710         return dnsize;
1711 }
1712 #endif
1713
1714 /*
1715  * The transaction passed to this routine must have
1716  * dmu_tx_hold_bonus(tx, DMU_NEW_OBJECT) called and then assigned
1717  * to a transaction group.
1718  */
1719 int __osd_object_create(const struct lu_env *env, struct osd_device *osd,
1720                         struct osd_object *obj, const struct lu_fid *fid,
1721                         dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la)
1722 {
1723         dmu_object_type_t type = DMU_OT_PLAIN_FILE_CONTENTS;
1724         uint64_t oid;
1725         int size;
1726
1727         /* Use DMU_OTN_UINT8_METADATA for local objects so their data blocks
1728          * would get an additional ditto copy */
1729         if (unlikely(S_ISREG(la->la_mode) &&
1730                      fid_seq_is_local_file(fid_seq(fid))))
1731                 type = DMU_OTN_UINT8_METADATA;
1732
1733         /* Create a new DMU object using the default dnode size. */
1734         if (obj)
1735                 size = obj->oo_ea_in_bonus;
1736         else
1737                 size = OSD_BASE_EA_IN_BONUS;
1738         oid = osd_dmu_object_alloc(osd->od_os, type, 0,
1739                                    osd_find_dnsize(osd, size), tx);
1740
1741         LASSERT(la->la_valid & LA_MODE);
1742         la->la_size = 0;
1743         la->la_nlink = 1;
1744
1745         return osd_find_new_dnode(env, tx, oid, dnp);
1746 }
1747
1748 /*
1749  * The transaction passed to this routine must have
1750  * dmu_tx_hold_zap(tx, DMU_NEW_OBJECT, ...) called and then assigned
1751  * to a transaction group.
1752  *
1753  * Using ZAP_FLAG_HASH64 will force the ZAP to always be a FAT ZAP.
1754  * This is fine for directories today, because storing the FID in the dirent
1755  * will also require a FAT ZAP.  If there is a new type of micro ZAP created
1756  * then we might need to re-evaluate the use of this flag and instead do
1757  * a conversion from the different internal ZAP hash formats being used. */
1758 int __osd_zap_create(const struct lu_env *env, struct osd_device *osd,
1759                      dnode_t **dnp, dmu_tx_t *tx, struct lu_attr *la,
1760                      unsigned dnsize, zap_flags_t flags)
1761 {
1762         uint64_t oid;
1763
1764         /* Assert that the transaction has been assigned to a
1765            transaction group. */
1766         LASSERT(tx->tx_txg != 0);
1767         *dnp = NULL;
1768
1769         oid = osd_zap_create_flags(osd->od_os, 0, flags | ZAP_FLAG_HASH64,
1770                                    DMU_OT_DIRECTORY_CONTENTS,
1771                                    14, /* == ZFS fzap_default_blockshift */
1772                                    DN_MAX_INDBLKSHIFT, /* indirect blockshift */
1773                                    dnsize, tx);
1774
1775         la->la_size = 2;
1776         la->la_nlink = 1;
1777
1778         return osd_find_new_dnode(env, tx, oid, dnp);
1779 }
1780
1781 static dnode_t *osd_mkidx(const struct lu_env *env, struct osd_object *obj,
1782                           struct lu_attr *la, struct osd_thandle *oh)
1783 {
1784         struct osd_device *osd = osd_obj2dev(obj);
1785         dnode_t *dn;
1786         int rc;
1787
1788         /* Index file should be created as regular file in order not to confuse
1789          * ZPL which could interpret them as directory.
1790          * We set ZAP_FLAG_UINT64_KEY to let ZFS know than we are going to use
1791          * binary keys */
1792         LASSERT(S_ISREG(la->la_mode));
1793         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1794                 osd_find_dnsize(osd, obj->oo_ea_in_bonus), ZAP_FLAG_UINT64_KEY);
1795         if (rc)
1796                 return ERR_PTR(rc);
1797         return dn;
1798 }
1799
1800 static dnode_t *osd_mkdir(const struct lu_env *env, struct osd_object *obj,
1801                           struct lu_attr *la, struct osd_thandle *oh)
1802 {
1803         struct osd_device *osd = osd_obj2dev(obj);
1804         dnode_t *dn;
1805         int rc;
1806
1807         LASSERT(S_ISDIR(la->la_mode));
1808         rc = __osd_zap_create(env, osd, &dn, oh->ot_tx, la,
1809                               osd_find_dnsize(osd, obj->oo_ea_in_bonus), 0);
1810         if (rc)
1811                 return ERR_PTR(rc);
1812         return dn;
1813 }
1814
1815 static dnode_t *osd_mkreg(const struct lu_env *env, struct osd_object *obj,
1816                           struct lu_attr *la, struct osd_thandle *oh)
1817 {
1818         const struct lu_fid *fid = lu_object_fid(&obj->oo_dt.do_lu);
1819         struct osd_device *osd = osd_obj2dev(obj);
1820         dnode_t *dn;
1821         int rc;
1822
1823         LASSERT(S_ISREG(la->la_mode));
1824         rc = __osd_object_create(env, osd, obj, fid, &dn, oh->ot_tx, la);
1825         if (rc)
1826                 return ERR_PTR(rc);
1827
1828         if ((fid_is_idif(fid) || fid_is_norm(fid) || fid_is_echo(fid))) {
1829                 /* The minimum block size must be at least page size otherwise
1830                  * it will break the assumption in tgt_thread_big_cache where
1831                  * the array size is PTLRPC_MAX_BRW_PAGES. It will also affect
1832                  * RDMA due to subpage transfer size */
1833                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1834                                                PAGE_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         } else if ((fid_is_llog(fid))) {
1841                 rc = -dmu_object_set_blocksize(osd->od_os, dn->dn_object,
1842                                                LLOG_MIN_CHUNK_SIZE, 0, oh->ot_tx);
1843                 if (unlikely(rc)) {
1844                         CERROR("%s: can't change blocksize: %d\n",
1845                                osd->od_svname, rc);
1846                         return ERR_PTR(rc);
1847                 }
1848         }
1849
1850         return dn;
1851 }
1852
1853 static dnode_t *osd_mksym(const struct lu_env *env, struct osd_object *obj,
1854                           struct lu_attr *la, struct osd_thandle *oh)
1855 {
1856         dnode_t *dn;
1857         int rc;
1858
1859         LASSERT(S_ISLNK(la->la_mode));
1860         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1861                                  lu_object_fid(&obj->oo_dt.do_lu),
1862                                  &dn, oh->ot_tx, la);
1863         if (rc)
1864                 return ERR_PTR(rc);
1865         return dn;
1866 }
1867
1868 static dnode_t *osd_mknod(const struct lu_env *env, struct osd_object *obj,
1869                           struct lu_attr *la, struct osd_thandle *oh)
1870 {
1871         dnode_t *dn;
1872         int rc;
1873
1874         if (S_ISCHR(la->la_mode) || S_ISBLK(la->la_mode))
1875                 la->la_valid |= LA_RDEV;
1876
1877         rc = __osd_object_create(env, osd_obj2dev(obj), obj,
1878                                  lu_object_fid(&obj->oo_dt.do_lu),
1879                                  &dn, oh->ot_tx, la);
1880         if (rc)
1881                 return ERR_PTR(rc);
1882         return dn;
1883 }
1884
1885 typedef dnode_t *(*osd_obj_type_f)(const struct lu_env *env,
1886                                    struct osd_object *obj,
1887                                    struct lu_attr *la,
1888                                    struct osd_thandle *oh);
1889
1890 static osd_obj_type_f osd_create_type_f(enum dt_format_type type)
1891 {
1892         osd_obj_type_f result;
1893
1894         switch (type) {
1895         case DFT_DIR:
1896                 result = osd_mkdir;
1897                 break;
1898         case DFT_INDEX:
1899                 result = osd_mkidx;
1900                 break;
1901         case DFT_REGULAR:
1902                 result = osd_mkreg;
1903                 break;
1904         case DFT_SYM:
1905                 result = osd_mksym;
1906                 break;
1907         case DFT_NODE:
1908                 result = osd_mknod;
1909                 break;
1910         default:
1911                 LBUG();
1912                 break;
1913         }
1914         return result;
1915 }
1916
1917 /*
1918  * Concurrency: @dt is write locked.
1919  */
1920 static int osd_create(const struct lu_env *env, struct dt_object *dt,
1921                       struct lu_attr *attr, struct dt_allocation_hint *hint,
1922                       struct dt_object_format *dof, struct thandle *th)
1923 {
1924         struct osd_thread_info  *info = osd_oti_get(env);
1925         struct lustre_mdt_attrs *lma = &info->oti_mdt_attrs;
1926         struct zpl_direntry     *zde = &info->oti_zde.lzd_reg;
1927         const struct lu_fid     *fid = lu_object_fid(&dt->do_lu);
1928         struct osd_object       *obj = osd_dt_obj(dt);
1929         struct osd_device       *osd = osd_obj2dev(obj);
1930         char                    *buf = info->oti_str;
1931         struct osd_thandle      *oh;
1932         dnode_t *dn = NULL, *zdn = NULL;
1933         uint64_t                 zapid, parent = 0;
1934         int                      rc;
1935         __u32 compat = 0;
1936
1937         ENTRY;
1938
1939         LASSERT(!fid_is_acct(fid));
1940
1941         /* concurrent create declarations should not see
1942          * the object inconsistent (db, attr, etc).
1943          * in regular cases acquisition should be cheap */
1944         down_write(&obj->oo_guard);
1945
1946         if (unlikely(dt_object_exists(dt)))
1947                 GOTO(out, rc = -EEXIST);
1948
1949         LASSERT(osd_invariant(obj));
1950         LASSERT(dof != NULL);
1951
1952         LASSERT(th != NULL);
1953         oh = container_of(th, struct osd_thandle, ot_super);
1954
1955         LASSERT(obj->oo_dn == NULL);
1956
1957         /* to follow ZFS on-disk format we need
1958          * to initialize parent dnode properly */
1959         if (hint != NULL && hint->dah_parent != NULL &&
1960             !dt_object_remote(hint->dah_parent))
1961                 parent = osd_dt_obj(hint->dah_parent)->oo_dn->dn_object;
1962
1963         /* we may fix some attributes, better do not change the source */
1964         obj->oo_attr = *attr;
1965         obj->oo_attr.la_size = 0;
1966         obj->oo_attr.la_nlink = 0;
1967         obj->oo_attr.la_valid |= LA_SIZE | LA_NLINK | LA_TYPE;
1968
1969 #ifdef ZFS_PROJINHERIT
1970         if (osd->od_projectused_dn) {
1971                 if (!(obj->oo_attr.la_valid & LA_PROJID))
1972                         obj->oo_attr.la_projid = ZFS_DEFAULT_PROJID;
1973                 obj->oo_with_projid = 1;
1974         }
1975 #endif
1976
1977         dn = osd_create_type_f(dof->dof_type)(env, obj, &obj->oo_attr, oh);
1978         if (IS_ERR(dn)) {
1979                 rc = PTR_ERR(dn);
1980                 dn = NULL;
1981                 GOTO(out, rc);
1982         }
1983
1984         zde->zde_pad = 0;
1985         zde->zde_dnode = dn->dn_object;
1986         zde->zde_type = S_DT(attr->la_mode & S_IFMT);
1987
1988         zapid = osd_get_name_n_idx(env, osd, fid, buf,
1989                                    sizeof(info->oti_str), &zdn);
1990         if (CFS_FAIL_CHECK(OBD_FAIL_OSD_NO_OI_ENTRY) ||
1991             (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_NO_ENTRY)))
1992                 goto skip_add;
1993
1994         if (osd->od_is_ost && OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_INVALID_ENTRY))
1995                 zde->zde_dnode++;
1996
1997         rc = osd_zap_add(osd, zapid, zdn, buf, 8, 1, zde, oh->ot_tx);
1998         if (rc)
1999                 GOTO(out, rc);
2000
2001 skip_add:
2002         obj->oo_dn = dn;
2003         /* Now add in all of the "SA" attributes */
2004         rc = osd_sa_handle_get(obj);
2005         if (rc)
2006                 GOTO(out, rc);
2007
2008         rc = -nvlist_alloc(&obj->oo_sa_xattr, NV_UNIQUE_NAME, KM_SLEEP);
2009         if (rc)
2010                 GOTO(out, rc);
2011
2012         /* initialize LMA */
2013         if (fid_is_idif(fid) || (fid_is_norm(fid) && osd->od_is_ost))
2014                 compat |= LMAC_FID_ON_OST;
2015         lustre_lma_init(lma, fid, compat, 0);
2016         lustre_lma_swab(lma);
2017         rc = -nvlist_add_byte_array(obj->oo_sa_xattr, XATTR_NAME_LMA,
2018                                     (uchar_t *)lma, sizeof(*lma));
2019         if (rc)
2020                 GOTO(out, rc);
2021
2022         /* configure new osd object */
2023         obj->oo_parent = parent != 0 ? parent : zapid;
2024         obj->oo_late_attr_set = 1;
2025         rc = __osd_sa_xattr_schedule_update(env, obj, oh);
2026         if (rc)
2027                 GOTO(out, rc);
2028
2029         /* XXX: oo_lma_flags */
2030         obj->oo_dt.do_lu.lo_header->loh_attr |= obj->oo_attr.la_mode & S_IFMT;
2031         if (likely(!fid_is_acct(lu_object_fid(&obj->oo_dt.do_lu))))
2032                 /* no body operations for accounting objects */
2033                 obj->oo_dt.do_body_ops = &osd_body_ops;
2034
2035         osd_idc_find_and_init(env, osd, obj);
2036
2037 out:
2038         if (unlikely(rc && dn)) {
2039                 dmu_object_free(osd->od_os, dn->dn_object, oh->ot_tx);
2040                 osd_dnode_rele(dn);
2041                 obj->oo_dn = NULL;
2042         } else if (!rc) {
2043                 obj->oo_dt.do_lu.lo_header->loh_attr |= LOHA_EXISTS;
2044         }
2045         up_write(&obj->oo_guard);
2046         RETURN(rc);
2047 }
2048
2049 static int osd_declare_ref_add(const struct lu_env *env, struct dt_object *dt,
2050                                struct thandle *th)
2051 {
2052         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2053         return osd_declare_attr_set(env, dt, NULL, th);
2054 }
2055
2056 /*
2057  * Concurrency: @dt is write locked.
2058  */
2059 static int osd_ref_add(const struct lu_env *env, struct dt_object *dt,
2060                        struct thandle *handle)
2061 {
2062         struct osd_object       *obj = osd_dt_obj(dt);
2063         struct osd_thandle      *oh;
2064         struct osd_device       *osd = osd_obj2dev(obj);
2065         uint64_t                 nlink;
2066         int rc;
2067
2068         ENTRY;
2069
2070         down_read(&obj->oo_guard);
2071         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2072                 GOTO(out, rc = -ENOENT);
2073
2074         LASSERT(osd_invariant(obj));
2075         LASSERT(obj->oo_sa_hdl != NULL);
2076
2077         oh = container_of(handle, struct osd_thandle, ot_super);
2078
2079         write_lock(&obj->oo_attr_lock);
2080         nlink = ++obj->oo_attr.la_nlink;
2081         write_unlock(&obj->oo_attr_lock);
2082
2083         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2084
2085 out:
2086         up_read(&obj->oo_guard);
2087         RETURN(rc);
2088 }
2089
2090 static int osd_declare_ref_del(const struct lu_env *env, struct dt_object *dt,
2091                                struct thandle *handle)
2092 {
2093         osd_idc_find_and_init(env, osd_dev(dt->do_lu.lo_dev), osd_dt_obj(dt));
2094         return osd_declare_attr_set(env, dt, NULL, handle);
2095 }
2096
2097 /*
2098  * Concurrency: @dt is write locked.
2099  */
2100 static int osd_ref_del(const struct lu_env *env, struct dt_object *dt,
2101                        struct thandle *handle)
2102 {
2103         struct osd_object       *obj = osd_dt_obj(dt);
2104         struct osd_thandle      *oh;
2105         struct osd_device       *osd = osd_obj2dev(obj);
2106         uint64_t                 nlink;
2107         int                      rc;
2108
2109         ENTRY;
2110
2111         down_read(&obj->oo_guard);
2112
2113         if (unlikely(!dt_object_exists(dt) || obj->oo_destroyed))
2114                 GOTO(out, rc = -ENOENT);
2115
2116         LASSERT(osd_invariant(obj));
2117         LASSERT(obj->oo_sa_hdl != NULL);
2118
2119         oh = container_of(handle, struct osd_thandle, ot_super);
2120         LASSERT(!lu_object_is_dying(dt->do_lu.lo_header));
2121
2122         write_lock(&obj->oo_attr_lock);
2123         nlink = --obj->oo_attr.la_nlink;
2124         write_unlock(&obj->oo_attr_lock);
2125
2126         rc = osd_object_sa_update(obj, SA_ZPL_LINKS(osd), &nlink, 8, oh);
2127
2128 out:
2129         up_read(&obj->oo_guard);
2130         RETURN(rc);
2131 }
2132
2133 static int osd_object_sync(const struct lu_env *env, struct dt_object *dt,
2134                            __u64 start, __u64 end)
2135 {
2136         struct osd_device *osd = osd_obj2dev(osd_dt_obj(dt));
2137         uint64_t txg = 0;
2138         ENTRY;
2139
2140         if (osd->od_dt_dev.dd_rdonly)
2141                 RETURN(0);
2142
2143         txg = osd_db_dirty_txg(osd_dt_obj(dt)->oo_dn->dn_dbuf);
2144         if (txg) {
2145                 /* the object is dirty or being synced */
2146                 if (osd_object_sync_delay_us < 0)
2147                         txg_wait_synced(dmu_objset_pool(osd->od_os), txg);
2148                 else
2149                         udelay(osd_object_sync_delay_us);
2150         }
2151
2152         RETURN(0);
2153 }
2154
2155 static int osd_invalidate(const struct lu_env *env, struct dt_object *dt)
2156 {
2157         return 0;
2158 }
2159
2160 static bool osd_check_stale(struct dt_object *dt)
2161 {
2162         return false;
2163 }
2164
2165 static const struct dt_object_operations osd_obj_ops = {
2166         .do_read_lock           = osd_read_lock,
2167         .do_write_lock          = osd_write_lock,
2168         .do_read_unlock         = osd_read_unlock,
2169         .do_write_unlock        = osd_write_unlock,
2170         .do_write_locked        = osd_write_locked,
2171         .do_attr_get            = osd_attr_get,
2172         .do_declare_attr_set    = osd_declare_attr_set,
2173         .do_attr_set            = osd_attr_set,
2174         .do_ah_init             = osd_ah_init,
2175         .do_declare_create      = osd_declare_create,
2176         .do_create              = osd_create,
2177         .do_declare_destroy     = osd_declare_destroy,
2178         .do_destroy             = osd_destroy,
2179         .do_index_try           = osd_index_try,
2180         .do_declare_ref_add     = osd_declare_ref_add,
2181         .do_ref_add             = osd_ref_add,
2182         .do_declare_ref_del     = osd_declare_ref_del,
2183         .do_ref_del             = osd_ref_del,
2184         .do_xattr_get           = osd_xattr_get,
2185         .do_declare_xattr_set   = osd_declare_xattr_set,
2186         .do_xattr_set           = osd_xattr_set,
2187         .do_declare_xattr_del   = osd_declare_xattr_del,
2188         .do_xattr_del           = osd_xattr_del,
2189         .do_xattr_list          = osd_xattr_list,
2190         .do_object_sync         = osd_object_sync,
2191         .do_invalidate          = osd_invalidate,
2192         .do_check_stale         = osd_check_stale,
2193 };
2194
2195 static const struct lu_object_operations osd_lu_obj_ops = {
2196         .loo_object_init        = osd_object_init,
2197         .loo_object_delete      = osd_object_delete,
2198         .loo_object_release     = osd_object_release,
2199         .loo_object_free        = osd_object_free,
2200         .loo_object_print       = osd_object_print,
2201         .loo_object_invariant   = osd_object_invariant,
2202 };
2203
2204 static int osd_otable_it_attr_get(const struct lu_env *env,
2205                                 struct dt_object *dt,
2206                                 struct lu_attr *attr)
2207 {
2208         attr->la_valid = 0;
2209         return 0;
2210 }
2211
2212 static const struct dt_object_operations osd_obj_otable_it_ops = {
2213         .do_attr_get            = osd_otable_it_attr_get,
2214         .do_index_try           = osd_index_try,
2215 };
2216
2217 module_param(osd_object_sync_delay_us, int, 0644);
2218 MODULE_PARM_DESC(osd_object_sync_delay_us,
2219                  "If zero or larger delay N usec instead of doing object sync");