Whamcloud - gitweb
LU-4017 quota: add project inherit attributes
[fs/lustre-release.git] / lustre / target / out_lib.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) 2014, 2015, Intel Corporation.
24  */
25 /*
26  * lustre/target/out_lib.c
27  *
28  * Author: Di Wang <di.wang@intel.com>
29  * Author: Fan, Yong <fan.yong@intel.com>
30  */
31
32 #define DEBUG_SUBSYSTEM S_CLASS
33
34 #include <lu_target.h>
35 #include <lustre_obdo.h>
36 #include <lustre_update.h>
37 #include <md_object.h>
38 #include <obd.h>
39 #include <obd_class.h>
40 #include <lustre_linkea.h>
41
42 #include "tgt_internal.h"
43
44 const char *update_op_str(__u16 opc)
45 {
46         static const char *opc_str[] = {
47                 [OUT_START] = "start",
48                 [OUT_CREATE] = "create",
49                 [OUT_DESTROY] = "destroy",
50                 [OUT_REF_ADD] = "ref_add",
51                 [OUT_REF_DEL] = "ref_del" ,
52                 [OUT_ATTR_SET] = "attr_set",
53                 [OUT_ATTR_GET] = "attr_get",
54                 [OUT_XATTR_SET] = "xattr_set",
55                 [OUT_XATTR_GET] = "xattr_get",
56                 [OUT_INDEX_LOOKUP] = "lookup",
57                 [OUT_INDEX_INSERT] = "insert",
58                 [OUT_INDEX_DELETE] = "delete",
59                 [OUT_WRITE] = "write",
60                 [OUT_XATTR_DEL] = "xattr_del",
61                 [OUT_PUNCH] = "punch",
62                 [OUT_READ] = "read",
63                 [OUT_NOOP] = "noop",
64         };
65
66         if (opc < ARRAY_SIZE(opc_str) && opc_str[opc] != NULL)
67                 return opc_str[opc];
68         else
69                 return "unknown";
70 }
71 EXPORT_SYMBOL(update_op_str);
72
73 /**
74  * Fill object update header
75  *
76  * Only fill the object update header, and parameters will be filled later
77  * in other functions.
78  *
79  * \params[in] env              execution environment
80  * \params[in] update           object update to be filled
81  * \params[in,out] max_update_size      maximum object update size, if the
82  *                                      current update length equals or
83  *                                      exceeds the size, it will return -E2BIG.
84  * \params[in] update_op        update type
85  * \params[in] fid              object FID of the update
86  * \params[in] param_count      the count of the update parameters
87  * \params[in] param_sizes      the length of each parameters
88  *
89  * \retval                      0 if packing succeeds.
90  * \retval                      -E2BIG if packing exceeds the maximum length.
91  */
92 int out_update_header_pack(const struct lu_env *env,
93                            struct object_update *update,
94                            size_t *max_update_size,
95                            enum update_type update_op,
96                            const struct lu_fid *fid,
97                            unsigned int param_count,
98                            __u16 *param_sizes,
99                            __u32 reply_size)
100 {
101         struct object_update_param      *param;
102         unsigned int                    i;
103         size_t                          update_size;
104
105         if (((reply_size + 7) >> 3) >= 1ULL << 16)
106                 return -EINVAL;
107
108         /* Check whether the packing exceeding the maxima update length */
109         update_size = sizeof(*update);
110         for (i = 0; i < param_count; i++)
111                 update_size += cfs_size_round(sizeof(*param) + param_sizes[i]);
112
113         if (unlikely(update_size >= *max_update_size)) {
114                 *max_update_size = update_size;
115                 return -E2BIG;
116         }
117
118         update->ou_fid = *fid;
119         update->ou_type = update_op;
120         update->ou_params_count = param_count;
121         update->ou_result_size = reply_size;
122         param = &update->ou_params[0];
123         for (i = 0; i < param_count; i++) {
124                 param->oup_len = param_sizes[i];
125                 param = (struct object_update_param *)((char *)param +
126                          object_update_param_size(param));
127         }
128
129         return 0;
130 }
131
132 /**
133  * Packs one update into the update_buffer.
134  *
135  * \param[in] env       execution environment
136  * \param[in] update    update to be packed
137  * \param[in] max_update_size   *maximum size of \a update
138  * \param[in] op        update operation (enum update_type)
139  * \param[in] fid       object FID for this update
140  * \param[in] param_count       number of parameters for this update
141  * \param[in] param_sizes       array of parameters length of this update
142  * \param[in] param_bufs        parameter buffers
143  *
144  * \retval              = 0 if updates packing succeeds
145  * \retval              negative errno if updates packing fails
146  **/
147 int out_update_pack(const struct lu_env *env, struct object_update *update,
148                     size_t *max_update_size, enum update_type op,
149                     const struct lu_fid *fid, unsigned int param_count,
150                     __u16 *param_sizes, const void **param_bufs,
151                     __u32 reply_size)
152 {
153         struct object_update_param      *param;
154         unsigned int                    i;
155         int                             rc;
156         ENTRY;
157
158         rc = out_update_header_pack(env, update, max_update_size, op, fid,
159                                     param_count, param_sizes, reply_size);
160         if (rc != 0)
161                 RETURN(rc);
162
163         param = &update->ou_params[0];
164         for (i = 0; i < param_count; i++) {
165                 memcpy(&param->oup_buf[0], param_bufs[i], param_sizes[i]);
166                 param = (struct object_update_param *)((char *)param +
167                          object_update_param_size(param));
168         }
169
170         RETURN(0);
171 }
172 EXPORT_SYMBOL(out_update_pack);
173
174 /**
175  * Pack various updates into the update_buffer.
176  *
177  * The following functions pack different updates into the update_buffer
178  * So parameters of these API is basically same as its correspondent OSD/OSP
179  * API, for detail description of these parameters see osd_handler.c or
180  * osp_md_object.c.
181  *
182  * \param[in] env       execution environment
183  * \param[in] ubuf      update buffer
184  * \param[in] fid       fid of this object for the update
185  *
186  * \retval              0 if insertion succeeds.
187  * \retval              negative errno if insertion fails.
188  */
189 int out_create_pack(const struct lu_env *env, struct object_update *update,
190                     size_t *max_update_size, const struct lu_fid *fid,
191                     const struct lu_attr *attr, struct dt_allocation_hint *hint,
192                     struct dt_object_format *dof)
193 {
194         struct obdo             *obdo;
195         __u16                   sizes[2] = {sizeof(*obdo), 0};
196         int                     buf_count = 1;
197         const struct lu_fid     *parent_fid = NULL;
198         int                     rc;
199         ENTRY;
200
201         if (hint != NULL && hint->dah_parent) {
202                 parent_fid = lu_object_fid(&hint->dah_parent->do_lu);
203                 sizes[1] = sizeof(*parent_fid);
204                 buf_count++;
205         }
206
207         rc = out_update_header_pack(env, update, max_update_size, OUT_CREATE,
208                                     fid, buf_count, sizes, 0);
209         if (rc != 0)
210                 RETURN(rc);
211
212         obdo = object_update_param_get(update, 0, NULL);
213         if (IS_ERR(obdo))
214                 RETURN(PTR_ERR(obdo));
215
216         obdo->o_valid = 0;
217         obdo_from_la(obdo, attr, attr->la_valid);
218
219         if (parent_fid != NULL) {
220                 struct lu_fid *tmp;
221
222                 tmp = object_update_param_get(update, 1, NULL);
223                 if (IS_ERR(tmp))
224                         RETURN(PTR_ERR(tmp));
225
226                 fid_cpu_to_le(tmp, parent_fid);
227         }
228
229         RETURN(0);
230 }
231 EXPORT_SYMBOL(out_create_pack);
232
233 int out_ref_del_pack(const struct lu_env *env, struct object_update *update,
234                      size_t *max_update_size, const struct lu_fid *fid)
235 {
236         return out_update_pack(env, update, max_update_size, OUT_REF_DEL, fid,
237                                0, NULL, NULL, 0);
238 }
239 EXPORT_SYMBOL(out_ref_del_pack);
240
241 int out_ref_add_pack(const struct lu_env *env, struct object_update *update,
242                      size_t *max_update_size, const struct lu_fid *fid)
243 {
244         return out_update_pack(env, update, max_update_size, OUT_REF_ADD, fid,
245                                0, NULL, NULL, 0);
246 }
247 EXPORT_SYMBOL(out_ref_add_pack);
248
249 int out_attr_set_pack(const struct lu_env *env, struct object_update *update,
250                       size_t *max_update_size, const struct lu_fid *fid,
251                       const struct lu_attr *attr)
252 {
253         struct obdo             *obdo;
254         __u16                   size = sizeof(*obdo);
255         int                     rc;
256         ENTRY;
257
258         rc = out_update_header_pack(env, update, max_update_size,
259                                     OUT_ATTR_SET, fid, 1, &size, 0);
260         if (rc != 0)
261                 RETURN(rc);
262
263         obdo = object_update_param_get(update, 0, NULL);
264         if (IS_ERR(obdo))
265                 RETURN(PTR_ERR(obdo));
266
267         obdo->o_valid = 0;
268         obdo_from_la(obdo, attr, attr->la_valid);
269
270         RETURN(0);
271 }
272 EXPORT_SYMBOL(out_attr_set_pack);
273
274 int out_xattr_set_pack(const struct lu_env *env, struct object_update *update,
275                        size_t *max_update_size, const struct lu_fid *fid,
276                        const struct lu_buf *buf, const char *name, __u32 flag)
277 {
278         __u16   sizes[3] = {strlen(name) + 1, buf->lb_len, sizeof(flag)};
279         const void *bufs[3] = {(char *)name, (char *)buf->lb_buf,
280                                (char *)&flag};
281
282         return out_update_pack(env, update, max_update_size, OUT_XATTR_SET,
283                                fid, ARRAY_SIZE(sizes), sizes, bufs, 0);
284 }
285 EXPORT_SYMBOL(out_xattr_set_pack);
286
287 int out_xattr_del_pack(const struct lu_env *env, struct object_update *update,
288                        size_t *max_update_size, const struct lu_fid *fid,
289                        const char *name)
290 {
291         __u16   size = strlen(name) + 1;
292
293         return out_update_pack(env, update, max_update_size, OUT_XATTR_DEL,
294                                fid, 1, &size, (const void **)&name, 0);
295 }
296 EXPORT_SYMBOL(out_xattr_del_pack);
297
298 int out_index_insert_pack(const struct lu_env *env,
299                           struct object_update *update,
300                           size_t *max_update_size, const struct lu_fid *fid,
301                           const struct dt_rec *rec, const struct dt_key *key)
302 {
303         struct dt_insert_rec       *rec1 = (struct dt_insert_rec *)rec;
304         struct lu_fid              rec_fid;
305         __u32                       type = cpu_to_le32(rec1->rec_type);
306         __u16                       sizes[3] = { strlen((char *)key) + 1,
307                                                 sizeof(rec_fid),
308                                                 sizeof(type) };
309         const void                 *bufs[3] = { (char *)key,
310                                                 (char *)&rec_fid,
311                                                 (char *)&type };
312
313         fid_cpu_to_le(&rec_fid, rec1->rec_fid);
314
315         return out_update_pack(env, update, max_update_size, OUT_INDEX_INSERT,
316                                fid, ARRAY_SIZE(sizes), sizes, bufs, 0);
317 }
318 EXPORT_SYMBOL(out_index_insert_pack);
319
320 int out_index_delete_pack(const struct lu_env *env,
321                           struct object_update *update,
322                           size_t *max_update_size, const struct lu_fid *fid,
323                           const struct dt_key *key)
324 {
325         __u16   size = strlen((char *)key) + 1;
326         const void *buf = key;
327
328         return out_update_pack(env, update, max_update_size, OUT_INDEX_DELETE,
329                                fid, 1, &size, &buf, 0);
330 }
331 EXPORT_SYMBOL(out_index_delete_pack);
332
333 int out_object_destroy_pack(const struct lu_env *env,
334                             struct object_update *update,
335                             size_t *max_update_size, const struct lu_fid *fid)
336 {
337         return out_update_pack(env, update, max_update_size, OUT_DESTROY, fid,
338                                0, NULL, NULL, 0);
339 }
340 EXPORT_SYMBOL(out_object_destroy_pack);
341
342 int out_write_pack(const struct lu_env *env, struct object_update *update,
343                    size_t *max_update_size, const struct lu_fid *fid,
344                    const struct lu_buf *buf, __u64 pos)
345 {
346         __u16           sizes[2] = {buf->lb_len, sizeof(pos)};
347         const void      *bufs[2] = {(char *)buf->lb_buf, (char *)&pos};
348         int             rc;
349
350         pos = cpu_to_le64(pos);
351
352         rc = out_update_pack(env, update, max_update_size, OUT_WRITE, fid,
353                              ARRAY_SIZE(sizes), sizes, bufs, 0);
354         return rc;
355 }
356 EXPORT_SYMBOL(out_write_pack);
357
358 /**
359  * Pack various readonly updates into the update_buffer.
360  *
361  * The following update funcs are only used by read-only ops, lookup,
362  * getattr etc, so it does not need transaction here. Currently they
363  * are only used by OSP.
364  *
365  * \param[in] env       execution environment
366  * \param[in] fid       fid of this object for the update
367  * \param[in] ubuf      update buffer
368  *
369  * \retval              = 0 pack succeed.
370  *                      < 0 pack failed.
371  **/
372 int out_index_lookup_pack(const struct lu_env *env,
373                           struct object_update *update,
374                           size_t *max_update_size, const struct lu_fid *fid,
375                           struct dt_rec *rec, const struct dt_key *key)
376 {
377         const void      *name = key;
378         __u16           size = strlen((char *)name) + 1;
379
380         /* XXX: this shouldn't be hardcoded */
381         return out_update_pack(env, update, max_update_size, OUT_INDEX_LOOKUP,
382                                fid, 1, &size, &name, 256);
383 }
384 EXPORT_SYMBOL(out_index_lookup_pack);
385
386 int out_attr_get_pack(const struct lu_env *env, struct object_update *update,
387                       size_t *max_update_size, const struct lu_fid *fid)
388 {
389         return out_update_pack(env, update, max_update_size, OUT_ATTR_GET,
390                                fid, 0, NULL, NULL, sizeof(struct obdo));
391 }
392 EXPORT_SYMBOL(out_attr_get_pack);
393
394 int out_xattr_get_pack(const struct lu_env *env, struct object_update *update,
395                        size_t *max_update_size, const struct lu_fid *fid,
396                        const char *name, const int bufsize)
397 {
398         __u16 size;
399
400         LASSERT(name != NULL);
401         size = strlen(name) + 1;
402
403         return out_update_pack(env, update, max_update_size, OUT_XATTR_GET,
404                                fid, 1, &size, (const void **)&name, bufsize);
405 }
406 EXPORT_SYMBOL(out_xattr_get_pack);
407
408 int out_read_pack(const struct lu_env *env, struct object_update *update,
409                   size_t *max_update_size, const struct lu_fid *fid,
410                   size_t size, loff_t pos)
411 {
412         __u16           sizes[2] = {sizeof(size), sizeof(pos)};
413         const void      *bufs[2] = {&size, &pos};
414
415         LASSERT(size > 0);
416         size = cpu_to_le64(size);
417         pos = cpu_to_le64(pos);
418
419         return out_update_pack(env, update, max_update_size, OUT_READ, fid,
420                                ARRAY_SIZE(sizes), sizes, bufs, size);
421 }
422 EXPORT_SYMBOL(out_read_pack);
423
424 static int tx_extend_args(struct thandle_exec_args *ta, int new_alloc_ta)
425 {
426         struct tx_arg   **new_ta;
427         int             i;
428         int             rc = 0;
429
430         if (ta->ta_alloc_args >= new_alloc_ta)
431                 return 0;
432
433         OBD_ALLOC(new_ta, sizeof(*new_ta) * new_alloc_ta);
434         if (new_ta == NULL)
435                 return -ENOMEM;
436
437         for (i = 0; i < new_alloc_ta; i++) {
438                 if (i < ta->ta_alloc_args) {
439                         /* copy the old args to new one */
440                         new_ta[i] = ta->ta_args[i];
441                 } else {
442                         OBD_ALLOC_PTR(new_ta[i]);
443                         if (new_ta[i] == NULL)
444                                 GOTO(out, rc = -ENOMEM);
445                 }
446         }
447
448         /* free the old args */
449         if (ta->ta_args != NULL)
450                 OBD_FREE(ta->ta_args, sizeof(ta->ta_args[0]) *
451                                       ta->ta_alloc_args);
452
453         ta->ta_args = new_ta;
454         ta->ta_alloc_args = new_alloc_ta;
455 out:
456         if (rc != 0) {
457                 for (i = 0; i < new_alloc_ta; i++) {
458                         if (new_ta[i] != NULL)
459                                 OBD_FREE_PTR(new_ta[i]);
460                 }
461                 OBD_FREE(new_ta, sizeof(*new_ta) * new_alloc_ta);
462         }
463         return rc;
464 }
465
466 #define TX_ALLOC_STEP   8
467 struct tx_arg *tx_add_exec(struct thandle_exec_args *ta,
468                            tx_exec_func_t func, tx_exec_func_t undo,
469                            const char *file, int line)
470 {
471         int rc;
472         int i;
473
474         LASSERT(ta != NULL);
475         LASSERT(func != NULL);
476
477         if (ta->ta_argno + 1 >= ta->ta_alloc_args) {
478                 rc = tx_extend_args(ta, ta->ta_alloc_args + TX_ALLOC_STEP);
479                 if (rc != 0)
480                         return ERR_PTR(rc);
481         }
482
483         i = ta->ta_argno;
484
485         ta->ta_argno++;
486
487         ta->ta_args[i]->exec_fn = func;
488         ta->ta_args[i]->undo_fn = undo;
489         ta->ta_args[i]->file    = file;
490         ta->ta_args[i]->line    = line;
491
492         return ta->ta_args[i];
493 }
494
495 static int out_obj_destroy(const struct lu_env *env, struct dt_object *dt_obj,
496                            struct thandle *th)
497 {
498         int rc;
499
500         CDEBUG(D_INFO, "%s: destroy "DFID"\n", dt_obd_name(th->th_dev),
501                PFID(lu_object_fid(&dt_obj->do_lu)));
502
503         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
504         rc = dt_destroy(env, dt_obj, th);
505         dt_write_unlock(env, dt_obj);
506
507         return rc;
508 }
509
510 /**
511  * All of the xxx_undo will be used once execution failed,
512  * But because all of the required resource has been reserved in
513  * declare phase, i.e. if declare succeed, it should make sure
514  * the following executing phase succeed in anyway, so these undo
515  * should be useless for most of the time in Phase I
516  */
517 static int out_tx_create_undo(const struct lu_env *env, struct thandle *th,
518                               struct tx_arg *arg)
519 {
520         int rc;
521
522         rc = out_obj_destroy(env, arg->object, th);
523         if (rc != 0)
524                 CERROR("%s: undo failure, we are doomed!: rc = %d\n",
525                        dt_obd_name(th->th_dev), rc);
526         return rc;
527 }
528
529 int out_tx_create_exec(const struct lu_env *env, struct thandle *th,
530                        struct tx_arg *arg)
531 {
532         struct dt_object        *dt_obj = arg->object;
533         int                      rc;
534
535         CDEBUG(D_OTHER, "%s: create "DFID": dof %u, mode %o\n",
536                dt_obd_name(th->th_dev),
537                PFID(lu_object_fid(&arg->object->do_lu)),
538                arg->u.create.dof.dof_type,
539                arg->u.create.attr.la_mode & S_IFMT);
540
541         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
542         rc = dt_create(env, dt_obj, &arg->u.create.attr,
543                        &arg->u.create.hint, &arg->u.create.dof, th);
544
545         dt_write_unlock(env, dt_obj);
546
547         CDEBUG(D_INFO, "%s: insert create reply %p index %d: rc = %d\n",
548                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
549
550         if (arg->reply != NULL)
551                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
552                                             rc);
553
554         return rc;
555 }
556
557 /**
558  * Add create update to thandle
559  *
560  * Declare create updates and add the update to the thandle updates
561  * exec array.
562  *
563  * \param [in] env      execution environment
564  * \param [in] obj      object to be created
565  * \param [in] attr     attributes of the creation
566  * \param [in] parent_fid the fid of the parent
567  * \param [in] dof      dt object format of the creation
568  * \param [in] ta       thandle execuation args where all of updates
569  *                      of the transaction are stored
570  * \param [in] th       thandle for this update
571  * \param [in] reply    reply of the updates
572  * \param [in] index    index of the reply
573  * \param [in] file     the file name where the function is called,
574  *                      which is only for debugging purpose.
575  * \param [in] line     the line number where the funtion is called,
576  *                      which is only for debugging purpose.
577  *
578  * \retval              0 if updates is added successfully.
579  * \retval              negative errno if update adding fails.
580  */
581 int out_create_add_exec(const struct lu_env *env, struct dt_object *obj,
582                         struct lu_attr *attr, struct lu_fid *parent_fid,
583                         struct dt_object_format *dof,
584                         struct thandle_exec_args *ta,
585                         struct thandle  *th,
586                         struct object_update_reply *reply,
587                         int index, const char *file, int line)
588 {
589         struct tx_arg *arg;
590         int rc;
591
592         rc = dt_declare_create(env, obj, attr, NULL, dof, th);
593         if (rc != 0)
594                 return rc;
595
596         arg = tx_add_exec(ta, out_tx_create_exec, out_tx_create_undo, file,
597                           line);
598         if (IS_ERR(arg))
599                 return PTR_ERR(arg);
600
601         /* release the object in out_trans_stop */
602         lu_object_get(&obj->do_lu);
603         arg->object = obj;
604         arg->u.create.attr = *attr;
605         if (parent_fid != NULL)
606                 arg->u.create.fid = *parent_fid;
607         memset(&arg->u.create.hint, 0, sizeof(arg->u.create.hint));
608         arg->u.create.dof  = *dof;
609         arg->reply = reply;
610         arg->index = index;
611
612         return 0;
613 }
614
615 static int out_tx_attr_set_undo(const struct lu_env *env,
616                                 struct thandle *th, struct tx_arg *arg)
617 {
618         CERROR("%s: attr set undo "DFID" unimplemented yet!: rc = %d\n",
619                dt_obd_name(th->th_dev),
620                PFID(lu_object_fid(&arg->object->do_lu)), -ENOTSUPP);
621
622         return -ENOTSUPP;
623 }
624
625 static int out_tx_attr_set_exec(const struct lu_env *env, struct thandle *th,
626                                 struct tx_arg *arg)
627 {
628         struct dt_object        *dt_obj = arg->object;
629         int                     rc;
630
631         CDEBUG(D_OTHER, "%s: attr set "DFID"\n", dt_obd_name(th->th_dev),
632                PFID(lu_object_fid(&dt_obj->do_lu)));
633
634         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
635         rc = dt_attr_set(env, dt_obj, &arg->u.attr_set.attr, th);
636         dt_write_unlock(env, dt_obj);
637
638         CDEBUG(D_INFO, "%s: insert attr_set reply %p index %d: rc = %d\n",
639                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
640
641         if (arg->reply != NULL)
642                 object_update_result_insert(arg->reply, NULL, 0,
643                                             arg->index, rc);
644
645         return rc;
646 }
647
648 int out_attr_set_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
649                           const struct lu_attr *attr,
650                           struct thandle_exec_args *ta,
651                           struct thandle *th, struct object_update_reply *reply,
652                           int index, const char *file, int line)
653 {
654         struct tx_arg   *arg;
655         int             rc;
656
657         rc = dt_declare_attr_set(env, dt_obj, attr, th);
658         if (rc != 0)
659                 return rc;
660
661         arg = tx_add_exec(ta, out_tx_attr_set_exec, out_tx_attr_set_undo,
662                           file, line);
663         if (IS_ERR(arg))
664                 return PTR_ERR(arg);
665
666         lu_object_get(&dt_obj->do_lu);
667         arg->object = dt_obj;
668         arg->u.attr_set.attr = *attr;
669         arg->reply = reply;
670         arg->index = index;
671         return 0;
672 }
673
674 static int out_tx_write_exec(const struct lu_env *env, struct thandle *th,
675                              struct tx_arg *arg)
676 {
677         struct dt_object *dt_obj = arg->object;
678         int rc;
679
680         CDEBUG(D_INFO, "write "DFID" pos %llu buf %p, len %lu\n",
681                PFID(lu_object_fid(&dt_obj->do_lu)), arg->u.write.pos,
682                arg->u.write.buf.lb_buf, (unsigned long)arg->u.write.buf.lb_len);
683
684         if (OBD_FAIL_CHECK(OBD_FAIL_OUT_ENOSPC)) {
685                 rc = -ENOSPC;
686         } else {
687                 dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
688                 rc = dt_record_write(env, dt_obj, &arg->u.write.buf,
689                                      &arg->u.write.pos, th);
690                 dt_write_unlock(env, dt_obj);
691
692                 if (rc == 0)
693                         rc = arg->u.write.buf.lb_len;
694         }
695
696         if (arg->reply != NULL)
697                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
698                                             rc);
699
700         return rc > 0 ? 0 : rc;
701 }
702
703 int out_write_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
704                        const struct lu_buf *buf, loff_t pos,
705                        struct thandle_exec_args *ta, struct thandle *th,
706                        struct object_update_reply *reply, int index,
707                        const char *file, int line)
708 {
709         struct tx_arg   *arg;
710         int             rc;
711
712         rc = dt_declare_record_write(env, dt_obj, buf, pos, th);
713         if (rc != 0)
714                 return rc;
715
716         arg = tx_add_exec(ta, out_tx_write_exec, NULL, file, line);
717         if (IS_ERR(arg))
718                 return PTR_ERR(arg);
719
720         lu_object_get(&dt_obj->do_lu);
721         arg->object = dt_obj;
722         arg->u.write.buf = *buf;
723         arg->u.write.pos = pos;
724         arg->reply = reply;
725         arg->index = index;
726         return 0;
727 }
728
729 static int out_tx_xattr_set_exec(const struct lu_env *env,
730                                  struct thandle *th,
731                                  struct tx_arg *arg)
732 {
733         struct dt_object *dt_obj = arg->object;
734         int rc;
735         ENTRY;
736
737         CDEBUG(D_INFO, "%s: set xattr buf %p name %s flag %d\n",
738                dt_obd_name(th->th_dev), arg->u.xattr_set.buf.lb_buf,
739                arg->u.xattr_set.name, arg->u.xattr_set.flags);
740
741         if (!lu_object_exists(&dt_obj->do_lu)) {
742                 rc = -ENOENT;
743         } else {
744                 struct linkea_data ldata = { 0 };
745                 bool linkea;
746
747                 ldata.ld_buf = &arg->u.xattr_set.buf;
748                 if (strcmp(arg->u.xattr_set.name, XATTR_NAME_LINK) == 0) {
749                         struct link_ea_header *leh;
750
751                         linkea = true;
752                         rc = linkea_init(&ldata);
753                         if (unlikely(rc))
754                                 GOTO(out, rc == -ENODATA ? -EINVAL : rc);
755
756                         leh = ldata.ld_leh;
757                         LASSERT(leh != NULL);
758
759                         /* If the new linkEA contains overflow timestamp,
760                          * then two cases:
761                          *
762                          * 1. The old linkEA for the object has already
763                          *    overflowed before current setting, the new
764                          *    linkEA does not contains new link entry. So
765                          *    the linkEA overflow timestamp is unchanged.
766                          *
767                          * 2. There are new link entry in the new linkEA,
768                          *    so its overflow timestamp is differnt from
769                          *    the old one. Usually, the overstamp in the
770                          *    given linkEA is newer. But because of clock
771                          *    drift among MDTs, the timestamp may become
772                          *    older. So here, we convert the timestamp to
773                          *    the server local time. Then namespace LFSCK
774                          *    that uses local time can handle it easily. */
775                         if (unlikely(leh->leh_overflow_time)) {
776                                 struct lu_buf tbuf = { 0 };
777                                 bool update = false;
778
779                                 lu_buf_alloc(&tbuf, MAX_LINKEA_SIZE);
780                                 if (tbuf.lb_buf == NULL)
781                                         GOTO(unlock, rc = -ENOMEM);
782
783                                 rc = dt_xattr_get(env, dt_obj, &tbuf,
784                                                   XATTR_NAME_LINK);
785                                 if (rc > 0) {
786                                         struct linkea_data tdata = { 0 };
787
788                                         tdata.ld_buf = &tbuf;
789                                         rc = linkea_init(&tdata);
790                                         if (rc || leh->leh_overflow_time !=
791                                             tdata.ld_leh->leh_overflow_time)
792                                                 update = true;
793                                 } else {
794                                         /* Update the timestamp by force if
795                                          * fail to load the old linkEA. */
796                                         update = true;
797                                 }
798
799                                 lu_buf_free(&tbuf);
800                                 if (update) {
801                                         leh->leh_overflow_time =
802                                                         cfs_time_current_sec();
803                                         if (unlikely(!leh->leh_overflow_time))
804                                                 leh->leh_overflow_time++;
805                                 }
806                         }
807                 } else {
808                         linkea = false;
809                 }
810
811                 dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
812
813 again:
814                 rc = dt_xattr_set(env, dt_obj, ldata.ld_buf,
815                                   arg->u.xattr_set.name, arg->u.xattr_set.flags,
816                                   th);
817                 if (unlikely(rc == -ENOSPC && linkea)) {
818                         rc = linkea_overflow_shrink(&ldata);
819                         if (likely(rc > 0)) {
820                                 arg->u.xattr_set.buf.lb_len = rc;
821                                 goto again;
822                         }
823                 }
824
825 unlock:
826                 dt_write_unlock(env, dt_obj);
827         }
828
829         GOTO(out, rc);
830
831 out:
832         CDEBUG(D_INFO, "%s: insert xattr set reply %p index %d: rc = %d\n",
833                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
834
835         if (arg->reply != NULL)
836                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
837                                             rc);
838
839         return rc;
840 }
841
842 int out_xattr_set_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
843                            const struct lu_buf *buf, const char *name,
844                            int flags, struct thandle_exec_args *ta,
845                            struct thandle *th,
846                            struct object_update_reply *reply,
847                            int index, const char *file, int line)
848 {
849         struct tx_arg   *arg;
850         int             rc;
851
852         rc = dt_declare_xattr_set(env, dt_obj, buf, name, flags, th);
853         if (rc != 0)
854                 return rc;
855
856         arg = tx_add_exec(ta, out_tx_xattr_set_exec, NULL, file, line);
857         if (IS_ERR(arg))
858                 return PTR_ERR(arg);
859
860         lu_object_get(&dt_obj->do_lu);
861         arg->object = dt_obj;
862         arg->u.xattr_set.name = name;
863         arg->u.xattr_set.flags = flags;
864         arg->u.xattr_set.buf = *buf;
865         arg->reply = reply;
866         arg->index = index;
867         arg->u.xattr_set.csum = 0;
868         return 0;
869 }
870
871 static int out_tx_xattr_del_exec(const struct lu_env *env, struct thandle *th,
872                                  struct tx_arg *arg)
873 {
874         struct dt_object *dt_obj = arg->object;
875         int rc;
876
877         CDEBUG(D_INFO, "%s: del xattr name '%s' on "DFID"\n",
878                dt_obd_name(th->th_dev), arg->u.xattr_set.name,
879                PFID(lu_object_fid(&dt_obj->do_lu)));
880
881         if (!lu_object_exists(&dt_obj->do_lu))
882                 GOTO(out, rc = -ENOENT);
883
884         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
885         rc = dt_xattr_del(env, dt_obj, arg->u.xattr_set.name,
886                           th);
887         dt_write_unlock(env, dt_obj);
888 out:
889         CDEBUG(D_INFO, "%s: insert xattr del reply %p index %d: rc = %d\n",
890                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
891
892         if (arg->reply != NULL)
893                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
894                                             rc);
895
896         return rc;
897 }
898
899 int out_xattr_del_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
900                            const char *name, struct thandle_exec_args *ta,
901                            struct thandle *th,
902                            struct object_update_reply *reply, int index,
903                            const char *file, int line)
904 {
905         struct tx_arg   *arg;
906         int             rc;
907
908         rc = dt_declare_xattr_del(env, dt_obj, name, th);
909         if (rc != 0)
910                 return rc;
911
912         arg = tx_add_exec(ta, out_tx_xattr_del_exec, NULL, file, line);
913         if (IS_ERR(arg))
914                 return PTR_ERR(arg);
915
916         lu_object_get(&dt_obj->do_lu);
917         arg->object = dt_obj;
918         arg->u.xattr_set.name = name;
919         arg->reply = reply;
920         arg->index = index;
921         return 0;
922 }
923
924 static int out_obj_ref_add(const struct lu_env *env,
925                            struct dt_object *dt_obj,
926                            struct thandle *th)
927 {
928         int rc;
929
930         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
931         rc = dt_ref_add(env, dt_obj, th);
932         dt_write_unlock(env, dt_obj);
933
934         return rc;
935 }
936
937 static int out_obj_ref_del(const struct lu_env *env,
938                            struct dt_object *dt_obj,
939                            struct thandle *th)
940 {
941         int rc;
942
943         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
944         rc = dt_ref_del(env, dt_obj, th);
945         dt_write_unlock(env, dt_obj);
946
947         return rc;
948 }
949
950 static int out_tx_ref_add_exec(const struct lu_env *env, struct thandle *th,
951                                struct tx_arg *arg)
952 {
953         struct dt_object *dt_obj = arg->object;
954         int rc;
955
956         rc = out_obj_ref_add(env, dt_obj, th);
957
958         CDEBUG(D_INFO, "%s: insert ref_add reply %p index %d: rc = %d\n",
959                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
960
961         if (arg->reply != NULL)
962                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
963                                             rc);
964         return rc;
965 }
966
967 static int out_tx_ref_add_undo(const struct lu_env *env, struct thandle *th,
968                                struct tx_arg *arg)
969 {
970         return out_obj_ref_del(env, arg->object, th);
971 }
972
973 int out_ref_add_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
974                          struct thandle_exec_args *ta,
975                          struct thandle *th,
976                          struct object_update_reply *reply, int index,
977                          const char *file, int line)
978 {
979         struct tx_arg   *arg;
980         int             rc;
981
982         rc = dt_declare_ref_add(env, dt_obj, th);
983         if (rc != 0)
984                 return rc;
985
986         arg = tx_add_exec(ta, out_tx_ref_add_exec, out_tx_ref_add_undo, file,
987                           line);
988         if (IS_ERR(arg))
989                 return PTR_ERR(arg);
990
991         lu_object_get(&dt_obj->do_lu);
992         arg->object = dt_obj;
993         arg->reply = reply;
994         arg->index = index;
995         return 0;
996 }
997
998 static int out_tx_ref_del_exec(const struct lu_env *env, struct thandle *th,
999                                struct tx_arg *arg)
1000 {
1001         struct dt_object        *dt_obj = arg->object;
1002         int                      rc;
1003
1004         rc = out_obj_ref_del(env, dt_obj, th);
1005
1006         CDEBUG(D_INFO, "%s: insert ref_del reply %p index %d: rc = %d\n",
1007                dt_obd_name(th->th_dev), arg->reply, arg->index, 0);
1008
1009         if (arg->reply != NULL)
1010                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
1011                                             rc);
1012
1013         return rc;
1014 }
1015
1016 static int out_tx_ref_del_undo(const struct lu_env *env, struct thandle *th,
1017                                struct tx_arg *arg)
1018 {
1019         return out_obj_ref_add(env, arg->object, th);
1020 }
1021
1022 int out_ref_del_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
1023                          struct thandle_exec_args *ta,
1024                          struct thandle *th,
1025                          struct object_update_reply *reply, int index,
1026                          const char *file, int line)
1027 {
1028         struct tx_arg   *arg;
1029         int             rc;
1030
1031         rc = dt_declare_ref_del(env, dt_obj, th);
1032         if (rc != 0)
1033                 return rc;
1034
1035         arg = tx_add_exec(ta, out_tx_ref_del_exec, out_tx_ref_del_undo, file,
1036                           line);
1037         if (IS_ERR(arg))
1038                 return PTR_ERR(arg);
1039
1040         lu_object_get(&dt_obj->do_lu);
1041         arg->object = dt_obj;
1042         arg->reply = reply;
1043         arg->index = index;
1044         return 0;
1045 }
1046
1047 static int out_obj_index_insert(const struct lu_env *env,
1048                                 struct dt_object *dt_obj,
1049                                 const struct dt_rec *rec,
1050                                 const struct dt_key *key,
1051                                 struct thandle *th)
1052 {
1053         int rc;
1054
1055         CDEBUG(D_INFO, "%s: index insert "DFID" name: %s fid "DFID", type %u\n",
1056                dt_obd_name(th->th_dev), PFID(lu_object_fid(&dt_obj->do_lu)),
1057                (char *)key, PFID(((struct dt_insert_rec *)rec)->rec_fid),
1058                ((struct dt_insert_rec *)rec)->rec_type);
1059
1060         if (dt_try_as_dir(env, dt_obj) == 0)
1061                 return -ENOTDIR;
1062
1063         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
1064         rc = dt_insert(env, dt_obj, rec, key, th, 0);
1065         dt_write_unlock(env, dt_obj);
1066
1067         return rc;
1068 }
1069
1070 static int out_obj_index_delete(const struct lu_env *env,
1071                                 struct dt_object *dt_obj,
1072                                 const struct dt_key *key,
1073                                 struct thandle *th)
1074 {
1075         int rc;
1076
1077         CDEBUG(D_INFO, "%s: index delete "DFID" name: %s\n",
1078                dt_obd_name(th->th_dev), PFID(lu_object_fid(&dt_obj->do_lu)),
1079                (char *)key);
1080
1081         if (dt_try_as_dir(env, dt_obj) == 0)
1082                 return -ENOTDIR;
1083
1084         dt_write_lock(env, dt_obj, MOR_TGT_CHILD);
1085         rc = dt_delete(env, dt_obj, key, th);
1086         dt_write_unlock(env, dt_obj);
1087
1088         return rc;
1089 }
1090
1091 static int out_tx_index_insert_exec(const struct lu_env *env,
1092                                     struct thandle *th, struct tx_arg *arg)
1093 {
1094         struct dt_object *dt_obj = arg->object;
1095         int rc;
1096
1097         if (unlikely(!dt_object_exists(dt_obj)))
1098                 RETURN(-ESTALE);
1099
1100         rc = out_obj_index_insert(env, dt_obj,
1101                                   (const struct dt_rec *)&arg->u.insert.rec,
1102                                   arg->u.insert.key, th);
1103
1104         CDEBUG(D_INFO, "%s: insert idx insert reply %p index %d: rc = %d\n",
1105                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
1106
1107         if (arg->reply != NULL)
1108                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
1109                                             rc);
1110         return rc;
1111 }
1112
1113 static int out_tx_index_insert_undo(const struct lu_env *env,
1114                                     struct thandle *th, struct tx_arg *arg)
1115 {
1116         return out_obj_index_delete(env, arg->object, arg->u.insert.key, th);
1117 }
1118
1119 int out_index_insert_add_exec(const struct lu_env *env,
1120                               struct dt_object *dt_obj,
1121                               const struct dt_rec *rec,
1122                               const struct dt_key *key,
1123                               struct thandle_exec_args *ta,
1124                               struct thandle *th,
1125                               struct object_update_reply *reply,
1126                               int index, const char *file, int line)
1127 {
1128         struct tx_arg   *arg;
1129         int             rc;
1130
1131         if (dt_try_as_dir(env, dt_obj) == 0) {
1132                 rc = -ENOTDIR;
1133                 return rc;
1134         }
1135
1136         rc = dt_declare_insert(env, dt_obj, rec, key, th);
1137         if (rc != 0)
1138                 return rc;
1139
1140         arg = tx_add_exec(ta, out_tx_index_insert_exec,
1141                           out_tx_index_insert_undo, file, line);
1142         if (IS_ERR(arg))
1143                 return PTR_ERR(arg);
1144
1145         lu_object_get(&dt_obj->do_lu);
1146         arg->object = dt_obj;
1147         arg->reply = reply;
1148         arg->index = index;
1149         arg->u.insert.rec = *(const struct dt_insert_rec *)rec;
1150         arg->u.insert.key = key;
1151
1152         return 0;
1153 }
1154
1155 static int out_tx_index_delete_exec(const struct lu_env *env,
1156                                     struct thandle *th,
1157                                     struct tx_arg *arg)
1158 {
1159         int rc;
1160
1161         rc = out_obj_index_delete(env, arg->object, arg->u.insert.key, th);
1162
1163         CDEBUG(D_INFO, "%s: delete idx insert reply %p index %d: rc = %d\n",
1164                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
1165
1166         if (arg->reply != NULL)
1167                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
1168                                             rc);
1169
1170         return rc;
1171 }
1172
1173 static int out_tx_index_delete_undo(const struct lu_env *env,
1174                                     struct thandle *th,
1175                                     struct tx_arg *arg)
1176 {
1177         CERROR("%s: Oops, can not rollback index_delete yet: rc = %d\n",
1178                dt_obd_name(th->th_dev), -ENOTSUPP);
1179         return -ENOTSUPP;
1180 }
1181
1182 int out_index_delete_add_exec(const struct lu_env *env,
1183                               struct dt_object *dt_obj,
1184                               const struct dt_key *key,
1185                               struct thandle_exec_args *ta,
1186                               struct thandle *th,
1187                               struct object_update_reply *reply,
1188                               int index, const char *file, int line)
1189 {
1190         struct tx_arg   *arg;
1191         int             rc;
1192
1193         if (dt_try_as_dir(env, dt_obj) == 0) {
1194                 rc = -ENOTDIR;
1195                 return rc;
1196         }
1197
1198         LASSERT(ta->ta_handle != NULL);
1199         rc = dt_declare_delete(env, dt_obj, key, th);
1200         if (rc != 0)
1201                 return rc;
1202
1203         arg = tx_add_exec(ta, out_tx_index_delete_exec,
1204                           out_tx_index_delete_undo, file, line);
1205         if (IS_ERR(arg))
1206                 return PTR_ERR(arg);
1207
1208         lu_object_get(&dt_obj->do_lu);
1209         arg->object = dt_obj;
1210         arg->reply = reply;
1211         arg->index = index;
1212         arg->u.insert.key = key;
1213         return 0;
1214 }
1215
1216 static int out_tx_destroy_exec(const struct lu_env *env, struct thandle *th,
1217                                struct tx_arg *arg)
1218 {
1219         struct dt_object *dt_obj = arg->object;
1220         int rc;
1221
1222         rc = out_obj_destroy(env, dt_obj, th);
1223
1224         CDEBUG(D_INFO, "%s: insert destroy reply %p index %d: rc = %d\n",
1225                dt_obd_name(th->th_dev), arg->reply, arg->index, rc);
1226
1227         if (arg->reply != NULL)
1228                 object_update_result_insert(arg->reply, NULL, 0, arg->index,
1229                                             rc);
1230
1231         RETURN(rc);
1232 }
1233
1234 static int out_tx_destroy_undo(const struct lu_env *env, struct thandle *th,
1235                                struct tx_arg *arg)
1236 {
1237         CERROR("%s: not support destroy undo yet!: rc = %d\n",
1238                dt_obd_name(th->th_dev), -ENOTSUPP);
1239         return -ENOTSUPP;
1240 }
1241
1242 int out_destroy_add_exec(const struct lu_env *env, struct dt_object *dt_obj,
1243                          struct thandle_exec_args *ta, struct thandle *th,
1244                          struct object_update_reply *reply,
1245                          int index, const char *file, int line)
1246 {
1247         struct tx_arg   *arg;
1248         int             rc;
1249
1250         rc = dt_declare_destroy(env, dt_obj, th);
1251         if (rc != 0)
1252                 return rc;
1253
1254         arg = tx_add_exec(ta, out_tx_destroy_exec, out_tx_destroy_undo,
1255                           file, line);
1256         if (IS_ERR(arg))
1257                 return PTR_ERR(arg);
1258
1259         lu_object_get(&dt_obj->do_lu);
1260         arg->object = dt_obj;
1261         arg->reply = reply;
1262         arg->index = index;
1263         return 0;
1264 }