Whamcloud - gitweb
c1f4c32fa1fbfcddf1991609cef6fe6b18fe21f8
[fs/lustre-release.git] / lustre / lod / lod_object.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License version 2 for more details.  A copy is
14  * included in the COPYING file that accompanied this code.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright  2009 Sun Microsystems, Inc. All rights reserved
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2012, 2017, Intel Corporation.
27  */
28 /*
29  * lustre/lod/lod_object.c
30  *
31  * This file contains implementations of methods for the OSD API
32  * for the Logical Object Device (LOD) layer, which provides a virtual
33  * local OSD object interface to the MDD layer, and abstracts the
34  * addressing of local (OSD) and remote (OSP) objects. The API is
35  * described in the file lustre/include/dt_object.h and in
36  * Documentation/osd-api.txt.
37  *
38  * Author: Alex Zhuravlev <alexey.zhuravlev@intel.com>
39  */
40
41 #define DEBUG_SUBSYSTEM S_MDS
42
43 #include <linux/random.h>
44
45 #include <obd.h>
46 #include <obd_class.h>
47 #include <obd_support.h>
48
49 #include <lustre_fid.h>
50 #include <lustre_linkea.h>
51 #include <lustre_lmv.h>
52 #include <uapi/linux/lustre/lustre_param.h>
53 #include <lustre_swab.h>
54 #include <uapi/linux/lustre/lustre_ver.h>
55 #include <lprocfs_status.h>
56 #include <md_object.h>
57
58 #include "lod_internal.h"
59
60 static const char dot[] = ".";
61 static const char dotdot[] = "..";
62
63 /**
64  * Implementation of dt_index_operations::dio_lookup
65  *
66  * Used with regular (non-striped) objects.
67  *
68  * \see dt_index_operations::dio_lookup() in the API description for details.
69  */
70 static int lod_lookup(const struct lu_env *env, struct dt_object *dt,
71                       struct dt_rec *rec, const struct dt_key *key)
72 {
73         struct dt_object *next = dt_object_child(dt);
74         return next->do_index_ops->dio_lookup(env, next, rec, key);
75 }
76
77 /**
78  * Implementation of dt_index_operations::dio_declare_insert.
79  *
80  * Used with regular (non-striped) objects.
81  *
82  * \see dt_index_operations::dio_declare_insert() in the API description
83  * for details.
84  */
85 static int lod_declare_insert(const struct lu_env *env, struct dt_object *dt,
86                               const struct dt_rec *rec,
87                               const struct dt_key *key, struct thandle *th)
88 {
89         return lod_sub_declare_insert(env, dt_object_child(dt), rec, key, th);
90 }
91
92 /**
93  * Implementation of dt_index_operations::dio_insert.
94  *
95  * Used with regular (non-striped) objects
96  *
97  * \see dt_index_operations::dio_insert() in the API description for details.
98  */
99 static int lod_insert(const struct lu_env *env, struct dt_object *dt,
100                       const struct dt_rec *rec, const struct dt_key *key,
101                       struct thandle *th)
102 {
103         return lod_sub_insert(env, dt_object_child(dt), rec, key, th);
104 }
105
106 /**
107  * Implementation of dt_index_operations::dio_declare_delete.
108  *
109  * Used with regular (non-striped) objects.
110  *
111  * \see dt_index_operations::dio_declare_delete() in the API description
112  * for details.
113  */
114 static int lod_declare_delete(const struct lu_env *env, struct dt_object *dt,
115                               const struct dt_key *key, struct thandle *th)
116 {
117         return lod_sub_declare_delete(env, dt_object_child(dt), key, th);
118 }
119
120 /**
121  * Implementation of dt_index_operations::dio_delete.
122  *
123  * Used with regular (non-striped) objects.
124  *
125  * \see dt_index_operations::dio_delete() in the API description for details.
126  */
127 static int lod_delete(const struct lu_env *env, struct dt_object *dt,
128                       const struct dt_key *key, struct thandle *th)
129 {
130         return lod_sub_delete(env, dt_object_child(dt), key, th);
131 }
132
133 /**
134  * Implementation of dt_it_ops::init.
135  *
136  * Used with regular (non-striped) objects.
137  *
138  * \see dt_it_ops::init() in the API description for details.
139  */
140 static struct dt_it *lod_it_init(const struct lu_env *env,
141                                  struct dt_object *dt, __u32 attr)
142 {
143         struct dt_object        *next = dt_object_child(dt);
144         struct lod_it           *it = &lod_env_info(env)->lti_it;
145         struct dt_it            *it_next;
146
147         it_next = next->do_index_ops->dio_it.init(env, next, attr);
148         if (IS_ERR(it_next))
149                 return it_next;
150
151         /* currently we do not use more than one iterator per thread
152          * so we store it in thread info. if at some point we need
153          * more active iterators in a single thread, we can allocate
154          * additional ones */
155         LASSERT(it->lit_obj == NULL);
156
157         it->lit_it = it_next;
158         it->lit_obj = next;
159
160         return (struct dt_it *)it;
161 }
162
163 #define LOD_CHECK_IT(env, it)                                   \
164 do {                                                            \
165         LASSERT((it)->lit_obj != NULL);                         \
166         LASSERT((it)->lit_it != NULL);                          \
167 } while (0)
168
169 /**
170  * Implementation of dt_index_operations::dio_it.fini.
171  *
172  * Used with regular (non-striped) objects.
173  *
174  * \see dt_index_operations::dio_it.fini() in the API description for details.
175  */
176 static void lod_it_fini(const struct lu_env *env, struct dt_it *di)
177 {
178         struct lod_it *it = (struct lod_it *)di;
179
180         LOD_CHECK_IT(env, it);
181         it->lit_obj->do_index_ops->dio_it.fini(env, it->lit_it);
182
183         /* the iterator not in use any more */
184         it->lit_obj = NULL;
185         it->lit_it = NULL;
186 }
187
188 /**
189  * Implementation of dt_it_ops::get.
190  *
191  * Used with regular (non-striped) objects.
192  *
193  * \see dt_it_ops::get() in the API description for details.
194  */
195 static int lod_it_get(const struct lu_env *env, struct dt_it *di,
196                       const struct dt_key *key)
197 {
198         const struct lod_it *it = (const struct lod_it *)di;
199
200         LOD_CHECK_IT(env, it);
201         return it->lit_obj->do_index_ops->dio_it.get(env, it->lit_it, key);
202 }
203
204 /**
205  * Implementation of dt_it_ops::put.
206  *
207  * Used with regular (non-striped) objects.
208  *
209  * \see dt_it_ops::put() in the API description for details.
210  */
211 static void lod_it_put(const struct lu_env *env, struct dt_it *di)
212 {
213         struct lod_it *it = (struct lod_it *)di;
214
215         LOD_CHECK_IT(env, it);
216         return it->lit_obj->do_index_ops->dio_it.put(env, it->lit_it);
217 }
218
219 /**
220  * Implementation of dt_it_ops::next.
221  *
222  * Used with regular (non-striped) objects
223  *
224  * \see dt_it_ops::next() in the API description for details.
225  */
226 static int lod_it_next(const struct lu_env *env, struct dt_it *di)
227 {
228         struct lod_it *it = (struct lod_it *)di;
229
230         LOD_CHECK_IT(env, it);
231         return it->lit_obj->do_index_ops->dio_it.next(env, it->lit_it);
232 }
233
234 /**
235  * Implementation of dt_it_ops::key.
236  *
237  * Used with regular (non-striped) objects.
238  *
239  * \see dt_it_ops::key() in the API description for details.
240  */
241 static struct dt_key *lod_it_key(const struct lu_env *env,
242                                  const struct dt_it *di)
243 {
244         const struct lod_it *it = (const struct lod_it *)di;
245
246         LOD_CHECK_IT(env, it);
247         return it->lit_obj->do_index_ops->dio_it.key(env, it->lit_it);
248 }
249
250 /**
251  * Implementation of dt_it_ops::key_size.
252  *
253  * Used with regular (non-striped) objects.
254  *
255  * \see dt_it_ops::key_size() in the API description for details.
256  */
257 static int lod_it_key_size(const struct lu_env *env, const struct dt_it *di)
258 {
259         struct lod_it *it = (struct lod_it *)di;
260
261         LOD_CHECK_IT(env, it);
262         return it->lit_obj->do_index_ops->dio_it.key_size(env, it->lit_it);
263 }
264
265 /**
266  * Implementation of dt_it_ops::rec.
267  *
268  * Used with regular (non-striped) objects.
269  *
270  * \see dt_it_ops::rec() in the API description for details.
271  */
272 static int lod_it_rec(const struct lu_env *env, const struct dt_it *di,
273                       struct dt_rec *rec, __u32 attr)
274 {
275         const struct lod_it *it = (const struct lod_it *)di;
276
277         LOD_CHECK_IT(env, it);
278         return it->lit_obj->do_index_ops->dio_it.rec(env, it->lit_it, rec,
279                                                      attr);
280 }
281
282 /**
283  * Implementation of dt_it_ops::rec_size.
284  *
285  * Used with regular (non-striped) objects.
286  *
287  * \see dt_it_ops::rec_size() in the API description for details.
288  */
289 static int lod_it_rec_size(const struct lu_env *env, const struct dt_it *di,
290                            __u32 attr)
291 {
292         const struct lod_it *it = (const struct lod_it *)di;
293
294         LOD_CHECK_IT(env, it);
295         return it->lit_obj->do_index_ops->dio_it.rec_size(env, it->lit_it,
296                                                           attr);
297 }
298
299 /**
300  * Implementation of dt_it_ops::store.
301  *
302  * Used with regular (non-striped) objects.
303  *
304  * \see dt_it_ops::store() in the API description for details.
305  */
306 static __u64 lod_it_store(const struct lu_env *env, const struct dt_it *di)
307 {
308         const struct lod_it *it = (const struct lod_it *)di;
309
310         LOD_CHECK_IT(env, it);
311         return it->lit_obj->do_index_ops->dio_it.store(env, it->lit_it);
312 }
313
314 /**
315  * Implementation of dt_it_ops::load.
316  *
317  * Used with regular (non-striped) objects.
318  *
319  * \see dt_it_ops::load() in the API description for details.
320  */
321 static int lod_it_load(const struct lu_env *env, const struct dt_it *di,
322                        __u64 hash)
323 {
324         const struct lod_it *it = (const struct lod_it *)di;
325
326         LOD_CHECK_IT(env, it);
327         return it->lit_obj->do_index_ops->dio_it.load(env, it->lit_it, hash);
328 }
329
330 /**
331  * Implementation of dt_it_ops::key_rec.
332  *
333  * Used with regular (non-striped) objects.
334  *
335  * \see dt_it_ops::rec() in the API description for details.
336  */
337 static int lod_it_key_rec(const struct lu_env *env, const struct dt_it *di,
338                           void *key_rec)
339 {
340         const struct lod_it *it = (const struct lod_it *)di;
341
342         LOD_CHECK_IT(env, it);
343         return it->lit_obj->do_index_ops->dio_it.key_rec(env, it->lit_it,
344                                                          key_rec);
345 }
346
347 static const struct dt_index_operations lod_index_ops = {
348         .dio_lookup             = lod_lookup,
349         .dio_declare_insert     = lod_declare_insert,
350         .dio_insert             = lod_insert,
351         .dio_declare_delete     = lod_declare_delete,
352         .dio_delete             = lod_delete,
353         .dio_it = {
354                 .init           = lod_it_init,
355                 .fini           = lod_it_fini,
356                 .get            = lod_it_get,
357                 .put            = lod_it_put,
358                 .next           = lod_it_next,
359                 .key            = lod_it_key,
360                 .key_size       = lod_it_key_size,
361                 .rec            = lod_it_rec,
362                 .rec_size       = lod_it_rec_size,
363                 .store          = lod_it_store,
364                 .load           = lod_it_load,
365                 .key_rec        = lod_it_key_rec,
366         }
367 };
368
369 /**
370  * Implementation of dt_index_operations::dio_lookup
371  *
372  * Used with striped directories.
373  *
374  * \see dt_index_operations::dio_lookup() in the API description for details.
375  */
376 static int lod_striped_lookup(const struct lu_env *env, struct dt_object *dt,
377                       struct dt_rec *rec, const struct dt_key *key)
378 {
379         struct lod_object *lo = lod_dt_obj(dt);
380         struct dt_object *next;
381         const char *name = (const char *)key;
382
383         LASSERT(lo->ldo_dir_stripe_count > 0);
384
385         if (strcmp(name, dot) == 0) {
386                 struct lu_fid *fid = (struct lu_fid *)rec;
387
388                 *fid = *lod_object_fid(lo);
389                 return 1;
390         }
391
392         if (strcmp(name, dotdot) == 0) {
393                 next = dt_object_child(dt);
394         } else {
395                 int index;
396
397                 index = __lmv_name_to_stripe_index(lo->ldo_dir_hash_type,
398                                                    lo->ldo_dir_stripe_count,
399                                                    lo->ldo_dir_migrate_hash,
400                                                    lo->ldo_dir_migrate_offset,
401                                                    name, strlen(name), true);
402                 if (index < 0)
403                         return index;
404
405                 next = lo->ldo_stripe[index];
406                 if (!next || !dt_object_exists(next))
407                         return -ENODEV;
408         }
409
410         return next->do_index_ops->dio_lookup(env, next, rec, key);
411 }
412
413 /**
414  * Implementation of dt_it_ops::init.
415  *
416  * Used with striped objects. Internally just initializes the iterator
417  * on the first stripe.
418  *
419  * \see dt_it_ops::init() in the API description for details.
420  */
421 static struct dt_it *lod_striped_it_init(const struct lu_env *env,
422                                          struct dt_object *dt, __u32 attr)
423 {
424         struct lod_object *lo = lod_dt_obj(dt);
425         struct dt_object *next;
426         struct lod_it *it = &lod_env_info(env)->lti_it;
427         struct dt_it *it_next;
428         __u16 index = 0;
429
430         LASSERT(lo->ldo_dir_stripe_count > 0);
431
432         do {
433                 next = lo->ldo_stripe[index];
434                 if (next && dt_object_exists(next))
435                         break;
436         } while (++index < lo->ldo_dir_stripe_count);
437
438         /* no valid stripe */
439         if (!next || !dt_object_exists(next))
440                 return ERR_PTR(-ENODEV);
441
442         LASSERT(next->do_index_ops != NULL);
443
444         it_next = next->do_index_ops->dio_it.init(env, next, attr);
445         if (IS_ERR(it_next))
446                 return it_next;
447
448         /* currently we do not use more than one iterator per thread
449          * so we store it in thread info. if at some point we need
450          * more active iterators in a single thread, we can allocate
451          * additional ones */
452         LASSERT(it->lit_obj == NULL);
453
454         it->lit_stripe_index = index;
455         it->lit_attr = attr;
456         it->lit_it = it_next;
457         it->lit_obj = dt;
458
459         return (struct dt_it *)it;
460 }
461
462 #define LOD_CHECK_STRIPED_IT(env, it, lo)                               \
463 do {                                                                    \
464         LASSERT((it)->lit_obj != NULL);                                 \
465         LASSERT((it)->lit_it != NULL);                                  \
466         LASSERT((lo)->ldo_dir_stripe_count > 0);                        \
467         LASSERT((it)->lit_stripe_index < (lo)->ldo_dir_stripe_count);   \
468 } while (0)
469
470 /**
471  * Implementation of dt_it_ops::fini.
472  *
473  * Used with striped objects.
474  *
475  * \see dt_it_ops::fini() in the API description for details.
476  */
477 static void lod_striped_it_fini(const struct lu_env *env, struct dt_it *di)
478 {
479         struct lod_it           *it = (struct lod_it *)di;
480         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
481         struct dt_object        *next;
482
483         /* If lit_it == NULL, then it means the sub_it has been finished,
484          * which only happens in failure cases, see lod_striped_it_next() */
485         if (it->lit_it != NULL) {
486                 LOD_CHECK_STRIPED_IT(env, it, lo);
487
488                 next = lo->ldo_stripe[it->lit_stripe_index];
489                 if (next) {
490                         LASSERT(next->do_index_ops != NULL);
491                         next->do_index_ops->dio_it.fini(env, it->lit_it);
492                 }
493         }
494
495         /* the iterator not in use any more */
496         it->lit_obj = NULL;
497         it->lit_it = NULL;
498         it->lit_stripe_index = 0;
499 }
500
501 /**
502  * Implementation of dt_it_ops::get.
503  *
504  * Right now it's not used widely, only to reset the iterator to the
505  * initial position. It should be possible to implement a full version
506  * which chooses a correct stripe to be able to position with any key.
507  *
508  * \see dt_it_ops::get() in the API description for details.
509  */
510 static int lod_striped_it_get(const struct lu_env *env, struct dt_it *di,
511                               const struct dt_key *key)
512 {
513         const struct lod_it *it = (const struct lod_it *)di;
514         struct lod_object *lo = lod_dt_obj(it->lit_obj);
515         struct dt_object *next;
516
517         LOD_CHECK_STRIPED_IT(env, it, lo);
518
519         next = lo->ldo_stripe[it->lit_stripe_index];
520         LASSERT(next != NULL);
521         LASSERT(dt_object_exists(next));
522         LASSERT(next->do_index_ops != NULL);
523
524         return next->do_index_ops->dio_it.get(env, it->lit_it, key);
525 }
526
527 /**
528  * Implementation of dt_it_ops::put.
529  *
530  * Used with striped objects.
531  *
532  * \see dt_it_ops::put() in the API description for details.
533  */
534 static void lod_striped_it_put(const struct lu_env *env, struct dt_it *di)
535 {
536         struct lod_it *it = (struct lod_it *)di;
537         struct lod_object *lo = lod_dt_obj(it->lit_obj);
538         struct dt_object *next;
539
540         /*
541          * If lit_it == NULL, then it means the sub_it has been finished,
542          * which only happens in failure cases, see lod_striped_it_next()
543          */
544         if (!it->lit_it)
545                 return;
546
547         LOD_CHECK_STRIPED_IT(env, it, lo);
548
549         next = lo->ldo_stripe[it->lit_stripe_index];
550         LASSERT(next != NULL);
551         LASSERT(next->do_index_ops != NULL);
552
553         return next->do_index_ops->dio_it.put(env, it->lit_it);
554 }
555
556 /**
557  * Implementation of dt_it_ops::next.
558  *
559  * Used with striped objects. When the end of the current stripe is
560  * reached, the method takes the next stripe's iterator.
561  *
562  * \see dt_it_ops::next() in the API description for details.
563  */
564 static int lod_striped_it_next(const struct lu_env *env, struct dt_it *di)
565 {
566         struct lod_it *it = (struct lod_it *)di;
567         struct lod_object *lo = lod_dt_obj(it->lit_obj);
568         struct dt_object *next;
569         struct dt_it *it_next;
570         __u32 index;
571         int rc;
572
573         ENTRY;
574
575         LOD_CHECK_STRIPED_IT(env, it, lo);
576
577         next = lo->ldo_stripe[it->lit_stripe_index];
578         LASSERT(next != NULL);
579         LASSERT(dt_object_exists(next));
580         LASSERT(next->do_index_ops != NULL);
581 again:
582         rc = next->do_index_ops->dio_it.next(env, it->lit_it);
583         if (rc < 0)
584                 RETURN(rc);
585
586         if (rc == 0 && it->lit_stripe_index == 0)
587                 RETURN(rc);
588
589         if (rc == 0 && it->lit_stripe_index > 0) {
590                 struct lu_dirent *ent;
591
592                 ent = (struct lu_dirent *)lod_env_info(env)->lti_key;
593
594                 rc = next->do_index_ops->dio_it.rec(env, it->lit_it,
595                                                     (struct dt_rec *)ent,
596                                                     it->lit_attr);
597                 if (rc != 0)
598                         RETURN(rc);
599
600                 /* skip . and .. for slave stripe */
601                 if ((strncmp(ent->lde_name, ".",
602                              le16_to_cpu(ent->lde_namelen)) == 0 &&
603                      le16_to_cpu(ent->lde_namelen) == 1) ||
604                     (strncmp(ent->lde_name, "..",
605                              le16_to_cpu(ent->lde_namelen)) == 0 &&
606                      le16_to_cpu(ent->lde_namelen) == 2))
607                         goto again;
608
609                 RETURN(rc);
610         }
611
612         next->do_index_ops->dio_it.put(env, it->lit_it);
613         next->do_index_ops->dio_it.fini(env, it->lit_it);
614         it->lit_it = NULL;
615
616         /* go to next stripe */
617         index = it->lit_stripe_index;
618         while (++index < lo->ldo_dir_stripe_count) {
619                 next = lo->ldo_stripe[index];
620                 if (!next)
621                         continue;
622
623                 if (!dt_object_exists(next))
624                         continue;
625
626                 rc = next->do_ops->do_index_try(env, next,
627                                                 &dt_directory_features);
628                 if (rc != 0)
629                         RETURN(rc);
630
631                 LASSERT(next->do_index_ops != NULL);
632
633                 it_next = next->do_index_ops->dio_it.init(env, next,
634                                                           it->lit_attr);
635                 if (IS_ERR(it_next))
636                         RETURN(PTR_ERR(it_next));
637
638                 rc = next->do_index_ops->dio_it.get(env, it_next,
639                                                     (const struct dt_key *)"");
640                 if (rc <= 0)
641                         RETURN(rc == 0 ? -EIO : rc);
642
643                 it->lit_it = it_next;
644                 it->lit_stripe_index = index;
645                 goto again;
646
647         }
648
649         RETURN(1);
650 }
651
652 /**
653  * Implementation of dt_it_ops::key.
654  *
655  * Used with striped objects.
656  *
657  * \see dt_it_ops::key() in the API description for details.
658  */
659 static struct dt_key *lod_striped_it_key(const struct lu_env *env,
660                                          const struct dt_it *di)
661 {
662         const struct lod_it     *it = (const struct lod_it *)di;
663         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
664         struct dt_object        *next;
665
666         LOD_CHECK_STRIPED_IT(env, it, lo);
667
668         next = lo->ldo_stripe[it->lit_stripe_index];
669         LASSERT(next != NULL);
670         LASSERT(next->do_index_ops != NULL);
671
672         return next->do_index_ops->dio_it.key(env, it->lit_it);
673 }
674
675 /**
676  * Implementation of dt_it_ops::key_size.
677  *
678  * Used with striped objects.
679  *
680  * \see dt_it_ops::size() in the API description for details.
681  */
682 static int lod_striped_it_key_size(const struct lu_env *env,
683                                    const struct dt_it *di)
684 {
685         struct lod_it           *it = (struct lod_it *)di;
686         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
687         struct dt_object        *next;
688
689         LOD_CHECK_STRIPED_IT(env, it, lo);
690
691         next = lo->ldo_stripe[it->lit_stripe_index];
692         LASSERT(next != NULL);
693         LASSERT(next->do_index_ops != NULL);
694
695         return next->do_index_ops->dio_it.key_size(env, it->lit_it);
696 }
697
698 /**
699  * Implementation of dt_it_ops::rec.
700  *
701  * Used with striped objects.
702  *
703  * \see dt_it_ops::rec() in the API description for details.
704  */
705 static int lod_striped_it_rec(const struct lu_env *env, const struct dt_it *di,
706                               struct dt_rec *rec, __u32 attr)
707 {
708         const struct lod_it     *it = (const struct lod_it *)di;
709         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
710         struct dt_object        *next;
711
712         LOD_CHECK_STRIPED_IT(env, it, lo);
713
714         next = lo->ldo_stripe[it->lit_stripe_index];
715         LASSERT(next != NULL);
716         LASSERT(next->do_index_ops != NULL);
717
718         return next->do_index_ops->dio_it.rec(env, it->lit_it, rec, attr);
719 }
720
721 /**
722  * Implementation of dt_it_ops::rec_size.
723  *
724  * Used with striped objects.
725  *
726  * \see dt_it_ops::rec_size() in the API description for details.
727  */
728 static int lod_striped_it_rec_size(const struct lu_env *env,
729                                    const struct dt_it *di, __u32 attr)
730 {
731         struct lod_it           *it = (struct lod_it *)di;
732         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
733         struct dt_object        *next;
734
735         LOD_CHECK_STRIPED_IT(env, it, lo);
736
737         next = lo->ldo_stripe[it->lit_stripe_index];
738         LASSERT(next != NULL);
739         LASSERT(next->do_index_ops != NULL);
740
741         return next->do_index_ops->dio_it.rec_size(env, it->lit_it, attr);
742 }
743
744 /**
745  * Implementation of dt_it_ops::store.
746  *
747  * Used with striped objects.
748  *
749  * \see dt_it_ops::store() in the API description for details.
750  */
751 static __u64 lod_striped_it_store(const struct lu_env *env,
752                                   const struct dt_it *di)
753 {
754         const struct lod_it     *it = (const struct lod_it *)di;
755         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
756         struct dt_object        *next;
757
758         LOD_CHECK_STRIPED_IT(env, it, lo);
759
760         next = lo->ldo_stripe[it->lit_stripe_index];
761         LASSERT(next != NULL);
762         LASSERT(next->do_index_ops != NULL);
763
764         return next->do_index_ops->dio_it.store(env, it->lit_it);
765 }
766
767 /**
768  * Implementation of dt_it_ops::load.
769  *
770  * Used with striped objects.
771  *
772  * \see dt_it_ops::load() in the API description for details.
773  */
774 static int lod_striped_it_load(const struct lu_env *env,
775                                const struct dt_it *di, __u64 hash)
776 {
777         const struct lod_it     *it = (const struct lod_it *)di;
778         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
779         struct dt_object        *next;
780
781         LOD_CHECK_STRIPED_IT(env, it, lo);
782
783         next = lo->ldo_stripe[it->lit_stripe_index];
784         LASSERT(next != NULL);
785         LASSERT(next->do_index_ops != NULL);
786
787         return next->do_index_ops->dio_it.load(env, it->lit_it, hash);
788 }
789
790 static const struct dt_index_operations lod_striped_index_ops = {
791         .dio_lookup             = lod_striped_lookup,
792         .dio_declare_insert     = lod_declare_insert,
793         .dio_insert             = lod_insert,
794         .dio_declare_delete     = lod_declare_delete,
795         .dio_delete             = lod_delete,
796         .dio_it = {
797                 .init           = lod_striped_it_init,
798                 .fini           = lod_striped_it_fini,
799                 .get            = lod_striped_it_get,
800                 .put            = lod_striped_it_put,
801                 .next           = lod_striped_it_next,
802                 .key            = lod_striped_it_key,
803                 .key_size       = lod_striped_it_key_size,
804                 .rec            = lod_striped_it_rec,
805                 .rec_size       = lod_striped_it_rec_size,
806                 .store          = lod_striped_it_store,
807                 .load           = lod_striped_it_load,
808         }
809 };
810
811 /**
812  * Append the FID for each shard of the striped directory after the
813  * given LMV EA header.
814  *
815  * To simplify striped directory and the consistency verification,
816  * we only store the LMV EA header on disk, for both master object
817  * and slave objects. When someone wants to know the whole LMV EA,
818  * such as client readdir(), we can build the entrie LMV EA on the
819  * MDT side (in RAM) via iterating the sub-directory entries that
820  * are contained in the master object of the stripe directory.
821  *
822  * For the master object of the striped directroy, the valid name
823  * for each shard is composed of the ${shard_FID}:${shard_idx}.
824  *
825  * There may be holes in the LMV EA if some shards' name entries
826  * are corrupted or lost.
827  *
828  * \param[in] env       pointer to the thread context
829  * \param[in] lo        pointer to the master object of the striped directory
830  * \param[in] buf       pointer to the lu_buf which will hold the LMV EA
831  * \param[in] resize    whether re-allocate the buffer if it is not big enough
832  *
833  * \retval              positive size of the LMV EA
834  * \retval              0 for nothing to be loaded
835  * \retval              negative error number on failure
836  */
837 int lod_load_lmv_shards(const struct lu_env *env, struct lod_object *lo,
838                         struct lu_buf *buf, bool resize)
839 {
840         struct lu_dirent        *ent    =
841                         (struct lu_dirent *)lod_env_info(env)->lti_key;
842         struct lod_device       *lod    = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
843         struct dt_object        *obj    = dt_object_child(&lo->ldo_obj);
844         struct lmv_mds_md_v1    *lmv1   = buf->lb_buf;
845         struct dt_it            *it;
846         const struct dt_it_ops  *iops;
847         __u32                    stripes;
848         __u32                    magic  = le32_to_cpu(lmv1->lmv_magic);
849         size_t                   lmv1_size;
850         int                      rc;
851         ENTRY;
852
853         if (magic != LMV_MAGIC_V1)
854                 RETURN(0);
855
856         stripes = le32_to_cpu(lmv1->lmv_stripe_count);
857         if (stripes < 1)
858                 RETURN(0);
859
860         rc = lmv_mds_md_size(stripes, magic);
861         if (rc < 0)
862                 RETURN(rc);
863         lmv1_size = rc;
864         if (buf->lb_len < lmv1_size) {
865                 struct lu_buf tbuf;
866
867                 if (!resize)
868                         RETURN(-ERANGE);
869
870                 tbuf = *buf;
871                 buf->lb_buf = NULL;
872                 buf->lb_len = 0;
873                 lu_buf_alloc(buf, lmv1_size);
874                 lmv1 = buf->lb_buf;
875                 if (lmv1 == NULL)
876                         RETURN(-ENOMEM);
877
878                 memcpy(buf->lb_buf, tbuf.lb_buf, tbuf.lb_len);
879         }
880
881         if (unlikely(!dt_try_as_dir(env, obj)))
882                 RETURN(-ENOTDIR);
883
884         memset(&lmv1->lmv_stripe_fids[0], 0, stripes * sizeof(struct lu_fid));
885         iops = &obj->do_index_ops->dio_it;
886         it = iops->init(env, obj, LUDA_64BITHASH);
887         if (IS_ERR(it))
888                 RETURN(PTR_ERR(it));
889
890         rc = iops->load(env, it, 0);
891         if (rc == 0)
892                 rc = iops->next(env, it);
893         else if (rc > 0)
894                 rc = 0;
895
896         while (rc == 0) {
897                 char             name[FID_LEN + 2] = "";
898                 struct lu_fid    fid;
899                 __u32            index;
900                 int              len;
901
902                 rc = iops->rec(env, it, (struct dt_rec *)ent, LUDA_64BITHASH);
903                 if (rc != 0)
904                         break;
905
906                 rc = -EIO;
907
908                 fid_le_to_cpu(&fid, &ent->lde_fid);
909                 ent->lde_namelen = le16_to_cpu(ent->lde_namelen);
910                 if (ent->lde_name[0] == '.') {
911                         if (ent->lde_namelen == 1)
912                                 goto next;
913
914                         if (ent->lde_namelen == 2 && ent->lde_name[1] == '.')
915                                 goto next;
916                 }
917
918                 len = scnprintf(name, sizeof(name),
919                                 DFID":", PFID(&ent->lde_fid));
920                 /* The ent->lde_name is composed of ${FID}:${index} */
921                 if (ent->lde_namelen < len + 1 ||
922                     memcmp(ent->lde_name, name, len) != 0) {
923                         CDEBUG_LIMIT(lod->lod_lmv_failout ? D_ERROR : D_INFO,
924                                      "%s: invalid shard name %.*s with the FID "DFID" for the striped directory "DFID", %s\n",
925                                      lod2obd(lod)->obd_name, ent->lde_namelen,
926                                      ent->lde_name, PFID(&fid),
927                                      PFID(lu_object_fid(&obj->do_lu)),
928                                      lod->lod_lmv_failout ? "failout" : "skip");
929
930                         if (lod->lod_lmv_failout)
931                                 break;
932
933                         goto next;
934                 }
935
936                 index = 0;
937                 do {
938                         if (ent->lde_name[len] < '0' ||
939                             ent->lde_name[len] > '9') {
940                                 CDEBUG_LIMIT(lod->lod_lmv_failout ?
941                                              D_ERROR : D_INFO,
942                                              "%s: invalid shard name %.*s with the FID "DFID" for the striped directory "DFID", %s\n",
943                                              lod2obd(lod)->obd_name,
944                                              ent->lde_namelen,
945                                              ent->lde_name, PFID(&fid),
946                                              PFID(lu_object_fid(&obj->do_lu)),
947                                              lod->lod_lmv_failout ?
948                                              "failout" : "skip");
949
950                                 if (lod->lod_lmv_failout)
951                                         break;
952
953                                 goto next;
954                         }
955
956                         index = index * 10 + ent->lde_name[len++] - '0';
957                 } while (len < ent->lde_namelen);
958
959                 if (len == ent->lde_namelen) {
960                         /* Out of LMV EA range. */
961                         if (index >= stripes) {
962                                 CERROR("%s: the shard %.*s for the striped "
963                                        "directory "DFID" is out of the known "
964                                        "LMV EA range [0 - %u], failout\n",
965                                        lod2obd(lod)->obd_name, ent->lde_namelen,
966                                        ent->lde_name,
967                                        PFID(lu_object_fid(&obj->do_lu)),
968                                        stripes - 1);
969
970                                 break;
971                         }
972
973                         /* The slot has been occupied. */
974                         if (!fid_is_zero(&lmv1->lmv_stripe_fids[index])) {
975                                 struct lu_fid fid0;
976
977                                 fid_le_to_cpu(&fid0,
978                                         &lmv1->lmv_stripe_fids[index]);
979                                 CERROR("%s: both the shard "DFID" and "DFID
980                                        " for the striped directory "DFID
981                                        " claim the same LMV EA slot at the "
982                                        "index %d, failout\n",
983                                        lod2obd(lod)->obd_name,
984                                        PFID(&fid0), PFID(&fid),
985                                        PFID(lu_object_fid(&obj->do_lu)), index);
986
987                                 break;
988                         }
989
990                         /* stored as LE mode */
991                         lmv1->lmv_stripe_fids[index] = ent->lde_fid;
992
993 next:
994                         rc = iops->next(env, it);
995                 }
996         }
997
998         iops->put(env, it);
999         iops->fini(env, it);
1000
1001         RETURN(rc > 0 ? lmv_mds_md_size(stripes, magic) : rc);
1002 }
1003
1004 /**
1005  * Implementation of dt_object_operations::do_index_try.
1006  *
1007  * \see dt_object_operations::do_index_try() in the API description for details.
1008  */
1009 static int lod_index_try(const struct lu_env *env, struct dt_object *dt,
1010                          const struct dt_index_features *feat)
1011 {
1012         struct lod_object       *lo = lod_dt_obj(dt);
1013         struct dt_object        *next = dt_object_child(dt);
1014         int                     rc;
1015         ENTRY;
1016
1017         LASSERT(next->do_ops);
1018         LASSERT(next->do_ops->do_index_try);
1019
1020         rc = lod_striping_load(env, lo);
1021         if (rc != 0)
1022                 RETURN(rc);
1023
1024         rc = next->do_ops->do_index_try(env, next, feat);
1025         if (rc != 0)
1026                 RETURN(rc);
1027
1028         if (lo->ldo_dir_stripe_count > 0) {
1029                 int i;
1030
1031                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1032                         if (!lo->ldo_stripe[i])
1033                                 continue;
1034                         if (!dt_object_exists(lo->ldo_stripe[i]))
1035                                 continue;
1036                         rc = lo->ldo_stripe[i]->do_ops->do_index_try(env,
1037                                                 lo->ldo_stripe[i], feat);
1038                         if (rc != 0)
1039                                 RETURN(rc);
1040                 }
1041                 dt->do_index_ops = &lod_striped_index_ops;
1042         } else {
1043                 dt->do_index_ops = &lod_index_ops;
1044         }
1045
1046         RETURN(rc);
1047 }
1048
1049 /**
1050  * Implementation of dt_object_operations::do_read_lock.
1051  *
1052  * \see dt_object_operations::do_read_lock() in the API description for details.
1053  */
1054 static void lod_read_lock(const struct lu_env *env, struct dt_object *dt,
1055                           unsigned role)
1056 {
1057         dt_read_lock(env, dt_object_child(dt), role);
1058 }
1059
1060 /**
1061  * Implementation of dt_object_operations::do_write_lock.
1062  *
1063  * \see dt_object_operations::do_write_lock() in the API description for
1064  * details.
1065  */
1066 static void lod_write_lock(const struct lu_env *env, struct dt_object *dt,
1067                            unsigned role)
1068 {
1069         dt_write_lock(env, dt_object_child(dt), role);
1070 }
1071
1072 /**
1073  * Implementation of dt_object_operations::do_read_unlock.
1074  *
1075  * \see dt_object_operations::do_read_unlock() in the API description for
1076  * details.
1077  */
1078 static void lod_read_unlock(const struct lu_env *env, struct dt_object *dt)
1079 {
1080         dt_read_unlock(env, dt_object_child(dt));
1081 }
1082
1083 /**
1084  * Implementation of dt_object_operations::do_write_unlock.
1085  *
1086  * \see dt_object_operations::do_write_unlock() in the API description for
1087  * details.
1088  */
1089 static void lod_write_unlock(const struct lu_env *env, struct dt_object *dt)
1090 {
1091         dt_write_unlock(env, dt_object_child(dt));
1092 }
1093
1094 /**
1095  * Implementation of dt_object_operations::do_write_locked.
1096  *
1097  * \see dt_object_operations::do_write_locked() in the API description for
1098  * details.
1099  */
1100 static int lod_write_locked(const struct lu_env *env, struct dt_object *dt)
1101 {
1102         return dt_write_locked(env, dt_object_child(dt));
1103 }
1104
1105 /**
1106  * Implementation of dt_object_operations::do_attr_get.
1107  *
1108  * \see dt_object_operations::do_attr_get() in the API description for details.
1109  */
1110 static int lod_attr_get(const struct lu_env *env,
1111                         struct dt_object *dt,
1112                         struct lu_attr *attr)
1113 {
1114         /* Note: for striped directory, client will merge attributes
1115          * from all of the sub-stripes see lmv_merge_attr(), and there
1116          * no MDD logic depend on directory nlink/size/time, so we can
1117          * always use master inode nlink and size for now. */
1118         return dt_attr_get(env, dt_object_child(dt), attr);
1119 }
1120
1121 void lod_adjust_stripe_size(struct lod_layout_component *comp,
1122                             __u32 def_stripe_size)
1123 {
1124         __u64 comp_end = comp->llc_extent.e_end;
1125
1126         /* Choose stripe size if not set. Note that default stripe size can't
1127          * be used as is, because it must be multiplier of given component end.
1128          *  - first check if default stripe size can be used
1129          *  - if not than select the lowest set bit from component end and use
1130          *    that value as stripe size
1131          */
1132         if (!comp->llc_stripe_size) {
1133                 if (comp_end == LUSTRE_EOF || !(comp_end % def_stripe_size))
1134                         comp->llc_stripe_size = def_stripe_size;
1135                 else
1136                         comp->llc_stripe_size = comp_end & ~(comp_end - 1);
1137         } else {
1138                 if (comp_end != LUSTRE_EOF &&
1139                     comp_end & (LOV_MIN_STRIPE_SIZE - 1)) {
1140                         CWARN("Component end %llu is not a multiple of min size %u\n",
1141                               comp_end, LOV_MIN_STRIPE_SIZE);
1142                         comp_end = round_up(comp_end, LOV_MIN_STRIPE_SIZE);
1143                 }
1144                 /* check stripe size is multiplier of comp_end */
1145                 if (comp_end != LUSTRE_EOF &&
1146                     comp_end != comp->llc_extent.e_start &&
1147                     comp_end % comp->llc_stripe_size) {
1148                         /* fix that even for defined stripe size but warn
1149                          * about the problem, that must not happen
1150                          */
1151                         CWARN("Component end %llu is not aligned by the stripe size %u\n",
1152                               comp_end, comp->llc_stripe_size);
1153                         comp->llc_stripe_size = comp_end & ~(comp_end - 1);
1154                 }
1155         }
1156 }
1157
1158 static inline void lod_adjust_stripe_info(struct lod_layout_component *comp,
1159                                           struct lov_desc *desc,
1160                                           int append_stripes)
1161 {
1162         if (comp->llc_pattern != LOV_PATTERN_MDT) {
1163                 if (append_stripes) {
1164                         comp->llc_stripe_count = append_stripes;
1165                 } else if (!comp->llc_stripe_count) {
1166                         comp->llc_stripe_count =
1167                                 desc->ld_default_stripe_count;
1168                 }
1169         }
1170
1171         lod_adjust_stripe_size(comp, desc->ld_default_stripe_size);
1172 }
1173
1174 int lod_obj_for_each_stripe(const struct lu_env *env, struct lod_object *lo,
1175                             struct thandle *th,
1176                             struct lod_obj_stripe_cb_data *data)
1177 {
1178         struct lod_layout_component *lod_comp;
1179         int i, j, rc = 0;
1180         ENTRY;
1181
1182         mutex_lock(&lo->ldo_layout_mutex);
1183         for (i = 0; i < lo->ldo_comp_cnt; i++) {
1184                 lod_comp = &lo->ldo_comp_entries[i];
1185
1186                 if (lod_comp->llc_stripe == NULL)
1187                         continue;
1188
1189                 /* has stripe but not inited yet, this component has been
1190                  * declared to be created, but hasn't created yet.
1191                  */
1192                 if (!lod_comp_inited(lod_comp))
1193                         continue;
1194
1195                 if (data->locd_comp_skip_cb &&
1196                     data->locd_comp_skip_cb(env, lo, i, data))
1197                         continue;
1198
1199                 if (data->locd_comp_cb) {
1200                         rc = data->locd_comp_cb(env, lo, i, data);
1201                         if (rc)
1202                                 GOTO(unlock, rc);
1203                 }
1204
1205                 /* could used just to do sth about component, not each
1206                  * stripes
1207                  */
1208                 if (!data->locd_stripe_cb)
1209                         continue;
1210
1211                 LASSERT(lod_comp->llc_stripe_count > 0);
1212                 for (j = 0; j < lod_comp->llc_stripe_count; j++) {
1213                         struct dt_object *dt = lod_comp->llc_stripe[j];
1214
1215                         if (dt == NULL)
1216                                 continue;
1217                         rc = data->locd_stripe_cb(env, lo, dt, th, i, j, data);
1218                         if (rc != 0)
1219                                 GOTO(unlock, rc);
1220                 }
1221         }
1222 unlock:
1223         mutex_unlock(&lo->ldo_layout_mutex);
1224         RETURN(rc);
1225 }
1226
1227 static bool lod_obj_attr_set_comp_skip_cb(const struct lu_env *env,
1228                 struct lod_object *lo, int comp_idx,
1229                 struct lod_obj_stripe_cb_data *data)
1230 {
1231         struct lod_layout_component *lod_comp = &lo->ldo_comp_entries[comp_idx];
1232         bool skipped = false;
1233
1234         if (!(data->locd_attr->la_valid & LA_LAYOUT_VERSION))
1235                 return skipped;
1236
1237         switch (lo->ldo_flr_state) {
1238         case LCM_FL_WRITE_PENDING: {
1239                 int i;
1240
1241                 /* skip stale components */
1242                 if (lod_comp->llc_flags & LCME_FL_STALE) {
1243                         skipped = true;
1244                         break;
1245                 }
1246
1247                 /* skip valid and overlapping components, therefore any
1248                  * attempts to write overlapped components will never succeed
1249                  * because client will get EINPROGRESS. */
1250                 for (i = 0; i < lo->ldo_comp_cnt; i++) {
1251                         if (i == comp_idx)
1252                                 continue;
1253
1254                         if (lo->ldo_comp_entries[i].llc_flags & LCME_FL_STALE)
1255                                 continue;
1256
1257                         if (lu_extent_is_overlapped(&lod_comp->llc_extent,
1258                                         &lo->ldo_comp_entries[i].llc_extent)) {
1259                                 skipped = true;
1260                                 break;
1261                         }
1262                 }
1263                 break;
1264         }
1265         case LCM_FL_RDONLY:
1266         case LCM_FL_SYNC_PENDING:
1267                 break;
1268         default:
1269                 LASSERTF(0, "impossible: %d\n", lo->ldo_flr_state);
1270                 break;
1271         }
1272
1273         CDEBUG(D_LAYOUT, DFID": %s to set component %x to version: %u\n",
1274                PFID(lu_object_fid(&lo->ldo_obj.do_lu)),
1275                skipped ? "skipped" : "chose", lod_comp->llc_id,
1276                data->locd_attr->la_layout_version);
1277
1278         return skipped;
1279 }
1280
1281 static inline int
1282 lod_obj_stripe_attr_set_cb(const struct lu_env *env, struct lod_object *lo,
1283                            struct dt_object *dt, struct thandle *th,
1284                            int comp_idx, int stripe_idx,
1285                            struct lod_obj_stripe_cb_data *data)
1286 {
1287         if (data->locd_declare)
1288                 return lod_sub_declare_attr_set(env, dt, data->locd_attr, th);
1289
1290         if (data->locd_attr->la_valid & LA_LAYOUT_VERSION) {
1291                 CDEBUG(D_LAYOUT, DFID": set layout version: %u, comp_idx: %d\n",
1292                        PFID(lu_object_fid(&dt->do_lu)),
1293                        data->locd_attr->la_layout_version, comp_idx);
1294         }
1295
1296         return lod_sub_attr_set(env, dt, data->locd_attr, th);
1297 }
1298
1299 /**
1300  * Implementation of dt_object_operations::do_declare_attr_set.
1301  *
1302  * If the object is striped, then apply the changes to all the stripes.
1303  *
1304  * \see dt_object_operations::do_declare_attr_set() in the API description
1305  * for details.
1306  */
1307 static int lod_declare_attr_set(const struct lu_env *env,
1308                                 struct dt_object *dt,
1309                                 const struct lu_attr *attr,
1310                                 struct thandle *th)
1311 {
1312         struct dt_object  *next = dt_object_child(dt);
1313         struct lod_object *lo = lod_dt_obj(dt);
1314         int                rc, i;
1315         ENTRY;
1316
1317         /*
1318          * declare setattr on the local object
1319          */
1320         rc = lod_sub_declare_attr_set(env, next, attr, th);
1321         if (rc)
1322                 RETURN(rc);
1323
1324         /* osp_declare_attr_set() ignores all attributes other than
1325          * UID, GID, PROJID, and size, and osp_attr_set() ignores all
1326          * but UID, GID and PROJID. Declaration of size attr setting
1327          * happens through lod_declare_init_size(), and not through
1328          * this function. Therefore we need not load striping unless
1329          * ownership is changing.  This should save memory and (we hope)
1330          * speed up rename().
1331          */
1332         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1333                 if (!(attr->la_valid & LA_REMOTE_ATTR_SET))
1334                         RETURN(rc);
1335
1336                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1337                         RETURN(0);
1338         } else {
1339                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_PROJID | LA_MODE |
1340                                         LA_ATIME | LA_MTIME | LA_CTIME |
1341                                         LA_FLAGS)))
1342                         RETURN(rc);
1343         }
1344         /*
1345          * load striping information, notice we don't do this when object
1346          * is being initialized as we don't need this information till
1347          * few specific cases like destroy, chown
1348          */
1349         rc = lod_striping_load(env, lo);
1350         if (rc)
1351                 RETURN(rc);
1352
1353         if (!lod_obj_is_striped(dt))
1354                 RETURN(0);
1355
1356         /*
1357          * if object is striped declare changes on the stripes
1358          */
1359         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1360                 LASSERT(lo->ldo_stripe);
1361                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1362                         if (lo->ldo_stripe[i] == NULL)
1363                                 continue;
1364                         if (!dt_object_exists(lo->ldo_stripe[i]))
1365                                 continue;
1366                         rc = lod_sub_declare_attr_set(env, lo->ldo_stripe[i],
1367                                                       attr, th);
1368                         if (rc != 0)
1369                                 RETURN(rc);
1370                 }
1371         } else {
1372                 struct lod_obj_stripe_cb_data data = { { 0 } };
1373
1374                 data.locd_attr = attr;
1375                 data.locd_declare = true;
1376                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
1377                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
1378         }
1379
1380         if (rc)
1381                 RETURN(rc);
1382
1383         if (!dt_object_exists(next) || dt_object_remote(next) ||
1384             !S_ISREG(attr->la_mode))
1385                 RETURN(0);
1386
1387         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE)) {
1388                 rc = lod_sub_declare_xattr_del(env, next, XATTR_NAME_LOV, th);
1389                 RETURN(rc);
1390         }
1391
1392         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE) ||
1393             OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_PFL_RANGE)) {
1394                 struct lod_thread_info *info = lod_env_info(env);
1395                 struct lu_buf *buf = &info->lti_buf;
1396
1397                 buf->lb_buf = info->lti_ea_store;
1398                 buf->lb_len = info->lti_ea_store_size;
1399                 rc = lod_sub_declare_xattr_set(env, next, buf, XATTR_NAME_LOV,
1400                                                LU_XATTR_REPLACE, th);
1401         }
1402
1403         RETURN(rc);
1404 }
1405
1406 /**
1407  * Implementation of dt_object_operations::do_attr_set.
1408  *
1409  * If the object is striped, then apply the changes to all or subset of
1410  * the stripes depending on the object type and specific attributes.
1411  *
1412  * \see dt_object_operations::do_attr_set() in the API description for details.
1413  */
1414 static int lod_attr_set(const struct lu_env *env,
1415                         struct dt_object *dt,
1416                         const struct lu_attr *attr,
1417                         struct thandle *th)
1418 {
1419         struct dt_object        *next = dt_object_child(dt);
1420         struct lod_object       *lo = lod_dt_obj(dt);
1421         int                     rc, i;
1422         ENTRY;
1423
1424         /*
1425          * apply changes to the local object
1426          */
1427         rc = lod_sub_attr_set(env, next, attr, th);
1428         if (rc)
1429                 RETURN(rc);
1430
1431         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1432                 if (!(attr->la_valid & LA_REMOTE_ATTR_SET))
1433                         RETURN(rc);
1434
1435                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1436                         RETURN(0);
1437         } else {
1438                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_MODE | LA_PROJID |
1439                                         LA_ATIME | LA_MTIME | LA_CTIME |
1440                                         LA_FLAGS)))
1441                         RETURN(rc);
1442         }
1443
1444         /* FIXME: a tricky case in the code path of mdd_layout_change():
1445          * the in-memory striping information has been freed in lod_xattr_set()
1446          * due to layout change. It has to load stripe here again. It only
1447          * changes flags of layout so declare_attr_set() is still accurate */
1448         rc = lod_striping_load(env, lo);
1449         if (rc)
1450                 RETURN(rc);
1451
1452         if (!lod_obj_is_striped(dt))
1453                 RETURN(0);
1454
1455         /*
1456          * if object is striped, apply changes to all the stripes
1457          */
1458         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1459                 LASSERT(lo->ldo_stripe);
1460                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1461                         if (unlikely(lo->ldo_stripe[i] == NULL))
1462                                 continue;
1463
1464                         if ((dt_object_exists(lo->ldo_stripe[i]) == 0))
1465                                 continue;
1466
1467                         rc = lod_sub_attr_set(env, lo->ldo_stripe[i], attr, th);
1468                         if (rc != 0)
1469                                 break;
1470                 }
1471         } else {
1472                 struct lod_obj_stripe_cb_data data = { { 0 } };
1473
1474                 data.locd_attr = attr;
1475                 data.locd_declare = false;
1476                 data.locd_comp_skip_cb = lod_obj_attr_set_comp_skip_cb;
1477                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
1478                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
1479         }
1480
1481         if (rc)
1482                 RETURN(rc);
1483
1484         if (!dt_object_exists(next) || dt_object_remote(next) ||
1485             !S_ISREG(attr->la_mode))
1486                 RETURN(0);
1487
1488         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE)) {
1489                 rc = lod_sub_xattr_del(env, next, XATTR_NAME_LOV, th);
1490                 RETURN(rc);
1491         }
1492
1493         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE)) {
1494                 struct lod_thread_info *info = lod_env_info(env);
1495                 struct lu_buf *buf = &info->lti_buf;
1496                 struct ost_id *oi = &info->lti_ostid;
1497                 struct lu_fid *fid = &info->lti_fid;
1498                 struct lov_mds_md_v1 *lmm;
1499                 struct lov_ost_data_v1 *objs;
1500                 __u32 magic;
1501
1502                 rc = lod_get_lov_ea(env, lo);
1503                 if (rc <= 0)
1504                         RETURN(rc);
1505
1506                 buf->lb_buf = info->lti_ea_store;
1507                 buf->lb_len = info->lti_ea_store_size;
1508                 lmm = info->lti_ea_store;
1509                 magic = le32_to_cpu(lmm->lmm_magic);
1510                 if (magic == LOV_MAGIC_COMP_V1 || magic == LOV_MAGIC_SEL) {
1511                         struct lov_comp_md_v1 *lcm = buf->lb_buf;
1512                         struct lov_comp_md_entry_v1 *lcme =
1513                                                 &lcm->lcm_entries[0];
1514
1515                         lmm = buf->lb_buf + le32_to_cpu(lcme->lcme_offset);
1516                         magic = le32_to_cpu(lmm->lmm_magic);
1517                 }
1518
1519                 if (magic == LOV_MAGIC_V1)
1520                         objs = &(lmm->lmm_objects[0]);
1521                 else
1522                         objs = &((struct lov_mds_md_v3 *)lmm)->lmm_objects[0];
1523                 ostid_le_to_cpu(&objs->l_ost_oi, oi);
1524                 ostid_to_fid(fid, oi, le32_to_cpu(objs->l_ost_idx));
1525                 fid->f_oid--;
1526                 fid_to_ostid(fid, oi);
1527                 ostid_cpu_to_le(oi, &objs->l_ost_oi);
1528
1529                 rc = lod_sub_xattr_set(env, next, buf, XATTR_NAME_LOV,
1530                                        LU_XATTR_REPLACE, th);
1531         } else if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_PFL_RANGE)) {
1532                 struct lod_thread_info *info = lod_env_info(env);
1533                 struct lu_buf *buf = &info->lti_buf;
1534                 struct lov_comp_md_v1 *lcm;
1535                 struct lov_comp_md_entry_v1 *lcme;
1536
1537                 rc = lod_get_lov_ea(env, lo);
1538                 if (rc <= 0)
1539                         RETURN(rc);
1540
1541                 buf->lb_buf = info->lti_ea_store;
1542                 buf->lb_len = info->lti_ea_store_size;
1543                 lcm = buf->lb_buf;
1544                 if (le32_to_cpu(lcm->lcm_magic) != LOV_MAGIC_COMP_V1 &&
1545                     le32_to_cpu(lcm->lcm_magic) != LOV_MAGIC_SEL)
1546                         RETURN(-EINVAL);
1547
1548                 le32_add_cpu(&lcm->lcm_layout_gen, 1);
1549                 lcme = &lcm->lcm_entries[0];
1550                 le64_add_cpu(&lcme->lcme_extent.e_start, 1);
1551                 le64_add_cpu(&lcme->lcme_extent.e_end, -1);
1552
1553                 rc = lod_sub_xattr_set(env, next, buf, XATTR_NAME_LOV,
1554                                        LU_XATTR_REPLACE, th);
1555         }
1556
1557         RETURN(rc);
1558 }
1559
1560 /**
1561  * Implementation of dt_object_operations::do_xattr_get.
1562  *
1563  * If LOV EA is requested from the root object and it's not
1564  * found, then return default striping for the filesystem.
1565  *
1566  * \see dt_object_operations::do_xattr_get() in the API description for details.
1567  */
1568 static int lod_xattr_get(const struct lu_env *env, struct dt_object *dt,
1569                          struct lu_buf *buf, const char *name)
1570 {
1571         struct lod_thread_info *info = lod_env_info(env);
1572         struct lod_device *dev = lu2lod_dev(dt->do_lu.lo_dev);
1573         int is_root;
1574         int rc;
1575         ENTRY;
1576
1577         rc = dt_xattr_get(env, dt_object_child(dt), buf, name);
1578         if (strcmp(name, XATTR_NAME_LMV) == 0) {
1579                 struct lmv_mds_md_v1    *lmv1;
1580                 struct lmv_foreign_md   *lfm;
1581                 int                      rc1 = 0;
1582
1583                 if (rc > (typeof(rc))sizeof(*lmv1))
1584                         RETURN(rc);
1585
1586                 /* short (<= sizeof(struct lmv_mds_md_v1)) foreign LMV case */
1587                 /* XXX empty foreign LMV is not allowed */
1588                 if (rc <= offsetof(typeof(*lfm), lfm_value))
1589                         RETURN(rc = rc > 0 ? -EINVAL : rc);
1590
1591                 if (buf->lb_buf == NULL || buf->lb_len == 0) {
1592                         BUILD_BUG_ON(sizeof(*lmv1) > sizeof(info->lti_key));
1593
1594                         /* lti_buf is large enough for *lmv1 or a short
1595                          * (<= sizeof(struct lmv_mds_md_v1)) foreign LMV
1596                          */
1597                         info->lti_buf.lb_buf = info->lti_key;
1598                         info->lti_buf.lb_len = sizeof(*lmv1);
1599                         rc = dt_xattr_get(env, dt_object_child(dt),
1600                                           &info->lti_buf, name);
1601                         if (unlikely(rc <= offsetof(typeof(*lfm),
1602                                                     lfm_value)))
1603                                 RETURN(rc = rc > 0 ? -EINVAL : rc);
1604
1605                         lfm = info->lti_buf.lb_buf;
1606                         if (le32_to_cpu(lfm->lfm_magic) == LMV_MAGIC_FOREIGN)
1607                                 RETURN(rc);
1608
1609                         if (unlikely(rc != sizeof(*lmv1)))
1610                                 RETURN(rc = rc > 0 ? -EINVAL : rc);
1611
1612                         lmv1 = info->lti_buf.lb_buf;
1613                         /* The on-disk LMV EA only contains header, but the
1614                          * returned LMV EA size should contain the space for
1615                          * the FIDs of all shards of the striped directory. */
1616                         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_V1)
1617                                 rc = lmv_mds_md_size(
1618                                         le32_to_cpu(lmv1->lmv_stripe_count),
1619                                         le32_to_cpu(lmv1->lmv_magic));
1620                 } else {
1621                         lmv1 = buf->lb_buf;
1622                         if (le32_to_cpu(lmv1->lmv_magic) != LMV_MAGIC_V1)
1623                                 RETURN(rc);
1624
1625                         if (rc != sizeof(*lmv1))
1626                                 RETURN(rc = rc > 0 ? -EINVAL : rc);
1627
1628                         rc1 = lod_load_lmv_shards(env, lod_dt_obj(dt),
1629                                                   buf, false);
1630                 }
1631
1632                 RETURN(rc = rc1 != 0 ? rc1 : rc);
1633         }
1634
1635         if ((rc > 0) && buf->lb_buf && strcmp(name, XATTR_NAME_LOV) == 0) {
1636                 struct lov_comp_md_v1 *lcm = buf->lb_buf;
1637
1638                 if (lcm->lcm_magic == cpu_to_le32(LOV_MAGIC_SEL))
1639                         lcm->lcm_magic = cpu_to_le32(LOV_MAGIC_COMP_V1);
1640         }
1641
1642         if (rc != -ENODATA || !S_ISDIR(dt->do_lu.lo_header->loh_attr & S_IFMT))
1643                 RETURN(rc);
1644
1645         /*
1646          * XXX: Only used by lfsck
1647          *
1648          * lod returns default striping on the real root of the device
1649          * this is like the root stores default striping for the whole
1650          * filesystem. historically we've been using a different approach
1651          * and store it in the config.
1652          */
1653         dt_root_get(env, dev->lod_child, &info->lti_fid);
1654         is_root = lu_fid_eq(&info->lti_fid, lu_object_fid(&dt->do_lu));
1655
1656         if (is_root && strcmp(XATTR_NAME_LOV, name) == 0) {
1657                 struct lov_user_md *lum = buf->lb_buf;
1658                 struct lov_desc *desc = &dev->lod_ost_descs.ltd_lov_desc;
1659
1660                 if (buf->lb_buf == NULL) {
1661                         rc = sizeof(*lum);
1662                 } else if (buf->lb_len >= sizeof(*lum)) {
1663                         lum->lmm_magic = cpu_to_le32(LOV_USER_MAGIC_V1);
1664                         lmm_oi_set_seq(&lum->lmm_oi, FID_SEQ_LOV_DEFAULT);
1665                         lmm_oi_set_id(&lum->lmm_oi, 0);
1666                         lmm_oi_cpu_to_le(&lum->lmm_oi, &lum->lmm_oi);
1667                         lum->lmm_pattern = cpu_to_le32(desc->ld_pattern);
1668                         lum->lmm_stripe_size = cpu_to_le32(
1669                                                 desc->ld_default_stripe_size);
1670                         lum->lmm_stripe_count = cpu_to_le16(
1671                                                 desc->ld_default_stripe_count);
1672                         lum->lmm_stripe_offset = cpu_to_le16(
1673                                                 desc->ld_default_stripe_offset);
1674                         rc = sizeof(*lum);
1675                 } else {
1676                         rc = -ERANGE;
1677                 }
1678         }
1679
1680         RETURN(rc);
1681 }
1682
1683 /**
1684  * Verify LVM EA.
1685  *
1686  * Checks that the magic of the stripe is sane.
1687  *
1688  * \param[in] lod       lod device
1689  * \param[in] lum       a buffer storing LMV EA to verify
1690  *
1691  * \retval              0 if the EA is sane
1692  * \retval              negative otherwise
1693  */
1694 static int lod_verify_md_striping(struct lod_device *lod,
1695                                   const struct lmv_user_md_v1 *lum)
1696 {
1697         if (unlikely(le32_to_cpu(lum->lum_magic) != LMV_USER_MAGIC)) {
1698                 CERROR("%s: invalid lmv_user_md: magic = %x, "
1699                        "stripe_offset = %d, stripe_count = %u: rc = %d\n",
1700                        lod2obd(lod)->obd_name, le32_to_cpu(lum->lum_magic),
1701                        (int)le32_to_cpu(lum->lum_stripe_offset),
1702                        le32_to_cpu(lum->lum_stripe_count), -EINVAL);
1703                 return -EINVAL;
1704         }
1705
1706         return 0;
1707 }
1708
1709 /**
1710  * Initialize LMV EA for a slave.
1711  *
1712  * Initialize slave's LMV EA from the master's LMV EA.
1713  *
1714  * \param[in] master_lmv        a buffer containing master's EA
1715  * \param[out] slave_lmv        a buffer where slave's EA will be stored
1716  *
1717  */
1718 static void lod_prep_slave_lmv_md(struct lmv_mds_md_v1 *slave_lmv,
1719                                   const struct lmv_mds_md_v1 *master_lmv)
1720 {
1721         *slave_lmv = *master_lmv;
1722         slave_lmv->lmv_magic = cpu_to_le32(LMV_MAGIC_STRIPE);
1723 }
1724
1725 /**
1726  * Generate LMV EA.
1727  *
1728  * Generate LMV EA from the object passed as \a dt. The object must have
1729  * the stripes created and initialized.
1730  *
1731  * \param[in] env       execution environment
1732  * \param[in] dt        object
1733  * \param[out] lmv_buf  buffer storing generated LMV EA
1734  *
1735  * \retval              0 on success
1736  * \retval              negative if failed
1737  */
1738 static int lod_prep_lmv_md(const struct lu_env *env, struct dt_object *dt,
1739                            struct lu_buf *lmv_buf)
1740 {
1741         struct lod_thread_info  *info = lod_env_info(env);
1742         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1743         struct lod_object       *lo = lod_dt_obj(dt);
1744         struct lmv_mds_md_v1    *lmm1;
1745         int                     stripe_count;
1746         int                     type = LU_SEQ_RANGE_ANY;
1747         int                     rc;
1748         __u32                   mdtidx;
1749         ENTRY;
1750
1751         LASSERT(lo->ldo_dir_striped != 0);
1752         LASSERT(lo->ldo_dir_stripe_count > 0);
1753         stripe_count = lo->ldo_dir_stripe_count;
1754         /* Only store the LMV EA heahder on the disk. */
1755         if (info->lti_ea_store_size < sizeof(*lmm1)) {
1756                 rc = lod_ea_store_resize(info, sizeof(*lmm1));
1757                 if (rc != 0)
1758                         RETURN(rc);
1759         } else {
1760                 memset(info->lti_ea_store, 0, sizeof(*lmm1));
1761         }
1762
1763         lmm1 = (struct lmv_mds_md_v1 *)info->lti_ea_store;
1764         memset(lmm1, 0, sizeof(*lmm1));
1765         lmm1->lmv_magic = cpu_to_le32(LMV_MAGIC);
1766         lmm1->lmv_stripe_count = cpu_to_le32(stripe_count);
1767         lmm1->lmv_hash_type = cpu_to_le32(lo->ldo_dir_hash_type);
1768         lmm1->lmv_layout_version = cpu_to_le32(lo->ldo_dir_layout_version);
1769         if (lod_is_layout_changing(lo)) {
1770                 lmm1->lmv_migrate_hash = cpu_to_le32(lo->ldo_dir_migrate_hash);
1771                 lmm1->lmv_migrate_offset =
1772                         cpu_to_le32(lo->ldo_dir_migrate_offset);
1773         }
1774         rc = lod_fld_lookup(env, lod, lu_object_fid(&dt->do_lu),
1775                             &mdtidx, &type);
1776         if (rc != 0)
1777                 RETURN(rc);
1778
1779         lmm1->lmv_master_mdt_index = cpu_to_le32(mdtidx);
1780         lmv_buf->lb_buf = info->lti_ea_store;
1781         lmv_buf->lb_len = sizeof(*lmm1);
1782
1783         RETURN(rc);
1784 }
1785
1786 /**
1787  * Create in-core represenation for a striped directory.
1788  *
1789  * Parse the buffer containing LMV EA and instantiate LU objects
1790  * representing the stripe objects. The pointers to the objects are
1791  * stored in ldo_stripe field of \a lo. This function is used when
1792  * we need to access an already created object (i.e. load from a disk).
1793  *
1794  * \param[in] env       execution environment
1795  * \param[in] lo        lod object
1796  * \param[in] buf       buffer containing LMV EA
1797  *
1798  * \retval              0 on success
1799  * \retval              negative if failed
1800  */
1801 int lod_parse_dir_striping(const struct lu_env *env, struct lod_object *lo,
1802                            const struct lu_buf *buf)
1803 {
1804         struct lod_thread_info  *info = lod_env_info(env);
1805         struct lod_device       *lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
1806         struct lod_tgt_descs    *ltd = &lod->lod_mdt_descs;
1807         struct dt_object        **stripe;
1808         union lmv_mds_md        *lmm = buf->lb_buf;
1809         struct lmv_mds_md_v1    *lmv1 = &lmm->lmv_md_v1;
1810         struct lu_fid           *fid = &info->lti_fid;
1811         unsigned int            i;
1812         int                     rc = 0;
1813         ENTRY;
1814
1815         LASSERT(mutex_is_locked(&lo->ldo_layout_mutex));
1816
1817         /* XXX may be useless as not called for foreign LMV ?? */
1818         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_FOREIGN)
1819                 RETURN(0);
1820
1821         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_STRIPE) {
1822                 lo->ldo_dir_slave_stripe = 1;
1823                 RETURN(0);
1824         }
1825
1826         if (!lmv_is_sane(lmv1))
1827                 RETURN(-EINVAL);
1828
1829         LASSERT(lo->ldo_stripe == NULL);
1830         OBD_ALLOC_PTR_ARRAY(stripe, le32_to_cpu(lmv1->lmv_stripe_count));
1831         if (stripe == NULL)
1832                 RETURN(-ENOMEM);
1833
1834         for (i = 0; i < le32_to_cpu(lmv1->lmv_stripe_count); i++) {
1835                 struct dt_device        *tgt_dt;
1836                 struct dt_object        *dto;
1837                 int                     type = LU_SEQ_RANGE_ANY;
1838                 __u32                   idx;
1839
1840                 fid_le_to_cpu(fid, &lmv1->lmv_stripe_fids[i]);
1841                 if (!fid_is_sane(fid)) {
1842                         stripe[i] = NULL;
1843                         continue;
1844                 }
1845
1846                 rc = lod_fld_lookup(env, lod, fid, &idx, &type);
1847                 if (rc != 0)
1848                         GOTO(out, rc);
1849
1850                 if (idx == lod2lu_dev(lod)->ld_site->ld_seq_site->ss_node_id) {
1851                         tgt_dt = lod->lod_child;
1852                 } else {
1853                         struct lod_tgt_desc     *tgt;
1854
1855                         tgt = LTD_TGT(ltd, idx);
1856                         if (tgt == NULL)
1857                                 GOTO(out, rc = -ESTALE);
1858                         tgt_dt = tgt->ltd_tgt;
1859                 }
1860
1861                 dto = dt_locate_at(env, tgt_dt, fid,
1862                                   lo->ldo_obj.do_lu.lo_dev->ld_site->ls_top_dev,
1863                                   NULL);
1864                 if (IS_ERR(dto))
1865                         GOTO(out, rc = PTR_ERR(dto));
1866
1867                 stripe[i] = dto;
1868         }
1869 out:
1870         lo->ldo_stripe = stripe;
1871         lo->ldo_dir_stripe_count = le32_to_cpu(lmv1->lmv_stripe_count);
1872         lo->ldo_dir_stripes_allocated = le32_to_cpu(lmv1->lmv_stripe_count);
1873         lo->ldo_dir_layout_version = le32_to_cpu(lmv1->lmv_layout_version);
1874         lo->ldo_dir_migrate_offset = le32_to_cpu(lmv1->lmv_migrate_offset);
1875         lo->ldo_dir_migrate_hash = le32_to_cpu(lmv1->lmv_migrate_hash);
1876         lo->ldo_dir_hash_type = le32_to_cpu(lmv1->lmv_hash_type);
1877         if (rc != 0)
1878                 lod_striping_free_nolock(env, lo);
1879
1880         RETURN(rc);
1881 }
1882
1883 /**
1884  * Declare create a striped directory.
1885  *
1886  * Declare creating a striped directory with a given stripe pattern on the
1887  * specified MDTs. A striped directory is represented as a regular directory
1888  * - an index listing all the stripes. The stripes point back to the master
1889  * object with ".." and LinkEA. The master object gets LMV EA which
1890  * identifies it as a striped directory. The function allocates FIDs
1891  * for all stripes.
1892  *
1893  * \param[in] env       execution environment
1894  * \param[in] dt        object
1895  * \param[in] attr      attributes to initialize the objects with
1896  * \param[in] dof       type of objects to be created
1897  * \param[in] th        transaction handle
1898  *
1899  * \retval              0 on success
1900  * \retval              negative if failed
1901  */
1902 static int lod_dir_declare_create_stripes(const struct lu_env *env,
1903                                           struct dt_object *dt,
1904                                           struct lu_attr *attr,
1905                                           struct dt_object_format *dof,
1906                                           struct thandle *th)
1907 {
1908         struct lod_thread_info  *info = lod_env_info(env);
1909         struct lu_buf           lmv_buf;
1910         struct lu_buf           slave_lmv_buf;
1911         struct lmv_mds_md_v1    *lmm;
1912         struct lmv_mds_md_v1    *slave_lmm = NULL;
1913         struct dt_insert_rec    *rec = &info->lti_dt_rec;
1914         struct lod_object       *lo = lod_dt_obj(dt);
1915         int                     rc;
1916         __u32                   i;
1917         ENTRY;
1918
1919         rc = lod_prep_lmv_md(env, dt, &lmv_buf);
1920         if (rc != 0)
1921                 GOTO(out, rc);
1922         lmm = lmv_buf.lb_buf;
1923
1924         OBD_ALLOC_PTR(slave_lmm);
1925         if (slave_lmm == NULL)
1926                 GOTO(out, rc = -ENOMEM);
1927
1928         lod_prep_slave_lmv_md(slave_lmm, lmm);
1929         slave_lmv_buf.lb_buf = slave_lmm;
1930         slave_lmv_buf.lb_len = sizeof(*slave_lmm);
1931
1932         if (!dt_try_as_dir(env, dt_object_child(dt)))
1933                 GOTO(out, rc = -EINVAL);
1934
1935         rec->rec_type = S_IFDIR;
1936         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1937                 struct dt_object        *dto = lo->ldo_stripe[i];
1938                 char                    *stripe_name = info->lti_key;
1939                 struct lu_name          *sname;
1940                 struct linkea_data       ldata          = { NULL };
1941                 struct lu_buf           linkea_buf;
1942
1943                 /* OBD_FAIL_MDS_STRIPE_FID may leave stripe uninitialized */
1944                 if (!dto)
1945                         continue;
1946
1947                 /* directory split skip create for existing stripes */
1948                 if (!(lod_is_splitting(lo) && i < lo->ldo_dir_split_offset)) {
1949                         rc = lod_sub_declare_create(env, dto, attr, NULL, dof,
1950                                                     th);
1951                         if (rc != 0)
1952                                 GOTO(out, rc);
1953
1954                         if (!dt_try_as_dir(env, dto))
1955                                 GOTO(out, rc = -EINVAL);
1956
1957                         rc = lod_sub_declare_ref_add(env, dto, th);
1958                         if (rc != 0)
1959                                 GOTO(out, rc);
1960
1961                         rec->rec_fid = lu_object_fid(&dto->do_lu);
1962                         rc = lod_sub_declare_insert(env, dto,
1963                                                     (const struct dt_rec *)rec,
1964                                                     (const struct dt_key *)dot,
1965                                                     th);
1966                         if (rc != 0)
1967                                 GOTO(out, rc);
1968
1969                         /* master stripe FID will be put to .. */
1970                         rec->rec_fid = lu_object_fid(&dt->do_lu);
1971                         rc = lod_sub_declare_insert(env, dto,
1972                                                   (const struct dt_rec *)rec,
1973                                                   (const struct dt_key *)dotdot,
1974                                                   th);
1975                         if (rc != 0)
1976                                 GOTO(out, rc);
1977
1978                         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_NAME) &&
1979                             cfs_fail_val == i)
1980                                 snprintf(stripe_name, sizeof(info->lti_key),
1981                                          DFID":%u",
1982                                          PFID(lu_object_fid(&dto->do_lu)),
1983                                          i + 1);
1984                         else
1985                                 snprintf(stripe_name, sizeof(info->lti_key),
1986                                          DFID":%u",
1987                                          PFID(lu_object_fid(&dto->do_lu)), i);
1988
1989                         sname = lod_name_get(env, stripe_name,
1990                                              strlen(stripe_name));
1991                         rc = linkea_links_new(&ldata, &info->lti_linkea_buf,
1992                                               sname, lu_object_fid(&dt->do_lu));
1993                         if (rc != 0)
1994                                 GOTO(out, rc);
1995
1996                         linkea_buf.lb_buf = ldata.ld_buf->lb_buf;
1997                         linkea_buf.lb_len = ldata.ld_leh->leh_len;
1998                         rc = lod_sub_declare_xattr_set(env, dto, &linkea_buf,
1999                                                        XATTR_NAME_LINK, 0, th);
2000                         if (rc != 0)
2001                                 GOTO(out, rc);
2002
2003                         rec->rec_fid = lu_object_fid(&dto->do_lu);
2004                         rc = lod_sub_declare_insert(env, dt_object_child(dt),
2005                                         (const struct dt_rec *)rec,
2006                                         (const struct dt_key *)stripe_name, th);
2007                         if (rc != 0)
2008                                 GOTO(out, rc);
2009
2010                         rc = lod_sub_declare_ref_add(env, dt_object_child(dt),
2011                                                      th);
2012                         if (rc != 0)
2013                                 GOTO(out, rc);
2014                 }
2015
2016                 if (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_SLAVE_LMV) ||
2017                     cfs_fail_val != i) {
2018                         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_LMV) &&
2019                             cfs_fail_val == i)
2020                                 slave_lmm->lmv_master_mdt_index =
2021                                                         cpu_to_le32(i + 1);
2022                         else
2023                                 slave_lmm->lmv_master_mdt_index =
2024                                                         cpu_to_le32(i);
2025                         rc = lod_sub_declare_xattr_set(env, dto, &slave_lmv_buf,
2026                                                        XATTR_NAME_LMV, 0, th);
2027                         if (rc != 0)
2028                                 GOTO(out, rc);
2029                 }
2030         }
2031
2032         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt),
2033                                        &lmv_buf, XATTR_NAME_LMV, 0, th);
2034         if (rc != 0)
2035                 GOTO(out, rc);
2036 out:
2037         if (slave_lmm != NULL)
2038                 OBD_FREE_PTR(slave_lmm);
2039
2040         RETURN(rc);
2041 }
2042
2043 /**
2044  * Allocate a striping on a predefined set of MDTs.
2045  *
2046  * Allocates new striping using the MDT index range provided by the data from
2047  * the lum_obejcts contained in the lmv_user_md passed to this method if
2048  * \a is_specific is true; or allocates new layout starting from MDT index in
2049  * lo->ldo_dir_stripe_offset. The exact order of MDTs is not important and
2050  * varies depending on MDT status. The number of stripes needed and stripe
2051  * offset are taken from the object. If that number cannot be met, then the
2052  * function returns an error and then it's the caller's responsibility to
2053  * release the stripes allocated. All the internal structures are protected,
2054  * but no concurrent allocation is allowed on the same objects.
2055  *
2056  * \param[in] env               execution environment for this thread
2057  * \param[in] lo                LOD object
2058  * \param[out] stripes          striping created
2059  * \param[out] mdt_indices      MDT indices of striping created
2060  * \param[in] is_specific       true if the MDTs are provided by lum; false if
2061  *                              only the starting MDT index is provided
2062  *
2063  * \retval positive     stripes allocated, including the first stripe allocated
2064  *                      outside
2065  * \retval negative     errno on failure
2066  */
2067 static int lod_mdt_alloc_specific(const struct lu_env *env,
2068                                   struct lod_object *lo,
2069                                   struct dt_object **stripes,
2070                                   __u32 *mdt_indices, bool is_specific)
2071 {
2072         struct lod_device *lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
2073         struct lu_tgt_descs *ltd = &lod->lod_mdt_descs;
2074         struct lu_tgt_desc *tgt = NULL;
2075         struct lu_object_conf conf = { .loc_flags = LOC_F_NEW };
2076         struct dt_device *tgt_dt = NULL;
2077         struct lu_fid fid = { 0 };
2078         struct dt_object *dto;
2079         u32 master_index;
2080         u32 stripe_count = lo->ldo_dir_stripe_count;
2081         int stripe_idx = 1;
2082         int j;
2083         int idx;
2084         int rc;
2085
2086         master_index = lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_node_id;
2087         if (!is_specific && stripe_count > 1)
2088                 /* Set the start index for the 2nd stripe allocation */
2089                 mdt_indices[1] = (mdt_indices[0] + 1) %
2090                                         (lod->lod_remote_mdt_count + 1);
2091
2092         for (; stripe_idx < stripe_count; stripe_idx++) {
2093                 /* Try to find next avaible target */
2094                 idx = mdt_indices[stripe_idx];
2095                 for (j = 0; j < lod->lod_remote_mdt_count;
2096                      j++, idx = (idx + 1) % (lod->lod_remote_mdt_count + 1)) {
2097                         bool already_allocated = false;
2098                         __u32 k;
2099
2100                         CDEBUG(D_INFO, "try idx %d, mdt cnt %u, allocated %u\n",
2101                                idx, lod->lod_remote_mdt_count + 1, stripe_idx);
2102
2103                         if (likely(!is_specific &&
2104                                    !OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE))) {
2105                                 /* check whether the idx already exists
2106                                  * in current allocated array */
2107                                 for (k = 0; k < stripe_idx; k++) {
2108                                         if (mdt_indices[k] == idx) {
2109                                                 already_allocated = true;
2110                                                 break;
2111                                         }
2112                                 }
2113
2114                                 if (already_allocated)
2115                                         continue;
2116                         }
2117
2118                         /* Sigh, this index is not in the bitmap, let's check
2119                          * next available target */
2120                         if (!test_bit(idx, ltd->ltd_tgt_bitmap) &&
2121                             idx != master_index)
2122                                 continue;
2123
2124                         if (idx == master_index) {
2125                                 /* Allocate the FID locally */
2126                                 tgt_dt = lod->lod_child;
2127                                 rc = dt_fid_alloc(env, tgt_dt, &fid, NULL,
2128                                                   NULL);
2129                                 if (rc < 0)
2130                                         continue;
2131                                 break;
2132                         }
2133
2134                         /* check the status of the OSP */
2135                         tgt = LTD_TGT(ltd, idx);
2136                         if (!tgt)
2137                                 continue;
2138
2139                         tgt_dt = tgt->ltd_tgt;
2140                         if (!tgt->ltd_active)
2141                                 /* this OSP doesn't feel well */
2142                                 continue;
2143
2144                         rc = dt_fid_alloc(env, tgt_dt, &fid, NULL, NULL);
2145                         if (rc < 0)
2146                                 continue;
2147
2148                         break;
2149                 }
2150
2151                 /* Can not allocate more stripes */
2152                 if (j == lod->lod_remote_mdt_count) {
2153                         CDEBUG(D_INFO, "%s: require stripes %u only get %d\n",
2154                                lod2obd(lod)->obd_name, stripe_count,
2155                                stripe_idx);
2156                         break;
2157                 }
2158
2159                 CDEBUG(D_INFO, "Get idx %d, for stripe %d "DFID"\n",
2160                        idx, stripe_idx, PFID(&fid));
2161                 mdt_indices[stripe_idx] = idx;
2162                 /* Set the start index for next stripe allocation */
2163                 if (!is_specific && stripe_idx < stripe_count - 1) {
2164                         /*
2165                          * for large dir test, put all other slaves on one
2166                          * remote MDT, otherwise we may save too many local
2167                          * slave locks which will exceed RS_MAX_LOCKS.
2168                          */
2169                         if (unlikely(OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE)))
2170                                 idx = master_index;
2171                         mdt_indices[stripe_idx + 1] = (idx + 1) %
2172                                            (lod->lod_remote_mdt_count + 1);
2173                 }
2174                 /* tgt_dt and fid must be ready after search avaible OSP
2175                  * in the above loop */
2176                 LASSERT(tgt_dt != NULL);
2177                 LASSERT(fid_is_sane(&fid));
2178
2179                 /* fail a remote stripe FID allocation */
2180                 if (stripe_idx && OBD_FAIL_CHECK(OBD_FAIL_MDS_STRIPE_FID))
2181                         continue;
2182
2183                 dto = dt_locate_at(env, tgt_dt, &fid,
2184                                   lo->ldo_obj.do_lu.lo_dev->ld_site->ls_top_dev,
2185                                   &conf);
2186                 if (IS_ERR(dto)) {
2187                         rc = PTR_ERR(dto);
2188                         goto error;
2189                 }
2190
2191                 stripes[stripe_idx] = dto;
2192         }
2193
2194         return stripe_idx;
2195
2196 error:
2197         for (j = 1; j < stripe_idx; j++) {
2198                 LASSERT(stripes[j] != NULL);
2199                 dt_object_put(env, stripes[j]);
2200                 stripes[j] = NULL;
2201         }
2202         return rc;
2203 }
2204
2205 static int lod_prep_md_striped_create(const struct lu_env *env,
2206                                       struct dt_object *dt,
2207                                       struct lu_attr *attr,
2208                                       const struct lmv_user_md_v1 *lum,
2209                                       struct dt_object_format *dof,
2210                                       struct thandle *th)
2211 {
2212         struct lod_device *lod = lu2lod_dev(dt->do_lu.lo_dev);
2213         struct lod_object *lo = lod_dt_obj(dt);
2214         struct dt_object **stripes;
2215         struct lu_object_conf conf = { .loc_flags = LOC_F_NEW };
2216         struct lu_fid fid = { 0 };
2217         __u32 stripe_count;
2218         int i;
2219         int rc = 0;
2220
2221         ENTRY;
2222
2223         /* The lum has been verifed in lod_verify_md_striping */
2224         LASSERT(le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC ||
2225                 le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC_SPECIFIC);
2226
2227         stripe_count = lo->ldo_dir_stripe_count;
2228
2229         OBD_ALLOC_PTR_ARRAY(stripes, stripe_count);
2230         if (!stripes)
2231                 RETURN(-ENOMEM);
2232
2233         /* Allocate the first stripe locally */
2234         rc = dt_fid_alloc(env, lod->lod_child, &fid, NULL, NULL);
2235         if (rc < 0)
2236                 GOTO(out, rc);
2237
2238         stripes[0] = dt_locate_at(env, lod->lod_child, &fid,
2239                                   dt->do_lu.lo_dev->ld_site->ls_top_dev, &conf);
2240         if (IS_ERR(stripes[0]))
2241                 GOTO(out, rc = PTR_ERR(stripes[0]));
2242
2243         if (lo->ldo_dir_stripe_offset == LMV_OFFSET_DEFAULT) {
2244                 lod_qos_statfs_update(env, lod, &lod->lod_mdt_descs);
2245                 rc = lod_mdt_alloc_qos(env, lo, stripes, 1, stripe_count);
2246                 if (rc == -EAGAIN)
2247                         rc = lod_mdt_alloc_rr(env, lo, stripes, 1,
2248                                               stripe_count);
2249         } else {
2250                 int *idx_array;
2251                 bool is_specific = false;
2252
2253                 OBD_ALLOC_PTR_ARRAY(idx_array, stripe_count);
2254                 if (!idx_array)
2255                         GOTO(out, rc = -ENOMEM);
2256
2257                 if (le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC_SPECIFIC) {
2258                         is_specific = true;
2259                         for (i = 0; i < stripe_count; i++)
2260                                 idx_array[i] =
2261                                        le32_to_cpu(lum->lum_objects[i].lum_mds);
2262                 }
2263
2264                 /* stripe 0 is local */
2265                 idx_array[0] =
2266                         lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_node_id;
2267                 rc = lod_mdt_alloc_specific(env, lo, stripes, idx_array,
2268                                             is_specific);
2269                 OBD_FREE_PTR_ARRAY(idx_array, stripe_count);
2270         }
2271
2272         if (rc < 0)
2273                 GOTO(out, rc);
2274
2275         LASSERT(rc > 0);
2276
2277         lo->ldo_dir_striped = 1;
2278         lo->ldo_stripe = stripes;
2279         lo->ldo_dir_stripe_count = rc;
2280         lo->ldo_dir_stripes_allocated = stripe_count;
2281         smp_mb();
2282         lo->ldo_dir_stripe_loaded = 1;
2283
2284         rc = lod_dir_declare_create_stripes(env, dt, attr, dof, th);
2285         if (rc < 0)
2286                 lod_striping_free(env, lo);
2287
2288         RETURN(rc);
2289
2290 out:
2291         LASSERT(rc < 0);
2292         if (!IS_ERR_OR_NULL(stripes[0]))
2293                 dt_object_put(env, stripes[0]);
2294         for (i = 1; i < stripe_count; i++)
2295                 LASSERT(!stripes[i]);
2296         OBD_FREE_PTR_ARRAY(stripes, stripe_count);
2297
2298         return rc;
2299 }
2300
2301 /**
2302  *
2303  * Alloc cached foreign LMV
2304  *
2305  * \param[in] lo        object
2306  * \param[in] size      size of foreign LMV
2307  *
2308  * \retval              0 on success
2309  * \retval              negative if failed
2310  */
2311 int lod_alloc_foreign_lmv(struct lod_object *lo, size_t size)
2312 {
2313         OBD_ALLOC_LARGE(lo->ldo_foreign_lmv, size);
2314         if (lo->ldo_foreign_lmv == NULL)
2315                 return -ENOMEM;
2316         lo->ldo_foreign_lmv_size = size;
2317         lo->ldo_dir_is_foreign = 1;
2318
2319         return 0;
2320 }
2321
2322 /**
2323  * Declare create striped md object.
2324  *
2325  * The function declares intention to create a striped directory. This is a
2326  * wrapper for lod_prep_md_striped_create(). The only additional functionality
2327  * is to verify pattern \a lum_buf is good. Check that function for the details.
2328  *
2329  * \param[in] env       execution environment
2330  * \param[in] dt        object
2331  * \param[in] attr      attributes to initialize the objects with
2332  * \param[in] lum_buf   a pattern specifying the number of stripes and
2333  *                      MDT to start from
2334  * \param[in] dof       type of objects to be created
2335  * \param[in] th        transaction handle
2336  *
2337  * \retval              0 on success
2338  * \retval              negative if failed
2339  *
2340  */
2341 static int lod_declare_xattr_set_lmv(const struct lu_env *env,
2342                                      struct dt_object *dt,
2343                                      struct lu_attr *attr,
2344                                      const struct lu_buf *lum_buf,
2345                                      struct dt_object_format *dof,
2346                                      struct thandle *th)
2347 {
2348         struct lod_object       *lo = lod_dt_obj(dt);
2349         struct lmv_user_md_v1   *lum = lum_buf->lb_buf;
2350         int                     rc;
2351         ENTRY;
2352
2353         LASSERT(lum != NULL);
2354
2355         CDEBUG(D_INFO, "lum magic = %x count = %u offset = %d\n",
2356                le32_to_cpu(lum->lum_magic), le32_to_cpu(lum->lum_stripe_count),
2357                (int)le32_to_cpu(lum->lum_stripe_offset));
2358
2359         if (lo->ldo_dir_stripe_count == 0) {
2360                 if (lo->ldo_dir_is_foreign) {
2361                         rc = lod_alloc_foreign_lmv(lo, lum_buf->lb_len);
2362                         if (rc != 0)
2363                                 GOTO(out, rc);
2364                         memcpy(lo->ldo_foreign_lmv, lum, lum_buf->lb_len);
2365                         lo->ldo_dir_stripe_loaded = 1;
2366                 }
2367                 GOTO(out, rc = 0);
2368         }
2369
2370         /* prepare dir striped objects */
2371         rc = lod_prep_md_striped_create(env, dt, attr, lum, dof, th);
2372         if (rc != 0) {
2373                 /* failed to create striping, let's reset
2374                  * config so that others don't get confused */
2375                 lod_striping_free(env, lo);
2376                 GOTO(out, rc);
2377         }
2378 out:
2379         RETURN(rc);
2380 }
2381
2382 /**
2383  * Set or replace striped directory layout, and LFSCK may set layout on a plain
2384  * directory, so don't check stripe count.
2385  *
2386  * \param[in] env       execution environment
2387  * \param[in] dt        target object
2388  * \param[in] buf       LMV buf which contains source stripe fids
2389  * \param[in] fl        set or replace
2390  * \param[in] th        transaction handle
2391  *
2392  * \retval              0 on success
2393  * \retval              negative if failed
2394  */
2395 static int lod_dir_layout_set(const struct lu_env *env,
2396                               struct dt_object *dt,
2397                               const struct lu_buf *buf,
2398                               int fl,
2399                               struct thandle *th)
2400 {
2401         struct dt_object *next = dt_object_child(dt);
2402         struct lod_object *lo = lod_dt_obj(dt);
2403         struct lod_device *lod = lu2lod_dev(lod2lu_obj(lo)->lo_dev);
2404         struct lmv_mds_md_v1 *lmv = buf->lb_buf;
2405         struct lmv_mds_md_v1 *slave_lmv;
2406         struct lu_buf slave_buf;
2407         int i;
2408         int rc;
2409
2410         ENTRY;
2411
2412         if (!lmv_is_sane2(lmv))
2413                 RETURN(-EINVAL);
2414
2415         /* adjust hash for dir merge, which may not be set in user command */
2416         if (lmv_is_merging(lmv) && !lmv->lmv_migrate_hash)
2417                 lmv->lmv_merge_hash =
2418                         lod->lod_mdt_descs.ltd_lmv_desc.ld_pattern;
2419
2420         LMV_DEBUG(D_INFO, lmv, "set");
2421
2422         rc = lod_sub_xattr_set(env, next, buf, XATTR_NAME_LMV, fl, th);
2423         if (rc)
2424                 RETURN(rc);
2425
2426         /* directory restripe may update stripe LMV directly */
2427         if (!lo->ldo_dir_stripe_count)
2428                 RETURN(0);
2429
2430         lo->ldo_dir_hash_type = le32_to_cpu(lmv->lmv_hash_type);
2431         lo->ldo_dir_migrate_offset = le32_to_cpu(lmv->lmv_migrate_offset);
2432         lo->ldo_dir_migrate_hash = le32_to_cpu(lmv->lmv_migrate_hash);
2433         lo->ldo_dir_layout_version = le32_to_cpu(lmv->lmv_layout_version);
2434
2435         OBD_ALLOC_PTR(slave_lmv);
2436         if (!slave_lmv)
2437                 RETURN(-ENOMEM);
2438
2439         lod_prep_slave_lmv_md(slave_lmv, lmv);
2440         slave_buf.lb_buf = slave_lmv;
2441         slave_buf.lb_len = sizeof(*slave_lmv);
2442
2443         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
2444                 if (!lo->ldo_stripe[i])
2445                         continue;
2446
2447                 if (!dt_object_exists(lo->ldo_stripe[i]))
2448                         continue;
2449
2450                 rc = lod_sub_xattr_set(env, lo->ldo_stripe[i], &slave_buf,
2451                                        XATTR_NAME_LMV, fl, th);
2452                 if (rc)
2453                         break;
2454         }
2455
2456         OBD_FREE_PTR(slave_lmv);
2457
2458         RETURN(rc);
2459 }
2460
2461 /**
2462  * Implementation of dt_object_operations::do_declare_xattr_set.
2463  *
2464  * Used with regular (non-striped) objects. Basically it
2465  * initializes the striping information and applies the
2466  * change to all the stripes.
2467  *
2468  * \see dt_object_operations::do_declare_xattr_set() in the API description
2469  * for details.
2470  */
2471 static int lod_dir_declare_xattr_set(const struct lu_env *env,
2472                                      struct dt_object *dt,
2473                                      const struct lu_buf *buf,
2474                                      const char *name, int fl,
2475                                      struct thandle *th)
2476 {
2477         struct dt_object        *next = dt_object_child(dt);
2478         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2479         struct lod_object       *lo = lod_dt_obj(dt);
2480         int                     i;
2481         int                     rc;
2482         ENTRY;
2483
2484         if (strcmp(name, XATTR_NAME_DEFAULT_LMV) == 0) {
2485                 struct lmv_user_md_v1 *lum;
2486
2487                 LASSERT(buf != NULL && buf->lb_buf != NULL);
2488                 lum = buf->lb_buf;
2489                 rc = lod_verify_md_striping(d, lum);
2490                 if (rc != 0)
2491                         RETURN(rc);
2492         } else if (strcmp(name, XATTR_NAME_LOV) == 0) {
2493                 rc = lod_verify_striping(env, d, lo, buf, false);
2494                 if (rc != 0)
2495                         RETURN(rc);
2496         }
2497
2498         rc = lod_sub_declare_xattr_set(env, next, buf, name, fl, th);
2499         if (rc != 0)
2500                 RETURN(rc);
2501
2502         /* Note: Do not set LinkEA on sub-stripes, otherwise
2503          * it will confuse the fid2path process(see mdt_path_current()).
2504          * The linkEA between master and sub-stripes is set in
2505          * lod_xattr_set_lmv(). */
2506         if (strcmp(name, XATTR_NAME_LINK) == 0)
2507                 RETURN(0);
2508
2509         /* set xattr to each stripes, if needed */
2510         rc = lod_striping_load(env, lo);
2511         if (rc != 0)
2512                 RETURN(rc);
2513
2514         if (lo->ldo_dir_stripe_count == 0)
2515                 RETURN(0);
2516
2517         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
2518                 if (!lo->ldo_stripe[i])
2519                         continue;
2520
2521                 if (!dt_object_exists(lo->ldo_stripe[i]))
2522                         continue;
2523
2524                 rc = lod_sub_declare_xattr_set(env, lo->ldo_stripe[i],
2525                                                buf, name, fl, th);
2526                 if (rc != 0)
2527                         break;
2528         }
2529
2530         RETURN(rc);
2531 }
2532
2533 static int
2534 lod_obj_stripe_replace_parent_fid_cb(const struct lu_env *env,
2535                                      struct lod_object *lo,
2536                                      struct dt_object *dt, struct thandle *th,
2537                                      int comp_idx, int stripe_idx,
2538                                      struct lod_obj_stripe_cb_data *data)
2539 {
2540         struct lod_thread_info *info = lod_env_info(env);
2541         struct lod_layout_component *comp = &lo->ldo_comp_entries[comp_idx];
2542         struct filter_fid *ff = &info->lti_ff;
2543         struct lu_buf *buf = &info->lti_buf;
2544         int rc;
2545
2546         buf->lb_buf = ff;
2547         buf->lb_len = sizeof(*ff);
2548         rc = dt_xattr_get(env, dt, buf, XATTR_NAME_FID);
2549         if (rc < 0) {
2550                 if (rc == -ENODATA)
2551                         return 0;
2552                 return rc;
2553         }
2554
2555         /*
2556          * locd_buf is set if it's called by dir migration, which doesn't check
2557          * pfid and comp id.
2558          */
2559         if (data->locd_buf) {
2560                 memset(ff, 0, sizeof(*ff));
2561                 ff->ff_parent = *(struct lu_fid *)data->locd_buf->lb_buf;
2562         } else {
2563                 filter_fid_le_to_cpu(ff, ff, sizeof(*ff));
2564
2565                 if (lu_fid_eq(lod_object_fid(lo), &ff->ff_parent) &&
2566                     ff->ff_layout.ol_comp_id == comp->llc_id)
2567                         return 0;
2568
2569                 memset(ff, 0, sizeof(*ff));
2570                 ff->ff_parent = *lu_object_fid(&lo->ldo_obj.do_lu);
2571         }
2572
2573         /* rewrite filter_fid */
2574         ff->ff_parent.f_ver = stripe_idx;
2575         ff->ff_layout.ol_stripe_size = comp->llc_stripe_size;
2576         ff->ff_layout.ol_stripe_count = comp->llc_stripe_count;
2577         ff->ff_layout.ol_comp_id = comp->llc_id;
2578         ff->ff_layout.ol_comp_start = comp->llc_extent.e_start;
2579         ff->ff_layout.ol_comp_end = comp->llc_extent.e_end;
2580         filter_fid_cpu_to_le(ff, ff, sizeof(*ff));
2581
2582         if (data->locd_declare)
2583                 rc = lod_sub_declare_xattr_set(env, dt, buf, XATTR_NAME_FID,
2584                                                LU_XATTR_REPLACE, th);
2585         else
2586                 rc = lod_sub_xattr_set(env, dt, buf, XATTR_NAME_FID,
2587                                        LU_XATTR_REPLACE, th);
2588
2589         return rc;
2590 }
2591
2592 /**
2593  * Reset parent FID on OST object
2594  *
2595  * Replace parent FID with @dt object FID, which is only called during migration
2596  * to reset the parent FID after the MDT object is migrated to the new MDT, i.e.
2597  * the FID is changed.
2598  *
2599  * \param[in] env execution environment
2600  * \param[in] dt dt_object whose stripes's parent FID will be reset
2601  * \parem[in] th thandle
2602  * \param[in] declare if it is declare
2603  *
2604  * \retval      0 if reset succeeds
2605  * \retval      negative errno if reset fails
2606  */
2607 static int lod_replace_parent_fid(const struct lu_env *env,
2608                                   struct dt_object *dt,
2609                                   const struct lu_buf *buf,
2610                                   struct thandle *th, bool declare)
2611 {
2612         struct lod_object *lo = lod_dt_obj(dt);
2613         struct lod_thread_info  *info = lod_env_info(env);
2614         struct filter_fid *ff;
2615         struct lod_obj_stripe_cb_data data = { { 0 } };
2616         int rc;
2617         ENTRY;
2618
2619         LASSERT(S_ISREG(dt->do_lu.lo_header->loh_attr));
2620
2621         /* set xattr to each stripes, if needed */
2622         rc = lod_striping_load(env, lo);
2623         if (rc != 0)
2624                 RETURN(rc);
2625
2626         if (!lod_obj_is_striped(dt))
2627                 RETURN(0);
2628
2629         if (info->lti_ea_store_size < sizeof(*ff)) {
2630                 rc = lod_ea_store_resize(info, sizeof(*ff));
2631                 if (rc != 0)
2632                         RETURN(rc);
2633         }
2634
2635         data.locd_declare = declare;
2636         data.locd_stripe_cb = lod_obj_stripe_replace_parent_fid_cb;
2637         data.locd_buf = buf;
2638         rc = lod_obj_for_each_stripe(env, lo, th, &data);
2639
2640         RETURN(rc);
2641 }
2642
2643 __u16 lod_comp_entry_stripe_count(struct lod_object *lo,
2644                                   int comp_idx, bool is_dir)
2645 {
2646         struct lod_device *lod = lu2lod_dev(lod2lu_obj(lo)->lo_dev);
2647         struct lod_layout_component *entry;
2648
2649         if (is_dir)
2650                 return  0;
2651
2652         entry = &lo->ldo_comp_entries[comp_idx];
2653         if (lod_comp_inited(entry))
2654                 return entry->llc_stripe_count;
2655         else if ((__u16)-1 == entry->llc_stripe_count)
2656                 return lod->lod_ost_count;
2657         else
2658                 return lod_get_stripe_count(lod, lo, comp_idx,
2659                                             entry->llc_stripe_count, false);
2660 }
2661
2662 static int lod_comp_md_size(struct lod_object *lo, bool is_dir)
2663 {
2664         int magic, size = 0, i;
2665         struct lod_layout_component *comp_entries;
2666         __u16 comp_cnt;
2667         bool is_composite, is_foreign = false;
2668
2669         if (is_dir) {
2670                 comp_cnt = lo->ldo_def_striping->lds_def_comp_cnt;
2671                 comp_entries = lo->ldo_def_striping->lds_def_comp_entries;
2672                 is_composite =
2673                         lo->ldo_def_striping->lds_def_striping_is_composite;
2674         } else {
2675                 comp_cnt = lo->ldo_comp_cnt;
2676                 comp_entries = lo->ldo_comp_entries;
2677                 is_composite = lo->ldo_is_composite;
2678                 is_foreign = lo->ldo_is_foreign;
2679         }
2680
2681         if (is_foreign)
2682                 return lo->ldo_foreign_lov_size;
2683
2684         LASSERT(comp_cnt != 0 && comp_entries != NULL);
2685         if (is_composite) {
2686                 size = sizeof(struct lov_comp_md_v1) +
2687                        sizeof(struct lov_comp_md_entry_v1) * comp_cnt;
2688                 LASSERT(size % sizeof(__u64) == 0);
2689         }
2690
2691         for (i = 0; i < comp_cnt; i++) {
2692                 __u16 stripe_count;
2693
2694                 magic = comp_entries[i].llc_pool ? LOV_MAGIC_V3 : LOV_MAGIC_V1;
2695                 stripe_count = lod_comp_entry_stripe_count(lo, i, is_dir);
2696                 if (!is_dir && is_composite)
2697                         lod_comp_shrink_stripe_count(&comp_entries[i],
2698                                                      &stripe_count);
2699
2700                 size += lov_user_md_size(stripe_count, magic);
2701                 LASSERT(size % sizeof(__u64) == 0);
2702         }
2703         return size;
2704 }
2705
2706 /**
2707  * Declare component add. The xattr name is XATTR_LUSTRE_LOV.add, and
2708  * the xattr value is binary lov_comp_md_v1 which contains component(s)
2709  * to be added.
2710   *
2711  * \param[in] env       execution environment
2712  * \param[in] dt        dt_object to add components on
2713  * \param[in] buf       buffer contains components to be added
2714  * \parem[in] th        thandle
2715  *
2716  * \retval      0 on success
2717  * \retval      negative errno on failure
2718  */
2719 static int lod_declare_layout_add(const struct lu_env *env,
2720                                   struct dt_object *dt,
2721                                   const struct lu_buf *buf,
2722                                   struct thandle *th)
2723 {
2724         struct lod_thread_info  *info = lod_env_info(env);
2725         struct lod_layout_component *comp_array, *lod_comp, *old_array;
2726         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
2727         struct dt_object *next = dt_object_child(dt);
2728         struct lov_desc *desc = &d->lod_ost_descs.ltd_lov_desc;
2729         struct lod_object *lo = lod_dt_obj(dt);
2730         struct lov_user_md_v3 *v3;
2731         struct lov_comp_md_v1 *comp_v1 = buf->lb_buf;
2732         __u32 magic;
2733         int i, rc, array_cnt, old_array_cnt;
2734         ENTRY;
2735
2736         LASSERT(lo->ldo_is_composite);
2737
2738         if (lo->ldo_flr_state != LCM_FL_NONE)
2739                 RETURN(-EBUSY);
2740
2741         rc = lod_verify_striping(env, d, lo, buf, false);
2742         if (rc != 0)
2743                 RETURN(rc);
2744
2745         magic = comp_v1->lcm_magic;
2746         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
2747                 lustre_swab_lov_comp_md_v1(comp_v1);
2748                 magic = comp_v1->lcm_magic;
2749         }
2750
2751         if (magic != LOV_USER_MAGIC_COMP_V1)
2752                 RETURN(-EINVAL);
2753
2754         mutex_lock(&lo->ldo_layout_mutex);
2755
2756         array_cnt = lo->ldo_comp_cnt + comp_v1->lcm_entry_count;
2757         OBD_ALLOC_PTR_ARRAY(comp_array, array_cnt);
2758         if (comp_array == NULL) {
2759                 mutex_unlock(&lo->ldo_layout_mutex);
2760                 RETURN(-ENOMEM);
2761         }
2762
2763
2764         memcpy(comp_array, lo->ldo_comp_entries,
2765                sizeof(*comp_array) * lo->ldo_comp_cnt);
2766
2767         for (i = 0; i < comp_v1->lcm_entry_count; i++) {
2768                 struct lov_user_md_v1 *v1;
2769                 struct lu_extent *ext;
2770
2771                 v1 = (struct lov_user_md *)((char *)comp_v1 +
2772                                 comp_v1->lcm_entries[i].lcme_offset);
2773                 ext = &comp_v1->lcm_entries[i].lcme_extent;
2774
2775                 lod_comp = &comp_array[lo->ldo_comp_cnt + i];
2776                 lod_comp->llc_extent.e_start = ext->e_start;
2777                 lod_comp->llc_extent.e_end = ext->e_end;
2778                 lod_comp->llc_stripe_offset = v1->lmm_stripe_offset;
2779                 lod_comp->llc_flags = comp_v1->lcm_entries[i].lcme_flags;
2780
2781                 lod_comp->llc_stripe_count = v1->lmm_stripe_count;
2782                 lod_comp->llc_stripe_size = v1->lmm_stripe_size;
2783                 lod_adjust_stripe_info(lod_comp, desc, 0);
2784
2785                 if (v1->lmm_magic == LOV_USER_MAGIC_V3) {
2786                         v3 = (struct lov_user_md_v3 *) v1;
2787                         if (v3->lmm_pool_name[0] != '\0') {
2788                                 rc = lod_set_pool(&lod_comp->llc_pool,
2789                                                   v3->lmm_pool_name);
2790                                 if (rc)
2791                                         GOTO(error, rc);
2792                         }
2793                 }
2794         }
2795
2796         old_array = lo->ldo_comp_entries;
2797         old_array_cnt = lo->ldo_comp_cnt;
2798
2799         lo->ldo_comp_entries = comp_array;
2800         lo->ldo_comp_cnt = array_cnt;
2801
2802         /* No need to increase layout generation here, it will be increased
2803          * later when generating component ID for the new components */
2804
2805         info->lti_buf.lb_len = lod_comp_md_size(lo, false);
2806         rc = lod_sub_declare_xattr_set(env, next, &info->lti_buf,
2807                                               XATTR_NAME_LOV, 0, th);
2808         if (rc) {
2809                 lo->ldo_comp_entries = old_array;
2810                 lo->ldo_comp_cnt = old_array_cnt;
2811                 GOTO(error, rc);
2812         }
2813
2814         OBD_FREE_PTR_ARRAY(old_array, old_array_cnt);
2815
2816         LASSERT(lo->ldo_mirror_count == 1);
2817         lo->ldo_mirrors[0].lme_end = array_cnt - 1;
2818
2819         mutex_unlock(&lo->ldo_layout_mutex);
2820
2821         RETURN(0);
2822
2823 error:
2824         for (i = lo->ldo_comp_cnt; i < array_cnt; i++) {
2825                 lod_comp = &comp_array[i];
2826                 if (lod_comp->llc_pool != NULL) {
2827                         OBD_FREE(lod_comp->llc_pool,
2828                                  strlen(lod_comp->llc_pool) + 1);
2829                         lod_comp->llc_pool = NULL;
2830                 }
2831         }
2832         OBD_FREE_PTR_ARRAY(comp_array, array_cnt);
2833         mutex_unlock(&lo->ldo_layout_mutex);
2834
2835         RETURN(rc);
2836 }
2837
2838 /**
2839  * lod_last_non_stale_mirror() - Check if a mirror is the last non-stale mirror.
2840  * @mirror_id: Mirror id to be checked.
2841  * @lo:        LOD object.
2842  *
2843  * This function checks if a mirror with specified @mirror_id is the last
2844  * non-stale mirror of a LOD object @lo.
2845  *
2846  * Return: true or false.
2847  */
2848 static inline
2849 bool lod_last_non_stale_mirror(__u16 mirror_id, struct lod_object *lo)
2850 {
2851         struct lod_layout_component *lod_comp;
2852         bool has_stale_flag;
2853         int i;
2854
2855         for (i = 0; i < lo->ldo_mirror_count; i++) {
2856                 if (lo->ldo_mirrors[i].lme_id == mirror_id ||
2857                     lo->ldo_mirrors[i].lme_stale)
2858                         continue;
2859
2860                 has_stale_flag = false;
2861                 lod_foreach_mirror_comp(lod_comp, lo, i) {
2862                         if (lod_comp->llc_flags & LCME_FL_STALE) {
2863                                 has_stale_flag = true;
2864                                 break;
2865                         }
2866                 }
2867                 if (!has_stale_flag)
2868                         return false;
2869         }
2870
2871         return true;
2872 }
2873
2874 /**
2875  * Declare component set. The xattr is name XATTR_LUSTRE_LOV.set.$field,
2876  * the '$field' can only be 'flags' now. The xattr value is binary
2877  * lov_comp_md_v1 which contains the component ID(s) and the value of
2878  * the field to be modified.
2879  * Please update allowed_lustre_lov macro if $field groks more values
2880  * in the future.
2881  *
2882  * \param[in] env       execution environment
2883  * \param[in] dt        dt_object to be modified
2884  * \param[in] op        operation string, like "set.flags"
2885  * \param[in] buf       buffer contains components to be set
2886  * \parem[in] th        thandle
2887  *
2888  * \retval      0 on success
2889  * \retval      negative errno on failure
2890  */
2891 static int lod_declare_layout_set(const struct lu_env *env,
2892                                   struct dt_object *dt,
2893                                   char *op, const struct lu_buf *buf,
2894                                   struct thandle *th)
2895 {
2896         struct lod_layout_component     *lod_comp;
2897         struct lod_thread_info  *info = lod_env_info(env);
2898         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2899         struct lod_object       *lo = lod_dt_obj(dt);
2900         struct lov_comp_md_v1   *comp_v1 = buf->lb_buf;
2901         __u32   magic;
2902         int     i, j, rc;
2903         bool    changed = false;
2904         ENTRY;
2905
2906         /* Please update allowed_lustre_lov macro if op
2907          * groks more values in the future
2908          */
2909         if (strcmp(op, "set.flags") != 0) {
2910                 CDEBUG(D_LAYOUT, "%s: operation (%s) not supported.\n",
2911                        lod2obd(d)->obd_name, op);
2912                 RETURN(-ENOTSUPP);
2913         }
2914
2915         magic = comp_v1->lcm_magic;
2916         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
2917                 lustre_swab_lov_comp_md_v1(comp_v1);
2918                 magic = comp_v1->lcm_magic;
2919         }
2920
2921         if (magic != LOV_USER_MAGIC_COMP_V1)
2922                 RETURN(-EINVAL);
2923
2924         if (comp_v1->lcm_entry_count == 0) {
2925                 CDEBUG(D_LAYOUT, "%s: entry count is zero.\n",
2926                        lod2obd(d)->obd_name);
2927                 RETURN(-EINVAL);
2928         }
2929
2930         mutex_lock(&lo->ldo_layout_mutex);
2931         for (i = 0; i < comp_v1->lcm_entry_count; i++) {
2932                 __u32 id = comp_v1->lcm_entries[i].lcme_id;
2933                 __u32 flags = comp_v1->lcm_entries[i].lcme_flags;
2934                 __u32 mirror_flag = flags & LCME_MIRROR_FLAGS;
2935                 __u16 mirror_id = mirror_id_of(id);
2936                 bool neg = flags & LCME_FL_NEG;
2937
2938                 if (flags & LCME_FL_INIT) {
2939                         if (changed)
2940                                 lod_striping_free_nolock(env, lo);
2941                         mutex_unlock(&lo->ldo_layout_mutex);
2942                         RETURN(-EINVAL);
2943                 }
2944
2945                 flags &= ~(LCME_MIRROR_FLAGS | LCME_FL_NEG);
2946                 for (j = 0; j < lo->ldo_comp_cnt; j++) {
2947                         lod_comp = &lo->ldo_comp_entries[j];
2948
2949                         /* lfs only put one flag in each entry */
2950                         if ((flags && id != lod_comp->llc_id) ||
2951                             (mirror_flag && mirror_id !=
2952                                             mirror_id_of(lod_comp->llc_id)))
2953                                 continue;
2954
2955                         if (neg) {
2956                                 if (flags)
2957                                         lod_comp->llc_flags &= ~flags;
2958                                 if (mirror_flag)
2959                                         lod_comp->llc_flags &= ~mirror_flag;
2960                         } else {
2961                                 if (flags) {
2962                                         if ((flags & LCME_FL_STALE) &&
2963                                             lod_last_non_stale_mirror(mirror_id,
2964                                                                       lo)) {
2965                                                 mutex_unlock(
2966                                                         &lo->ldo_layout_mutex);
2967                                                 RETURN(-EUCLEAN);
2968                                         }
2969                                         lod_comp->llc_flags |= flags;
2970                                 }
2971                                 if (mirror_flag) {
2972                                         lod_comp->llc_flags |= mirror_flag;
2973                                         if (mirror_flag & LCME_FL_NOSYNC)
2974                                                 lod_comp->llc_timestamp =
2975                                                        ktime_get_real_seconds();
2976                                 }
2977                         }
2978                         changed = true;
2979                 }
2980         }
2981         mutex_unlock(&lo->ldo_layout_mutex);
2982
2983         if (!changed) {
2984                 CDEBUG(D_LAYOUT, "%s: requested component(s) not found.\n",
2985                        lod2obd(d)->obd_name);
2986                 RETURN(-EINVAL);
2987         }
2988
2989         lod_obj_inc_layout_gen(lo);
2990
2991         info->lti_buf.lb_len = lod_comp_md_size(lo, false);
2992         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), &info->lti_buf,
2993                                        XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
2994         RETURN(rc);
2995 }
2996
2997 /**
2998  * Declare component deletion. The xattr name is XATTR_LUSTRE_LOV.del,
2999  * and the xattr value is a unique component ID or a special lcme_id.
3000  *
3001  * \param[in] env       execution environment
3002  * \param[in] dt        dt_object to be operated on
3003  * \param[in] buf       buffer contains component ID or lcme_id
3004  * \parem[in] th        thandle
3005  *
3006  * \retval      0 on success
3007  * \retval      negative errno on failure
3008  */
3009 static int lod_declare_layout_del(const struct lu_env *env,
3010                                   struct dt_object *dt,
3011                                   const struct lu_buf *buf,
3012                                   struct thandle *th)
3013 {
3014         struct lod_thread_info  *info = lod_env_info(env);
3015         struct dt_object *next = dt_object_child(dt);
3016         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
3017         struct lod_object *lo = lod_dt_obj(dt);
3018         struct lu_attr *attr = &lod_env_info(env)->lti_attr;
3019         struct lov_comp_md_v1 *comp_v1 = buf->lb_buf;
3020         __u32 magic, id, flags, neg_flags = 0;
3021         int rc, i, j, left;
3022         ENTRY;
3023
3024         LASSERT(lo->ldo_is_composite);
3025
3026         if (lo->ldo_flr_state != LCM_FL_NONE)
3027                 RETURN(-EBUSY);
3028
3029         magic = comp_v1->lcm_magic;
3030         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
3031                 lustre_swab_lov_comp_md_v1(comp_v1);
3032                 magic = comp_v1->lcm_magic;
3033         }
3034
3035         if (magic != LOV_USER_MAGIC_COMP_V1)
3036                 RETURN(-EINVAL);
3037
3038         id = comp_v1->lcm_entries[0].lcme_id;
3039         flags = comp_v1->lcm_entries[0].lcme_flags;
3040
3041         if (id > LCME_ID_MAX || (flags & ~LCME_KNOWN_FLAGS)) {
3042                 CDEBUG(D_LAYOUT, "%s: invalid component id %#x, flags %#x\n",
3043                        lod2obd(d)->obd_name, id, flags);
3044                 RETURN(-EINVAL);
3045         }
3046
3047         if (id != LCME_ID_INVAL && flags != 0) {
3048                 CDEBUG(D_LAYOUT, "%s: specified both id and flags.\n",
3049                        lod2obd(d)->obd_name);
3050                 RETURN(-EINVAL);
3051         }
3052
3053         if (id == LCME_ID_INVAL && !flags) {
3054                 CDEBUG(D_LAYOUT, "%s: no id or flags specified.\n",
3055                        lod2obd(d)->obd_name);
3056                 RETURN(-EINVAL);
3057         }
3058
3059         if (flags & LCME_FL_NEG) {
3060                 neg_flags = flags & ~LCME_FL_NEG;
3061                 flags = 0;
3062         }
3063
3064         mutex_lock(&lo->ldo_layout_mutex);
3065
3066         left = lo->ldo_comp_cnt;
3067         if (left <= 0) {
3068                 mutex_unlock(&lo->ldo_layout_mutex);
3069                 RETURN(-EINVAL);
3070         }
3071
3072         for (i = (lo->ldo_comp_cnt - 1); i >= 0; i--) {
3073                 struct lod_layout_component *lod_comp;
3074
3075                 lod_comp = &lo->ldo_comp_entries[i];
3076
3077                 if (id != LCME_ID_INVAL && id != lod_comp->llc_id)
3078                         continue;
3079                 else if (flags && !(flags & lod_comp->llc_flags))
3080                         continue;
3081                 else if (neg_flags && (neg_flags & lod_comp->llc_flags))
3082                         continue;
3083
3084                 if (left != (i + 1)) {
3085                         CDEBUG(D_LAYOUT, "%s: this deletion will create "
3086                                "a hole.\n", lod2obd(d)->obd_name);
3087                         mutex_unlock(&lo->ldo_layout_mutex);
3088                         RETURN(-EINVAL);
3089                 }
3090                 left--;
3091
3092                 /* Mark the component as deleted */
3093                 lod_comp->llc_id = LCME_ID_INVAL;
3094
3095                 /* Not instantiated component */
3096                 if (lod_comp->llc_stripe == NULL)
3097                         continue;
3098
3099                 LASSERT(lod_comp->llc_stripe_count > 0);
3100                 for (j = 0; j < lod_comp->llc_stripe_count; j++) {
3101                         struct dt_object *obj = lod_comp->llc_stripe[j];
3102
3103                         if (obj == NULL)
3104                                 continue;
3105                         rc = lod_sub_declare_destroy(env, obj, th);
3106                         if (rc) {
3107                                 mutex_unlock(&lo->ldo_layout_mutex);
3108                                 RETURN(rc);
3109                         }
3110                 }
3111         }
3112
3113         LASSERTF(left >= 0, "left = %d\n", left);
3114         if (left == lo->ldo_comp_cnt) {
3115                 CDEBUG(D_LAYOUT, "%s: requested component id:%#x not found\n",
3116                        lod2obd(d)->obd_name, id);
3117                 mutex_unlock(&lo->ldo_layout_mutex);
3118                 RETURN(-EINVAL);
3119         }
3120
3121         mutex_unlock(&lo->ldo_layout_mutex);
3122
3123         memset(attr, 0, sizeof(*attr));
3124         attr->la_valid = LA_SIZE;
3125         rc = lod_sub_declare_attr_set(env, next, attr, th);
3126         if (rc)
3127                 RETURN(rc);
3128
3129         if (left > 0) {
3130                 info->lti_buf.lb_len = lod_comp_md_size(lo, false);
3131                 rc = lod_sub_declare_xattr_set(env, next, &info->lti_buf,
3132                                                XATTR_NAME_LOV, 0, th);
3133         } else {
3134                 rc = lod_sub_declare_xattr_del(env, next, XATTR_NAME_LOV, th);
3135         }
3136
3137         RETURN(rc);
3138 }
3139
3140 /**
3141  * Declare layout add/set/del operations issued by special xattr names:
3142  *
3143  * XATTR_LUSTRE_LOV.add         add component(s) to existing file
3144  * XATTR_LUSTRE_LOV.del         delete component(s) from existing file
3145  * XATTR_LUSTRE_LOV.set.$field  set specified field of certain component(s)
3146  *
3147  * \param[in] env       execution environment
3148  * \param[in] dt        object
3149  * \param[in] name      name of xattr
3150  * \param[in] buf       lu_buf contains xattr value
3151  * \param[in] th        transaction handle
3152  *
3153  * \retval              0 on success
3154  * \retval              negative if failed
3155  */
3156 static int lod_declare_modify_layout(const struct lu_env *env,
3157                                      struct dt_object *dt,
3158                                      const char *name,
3159                                      const struct lu_buf *buf,
3160                                      struct thandle *th)
3161 {
3162         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
3163         struct lod_object *lo = lod_dt_obj(dt);
3164         char *op;
3165         int rc, len = strlen(XATTR_LUSTRE_LOV);
3166         ENTRY;
3167
3168         LASSERT(dt_object_exists(dt));
3169
3170         if (strlen(name) <= len || name[len] != '.') {
3171                 CDEBUG(D_LAYOUT, "%s: invalid xattr name: %s\n",
3172                        lod2obd(d)->obd_name, name);
3173                 RETURN(-EINVAL);
3174         }
3175         len++;
3176
3177         rc = lod_striping_load(env, lo);
3178         if (rc)
3179                 GOTO(unlock, rc);
3180
3181         /* the layout to be modified must be a composite layout */
3182         if (!lo->ldo_is_composite) {
3183                 CDEBUG(D_LAYOUT, "%s: object "DFID" isn't a composite file.\n",
3184                        lod2obd(d)->obd_name, PFID(lu_object_fid(&dt->do_lu)));
3185                 GOTO(unlock, rc = -EINVAL);
3186         }
3187
3188         op = (char *)name + len;
3189         if (strcmp(op, "add") == 0) {
3190                 rc = lod_declare_layout_add(env, dt, buf, th);
3191         } else if (strcmp(op, "del") == 0) {
3192                 rc = lod_declare_layout_del(env, dt, buf, th);
3193         } else if (strncmp(op, "set", strlen("set")) == 0) {
3194                 rc = lod_declare_layout_set(env, dt, op, buf, th);
3195         } else  {
3196                 CDEBUG(D_LAYOUT, "%s: unsupported xattr name:%s\n",
3197                        lod2obd(d)->obd_name, name);
3198                 GOTO(unlock, rc = -ENOTSUPP);
3199         }
3200 unlock:
3201         if (rc)
3202                 lod_striping_free(env, lo);
3203
3204         RETURN(rc);
3205 }
3206
3207 /**
3208  * Convert a plain file lov_mds_md to a composite layout.
3209  *
3210  * \param[in,out] info  the thread info::lti_ea_store buffer contains little
3211  *                      endian plain file layout
3212  *
3213  * \retval              0 on success, <0 on failure
3214  */
3215 static int lod_layout_convert(struct lod_thread_info *info)
3216 {
3217         struct lov_mds_md *lmm = info->lti_ea_store;
3218         struct lov_mds_md *lmm_save;
3219         struct lov_comp_md_v1 *lcm;
3220         struct lov_comp_md_entry_v1 *lcme;
3221         size_t size;
3222         __u32 blob_size;
3223         int rc = 0;
3224         ENTRY;
3225
3226         /* realloc buffer to a composite layout which contains one component */
3227         blob_size = lov_mds_md_size(le16_to_cpu(lmm->lmm_stripe_count),
3228                                     le32_to_cpu(lmm->lmm_magic));
3229         size = sizeof(*lcm) + sizeof(*lcme) + blob_size;
3230
3231         OBD_ALLOC_LARGE(lmm_save, blob_size);
3232         if (!lmm_save)
3233                 GOTO(out, rc = -ENOMEM);
3234
3235         memcpy(lmm_save, lmm, blob_size);
3236
3237         if (info->lti_ea_store_size < size) {
3238                 rc = lod_ea_store_resize(info, size);
3239                 if (rc)
3240                         GOTO(out, rc);
3241         }
3242
3243         lcm = info->lti_ea_store;
3244         memset(lcm, 0, sizeof(*lcm) + sizeof(*lcme));
3245         lcm->lcm_magic = cpu_to_le32(LOV_MAGIC_COMP_V1);
3246         lcm->lcm_size = cpu_to_le32(size);
3247         lcm->lcm_layout_gen = cpu_to_le32(le16_to_cpu(
3248                                                 lmm_save->lmm_layout_gen));
3249         lcm->lcm_flags = cpu_to_le16(LCM_FL_NONE);
3250         lcm->lcm_entry_count = cpu_to_le16(1);
3251
3252         lcme = &lcm->lcm_entries[0];
3253         lcme->lcme_flags = cpu_to_le32(LCME_FL_INIT);
3254         lcme->lcme_extent.e_start = 0;
3255         lcme->lcme_extent.e_end = cpu_to_le64(OBD_OBJECT_EOF);
3256         lcme->lcme_offset = cpu_to_le32(sizeof(*lcm) + sizeof(*lcme));
3257         lcme->lcme_size = cpu_to_le32(blob_size);
3258
3259         memcpy((char *)lcm + lcme->lcme_offset, (char *)lmm_save, blob_size);
3260
3261         EXIT;
3262 out:
3263         if (lmm_save)
3264                 OBD_FREE_LARGE(lmm_save, blob_size);
3265         return rc;
3266 }
3267
3268 /**
3269  * Merge layouts to form a mirrored file.
3270  */
3271 static int lod_declare_layout_merge(const struct lu_env *env,
3272                 struct dt_object *dt, const struct lu_buf *mbuf,
3273                 struct thandle *th)
3274 {
3275         struct lod_thread_info *info = lod_env_info(env);
3276         struct lu_attr *layout_attr = &info->lti_layout_attr;
3277         struct lu_buf *buf = &info->lti_buf;
3278         struct lod_object *lo = lod_dt_obj(dt);
3279         struct lov_comp_md_v1 *lcm;
3280         struct lov_comp_md_v1 *cur_lcm;
3281         struct lov_comp_md_v1 *merge_lcm;
3282         struct lov_comp_md_entry_v1 *lcme;
3283         struct lov_mds_md_v1 *lmm;
3284         size_t size = 0;
3285         size_t offset;
3286         __u16 cur_entry_count;
3287         __u16 merge_entry_count;
3288         __u32 id = 0;
3289         __u16 mirror_id = 0;
3290         __u32 mirror_count;
3291         int rc, i;
3292         bool merge_has_dom;
3293
3294         ENTRY;
3295
3296         merge_lcm = mbuf->lb_buf;
3297         if (mbuf->lb_len < sizeof(*merge_lcm))
3298                 RETURN(-EINVAL);
3299
3300         /* must be an existing layout from disk */
3301         if (le32_to_cpu(merge_lcm->lcm_magic) != LOV_MAGIC_COMP_V1)
3302                 RETURN(-EINVAL);
3303
3304         merge_entry_count = le16_to_cpu(merge_lcm->lcm_entry_count);
3305
3306         /* do not allow to merge two mirrored files */
3307         if (le16_to_cpu(merge_lcm->lcm_mirror_count))
3308                 RETURN(-EBUSY);
3309
3310         /* verify the target buffer */
3311         rc = lod_get_lov_ea(env, lo);
3312         if (rc <= 0)
3313                 RETURN(rc ? : -ENODATA);
3314
3315         cur_lcm = info->lti_ea_store;
3316         switch (le32_to_cpu(cur_lcm->lcm_magic)) {
3317         case LOV_MAGIC_V1:
3318         case LOV_MAGIC_V3:
3319                 rc = lod_layout_convert(info);
3320                 break;
3321         case LOV_MAGIC_COMP_V1:
3322         case LOV_MAGIC_SEL:
3323                 rc = 0;
3324                 break;
3325         default:
3326                 rc = -EINVAL;
3327         }
3328         if (rc)
3329                 RETURN(rc);
3330
3331         /* info->lti_ea_store could be reallocated in lod_layout_convert() */
3332         cur_lcm = info->lti_ea_store;
3333         cur_entry_count = le16_to_cpu(cur_lcm->lcm_entry_count);
3334
3335         /* 'lcm_mirror_count + 1' is the current # of mirrors the file has */
3336         mirror_count = le16_to_cpu(cur_lcm->lcm_mirror_count) + 1;
3337         if (mirror_count + 1 > LUSTRE_MIRROR_COUNT_MAX)
3338                 RETURN(-ERANGE);
3339
3340         /* size of new layout */
3341         size = le32_to_cpu(cur_lcm->lcm_size) +
3342                le32_to_cpu(merge_lcm->lcm_size) - sizeof(*cur_lcm);
3343
3344         memset(buf, 0, sizeof(*buf));
3345         lu_buf_alloc(buf, size);
3346         if (buf->lb_buf == NULL)
3347                 RETURN(-ENOMEM);
3348
3349         lcm = buf->lb_buf;
3350         memcpy(lcm, cur_lcm, sizeof(*lcm) + cur_entry_count * sizeof(*lcme));
3351
3352         offset = sizeof(*lcm) +
3353                  sizeof(*lcme) * (cur_entry_count + merge_entry_count);
3354         for (i = 0; i < cur_entry_count; i++) {
3355                 struct lov_comp_md_entry_v1 *cur_lcme;
3356
3357                 lcme = &lcm->lcm_entries[i];
3358                 cur_lcme = &cur_lcm->lcm_entries[i];
3359
3360                 lcme->lcme_offset = cpu_to_le32(offset);
3361                 memcpy((char *)lcm + offset,
3362                        (char *)cur_lcm + le32_to_cpu(cur_lcme->lcme_offset),
3363                        le32_to_cpu(lcme->lcme_size));
3364
3365                 offset += le32_to_cpu(lcme->lcme_size);
3366
3367                 if (mirror_count == 1 &&
3368                     mirror_id_of(le32_to_cpu(lcme->lcme_id)) == 0) {
3369                         /* Add mirror from a non-flr file, create new mirror ID.
3370                          * Otherwise, keep existing mirror's component ID, used
3371                          * for mirror extension.
3372                          */
3373                         id = pflr_id(1, i + 1);
3374                         lcme->lcme_id = cpu_to_le32(id);
3375                 }
3376
3377                 id = max(le32_to_cpu(lcme->lcme_id), id);
3378         }
3379
3380         mirror_id = mirror_id_of(id) + 1;
3381
3382         /* check if first entry in new layout is DOM */
3383         lmm = (struct lov_mds_md_v1 *)((char *)merge_lcm +
3384                                         merge_lcm->lcm_entries[0].lcme_offset);
3385         merge_has_dom = lov_pattern(le32_to_cpu(lmm->lmm_pattern)) ==
3386                         LOV_PATTERN_MDT;
3387
3388         for (i = 0; i < merge_entry_count; i++) {
3389                 struct lov_comp_md_entry_v1 *merge_lcme;
3390
3391                 merge_lcme = &merge_lcm->lcm_entries[i];
3392                 lcme = &lcm->lcm_entries[cur_entry_count + i];
3393
3394                 *lcme = *merge_lcme;
3395                 lcme->lcme_offset = cpu_to_le32(offset);
3396                 if (merge_has_dom && i == 0)
3397                         lcme->lcme_flags |= cpu_to_le32(LCME_FL_STALE);
3398
3399                 id = pflr_id(mirror_id, i + 1);
3400                 lcme->lcme_id = cpu_to_le32(id);
3401
3402                 memcpy((char *)lcm + offset,
3403                        (char *)merge_lcm + le32_to_cpu(merge_lcme->lcme_offset),
3404                        le32_to_cpu(lcme->lcme_size));
3405
3406                 offset += le32_to_cpu(lcme->lcme_size);
3407         }
3408
3409         /* fixup layout information */
3410         lcm->lcm_size = cpu_to_le32(size);
3411         lcm->lcm_entry_count = cpu_to_le16(cur_entry_count + merge_entry_count);
3412         lcm->lcm_mirror_count = cpu_to_le16(mirror_count);
3413         if ((le16_to_cpu(lcm->lcm_flags) & LCM_FL_FLR_MASK) == LCM_FL_NONE)
3414                 lcm->lcm_flags = cpu_to_le32(LCM_FL_RDONLY);
3415
3416         rc = lod_striping_reload(env, lo, buf);
3417         if (rc)
3418                 GOTO(out, rc);
3419
3420         lod_obj_inc_layout_gen(lo);
3421         lcm->lcm_layout_gen = cpu_to_le32(lo->ldo_layout_gen);
3422
3423         /* transfer layout version to OST objects. */
3424         if (lo->ldo_mirror_count > 1) {
3425                 struct lod_obj_stripe_cb_data data = { {0} };
3426
3427                 layout_attr->la_valid = LA_LAYOUT_VERSION;
3428                 layout_attr->la_layout_version = 0;
3429                 data.locd_attr = layout_attr;
3430                 data.locd_declare = true;
3431                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
3432                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
3433                 if (rc)
3434                         GOTO(out, rc);
3435         }
3436
3437         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), buf,
3438                                         XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
3439
3440 out:
3441         lu_buf_free(buf);
3442         RETURN(rc);
3443 }
3444
3445 /**
3446  * Split layouts, just set the LOVEA with the layout from mbuf.
3447  */
3448 static int lod_declare_layout_split(const struct lu_env *env,
3449                 struct dt_object *dt, const struct lu_buf *mbuf,
3450                 struct thandle *th)
3451 {
3452         struct lod_thread_info *info = lod_env_info(env);
3453         struct lu_attr *layout_attr = &info->lti_layout_attr;
3454         struct lod_object *lo = lod_dt_obj(dt);
3455         struct lov_comp_md_v1 *lcm = mbuf->lb_buf;
3456         int rc;
3457         ENTRY;
3458
3459         rc = lod_striping_reload(env, lo, mbuf);
3460         if (rc)
3461                 RETURN(rc);
3462
3463         lod_obj_inc_layout_gen(lo);
3464         /* fix on-disk layout gen */
3465         lcm->lcm_layout_gen = cpu_to_le32(lo->ldo_layout_gen);
3466
3467
3468         /* transfer layout version to OST objects. */
3469         if (lo->ldo_mirror_count > 1) {
3470                 struct lod_obj_stripe_cb_data data = { {0} };
3471
3472                 layout_attr->la_valid = LA_LAYOUT_VERSION;
3473                 layout_attr->la_layout_version = 0;
3474                 data.locd_attr = layout_attr;
3475                 data.locd_declare = true;
3476                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
3477                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
3478                 if (rc)
3479                         RETURN(rc);
3480         }
3481
3482         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), mbuf,
3483                                        XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
3484         RETURN(rc);
3485 }
3486
3487 static int lod_layout_declare_or_purge_mirror(const struct lu_env *env,
3488                         struct dt_object *dt, const struct lu_buf *buf,
3489                         struct thandle *th, bool declare)
3490 {
3491         struct lod_thread_info *info = lod_env_info(env);
3492         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
3493         struct lod_object *lo = lod_dt_obj(dt);
3494         struct lov_comp_md_v1 *comp_v1 = buf->lb_buf;
3495         struct lov_comp_md_entry_v1 *entry;
3496         struct lov_mds_md_v1 *lmm;
3497         struct dt_object **sub_objs = NULL;
3498         int rc = 0, i, k, array_count = 0;
3499
3500         ENTRY;
3501
3502         /**
3503          * other ops (like lod_declare_destroy) could destroying sub objects
3504          * as well.
3505          */
3506         mutex_lock(&lo->ldo_layout_mutex);
3507
3508         if (!declare) {
3509                 /* prepare sub-objects array */
3510                 for (i = 0; i < comp_v1->lcm_entry_count; i++) {
3511                         entry = &comp_v1->lcm_entries[i];
3512
3513                         if (!(entry->lcme_flags & LCME_FL_INIT))
3514                                 continue;
3515
3516                         lmm = (struct lov_mds_md_v1 *)
3517                                         ((char *)comp_v1 + entry->lcme_offset);
3518                         array_count += lmm->lmm_stripe_count;
3519                 }
3520                 OBD_ALLOC_PTR_ARRAY(sub_objs, array_count);
3521                 if (sub_objs == NULL) {
3522                         mutex_unlock(&lo->ldo_layout_mutex);
3523                         RETURN(-ENOMEM);
3524                 }
3525         }
3526
3527         k = 0;  /* sub_objs index */
3528         for (i = 0; i < comp_v1->lcm_entry_count; i++) {
3529                 struct lov_ost_data_v1 *objs;
3530                 struct lu_object *o, *n;
3531                 struct dt_object *dto;
3532                 struct lu_device *nd;
3533                 struct lov_mds_md_v3 *v3;
3534                 __u32 idx;
3535                 int j;
3536
3537                 entry = &comp_v1->lcm_entries[i];
3538
3539                 if (!(entry->lcme_flags & LCME_FL_INIT))
3540                         continue;
3541
3542                 lmm = (struct lov_mds_md_v1 *)
3543                                 ((char *)comp_v1 + entry->lcme_offset);
3544                 v3 = (struct lov_mds_md_v3 *)lmm;
3545                 if (lmm->lmm_magic == LOV_MAGIC_V3)
3546                         objs = &v3->lmm_objects[0];
3547                 else
3548                         objs = &lmm->lmm_objects[0];
3549
3550                 for (j = 0; j < lmm->lmm_stripe_count; j++) {
3551                         idx = objs[j].l_ost_idx;
3552                         rc = ostid_to_fid(&info->lti_fid, &objs[j].l_ost_oi,
3553                                           idx);
3554                         if (rc)
3555                                 GOTO(out, rc);
3556
3557                         if (!fid_is_sane(&info->lti_fid)) {
3558                                 CERROR("%s: sub-object insane fid "DFID"\n",
3559                                        lod2obd(d)->obd_name,
3560                                        PFID(&info->lti_fid));
3561                                 GOTO(out, rc = -EINVAL);
3562                         }
3563
3564                         lod_getref(&d->lod_ost_descs);
3565
3566                         rc = validate_lod_and_idx(d, idx);
3567                         if (unlikely(rc)) {
3568                                 lod_putref(d, &d->lod_ost_descs);
3569                                 GOTO(out, rc);
3570                         }
3571
3572                         nd = &OST_TGT(d, idx)->ltd_tgt->dd_lu_dev;
3573                         lod_putref(d, &d->lod_ost_descs);
3574
3575                         o = lu_object_find_at(env, nd, &info->lti_fid, NULL);
3576                         if (IS_ERR(o))
3577                                 GOTO(out, rc = PTR_ERR(o));
3578
3579                         n = lu_object_locate(o->lo_header, nd->ld_type);
3580                         if (unlikely(!n)) {
3581                                 lu_object_put(env, n);
3582                                 GOTO(out, rc = -ENOENT);
3583                         }
3584
3585                         dto = container_of(n, struct dt_object, do_lu);
3586
3587                         if (declare) {
3588                                 rc = lod_sub_declare_destroy(env, dto, th);
3589                                 dt_object_put(env, dto);
3590                                 if (rc)
3591                                         GOTO(out, rc);
3592                         } else {
3593                                 /**
3594                                  * collect to-be-destroyed sub objects, the
3595                                  * reference would be released after actual
3596                                  * deletion.
3597                                  */
3598                                 sub_objs[k] = dto;
3599                                 k++;
3600                         }
3601                 } /* for each stripe */
3602         } /* for each component in the mirror */
3603 out:
3604         if (!declare) {
3605                 i = 0;
3606                 if (!rc) {
3607                         /* destroy the sub objects */
3608                         for (; i < k; i++) {
3609                                 rc = lod_sub_destroy(env, sub_objs[i], th);
3610                                 if (rc)
3611                                         break;
3612                                 dt_object_put(env, sub_objs[i]);
3613                         }
3614                 }
3615                 /**
3616                  * if a sub object destroy failed, we'd release sub objects
3617                  * reference get from above sub_objs collection.
3618                  */
3619                 for (; i < k; i++)
3620                         dt_object_put(env, sub_objs[i]);
3621
3622                 OBD_FREE_PTR_ARRAY(sub_objs, array_count);
3623         }
3624         mutex_unlock(&lo->ldo_layout_mutex);
3625
3626         RETURN(rc);
3627 }
3628
3629 /**
3630  * Purge layouts, delete sub objects in the mirror stored in the vic_buf,
3631  * and set the LOVEA with the layout from mbuf.
3632  */
3633 static int lod_declare_layout_purge(const struct lu_env *env,
3634                 struct dt_object *dt, const struct lu_buf *buf,
3635                 struct thandle *th)
3636 {
3637         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
3638         struct lov_comp_md_v1 *comp_v1 = buf->lb_buf;
3639         int rc;
3640
3641         ENTRY;
3642
3643         if (le32_to_cpu(comp_v1->lcm_magic) != LOV_MAGIC_COMP_V1) {
3644                 CERROR("%s: invalid layout magic %#x != %#x\n",
3645                        lod2obd(d)->obd_name, le32_to_cpu(comp_v1->lcm_magic),
3646                        LOV_MAGIC_COMP_V1);
3647                 RETURN(-EINVAL);
3648         }
3649
3650         if (cpu_to_le32(LOV_MAGIC_COMP_V1) != LOV_MAGIC_COMP_V1)
3651                 lustre_swab_lov_comp_md_v1(comp_v1);
3652
3653         /* from now on, @buf contains cpu endian data */
3654
3655         if (comp_v1->lcm_mirror_count != 0) {
3656                 CERROR("%s: can only purge one mirror from "DFID"\n",
3657                        lod2obd(d)->obd_name, PFID(lu_object_fid(&dt->do_lu)));
3658                 RETURN(-EINVAL);
3659         }
3660
3661         /* delcare sub objects deletion in the mirror stored in @buf */
3662         rc = lod_layout_declare_or_purge_mirror(env, dt, buf, th, true);
3663         RETURN(rc);
3664 }
3665
3666 /* delete sub objects from the mirror stored in @buf */
3667 static int lod_layout_purge(const struct lu_env *env, struct dt_object *dt,
3668                             const struct lu_buf *buf, struct thandle *th)
3669 {
3670         int rc;
3671
3672         ENTRY;
3673         rc = lod_layout_declare_or_purge_mirror(env, dt, buf, th, false);
3674         RETURN(rc);
3675 }
3676
3677 /**
3678  * Implementation of dt_object_operations::do_declare_xattr_set.
3679  *
3680  * \see dt_object_operations::do_declare_xattr_set() in the API description
3681  * for details.
3682  *
3683  * the extension to the API:
3684  *   - declaring LOVEA requests striping creation
3685  *   - LU_XATTR_REPLACE means layout swap
3686  */
3687 static int lod_declare_xattr_set(const struct lu_env *env,
3688                                  struct dt_object *dt,
3689                                  const struct lu_buf *buf,
3690                                  const char *name, int fl,
3691                                  struct thandle *th)
3692 {
3693         struct dt_object *next = dt_object_child(dt);
3694         struct lu_attr   *attr = &lod_env_info(env)->lti_attr;
3695         __u32             mode;
3696         int               rc;
3697         ENTRY;
3698
3699         mode = dt->do_lu.lo_header->loh_attr & S_IFMT;
3700         if ((S_ISREG(mode) || mode == 0) &&
3701             !(fl & (LU_XATTR_REPLACE | LU_XATTR_MERGE | LU_XATTR_SPLIT |
3702                     LU_XATTR_PURGE)) &&
3703             (strcmp(name, XATTR_NAME_LOV) == 0 ||
3704              strcmp(name, XATTR_LUSTRE_LOV) == 0)) {
3705                 /*
3706                  * this is a request to create object's striping.
3707                  *
3708                  * allow to declare predefined striping on a new (!mode) object
3709                  * which is supposed to be replay of regular file creation
3710                  * (when LOV setting is declared)
3711