Whamcloud - gitweb
91b901b65199bb9fbf534a8b7db8d6365b81729f
[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, int ign)
102 {
103         return lod_sub_insert(env, dt_object_child(dt), rec, key, th, ign);
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 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_it_ops::init.
371  *
372  * Used with striped objects. Internally just initializes the iterator
373  * on the first stripe.
374  *
375  * \see dt_it_ops::init() in the API description for details.
376  */
377 static struct dt_it *lod_striped_it_init(const struct lu_env *env,
378                                          struct dt_object *dt, __u32 attr)
379 {
380         struct lod_object       *lo = lod_dt_obj(dt);
381         struct dt_object        *next;
382         struct lod_it           *it = &lod_env_info(env)->lti_it;
383         struct dt_it            *it_next;
384         ENTRY;
385
386         LASSERT(lo->ldo_dir_stripe_count > 0);
387         next = lo->ldo_stripe[0];
388         LASSERT(next != NULL);
389         LASSERT(next->do_index_ops != NULL);
390
391         it_next = next->do_index_ops->dio_it.init(env, next, attr);
392         if (IS_ERR(it_next))
393                 return it_next;
394
395         /* currently we do not use more than one iterator per thread
396          * so we store it in thread info. if at some point we need
397          * more active iterators in a single thread, we can allocate
398          * additional ones */
399         LASSERT(it->lit_obj == NULL);
400
401         it->lit_stripe_index = 0;
402         it->lit_attr = attr;
403         it->lit_it = it_next;
404         it->lit_obj = dt;
405
406         return (struct dt_it *)it;
407 }
408
409 #define LOD_CHECK_STRIPED_IT(env, it, lo)                               \
410 do {                                                                    \
411         LASSERT((it)->lit_obj != NULL);                                 \
412         LASSERT((it)->lit_it != NULL);                                  \
413         LASSERT((lo)->ldo_dir_stripe_count > 0);                        \
414         LASSERT((it)->lit_stripe_index < (lo)->ldo_dir_stripe_count);   \
415 } while (0)
416
417 /**
418  * Implementation of dt_it_ops::fini.
419  *
420  * Used with striped objects.
421  *
422  * \see dt_it_ops::fini() in the API description for details.
423  */
424 static void lod_striped_it_fini(const struct lu_env *env, struct dt_it *di)
425 {
426         struct lod_it           *it = (struct lod_it *)di;
427         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
428         struct dt_object        *next;
429
430         /* If lit_it == NULL, then it means the sub_it has been finished,
431          * which only happens in failure cases, see lod_striped_it_next() */
432         if (it->lit_it != NULL) {
433                 LOD_CHECK_STRIPED_IT(env, it, lo);
434
435                 next = lo->ldo_stripe[it->lit_stripe_index];
436                 LASSERT(next != NULL);
437                 LASSERT(next->do_index_ops != NULL);
438
439                 next->do_index_ops->dio_it.fini(env, it->lit_it);
440         }
441
442         /* the iterator not in use any more */
443         it->lit_obj = NULL;
444         it->lit_it = NULL;
445         it->lit_stripe_index = 0;
446 }
447
448 /**
449  * Implementation of dt_it_ops::get.
450  *
451  * Right now it's not used widely, only to reset the iterator to the
452  * initial position. It should be possible to implement a full version
453  * which chooses a correct stripe to be able to position with any key.
454  *
455  * \see dt_it_ops::get() in the API description for details.
456  */
457 static int lod_striped_it_get(const struct lu_env *env, struct dt_it *di,
458                               const struct dt_key *key)
459 {
460         const struct lod_it     *it = (const struct lod_it *)di;
461         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
462         struct dt_object        *next;
463         ENTRY;
464
465         LOD_CHECK_STRIPED_IT(env, it, lo);
466
467         next = lo->ldo_stripe[it->lit_stripe_index];
468         LASSERT(next != NULL);
469         LASSERT(next->do_index_ops != NULL);
470
471         return next->do_index_ops->dio_it.get(env, it->lit_it, key);
472 }
473
474 /**
475  * Implementation of dt_it_ops::put.
476  *
477  * Used with striped objects.
478  *
479  * \see dt_it_ops::put() in the API description for details.
480  */
481 static void lod_striped_it_put(const struct lu_env *env, struct dt_it *di)
482 {
483         struct lod_it           *it = (struct lod_it *)di;
484         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
485         struct dt_object        *next;
486
487         LOD_CHECK_STRIPED_IT(env, it, lo);
488
489         next = lo->ldo_stripe[it->lit_stripe_index];
490         LASSERT(next != NULL);
491         LASSERT(next->do_index_ops != NULL);
492
493         return next->do_index_ops->dio_it.put(env, it->lit_it);
494 }
495
496 /**
497  * Implementation of dt_it_ops::next.
498  *
499  * Used with striped objects. When the end of the current stripe is
500  * reached, the method takes the next stripe's iterator.
501  *
502  * \see dt_it_ops::next() in the API description for details.
503  */
504 static int lod_striped_it_next(const struct lu_env *env, struct dt_it *di)
505 {
506         struct lod_it           *it = (struct lod_it *)di;
507         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
508         struct dt_object        *next;
509         struct dt_it            *it_next;
510         int                     rc;
511         ENTRY;
512
513         LOD_CHECK_STRIPED_IT(env, it, lo);
514
515         next = lo->ldo_stripe[it->lit_stripe_index];
516         LASSERT(next != NULL);
517         LASSERT(next->do_index_ops != NULL);
518 again:
519         rc = next->do_index_ops->dio_it.next(env, it->lit_it);
520         if (rc < 0)
521                 RETURN(rc);
522
523         if (rc == 0 && it->lit_stripe_index == 0)
524                 RETURN(rc);
525
526         if (rc == 0 && it->lit_stripe_index > 0) {
527                 struct lu_dirent *ent;
528
529                 ent = (struct lu_dirent *)lod_env_info(env)->lti_key;
530
531                 rc = next->do_index_ops->dio_it.rec(env, it->lit_it,
532                                                     (struct dt_rec *)ent,
533                                                     it->lit_attr);
534                 if (rc != 0)
535                         RETURN(rc);
536
537                 /* skip . and .. for slave stripe */
538                 if ((strncmp(ent->lde_name, ".",
539                              le16_to_cpu(ent->lde_namelen)) == 0 &&
540                      le16_to_cpu(ent->lde_namelen) == 1) ||
541                     (strncmp(ent->lde_name, "..",
542                              le16_to_cpu(ent->lde_namelen)) == 0 &&
543                      le16_to_cpu(ent->lde_namelen) == 2))
544                         goto again;
545
546                 RETURN(rc);
547         }
548
549         /* go to next stripe */
550         if (it->lit_stripe_index + 1 >= lo->ldo_dir_stripe_count)
551                 RETURN(1);
552
553         it->lit_stripe_index++;
554
555         next->do_index_ops->dio_it.put(env, it->lit_it);
556         next->do_index_ops->dio_it.fini(env, it->lit_it);
557         it->lit_it = NULL;
558
559         next = lo->ldo_stripe[it->lit_stripe_index];
560         LASSERT(next != NULL);
561         rc = next->do_ops->do_index_try(env, next, &dt_directory_features);
562         if (rc != 0)
563                 RETURN(rc);
564
565         LASSERT(next->do_index_ops != NULL);
566
567         it_next = next->do_index_ops->dio_it.init(env, next, it->lit_attr);
568         if (!IS_ERR(it_next)) {
569                 it->lit_it = it_next;
570                 goto again;
571         } else {
572                 rc = PTR_ERR(it_next);
573         }
574
575         RETURN(rc);
576 }
577
578 /**
579  * Implementation of dt_it_ops::key.
580  *
581  * Used with striped objects.
582  *
583  * \see dt_it_ops::key() in the API description for details.
584  */
585 static struct dt_key *lod_striped_it_key(const struct lu_env *env,
586                                          const struct dt_it *di)
587 {
588         const struct lod_it     *it = (const struct lod_it *)di;
589         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
590         struct dt_object        *next;
591
592         LOD_CHECK_STRIPED_IT(env, it, lo);
593
594         next = lo->ldo_stripe[it->lit_stripe_index];
595         LASSERT(next != NULL);
596         LASSERT(next->do_index_ops != NULL);
597
598         return next->do_index_ops->dio_it.key(env, it->lit_it);
599 }
600
601 /**
602  * Implementation of dt_it_ops::key_size.
603  *
604  * Used with striped objects.
605  *
606  * \see dt_it_ops::size() in the API description for details.
607  */
608 static int lod_striped_it_key_size(const struct lu_env *env,
609                                    const struct dt_it *di)
610 {
611         struct lod_it           *it = (struct lod_it *)di;
612         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
613         struct dt_object        *next;
614
615         LOD_CHECK_STRIPED_IT(env, it, lo);
616
617         next = lo->ldo_stripe[it->lit_stripe_index];
618         LASSERT(next != NULL);
619         LASSERT(next->do_index_ops != NULL);
620
621         return next->do_index_ops->dio_it.key_size(env, it->lit_it);
622 }
623
624 /**
625  * Implementation of dt_it_ops::rec.
626  *
627  * Used with striped objects.
628  *
629  * \see dt_it_ops::rec() in the API description for details.
630  */
631 static int lod_striped_it_rec(const struct lu_env *env, const struct dt_it *di,
632                               struct dt_rec *rec, __u32 attr)
633 {
634         const struct lod_it     *it = (const struct lod_it *)di;
635         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
636         struct dt_object        *next;
637
638         LOD_CHECK_STRIPED_IT(env, it, lo);
639
640         next = lo->ldo_stripe[it->lit_stripe_index];
641         LASSERT(next != NULL);
642         LASSERT(next->do_index_ops != NULL);
643
644         return next->do_index_ops->dio_it.rec(env, it->lit_it, rec, attr);
645 }
646
647 /**
648  * Implementation of dt_it_ops::rec_size.
649  *
650  * Used with striped objects.
651  *
652  * \see dt_it_ops::rec_size() in the API description for details.
653  */
654 static int lod_striped_it_rec_size(const struct lu_env *env,
655                                    const struct dt_it *di, __u32 attr)
656 {
657         struct lod_it           *it = (struct lod_it *)di;
658         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
659         struct dt_object        *next;
660
661         LOD_CHECK_STRIPED_IT(env, it, lo);
662
663         next = lo->ldo_stripe[it->lit_stripe_index];
664         LASSERT(next != NULL);
665         LASSERT(next->do_index_ops != NULL);
666
667         return next->do_index_ops->dio_it.rec_size(env, it->lit_it, attr);
668 }
669
670 /**
671  * Implementation of dt_it_ops::store.
672  *
673  * Used with striped objects.
674  *
675  * \see dt_it_ops::store() in the API description for details.
676  */
677 static __u64 lod_striped_it_store(const struct lu_env *env,
678                                   const struct dt_it *di)
679 {
680         const struct lod_it     *it = (const struct lod_it *)di;
681         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
682         struct dt_object        *next;
683
684         LOD_CHECK_STRIPED_IT(env, it, lo);
685
686         next = lo->ldo_stripe[it->lit_stripe_index];
687         LASSERT(next != NULL);
688         LASSERT(next->do_index_ops != NULL);
689
690         return next->do_index_ops->dio_it.store(env, it->lit_it);
691 }
692
693 /**
694  * Implementation of dt_it_ops::load.
695  *
696  * Used with striped objects.
697  *
698  * \see dt_it_ops::load() in the API description for details.
699  */
700 static int lod_striped_it_load(const struct lu_env *env,
701                                const struct dt_it *di, __u64 hash)
702 {
703         const struct lod_it     *it = (const struct lod_it *)di;
704         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
705         struct dt_object        *next;
706
707         LOD_CHECK_STRIPED_IT(env, it, lo);
708
709         next = lo->ldo_stripe[it->lit_stripe_index];
710         LASSERT(next != NULL);
711         LASSERT(next->do_index_ops != NULL);
712
713         return next->do_index_ops->dio_it.load(env, it->lit_it, hash);
714 }
715
716 static struct dt_index_operations lod_striped_index_ops = {
717         .dio_lookup             = lod_lookup,
718         .dio_declare_insert     = lod_declare_insert,
719         .dio_insert             = lod_insert,
720         .dio_declare_delete     = lod_declare_delete,
721         .dio_delete             = lod_delete,
722         .dio_it = {
723                 .init           = lod_striped_it_init,
724                 .fini           = lod_striped_it_fini,
725                 .get            = lod_striped_it_get,
726                 .put            = lod_striped_it_put,
727                 .next           = lod_striped_it_next,
728                 .key            = lod_striped_it_key,
729                 .key_size       = lod_striped_it_key_size,
730                 .rec            = lod_striped_it_rec,
731                 .rec_size       = lod_striped_it_rec_size,
732                 .store          = lod_striped_it_store,
733                 .load           = lod_striped_it_load,
734         }
735 };
736
737 /**
738  * Append the FID for each shard of the striped directory after the
739  * given LMV EA header.
740  *
741  * To simplify striped directory and the consistency verification,
742  * we only store the LMV EA header on disk, for both master object
743  * and slave objects. When someone wants to know the whole LMV EA,
744  * such as client readdir(), we can build the entrie LMV EA on the
745  * MDT side (in RAM) via iterating the sub-directory entries that
746  * are contained in the master object of the stripe directory.
747  *
748  * For the master object of the striped directroy, the valid name
749  * for each shard is composed of the ${shard_FID}:${shard_idx}.
750  *
751  * There may be holes in the LMV EA if some shards' name entries
752  * are corrupted or lost.
753  *
754  * \param[in] env       pointer to the thread context
755  * \param[in] lo        pointer to the master object of the striped directory
756  * \param[in] buf       pointer to the lu_buf which will hold the LMV EA
757  * \param[in] resize    whether re-allocate the buffer if it is not big enough
758  *
759  * \retval              positive size of the LMV EA
760  * \retval              0 for nothing to be loaded
761  * \retval              negative error number on failure
762  */
763 int lod_load_lmv_shards(const struct lu_env *env, struct lod_object *lo,
764                         struct lu_buf *buf, bool resize)
765 {
766         struct lu_dirent        *ent    =
767                         (struct lu_dirent *)lod_env_info(env)->lti_key;
768         struct lod_device       *lod    = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
769         struct dt_object        *obj    = dt_object_child(&lo->ldo_obj);
770         struct lmv_mds_md_v1    *lmv1   = buf->lb_buf;
771         struct dt_it            *it;
772         const struct dt_it_ops  *iops;
773         __u32                    stripes;
774         __u32                    magic  = le32_to_cpu(lmv1->lmv_magic);
775         size_t                   lmv1_size;
776         int                      rc;
777         ENTRY;
778
779         /* If it is not a striped directory, then load nothing. */
780         if (magic != LMV_MAGIC_V1)
781                 RETURN(0);
782
783         /* If it is in migration (or failure), then load nothing. */
784         if (le32_to_cpu(lmv1->lmv_hash_type) & LMV_HASH_FLAG_MIGRATION)
785                 RETURN(0);
786
787         stripes = le32_to_cpu(lmv1->lmv_stripe_count);
788         if (stripes < 1)
789                 RETURN(0);
790
791         rc = lmv_mds_md_size(stripes, magic);
792         if (rc < 0)
793                 RETURN(rc);
794         lmv1_size = rc;
795         if (buf->lb_len < lmv1_size) {
796                 struct lu_buf tbuf;
797
798                 if (!resize)
799                         RETURN(-ERANGE);
800
801                 tbuf = *buf;
802                 buf->lb_buf = NULL;
803                 buf->lb_len = 0;
804                 lu_buf_alloc(buf, lmv1_size);
805                 lmv1 = buf->lb_buf;
806                 if (lmv1 == NULL)
807                         RETURN(-ENOMEM);
808
809                 memcpy(buf->lb_buf, tbuf.lb_buf, tbuf.lb_len);
810         }
811
812         if (unlikely(!dt_try_as_dir(env, obj)))
813                 RETURN(-ENOTDIR);
814
815         memset(&lmv1->lmv_stripe_fids[0], 0, stripes * sizeof(struct lu_fid));
816         iops = &obj->do_index_ops->dio_it;
817         it = iops->init(env, obj, LUDA_64BITHASH);
818         if (IS_ERR(it))
819                 RETURN(PTR_ERR(it));
820
821         rc = iops->load(env, it, 0);
822         if (rc == 0)
823                 rc = iops->next(env, it);
824         else if (rc > 0)
825                 rc = 0;
826
827         while (rc == 0) {
828                 char             name[FID_LEN + 2] = "";
829                 struct lu_fid    fid;
830                 __u32            index;
831                 int              len;
832
833                 rc = iops->rec(env, it, (struct dt_rec *)ent, LUDA_64BITHASH);
834                 if (rc != 0)
835                         break;
836
837                 rc = -EIO;
838
839                 fid_le_to_cpu(&fid, &ent->lde_fid);
840                 ent->lde_namelen = le16_to_cpu(ent->lde_namelen);
841                 if (ent->lde_name[0] == '.') {
842                         if (ent->lde_namelen == 1)
843                                 goto next;
844
845                         if (ent->lde_namelen == 2 && ent->lde_name[1] == '.')
846                                 goto next;
847                 }
848
849                 len = snprintf(name, sizeof(name),
850                                DFID":", PFID(&ent->lde_fid));
851                 /* The ent->lde_name is composed of ${FID}:${index} */
852                 if (ent->lde_namelen < len + 1 ||
853                     memcmp(ent->lde_name, name, len) != 0) {
854                         CDEBUG(lod->lod_lmv_failout ? D_ERROR : D_INFO,
855                                "%s: invalid shard name %.*s with the FID "DFID
856                                " for the striped directory "DFID", %s\n",
857                                lod2obd(lod)->obd_name, ent->lde_namelen,
858                                ent->lde_name, PFID(&fid),
859                                PFID(lu_object_fid(&obj->do_lu)),
860                                lod->lod_lmv_failout ? "failout" : "skip");
861
862                         if (lod->lod_lmv_failout)
863                                 break;
864
865                         goto next;
866                 }
867
868                 index = 0;
869                 do {
870                         if (ent->lde_name[len] < '0' ||
871                             ent->lde_name[len] > '9') {
872                                 CDEBUG(lod->lod_lmv_failout ? D_ERROR : D_INFO,
873                                        "%s: invalid shard name %.*s with the "
874                                        "FID "DFID" for the striped directory "
875                                        DFID", %s\n",
876                                        lod2obd(lod)->obd_name, ent->lde_namelen,
877                                        ent->lde_name, PFID(&fid),
878                                        PFID(lu_object_fid(&obj->do_lu)),
879                                        lod->lod_lmv_failout ?
880                                        "failout" : "skip");
881
882                                 if (lod->lod_lmv_failout)
883                                         break;
884
885                                 goto next;
886                         }
887
888                         index = index * 10 + ent->lde_name[len++] - '0';
889                 } while (len < ent->lde_namelen);
890
891                 if (len == ent->lde_namelen) {
892                         /* Out of LMV EA range. */
893                         if (index >= stripes) {
894                                 CERROR("%s: the shard %.*s for the striped "
895                                        "directory "DFID" is out of the known "
896                                        "LMV EA range [0 - %u], failout\n",
897                                        lod2obd(lod)->obd_name, ent->lde_namelen,
898                                        ent->lde_name,
899                                        PFID(lu_object_fid(&obj->do_lu)),
900                                        stripes - 1);
901
902                                 break;
903                         }
904
905                         /* The slot has been occupied. */
906                         if (!fid_is_zero(&lmv1->lmv_stripe_fids[index])) {
907                                 struct lu_fid fid0;
908
909                                 fid_le_to_cpu(&fid0,
910                                         &lmv1->lmv_stripe_fids[index]);
911                                 CERROR("%s: both the shard "DFID" and "DFID
912                                        " for the striped directory "DFID
913                                        " claim the same LMV EA slot at the "
914                                        "index %d, failout\n",
915                                        lod2obd(lod)->obd_name,
916                                        PFID(&fid0), PFID(&fid),
917                                        PFID(lu_object_fid(&obj->do_lu)), index);
918
919                                 break;
920                         }
921
922                         /* stored as LE mode */
923                         lmv1->lmv_stripe_fids[index] = ent->lde_fid;
924
925 next:
926                         rc = iops->next(env, it);
927                 }
928         }
929
930         iops->put(env, it);
931         iops->fini(env, it);
932
933         RETURN(rc > 0 ? lmv_mds_md_size(stripes, magic) : rc);
934 }
935
936 /**
937  * Implementation of dt_object_operations::do_index_try.
938  *
939  * \see dt_object_operations::do_index_try() in the API description for details.
940  */
941 static int lod_index_try(const struct lu_env *env, struct dt_object *dt,
942                          const struct dt_index_features *feat)
943 {
944         struct lod_object       *lo = lod_dt_obj(dt);
945         struct dt_object        *next = dt_object_child(dt);
946         int                     rc;
947         ENTRY;
948
949         LASSERT(next->do_ops);
950         LASSERT(next->do_ops->do_index_try);
951
952         rc = lod_striping_load(env, lo);
953         if (rc != 0)
954                 RETURN(rc);
955
956         rc = next->do_ops->do_index_try(env, next, feat);
957         if (rc != 0)
958                 RETURN(rc);
959
960         if (lo->ldo_dir_stripe_count > 0) {
961                 int i;
962
963                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
964                         if (dt_object_exists(lo->ldo_stripe[i]) == 0)
965                                 continue;
966                         rc = lo->ldo_stripe[i]->do_ops->do_index_try(env,
967                                                 lo->ldo_stripe[i], feat);
968                         if (rc != 0)
969                                 RETURN(rc);
970                 }
971                 dt->do_index_ops = &lod_striped_index_ops;
972         } else {
973                 dt->do_index_ops = &lod_index_ops;
974         }
975
976         RETURN(rc);
977 }
978
979 /**
980  * Implementation of dt_object_operations::do_read_lock.
981  *
982  * \see dt_object_operations::do_read_lock() in the API description for details.
983  */
984 static void lod_read_lock(const struct lu_env *env, struct dt_object *dt,
985                           unsigned role)
986 {
987         dt_read_lock(env, dt_object_child(dt), role);
988 }
989
990 /**
991  * Implementation of dt_object_operations::do_write_lock.
992  *
993  * \see dt_object_operations::do_write_lock() in the API description for
994  * details.
995  */
996 static void lod_write_lock(const struct lu_env *env, struct dt_object *dt,
997                            unsigned role)
998 {
999         dt_write_lock(env, dt_object_child(dt), role);
1000 }
1001
1002 /**
1003  * Implementation of dt_object_operations::do_read_unlock.
1004  *
1005  * \see dt_object_operations::do_read_unlock() in the API description for
1006  * details.
1007  */
1008 static void lod_read_unlock(const struct lu_env *env, struct dt_object *dt)
1009 {
1010         dt_read_unlock(env, dt_object_child(dt));
1011 }
1012
1013 /**
1014  * Implementation of dt_object_operations::do_write_unlock.
1015  *
1016  * \see dt_object_operations::do_write_unlock() in the API description for
1017  * details.
1018  */
1019 static void lod_write_unlock(const struct lu_env *env, struct dt_object *dt)
1020 {
1021         dt_write_unlock(env, dt_object_child(dt));
1022 }
1023
1024 /**
1025  * Implementation of dt_object_operations::do_write_locked.
1026  *
1027  * \see dt_object_operations::do_write_locked() in the API description for
1028  * details.
1029  */
1030 static int lod_write_locked(const struct lu_env *env, struct dt_object *dt)
1031 {
1032         return dt_write_locked(env, dt_object_child(dt));
1033 }
1034
1035 /**
1036  * Implementation of dt_object_operations::do_attr_get.
1037  *
1038  * \see dt_object_operations::do_attr_get() in the API description for details.
1039  */
1040 static int lod_attr_get(const struct lu_env *env,
1041                         struct dt_object *dt,
1042                         struct lu_attr *attr)
1043 {
1044         /* Note: for striped directory, client will merge attributes
1045          * from all of the sub-stripes see lmv_merge_attr(), and there
1046          * no MDD logic depend on directory nlink/size/time, so we can
1047          * always use master inode nlink and size for now. */
1048         return dt_attr_get(env, dt_object_child(dt), attr);
1049 }
1050
1051 static inline void lod_adjust_stripe_info(struct lod_layout_component *comp,
1052                                           struct lov_desc *desc)
1053 {
1054         if (comp->llc_pattern != LOV_PATTERN_MDT) {
1055                 if (!comp->llc_stripe_count)
1056                         comp->llc_stripe_count =
1057                                 desc->ld_default_stripe_count;
1058         }
1059         if (comp->llc_stripe_size <= 0)
1060                 comp->llc_stripe_size = desc->ld_default_stripe_size;
1061 }
1062
1063 int lod_obj_for_each_stripe(const struct lu_env *env, struct lod_object *lo,
1064                             struct thandle *th,
1065                             struct lod_obj_stripe_cb_data *data)
1066 {
1067         struct lod_layout_component *lod_comp;
1068         int i, j, rc;
1069         ENTRY;
1070
1071         LASSERT(lo->ldo_comp_cnt != 0 && lo->ldo_comp_entries != NULL);
1072         for (i = 0; i < lo->ldo_comp_cnt; i++) {
1073                 lod_comp = &lo->ldo_comp_entries[i];
1074
1075                 if (lod_comp->llc_stripe == NULL)
1076                         continue;
1077
1078                 /* has stripe but not inited yet, this component has been
1079                  * declared to be created, but hasn't created yet.
1080                  */
1081                 if (!lod_comp_inited(lod_comp))
1082                         continue;
1083
1084                 if (data->locd_comp_skip_cb &&
1085                     data->locd_comp_skip_cb(env, lo, i, data))
1086                         continue;
1087
1088                 if (data->locd_comp_cb) {
1089                         rc = data->locd_comp_cb(env, lo, i, data);
1090                         if (rc)
1091                                 RETURN(rc);
1092                 }
1093
1094                 /* could used just to do sth about component, not each
1095                  * stripes
1096                  */
1097                 if (!data->locd_stripe_cb)
1098                         continue;
1099
1100                 LASSERT(lod_comp->llc_stripe_count > 0);
1101                 for (j = 0; j < lod_comp->llc_stripe_count; j++) {
1102                         struct dt_object *dt = lod_comp->llc_stripe[j];
1103
1104                         if (dt == NULL)
1105                                 continue;
1106                         rc = data->locd_stripe_cb(env, lo, dt, th, i, j, data);
1107                         if (rc != 0)
1108                                 RETURN(rc);
1109                 }
1110         }
1111         RETURN(0);
1112 }
1113
1114 static bool lod_obj_attr_set_comp_skip_cb(const struct lu_env *env,
1115                 struct lod_object *lo, int comp_idx,
1116                 struct lod_obj_stripe_cb_data *data)
1117 {
1118         struct lod_layout_component *lod_comp = &lo->ldo_comp_entries[comp_idx];
1119         bool skipped = false;
1120
1121         if (!(data->locd_attr->la_valid & LA_LAYOUT_VERSION))
1122                 return skipped;
1123
1124         switch (lo->ldo_flr_state) {
1125         case LCM_FL_WRITE_PENDING: {
1126                 int i;
1127
1128                 /* skip stale components */
1129                 if (lod_comp->llc_flags & LCME_FL_STALE) {
1130                         skipped = true;
1131                         break;
1132                 }
1133
1134                 /* skip valid and overlapping components, therefore any
1135                  * attempts to write overlapped components will never succeed
1136                  * because client will get EINPROGRESS. */
1137                 for (i = 0; i < lo->ldo_comp_cnt; i++) {
1138                         if (i == comp_idx)
1139                                 continue;
1140
1141                         if (lo->ldo_comp_entries[i].llc_flags & LCME_FL_STALE)
1142                                 continue;
1143
1144                         if (lu_extent_is_overlapped(&lod_comp->llc_extent,
1145                                         &lo->ldo_comp_entries[i].llc_extent)) {
1146                                 skipped = true;
1147                                 break;
1148                         }
1149                 }
1150                 break;
1151         }
1152         default:
1153                 LASSERTF(0, "impossible: %d\n", lo->ldo_flr_state);
1154         case LCM_FL_SYNC_PENDING:
1155                 break;
1156         }
1157
1158         CDEBUG(D_LAYOUT, DFID": %s to set component %x to version: %u\n",
1159                PFID(lu_object_fid(&lo->ldo_obj.do_lu)),
1160                skipped ? "skipped" : "chose", lod_comp->llc_id,
1161                data->locd_attr->la_layout_version);
1162
1163         return skipped;
1164 }
1165
1166 static inline int
1167 lod_obj_stripe_attr_set_cb(const struct lu_env *env, struct lod_object *lo,
1168                            struct dt_object *dt, struct thandle *th,
1169                            int comp_idx, int stripe_idx,
1170                            struct lod_obj_stripe_cb_data *data)
1171 {
1172         if (data->locd_declare)
1173                 return lod_sub_declare_attr_set(env, dt, data->locd_attr, th);
1174
1175         if (data->locd_attr->la_valid & LA_LAYOUT_VERSION) {
1176                 CDEBUG(D_LAYOUT, DFID": set layout version: %u, comp_idx: %d\n",
1177                        PFID(lu_object_fid(&dt->do_lu)),
1178                        data->locd_attr->la_layout_version, comp_idx);
1179         }
1180
1181         return lod_sub_attr_set(env, dt, data->locd_attr, th);
1182 }
1183
1184 /**
1185  * Implementation of dt_object_operations::do_declare_attr_set.
1186  *
1187  * If the object is striped, then apply the changes to all the stripes.
1188  *
1189  * \see dt_object_operations::do_declare_attr_set() in the API description
1190  * for details.
1191  */
1192 static int lod_declare_attr_set(const struct lu_env *env,
1193                                 struct dt_object *dt,
1194                                 const struct lu_attr *attr,
1195                                 struct thandle *th)
1196 {
1197         struct dt_object  *next = dt_object_child(dt);
1198         struct lod_object *lo = lod_dt_obj(dt);
1199         int                rc, i;
1200         ENTRY;
1201
1202         /*
1203          * declare setattr on the local object
1204          */
1205         rc = lod_sub_declare_attr_set(env, next, attr, th);
1206         if (rc)
1207                 RETURN(rc);
1208
1209         /* osp_declare_attr_set() ignores all attributes other than
1210          * UID, GID, PROJID, and size, and osp_attr_set() ignores all
1211          * but UID, GID and PROJID. Declaration of size attr setting
1212          * happens through lod_declare_init_size(), and not through
1213          * this function. Therefore we need not load striping unless
1214          * ownership is changing.  This should save memory and (we hope)
1215          * speed up rename().
1216          */
1217         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1218                 if (!(attr->la_valid & LA_REMOTE_ATTR_SET))
1219                         RETURN(rc);
1220
1221                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1222                         RETURN(0);
1223         } else {
1224                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_PROJID | LA_MODE |
1225                                         LA_ATIME | LA_MTIME | LA_CTIME |
1226                                         LA_FLAGS)))
1227                         RETURN(rc);
1228         }
1229         /*
1230          * load striping information, notice we don't do this when object
1231          * is being initialized as we don't need this information till
1232          * few specific cases like destroy, chown
1233          */
1234         rc = lod_striping_load(env, lo);
1235         if (rc)
1236                 RETURN(rc);
1237
1238         if (!lod_obj_is_striped(dt))
1239                 RETURN(0);
1240
1241         /*
1242          * if object is striped declare changes on the stripes
1243          */
1244         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1245                 LASSERT(lo->ldo_stripe);
1246                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1247                         if (lo->ldo_stripe[i] == NULL)
1248                                 continue;
1249                         rc = lod_sub_declare_attr_set(env, lo->ldo_stripe[i],
1250                                                       attr, th);
1251                         if (rc != 0)
1252                                 RETURN(rc);
1253                 }
1254         } else {
1255                 struct lod_obj_stripe_cb_data data = { { 0 } };
1256
1257                 data.locd_attr = attr;
1258                 data.locd_declare = true;
1259                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
1260                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
1261         }
1262
1263         if (rc)
1264                 RETURN(rc);
1265
1266         if (!dt_object_exists(next) || dt_object_remote(next) ||
1267             !S_ISREG(attr->la_mode))
1268                 RETURN(0);
1269
1270         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE)) {
1271                 rc = lod_sub_declare_xattr_del(env, next, XATTR_NAME_LOV, th);
1272                 RETURN(rc);
1273         }
1274
1275         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE) ||
1276             OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_PFL_RANGE)) {
1277                 struct lod_thread_info *info = lod_env_info(env);
1278                 struct lu_buf *buf = &info->lti_buf;
1279
1280                 buf->lb_buf = info->lti_ea_store;
1281                 buf->lb_len = info->lti_ea_store_size;
1282                 rc = lod_sub_declare_xattr_set(env, next, buf, XATTR_NAME_LOV,
1283                                                LU_XATTR_REPLACE, th);
1284         }
1285
1286         RETURN(rc);
1287 }
1288
1289 /**
1290  * Implementation of dt_object_operations::do_attr_set.
1291  *
1292  * If the object is striped, then apply the changes to all or subset of
1293  * the stripes depending on the object type and specific attributes.
1294  *
1295  * \see dt_object_operations::do_attr_set() in the API description for details.
1296  */
1297 static int lod_attr_set(const struct lu_env *env,
1298                         struct dt_object *dt,
1299                         const struct lu_attr *attr,
1300                         struct thandle *th)
1301 {
1302         struct dt_object        *next = dt_object_child(dt);
1303         struct lod_object       *lo = lod_dt_obj(dt);
1304         int                     rc, i;
1305         ENTRY;
1306
1307         /*
1308          * apply changes to the local object
1309          */
1310         rc = lod_sub_attr_set(env, next, attr, th);
1311         if (rc)
1312                 RETURN(rc);
1313
1314         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1315                 if (!(attr->la_valid & LA_REMOTE_ATTR_SET))
1316                         RETURN(rc);
1317
1318                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1319                         RETURN(0);
1320         } else {
1321                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_MODE | LA_PROJID |
1322                                         LA_ATIME | LA_MTIME | LA_CTIME |
1323                                         LA_FLAGS)))
1324                         RETURN(rc);
1325         }
1326
1327         /* FIXME: a tricky case in the code path of mdd_layout_change():
1328          * the in-memory striping information has been freed in lod_xattr_set()
1329          * due to layout change. It has to load stripe here again. It only
1330          * changes flags of layout so declare_attr_set() is still accurate */
1331         rc = lod_striping_load(env, lo);
1332         if (rc)
1333                 RETURN(rc);
1334
1335         if (!lod_obj_is_striped(dt))
1336                 RETURN(0);
1337
1338         /*
1339          * if object is striped, apply changes to all the stripes
1340          */
1341         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1342                 LASSERT(lo->ldo_stripe);
1343                 for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1344                         if (unlikely(lo->ldo_stripe[i] == NULL))
1345                                 continue;
1346
1347                         if ((dt_object_exists(lo->ldo_stripe[i]) == 0))
1348                                 continue;
1349
1350                         rc = lod_sub_attr_set(env, lo->ldo_stripe[i], attr, th);
1351                         if (rc != 0)
1352                                 break;
1353                 }
1354         } else {
1355                 struct lod_obj_stripe_cb_data data = { { 0 } };
1356
1357                 data.locd_attr = attr;
1358                 data.locd_declare = false;
1359                 data.locd_comp_skip_cb = lod_obj_attr_set_comp_skip_cb;
1360                 data.locd_stripe_cb = lod_obj_stripe_attr_set_cb;
1361                 rc = lod_obj_for_each_stripe(env, lo, th, &data);
1362         }
1363
1364         if (rc)
1365                 RETURN(rc);
1366
1367         if (!dt_object_exists(next) || dt_object_remote(next) ||
1368             !S_ISREG(attr->la_mode))
1369                 RETURN(0);
1370
1371         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE)) {
1372                 rc = lod_sub_xattr_del(env, next, XATTR_NAME_LOV, th);
1373                 RETURN(rc);
1374         }
1375
1376         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE)) {
1377                 struct lod_thread_info *info = lod_env_info(env);
1378                 struct lu_buf *buf = &info->lti_buf;
1379                 struct ost_id *oi = &info->lti_ostid;
1380                 struct lu_fid *fid = &info->lti_fid;
1381                 struct lov_mds_md_v1 *lmm;
1382                 struct lov_ost_data_v1 *objs;
1383                 __u32 magic;
1384
1385                 rc = lod_get_lov_ea(env, lo);
1386                 if (rc <= 0)
1387                         RETURN(rc);
1388
1389                 buf->lb_buf = info->lti_ea_store;
1390                 buf->lb_len = info->lti_ea_store_size;
1391                 lmm = info->lti_ea_store;
1392                 magic = le32_to_cpu(lmm->lmm_magic);
1393                 if (magic == LOV_MAGIC_COMP_V1) {
1394                         struct lov_comp_md_v1 *lcm = buf->lb_buf;
1395                         struct lov_comp_md_entry_v1 *lcme =
1396                                                 &lcm->lcm_entries[0];
1397
1398                         lmm = buf->lb_buf + le32_to_cpu(lcme->lcme_offset);
1399                         magic = le32_to_cpu(lmm->lmm_magic);
1400                 }
1401
1402                 if (magic == LOV_MAGIC_V1)
1403                         objs = &(lmm->lmm_objects[0]);
1404                 else
1405                         objs = &((struct lov_mds_md_v3 *)lmm)->lmm_objects[0];
1406                 ostid_le_to_cpu(&objs->l_ost_oi, oi);
1407                 ostid_to_fid(fid, oi, le32_to_cpu(objs->l_ost_idx));
1408                 fid->f_oid--;
1409                 fid_to_ostid(fid, oi);
1410                 ostid_cpu_to_le(oi, &objs->l_ost_oi);
1411
1412                 rc = lod_sub_xattr_set(env, next, buf, XATTR_NAME_LOV,
1413                                        LU_XATTR_REPLACE, th);
1414         } else if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_PFL_RANGE)) {
1415                 struct lod_thread_info *info = lod_env_info(env);
1416                 struct lu_buf *buf = &info->lti_buf;
1417                 struct lov_comp_md_v1 *lcm;
1418                 struct lov_comp_md_entry_v1 *lcme;
1419
1420                 rc = lod_get_lov_ea(env, lo);
1421                 if (rc <= 0)
1422                         RETURN(rc);
1423
1424                 buf->lb_buf = info->lti_ea_store;
1425                 buf->lb_len = info->lti_ea_store_size;
1426                 lcm = buf->lb_buf;
1427                 if (le32_to_cpu(lcm->lcm_magic) != LOV_MAGIC_COMP_V1)
1428                         RETURN(-EINVAL);
1429
1430                 le32_add_cpu(&lcm->lcm_layout_gen, 1);
1431                 lcme = &lcm->lcm_entries[0];
1432                 le64_add_cpu(&lcme->lcme_extent.e_start, 1);
1433                 le64_add_cpu(&lcme->lcme_extent.e_end, -1);
1434
1435                 rc = lod_sub_xattr_set(env, next, buf, XATTR_NAME_LOV,
1436                                        LU_XATTR_REPLACE, th);
1437         }
1438
1439         RETURN(rc);
1440 }
1441
1442 /**
1443  * Implementation of dt_object_operations::do_xattr_get.
1444  *
1445  * If LOV EA is requested from the root object and it's not
1446  * found, then return default striping for the filesystem.
1447  *
1448  * \see dt_object_operations::do_xattr_get() in the API description for details.
1449  */
1450 static int lod_xattr_get(const struct lu_env *env, struct dt_object *dt,
1451                          struct lu_buf *buf, const char *name)
1452 {
1453         struct lod_thread_info *info = lod_env_info(env);
1454         struct lod_device *dev = lu2lod_dev(dt->do_lu.lo_dev);
1455         int is_root;
1456         int rc;
1457         ENTRY;
1458
1459         rc = dt_xattr_get(env, dt_object_child(dt), buf, name);
1460         if (strcmp(name, XATTR_NAME_LMV) == 0) {
1461                 struct lmv_mds_md_v1    *lmv1;
1462                 int                      rc1 = 0;
1463
1464                 if (rc > (typeof(rc))sizeof(*lmv1))
1465                         RETURN(rc);
1466
1467                 if (rc < (typeof(rc))sizeof(*lmv1))
1468                         RETURN(rc = rc > 0 ? -EINVAL : rc);
1469
1470                 if (buf->lb_buf == NULL || buf->lb_len == 0) {
1471                         CLASSERT(sizeof(*lmv1) <= sizeof(info->lti_key));
1472
1473                         info->lti_buf.lb_buf = info->lti_key;
1474                         info->lti_buf.lb_len = sizeof(*lmv1);
1475                         rc = dt_xattr_get(env, dt_object_child(dt),
1476                                           &info->lti_buf, name);
1477                         if (unlikely(rc != sizeof(*lmv1)))
1478                                 RETURN(rc = rc > 0 ? -EINVAL : rc);
1479
1480                         lmv1 = info->lti_buf.lb_buf;
1481                         /* The on-disk LMV EA only contains header, but the
1482                          * returned LMV EA size should contain the space for
1483                          * the FIDs of all shards of the striped directory. */
1484                         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_V1)
1485                                 rc = lmv_mds_md_size(
1486                                         le32_to_cpu(lmv1->lmv_stripe_count),
1487                                         LMV_MAGIC_V1);
1488                 } else {
1489                         rc1 = lod_load_lmv_shards(env, lod_dt_obj(dt),
1490                                                   buf, false);
1491                 }
1492
1493                 RETURN(rc = rc1 != 0 ? rc1 : rc);
1494         }
1495
1496         if (rc != -ENODATA || !S_ISDIR(dt->do_lu.lo_header->loh_attr & S_IFMT))
1497                 RETURN(rc);
1498
1499         /*
1500          * XXX: Only used by lfsck
1501          *
1502          * lod returns default striping on the real root of the device
1503          * this is like the root stores default striping for the whole
1504          * filesystem. historically we've been using a different approach
1505          * and store it in the config.
1506          */
1507         dt_root_get(env, dev->lod_child, &info->lti_fid);
1508         is_root = lu_fid_eq(&info->lti_fid, lu_object_fid(&dt->do_lu));
1509
1510         if (is_root && strcmp(XATTR_NAME_LOV, name) == 0) {
1511                 struct lov_user_md *lum = buf->lb_buf;
1512                 struct lov_desc    *desc = &dev->lod_desc;
1513
1514                 if (buf->lb_buf == NULL) {
1515                         rc = sizeof(*lum);
1516                 } else if (buf->lb_len >= sizeof(*lum)) {
1517                         lum->lmm_magic = cpu_to_le32(LOV_USER_MAGIC_V1);
1518                         lmm_oi_set_seq(&lum->lmm_oi, FID_SEQ_LOV_DEFAULT);
1519                         lmm_oi_set_id(&lum->lmm_oi, 0);
1520                         lmm_oi_cpu_to_le(&lum->lmm_oi, &lum->lmm_oi);
1521                         lum->lmm_pattern = cpu_to_le32(desc->ld_pattern);
1522                         lum->lmm_stripe_size = cpu_to_le32(
1523                                                 desc->ld_default_stripe_size);
1524                         lum->lmm_stripe_count = cpu_to_le16(
1525                                                 desc->ld_default_stripe_count);
1526                         lum->lmm_stripe_offset = cpu_to_le16(
1527                                                 desc->ld_default_stripe_offset);
1528                         rc = sizeof(*lum);
1529                 } else {
1530                         rc = -ERANGE;
1531                 }
1532         }
1533
1534         RETURN(rc);
1535 }
1536
1537 /**
1538  * Verify LVM EA.
1539  *
1540  * Checks that the magic of the stripe is sane.
1541  *
1542  * \param[in] lod       lod device
1543  * \param[in] lum       a buffer storing LMV EA to verify
1544  *
1545  * \retval              0 if the EA is sane
1546  * \retval              negative otherwise
1547  */
1548 static int lod_verify_md_striping(struct lod_device *lod,
1549                                   const struct lmv_user_md_v1 *lum)
1550 {
1551         if (unlikely(le32_to_cpu(lum->lum_magic) != LMV_USER_MAGIC)) {
1552                 CERROR("%s: invalid lmv_user_md: magic = %x, "
1553                        "stripe_offset = %d, stripe_count = %u: rc = %d\n",
1554                        lod2obd(lod)->obd_name, le32_to_cpu(lum->lum_magic),
1555                        (int)le32_to_cpu(lum->lum_stripe_offset),
1556                        le32_to_cpu(lum->lum_stripe_count), -EINVAL);
1557                 return -EINVAL;
1558         }
1559
1560         return 0;
1561 }
1562
1563 /**
1564  * Initialize LMV EA for a slave.
1565  *
1566  * Initialize slave's LMV EA from the master's LMV EA.
1567  *
1568  * \param[in] master_lmv        a buffer containing master's EA
1569  * \param[out] slave_lmv        a buffer where slave's EA will be stored
1570  *
1571  */
1572 static void lod_prep_slave_lmv_md(struct lmv_mds_md_v1 *slave_lmv,
1573                                   const struct lmv_mds_md_v1 *master_lmv)
1574 {
1575         *slave_lmv = *master_lmv;
1576         slave_lmv->lmv_magic = cpu_to_le32(LMV_MAGIC_STRIPE);
1577 }
1578
1579 /**
1580  * Generate LMV EA.
1581  *
1582  * Generate LMV EA from the object passed as \a dt. The object must have
1583  * the stripes created and initialized.
1584  *
1585  * \param[in] env       execution environment
1586  * \param[in] dt        object
1587  * \param[out] lmv_buf  buffer storing generated LMV EA
1588  *
1589  * \retval              0 on success
1590  * \retval              negative if failed
1591  */
1592 static int lod_prep_lmv_md(const struct lu_env *env, struct dt_object *dt,
1593                            struct lu_buf *lmv_buf)
1594 {
1595         struct lod_thread_info  *info = lod_env_info(env);
1596         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1597         struct lod_object       *lo = lod_dt_obj(dt);
1598         struct lmv_mds_md_v1    *lmm1;
1599         int                     stripe_count;
1600         int                     type = LU_SEQ_RANGE_ANY;
1601         int                     rc;
1602         __u32                   mdtidx;
1603         ENTRY;
1604
1605         LASSERT(lo->ldo_dir_striped != 0);
1606         LASSERT(lo->ldo_dir_stripe_count > 0);
1607         stripe_count = lo->ldo_dir_stripe_count;
1608         /* Only store the LMV EA heahder on the disk. */
1609         if (info->lti_ea_store_size < sizeof(*lmm1)) {
1610                 rc = lod_ea_store_resize(info, sizeof(*lmm1));
1611                 if (rc != 0)
1612                         RETURN(rc);
1613         } else {
1614                 memset(info->lti_ea_store, 0, sizeof(*lmm1));
1615         }
1616
1617         lmm1 = (struct lmv_mds_md_v1 *)info->lti_ea_store;
1618         lmm1->lmv_magic = cpu_to_le32(LMV_MAGIC);
1619         lmm1->lmv_stripe_count = cpu_to_le32(stripe_count);
1620         lmm1->lmv_hash_type = cpu_to_le32(lo->ldo_dir_hash_type);
1621         rc = lod_fld_lookup(env, lod, lu_object_fid(&dt->do_lu),
1622                             &mdtidx, &type);
1623         if (rc != 0)
1624                 RETURN(rc);
1625
1626         lmm1->lmv_master_mdt_index = cpu_to_le32(mdtidx);
1627         lmv_buf->lb_buf = info->lti_ea_store;
1628         lmv_buf->lb_len = sizeof(*lmm1);
1629
1630         RETURN(rc);
1631 }
1632
1633 /**
1634  * Create in-core represenation for a striped directory.
1635  *
1636  * Parse the buffer containing LMV EA and instantiate LU objects
1637  * representing the stripe objects. The pointers to the objects are
1638  * stored in ldo_stripe field of \a lo. This function is used when
1639  * we need to access an already created object (i.e. load from a disk).
1640  *
1641  * \param[in] env       execution environment
1642  * \param[in] lo        lod object
1643  * \param[in] buf       buffer containing LMV EA
1644  *
1645  * \retval              0 on success
1646  * \retval              negative if failed
1647  */
1648 int lod_parse_dir_striping(const struct lu_env *env, struct lod_object *lo,
1649                            const struct lu_buf *buf)
1650 {
1651         struct lod_thread_info  *info = lod_env_info(env);
1652         struct lod_device       *lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
1653         struct lod_tgt_descs    *ltd = &lod->lod_mdt_descs;
1654         struct dt_object        **stripe;
1655         union lmv_mds_md        *lmm = buf->lb_buf;
1656         struct lmv_mds_md_v1    *lmv1 = &lmm->lmv_md_v1;
1657         struct lu_fid           *fid = &info->lti_fid;
1658         unsigned int            i;
1659         int                     rc = 0;
1660         ENTRY;
1661
1662         LASSERT(mutex_is_locked(&lo->ldo_layout_mutex));
1663
1664         if (le32_to_cpu(lmv1->lmv_hash_type) & LMV_HASH_FLAG_MIGRATION)
1665                 RETURN(0);
1666
1667         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_STRIPE) {
1668                 lo->ldo_dir_slave_stripe = 1;
1669                 RETURN(0);
1670         }
1671
1672         if (le32_to_cpu(lmv1->lmv_magic) != LMV_MAGIC_V1)
1673                 RETURN(-EINVAL);
1674
1675         if (le32_to_cpu(lmv1->lmv_stripe_count) < 1)
1676                 RETURN(0);
1677
1678         LASSERT(lo->ldo_stripe == NULL);
1679         OBD_ALLOC(stripe, sizeof(stripe[0]) *
1680                   (le32_to_cpu(lmv1->lmv_stripe_count)));
1681         if (stripe == NULL)
1682                 RETURN(-ENOMEM);
1683
1684         for (i = 0; i < le32_to_cpu(lmv1->lmv_stripe_count); i++) {
1685                 struct dt_device        *tgt_dt;
1686                 struct dt_object        *dto;
1687                 int                     type = LU_SEQ_RANGE_ANY;
1688                 __u32                   idx;
1689
1690                 fid_le_to_cpu(fid, &lmv1->lmv_stripe_fids[i]);
1691                 if (!fid_is_sane(fid))
1692                         GOTO(out, rc = -ESTALE);
1693
1694                 rc = lod_fld_lookup(env, lod, fid, &idx, &type);
1695                 if (rc != 0)
1696                         GOTO(out, rc);
1697
1698                 if (idx == lod2lu_dev(lod)->ld_site->ld_seq_site->ss_node_id) {
1699                         tgt_dt = lod->lod_child;
1700                 } else {
1701                         struct lod_tgt_desc     *tgt;
1702
1703                         tgt = LTD_TGT(ltd, idx);
1704                         if (tgt == NULL)
1705                                 GOTO(out, rc = -ESTALE);
1706                         tgt_dt = tgt->ltd_tgt;
1707                 }
1708
1709                 dto = dt_locate_at(env, tgt_dt, fid,
1710                                   lo->ldo_obj.do_lu.lo_dev->ld_site->ls_top_dev,
1711                                   NULL);
1712                 if (IS_ERR(dto))
1713                         GOTO(out, rc = PTR_ERR(dto));
1714
1715                 stripe[i] = dto;
1716         }
1717 out:
1718         lo->ldo_stripe = stripe;
1719         lo->ldo_dir_stripe_count = le32_to_cpu(lmv1->lmv_stripe_count);
1720         lo->ldo_dir_stripes_allocated = le32_to_cpu(lmv1->lmv_stripe_count);
1721         if (rc != 0)
1722                 lod_striping_free_nolock(env, lo);
1723
1724         RETURN(rc);
1725 }
1726
1727 /**
1728  * Declare create a striped directory.
1729  *
1730  * Declare creating a striped directory with a given stripe pattern on the
1731  * specified MDTs. A striped directory is represented as a regular directory
1732  * - an index listing all the stripes. The stripes point back to the master
1733  * object with ".." and LinkEA. The master object gets LMV EA which
1734  * identifies it as a striped directory. The function allocates FIDs
1735  * for all stripes.
1736  *
1737  * \param[in] env       execution environment
1738  * \param[in] dt        object
1739  * \param[in] attr      attributes to initialize the objects with
1740  * \param[in] dof       type of objects to be created
1741  * \param[in] th        transaction handle
1742  *
1743  * \retval              0 on success
1744  * \retval              negative if failed
1745  */
1746 static int lod_dir_declare_create_stripes(const struct lu_env *env,
1747                                           struct dt_object *dt,
1748                                           struct lu_attr *attr,
1749                                           struct dt_object_format *dof,
1750                                           struct thandle *th)
1751 {
1752         struct lod_thread_info  *info = lod_env_info(env);
1753         struct lu_buf           lmv_buf;
1754         struct lu_buf           slave_lmv_buf;
1755         struct lmv_mds_md_v1    *lmm;
1756         struct lmv_mds_md_v1    *slave_lmm = NULL;
1757         struct dt_insert_rec    *rec = &info->lti_dt_rec;
1758         struct lod_object       *lo = lod_dt_obj(dt);
1759         int                     rc;
1760         __u32                   i;
1761         ENTRY;
1762
1763         rc = lod_prep_lmv_md(env, dt, &lmv_buf);
1764         if (rc != 0)
1765                 GOTO(out, rc);
1766         lmm = lmv_buf.lb_buf;
1767
1768         OBD_ALLOC_PTR(slave_lmm);
1769         if (slave_lmm == NULL)
1770                 GOTO(out, rc = -ENOMEM);
1771
1772         lod_prep_slave_lmv_md(slave_lmm, lmm);
1773         slave_lmv_buf.lb_buf = slave_lmm;
1774         slave_lmv_buf.lb_len = sizeof(*slave_lmm);
1775
1776         if (!dt_try_as_dir(env, dt_object_child(dt)))
1777                 GOTO(out, rc = -EINVAL);
1778
1779         rec->rec_type = S_IFDIR;
1780         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
1781                 struct dt_object        *dto = lo->ldo_stripe[i];
1782                 char                    *stripe_name = info->lti_key;
1783                 struct lu_name          *sname;
1784                 struct linkea_data       ldata          = { NULL };
1785                 struct lu_buf           linkea_buf;
1786
1787                 rc = lod_sub_declare_create(env, dto, attr, NULL, dof, th);
1788                 if (rc != 0)
1789                         GOTO(out, rc);
1790
1791                 if (!dt_try_as_dir(env, dto))
1792                         GOTO(out, rc = -EINVAL);
1793
1794                 rc = lod_sub_declare_ref_add(env, dto, th);
1795                 if (rc != 0)
1796                         GOTO(out, rc);
1797
1798                 rec->rec_fid = lu_object_fid(&dto->do_lu);
1799                 rc = lod_sub_declare_insert(env, dto,
1800                                             (const struct dt_rec *)rec,
1801                                             (const struct dt_key *)dot, th);
1802                 if (rc != 0)
1803                         GOTO(out, rc);
1804
1805                 /* master stripe FID will be put to .. */
1806                 rec->rec_fid = lu_object_fid(&dt->do_lu);
1807                 rc = lod_sub_declare_insert(env, dto,
1808                                             (const struct dt_rec *)rec,
1809                                             (const struct dt_key *)dotdot, th);
1810                 if (rc != 0)
1811                         GOTO(out, rc);
1812
1813                 if (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_SLAVE_LMV) ||
1814                     cfs_fail_val != i) {
1815                         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_LMV) &&
1816                             cfs_fail_val == i)
1817                                 slave_lmm->lmv_master_mdt_index =
1818                                                         cpu_to_le32(i + 1);
1819                         else
1820                                 slave_lmm->lmv_master_mdt_index =
1821                                                         cpu_to_le32(i);
1822                         rc = lod_sub_declare_xattr_set(env, dto, &slave_lmv_buf,
1823                                                        XATTR_NAME_LMV, 0, th);
1824                         if (rc != 0)
1825                                 GOTO(out, rc);
1826                 }
1827
1828                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_NAME) &&
1829                     cfs_fail_val == i)
1830                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%u",
1831                                 PFID(lu_object_fid(&dto->do_lu)), i + 1);
1832                 else
1833                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%u",
1834                                 PFID(lu_object_fid(&dto->do_lu)), i);
1835
1836                 sname = lod_name_get(env, stripe_name, strlen(stripe_name));
1837                 rc = linkea_links_new(&ldata, &info->lti_linkea_buf,
1838                                       sname, lu_object_fid(&dt->do_lu));
1839                 if (rc != 0)
1840                         GOTO(out, rc);
1841
1842                 linkea_buf.lb_buf = ldata.ld_buf->lb_buf;
1843                 linkea_buf.lb_len = ldata.ld_leh->leh_len;
1844                 rc = lod_sub_declare_xattr_set(env, dto, &linkea_buf,
1845                                                XATTR_NAME_LINK, 0, th);
1846                 if (rc != 0)
1847                         GOTO(out, rc);
1848
1849                 rec->rec_fid = lu_object_fid(&dto->do_lu);
1850                 rc = lod_sub_declare_insert(env, dt_object_child(dt),
1851                                             (const struct dt_rec *)rec,
1852                                             (const struct dt_key *)stripe_name,
1853                                             th);
1854                 if (rc != 0)
1855                         GOTO(out, rc);
1856
1857                 rc = lod_sub_declare_ref_add(env, dt_object_child(dt), th);
1858                 if (rc != 0)
1859                         GOTO(out, rc);
1860         }
1861
1862         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt),
1863                                        &lmv_buf, XATTR_NAME_LMV, 0, th);
1864         if (rc != 0)
1865                 GOTO(out, rc);
1866 out:
1867         if (slave_lmm != NULL)
1868                 OBD_FREE_PTR(slave_lmm);
1869
1870         RETURN(rc);
1871 }
1872
1873 static int lod_prep_md_striped_create(const struct lu_env *env,
1874                                       struct dt_object *dt,
1875                                       struct lu_attr *attr,
1876                                       const struct lmv_user_md_v1 *lum,
1877                                       struct dt_object_format *dof,
1878                                       struct thandle *th)
1879 {
1880         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1881         struct lod_tgt_descs    *ltd = &lod->lod_mdt_descs;
1882         struct lod_object       *lo = lod_dt_obj(dt);
1883         struct dt_object        **stripe;
1884         __u32                   stripe_count;
1885         int                     *idx_array;
1886         __u32                   master_index;
1887         int                     rc = 0;
1888         __u32                   i;
1889         __u32                   j;
1890         bool                    is_specific = false;
1891         ENTRY;
1892
1893         /* The lum has been verifed in lod_verify_md_striping */
1894         LASSERT(le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC ||
1895                 le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC_SPECIFIC);
1896         LASSERT(le32_to_cpu(lum->lum_stripe_count) > 0);
1897
1898         stripe_count = le32_to_cpu(lum->lum_stripe_count);
1899
1900         OBD_ALLOC(idx_array, sizeof(idx_array[0]) * stripe_count);
1901         if (idx_array == NULL)
1902                 RETURN(-ENOMEM);
1903
1904         OBD_ALLOC(stripe, sizeof(stripe[0]) * stripe_count);
1905         if (stripe == NULL)
1906                 GOTO(out_free, rc = -ENOMEM);
1907
1908         /* Start index must be the master MDT */
1909         master_index = lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_node_id;
1910         idx_array[0] = master_index;
1911         if (le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC_SPECIFIC) {
1912                 is_specific = true;
1913                 for (i = 1; i < stripe_count; i++)
1914                         idx_array[i] = le32_to_cpu(lum->lum_objects[i].lum_mds);
1915         }
1916
1917         for (i = 0; i < stripe_count; i++) {
1918                 struct lod_tgt_desc     *tgt = NULL;
1919                 struct dt_object        *dto;
1920                 struct lu_fid           fid = { 0 };
1921                 int                     idx;
1922                 struct lu_object_conf   conf = { 0 };
1923                 struct dt_device        *tgt_dt = NULL;
1924
1925                 /* Try to find next avaible target */
1926                 idx = idx_array[i];
1927                 for (j = 0; j < lod->lod_remote_mdt_count;
1928                      j++, idx = (idx + 1) % (lod->lod_remote_mdt_count + 1)) {
1929                         bool already_allocated = false;
1930                         __u32 k;
1931
1932                         CDEBUG(D_INFO, "try idx %d, mdt cnt %u, allocated %u\n",
1933                                idx, lod->lod_remote_mdt_count + 1, i);
1934
1935                         if (likely(!is_specific &&
1936                                    !OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE))) {
1937                                 /* check whether the idx already exists
1938                                  * in current allocated array */
1939                                 for (k = 0; k < i; k++) {
1940                                         if (idx_array[k] == idx) {
1941                                                 already_allocated = true;
1942                                                 break;
1943                                         }
1944                                 }
1945
1946                                 if (already_allocated)
1947                                         continue;
1948                         }
1949
1950                         /* Sigh, this index is not in the bitmap, let's check
1951                          * next available target */
1952                         if (!cfs_bitmap_check(ltd->ltd_tgt_bitmap, idx) &&
1953                             idx != master_index)
1954                                 continue;
1955
1956                         if (idx == master_index) {
1957                                 /* Allocate the FID locally */
1958                                 rc = obd_fid_alloc(env, lod->lod_child_exp,
1959                                                    &fid, NULL);
1960                                 if (rc < 0)
1961                                         GOTO(out_put, rc);
1962                                 tgt_dt = lod->lod_child;
1963                                 break;
1964                         }
1965
1966                         /* check the status of the OSP */
1967                         tgt = LTD_TGT(ltd, idx);
1968                         if (tgt == NULL)
1969                                 continue;
1970
1971                         tgt_dt = tgt->ltd_tgt;
1972                         rc = dt_statfs(env, tgt_dt, NULL);
1973                         if (rc) {
1974                                 /* this OSP doesn't feel well */
1975                                 rc = 0;
1976                                 continue;
1977                         }
1978
1979                         rc = obd_fid_alloc(env, tgt->ltd_exp, &fid, NULL);
1980                         if (rc < 0) {
1981                                 rc = 0;
1982                                 continue;
1983                         }
1984
1985                         break;
1986                 }
1987
1988                 /* Can not allocate more stripes */
1989                 if (j == lod->lod_remote_mdt_count) {
1990                         CDEBUG(D_INFO, "%s: require stripes %u only get %d\n",
1991                                lod2obd(lod)->obd_name, stripe_count, i);
1992                         break;
1993                 }
1994
1995                 CDEBUG(D_INFO, "Get idx %d, for stripe %d "DFID"\n",
1996                        idx, i, PFID(&fid));
1997                 idx_array[i] = idx;
1998                 /* Set the start index for next stripe allocation */
1999                 if (!is_specific && i < stripe_count - 1) {
2000                         /*
2001                          * for large dir test, put all other slaves on one
2002                          * remote MDT, otherwise we may save too many local
2003                          * slave locks which will exceed RS_MAX_LOCKS.
2004                          */
2005                         if (unlikely(OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE)))
2006                                 idx = master_index;
2007                         idx_array[i + 1] = (idx + 1) %
2008                                            (lod->lod_remote_mdt_count + 1);
2009                 }
2010                 /* tgt_dt and fid must be ready after search avaible OSP
2011                  * in the above loop */
2012                 LASSERT(tgt_dt != NULL);
2013                 LASSERT(fid_is_sane(&fid));
2014                 conf.loc_flags = LOC_F_NEW;
2015                 dto = dt_locate_at(env, tgt_dt, &fid,
2016                                    dt->do_lu.lo_dev->ld_site->ls_top_dev,
2017                                    &conf);
2018                 if (IS_ERR(dto))
2019                         GOTO(out_put, rc = PTR_ERR(dto));
2020                 stripe[i] = dto;
2021         }
2022
2023         lo->ldo_dir_striped = 1;
2024         lo->ldo_stripe = stripe;
2025         lo->ldo_dir_stripe_count = i;
2026         lo->ldo_dir_stripes_allocated = stripe_count;
2027         smp_mb();
2028         lo->ldo_dir_stripe_loaded = 1;
2029
2030         if (lo->ldo_dir_stripe_count == 0)
2031                 GOTO(out_put, rc = -ENOSPC);
2032
2033         rc = lod_dir_declare_create_stripes(env, dt, attr, dof, th);
2034         if (rc != 0)
2035                 GOTO(out_put, rc);
2036
2037 out_put:
2038         if (rc < 0) {
2039                 for (i = 0; i < stripe_count; i++)
2040                         if (stripe[i] != NULL)
2041                                 dt_object_put(env, stripe[i]);
2042                 OBD_FREE(stripe, sizeof(stripe[0]) * stripe_count);
2043                 lo->ldo_dir_stripe_count = 0;
2044                 lo->ldo_dir_stripes_allocated = 0;
2045                 lo->ldo_stripe = NULL;
2046         }
2047
2048 out_free:
2049         OBD_FREE(idx_array, sizeof(idx_array[0]) * stripe_count);
2050
2051         RETURN(rc);
2052 }
2053
2054 /**
2055  * Declare create striped md object.
2056  *
2057  * The function declares intention to create a striped directory. This is a
2058  * wrapper for lod_prep_md_striped_create(). The only additional functionality
2059  * is to verify pattern \a lum_buf is good. Check that function for the details.
2060  *
2061  * \param[in] env       execution environment
2062  * \param[in] dt        object
2063  * \param[in] attr      attributes to initialize the objects with
2064  * \param[in] lum_buf   a pattern specifying the number of stripes and
2065  *                      MDT to start from
2066  * \param[in] dof       type of objects to be created
2067  * \param[in] th        transaction handle
2068  *
2069  * \retval              0 on success
2070  * \retval              negative if failed
2071  *
2072  */
2073 static int lod_declare_xattr_set_lmv(const struct lu_env *env,
2074                                      struct dt_object *dt,
2075                                      struct lu_attr *attr,
2076                                      const struct lu_buf *lum_buf,
2077                                      struct dt_object_format *dof,
2078                                      struct thandle *th)
2079 {
2080         struct lod_object       *lo = lod_dt_obj(dt);
2081         struct lmv_user_md_v1   *lum = lum_buf->lb_buf;
2082         int                     rc;
2083         ENTRY;
2084
2085         LASSERT(lum != NULL);
2086
2087         CDEBUG(D_INFO, "lum magic = %x count = %u offset = %d\n",
2088                le32_to_cpu(lum->lum_magic), le32_to_cpu(lum->lum_stripe_count),
2089                (int)le32_to_cpu(lum->lum_stripe_offset));
2090
2091         if (lo->ldo_dir_stripe_count == 0)
2092                 GOTO(out, rc = 0);
2093
2094         /* prepare dir striped objects */
2095         rc = lod_prep_md_striped_create(env, dt, attr, lum, dof, th);
2096         if (rc != 0) {
2097                 /* failed to create striping, let's reset
2098                  * config so that others don't get confused */
2099                 lod_striping_free(env, lo);
2100                 GOTO(out, rc);
2101         }
2102 out:
2103         RETURN(rc);
2104 }
2105
2106 /**
2107  * Implementation of dt_object_operations::do_declare_xattr_set.
2108  *
2109  * Used with regular (non-striped) objects. Basically it
2110  * initializes the striping information and applies the
2111  * change to all the stripes.
2112  *
2113  * \see dt_object_operations::do_declare_xattr_set() in the API description
2114  * for details.
2115  */
2116 static int lod_dir_declare_xattr_set(const struct lu_env *env,
2117                                      struct dt_object *dt,
2118                                      const struct lu_buf *buf,
2119                                      const char *name, int fl,
2120                                      struct thandle *th)
2121 {
2122         struct dt_object        *next = dt_object_child(dt);
2123         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2124         struct lod_object       *lo = lod_dt_obj(dt);
2125         int                     i;
2126         int                     rc;
2127         ENTRY;
2128
2129         if (strcmp(name, XATTR_NAME_DEFAULT_LMV) == 0) {
2130                 struct lmv_user_md_v1 *lum;
2131
2132                 LASSERT(buf != NULL && buf->lb_buf != NULL);
2133                 lum = buf->lb_buf;
2134                 rc = lod_verify_md_striping(d, lum);
2135                 if (rc != 0)
2136                         RETURN(rc);
2137         } else if (strcmp(name, XATTR_NAME_LOV) == 0) {
2138                 rc = lod_verify_striping(d, lo, buf, false);
2139                 if (rc != 0)
2140                         RETURN(rc);
2141         }
2142
2143         rc = lod_sub_declare_xattr_set(env, next, buf, name, fl, th);
2144         if (rc != 0)
2145                 RETURN(rc);
2146
2147         /* Note: Do not set LinkEA on sub-stripes, otherwise
2148          * it will confuse the fid2path process(see mdt_path_current()).
2149          * The linkEA between master and sub-stripes is set in
2150          * lod_xattr_set_lmv(). */
2151         if (strcmp(name, XATTR_NAME_LINK) == 0)
2152                 RETURN(0);
2153
2154         /* set xattr to each stripes, if needed */
2155         rc = lod_striping_load(env, lo);
2156         if (rc != 0)
2157                 RETURN(rc);
2158
2159         if (lo->ldo_dir_stripe_count == 0)
2160                 RETURN(0);
2161
2162         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
2163                 LASSERT(lo->ldo_stripe[i]);
2164
2165                 rc = lod_sub_declare_xattr_set(env, lo->ldo_stripe[i],
2166                                                buf, name, fl, th);
2167                 if (rc != 0)
2168                         break;
2169         }
2170
2171         RETURN(rc);
2172 }
2173
2174 static int
2175 lod_obj_stripe_replace_parent_fid_cb(const struct lu_env *env,
2176                                      struct lod_object *lo,
2177                                      struct dt_object *dt, struct thandle *th,
2178                                      int comp_idx, int stripe_idx,
2179                                      struct lod_obj_stripe_cb_data *data)
2180 {
2181         struct lod_thread_info *info = lod_env_info(env);
2182         struct lod_layout_component *comp = &lo->ldo_comp_entries[comp_idx];
2183         struct filter_fid *ff = &info->lti_ff;
2184         struct lu_buf *buf = &info->lti_buf;
2185         int rc;
2186
2187         buf->lb_buf = ff;
2188         buf->lb_len = sizeof(*ff);
2189         rc = dt_xattr_get(env, dt, buf, XATTR_NAME_FID);
2190         if (rc < 0) {
2191                 if (rc == -ENODATA)
2192                         return 0;
2193                 return rc;
2194         }
2195
2196         filter_fid_le_to_cpu(ff, ff, sizeof(*ff));
2197         if (lu_fid_eq(lu_object_fid(&lo->ldo_obj.do_lu), &ff->ff_parent) &&
2198             ff->ff_layout.ol_comp_id == comp->llc_id)
2199                 return 0;
2200
2201         /* rewrite filter_fid */
2202         memset(ff, 0, sizeof(*ff));
2203         ff->ff_parent = *lu_object_fid(&lo->ldo_obj.do_lu);
2204         ff->ff_parent.f_ver = stripe_idx;
2205         ff->ff_layout.ol_stripe_size = comp->llc_stripe_size;
2206         ff->ff_layout.ol_stripe_count = comp->llc_stripe_count;
2207         ff->ff_layout.ol_comp_id = comp->llc_id;
2208         ff->ff_layout.ol_comp_start = comp->llc_extent.e_start;
2209         ff->ff_layout.ol_comp_end = comp->llc_extent.e_end;
2210         filter_fid_cpu_to_le(ff, ff, sizeof(*ff));
2211
2212         if (data->locd_declare)
2213                 rc = lod_sub_declare_xattr_set(env, dt, buf, XATTR_NAME_FID,
2214                                                LU_XATTR_REPLACE, th);
2215         else
2216                 rc = lod_sub_xattr_set(env, dt, buf, XATTR_NAME_FID,
2217                                        LU_XATTR_REPLACE, th);
2218
2219         return rc;
2220 }
2221
2222 /**
2223  * Reset parent FID on OST object
2224  *
2225  * Replace parent FID with @dt object FID, which is only called during migration
2226  * to reset the parent FID after the MDT object is migrated to the new MDT, i.e.
2227  * the FID is changed.
2228  *
2229  * \param[in] env execution environment
2230  * \param[in] dt dt_object whose stripes's parent FID will be reset
2231  * \parem[in] th thandle
2232  * \param[in] declare if it is declare
2233  *
2234  * \retval      0 if reset succeeds
2235  * \retval      negative errno if reset fails
2236  */
2237 static int lod_replace_parent_fid(const struct lu_env *env,
2238                                   struct dt_object *dt,
2239                                   struct thandle *th, bool declare)
2240 {
2241         struct lod_object *lo = lod_dt_obj(dt);
2242         struct lod_thread_info  *info = lod_env_info(env);
2243         struct lu_buf *buf = &info->lti_buf;
2244         struct filter_fid *ff;
2245         struct lod_obj_stripe_cb_data data = { { 0 } };
2246         int rc;
2247         ENTRY;
2248
2249         LASSERT(S_ISREG(dt->do_lu.lo_header->loh_attr));
2250
2251         /* set xattr to each stripes, if needed */
2252         rc = lod_striping_load(env, lo);
2253         if (rc != 0)
2254                 RETURN(rc);
2255
2256         if (!lod_obj_is_striped(dt))
2257                 RETURN(0);
2258
2259         if (info->lti_ea_store_size < sizeof(*ff)) {
2260                 rc = lod_ea_store_resize(info, sizeof(*ff));
2261                 if (rc != 0)
2262                         RETURN(rc);
2263         }
2264
2265         buf->lb_buf = info->lti_ea_store;
2266         buf->lb_len = info->lti_ea_store_size;
2267
2268         data.locd_declare = declare;
2269         data.locd_stripe_cb = lod_obj_stripe_replace_parent_fid_cb;
2270         rc = lod_obj_for_each_stripe(env, lo, th, &data);
2271
2272         RETURN(rc);
2273 }
2274
2275 inline __u16 lod_comp_entry_stripe_count(struct lod_object *lo,
2276                                          struct lod_layout_component *entry,
2277                                          bool is_dir)
2278 {
2279         struct lod_device *lod = lu2lod_dev(lod2lu_obj(lo)->lo_dev);
2280
2281         if (is_dir)
2282                 return  0;
2283         else if (lod_comp_inited(entry))
2284                 return entry->llc_stripe_count;
2285         else if ((__u16)-1 == entry->llc_stripe_count)
2286                 return lod->lod_desc.ld_tgt_count;
2287         else
2288                 return lod_get_stripe_count(lod, lo, entry->llc_stripe_count);
2289 }
2290
2291 static int lod_comp_md_size(struct lod_object *lo, bool is_dir)
2292 {
2293         int magic, size = 0, i;
2294         struct lod_layout_component *comp_entries;
2295         __u16 comp_cnt;
2296         bool is_composite;
2297
2298         if (is_dir) {
2299                 comp_cnt = lo->ldo_def_striping->lds_def_comp_cnt;
2300                 comp_entries = lo->ldo_def_striping->lds_def_comp_entries;
2301                 is_composite =
2302                         lo->ldo_def_striping->lds_def_striping_is_composite;
2303         } else {
2304                 comp_cnt = lo->ldo_comp_cnt;
2305                 comp_entries = lo->ldo_comp_entries;
2306                 is_composite = lo->ldo_is_composite;
2307         }
2308
2309
2310         LASSERT(comp_cnt != 0 && comp_entries != NULL);
2311         if (is_composite) {
2312                 size = sizeof(struct lov_comp_md_v1) +
2313                        sizeof(struct lov_comp_md_entry_v1) * comp_cnt;
2314                 LASSERT(size % sizeof(__u64) == 0);
2315         }
2316
2317         for (i = 0; i < comp_cnt; i++) {
2318                 __u16 stripe_count;
2319
2320                 magic = comp_entries[i].llc_pool ? LOV_MAGIC_V3 : LOV_MAGIC_V1;
2321                 stripe_count = lod_comp_entry_stripe_count(lo, &comp_entries[i],
2322                                                            is_dir);
2323                 if (!is_dir && is_composite)
2324                         lod_comp_shrink_stripe_count(&comp_entries[i],
2325                                                      &stripe_count);
2326
2327                 size += lov_user_md_size(stripe_count, magic);
2328                 LASSERT(size % sizeof(__u64) == 0);
2329         }
2330         return size;
2331 }
2332
2333 /**
2334  * Declare component add. The xattr name is XATTR_LUSTRE_LOV.add, and
2335  * the xattr value is binary lov_comp_md_v1 which contains component(s)
2336  * to be added.
2337   *
2338  * \param[in] env       execution environment
2339  * \param[in] dt        dt_object to add components on
2340  * \param[in] buf       buffer contains components to be added
2341  * \parem[in] th        thandle
2342  *
2343  * \retval      0 on success
2344  * \retval      negative errno on failure
2345  */
2346 static int lod_declare_layout_add(const struct lu_env *env,
2347                                   struct dt_object *dt,
2348                                   const struct lu_buf *buf,
2349                                   struct thandle *th)
2350 {
2351         struct lod_thread_info  *info = lod_env_info(env);
2352         struct lod_layout_component *comp_array, *lod_comp, *old_array;
2353         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2354         struct dt_object *next = dt_object_child(dt);
2355         struct lov_desc         *desc = &d->lod_desc;
2356         struct lod_object       *lo = lod_dt_obj(dt);
2357         struct lov_user_md_v3   *v3;
2358         struct lov_comp_md_v1   *comp_v1 = buf->lb_buf;
2359         __u32   magic;
2360         int     i, rc, array_cnt, old_array_cnt;
2361         ENTRY;
2362
2363         LASSERT(lo->ldo_is_composite);
2364
2365         if (lo->ldo_flr_state != LCM_FL_NONE)
2366                 RETURN(-EBUSY);
2367
2368         rc = lod_verify_striping(d, lo, buf, false);
2369         if (rc != 0)
2370                 RETURN(rc);
2371
2372         magic = comp_v1->lcm_magic;
2373         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
2374                 lustre_swab_lov_comp_md_v1(comp_v1);
2375                 magic = comp_v1->lcm_magic;
2376         }
2377
2378         if (magic != LOV_USER_MAGIC_COMP_V1)
2379                 RETURN(-EINVAL);
2380
2381         array_cnt = lo->ldo_comp_cnt + comp_v1->lcm_entry_count;
2382         OBD_ALLOC(comp_array, sizeof(*comp_array) * array_cnt);
2383         if (comp_array == NULL)
2384                 RETURN(-ENOMEM);
2385
2386         memcpy(comp_array, lo->ldo_comp_entries,
2387                sizeof(*comp_array) * lo->ldo_comp_cnt);
2388
2389         for (i = 0; i < comp_v1->lcm_entry_count; i++) {
2390                 struct lov_user_md_v1 *v1;
2391                 struct lu_extent *ext;
2392
2393                 v1 = (struct lov_user_md *)((char *)comp_v1 +
2394                                 comp_v1->lcm_entries[i].lcme_offset);
2395                 ext = &comp_v1->lcm_entries[i].lcme_extent;
2396
2397                 lod_comp = &comp_array[lo->ldo_comp_cnt + i];
2398                 lod_comp->llc_extent.e_start = ext->e_start;
2399                 lod_comp->llc_extent.e_end = ext->e_end;
2400                 lod_comp->llc_stripe_offset = v1->lmm_stripe_offset;
2401                 lod_comp->llc_flags = comp_v1->lcm_entries[i].lcme_flags;
2402
2403                 lod_comp->llc_stripe_count = v1->lmm_stripe_count;
2404                 lod_comp->llc_stripe_size = v1->lmm_stripe_size;
2405                 lod_adjust_stripe_info(lod_comp, desc);
2406
2407                 if (v1->lmm_magic == LOV_USER_MAGIC_V3) {
2408                         v3 = (struct lov_user_md_v3 *) v1;
2409                         if (v3->lmm_pool_name[0] != '\0') {
2410                                 rc = lod_set_pool(&lod_comp->llc_pool,
2411                                                   v3->lmm_pool_name);
2412                                 if (rc)
2413                                         GOTO(error, rc);
2414                         }
2415                 }
2416         }
2417
2418         old_array = lo->ldo_comp_entries;
2419         old_array_cnt = lo->ldo_comp_cnt;
2420
2421         lo->ldo_comp_entries = comp_array;
2422         lo->ldo_comp_cnt = array_cnt;
2423
2424         /* No need to increase layout generation here, it will be increased
2425          * later when generating component ID for the new components */
2426
2427         info->lti_buf.lb_len = lod_comp_md_size(lo, false);
2428         rc = lod_sub_declare_xattr_set(env, next, &info->lti_buf,
2429                                               XATTR_NAME_LOV, 0, th);
2430         if (rc) {
2431                 lo->ldo_comp_entries = old_array;
2432                 lo->ldo_comp_cnt = old_array_cnt;
2433                 GOTO(error, rc);
2434         }
2435
2436         OBD_FREE(old_array, sizeof(*lod_comp) * old_array_cnt);
2437
2438         LASSERT(lo->ldo_mirror_count == 1);
2439         lo->ldo_mirrors[0].lme_end = array_cnt - 1;
2440
2441         RETURN(0);
2442
2443 error:
2444         for (i = lo->ldo_comp_cnt; i < array_cnt; i++) {
2445                 lod_comp = &comp_array[i];
2446                 if (lod_comp->llc_pool != NULL) {
2447                         OBD_FREE(lod_comp->llc_pool,
2448                                  strlen(lod_comp->llc_pool) + 1);
2449                         lod_comp->llc_pool = NULL;
2450                 }
2451         }
2452         OBD_FREE(comp_array, sizeof(*comp_array) * array_cnt);
2453         RETURN(rc);
2454 }
2455
2456 /**
2457  * Declare component set. The xattr is name XATTR_LUSTRE_LOV.set.$field,
2458  * the '$field' can only be 'flags' now. The xattr value is binary
2459  * lov_comp_md_v1 which contains the component ID(s) and the value of
2460  * the field to be modified.
2461  *
2462  * \param[in] env       execution environment
2463  * \param[in] dt        dt_object to be modified
2464  * \param[in] op        operation string, like "set.flags"
2465  * \param[in] buf       buffer contains components to be set
2466  * \parem[in] th        thandle
2467  *
2468  * \retval      0 on success
2469  * \retval      negative errno on failure
2470  */
2471 static int lod_declare_layout_set(const struct lu_env *env,
2472                                   struct dt_object *dt,
2473                                   char *op, const struct lu_buf *buf,
2474                                   struct thandle *th)
2475 {
2476         struct lod_layout_component     *lod_comp;
2477         struct lod_thread_info  *info = lod_env_info(env);
2478         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2479         struct lod_object       *lo = lod_dt_obj(dt);
2480         struct lov_comp_md_v1   *comp_v1 = buf->lb_buf;
2481         __u32   magic;
2482         int     i, j, rc;
2483         bool    changed = false;
2484         ENTRY;
2485
2486         if (strcmp(op, "set.flags") != 0) {
2487                 CDEBUG(D_LAYOUT, "%s: operation (%s) not supported.\n",
2488                        lod2obd(d)->obd_name, op);
2489                 RETURN(-ENOTSUPP);
2490         }
2491
2492         magic = comp_v1->lcm_magic;
2493         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
2494                 lustre_swab_lov_comp_md_v1(comp_v1);
2495                 magic = comp_v1->lcm_magic;
2496         }
2497
2498         if (magic != LOV_USER_MAGIC_COMP_V1)
2499                 RETURN(-EINVAL);
2500
2501         if (comp_v1->lcm_entry_count == 0) {
2502                 CDEBUG(D_LAYOUT, "%s: entry count is zero.\n",
2503                        lod2obd(d)->obd_name);
2504                 RETURN(-EINVAL);
2505         }
2506
2507         for (i = 0; i < comp_v1->lcm_entry_count; i++) {
2508                 __u32 id = comp_v1->lcm_entries[i].lcme_id;
2509                 __u32 flags = comp_v1->lcm_entries[i].lcme_flags;
2510
2511                 if (flags & LCME_FL_INIT) {
2512                         if (changed)
2513                                 lod_striping_free(env, lo);
2514                         RETURN(-EINVAL);
2515                 }
2516
2517                 for (j = 0; j < lo->ldo_comp_cnt; j++) {
2518                         lod_comp = &lo->ldo_comp_entries[j];
2519                         if (id != lod_comp->llc_id)
2520                                 continue;
2521
2522                         if (flags & LCME_FL_NEG) {
2523                                 flags &= ~LCME_FL_NEG;
2524                                 lod_comp->llc_flags &= ~flags;
2525                         } else {
2526                                 lod_comp->llc_flags |= flags;
2527                         }
2528                         changed = true;
2529                 }
2530         }
2531
2532         if (!changed) {
2533                 CDEBUG(D_LAYOUT, "%s: requested component(s) not found.\n",
2534                        lod2obd(d)->obd_name);
2535                 RETURN(-EINVAL);
2536         }
2537
2538         lod_obj_inc_layout_gen(lo);
2539
2540         info->lti_buf.lb_len = lod_comp_md_size(lo, false);
2541         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), &info->lti_buf,
2542                                        XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
2543         RETURN(rc);
2544 }
2545
2546 /**
2547  * Declare component deletion. The xattr name is XATTR_LUSTRE_LOV.del,
2548  * and the xattr value is a unique component ID or a special lcme_id.
2549  *
2550  * \param[in] env       execution environment
2551  * \param[in] dt        dt_object to be operated on
2552  * \param[in] buf       buffer contains component ID or lcme_id
2553  * \parem[in] th        thandle
2554  *
2555  * \retval      0 on success
2556  * \retval      negative errno on failure
2557  */
2558 static int lod_declare_layout_del(const struct lu_env *env,
2559                                   struct dt_object *dt,
2560                                   const struct lu_buf *buf,
2561                                   struct thandle *th)
2562 {
2563         struct lod_thread_info  *info = lod_env_info(env);
2564         struct dt_object *next = dt_object_child(dt);
2565         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
2566         struct lod_object *lo = lod_dt_obj(dt);
2567         struct lu_attr *attr = &lod_env_info(env)->lti_attr;
2568         struct lov_comp_md_v1 *comp_v1 = buf->lb_buf;
2569         __u32 magic, id, flags, neg_flags = 0;
2570         int rc, i, j, left;
2571         ENTRY;
2572
2573         LASSERT(lo->ldo_is_composite);
2574
2575         if (lo->ldo_flr_state != LCM_FL_NONE)
2576                 RETURN(-EBUSY);
2577
2578         magic = comp_v1->lcm_magic;
2579         if (magic == __swab32(LOV_USER_MAGIC_COMP_V1)) {
2580                 lustre_swab_lov_comp_md_v1(comp_v1);
2581                 magic = comp_v1->lcm_magic;
2582         }
2583
2584         if (magic != LOV_USER_MAGIC_COMP_V1)
2585                 RETURN(-EINVAL);
2586
2587         id = comp_v1->lcm_entries[0].lcme_id;
2588         flags = comp_v1->lcm_entries[0].lcme_flags;
2589
2590         if (id > LCME_ID_MAX || (flags & ~LCME_KNOWN_FLAGS)) {
2591                 CDEBUG(D_LAYOUT, "%s: invalid component id %#x, flags %#x\n",
2592                        lod2obd(d)->obd_name, id, flags);
2593                 RETURN(-EINVAL);
2594         }
2595
2596         if (id != LCME_ID_INVAL && flags != 0) {
2597                 CDEBUG(D_LAYOUT, "%s: specified both id and flags.\n",
2598                        lod2obd(d)->obd_name);
2599                 RETURN(-EINVAL);
2600         }
2601
2602         if (id == LCME_ID_INVAL && !flags) {
2603                 CDEBUG(D_LAYOUT, "%s: no id or flags specified.\n",
2604                        lod2obd(d)->obd_name);
2605                 RETURN(-EINVAL);
2606         }
2607
2608         if (flags & LCME_FL_NEG) {
2609                 neg_flags = flags & ~LCME_FL_NEG;
2610                 flags = 0;
2611         }
2612
2613         left = lo->ldo_comp_cnt;
2614         if (left <= 0)
2615                 RETURN(-EINVAL);
2616
2617         for (i = (lo->ldo_comp_cnt - 1); i >= 0; i--) {
2618                 struct lod_layout_component *lod_comp;
2619
2620                 lod_comp = &lo->ldo_comp_entries[i];
2621
2622                 if (id != LCME_ID_INVAL && id != lod_comp->llc_id)
2623                         continue;
2624                 else if (flags && !(flags & lod_comp->llc_flags))
2625                         continue;
2626                 else if (neg_flags && (neg_flags & lod_comp->llc_flags))
2627                         continue;
2628
2629                 if (left != (i + 1)) {
2630                         CDEBUG(D_LAYOUT, "%s: this deletion will create "
2631                                "a hole.\n", lod2obd(d)->obd_name);
2632                         RETURN(-EINVAL);
2633                 }
2634                 left--;
2635
2636                 /* Mark the component as deleted */
2637                 lod_comp->llc_id = LCME_ID_INVAL;
2638
2639                 /* Not instantiated component */
2640                 if (lod_comp->llc_stripe == NULL)
2641                         continue;
2642
2643                 LASSERT(lod_comp->llc_stripe_count > 0);
2644                 for (j = 0; j < lod_comp->llc_stripe_count; j++) {
2645                         struct dt_object *obj = lod_comp->llc_stripe[j];
2646
2647                         if (obj == NULL)
2648                                 continue;
2649                         rc = lod_sub_declare_destroy(env, obj, th);
2650                         if (rc)
2651                                 RETURN(rc);
2652                 }
2653         }
2654
2655         LASSERTF(left >= 0, "left = %d\n", left);
2656         if (left == lo->ldo_comp_cnt) {
2657                 CDEBUG(D_LAYOUT, "%s: requested component id:%#x not found\n",
2658                        lod2obd(d)->obd_name, id);
2659                 RETURN(-EINVAL);
2660         }
2661
2662         memset(attr, 0, sizeof(*attr));
2663         attr->la_valid = LA_SIZE;
2664         rc = lod_sub_declare_attr_set(env, next, attr, th);
2665         if (rc)
2666                 RETURN(rc);
2667
2668         if (left > 0) {
2669                 info->lti_buf.lb_len = lod_comp_md_size(lo, false);
2670                 rc = lod_sub_declare_xattr_set(env, next, &info->lti_buf,
2671                                                XATTR_NAME_LOV, 0, th);
2672         } else {
2673                 rc = lod_sub_declare_xattr_del(env, next, XATTR_NAME_LOV, th);
2674         }
2675
2676         RETURN(rc);
2677 }
2678
2679 /**
2680  * Declare layout add/set/del operations issued by special xattr names:
2681  *
2682  * XATTR_LUSTRE_LOV.add         add component(s) to existing file
2683  * XATTR_LUSTRE_LOV.del         delete component(s) from existing file
2684  * XATTR_LUSTRE_LOV.set.$field  set specified field of certain component(s)
2685  *
2686  * \param[in] env       execution environment
2687  * \param[in] dt        object
2688  * \param[in] name      name of xattr
2689  * \param[in] buf       lu_buf contains xattr value
2690  * \param[in] th        transaction handle
2691  *
2692  * \retval              0 on success
2693  * \retval              negative if failed
2694  */
2695 static int lod_declare_modify_layout(const struct lu_env *env,
2696                                      struct dt_object *dt,
2697                                      const char *name,
2698                                      const struct lu_buf *buf,
2699                                      struct thandle *th)
2700 {
2701         struct lod_device *d = lu2lod_dev(dt->do_lu.lo_dev);
2702         struct lod_object *lo = lod_dt_obj(dt);
2703         char *op;
2704         int rc, len = strlen(XATTR_LUSTRE_LOV);
2705         ENTRY;
2706
2707         LASSERT(dt_object_exists(dt));
2708
2709         if (strlen(name) <= len || name[len] != '.') {
2710                 CDEBUG(D_LAYOUT, "%s: invalid xattr name: %s\n",
2711                        lod2obd(d)->obd_name, name);
2712                 RETURN(-EINVAL);
2713         }
2714         len++;
2715
2716         rc = lod_striping_load(env, lo);
2717         if (rc)
2718                 GOTO(unlock, rc);
2719
2720         /* the layout to be modified must be a composite layout */
2721         if (!lo->ldo_is_composite) {
2722                 CDEBUG(D_LAYOUT, "%s: object "DFID" isn't a composite file.\n",
2723                        lod2obd(d)->obd_name, PFID(lu_object_fid(&dt->do_lu)));
2724                 GOTO(unlock, rc = -EINVAL);
2725         }
2726
2727         op = (char *)name + len;
2728         if (strcmp(op, "add") == 0) {
2729                 rc = lod_declare_layout_add(env, dt, buf, th);
2730         } else if (strcmp(op, "del") == 0) {
2731                 rc = lod_declare_layout_del(env, dt, buf, th);
2732         } else if (strncmp(op, "set", strlen("set")) == 0) {
2733                 rc = lod_declare_layout_set(env, dt, op, buf, th);
2734         } else  {
2735                 CDEBUG(D_LAYOUT, "%s: unsupported xattr name:%s\n",
2736                        lod2obd(d)->obd_name, name);
2737                 GOTO(unlock, rc = -ENOTSUPP);
2738         }
2739 unlock:
2740         if (rc)
2741                 lod_striping_free(env, lo);
2742
2743         RETURN(rc);
2744 }
2745
2746 /**
2747  * Convert a plain file lov_mds_md to a composite layout.
2748  *
2749  * \param[in,out] info  the thread info::lti_ea_store buffer contains little
2750  *                      endian plain file layout
2751  *
2752  * \retval              0 on success, <0 on failure
2753  */
2754 static int lod_layout_convert(struct lod_thread_info *info)
2755 {
2756         struct lov_mds_md *lmm = info->lti_ea_store;
2757         struct lov_mds_md *lmm_save;
2758         struct lov_comp_md_v1 *lcm;
2759         struct lov_comp_md_entry_v1 *lcme;
2760         size_t size;
2761         __u32 blob_size;
2762         int rc = 0;
2763         ENTRY;
2764
2765         /* realloc buffer to a composite layout which contains one component */
2766         blob_size = lov_mds_md_size(le16_to_cpu(lmm->lmm_stripe_count),
2767                                     le32_to_cpu(lmm->lmm_magic));
2768         size = sizeof(*lcm) + sizeof(*lcme) + blob_size;
2769
2770         OBD_ALLOC_LARGE(lmm_save, blob_size);
2771         if (!lmm_save)
2772                 GOTO(out, rc = -ENOMEM);
2773
2774         memcpy(lmm_save, lmm, blob_size);
2775
2776         if (info->lti_ea_store_size < size) {
2777                 rc = lod_ea_store_resize(info, size);
2778                 if (rc)
2779                         GOTO(out, rc);
2780         }
2781
2782         lcm = info->lti_ea_store;
2783         lcm->lcm_magic = cpu_to_le32(LOV_MAGIC_COMP_V1);
2784         lcm->lcm_size = cpu_to_le32(size);
2785         lcm->lcm_layout_gen = cpu_to_le32(le16_to_cpu(
2786                                                 lmm_save->lmm_layout_gen));
2787         lcm->lcm_flags = cpu_to_le16(LCM_FL_NONE);
2788         lcm->lcm_entry_count = cpu_to_le16(1);
2789         lcm->lcm_mirror_count = 0;
2790
2791         lcme = &lcm->lcm_entries[0];
2792         lcme->lcme_flags = cpu_to_le32(LCME_FL_INIT);
2793         lcme->lcme_extent.e_start = 0;
2794         lcme->lcme_extent.e_end = cpu_to_le64(OBD_OBJECT_EOF);
2795         lcme->lcme_offset = cpu_to_le32(sizeof(*lcm) + sizeof(*lcme));
2796         lcme->lcme_size = cpu_to_le32(blob_size);
2797
2798         memcpy((char *)lcm + lcme->lcme_offset, (char *)lmm_save, blob_size);
2799
2800         EXIT;
2801 out:
2802         if (lmm_save)
2803                 OBD_FREE_LARGE(lmm_save, blob_size);
2804         return rc;
2805 }
2806
2807 /**
2808  * Merge layouts to form a mirrored file.
2809  */
2810 static int lod_declare_layout_merge(const struct lu_env *env,
2811                 struct dt_object *dt, const struct lu_buf *mbuf,
2812                 struct thandle *th)
2813 {
2814         struct lod_thread_info  *info = lod_env_info(env);
2815         struct lu_buf           *buf = &info->lti_buf;
2816         struct lod_object       *lo = lod_dt_obj(dt);
2817         struct lov_comp_md_v1   *lcm;
2818         struct lov_comp_md_v1   *cur_lcm;
2819         struct lov_comp_md_v1   *merge_lcm;
2820         struct lov_comp_md_entry_v1     *lcme;
2821         size_t size = 0;
2822         size_t offset;
2823         __u16 cur_entry_count;
2824         __u16 merge_entry_count;
2825         __u32 id = 0;
2826         __u16 mirror_id = 0;
2827         __u32 mirror_count;
2828         int     rc, i;
2829         ENTRY;
2830
2831         merge_lcm = mbuf->lb_buf;
2832         if (mbuf->lb_len < sizeof(*merge_lcm))
2833                 RETURN(-EINVAL);
2834
2835         /* must be an existing layout from disk */
2836         if (le32_to_cpu(merge_lcm->lcm_magic) != LOV_MAGIC_COMP_V1)
2837                 RETURN(-EINVAL);
2838
2839         merge_entry_count = le16_to_cpu(merge_lcm->lcm_entry_count);
2840
2841         /* do not allow to merge two mirrored files */
2842         if (le16_to_cpu(merge_lcm->lcm_mirror_count))
2843                 RETURN(-EBUSY);
2844
2845         /* verify the target buffer */
2846         rc = lod_get_lov_ea(env, lo);
2847         if (rc <= 0)
2848                 RETURN(rc ? : -ENODATA);
2849
2850         cur_lcm = info->lti_ea_store;
2851         switch (le32_to_cpu(cur_lcm->lcm_magic)) {
2852         case LOV_MAGIC_V1:
2853         case LOV_MAGIC_V3:
2854                 rc = lod_layout_convert(info);
2855                 break;
2856         case LOV_MAGIC_COMP_V1:
2857                 rc = 0;
2858                 break;
2859         default:
2860                 rc = -EINVAL;
2861         }
2862         if (rc)
2863                 RETURN(rc);
2864
2865         /* info->lti_ea_store could be reallocated in lod_layout_convert() */
2866         cur_lcm = info->lti_ea_store;
2867         cur_entry_count = le16_to_cpu(cur_lcm->lcm_entry_count);
2868
2869         /* 'lcm_mirror_count + 1' is the current # of mirrors the file has */
2870         mirror_count = le16_to_cpu(cur_lcm->lcm_mirror_count) + 1;
2871         if (mirror_count + 1 > LUSTRE_MIRROR_COUNT_MAX)
2872                 RETURN(-ERANGE);
2873
2874         /* size of new layout */
2875         size = le32_to_cpu(cur_lcm->lcm_size) +
2876                le32_to_cpu(merge_lcm->lcm_size) - sizeof(*cur_lcm);
2877
2878         memset(buf, 0, sizeof(*buf));
2879         lu_buf_alloc(buf, size);
2880         if (buf->lb_buf == NULL)
2881                 RETURN(-ENOMEM);
2882
2883         lcm = buf->lb_buf;
2884         memcpy(lcm, cur_lcm, sizeof(*lcm) + cur_entry_count * sizeof(*lcme));
2885
2886         offset = sizeof(*lcm) +
2887                  sizeof(*lcme) * (cur_entry_count + merge_entry_count);
2888         for (i = 0; i < cur_entry_count; i++) {
2889                 struct lov_comp_md_entry_v1 *cur_lcme;
2890
2891                 lcme = &lcm->lcm_entries[i];
2892                 cur_lcme = &cur_lcm->lcm_entries[i];
2893
2894                 lcme->lcme_offset = cpu_to_le32(offset);
2895                 memcpy((char *)lcm + offset,
2896                        (char *)cur_lcm + le32_to_cpu(cur_lcme->lcme_offset),
2897                        le32_to_cpu(lcme->lcme_size));
2898
2899                 offset += le32_to_cpu(lcme->lcme_size);
2900
2901                 if (mirror_count == 1) {
2902                         /* new mirrored file, create new mirror ID */
2903                         id = pflr_id(1, i + 1);
2904                         lcme->lcme_id = cpu_to_le32(id);
2905                 }
2906
2907                 id = MAX(le32_to_cpu(lcme->lcme_id), id);
2908         }
2909
2910         mirror_id = mirror_id_of(id) + 1;
2911         for (i = 0; i < merge_entry_count; i++) {
2912                 struct lov_comp_md_entry_v1 *merge_lcme;
2913
2914                 merge_lcme = &merge_lcm->lcm_entries[i];
2915                 lcme = &lcm->lcm_entries[cur_entry_count + i];
2916
2917                 *lcme = *merge_lcme;
2918                 lcme->lcme_offset = cpu_to_le32(offset);
2919
2920                 id = pflr_id(mirror_id, i + 1);
2921                 lcme->lcme_id = cpu_to_le32(id);
2922
2923                 memcpy((char *)lcm + offset,
2924                        (char *)merge_lcm + le32_to_cpu(merge_lcme->lcme_offset),
2925                        le32_to_cpu(lcme->lcme_size));
2926
2927                 offset += le32_to_cpu(lcme->lcme_size);
2928         }
2929
2930         /* fixup layout information */
2931         lod_obj_inc_layout_gen(lo);
2932         lcm->lcm_layout_gen = cpu_to_le32(lo->ldo_layout_gen);
2933         lcm->lcm_size = cpu_to_le32(size);
2934         lcm->lcm_entry_count = cpu_to_le16(cur_entry_count + merge_entry_count);
2935         lcm->lcm_mirror_count = cpu_to_le16(mirror_count);
2936         if ((le16_to_cpu(lcm->lcm_flags) & LCM_FL_FLR_MASK) == LCM_FL_NONE)
2937                 lcm->lcm_flags = cpu_to_le32(LCM_FL_RDONLY);
2938
2939         rc = lod_striping_reload(env, lo, buf);
2940         if (rc)
2941                 GOTO(out, rc);
2942
2943         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), buf,
2944                                         XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
2945
2946 out:
2947         lu_buf_free(buf);
2948         RETURN(rc);
2949 }
2950
2951 /**
2952  * Split layouts, just set the LOVEA with the layout from mbuf.
2953  */
2954 static int lod_declare_layout_split(const struct lu_env *env,
2955                 struct dt_object *dt, const struct lu_buf *mbuf,
2956                 struct thandle *th)
2957 {
2958         struct lod_object *lo = lod_dt_obj(dt);
2959         struct lov_comp_md_v1 *lcm = mbuf->lb_buf;
2960         int rc;
2961         ENTRY;
2962
2963         lod_obj_inc_layout_gen(lo);
2964         lcm->lcm_layout_gen = cpu_to_le32(lo->ldo_layout_gen);
2965
2966         rc = lod_striping_reload(env, lo, mbuf);
2967         if (rc)
2968                 RETURN(rc);
2969
2970         rc = lod_sub_declare_xattr_set(env, dt_object_child(dt), mbuf,
2971                                        XATTR_NAME_LOV, LU_XATTR_REPLACE, th);
2972         RETURN(rc);
2973 }
2974
2975 /**
2976  * Implementation of dt_object_operations::do_declare_xattr_set.
2977  *
2978  * \see dt_object_operations::do_declare_xattr_set() in the API description
2979  * for details.
2980  *
2981  * the extension to the API:
2982  *   - declaring LOVEA requests striping creation
2983  *   - LU_XATTR_REPLACE means layout swap
2984  */
2985 static int lod_declare_xattr_set(const struct lu_env *env,
2986                                  struct dt_object *dt,
2987                                  const struct lu_buf *buf,
2988                                  const char *name, int fl,
2989                                  struct thandle *th)
2990 {
2991         struct dt_object *next = dt_object_child(dt);
2992         struct lu_attr   *attr = &lod_env_info(env)->lti_attr;
2993         __u32             mode;
2994         int               rc;
2995         ENTRY;
2996
2997         mode = dt->do_lu.lo_header->loh_attr & S_IFMT;
2998         if ((S_ISREG(mode) || mode == 0) &&
2999             !(fl & (LU_XATTR_REPLACE | LU_XATTR_MERGE | LU_XATTR_SPLIT)) &&
3000             (strcmp(name, XATTR_NAME_LOV) == 0 ||
3001              strcmp(name, XATTR_LUSTRE_LOV) == 0)) {
3002                 /*
3003                  * this is a request to create object's striping.
3004                  *
3005                  * allow to declare predefined striping on a new (!mode) object
3006                  * which is supposed to be replay of regular file creation
3007                  * (when LOV setting is declared)
3008                  *
3009                  * LU_XATTR_REPLACE is set to indicate a layout swap
3010                  */
3011                 if (dt_object_exists(dt)) {
3012                         rc = dt_attr_get(env, next, attr);
3013                         if (rc)
3014                                 RETURN(rc);
3015                 } else {
3016                         memset(attr, 0, sizeof(*attr));
3017                         attr->la_valid = LA_TYPE | LA_MODE;
3018                         attr->la_mode = S_IFREG;
3019                 }
3020                 rc = lod_declare_striped_create(env, dt, attr, buf, th);
3021         } else if (fl & LU_XATTR_MERGE) {
3022                 LASSERT(strcmp(name, XATTR_NAME_LOV) == 0 ||
3023                         strcmp(name, XATTR_LUSTRE_LOV) == 0);
3024                 rc = lod_declare_layout_merge(env, dt, buf, th);
3025         } else if (fl & LU_XATTR_SPLIT) {
3026                 LASSERT(strcmp(name, XATTR_NAME_LOV) == 0 ||
3027                         strcmp(name, XATTR_LUSTRE_LOV) == 0);
3028                 rc = lod_declare_layout_split(env, dt, buf, th);
3029         } else if (S_ISREG(mode) &&
3030                    strlen(name) > strlen(XATTR_LUSTRE_LOV) + 1 &&
3031                    strncmp(name, XATTR_LUSTRE_LOV,
3032                            strlen(XATTR_LUSTRE_LOV)) == 0) {
3033                 /*
3034                  * this is a request to modify object's striping.
3035                  * add/set/del component(s).
3036                  */
3037                 if (!dt_object_exists(dt))
3038                         RETURN(-ENOENT);
3039
3040                 rc = lod_declare_modify_layout(env, dt, name, buf, th);
3041         } else if (S_ISDIR(mode)) {
3042                 rc = lod_dir_declare_xattr_set(env, dt, buf, name, fl, th);
3043         } else if (strcmp(name, XATTR_NAME_FID) == 0) {
3044                 rc = lod_replace_parent_fid(env, dt, th, true);
3045         } else {
3046                 rc = lod_sub_declare_xattr_set(env, next, buf, name, fl, th);
3047         }
3048
3049         RETURN(rc);
3050 }
3051
3052 /**
3053  * Apply xattr changes to the object.
3054  *
3055  * Applies xattr changes to the object and the stripes if the latter exist.
3056  *
3057  * \param[in] env       execution environment
3058  * \param[in] dt        object
3059  * \param[in] buf       buffer pointing to the new value of xattr
3060  * \param[in] name      name of xattr
3061  * \param[in] fl        flags
3062  * \param[in] th        transaction handle
3063  *
3064  * \retval              0 on success
3065  * \retval              negative if failed
3066  */
3067 static int lod_xattr_set_internal(const struct lu_env *env,
3068                                   struct dt_object *dt,
3069                                   const struct lu_buf *buf,
3070                                   const char *name, int fl,
3071                                   struct thandle *th)
3072 {
3073         struct dt_object        *next = dt_object_child(dt);
3074         struct lod_object       *lo = lod_dt_obj(dt);
3075         int                     rc;
3076         int                     i;
3077         ENTRY;
3078
3079         rc = lod_sub_xattr_set(env, next, buf, name, fl, th);
3080         if (rc != 0 || !S_ISDIR(dt->do_lu.lo_header->loh_attr))
3081                 RETURN(rc);
3082
3083         /* Note: Do not set LinkEA on sub-stripes, otherwise
3084          * it will confuse the fid2path process(see mdt_path_current()).
3085          * The linkEA between master and sub-stripes is set in
3086          * lod_xattr_set_lmv(). */
3087         if (lo->ldo_dir_stripe_count == 0 || strcmp(name, XATTR_NAME_LINK) == 0)
3088                 RETURN(0);
3089
3090         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
3091                 LASSERT(lo->ldo_stripe[i]);
3092
3093                 rc = lod_sub_xattr_set(env, lo->ldo_stripe[i], buf, name,
3094                                        fl, th);
3095                 if (rc != 0)
3096                         break;
3097         }
3098
3099         RETURN(rc);
3100 }
3101
3102 /**
3103  * Delete an extended attribute.
3104  *
3105  * Deletes specified xattr from the object and the stripes if the latter exist.
3106  *
3107  * \param[in] env       execution environment
3108  * \param[in] dt        object
3109  * \param[in] name      name of xattr
3110  * \param[in] th        transaction handle
3111  *
3112  * \retval              0 on success
3113  * \retval              negative if failed
3114  */
3115 static int lod_xattr_del_internal(const struct lu_env *env,
3116                                   struct dt_object *dt,
3117                                   const char *name, struct thandle *th)
3118 {
3119         struct dt_object        *next = dt_object_child(dt);
3120         struct lod_object       *lo = lod_dt_obj(dt);
3121         int                     rc;
3122         int                     i;
3123         ENTRY;
3124
3125         rc = lod_sub_xattr_del(env, next, name, th);
3126         if (rc != 0 || !S_ISDIR(dt->do_lu.lo_header->loh_attr))
3127                 RETURN(rc);
3128
3129         if (lo->ldo_dir_stripe_count == 0)
3130                 RETURN(rc);
3131
3132         for (i = 0; i < lo->ldo_dir_stripe_count; i++) {
3133                 LASSERT(lo->ldo_stripe[i]);
3134
3135                 rc = lod_sub_xattr_del(env, lo->ldo_stripe[i], name, th);
3136                 if (rc != 0)
3137                         break;
3138         }
3139
3140         RETURN(rc);
3141 }
3142
3143 /**
3144  * Set default striping on a directory.
3145  *
3146  * Sets specified striping on a directory object unless it matches the default
3147  * striping (LOVEA_DELETE_VALUES() macro). In the latter case remove existing
3148  * EA. This striping will be used when regular file is being created in this
3149  * directory.
3150  *
3151  * \param[in] env       execution environment
3152  * \param[in] dt        the striped object
3153  * \param[in] buf       buffer with the striping
3154  * \param[in] name      name of EA
3155  * \param[in] fl        xattr flag (see OSD API description)
3156  * \param[in] th        transaction handle
3157  *
3158  * \retval              0 on success
3159  * \retval              negative if failed
3160  */
3161 static int lod_xattr_set_lov_on_dir(const struct lu_env *env,
3162                                     struct dt_object *dt,
3163                                     const struct lu_buf *buf,
3164                                     const char *name, int fl,
3165                                     struct thandle *th)
3166 {
3167         struct lov_user_md_v1   *lum;
3168         struct lov_user_md_v3   *v3 = NULL;
3169         const char              *pool_name = NULL;
3170         int                      rc;
3171         bool                     is_del;
3172         ENTRY;
3173
3174         LASSERT(buf != NULL && buf->lb_buf != NULL);
3175         lum = buf->lb_buf;
3176
3177         switch (lum->lmm_magic) {
3178         case LOV_USER_MAGIC_SPECIFIC:
3179         case LOV_USER_MAGIC_V3:
3180                 v3 = buf->lb_buf;
3181                 if (v3->lmm_pool_name[0] != '\0')
3182                         pool_name = v3->lmm_pool_name;
3183                 /* fall through */
3184         case LOV_USER_MAGIC_V1:
3185                 /* if { size, offset, count } = { 0, -1, 0 } and no pool
3186                  * (i.e. all default values specified) then delete default
3187                  * striping from dir. */
3188                 CDEBUG(D_LAYOUT,
3189                        "set default striping: sz %u # %u offset %d %s %s\n",
3190                        (unsigned)lum->lmm_stripe_size,
3191                        (unsigned)lum->lmm_stripe_count,
3192                        (int)lum->lmm_stripe_offset,
3193                        v3 ? "from" : "", v3 ? v3->lmm_pool_name : "");
3194
3195                 is_del = LOVEA_DELETE_VALUES(lum->lmm_stripe_size,
3196                                              lum->lmm_stripe_count,
3197                                              lum->lmm_stripe_offset,
3198                                              pool_name);
3199                 break;
3200         case LOV_USER_MAGIC_COMP_V1:
3201                 is_del = false;
3202                 break;
3203         default:
3204                 CERROR("Invalid magic %x\n", lum->lmm_magic);
3205                 RETURN(-EINVAL);
3206         }
3207
3208         if (is_del) {
3209                 rc = lod_xattr_del_internal(env, dt, name, th);
3210                 if (rc == -ENODATA)
3211                         rc = 0;
3212         } else {
3213                 rc = lod_xattr_set_internal(env, dt, buf, name, fl, th);
3214         }
3215
3216         RETURN(rc);
3217 }
3218
3219 /**
3220  * Set default striping on a directory object.
3221  *
3222  * Sets specified striping on a directory object unless it matches the default
3223  * striping (LOVEA_DELETE_VALUES() macro). In the latter case remove existing
3224  * EA. This striping will be used when a new directory is being created in the
3225  * directory.
3226  *
3227  * \param[in] env       execution environment
3228  * \param[in] dt        the striped object
3229  * \param[in] buf       buffer with the striping
3230  * \param[in] name      name of EA
3231  * \param[in] fl        xattr flag (see OSD API description)
3232  * \param[in] th        transaction handle
3233  *
3234  * \retval              0 on success
3235  * \retval              negative if failed
3236  */
3237 static int lod_xattr_set_default_lmv_on_dir(const struct lu_env *env,
3238                                             struct dt_object *dt,
3239