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