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