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, 2016, 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 <obd.h>
  44 #include <obd_class.h>
  45 #include <obd_support.h>
  46
  47 #include <lustre_fid.h>
  48 #include <lustre_linkea.h>
  49 #include <lustre_lmv.h>
  50 #include <lustre_param.h>
  51 #include <lustre_swab.h>
  52 #include <lustre_ver.h>
  53 #include <lprocfs_status.h>
  54 #include <md_object.h>
  55
  56 #include "lod_internal.h"
  57
  58 static const char dot[] = ".";
  59 static const char dotdot[] = "..";
  60
  61 static const struct dt_body_operations lod_body_lnk_ops;
  62 static const struct dt_body_operations lod_body_ops;
  63
  64 /**
  65  * Implementation of dt_index_operations::dio_lookup
  66  *
  67  * Used with regular (non-striped) objects.
  68  *
  69  * \see dt_index_operations::dio_lookup() in the API description for details.
  70  */
  71 static int lod_index_lookup(const struct lu_env *env, struct dt_object *dt,
  72                             struct dt_rec *rec, const struct dt_key *key)
  73 {
  74         struct dt_object *next = dt_object_child(dt);
  75         return next->do_index_ops->dio_lookup(env, next, rec, key);
  76 }
  77
  78 /**
  79  * Implementation of dt_index_operations::dio_declare_insert.
  80  *
  81  * Used with regular (non-striped) objects.
  82  *
  83  * \see dt_index_operations::dio_declare_insert() in the API description
  84  * for details.
  85  */
  86 static int lod_declare_index_insert(const struct lu_env *env,
  87                                     struct dt_object *dt,
  88                                     const struct dt_rec *rec,
  89                                     const struct dt_key *key,
  90                                     struct thandle *th)
  91 {
  92         return lod_sub_object_declare_insert(env, dt_object_child(dt),
  93                                              rec, key, th);
  94 }
  95
  96 /**
  97  * Implementation of dt_index_operations::dio_insert.
  98  *
  99  * Used with regular (non-striped) objects
 100  *
 101  * \see dt_index_operations::dio_insert() in the API description for details.
 102  */
 103 static int lod_index_insert(const struct lu_env *env,
 104                             struct dt_object *dt,
 105                             const struct dt_rec *rec,
 106                             const struct dt_key *key,
 107                             struct thandle *th,
 108                             int ign)
 109 {
 110         return lod_sub_object_index_insert(env, dt_object_child(dt), rec, key,
 111                                            th, ign);
 112 }
 113
 114 /**
 115  * Implementation of dt_index_operations::dio_declare_delete.
 116  *
 117  * Used with regular (non-striped) objects.
 118  *
 119  * \see dt_index_operations::dio_declare_delete() in the API description
 120  * for details.
 121  */
 122 static int lod_declare_index_delete(const struct lu_env *env,
 123                                     struct dt_object *dt,
 124                                     const struct dt_key *key,
 125                                     struct thandle *th)
 126 {
 127         return lod_sub_object_declare_delete(env, dt_object_child(dt), key,
 128                                              th);
 129 }
 130
 131 /**
 132  * Implementation of dt_index_operations::dio_delete.
 133  *
 134  * Used with regular (non-striped) objects.
 135  *
 136  * \see dt_index_operations::dio_delete() in the API description for details.
 137  */
 138 static int lod_index_delete(const struct lu_env *env,
 139                             struct dt_object *dt,
 140                             const struct dt_key *key,
 141                             struct thandle *th)
 142 {
 143         return lod_sub_object_delete(env, dt_object_child(dt), key, th);
 144 }
 145
 146 /**
 147  * Implementation of dt_it_ops::init.
 148  *
 149  * Used with regular (non-striped) objects.
 150  *
 151  * \see dt_it_ops::init() in the API description for details.
 152  */
 153 static struct dt_it *lod_it_init(const struct lu_env *env,
 154                                  struct dt_object *dt, __u32 attr)
 155 {
 156         struct dt_object        *next = dt_object_child(dt);
 157         struct lod_it           *it = &lod_env_info(env)->lti_it;
 158         struct dt_it            *it_next;
 159
 160         it_next = next->do_index_ops->dio_it.init(env, next, attr);
 161         if (IS_ERR(it_next))
 162                 return it_next;
 163
 164         /* currently we do not use more than one iterator per thread
 165          * so we store it in thread info. if at some point we need
 166          * more active iterators in a single thread, we can allocate
 167          * additional ones */
 168         LASSERT(it->lit_obj == NULL);
 169
 170         it->lit_it = it_next;
 171         it->lit_obj = next;
 172
 173         return (struct dt_it *)it;
 174 }
 175
 176 #define LOD_CHECK_IT(env, it)                                   \
 177 do {                                                            \
 178         LASSERT((it)->lit_obj != NULL);                         \
 179         LASSERT((it)->lit_it != NULL);                          \
 180 } while (0)
 181
 182 /**
 183  * Implementation of dt_index_operations::dio_it.fini.
 184  *
 185  * Used with regular (non-striped) objects.
 186  *
 187  * \see dt_index_operations::dio_it.fini() in the API description for details.
 188  */
 189 static void lod_it_fini(const struct lu_env *env, struct dt_it *di)
 190 {
 191         struct lod_it *it = (struct lod_it *)di;
 192
 193         LOD_CHECK_IT(env, it);
 194         it->lit_obj->do_index_ops->dio_it.fini(env, it->lit_it);
 195
 196         /* the iterator not in use any more */
 197         it->lit_obj = NULL;
 198         it->lit_it = NULL;
 199 }
 200
 201 /**
 202  * Implementation of dt_it_ops::get.
 203  *
 204  * Used with regular (non-striped) objects.
 205  *
 206  * \see dt_it_ops::get() in the API description for details.
 207  */
 208 static int lod_it_get(const struct lu_env *env, struct dt_it *di,
 209                       const struct dt_key *key)
 210 {
 211         const struct lod_it *it = (const struct lod_it *)di;
 212
 213         LOD_CHECK_IT(env, it);
 214         return it->lit_obj->do_index_ops->dio_it.get(env, it->lit_it, key);
 215 }
 216
 217 /**
 218  * Implementation of dt_it_ops::put.
 219  *
 220  * Used with regular (non-striped) objects.
 221  *
 222  * \see dt_it_ops::put() in the API description for details.
 223  */
 224 static void lod_it_put(const struct lu_env *env, struct dt_it *di)
 225 {
 226         struct lod_it *it = (struct lod_it *)di;
 227
 228         LOD_CHECK_IT(env, it);
 229         return it->lit_obj->do_index_ops->dio_it.put(env, it->lit_it);
 230 }
 231
 232 /**
 233  * Implementation of dt_it_ops::next.
 234  *
 235  * Used with regular (non-striped) objects
 236  *
 237  * \see dt_it_ops::next() in the API description for details.
 238  */
 239 static int lod_it_next(const struct lu_env *env, struct dt_it *di)
 240 {
 241         struct lod_it *it = (struct lod_it *)di;
 242
 243         LOD_CHECK_IT(env, it);
 244         return it->lit_obj->do_index_ops->dio_it.next(env, it->lit_it);
 245 }
 246
 247 /**
 248  * Implementation of dt_it_ops::key.
 249  *
 250  * Used with regular (non-striped) objects.
 251  *
 252  * \see dt_it_ops::key() in the API description for details.
 253  */
 254 static struct dt_key *lod_it_key(const struct lu_env *env,
 255                                  const struct dt_it *di)
 256 {
 257         const struct lod_it *it = (const struct lod_it *)di;
 258
 259         LOD_CHECK_IT(env, it);
 260         return it->lit_obj->do_index_ops->dio_it.key(env, it->lit_it);
 261 }
 262
 263 /**
 264  * Implementation of dt_it_ops::key_size.
 265  *
 266  * Used with regular (non-striped) objects.
 267  *
 268  * \see dt_it_ops::key_size() in the API description for details.
 269  */
 270 static int lod_it_key_size(const struct lu_env *env, const struct dt_it *di)
 271 {
 272         struct lod_it *it = (struct lod_it *)di;
 273
 274         LOD_CHECK_IT(env, it);
 275         return it->lit_obj->do_index_ops->dio_it.key_size(env, it->lit_it);
 276 }
 277
 278 /**
 279  * Implementation of dt_it_ops::rec.
 280  *
 281  * Used with regular (non-striped) objects.
 282  *
 283  * \see dt_it_ops::rec() in the API description for details.
 284  */
 285 static int lod_it_rec(const struct lu_env *env, const struct dt_it *di,
 286                       struct dt_rec *rec, __u32 attr)
 287 {
 288         const struct lod_it *it = (const struct lod_it *)di;
 289
 290         LOD_CHECK_IT(env, it);
 291         return it->lit_obj->do_index_ops->dio_it.rec(env, it->lit_it, rec,
 292                                                      attr);
 293 }
 294
 295 /**
 296  * Implementation of dt_it_ops::rec_size.
 297  *
 298  * Used with regular (non-striped) objects.
 299  *
 300  * \see dt_it_ops::rec_size() in the API description for details.
 301  */
 302 static int lod_it_rec_size(const struct lu_env *env, const struct dt_it *di,
 303                            __u32 attr)
 304 {
 305         const struct lod_it *it = (const struct lod_it *)di;
 306
 307         LOD_CHECK_IT(env, it);
 308         return it->lit_obj->do_index_ops->dio_it.rec_size(env, it->lit_it,
 309                                                           attr);
 310 }
 311
 312 /**
 313  * Implementation of dt_it_ops::store.
 314  *
 315  * Used with regular (non-striped) objects.
 316  *
 317  * \see dt_it_ops::store() in the API description for details.
 318  */
 319 static __u64 lod_it_store(const struct lu_env *env, const struct dt_it *di)
 320 {
 321         const struct lod_it *it = (const struct lod_it *)di;
 322
 323         LOD_CHECK_IT(env, it);
 324         return it->lit_obj->do_index_ops->dio_it.store(env, it->lit_it);
 325 }
 326
 327 /**
 328  * Implementation of dt_it_ops::load.
 329  *
 330  * Used with regular (non-striped) objects.
 331  *
 332  * \see dt_it_ops::load() in the API description for details.
 333  */
 334 static int lod_it_load(const struct lu_env *env, const struct dt_it *di,
 335                        __u64 hash)
 336 {
 337         const struct lod_it *it = (const struct lod_it *)di;
 338
 339         LOD_CHECK_IT(env, it);
 340         return it->lit_obj->do_index_ops->dio_it.load(env, it->lit_it, hash);
 341 }
 342
 343 /**
 344  * Implementation of dt_it_ops::key_rec.
 345  *
 346  * Used with regular (non-striped) objects.
 347  *
 348  * \see dt_it_ops::rec() in the API description for details.
 349  */
 350 static int lod_it_key_rec(const struct lu_env *env, const struct dt_it *di,
 351                           void *key_rec)
 352 {
 353         const struct lod_it *it = (const struct lod_it *)di;
 354
 355         LOD_CHECK_IT(env, it);
 356         return it->lit_obj->do_index_ops->dio_it.key_rec(env, it->lit_it,
 357                                                          key_rec);
 358 }
 359
 360 static struct dt_index_operations lod_index_ops = {
 361         .dio_lookup             = lod_index_lookup,
 362         .dio_declare_insert     = lod_declare_index_insert,
 363         .dio_insert             = lod_index_insert,
 364         .dio_declare_delete     = lod_declare_index_delete,
 365         .dio_delete             = lod_index_delete,
 366         .dio_it = {
 367                 .init           = lod_it_init,
 368                 .fini           = lod_it_fini,
 369                 .get            = lod_it_get,
 370                 .put            = lod_it_put,
 371                 .next           = lod_it_next,
 372                 .key            = lod_it_key,
 373                 .key_size       = lod_it_key_size,
 374                 .rec            = lod_it_rec,
 375                 .rec_size       = lod_it_rec_size,
 376                 .store          = lod_it_store,
 377                 .load           = lod_it_load,
 378                 .key_rec        = lod_it_key_rec,
 379         }
 380 };
 381
 382 /**
 383  * Implementation of dt_it_ops::init.
 384  *
 385  * Used with striped objects. Internally just initializes the iterator
 386  * on the first stripe.
 387  *
 388  * \see dt_it_ops::init() in the API description for details.
 389  */
 390 static struct dt_it *lod_striped_it_init(const struct lu_env *env,
 391                                          struct dt_object *dt, __u32 attr)
 392 {
 393         struct lod_object       *lo = lod_dt_obj(dt);
 394         struct dt_object        *next;
 395         struct lod_it           *it = &lod_env_info(env)->lti_it;
 396         struct dt_it            *it_next;
 397         ENTRY;
 398
 399         LASSERT(lo->ldo_stripenr > 0);
 400         next = lo->ldo_stripe[0];
 401         LASSERT(next != NULL);
 402         LASSERT(next->do_index_ops != NULL);
 403
 404         it_next = next->do_index_ops->dio_it.init(env, next, attr);
 405         if (IS_ERR(it_next))
 406                 return it_next;
 407
 408         /* currently we do not use more than one iterator per thread
 409          * so we store it in thread info. if at some point we need
 410          * more active iterators in a single thread, we can allocate
 411          * additional ones */
 412         LASSERT(it->lit_obj == NULL);
 413
 414         it->lit_stripe_index = 0;
 415         it->lit_attr = attr;
 416         it->lit_it = it_next;
 417         it->lit_obj = dt;
 418
 419         return (struct dt_it *)it;
 420 }
 421
 422 #define LOD_CHECK_STRIPED_IT(env, it, lo)                       \
 423 do {                                                            \
 424         LASSERT((it)->lit_obj != NULL);                         \
 425         LASSERT((it)->lit_it != NULL);                          \
 426         LASSERT((lo)->ldo_stripenr > 0);                        \
 427         LASSERT((it)->lit_stripe_index < (lo)->ldo_stripenr);   \
 428 } while (0)
 429
 430 /**
 431  * Implementation of dt_it_ops::fini.
 432  *
 433  * Used with striped objects.
 434  *
 435  * \see dt_it_ops::fini() in the API description for details.
 436  */
 437 static void lod_striped_it_fini(const struct lu_env *env, struct dt_it *di)
 438 {
 439         struct lod_it           *it = (struct lod_it *)di;
 440         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 441         struct dt_object        *next;
 442
 443         /* If lit_it == NULL, then it means the sub_it has been finished,
 444          * which only happens in failure cases, see lod_striped_it_next() */
 445         if (it->lit_it != NULL) {
 446                 LOD_CHECK_STRIPED_IT(env, it, lo);
 447
 448                 next = lo->ldo_stripe[it->lit_stripe_index];
 449                 LASSERT(next != NULL);
 450                 LASSERT(next->do_index_ops != NULL);
 451
 452                 next->do_index_ops->dio_it.fini(env, it->lit_it);
 453         }
 454
 455         /* the iterator not in use any more */
 456         it->lit_obj = NULL;
 457         it->lit_it = NULL;
 458         it->lit_stripe_index = 0;
 459 }
 460
 461 /**
 462  * Implementation of dt_it_ops::get.
 463  *
 464  * Right now it's not used widely, only to reset the iterator to the
 465  * initial position. It should be possible to implement a full version
 466  * which chooses a correct stripe to be able to position with any key.
 467  *
 468  * \see dt_it_ops::get() in the API description for details.
 469  */
 470 static int lod_striped_it_get(const struct lu_env *env, struct dt_it *di,
 471                               const struct dt_key *key)
 472 {
 473         const struct lod_it     *it = (const struct lod_it *)di;
 474         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 475         struct dt_object        *next;
 476         ENTRY;
 477
 478         LOD_CHECK_STRIPED_IT(env, it, lo);
 479
 480         next = lo->ldo_stripe[it->lit_stripe_index];
 481         LASSERT(next != NULL);
 482         LASSERT(next->do_index_ops != NULL);
 483
 484         return next->do_index_ops->dio_it.get(env, it->lit_it, key);
 485 }
 486
 487 /**
 488  * Implementation of dt_it_ops::put.
 489  *
 490  * Used with striped objects.
 491  *
 492  * \see dt_it_ops::put() in the API description for details.
 493  */
 494 static void lod_striped_it_put(const struct lu_env *env, struct dt_it *di)
 495 {
 496         struct lod_it           *it = (struct lod_it *)di;
 497         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 498         struct dt_object        *next;
 499
 500         LOD_CHECK_STRIPED_IT(env, it, lo);
 501
 502         next = lo->ldo_stripe[it->lit_stripe_index];
 503         LASSERT(next != NULL);
 504         LASSERT(next->do_index_ops != NULL);
 505
 506         return next->do_index_ops->dio_it.put(env, it->lit_it);
 507 }
 508
 509 /**
 510  * Implementation of dt_it_ops::next.
 511  *
 512  * Used with striped objects. When the end of the current stripe is
 513  * reached, the method takes the next stripe's iterator.
 514  *
 515  * \see dt_it_ops::next() in the API description for details.
 516  */
 517 static int lod_striped_it_next(const struct lu_env *env, struct dt_it *di)
 518 {
 519         struct lod_it           *it = (struct lod_it *)di;
 520         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 521         struct dt_object        *next;
 522         struct dt_it            *it_next;
 523         int                     rc;
 524         ENTRY;
 525
 526         LOD_CHECK_STRIPED_IT(env, it, lo);
 527
 528         next = lo->ldo_stripe[it->lit_stripe_index];
 529         LASSERT(next != NULL);
 530         LASSERT(next->do_index_ops != NULL);
 531 again:
 532         rc = next->do_index_ops->dio_it.next(env, it->lit_it);
 533         if (rc < 0)
 534                 RETURN(rc);
 535
 536         if (rc == 0 && it->lit_stripe_index == 0)
 537                 RETURN(rc);
 538
 539         if (rc == 0 && it->lit_stripe_index > 0) {
 540                 struct lu_dirent *ent;
 541
 542                 ent = (struct lu_dirent *)lod_env_info(env)->lti_key;
 543
 544                 rc = next->do_index_ops->dio_it.rec(env, it->lit_it,
 545                                                     (struct dt_rec *)ent,
 546                                                     it->lit_attr);
 547                 if (rc != 0)
 548                         RETURN(rc);
 549
 550                 /* skip . and .. for slave stripe */
 551                 if ((strncmp(ent->lde_name, ".",
 552                              le16_to_cpu(ent->lde_namelen)) == 0 &&
 553                      le16_to_cpu(ent->lde_namelen) == 1) ||
 554                     (strncmp(ent->lde_name, "..",
 555                              le16_to_cpu(ent->lde_namelen)) == 0 &&
 556                      le16_to_cpu(ent->lde_namelen) == 2))
 557                         goto again;
 558
 559                 RETURN(rc);
 560         }
 561
 562         /* go to next stripe */
 563         if (it->lit_stripe_index + 1 >= lo->ldo_stripenr)
 564                 RETURN(1);
 565
 566         it->lit_stripe_index++;
 567
 568         next->do_index_ops->dio_it.put(env, it->lit_it);
 569         next->do_index_ops->dio_it.fini(env, it->lit_it);
 570         it->lit_it = NULL;
 571
 572         next = lo->ldo_stripe[it->lit_stripe_index];
 573         LASSERT(next != NULL);
 574         rc = next->do_ops->do_index_try(env, next, &dt_directory_features);
 575         if (rc != 0)
 576                 RETURN(rc);
 577
 578         LASSERT(next->do_index_ops != NULL);
 579
 580         it_next = next->do_index_ops->dio_it.init(env, next, it->lit_attr);
 581         if (!IS_ERR(it_next)) {
 582                 it->lit_it = it_next;
 583                 goto again;
 584         } else {
 585                 rc = PTR_ERR(it_next);
 586         }
 587
 588         RETURN(rc);
 589 }
 590
 591 /**
 592  * Implementation of dt_it_ops::key.
 593  *
 594  * Used with striped objects.
 595  *
 596  * \see dt_it_ops::key() in the API description for details.
 597  */
 598 static struct dt_key *lod_striped_it_key(const struct lu_env *env,
 599                                          const struct dt_it *di)
 600 {
 601         const struct lod_it     *it = (const struct lod_it *)di;
 602         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 603         struct dt_object        *next;
 604
 605         LOD_CHECK_STRIPED_IT(env, it, lo);
 606
 607         next = lo->ldo_stripe[it->lit_stripe_index];
 608         LASSERT(next != NULL);
 609         LASSERT(next->do_index_ops != NULL);
 610
 611         return next->do_index_ops->dio_it.key(env, it->lit_it);
 612 }
 613
 614 /**
 615  * Implementation of dt_it_ops::key_size.
 616  *
 617  * Used with striped objects.
 618  *
 619  * \see dt_it_ops::size() in the API description for details.
 620  */
 621 static int lod_striped_it_key_size(const struct lu_env *env,
 622                                    const struct dt_it *di)
 623 {
 624         struct lod_it           *it = (struct lod_it *)di;
 625         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 626         struct dt_object        *next;
 627
 628         LOD_CHECK_STRIPED_IT(env, it, lo);
 629
 630         next = lo->ldo_stripe[it->lit_stripe_index];
 631         LASSERT(next != NULL);
 632         LASSERT(next->do_index_ops != NULL);
 633
 634         return next->do_index_ops->dio_it.key_size(env, it->lit_it);
 635 }
 636
 637 /**
 638  * Implementation of dt_it_ops::rec.
 639  *
 640  * Used with striped objects.
 641  *
 642  * \see dt_it_ops::rec() in the API description for details.
 643  */
 644 static int lod_striped_it_rec(const struct lu_env *env, const struct dt_it *di,
 645                               struct dt_rec *rec, __u32 attr)
 646 {
 647         const struct lod_it     *it = (const struct lod_it *)di;
 648         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 649         struct dt_object        *next;
 650
 651         LOD_CHECK_STRIPED_IT(env, it, lo);
 652
 653         next = lo->ldo_stripe[it->lit_stripe_index];
 654         LASSERT(next != NULL);
 655         LASSERT(next->do_index_ops != NULL);
 656
 657         return next->do_index_ops->dio_it.rec(env, it->lit_it, rec, attr);
 658 }
 659
 660 /**
 661  * Implementation of dt_it_ops::rec_size.
 662  *
 663  * Used with striped objects.
 664  *
 665  * \see dt_it_ops::rec_size() in the API description for details.
 666  */
 667 static int lod_striped_it_rec_size(const struct lu_env *env,
 668                                    const struct dt_it *di, __u32 attr)
 669 {
 670         struct lod_it           *it = (struct lod_it *)di;
 671         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 672         struct dt_object        *next;
 673
 674         LOD_CHECK_STRIPED_IT(env, it, lo);
 675
 676         next = lo->ldo_stripe[it->lit_stripe_index];
 677         LASSERT(next != NULL);
 678         LASSERT(next->do_index_ops != NULL);
 679
 680         return next->do_index_ops->dio_it.rec_size(env, it->lit_it, attr);
 681 }
 682
 683 /**
 684  * Implementation of dt_it_ops::store.
 685  *
 686  * Used with striped objects.
 687  *
 688  * \see dt_it_ops::store() in the API description for details.
 689  */
 690 static __u64 lod_striped_it_store(const struct lu_env *env,
 691                                   const struct dt_it *di)
 692 {
 693         const struct lod_it     *it = (const struct lod_it *)di;
 694         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 695         struct dt_object        *next;
 696
 697         LOD_CHECK_STRIPED_IT(env, it, lo);
 698
 699         next = lo->ldo_stripe[it->lit_stripe_index];
 700         LASSERT(next != NULL);
 701         LASSERT(next->do_index_ops != NULL);
 702
 703         return next->do_index_ops->dio_it.store(env, it->lit_it);
 704 }
 705
 706 /**
 707  * Implementation of dt_it_ops::load.
 708  *
 709  * Used with striped objects.
 710  *
 711  * \see dt_it_ops::load() in the API description for details.
 712  */
 713 static int lod_striped_it_load(const struct lu_env *env,
 714                                const struct dt_it *di, __u64 hash)
 715 {
 716         const struct lod_it     *it = (const struct lod_it *)di;
 717         struct lod_object       *lo = lod_dt_obj(it->lit_obj);
 718         struct dt_object        *next;
 719
 720         LOD_CHECK_STRIPED_IT(env, it, lo);
 721
 722         next = lo->ldo_stripe[it->lit_stripe_index];
 723         LASSERT(next != NULL);
 724         LASSERT(next->do_index_ops != NULL);
 725
 726         return next->do_index_ops->dio_it.load(env, it->lit_it, hash);
 727 }
 728
 729 static struct dt_index_operations lod_striped_index_ops = {
 730         .dio_lookup             = lod_index_lookup,
 731         .dio_declare_insert     = lod_declare_index_insert,
 732         .dio_insert             = lod_index_insert,
 733         .dio_declare_delete     = lod_declare_index_delete,
 734         .dio_delete             = lod_index_delete,
 735         .dio_it = {
 736                 .init           = lod_striped_it_init,
 737                 .fini           = lod_striped_it_fini,
 738                 .get            = lod_striped_it_get,
 739                 .put            = lod_striped_it_put,
 740                 .next           = lod_striped_it_next,
 741                 .key            = lod_striped_it_key,
 742                 .key_size       = lod_striped_it_key_size,
 743                 .rec            = lod_striped_it_rec,
 744                 .rec_size       = lod_striped_it_rec_size,
 745                 .store          = lod_striped_it_store,
 746                 .load           = lod_striped_it_load,
 747         }
 748 };
 749
 750 /**
 751  * Append the FID for each shard of the striped directory after the
 752  * given LMV EA header.
 753  *
 754  * To simplify striped directory and the consistency verification,
 755  * we only store the LMV EA header on disk, for both master object
 756  * and slave objects. When someone wants to know the whole LMV EA,
 757  * such as client readdir(), we can build the entrie LMV EA on the
 758  * MDT side (in RAM) via iterating the sub-directory entries that
 759  * are contained in the master object of the stripe directory.
 760  *
 761  * For the master object of the striped directroy, the valid name
 762  * for each shard is composed of the ${shard_FID}:${shard_idx}.
 763  *
 764  * There may be holes in the LMV EA if some shards' name entries
 765  * are corrupted or lost.
 766  *
 767  * \param[in] env       pointer to the thread context
 768  * \param[in] lo        pointer to the master object of the striped directory
 769  * \param[in] buf       pointer to the lu_buf which will hold the LMV EA
 770  * \param[in] resize    whether re-allocate the buffer if it is not big enough
 771  *
 772  * \retval              positive size of the LMV EA
 773  * \retval              0 for nothing to be loaded
 774  * \retval              negative error number on failure
 775  */
 776 int lod_load_lmv_shards(const struct lu_env *env, struct lod_object *lo,
 777                         struct lu_buf *buf, bool resize)
 778 {
 779         struct lu_dirent        *ent    =
 780                         (struct lu_dirent *)lod_env_info(env)->lti_key;
 781         struct lod_device       *lod    = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
 782         struct dt_object        *obj    = dt_object_child(&lo->ldo_obj);
 783         struct lmv_mds_md_v1    *lmv1   = buf->lb_buf;
 784         struct dt_it            *it;
 785         const struct dt_it_ops  *iops;
 786         __u32                    stripes;
 787         __u32                    magic  = le32_to_cpu(lmv1->lmv_magic);
 788         size_t                   lmv1_size;
 789         int                      rc;
 790         ENTRY;
 791
 792         /* If it is not a striped directory, then load nothing. */
 793         if (magic != LMV_MAGIC_V1)
 794                 RETURN(0);
 795
 796         /* If it is in migration (or failure), then load nothing. */
 797         if (le32_to_cpu(lmv1->lmv_hash_type) & LMV_HASH_FLAG_MIGRATION)
 798                 RETURN(0);
 799
 800         stripes = le32_to_cpu(lmv1->lmv_stripe_count);
 801         if (stripes < 1)
 802                 RETURN(0);
 803
 804         rc = lmv_mds_md_size(stripes, magic);
 805         if (rc < 0)
 806                 RETURN(rc);
 807         lmv1_size = rc;
 808         if (buf->lb_len < lmv1_size) {
 809                 struct lu_buf tbuf;
 810
 811                 if (!resize)
 812                         RETURN(-ERANGE);
 813
 814                 tbuf = *buf;
 815                 buf->lb_buf = NULL;
 816                 buf->lb_len = 0;
 817                 lu_buf_alloc(buf, lmv1_size);
 818                 lmv1 = buf->lb_buf;
 819                 if (lmv1 == NULL)
 820                         RETURN(-ENOMEM);
 821
 822                 memcpy(buf->lb_buf, tbuf.lb_buf, tbuf.lb_len);
 823         }
 824
 825         if (unlikely(!dt_try_as_dir(env, obj)))
 826                 RETURN(-ENOTDIR);
 827
 828         memset(&lmv1->lmv_stripe_fids[0], 0, stripes * sizeof(struct lu_fid));
 829         iops = &obj->do_index_ops->dio_it;
 830         it = iops->init(env, obj, LUDA_64BITHASH);
 831         if (IS_ERR(it))
 832                 RETURN(PTR_ERR(it));
 833
 834         rc = iops->load(env, it, 0);
 835         if (rc == 0)
 836                 rc = iops->next(env, it);
 837         else if (rc > 0)
 838                 rc = 0;
 839
 840         while (rc == 0) {
 841                 char             name[FID_LEN + 2] = "";
 842                 struct lu_fid    fid;
 843                 __u32            index;
 844                 int              len;
 845
 846                 rc = iops->rec(env, it, (struct dt_rec *)ent, LUDA_64BITHASH);
 847                 if (rc != 0)
 848                         break;
 849
 850                 rc = -EIO;
 851
 852                 fid_le_to_cpu(&fid, &ent->lde_fid);
 853                 ent->lde_namelen = le16_to_cpu(ent->lde_namelen);
 854                 if (ent->lde_name[0] == '.') {
 855                         if (ent->lde_namelen == 1)
 856                                 goto next;
 857
 858                         if (ent->lde_namelen == 2 && ent->lde_name[1] == '.')
 859                                 goto next;
 860                 }
 861
 862                 len = snprintf(name, sizeof(name),
 863                                DFID":", PFID(&ent->lde_fid));
 864                 /* The ent->lde_name is composed of ${FID}:${index} */
 865                 if (ent->lde_namelen < len + 1 ||
 866                     memcmp(ent->lde_name, name, len) != 0) {
 867                         CDEBUG(lod->lod_lmv_failout ? D_ERROR : D_INFO,
 868                                "%s: invalid shard name %.*s with the FID "DFID
 869                                " for the striped directory "DFID", %s\n",
 870                                lod2obd(lod)->obd_name, ent->lde_namelen,
 871                                ent->lde_name, PFID(&fid),
 872                                PFID(lu_object_fid(&obj->do_lu)),
 873                                lod->lod_lmv_failout ? "failout" : "skip");
 874
 875                         if (lod->lod_lmv_failout)
 876                                 break;
 877
 878                         goto next;
 879                 }
 880
 881                 index = 0;
 882                 do {
 883                         if (ent->lde_name[len] < '0' ||
 884                             ent->lde_name[len] > '9') {
 885                                 CDEBUG(lod->lod_lmv_failout ? D_ERROR : D_INFO,
 886                                        "%s: invalid shard name %.*s with the "
 887                                        "FID "DFID" for the striped directory "
 888                                        DFID", %s\n",
 889                                        lod2obd(lod)->obd_name, ent->lde_namelen,
 890                                        ent->lde_name, PFID(&fid),
 891                                        PFID(lu_object_fid(&obj->do_lu)),
 892                                        lod->lod_lmv_failout ?
 893                                        "failout" : "skip");
 894
 895                                 if (lod->lod_lmv_failout)
 896                                         break;
 897
 898                                 goto next;
 899                         }
 900
 901                         index = index * 10 + ent->lde_name[len++] - '0';
 902                 } while (len < ent->lde_namelen);
 903
 904                 if (len == ent->lde_namelen) {
 905                         /* Out of LMV EA range. */
 906                         if (index >= stripes) {
 907                                 CERROR("%s: the shard %.*s for the striped "
 908                                        "directory "DFID" is out of the known "
 909                                        "LMV EA range [0 - %u], failout\n",
 910                                        lod2obd(lod)->obd_name, ent->lde_namelen,
 911                                        ent->lde_name,
 912                                        PFID(lu_object_fid(&obj->do_lu)),
 913                                        stripes - 1);
 914
 915                                 break;
 916                         }
 917
 918                         /* The slot has been occupied. */
 919                         if (!fid_is_zero(&lmv1->lmv_stripe_fids[index])) {
 920                                 struct lu_fid fid0;
 921
 922                                 fid_le_to_cpu(&fid0,
 923                                         &lmv1->lmv_stripe_fids[index]);
 924                                 CERROR("%s: both the shard "DFID" and "DFID
 925                                        " for the striped directory "DFID
 926                                        " claim the same LMV EA slot at the "
 927                                        "index %d, failout\n",
 928                                        lod2obd(lod)->obd_name,
 929                                        PFID(&fid0), PFID(&fid),
 930                                        PFID(lu_object_fid(&obj->do_lu)), index);
 931
 932                                 break;
 933                         }
 934
 935                         /* stored as LE mode */
 936                         lmv1->lmv_stripe_fids[index] = ent->lde_fid;
 937
 938 next:
 939                         rc = iops->next(env, it);
 940                 }
 941         }
 942
 943         iops->put(env, it);
 944         iops->fini(env, it);
 945
 946         RETURN(rc > 0 ? lmv_mds_md_size(stripes, magic) : rc);
 947 }
 948
 949 /**
 950  * Implementation of dt_object_operations::do_index_try.
 951  *
 952  * \see dt_object_operations::do_index_try() in the API description for details.
 953  */
 954 static int lod_index_try(const struct lu_env *env, struct dt_object *dt,
 955                          const struct dt_index_features *feat)
 956 {
 957         struct lod_object       *lo = lod_dt_obj(dt);
 958         struct dt_object        *next = dt_object_child(dt);
 959         int                     rc;
 960         ENTRY;
 961
 962         LASSERT(next->do_ops);
 963         LASSERT(next->do_ops->do_index_try);
 964
 965         rc = lod_load_striping_locked(env, lo);
 966         if (rc != 0)
 967                 RETURN(rc);
 968
 969         rc = next->do_ops->do_index_try(env, next, feat);
 970         if (rc != 0)
 971                 RETURN(rc);
 972
 973         if (lo->ldo_stripenr > 0) {
 974                 int i;
 975
 976                 for (i = 0; i < lo->ldo_stripenr; i++) {
 977                         if (dt_object_exists(lo->ldo_stripe[i]) == 0)
 978                                 continue;
 979                         rc = lo->ldo_stripe[i]->do_ops->do_index_try(env,
 980                                                 lo->ldo_stripe[i], feat);
 981                         if (rc != 0)
 982                                 RETURN(rc);
 983                 }
 984                 dt->do_index_ops = &lod_striped_index_ops;
 985         } else {
 986                 dt->do_index_ops = &lod_index_ops;
 987         }
 988
 989         RETURN(rc);
 990 }
 991
 992 /**
 993  * Implementation of dt_object_operations::do_read_lock.
 994  *
 995  * \see dt_object_operations::do_read_lock() in the API description for details.
 996  */
 997 static void lod_object_read_lock(const struct lu_env *env,
 998                                  struct dt_object *dt, unsigned role)
 999 {
1000         dt_read_lock(env, dt_object_child(dt), role);
1001 }
1002
1003 /**
1004  * Implementation of dt_object_operations::do_write_lock.
1005  *
1006  * \see dt_object_operations::do_write_lock() in the API description for
1007  * details.
1008  */
1009 static void lod_object_write_lock(const struct lu_env *env,
1010                                   struct dt_object *dt, unsigned role)
1011 {
1012         dt_write_lock(env, dt_object_child(dt), role);
1013 }
1014
1015 /**
1016  * Implementation of dt_object_operations::do_read_unlock.
1017  *
1018  * \see dt_object_operations::do_read_unlock() in the API description for
1019  * details.
1020  */
1021 static void lod_object_read_unlock(const struct lu_env *env,
1022                                    struct dt_object *dt)
1023 {
1024         dt_read_unlock(env, dt_object_child(dt));
1025 }
1026
1027 /**
1028  * Implementation of dt_object_operations::do_write_unlock.
1029  *
1030  * \see dt_object_operations::do_write_unlock() in the API description for
1031  * details.
1032  */
1033 static void lod_object_write_unlock(const struct lu_env *env,
1034                                     struct dt_object *dt)
1035 {
1036         dt_write_unlock(env, dt_object_child(dt));
1037 }
1038
1039 /**
1040  * Implementation of dt_object_operations::do_write_locked.
1041  *
1042  * \see dt_object_operations::do_write_locked() in the API description for
1043  * details.
1044  */
1045 static int lod_object_write_locked(const struct lu_env *env,
1046                                    struct dt_object *dt)
1047 {
1048         return dt_write_locked(env, dt_object_child(dt));
1049 }
1050
1051 /**
1052  * Implementation of dt_object_operations::do_attr_get.
1053  *
1054  * \see dt_object_operations::do_attr_get() in the API description for details.
1055  */
1056 static int lod_attr_get(const struct lu_env *env,
1057                         struct dt_object *dt,
1058                         struct lu_attr *attr)
1059 {
1060         /* Note: for striped directory, client will merge attributes
1061          * from all of the sub-stripes see lmv_merge_attr(), and there
1062          * no MDD logic depend on directory nlink/size/time, so we can
1063          * always use master inode nlink and size for now. */
1064         return dt_attr_get(env, dt_object_child(dt), attr);
1065 }
1066
1067 /**
1068  * Implementation of dt_object_operations::do_declare_attr_set.
1069  *
1070  * If the object is striped, then apply the changes to all the stripes.
1071  *
1072  * \see dt_object_operations::do_declare_attr_set() in the API description
1073  * for details.
1074  */
1075 static int lod_declare_attr_set(const struct lu_env *env,
1076                                 struct dt_object *dt,
1077                                 const struct lu_attr *attr,
1078                                 struct thandle *th)
1079 {
1080         struct dt_object  *next = dt_object_child(dt);
1081         struct lod_object *lo = lod_dt_obj(dt);
1082         int                rc, i;
1083         ENTRY;
1084
1085         /*
1086          * declare setattr on the local object
1087          */
1088         rc = lod_sub_object_declare_attr_set(env, next, attr, th);
1089         if (rc)
1090                 RETURN(rc);
1091
1092         /* osp_declare_attr_set() ignores all attributes other than
1093          * UID, GID, and size, and osp_attr_set() ignores all but UID
1094          * and GID.  Declaration of size attr setting happens through
1095          * lod_declare_init_size(), and not through this function.
1096          * Therefore we need not load striping unless ownership is
1097          * changing.  This should save memory and (we hope) speed up
1098          * rename(). */
1099         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1100                 if (!(attr->la_valid & (LA_UID | LA_GID)))
1101                         RETURN(rc);
1102
1103                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1104                         RETURN(0);
1105         } else {
1106                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_MODE |
1107                                         LA_ATIME | LA_MTIME | LA_CTIME |
1108                                         LA_FLAGS)))
1109                         RETURN(rc);
1110         }
1111         /*
1112          * load striping information, notice we don't do this when object
1113          * is being initialized as we don't need this information till
1114          * few specific cases like destroy, chown
1115          */
1116         rc = lod_load_striping(env, lo);
1117         if (rc)
1118                 RETURN(rc);
1119
1120         if (lo->ldo_stripenr == 0)
1121                 RETURN(0);
1122
1123         /*
1124          * if object is striped declare changes on the stripes
1125          */
1126         LASSERT(lo->ldo_stripe);
1127         for (i = 0; i < lo->ldo_stripenr; i++) {
1128                 if (lo->ldo_stripe[i] == NULL)
1129                         continue;
1130                 rc = lod_sub_object_declare_attr_set(env,
1131                                         lo->ldo_stripe[i], attr,
1132                                         th);
1133                 if (rc != 0)
1134                         RETURN(rc);
1135         }
1136
1137         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE) &&
1138             dt_object_exists(next) != 0 &&
1139             dt_object_remote(next) == 0)
1140                 lod_sub_object_declare_xattr_del(env, next,
1141                                                 XATTR_NAME_LOV, th);
1142
1143         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE) &&
1144             dt_object_exists(next) &&
1145             dt_object_remote(next) == 0 && S_ISREG(attr->la_mode)) {
1146                 struct lod_thread_info *info = lod_env_info(env);
1147                 struct lu_buf *buf = &info->lti_buf;
1148
1149                 buf->lb_buf = info->lti_ea_store;
1150                 buf->lb_len = info->lti_ea_store_size;
1151                 lod_sub_object_declare_xattr_set(env, next, buf,
1152                                                  XATTR_NAME_LOV,
1153                                                  LU_XATTR_REPLACE, th);
1154         }
1155
1156         RETURN(rc);
1157 }
1158
1159 /**
1160  * Implementation of dt_object_operations::do_attr_set.
1161  *
1162  * If the object is striped, then apply the changes to all or subset of
1163  * the stripes depending on the object type and specific attributes.
1164  *
1165  * \see dt_object_operations::do_attr_set() in the API description for details.
1166  */
1167 static int lod_attr_set(const struct lu_env *env,
1168                         struct dt_object *dt,
1169                         const struct lu_attr *attr,
1170                         struct thandle *th)
1171 {
1172         struct dt_object        *next = dt_object_child(dt);
1173         struct lod_object       *lo = lod_dt_obj(dt);
1174         int                     rc, i;
1175         ENTRY;
1176
1177         /*
1178          * apply changes to the local object
1179          */
1180         rc = lod_sub_object_attr_set(env, next, attr, th);
1181         if (rc)
1182                 RETURN(rc);
1183
1184         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
1185                 if (!(attr->la_valid & (LA_UID | LA_GID)))
1186                         RETURN(rc);
1187
1188                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_OWNER))
1189                         RETURN(0);
1190         } else {
1191                 if (!(attr->la_valid & (LA_UID | LA_GID | LA_MODE |
1192                                         LA_ATIME | LA_MTIME | LA_CTIME |
1193                                         LA_FLAGS)))
1194                         RETURN(rc);
1195         }
1196
1197         if (lo->ldo_stripenr == 0)
1198                 RETURN(0);
1199
1200         /*
1201          * if object is striped, apply changes to all the stripes
1202          */
1203         LASSERT(lo->ldo_stripe);
1204         for (i = 0; i < lo->ldo_stripenr; i++) {
1205                 if (unlikely(lo->ldo_stripe[i] == NULL))
1206                         continue;
1207
1208                 if (S_ISDIR(dt->do_lu.lo_header->loh_attr) &&
1209                     (dt_object_exists(lo->ldo_stripe[i]) == 0))
1210                         continue;
1211
1212                 rc = lod_sub_object_attr_set(env, lo->ldo_stripe[i], attr, th);
1213                 if (rc != 0)
1214                         break;
1215         }
1216
1217         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_STRIPE) &&
1218             dt_object_exists(next) != 0 &&
1219             dt_object_remote(next) == 0)
1220                 rc = lod_sub_object_xattr_del(env, next, XATTR_NAME_LOV, th);
1221
1222         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_CHANGE_STRIPE) &&
1223             dt_object_exists(next) &&
1224             dt_object_remote(next) == 0 && S_ISREG(attr->la_mode)) {
1225                 struct lod_thread_info *info = lod_env_info(env);
1226                 struct lu_buf *buf = &info->lti_buf;
1227                 struct ost_id *oi = &info->lti_ostid;
1228                 struct lu_fid *fid = &info->lti_fid;
1229                 struct lov_mds_md_v1 *lmm;
1230                 struct lov_ost_data_v1 *objs;
1231                 __u32 magic;
1232                 int rc1;
1233
1234                 rc1 = lod_get_lov_ea(env, lo);
1235                 if (rc1  <= 0)
1236                         RETURN(rc);
1237
1238                 buf->lb_buf = info->lti_ea_store;
1239                 buf->lb_len = info->lti_ea_store_size;
1240                 lmm = info->lti_ea_store;
1241                 magic = le32_to_cpu(lmm->lmm_magic);
1242                 if (magic == LOV_MAGIC_V1)
1243                         objs = &(lmm->lmm_objects[0]);
1244                 else
1245                         objs = &((struct lov_mds_md_v3 *)lmm)->lmm_objects[0];
1246                 ostid_le_to_cpu(&objs->l_ost_oi, oi);
1247                 ostid_to_fid(fid, oi, le32_to_cpu(objs->l_ost_idx));
1248                 fid->f_oid--;
1249                 fid_to_ostid(fid, oi);
1250                 ostid_cpu_to_le(oi, &objs->l_ost_oi);
1251
1252                 rc = lod_sub_object_xattr_set(env, next, buf, XATTR_NAME_LOV,
1253                                               LU_XATTR_REPLACE, th);
1254         }
1255
1256         RETURN(rc);
1257 }
1258
1259 /**
1260  * Implementation of dt_object_operations::do_xattr_get.
1261  *
1262  * If LOV EA is requested from the root object and it's not
1263  * found, then return default striping for the filesystem.
1264  *
1265  * \see dt_object_operations::do_xattr_get() in the API description for details.
1266  */
1267 static int lod_xattr_get(const struct lu_env *env, struct dt_object *dt,
1268                          struct lu_buf *buf, const char *name)
1269 {
1270         struct lod_thread_info  *info = lod_env_info(env);
1271         struct lod_device       *dev = lu2lod_dev(dt->do_lu.lo_dev);
1272         int                      rc, is_root;
1273         ENTRY;
1274
1275         rc = dt_xattr_get(env, dt_object_child(dt), buf, name);
1276         if (strcmp(name, XATTR_NAME_LMV) == 0) {
1277                 struct lmv_mds_md_v1    *lmv1;
1278                 int                      rc1 = 0;
1279
1280                 if (rc > (typeof(rc))sizeof(*lmv1))
1281                         RETURN(rc);
1282
1283                 if (rc < (typeof(rc))sizeof(*lmv1))
1284                         RETURN(rc = rc > 0 ? -EINVAL : rc);
1285
1286                 if (buf->lb_buf == NULL || buf->lb_len == 0) {
1287                         CLASSERT(sizeof(*lmv1) <= sizeof(info->lti_key));
1288
1289                         info->lti_buf.lb_buf = info->lti_key;
1290                         info->lti_buf.lb_len = sizeof(*lmv1);
1291                         rc = dt_xattr_get(env, dt_object_child(dt),
1292                                           &info->lti_buf, name);
1293                         if (unlikely(rc != sizeof(*lmv1)))
1294                                 RETURN(rc = rc > 0 ? -EINVAL : rc);
1295
1296                         lmv1 = info->lti_buf.lb_buf;
1297                         /* The on-disk LMV EA only contains header, but the
1298                          * returned LMV EA size should contain the space for
1299                          * the FIDs of all shards of the striped directory. */
1300                         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_V1)
1301                                 rc = lmv_mds_md_size(
1302                                         le32_to_cpu(lmv1->lmv_stripe_count),
1303                                         LMV_MAGIC_V1);
1304                 } else {
1305                         rc1 = lod_load_lmv_shards(env, lod_dt_obj(dt),
1306                                                   buf, false);
1307                 }
1308
1309                 RETURN(rc = rc1 != 0 ? rc1 : rc);
1310         }
1311
1312         if (rc != -ENODATA || !S_ISDIR(dt->do_lu.lo_header->loh_attr & S_IFMT))
1313                 RETURN(rc);
1314
1315         /*
1316          * lod returns default striping on the real root of the device
1317          * this is like the root stores default striping for the whole
1318          * filesystem. historically we've been using a different approach
1319          * and store it in the config.
1320          */
1321         dt_root_get(env, dev->lod_child, &info->lti_fid);
1322         is_root = lu_fid_eq(&info->lti_fid, lu_object_fid(&dt->do_lu));
1323
1324         if (is_root && strcmp(XATTR_NAME_LOV, name) == 0) {
1325                 struct lov_user_md *lum = buf->lb_buf;
1326                 struct lov_desc    *desc = &dev->lod_desc;
1327
1328                 if (buf->lb_buf == NULL) {
1329                         rc = sizeof(*lum);
1330                 } else if (buf->lb_len >= sizeof(*lum)) {
1331                         lum->lmm_magic = cpu_to_le32(LOV_USER_MAGIC_V1);
1332                         lmm_oi_set_seq(&lum->lmm_oi, FID_SEQ_LOV_DEFAULT);
1333                         lmm_oi_set_id(&lum->lmm_oi, 0);
1334                         lmm_oi_cpu_to_le(&lum->lmm_oi, &lum->lmm_oi);
1335                         lum->lmm_pattern = cpu_to_le32(desc->ld_pattern);
1336                         lum->lmm_stripe_size = cpu_to_le32(
1337                                                 desc->ld_default_stripe_size);
1338                         lum->lmm_stripe_count = cpu_to_le16(
1339                                                 desc->ld_default_stripe_count);
1340                         lum->lmm_stripe_offset = cpu_to_le16(
1341                                                 desc->ld_default_stripe_offset);
1342                         rc = sizeof(*lum);
1343                 } else {
1344                         rc = -ERANGE;
1345                 }
1346         }
1347
1348         RETURN(rc);
1349 }
1350
1351 /**
1352  * Verify LVM EA.
1353  *
1354  * Checks that the magic of the stripe is sane.
1355  *
1356  * \param[in] lod       lod device
1357  * \param[in] lum       a buffer storing LMV EA to verify
1358  *
1359  * \retval              0 if the EA is sane
1360  * \retval              negative otherwise
1361  */
1362 static int lod_verify_md_striping(struct lod_device *lod,
1363                                   const struct lmv_user_md_v1 *lum)
1364 {
1365         if (unlikely(le32_to_cpu(lum->lum_magic) != LMV_USER_MAGIC)) {
1366                 CERROR("%s: invalid lmv_user_md: magic = %x, "
1367                        "stripe_offset = %d, stripe_count = %u: rc = %d\n",
1368                        lod2obd(lod)->obd_name, le32_to_cpu(lum->lum_magic),
1369                        (int)le32_to_cpu(lum->lum_stripe_offset),
1370                        le32_to_cpu(lum->lum_stripe_count), -EINVAL);
1371                 return -EINVAL;
1372         }
1373
1374         return 0;
1375 }
1376
1377 /**
1378  * Initialize LMV EA for a slave.
1379  *
1380  * Initialize slave's LMV EA from the master's LMV EA.
1381  *
1382  * \param[in] master_lmv        a buffer containing master's EA
1383  * \param[out] slave_lmv        a buffer where slave's EA will be stored
1384  *
1385  */
1386 static void lod_prep_slave_lmv_md(struct lmv_mds_md_v1 *slave_lmv,
1387                                   const struct lmv_mds_md_v1 *master_lmv)
1388 {
1389         *slave_lmv = *master_lmv;
1390         slave_lmv->lmv_magic = cpu_to_le32(LMV_MAGIC_STRIPE);
1391 }
1392
1393 /**
1394  * Generate LMV EA.
1395  *
1396  * Generate LMV EA from the object passed as \a dt. The object must have
1397  * the stripes created and initialized.
1398  *
1399  * \param[in] env       execution environment
1400  * \param[in] dt        object
1401  * \param[out] lmv_buf  buffer storing generated LMV EA
1402  *
1403  * \retval              0 on success
1404  * \retval              negative if failed
1405  */
1406 static int lod_prep_lmv_md(const struct lu_env *env, struct dt_object *dt,
1407                            struct lu_buf *lmv_buf)
1408 {
1409         struct lod_thread_info  *info = lod_env_info(env);
1410         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1411         struct lod_object       *lo = lod_dt_obj(dt);
1412         struct lmv_mds_md_v1    *lmm1;
1413         int                     stripe_count;
1414         int                     type = LU_SEQ_RANGE_ANY;
1415         int                     rc;
1416         __u32                   mdtidx;
1417         ENTRY;
1418
1419         LASSERT(lo->ldo_dir_striped != 0);
1420         LASSERT(lo->ldo_stripenr > 0);
1421         stripe_count = lo->ldo_stripenr;
1422         /* Only store the LMV EA heahder on the disk. */
1423         if (info->lti_ea_store_size < sizeof(*lmm1)) {
1424                 rc = lod_ea_store_resize(info, sizeof(*lmm1));
1425                 if (rc != 0)
1426                         RETURN(rc);
1427         } else {
1428                 memset(info->lti_ea_store, 0, sizeof(*lmm1));
1429         }
1430
1431         lmm1 = (struct lmv_mds_md_v1 *)info->lti_ea_store;
1432         lmm1->lmv_magic = cpu_to_le32(LMV_MAGIC);
1433         lmm1->lmv_stripe_count = cpu_to_le32(stripe_count);
1434         lmm1->lmv_hash_type = cpu_to_le32(lo->ldo_dir_hash_type);
1435         rc = lod_fld_lookup(env, lod, lu_object_fid(&dt->do_lu),
1436                             &mdtidx, &type);
1437         if (rc != 0)
1438                 RETURN(rc);
1439
1440         lmm1->lmv_master_mdt_index = cpu_to_le32(mdtidx);
1441         lmv_buf->lb_buf = info->lti_ea_store;
1442         lmv_buf->lb_len = sizeof(*lmm1);
1443
1444         RETURN(rc);
1445 }
1446
1447 /**
1448  * Create in-core represenation for a striped directory.
1449  *
1450  * Parse the buffer containing LMV EA and instantiate LU objects
1451  * representing the stripe objects. The pointers to the objects are
1452  * stored in ldo_stripe field of \a lo. This function is used when
1453  * we need to access an already created object (i.e. load from a disk).
1454  *
1455  * \param[in] env       execution environment
1456  * \param[in] lo        lod object
1457  * \param[in] buf       buffer containing LMV EA
1458  *
1459  * \retval              0 on success
1460  * \retval              negative if failed
1461  */
1462 int lod_parse_dir_striping(const struct lu_env *env, struct lod_object *lo,
1463                            const struct lu_buf *buf)
1464 {
1465         struct lod_thread_info  *info = lod_env_info(env);
1466         struct lod_device       *lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
1467         struct lod_tgt_descs    *ltd = &lod->lod_mdt_descs;
1468         struct dt_object        **stripe;
1469         union lmv_mds_md        *lmm = buf->lb_buf;
1470         struct lmv_mds_md_v1    *lmv1 = &lmm->lmv_md_v1;
1471         struct lu_fid           *fid = &info->lti_fid;
1472         unsigned int            i;
1473         int                     rc = 0;
1474         ENTRY;
1475
1476         if (le32_to_cpu(lmv1->lmv_hash_type) & LMV_HASH_FLAG_MIGRATION)
1477                 RETURN(0);
1478
1479         if (le32_to_cpu(lmv1->lmv_magic) == LMV_MAGIC_STRIPE) {
1480                 lo->ldo_dir_slave_stripe = 1;
1481                 RETURN(0);
1482         }
1483
1484         if (le32_to_cpu(lmv1->lmv_magic) != LMV_MAGIC_V1)
1485                 RETURN(-EINVAL);
1486
1487         if (le32_to_cpu(lmv1->lmv_stripe_count) < 1)
1488                 RETURN(0);
1489
1490         LASSERT(lo->ldo_stripe == NULL);
1491         OBD_ALLOC(stripe, sizeof(stripe[0]) *
1492                   (le32_to_cpu(lmv1->lmv_stripe_count)));
1493         if (stripe == NULL)
1494                 RETURN(-ENOMEM);
1495
1496         for (i = 0; i < le32_to_cpu(lmv1->lmv_stripe_count); i++) {
1497                 struct dt_device        *tgt_dt;
1498                 struct dt_object        *dto;
1499                 int                     type = LU_SEQ_RANGE_ANY;
1500                 __u32                   idx;
1501
1502                 fid_le_to_cpu(fid, &lmv1->lmv_stripe_fids[i]);
1503                 if (!fid_is_sane(fid))
1504                         GOTO(out, rc = -ESTALE);
1505
1506                 rc = lod_fld_lookup(env, lod, fid, &idx, &type);
1507                 if (rc != 0)
1508                         GOTO(out, rc);
1509
1510                 if (idx == lod2lu_dev(lod)->ld_site->ld_seq_site->ss_node_id) {
1511                         tgt_dt = lod->lod_child;
1512                 } else {
1513                         struct lod_tgt_desc     *tgt;
1514
1515                         tgt = LTD_TGT(ltd, idx);
1516                         if (tgt == NULL)
1517                                 GOTO(out, rc = -ESTALE);
1518                         tgt_dt = tgt->ltd_tgt;
1519                 }
1520
1521                 dto = dt_locate_at(env, tgt_dt, fid,
1522                                   lo->ldo_obj.do_lu.lo_dev->ld_site->ls_top_dev,
1523                                   NULL);
1524                 if (IS_ERR(dto))
1525                         GOTO(out, rc = PTR_ERR(dto));
1526
1527                 stripe[i] = dto;
1528         }
1529 out:
1530         lo->ldo_stripe = stripe;
1531         lo->ldo_stripenr = le32_to_cpu(lmv1->lmv_stripe_count);
1532         lo->ldo_stripes_allocated = le32_to_cpu(lmv1->lmv_stripe_count);
1533         if (rc != 0)
1534                 lod_object_free_striping(env, lo);
1535
1536         RETURN(rc);
1537 }
1538
1539 /**
1540  * Declare create a striped directory.
1541  *
1542  * Declare creating a striped directory with a given stripe pattern on the
1543  * specified MDTs. A striped directory is represented as a regular directory
1544  * - an index listing all the stripes. The stripes point back to the master
1545  * object with ".." and LinkEA. The master object gets LMV EA which
1546  * identifies it as a striped directory. The function allocates FIDs
1547  * for all stripes.
1548  *
1549  * \param[in] env       execution environment
1550  * \param[in] dt        object
1551  * \param[in] attr      attributes to initialize the objects with
1552  * \param[in] dof       type of objects to be created
1553  * \param[in] th        transaction handle
1554  *
1555  * \retval              0 on success
1556  * \retval              negative if failed
1557  */
1558 static int lod_dir_declare_create_stripes(const struct lu_env *env,
1559                                           struct dt_object *dt,
1560                                           struct lu_attr *attr,
1561                                           struct dt_object_format *dof,
1562                                           struct thandle *th)
1563 {
1564         struct lod_thread_info  *info = lod_env_info(env);
1565         struct lu_buf           lmv_buf;
1566         struct lu_buf           slave_lmv_buf;
1567         struct lmv_mds_md_v1    *lmm;
1568         struct lmv_mds_md_v1    *slave_lmm = NULL;
1569         struct dt_insert_rec    *rec = &info->lti_dt_rec;
1570         struct lod_object       *lo = lod_dt_obj(dt);
1571         int                     rc;
1572         __u32                   i;
1573         ENTRY;
1574
1575         rc = lod_prep_lmv_md(env, dt, &lmv_buf);
1576         if (rc != 0)
1577                 GOTO(out, rc);
1578         lmm = lmv_buf.lb_buf;
1579
1580         OBD_ALLOC_PTR(slave_lmm);
1581         if (slave_lmm == NULL)
1582                 GOTO(out, rc = -ENOMEM);
1583
1584         lod_prep_slave_lmv_md(slave_lmm, lmm);
1585         slave_lmv_buf.lb_buf = slave_lmm;
1586         slave_lmv_buf.lb_len = sizeof(*slave_lmm);
1587
1588         if (!dt_try_as_dir(env, dt_object_child(dt)))
1589                 GOTO(out, rc = -EINVAL);
1590
1591         rec->rec_type = S_IFDIR;
1592         for (i = 0; i < lo->ldo_stripenr; i++) {
1593                 struct dt_object        *dto = lo->ldo_stripe[i];
1594                 char                    *stripe_name = info->lti_key;
1595                 struct lu_name          *sname;
1596                 struct linkea_data       ldata          = { NULL };
1597                 struct lu_buf           linkea_buf;
1598
1599                 rc = lod_sub_object_declare_create(env, dto, attr, NULL,
1600                                                    dof, th);
1601                 if (rc != 0)
1602                         GOTO(out, rc);
1603
1604                 if (!dt_try_as_dir(env, dto))
1605                         GOTO(out, rc = -EINVAL);
1606
1607                 rc = lod_sub_object_declare_ref_add(env, dto, th);
1608                 if (rc != 0)
1609                         GOTO(out, rc);
1610
1611                 rec->rec_fid = lu_object_fid(&dto->do_lu);
1612                 rc = lod_sub_object_declare_insert(env, dto,
1613                                         (const struct dt_rec *)rec,
1614                                         (const struct dt_key *)dot, th);
1615                 if (rc != 0)
1616                         GOTO(out, rc);
1617
1618                 /* master stripe FID will be put to .. */
1619                 rec->rec_fid = lu_object_fid(&dt->do_lu);
1620                 rc = lod_sub_object_declare_insert(env, dto,
1621                                         (const struct dt_rec *)rec,
1622                                         (const struct dt_key *)dotdot,
1623                                         th);
1624                 if (rc != 0)
1625                         GOTO(out, rc);
1626
1627                 if (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_SLAVE_LMV) ||
1628                     cfs_fail_val != i) {
1629                         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_LMV) &&
1630                             cfs_fail_val == i)
1631                                 slave_lmm->lmv_master_mdt_index =
1632                                                         cpu_to_le32(i + 1);
1633                         else
1634                                 slave_lmm->lmv_master_mdt_index =
1635                                                         cpu_to_le32(i);
1636                         rc = lod_sub_object_declare_xattr_set(env, dto,
1637                                         &slave_lmv_buf, XATTR_NAME_LMV, 0, th);
1638                         if (rc != 0)
1639                                 GOTO(out, rc);
1640                 }
1641
1642                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_NAME) &&
1643                     cfs_fail_val == i)
1644                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%u",
1645                                 PFID(lu_object_fid(&dto->do_lu)), i + 1);
1646                 else
1647                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%u",
1648                                 PFID(lu_object_fid(&dto->do_lu)), i);
1649
1650                 sname = lod_name_get(env, stripe_name, strlen(stripe_name));
1651                 rc = linkea_links_new(&ldata, &info->lti_linkea_buf,
1652                                       sname, lu_object_fid(&dt->do_lu));
1653                 if (rc != 0)
1654                         GOTO(out, rc);
1655
1656                 linkea_buf.lb_buf = ldata.ld_buf->lb_buf;
1657                 linkea_buf.lb_len = ldata.ld_leh->leh_len;
1658                 rc = lod_sub_object_declare_xattr_set(env, dto, &linkea_buf,
1659                                           XATTR_NAME_LINK, 0, th);
1660                 if (rc != 0)
1661                         GOTO(out, rc);
1662
1663                 rec->rec_fid = lu_object_fid(&dto->do_lu);
1664                 rc = lod_sub_object_declare_insert(env, dt_object_child(dt),
1665                                        (const struct dt_rec *)rec,
1666                                        (const struct dt_key *)stripe_name,
1667                                        th);
1668                 if (rc != 0)
1669                         GOTO(out, rc);
1670
1671                 rc = lod_sub_object_declare_ref_add(env, dt_object_child(dt),
1672                                                     th);
1673                 if (rc != 0)
1674                         GOTO(out, rc);
1675         }
1676
1677         rc = lod_sub_object_declare_xattr_set(env, dt_object_child(dt),
1678                                 &lmv_buf, XATTR_NAME_LMV, 0, th);
1679         if (rc != 0)
1680                 GOTO(out, rc);
1681 out:
1682         if (slave_lmm != NULL)
1683                 OBD_FREE_PTR(slave_lmm);
1684
1685         RETURN(rc);
1686 }
1687
1688 static int lod_prep_md_striped_create(const struct lu_env *env,
1689                                       struct dt_object *dt,
1690                                       struct lu_attr *attr,
1691                                       const struct lmv_user_md_v1 *lum,
1692                                       struct dt_object_format *dof,
1693                                       struct thandle *th)
1694 {
1695         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1696         struct lod_tgt_descs    *ltd = &lod->lod_mdt_descs;
1697         struct lod_object       *lo = lod_dt_obj(dt);
1698         struct dt_object        **stripe;
1699         __u32                   stripe_count;
1700         int                     *idx_array;
1701         __u32                   master_index;
1702         int                     rc = 0;
1703         __u32                   i;
1704         __u32                   j;
1705         ENTRY;
1706
1707         /* The lum has been verifed in lod_verify_md_striping */
1708         LASSERT(le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC);
1709         LASSERT(le32_to_cpu(lum->lum_stripe_count) > 0);
1710
1711         stripe_count = le32_to_cpu(lum->lum_stripe_count);
1712
1713         OBD_ALLOC(idx_array, sizeof(idx_array[0]) * stripe_count);
1714         if (idx_array == NULL)
1715                 RETURN(-ENOMEM);
1716
1717         OBD_ALLOC(stripe, sizeof(stripe[0]) * stripe_count);
1718         if (stripe == NULL)
1719                 GOTO(out_free, rc = -ENOMEM);
1720
1721         /* Start index will be the master MDT */
1722         master_index = lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_node_id;
1723         idx_array[0] = master_index;
1724         for (i = 0; i < stripe_count; i++) {
1725                 struct lod_tgt_desc     *tgt = NULL;
1726                 struct dt_object        *dto;
1727                 struct lu_fid           fid = { 0 };
1728                 int                     idx;
1729                 struct lu_object_conf   conf = { 0 };
1730                 struct dt_device        *tgt_dt = NULL;
1731
1732                 /* Try to find next avaible target */
1733                 idx = idx_array[i];
1734                 for (j = 0; j < lod->lod_remote_mdt_count;
1735                      j++, idx = (idx + 1) % (lod->lod_remote_mdt_count + 1)) {
1736                         bool already_allocated = false;
1737                         __u32 k;
1738
1739                         CDEBUG(D_INFO, "try idx %d, mdt cnt %u, allocated %u\n",
1740                                idx, lod->lod_remote_mdt_count + 1, i);
1741                         if (idx == master_index) {
1742                                 /* Allocate the FID locally */
1743                                 rc = obd_fid_alloc(env, lod->lod_child_exp,
1744                                                    &fid, NULL);
1745                                 if (rc < 0)
1746                                         GOTO(out_put, rc);
1747                                 tgt_dt = lod->lod_child;
1748                                 break;
1749                         }
1750
1751                         /* Find next available target */
1752                         if (!cfs_bitmap_check(ltd->ltd_tgt_bitmap, idx))
1753                                 continue;
1754
1755                         if (likely(!OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE))) {
1756                                 /* check whether the idx already exists
1757                                  * in current allocated array */
1758                                 for (k = 0; k < i; k++) {
1759                                         if (idx_array[k] == idx) {
1760                                                 already_allocated = true;
1761                                                 break;
1762                                         }
1763                                 }
1764
1765                                 if (already_allocated)
1766                                         continue;
1767                         }
1768
1769                         /* check the status of the OSP */
1770                         tgt = LTD_TGT(ltd, idx);
1771                         if (tgt == NULL)
1772                                 continue;
1773
1774                         tgt_dt = tgt->ltd_tgt;
1775                         rc = dt_statfs(env, tgt_dt, NULL);
1776                         if (rc) {
1777                                 /* this OSP doesn't feel well */
1778                                 rc = 0;
1779                                 continue;
1780                         }
1781
1782                         rc = obd_fid_alloc(env, tgt->ltd_exp, &fid, NULL);
1783                         if (rc < 0) {
1784                                 rc = 0;
1785                                 continue;
1786                         }
1787
1788                         break;
1789                 }
1790
1791                 /* Can not allocate more stripes */
1792                 if (j == lod->lod_remote_mdt_count) {
1793                         CDEBUG(D_INFO, "%s: require stripes %u only get %d\n",
1794                                lod2obd(lod)->obd_name, stripe_count, i - 1);
1795                         break;
1796                 }
1797
1798                 CDEBUG(D_INFO, "Get idx %d, for stripe %d "DFID"\n",
1799                        idx, i, PFID(&fid));
1800                 idx_array[i] = idx;
1801                 /* Set the start index for next stripe allocation */
1802                 if (i < stripe_count - 1)
1803                         idx_array[i + 1] = (idx + 1) %
1804                                            (lod->lod_remote_mdt_count + 1);
1805                 /* tgt_dt and fid must be ready after search avaible OSP
1806                  * in the above loop */
1807                 LASSERT(tgt_dt != NULL);
1808                 LASSERT(fid_is_sane(&fid));
1809                 conf.loc_flags = LOC_F_NEW;
1810                 dto = dt_locate_at(env, tgt_dt, &fid,
1811                                    dt->do_lu.lo_dev->ld_site->ls_top_dev,
1812                                    &conf);
1813                 if (IS_ERR(dto))
1814                         GOTO(out_put, rc = PTR_ERR(dto));
1815                 stripe[i] = dto;
1816         }
1817
1818         lo->ldo_dir_striped = 1;
1819         lo->ldo_stripe = stripe;
1820         lo->ldo_stripenr = i;
1821         lo->ldo_stripes_allocated = stripe_count;
1822
1823         if (lo->ldo_stripenr == 0)
1824                 GOTO(out_put, rc = -ENOSPC);
1825
1826         rc = lod_dir_declare_create_stripes(env, dt, attr, dof, th);
1827         if (rc != 0)
1828                 GOTO(out_put, rc);
1829
1830 out_put:
1831         if (rc < 0) {
1832                 for (i = 0; i < stripe_count; i++)
1833                         if (stripe[i] != NULL)
1834                                 lu_object_put(env, &stripe[i]->do_lu);
1835                 OBD_FREE(stripe, sizeof(stripe[0]) * stripe_count);
1836                 lo->ldo_stripenr = 0;
1837                 lo->ldo_stripes_allocated = 0;
1838                 lo->ldo_stripe = NULL;
1839         }
1840
1841 out_free:
1842         OBD_FREE(idx_array, sizeof(idx_array[0]) * stripe_count);
1843
1844         RETURN(rc);
1845 }
1846
1847 /**
1848  * Declare create striped md object.
1849  *
1850  * The function declares intention to create a striped directory. This is a
1851  * wrapper for lod_prep_md_striped_create(). The only additional functionality
1852  * is to verify pattern \a lum_buf is good. Check that function for the details.
1853  *
1854  * \param[in] env       execution environment
1855  * \param[in] dt        object
1856  * \param[in] attr      attributes to initialize the objects with
1857  * \param[in] lum_buf   a pattern specifying the number of stripes and
1858  *                      MDT to start from
1859  * \param[in] dof       type of objects to be created
1860  * \param[in] th        transaction handle
1861  *
1862  * \retval              0 on success
1863  * \retval              negative if failed
1864  *
1865  */
1866 static int lod_declare_xattr_set_lmv(const struct lu_env *env,
1867                                      struct dt_object *dt,
1868                                      struct lu_attr *attr,
1869                                      const struct lu_buf *lum_buf,
1870                                      struct dt_object_format *dof,
1871                                      struct thandle *th)
1872 {
1873         struct lod_object       *lo = lod_dt_obj(dt);
1874         struct lod_device       *lod = lu2lod_dev(dt->do_lu.lo_dev);
1875         struct lmv_user_md_v1   *lum;
1876         int                     rc;
1877         ENTRY;
1878
1879         lum = lum_buf->lb_buf;
1880         LASSERT(lum != NULL);
1881
1882         CDEBUG(D_INFO, "lum magic = %x count = %u offset = %d\n",
1883                le32_to_cpu(lum->lum_magic), le32_to_cpu(lum->lum_stripe_count),
1884                (int)le32_to_cpu(lum->lum_stripe_offset));
1885
1886         if (le32_to_cpu(lum->lum_stripe_count) == 0)
1887                 GOTO(out, rc = 0);
1888
1889         rc = lod_verify_md_striping(lod, lum);
1890         if (rc != 0)
1891                 GOTO(out, rc);
1892
1893         /* prepare dir striped objects */
1894         rc = lod_prep_md_striped_create(env, dt, attr, lum, dof, th);
1895         if (rc != 0) {
1896                 /* failed to create striping, let's reset
1897                  * config so that others don't get confused */
1898                 lod_object_free_striping(env, lo);
1899                 GOTO(out, rc);
1900         }
1901 out:
1902         RETURN(rc);
1903 }
1904
1905 /**
1906  * Implementation of dt_object_operations::do_declare_xattr_set.
1907  *
1908  * Used with regular (non-striped) objects. Basically it
1909  * initializes the striping information and applies the
1910  * change to all the stripes.
1911  *
1912  * \see dt_object_operations::do_declare_xattr_set() in the API description
1913  * for details.
1914  */
1915 static int lod_dir_declare_xattr_set(const struct lu_env *env,
1916                                      struct dt_object *dt,
1917                                      const struct lu_buf *buf,
1918                                      const char *name, int fl,
1919                                      struct thandle *th)
1920 {
1921         struct dt_object        *next = dt_object_child(dt);
1922         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
1923         struct lod_object       *lo = lod_dt_obj(dt);
1924         int                     i;
1925         int                     rc;
1926         ENTRY;
1927
1928         if (strcmp(name, XATTR_NAME_DEFAULT_LMV) == 0) {
1929                 struct lmv_user_md_v1 *lum;
1930
1931                 LASSERT(buf != NULL && buf->lb_buf != NULL);
1932                 lum = buf->lb_buf;
1933                 rc = lod_verify_md_striping(d, lum);
1934                 if (rc != 0)
1935                         RETURN(rc);
1936         }
1937
1938         rc = lod_sub_object_declare_xattr_set(env, next, buf, name, fl, th);
1939         if (rc != 0)
1940                 RETURN(rc);
1941
1942         /* Note: Do not set LinkEA on sub-stripes, otherwise
1943          * it will confuse the fid2path process(see mdt_path_current()).
1944          * The linkEA between master and sub-stripes is set in
1945          * lod_xattr_set_lmv(). */
1946         if (strcmp(name, XATTR_NAME_LINK) == 0)
1947                 RETURN(0);
1948
1949         /* set xattr to each stripes, if needed */
1950         rc = lod_load_striping(env, lo);
1951         if (rc != 0)
1952                 RETURN(rc);
1953
1954         if (lo->ldo_stripenr == 0)
1955                 RETURN(0);
1956
1957         for (i = 0; i < lo->ldo_stripenr; i++) {
1958                 LASSERT(lo->ldo_stripe[i]);
1959
1960                 rc = lod_sub_object_declare_xattr_set(env, lo->ldo_stripe[i],
1961                                                 buf, name, fl, th);
1962                 if (rc != 0)
1963                         break;
1964         }
1965
1966         RETURN(rc);
1967 }
1968
1969 /**
1970  * Reset parent FID on OST object
1971  *
1972  * Replace parent FID with @dt object FID, which is only called during migration
1973  * to reset the parent FID after the MDT object is migrated to the new MDT, i.e.
1974  * the FID is changed.
1975  *
1976  * \param[in] env execution environment
1977  * \param[in] dt dt_object whose stripes's parent FID will be reset
1978  * \parem[in] th thandle
1979  * \param[in] declare if it is declare
1980  *
1981  * \retval      0 if reset succeeds
1982  * \retval      negative errno if reset fais
1983  */
1984 static int lod_object_replace_parent_fid(const struct lu_env *env,
1985                                          struct dt_object *dt,
1986                                          struct thandle *th, bool declare)
1987 {
1988         struct lod_object *lo = lod_dt_obj(dt);
1989         struct lod_thread_info  *info = lod_env_info(env);
1990         struct lu_buf *buf = &info->lti_buf;
1991         struct filter_fid *ff;
1992         int i, rc;
1993         ENTRY;
1994
1995         LASSERT(S_ISREG(dt->do_lu.lo_header->loh_attr));
1996
1997         /* set xattr to each stripes, if needed */
1998         rc = lod_load_striping(env, lo);
1999         if (rc != 0)
2000                 RETURN(rc);
2001
2002         if (lo->ldo_stripenr == 0)
2003                 RETURN(0);
2004
2005         if (info->lti_ea_store_size < sizeof(*ff)) {
2006                 rc = lod_ea_store_resize(info, sizeof(*ff));
2007                 if (rc != 0)
2008                         RETURN(rc);
2009         }
2010
2011         buf->lb_buf = info->lti_ea_store;
2012         buf->lb_len = info->lti_ea_store_size;
2013
2014         for (i = 0; i < lo->ldo_stripenr; i++) {
2015                 if (lo->ldo_stripe[i] == NULL)
2016                         continue;
2017
2018                 rc = dt_xattr_get(env, lo->ldo_stripe[i], buf,
2019                                   XATTR_NAME_FID);
2020                 if (rc < 0) {
2021                         rc = 0;
2022                         continue;
2023                 }
2024
2025                 ff = buf->lb_buf;
2026                 fid_le_to_cpu(&ff->ff_parent, &ff->ff_parent);
2027                 ff->ff_parent.f_seq = lu_object_fid(&dt->do_lu)->f_seq;
2028                 ff->ff_parent.f_oid = lu_object_fid(&dt->do_lu)->f_oid;
2029                 fid_cpu_to_le(&ff->ff_parent, &ff->ff_parent);
2030
2031                 if (declare) {
2032                         rc = lod_sub_object_declare_xattr_set(env,
2033                                                 lo->ldo_stripe[i], buf,
2034                                                 XATTR_NAME_FID,
2035                                                 LU_XATTR_REPLACE, th);
2036                 } else {
2037                         rc = lod_sub_object_xattr_set(env, lo->ldo_stripe[i],
2038                                                       buf, XATTR_NAME_FID,
2039                                                       LU_XATTR_REPLACE, th);
2040                 }
2041                 if (rc < 0)
2042                         break;
2043         }
2044
2045         RETURN(rc);
2046 }
2047
2048 /**
2049  * Implementation of dt_object_operations::do_declare_xattr_set.
2050  *
2051  * \see dt_object_operations::do_declare_xattr_set() in the API description
2052  * for details.
2053  *
2054  * the extension to the API:
2055  *   - declaring LOVEA requests striping creation
2056  *   - LU_XATTR_REPLACE means layout swap
2057  */
2058 static int lod_declare_xattr_set(const struct lu_env *env,
2059                                  struct dt_object *dt,
2060                                  const struct lu_buf *buf,
2061                                  const char *name, int fl,
2062                                  struct thandle *th)
2063 {
2064         struct dt_object *next = dt_object_child(dt);
2065         struct lu_attr   *attr = &lod_env_info(env)->lti_attr;
2066         __u32             mode;
2067         int               rc;
2068         ENTRY;
2069
2070         /*
2071          * allow to declare predefined striping on a new (!mode) object
2072          * which is supposed to be replay of regular file creation
2073          * (when LOV setting is declared)
2074          * LU_XATTR_REPLACE is set to indicate a layout swap
2075          */
2076         mode = dt->do_lu.lo_header->loh_attr & S_IFMT;
2077         if ((S_ISREG(mode) || mode == 0) && strcmp(name, XATTR_NAME_LOV) == 0 &&
2078              !(fl & LU_XATTR_REPLACE)) {
2079                 /*
2080                  * this is a request to manipulate object's striping
2081                  */
2082                 if (dt_object_exists(dt)) {
2083                         rc = dt_attr_get(env, next, attr);
2084                         if (rc)
2085                                 RETURN(rc);
2086                 } else {
2087                         memset(attr, 0, sizeof(*attr));
2088                         attr->la_valid = LA_TYPE | LA_MODE;
2089                         attr->la_mode = S_IFREG;
2090                 }
2091                 rc = lod_declare_striped_object(env, dt, attr, buf, th);
2092         } else if (S_ISDIR(mode)) {
2093                 rc = lod_dir_declare_xattr_set(env, dt, buf, name, fl, th);
2094         } else if (strcmp(name, XATTR_NAME_FID) == 0) {
2095                 rc = lod_object_replace_parent_fid(env, dt, th, true);
2096         } else {
2097                 rc = lod_sub_object_declare_xattr_set(env, next, buf, name,
2098                                                       fl, th);
2099         }
2100
2101         RETURN(rc);
2102 }
2103
2104 /**
2105  * Apply xattr changes to the object.
2106  *
2107  * Applies xattr changes to the object and the stripes if the latter exist.
2108  *
2109  * \param[in] env       execution environment
2110  * \param[in] dt        object
2111  * \param[in] buf       buffer pointing to the new value of xattr
2112  * \param[in] name      name of xattr
2113  * \param[in] fl        flags
2114  * \param[in] th        transaction handle
2115  *
2116  * \retval              0 on success
2117  * \retval              negative if failed
2118  */
2119 static int lod_xattr_set_internal(const struct lu_env *env,
2120                                   struct dt_object *dt,
2121                                   const struct lu_buf *buf,
2122                                   const char *name, int fl,
2123                                   struct thandle *th)
2124 {
2125         struct dt_object        *next = dt_object_child(dt);
2126         struct lod_object       *lo = lod_dt_obj(dt);
2127         int                     rc;
2128         int                     i;
2129         ENTRY;
2130
2131         rc = lod_sub_object_xattr_set(env, next, buf, name, fl, th);
2132         if (rc != 0 || !S_ISDIR(dt->do_lu.lo_header->loh_attr))
2133                 RETURN(rc);
2134
2135         /* Note: Do not set LinkEA on sub-stripes, otherwise
2136          * it will confuse the fid2path process(see mdt_path_current()).
2137          * The linkEA between master and sub-stripes is set in
2138          * lod_xattr_set_lmv(). */
2139         if (lo->ldo_stripenr == 0 || strcmp(name, XATTR_NAME_LINK) == 0)
2140                 RETURN(0);
2141
2142         for (i = 0; i < lo->ldo_stripenr; i++) {
2143                 LASSERT(lo->ldo_stripe[i]);
2144
2145                 rc = lod_sub_object_xattr_set(env, lo->ldo_stripe[i], buf, name,
2146                                               fl, th);
2147                 if (rc != 0)
2148                         break;
2149         }
2150
2151         RETURN(rc);
2152 }
2153
2154 /**
2155  * Delete an extended attribute.
2156  *
2157  * Deletes specified xattr from the object and the stripes if the latter exist.
2158  *
2159  * \param[in] env       execution environment
2160  * \param[in] dt        object
2161  * \param[in] name      name of xattr
2162  * \param[in] th        transaction handle
2163  *
2164  * \retval              0 on success
2165  * \retval              negative if failed
2166  */
2167 static int lod_xattr_del_internal(const struct lu_env *env,
2168                                   struct dt_object *dt,
2169                                   const char *name, struct thandle *th)
2170 {
2171         struct dt_object        *next = dt_object_child(dt);
2172         struct lod_object       *lo = lod_dt_obj(dt);
2173         int                     rc;
2174         int                     i;
2175         ENTRY;
2176
2177         rc = lod_sub_object_xattr_del(env, next, name, th);
2178         if (rc != 0 || !S_ISDIR(dt->do_lu.lo_header->loh_attr))
2179                 RETURN(rc);
2180
2181         if (lo->ldo_stripenr == 0)
2182                 RETURN(rc);
2183
2184         for (i = 0; i < lo->ldo_stripenr; i++) {
2185                 LASSERT(lo->ldo_stripe[i]);
2186
2187                 rc = lod_sub_object_xattr_del(env, lo->ldo_stripe[i], name,
2188                                               th);
2189                 if (rc != 0)
2190                         break;
2191         }
2192
2193         RETURN(rc);
2194 }
2195
2196 /**
2197  * Set default striping on a directory.
2198  *
2199  * Sets specified striping on a directory object unless it matches the default
2200  * striping (LOVEA_DELETE_VALUES() macro). In the latter case remove existing
2201  * EA. This striping will be used when regular file is being created in this
2202  * directory.
2203  *
2204  * \param[in] env       execution environment
2205  * \param[in] dt        the striped object
2206  * \param[in] buf       buffer with the striping
2207  * \param[in] name      name of EA
2208  * \param[in] fl        xattr flag (see OSD API description)
2209  * \param[in] th        transaction handle
2210  *
2211  * \retval              0 on success
2212  * \retval              negative if failed
2213  */
2214 static int lod_xattr_set_lov_on_dir(const struct lu_env *env,
2215                                     struct dt_object *dt,
2216                                     const struct lu_buf *buf,
2217                                     const char *name, int fl,
2218                                     struct thandle *th)
2219 {
2220         struct lod_device       *d = lu2lod_dev(dt->do_lu.lo_dev);
2221         struct lov_user_md_v1   *lum;
2222         struct lov_user_md_v3   *v3 = NULL;
2223         const char              *pool_name = NULL;
2224         int                      rc;
2225         ENTRY;
2226
2227         LASSERT(buf != NULL && buf->lb_buf != NULL);
2228         lum = buf->lb_buf;
2229
2230         rc = lod_verify_striping(d, buf, false);
2231         if (rc)
2232                 RETURN(rc);
2233
2234         if (lum->lmm_magic == LOV_USER_MAGIC_V3) {
2235                 v3 = buf->lb_buf;
2236                 if (v3->lmm_pool_name[0] != '\0')
2237                         pool_name = v3->lmm_pool_name;
2238         }
2239
2240         /* if { size, offset, count } = { 0, -1, 0 } and no pool
2241          * (i.e. all default values specified) then delete default
2242          * striping from dir. */
2243         CDEBUG(D_OTHER,
2244                 "set default striping: sz %u # %u offset %d %s %s\n",
2245                 (unsigned)lum->lmm_stripe_size,
2246                 (unsigned)lum->lmm_stripe_count,
2247                 (int)lum->lmm_stripe_offset,
2248                 v3 ? "from" : "", v3 ? v3->lmm_pool_name : "");
2249
2250         if (LOVEA_DELETE_VALUES(lum->lmm_stripe_size, lum->lmm_stripe_count,
2251                                 lum->lmm_stripe_offset, pool_name)) {
2252                 rc = lod_xattr_del_internal(env, dt, name, th);
2253                 if (rc == -ENODATA)
2254                         rc = 0;
2255         } else {
2256                 rc = lod_xattr_set_internal(env, dt, buf, name, fl, th);
2257         }
2258
2259         RETURN(rc);
2260 }
2261
2262 /**
2263  * Set default striping on a directory object.
2264  *
2265  * Sets specified striping on a directory object unless it matches the default
2266  * striping (LOVEA_DELETE_VALUES() macro). In the latter case remove existing
2267  * EA. This striping will be used when a new directory is being created in the
2268  * directory.
2269  *
2270  * \param[in] env       execution environment
2271  * \param[in] dt        the striped object
2272  * \param[in] buf       buffer with the striping
2273  * \param[in] name      name of EA
2274  * \param[in] fl        xattr flag (see OSD API description)
2275  * \param[in] th        transaction handle
2276  *
2277  * \retval              0 on success
2278  * \retval              negative if failed
2279  */
2280 static int lod_xattr_set_default_lmv_on_dir(const struct lu_env *env,
2281                                             struct dt_object *dt,
2282                                             const struct lu_buf *buf,
2283                                             const char *name, int fl,
2284                                             struct thandle *th)
2285 {
2286         struct lmv_user_md_v1   *lum;
2287         int                      rc;
2288         ENTRY;
2289
2290         LASSERT(buf != NULL && buf->lb_buf != NULL);
2291         lum = buf->lb_buf;
2292
2293         CDEBUG(D_OTHER, "set default stripe_count # %u stripe_offset %d\n",
2294               le32_to_cpu(lum->lum_stripe_count),
2295               (int)le32_to_cpu(lum->lum_stripe_offset));
2296
2297         if (LMVEA_DELETE_VALUES((le32_to_cpu(lum->lum_stripe_count)),
2298                                  le32_to_cpu(lum->lum_stripe_offset)) &&
2299                                 le32_to_cpu(lum->lum_magic) == LMV_USER_MAGIC) {
2300                 rc = lod_xattr_del_internal(env, dt, name, th);
2301                 if (rc == -ENODATA)
2302                         rc = 0;
2303         } else {
2304                 rc = lod_xattr_set_internal(env, dt, buf, name, fl, th);
2305                 if (rc != 0)
2306                         RETURN(rc);
2307         }
2308
2309         RETURN(rc);
2310 }
2311
2312 /**
2313  * Turn directory into a striped directory.
2314  *
2315  * During replay the client sends the striping created before MDT
2316  * failure, then the layer above LOD sends this defined striping
2317  * using ->do_xattr_set(), so LOD uses this method to replay creation
2318  * of the stripes. Notice the original information for the striping
2319  * (#stripes, FIDs, etc) was transferred in declare path.
2320  *
2321  * \param[in] env       execution environment
2322  * \param[in] dt        the striped object
2323  * \param[in] buf       not used currently
2324  * \param[in] name      not used currently
2325  * \param[in] fl        xattr flag (see OSD API description)
2326  * \param[in] th        transaction handle
2327  *
2328  * \retval              0 on success
2329  * \retval              negative if failed
2330  */
2331 static int lod_xattr_set_lmv(const struct lu_env *env, struct dt_object *dt,
2332                              const struct lu_buf *buf, const char *name,
2333                              int fl, struct thandle *th)
2334 {
2335         struct lod_object       *lo = lod_dt_obj(dt);
2336         struct lod_thread_info  *info = lod_env_info(env);
2337         struct lu_attr          *attr = &info->lti_attr;
2338         struct dt_object_format *dof = &info->lti_format;
2339         struct lu_buf           lmv_buf;
2340         struct lu_buf           slave_lmv_buf;
2341         struct lmv_mds_md_v1    *lmm;
2342         struct lmv_mds_md_v1    *slave_lmm = NULL;
2343         struct dt_insert_rec    *rec = &info->lti_dt_rec;
2344         int                     i;
2345         int                     rc;
2346         ENTRY;
2347
2348         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr))
2349                 RETURN(-ENOTDIR);
2350
2351         /* The stripes are supposed to be allocated in declare phase,
2352          * if there are no stripes being allocated, it will skip */
2353         if (lo->ldo_stripenr == 0)
2354                 RETURN(0);
2355
2356         rc = dt_attr_get(env, dt_object_child(dt), attr);
2357         if (rc != 0)
2358                 RETURN(rc);
2359
2360         attr->la_valid = LA_ATIME | LA_MTIME | LA_CTIME |
2361                          LA_MODE | LA_UID | LA_GID | LA_TYPE;
2362         dof->dof_type = DFT_DIR;
2363
2364         rc = lod_prep_lmv_md(env, dt, &lmv_buf);
2365         if (rc != 0)
2366                 RETURN(rc);
2367         lmm = lmv_buf.lb_buf;
2368
2369         OBD_ALLOC_PTR(slave_lmm);
2370         if (slave_lmm == NULL)
2371                 RETURN(-ENOMEM);
2372
2373         lod_prep_slave_lmv_md(slave_lmm, lmm);
2374         slave_lmv_buf.lb_buf = slave_lmm;
2375         slave_lmv_buf.lb_len = sizeof(*slave_lmm);
2376
2377         rec->rec_type = S_IFDIR;
2378         for (i = 0; i < lo->ldo_stripenr; i++) {
2379                 struct dt_object *dto;
2380                 char             *stripe_name = info->lti_key;
2381                 struct lu_name          *sname;
2382                 struct linkea_data       ldata          = { NULL };
2383                 struct lu_buf            linkea_buf;
2384
2385                 dto = lo->ldo_stripe[i];
2386
2387                 dt_write_lock(env, dto, MOR_TGT_CHILD);
2388                 rc = lod_sub_object_create(env, dto, attr, NULL, dof,
2389                                            th);
2390                 if (rc != 0) {
2391                         dt_write_unlock(env, dto);
2392                         GOTO(out, rc);
2393                 }
2394
2395                 rc = lod_sub_object_ref_add(env, dto, th);
2396                 dt_write_unlock(env, dto);
2397                 if (rc != 0)
2398                         GOTO(out, rc);
2399
2400                 rec->rec_fid = lu_object_fid(&dto->do_lu);
2401                 rc = lod_sub_object_index_insert(env, dto,
2402                                 (const struct dt_rec *)rec,
2403                                 (const struct dt_key *)dot, th, 0);
2404                 if (rc != 0)
2405                         GOTO(out, rc);
2406
2407                 rec->rec_fid = lu_object_fid(&dt->do_lu);
2408                 rc = lod_sub_object_index_insert(env, dto, (struct dt_rec *)rec,
2409                                (const struct dt_key *)dotdot, th, 0);
2410                 if (rc != 0)
2411                         GOTO(out, rc);
2412
2413                 if (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_SLAVE_LMV) ||
2414                     cfs_fail_val != i) {
2415                         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_LMV) &&
2416                             cfs_fail_val == i)
2417                                 slave_lmm->lmv_master_mdt_index =
2418                                                         cpu_to_le32(i + 1);
2419                         else
2420                                 slave_lmm->lmv_master_mdt_index =
2421                                                         cpu_to_le32(i);
2422
2423                         rc = lod_sub_object_xattr_set(env, dto, &slave_lmv_buf,
2424                                                       XATTR_NAME_LMV, fl, th);
2425                         if (rc != 0)
2426                                 GOTO(out, rc);
2427                 }
2428
2429                 if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_NAME) &&
2430                     cfs_fail_val == i)
2431                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%d",
2432                                  PFID(lu_object_fid(&dto->do_lu)), i + 1);
2433                 else
2434                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%d",
2435                                  PFID(lu_object_fid(&dto->do_lu)), i);
2436
2437                 sname = lod_name_get(env, stripe_name, strlen(stripe_name));
2438                 rc = linkea_links_new(&ldata, &info->lti_linkea_buf,
2439                                       sname, lu_object_fid(&dt->do_lu));
2440                 if (rc != 0)
2441                         GOTO(out, rc);
2442
2443                 linkea_buf.lb_buf = ldata.ld_buf->lb_buf;
2444                 linkea_buf.lb_len = ldata.ld_leh->leh_len;
2445                 rc = lod_sub_object_xattr_set(env, dto, &linkea_buf,
2446                                         XATTR_NAME_LINK, 0, th);
2447                 if (rc != 0)
2448                         GOTO(out, rc);
2449
2450                 rec->rec_fid = lu_object_fid(&dto->do_lu);
2451                 rc = lod_sub_object_index_insert(env, dt_object_child(dt),
2452                                (const struct dt_rec *)rec,
2453                                (const struct dt_key *)stripe_name, th, 0);
2454                 if (rc != 0)
2455                         GOTO(out, rc);
2456
2457                 rc = lod_sub_object_ref_add(env, dt_object_child(dt), th);
2458                 if (rc != 0)
2459                         GOTO(out, rc);
2460         }
2461
2462         if (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_MASTER_LMV))
2463                 rc = lod_sub_object_xattr_set(env, dt_object_child(dt),
2464                                               &lmv_buf, XATTR_NAME_LMV, fl, th);
2465 out:
2466         if (slave_lmm != NULL)
2467                 OBD_FREE_PTR(slave_lmm);
2468
2469         RETURN(rc);
2470 }
2471
2472 /**
2473  * Helper function to declare/execute creation of a striped directory
2474  *
2475  * Called in declare/create object path, prepare striping for a directory
2476  * and prepare defaults data striping for the objects to be created in
2477  * that directory. Notice the function calls "declaration" or "execution"
2478  * methods depending on \a declare param. This is a consequence of the
2479  * current approach while we don't have natural distributed transactions:
2480  * we basically execute non-local updates in the declare phase. So, the
2481  * arguments for the both phases are the same and this is the reason for
2482  * this function to exist.
2483  *
2484  * \param[in] env       execution environment
2485  * \param[in] dt        object
2486  * \param[in] attr      attributes the stripes will be created with
2487  * \param[in] dof       format of stripes (see OSD API description)
2488  * \param[in] th        transaction handle
2489  * \param[in] declare   where to call "declare" or "execute" methods
2490  *
2491  * \retval              0 on success
2492  * \retval              negative if failed
2493  */
2494 static int lod_dir_striping_create_internal(const struct lu_env *env,
2495                                             struct dt_object *dt,
2496                                             struct lu_attr *attr,
2497                                             struct dt_object_format *dof,
2498                                             struct thandle *th,
2499                                             bool declare)
2500 {
2501         struct lod_thread_info *info = lod_env_info(env);
2502         struct lod_object *lo = lod_dt_obj(dt);
2503         const struct lod_default_striping *lds = lo->ldo_def_striping;
2504         const char *poolname = NULL;
2505         int rc;
2506         ENTRY;
2507
2508         LASSERT(ergo(lds != NULL,
2509                      lds->lds_def_striping_set ||
2510                      lds->lds_dir_def_striping_set));
2511
2512         if (!LMVEA_DELETE_VALUES(lo->ldo_stripenr,
2513                                  lo->ldo_dir_stripe_offset)) {
2514                 struct lmv_user_md_v1 *v1 = info->lti_ea_store;
2515                 int stripe_count = lo->ldo_stripenr;
2516
2517                 if (info->lti_ea_store_size < sizeof(*v1)) {
2518                         rc = lod_ea_store_resize(info, sizeof(*v1));
2519                         if (rc != 0)
2520                                 RETURN(rc);
2521                         v1 = info->lti_ea_store;
2522                 }
2523
2524                 memset(v1, 0, sizeof(*v1));
2525                 v1->lum_magic = cpu_to_le32(LMV_USER_MAGIC);
2526                 v1->lum_stripe_count = cpu_to_le32(stripe_count);
2527                 v1->lum_stripe_offset =
2528                                 cpu_to_le32(lo->ldo_dir_stripe_offset);
2529
2530                 info->lti_buf.lb_buf = v1;
2531                 info->lti_buf.lb_len = sizeof(*v1);
2532
2533                 if (declare)
2534                         rc = lod_declare_xattr_set_lmv(env, dt, attr,
2535                                                        &info->lti_buf, dof, th);
2536                 else
2537                         rc = lod_xattr_set_lmv(env, dt, &info->lti_buf,
2538                                                XATTR_NAME_LMV, 0, th);
2539                 if (rc != 0)
2540                         RETURN(rc);
2541         }
2542
2543         /* Transfer default LMV striping from the parent */
2544         if (lds != NULL && lds->lds_dir_def_striping_set &&
2545             !LMVEA_DELETE_VALUES(lds->lds_dir_def_stripenr,
2546                                  lds->lds_dir_def_stripe_offset)) {
2547                 struct lmv_user_md_v1 *v1 = info->lti_ea_store;
2548
2549                 if (info->lti_ea_store_size < sizeof(*v1)) {
2550                         rc = lod_ea_store_resize(info, sizeof(*v1));
2551                         if (rc != 0)
2552                                 RETURN(rc);
2553                         v1 = info->lti_ea_store;
2554                 }
2555
2556                 memset(v1, 0, sizeof(*v1));
2557                 v1->lum_magic = cpu_to_le32(LMV_USER_MAGIC);
2558                 v1->lum_stripe_count = cpu_to_le32(lds->lds_dir_def_stripenr);
2559                 v1->lum_stripe_offset =
2560                                 cpu_to_le32(lds->lds_dir_def_stripe_offset);
2561                 v1->lum_hash_type =
2562                                 cpu_to_le32(lds->lds_dir_def_hash_type);
2563
2564                 info->lti_buf.lb_buf = v1;
2565                 info->lti_buf.lb_len = sizeof(*v1);
2566                 if (declare)
2567                         rc = lod_dir_declare_xattr_set(env, dt, &info->lti_buf,
2568                                                        XATTR_NAME_DEFAULT_LMV,
2569                                                        0, th);
2570                 else
2571                         rc = lod_xattr_set_default_lmv_on_dir(env, dt,
2572                                                   &info->lti_buf,
2573                                                   XATTR_NAME_DEFAULT_LMV, 0,
2574                                                   th);
2575                 if (rc != 0)
2576                         RETURN(rc);
2577         }
2578
2579         if (lds != NULL && lds->lds_def_pool[0] != '\0')
2580                 poolname = lds->lds_def_pool;
2581
2582         /* Transfer default LOV striping from the parent */
2583         if (lds != NULL && lds->lds_def_striping_set &&
2584             !LOVEA_DELETE_VALUES(lds->lds_def_stripe_size,
2585                                  lds->lds_def_stripenr,
2586                                  lds->lds_def_stripe_offset,
2587                                  poolname)) {
2588                 struct lov_user_md_v3 *v3 = info->lti_ea_store;
2589
2590                 if (info->lti_ea_store_size < sizeof(*v3)) {
2591                         rc = lod_ea_store_resize(info, sizeof(*v3));
2592                         if (rc != 0)
2593                                 RETURN(rc);
2594                         v3 = info->lti_ea_store;
2595                 }
2596
2597                 memset(v3, 0, sizeof(*v3));
2598                 v3->lmm_magic = cpu_to_le32(LOV_USER_MAGIC_V3);
2599                 v3->lmm_stripe_count = cpu_to_le16(lds->lds_def_stripenr);
2600                 v3->lmm_stripe_offset = cpu_to_le16(lds->lds_def_stripe_offset);
2601                 v3->lmm_stripe_size = cpu_to_le32(lds->lds_def_stripe_size);
2602                 if (poolname != NULL)
2603                         strlcpy(v3->lmm_pool_name, poolname,
2604                                 sizeof(v3->lmm_pool_name));
2605
2606                 info->lti_buf.lb_buf = v3;
2607                 info->lti_buf.lb_len = sizeof(*v3);
2608
2609                 if (declare)
2610                         rc = lod_dir_declare_xattr_set(env, dt, &info->lti_buf,
2611                                                        XATTR_NAME_LOV, 0, th);
2612                 else
2613                         rc = lod_xattr_set_lov_on_dir(env, dt, &info->lti_buf,
2614                                                       XATTR_NAME_LOV, 0, th);
2615                 if (rc != 0)
2616                         RETURN(rc);
2617         }
2618
2619         RETURN(0);
2620 }
2621
2622 static int lod_declare_dir_striping_create(const struct lu_env *env,
2623                                            struct dt_object *dt,
2624                                            struct lu_attr *attr,
2625                                            struct dt_object_format *dof,
2626                                            struct thandle *th)
2627 {
2628         return lod_dir_striping_create_internal(env, dt, attr, dof, th, true);
2629 }
2630
2631 static int lod_dir_striping_create(const struct lu_env *env,
2632                                    struct dt_object *dt,
2633                                    struct lu_attr *attr,
2634                                    struct dt_object_format *dof,
2635                                    struct thandle *th)
2636 {
2637         return lod_dir_striping_create_internal(env, dt, attr, dof, th, false);
2638 }
2639
2640 /**
2641  * Implementation of dt_object_operations::do_xattr_set.
2642  *
2643  * Sets specified extended attribute on the object. Three types of EAs are
2644  * special:
2645  *   LOV EA - stores striping for a regular file or default striping (when set
2646  *            on a directory)
2647  *   LMV EA - stores a marker for the striped directories
2648  *   DMV EA - stores default directory striping
2649  *
2650  * When striping is applied to a non-striped existing object (this is called
2651  * late striping), then LOD notices the caller wants to turn the object into a
2652  * striped one. The stripe objects are created and appropriate EA is set:
2653  * LOV EA storing all the stripes directly or LMV EA storing just a small header
2654  * with striping configuration.
2655  *
2656  * \see dt_object_operations::do_xattr_set() in the API description for details.
2657  */
2658 static int lod_xattr_set(const struct lu_env *env,
2659                          struct dt_object *dt, const struct lu_buf *buf,
2660                          const char *name, int fl, struct thandle *th)
2661 {
2662         struct dt_object        *next = dt_object_child(dt);
2663         int                      rc;
2664         ENTRY;
2665
2666         if (S_ISDIR(dt->do_lu.lo_header->loh_attr) &&
2667             strcmp(name, XATTR_NAME_LMV) == 0) {
2668                 struct lmv_mds_md_v1 *lmm = buf->lb_buf;
2669
2670                 if (lmm != NULL && le32_to_cpu(lmm->lmv_hash_type) &
2671                                                 LMV_HASH_FLAG_MIGRATION)
2672                         rc = lod_sub_object_xattr_set(env, next, buf, name, fl,
2673                                                       th);
2674                 else
2675                         rc = lod_dir_striping_create(env, dt, NULL, NULL, th);
2676
2677                 RETURN(rc);
2678         }
2679
2680         if (S_ISDIR(dt->do_lu.lo_header->loh_attr) &&
2681             strcmp(name, XATTR_NAME_LOV) == 0) {
2682                 /* default LOVEA */
2683                 rc = lod_xattr_set_lov_on_dir(env, dt, buf, name, fl, th);
2684                 RETURN(rc);
2685         } else if (S_ISDIR(dt->do_lu.lo_header->loh_attr) &&
2686                    strcmp(name, XATTR_NAME_DEFAULT_LMV) == 0) {
2687                 /* default LMVEA */
2688                 rc = lod_xattr_set_default_lmv_on_dir(env, dt, buf, name, fl,
2689                                                       th);
2690                 RETURN(rc);
2691         } else if (S_ISREG(dt->do_lu.lo_header->loh_attr) &&
2692                    !strcmp(name, XATTR_NAME_LOV)) {
2693                 /* in case of lov EA swap, just set it
2694                  * if not, it is a replay so check striping match what we
2695                  * already have during req replay, declare_xattr_set()
2696                  * defines striping, then create() does the work */
2697                 if (fl & LU_XATTR_REPLACE) {
2698                         /* free stripes, then update disk */
2699                         lod_object_free_striping(env, lod_dt_obj(dt));
2700
2701                         rc = lod_sub_object_xattr_set(env, next, buf, name,
2702                                                       fl, th);
2703                 } else if (dt_object_remote(dt)) {
2704                         /* This only happens during migration, see
2705                          * mdd_migrate_create(), in which Master MDT will
2706                          * create a remote target object, and only set
2707                          * (migrating) stripe EA on the remote object,
2708                          * and does not need creating each stripes. */
2709                         rc = lod_sub_object_xattr_set(env, next, buf, name,
2710                                                       fl, th);
2711                 } else {
2712                         rc = lod_striping_create(env, dt, NULL, NULL, th);
2713                 }
2714                 RETURN(rc);
2715         } else if (strcmp(name, XATTR_NAME_FID) == 0) {
2716                 rc = lod_object_replace_parent_fid(env, dt, th, false);
2717
2718                 RETURN(rc);
2719         }
2720
2721         /* then all other xattr */
2722         rc = lod_xattr_set_internal(env, dt, buf, name, fl, th);
2723
2724         RETURN(rc);
2725 }
2726
2727 /**
2728  * Implementation of dt_object_operations::do_declare_xattr_del.
2729  *
2730  * \see dt_object_operations::do_declare_xattr_del() in the API description
2731  * for details.
2732  */
2733 static int lod_declare_xattr_del(const struct lu_env *env,
2734                                  struct dt_object *dt, const char *name,
2735                                  struct thandle *th)
2736 {
2737         struct lod_object       *lo = lod_dt_obj(dt);
2738         int                     rc;
2739         int                     i;
2740         ENTRY;
2741
2742         rc = lod_sub_object_declare_xattr_del(env, dt_object_child(dt),
2743                                               name, th);
2744         if (rc != 0)
2745                 RETURN(rc);
2746
2747         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr))
2748                 RETURN(0);
2749
2750         /* set xattr to each stripes, if needed */
2751         rc = lod_load_striping(env, lo);
2752         if (rc != 0)
2753                 RETURN(rc);
2754
2755         if (lo->ldo_stripenr == 0)
2756                 RETURN(0);
2757
2758         for (i = 0; i < lo->ldo_stripenr; i++) {
2759                 LASSERT(lo->ldo_stripe[i]);
2760                 rc = lod_sub_object_declare_xattr_del(env, lo->ldo_stripe[i],
2761                                                       name, th);
2762                 if (rc != 0)
2763                         break;
2764         }
2765
2766         RETURN(rc);
2767 }
2768
2769 /**
2770  * Implementation of dt_object_operations::do_xattr_del.
2771  *
2772  * If EA storing a regular striping is being deleted, then release
2773  * all the references to the stripe objects in core.
2774  *
2775  * \see dt_object_operations::do_xattr_del() in the API description for details.
2776  */
2777 static int lod_xattr_del(const struct lu_env *env, struct dt_object *dt,
2778                          const char *name, struct thandle *th)
2779 {
2780         struct dt_object        *next = dt_object_child(dt);
2781         struct lod_object       *lo = lod_dt_obj(dt);
2782         int                     rc;
2783         int                     i;
2784         ENTRY;
2785
2786         if (!strcmp(name, XATTR_NAME_LOV))
2787                 lod_object_free_striping(env, lod_dt_obj(dt));
2788
2789         rc = lod_sub_object_xattr_del(env, next, name, th);
2790         if (rc != 0 || !S_ISDIR(dt->do_lu.lo_header->loh_attr))
2791                 RETURN(rc);
2792
2793         if (lo->ldo_stripenr == 0)
2794                 RETURN(0);
2795
2796         for (i = 0; i < lo->ldo_stripenr; i++) {
2797                 LASSERT(lo->ldo_stripe[i]);
2798
2799                 rc = lod_sub_object_xattr_del(env, lo->ldo_stripe[i], name, th);
2800                 if (rc != 0)
2801                         break;
2802         }
2803
2804         RETURN(rc);
2805 }
2806
2807 /**
2808  * Implementation of dt_object_operations::do_xattr_list.
2809  *
2810  * \see dt_object_operations::do_xattr_list() in the API description
2811  * for details.
2812  */
2813 static int lod_xattr_list(const struct lu_env *env,
2814                           struct dt_object *dt, const struct lu_buf *buf)
2815 {
2816         return dt_xattr_list(env, dt_object_child(dt), buf);
2817 }
2818
2819 static inline int lod_object_will_be_striped(int is_reg, const struct lu_fid *fid)
2820 {
2821         return (is_reg && fid_seq(fid) != FID_SEQ_LOCAL_FILE);
2822 }
2823
2824
2825 /**
2826  * Get default striping.
2827  *
2828  * \param[in] env               execution environment
2829  * \param[in] lo                object
2830  * \param[out] lds              default striping
2831  *
2832  * \retval              0 on success
2833  * \retval              negative if failed
2834  */
2835 static int lod_get_default_lov_striping(const struct lu_env *env,
2836                                         struct lod_object *lo,
2837                                         struct lod_default_striping *lds)
2838 {
2839         struct lod_thread_info *info = lod_env_info(env);
2840         struct lov_user_md_v1 *v1 = NULL;
2841         struct lov_user_md_v3 *v3 = NULL;
2842         int rc;
2843
2844         rc = lod_get_lov_ea(env, lo);
2845         if (rc < 0)
2846                 return rc;
2847
2848         if (rc < (typeof(rc))sizeof(struct lov_user_md))
2849                 return 0;
2850
2851         v1 = info->lti_ea_store;
2852         if (v1->lmm_magic == __swab32(LOV_USER_MAGIC_V1)) {
2853                 lustre_swab_lov_user_md_v1(v1);
2854         } else if (v1->lmm_magic == __swab32(LOV_USER_MAGIC_V3)) {
2855                 v3 = (struct lov_user_md_v3 *)v1;
2856                 lustre_swab_lov_user_md_v3(v3);
2857         }
2858
2859         if (v1->lmm_magic != LOV_MAGIC_V3 && v1->lmm_magic != LOV_MAGIC_V1)
2860                 return 0;
2861
2862         if (v1->lmm_pattern != LOV_PATTERN_RAID0 && v1->lmm_pattern != 0)
2863                 return 0;
2864
2865         lds->lds_def_stripenr = v1->lmm_stripe_count;
2866         lds->lds_def_stripe_size = v1->lmm_stripe_size;
2867         lds->lds_def_stripe_offset = v1->lmm_stripe_offset;
2868         lds->lds_def_striping_set = 1;
2869         if (v1->lmm_magic == LOV_USER_MAGIC_V3) {
2870                 v3 = (struct lov_user_md_v3 *)v1;
2871                 if (v3->lmm_pool_name[0] != '\0')
2872                         strlcpy(lds->lds_def_pool, v3->lmm_pool_name,
2873                                 sizeof(lds->lds_def_pool));
2874         }
2875
2876         return 0;
2877 }
2878
2879 /**
2880  * Get default directory striping.
2881  *
2882  * \param[in] env               execution environment
2883  * \param[in] lo                object
2884  * \param[out] lds              default striping
2885  *
2886  * \retval              0 on success
2887  * \retval              negative if failed
2888  */
2889 static int lod_get_default_lmv_striping(const struct lu_env *env,
2890                                         struct lod_object *lo,
2891                                         struct lod_default_striping *lds)
2892 {
2893         struct lod_thread_info  *info = lod_env_info(env);
2894         struct lmv_user_md_v1   *v1 = NULL;
2895         int                      rc;
2896
2897         rc = lod_get_default_lmv_ea(env, lo);
2898         if (rc < 0)
2899                 return rc;
2900
2901         if (rc < (typeof(rc))sizeof(struct lmv_user_md))
2902                 return 0;
2903
2904         v1 = info->lti_ea_store;
2905
2906         lds->lds_dir_def_stripenr = le32_to_cpu(v1->lum_stripe_count);
2907         lds->lds_dir_def_stripe_offset = le32_to_cpu(v1->lum_stripe_offset);
2908         lds->lds_dir_def_hash_type = le32_to_cpu(v1->lum_hash_type);
2909         lds->lds_dir_def_striping_set = 1;
2910
2911         return 0;
2912 }
2913
2914 /**
2915  * Get default striping in the object.
2916  *
2917  * Get object default striping and default directory striping.
2918  *
2919  * \param[in] env               execution environment
2920  * \param[in] lo                object
2921  * \param[out] lds              default striping
2922  *
2923  * \retval              0 on success
2924  * \retval              negative if failed
2925  */
2926 static int lod_get_default_striping(const struct lu_env *env,
2927                                     struct lod_object *lo,
2928                                     struct lod_default_striping *lds)
2929 {
2930         int rc;
2931
2932         rc = lod_get_default_lov_striping(env, lo, lds);
2933         if (rc == 0)
2934                 rc = lod_get_default_lmv_striping(env, lo, lds);
2935         return rc;
2936 }
2937
2938 /**
2939  * Apply default striping on object.
2940  *
2941  * If object striping pattern is not set, set to the one in default striping.
2942  * The default striping is from parent or fs.
2943  *
2944  * \param[in] lo                new object
2945  * \param[in] lds               default striping
2946  * \param[in] mode              new object's mode
2947  */
2948 static void lod_striping_from_default(struct lod_object *lo,
2949                                       const struct lod_default_striping *lds,
2950                                       umode_t mode)
2951 {
2952         if (lds->lds_def_striping_set && S_ISREG(mode)) {
2953                 if (lo->ldo_stripenr == 0)
2954                         lo->ldo_stripenr = lds->lds_def_stripenr;
2955                 if (lo->ldo_stripe_size == 0)
2956                         lo->ldo_stripe_size = lds->lds_def_stripe_size;
2957                 if (lo->ldo_stripe_offset == LOV_OFFSET_DEFAULT)
2958                         lo->ldo_stripe_offset = lds->lds_def_stripe_offset;
2959                 if (lo->ldo_pool == NULL && lds->lds_def_pool[0] != '\0')
2960                         lod_object_set_pool(lo, lds->lds_def_pool);
2961
2962                 CDEBUG(D_INFO, "striping from default: count %hu, size %u, "
2963                         "offset %d, pool %s\n",
2964                         lo->ldo_stripenr, lo->ldo_stripe_size,
2965                         (int)lo->ldo_stripe_offset, lo->ldo_pool ?: "");
2966         } else if (lds->lds_dir_def_striping_set && S_ISDIR(mode)) {
2967                 if (lo->ldo_stripenr == 0)
2968                         lo->ldo_stripenr = lds->lds_dir_def_stripenr;
2969                 if (lo->ldo_dir_stripe_offset == -1)
2970                         lo->ldo_dir_stripe_offset =
2971                                 lds->lds_dir_def_stripe_offset;
2972                 if (lo->ldo_dir_hash_type == 0)
2973                         lo->ldo_dir_hash_type = lds->lds_dir_def_hash_type;
2974
2975                 CDEBUG(D_INFO, "striping from default: count %hu, offset %d, "
2976                         "hash_type %u\n",
2977                         lo->ldo_stripenr, (int)lo->ldo_dir_stripe_offset,
2978                         lo->ldo_dir_hash_type);
2979         }
2980 }
2981
2982 /**
2983  * Implementation of dt_object_operations::do_ah_init.
2984  *
2985  * This method is used to make a decision on the striping configuration for the
2986  * object being created. It can be taken from the \a parent object if it exists,
2987  * or filesystem's default. The resulting configuration (number of stripes,
2988  * stripe size/offset, pool name, etc) is stored in the object itself and will
2989  * be used by the methods like ->doo_declare_create().
2990  *
2991  * \see dt_object_operations::do_ah_init() in the API description for details.
2992  */
2993 static void lod_ah_init(const struct lu_env *env,
2994                         struct dt_allocation_hint *ah,
2995                         struct dt_object *parent,
2996                         struct dt_object *child,
2997                         umode_t child_mode)
2998 {
2999         struct lod_device *d = lu2lod_dev(child->do_lu.lo_dev);
3000         struct lod_thread_info *info = lod_env_info(env);
3001         struct lod_default_striping *lds = &info->lti_def_striping;
3002         struct dt_object *nextp = NULL;
3003         struct dt_object *nextc;
3004         struct lod_object *lp = NULL;
3005         struct lod_object *lc;
3006         struct lov_desc *desc;
3007         ENTRY;
3008
3009         LASSERT(child);
3010
3011         if (likely(parent)) {
3012                 nextp = dt_object_child(parent);
3013                 lp = lod_dt_obj(parent);
3014         }
3015
3016         nextc = dt_object_child(child);
3017         lc = lod_dt_obj(child);
3018
3019         LASSERT(lc->ldo_stripenr == 0);
3020         LASSERT(lc->ldo_stripe == NULL);
3021
3022         if (!dt_object_exists(nextc))
3023                 nextc->do_ops->do_ah_init(env, ah, nextp, nextc, child_mode);
3024
3025         if (S_ISDIR(child_mode)) {
3026                 /* other default values are 0 */
3027                 lc->ldo_dir_stripe_offset = -1;
3028
3029                 memset(lds, 0, sizeof(*lds));
3030                 lod_get_default_striping(env, lp, lds);
3031
3032                 /* inherit parent default striping */
3033                 if (lds->lds_def_striping_set || lds->lds_dir_def_striping_set)
3034                         lc->ldo_def_striping = lds;
3035
3036                 /* It should always honour the specified stripes */
3037                 if (ah->dah_eadata != NULL && ah->dah_eadata_len != 0 &&
3038                     lod_verify_md_striping(d, ah->dah_eadata) == 0) {
3039                         const struct lmv_user_md_v1 *lum1 = ah->dah_eadata;
3040
3041                         lc->ldo_stripenr = le32_to_cpu(lum1->lum_stripe_count);
3042                         lc->ldo_dir_stripe_offset =
3043                                         le32_to_cpu(lum1->lum_stripe_offset);
3044                         lc->ldo_dir_hash_type =
3045                                         le32_to_cpu(lum1->lum_hash_type);
3046                         CDEBUG(D_INFO, "set dir stripe: count %hu, offset %d, "
3047                                 "hash_type %u\n",
3048                                 lc->ldo_stripenr,
3049                                 (int)lc->ldo_dir_stripe_offset,
3050                                 lc->ldo_dir_hash_type);
3051                 } else {
3052                         lod_striping_from_default(lc, lds, child_mode);
3053                 }
3054
3055                 /* shrink the stripe_count to the avaible MDT count */
3056                 if (lc->ldo_stripenr > d->lod_remote_mdt_count + 1 &&
3057                     !OBD_FAIL_CHECK(OBD_FAIL_LARGE_STRIPE))
3058                         lc->ldo_stripenr = d->lod_remote_mdt_count + 1;
3059
3060                 /* Directory will be striped only if stripe_count > 1, if
3061                  * stripe_count == 1, let's reset stripenr = 0 to avoid
3062                  * create single master stripe and also help to unify the
3063                  * stripe handling of directories and files */
3064                 if (lc->ldo_stripenr == 1)
3065                         lc->ldo_stripenr = 0;
3066
3067                 CDEBUG(D_INFO, "final dir stripe [%hu %d %u]\n",
3068                        lc->ldo_stripenr, (int)lc->ldo_dir_stripe_offset,
3069                        lc->ldo_dir_hash_type);
3070
3071                 RETURN_EXIT;
3072         }
3073
3074         /*
3075          * if object is going to be striped over OSTs, transfer default
3076          * striping information to the child, so that we can use it
3077          * during declaration and creation
3078          */
3079         if (!lod_object_will_be_striped(S_ISREG(child_mode),
3080                                         lu_object_fid(&child->do_lu)))
3081                 RETURN_EXIT;
3082
3083         /* other default values are 0 */
3084         lc->ldo_stripe_offset = LOV_OFFSET_DEFAULT;
3085
3086         /* striping from parent default */
3087         if (likely(parent)) {
3088                 memset(lds, 0, sizeof(*lds));
3089                 lod_get_default_lov_striping(env, lp, lds);
3090                 lod_striping_from_default(lc, lds, child_mode);
3091         }
3092
3093         if (d->lod_md_root == NULL) {
3094                 struct dt_object *root;
3095                 struct lod_object *lroot;
3096
3097                 lu_root_fid(&info->lti_fid);
3098                 root = dt_locate(env, &d->lod_dt_dev, &info->lti_fid);
3099                 if (!IS_ERR(root)) {
3100                         lroot = lod_dt_obj(root);
3101
3102                         spin_lock(&d->lod_lock);
3103                         if (d->lod_md_root != NULL)
3104                                 lu_object_put(env,
3105                                               &d->lod_md_root->ldo_obj.do_lu);
3106                         d->lod_md_root = lroot;
3107                         spin_unlock(&d->lod_lock);
3108                 }
3109         }
3110
3111         /* if parent doesn't provide all defaults, striping from fs default */
3112         if (d->lod_md_root != NULL &&
3113             (lc->ldo_stripenr == 0 ||
3114              lc->ldo_stripe_size == 0 ||
3115              lc->ldo_stripe_offset == LOV_OFFSET_DEFAULT ||
3116              lc->ldo_pool == NULL)) {
3117                 memset(lds, 0, sizeof(*lds));
3118                 lod_get_default_lov_striping(env, d->lod_md_root, lds);
3119                 lod_striping_from_default(lc, lds, child_mode);
3120         }
3121
3122         /*
3123          * fs default striping may not be explicitly set, or historically set
3124          * in config log, check striping sanity here and fix to sane values.
3125          */
3126         desc = &d->lod_desc;
3127         if (lc->ldo_stripenr == 0)
3128                 lc->ldo_stripenr = desc->ld_default_stripe_count;
3129         if (lc->ldo_stripe_size == 0)
3130                 lc->ldo_stripe_size = desc->ld_default_stripe_size;
3131
3132         CDEBUG(D_INFO, "final striping [%hu %u %d %s]\n",
3133                lc->ldo_stripenr, lc->ldo_stripe_size,
3134                (int)lc->ldo_stripe_offset, lc->ldo_pool ?: "");
3135         EXIT;
3136 }
3137
3138 #define ll_do_div64(aaa,bbb)    do_div((aaa), (bbb))
3139 /**
3140  * Size initialization on late striping.
3141  *
3142  * Propagate the size of a truncated object to a deferred striping.
3143  * This function handles a special case when truncate was done on a
3144  * non-striped object and now while the striping is being created
3145  * we can't lose that size, so we have to propagate it to the stripes
3146  * being created.
3147  *
3148  * \param[in] env       execution environment
3149  * \param[in] dt        object
3150  * \param[in] th        transaction handle
3151  *
3152  * \retval              0 on success
3153  * \retval              negative if failed
3154  */
3155 static int lod_declare_init_size(const struct lu_env *env,
3156                                  struct dt_object *dt, struct thandle *th)
3157 {
3158         struct dt_object   *next = dt_object_child(dt);
3159         struct lod_object  *lo = lod_dt_obj(dt);
3160         struct lu_attr     *attr = &lod_env_info(env)->lti_attr;
3161         uint64_t            size, offs;
3162         int                 rc, stripe;
3163         ENTRY;
3164
3165         /* XXX: we support the simplest (RAID0) striping so far */
3166         LASSERT(lo->ldo_stripe || lo->ldo_stripenr == 0);
3167         LASSERT(lo->ldo_stripe_size > 0);
3168
3169         if (lo->ldo_stripenr == 0)
3170                 RETURN(0);
3171
3172         rc = dt_attr_get(env, next, attr);
3173         LASSERT(attr->la_valid & LA_SIZE);
3174         if (rc)
3175                 RETURN(rc);
3176
3177         size = attr->la_size;
3178         if (size == 0)
3179                 RETURN(0);
3180
3181         /* ll_do_div64(a, b) returns a % b, and a = a / b */
3182         ll_do_div64(size, (__u64) lo->ldo_stripe_size);
3183         stripe = ll_do_div64(size, (__u64) lo->ldo_stripenr);
3184
3185         size = size * lo->ldo_stripe_size;
3186         offs = attr->la_size;
3187         size += ll_do_div64(offs, lo->ldo_stripe_size);
3188
3189         attr->la_valid = LA_SIZE;
3190         attr->la_size = size;
3191
3192         rc = lod_sub_object_declare_attr_set(env, lo->ldo_stripe[stripe], attr,
3193                                              th);
3194
3195         RETURN(rc);
3196 }
3197
3198 /**
3199  * Declare creation of striped object.
3200  *
3201  * The function declares creation stripes for a regular object. The function
3202  * also declares whether the stripes will be created with non-zero size if
3203  * previously size was set non-zero on the master object. If object \a dt is
3204  * not local, then only fully defined striping can be applied in \a lovea.
3205  * Otherwise \a lovea can be in the form of pattern, see lod_qos_parse_config()
3206  * for the details.
3207  *
3208  * \param[in] env       execution environment
3209  * \param[in] dt        object
3210  * \param[in] attr      attributes the stripes will be created with
3211  * \param[in] lovea     a buffer containing striping description
3212  * \param[in] th        transaction handle
3213  *
3214  * \retval              0 on success
3215  * \retval              negative if failed
3216  */
3217 int lod_declare_striped_object(const struct lu_env *env, struct dt_object *dt,
3218                                struct lu_attr *attr,
3219                                const struct lu_buf *lovea, struct thandle *th)
3220 {
3221         struct lod_thread_info  *info = lod_env_info(env);
3222         struct dt_object        *next = dt_object_child(dt);
3223         struct lod_object       *lo = lod_dt_obj(dt);
3224         int                      rc;
3225         ENTRY;
3226
3227         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_ALLOC_OBDO))
3228                 GOTO(out, rc = -ENOMEM);
3229
3230         if (!dt_object_remote(next)) {
3231                 /* choose OST and generate appropriate objects */
3232                 rc = lod_qos_prep_create(env, lo, attr, lovea, th);
3233                 if (rc)
3234                         GOTO(out, rc);
3235
3236                 /*
3237                  * declare storage for striping data
3238                  */
3239                 info->lti_buf.lb_len = lov_mds_md_size(lo->ldo_stripenr,
3240                                 lo->ldo_pool ?  LOV_MAGIC_V3 : LOV_MAGIC_V1);
3241         } else {
3242                 /* LOD can not choose OST objects for remote objects, i.e.
3243                  * stripes must be ready before that. Right now, it can only
3244                  * happen during migrate, i.e. migrate process needs to create
3245                  * remote regular file (mdd_migrate_create), then the migrate
3246                  * process will provide stripeEA. */
3247                 LASSERT(lovea != NULL);
3248                 info->lti_buf = *lovea;
3249         }
3250
3251         rc = lod_sub_object_declare_xattr_set(env, next, &info->lti_buf,
3252                                               XATTR_NAME_LOV, 0, th);
3253         if (rc)
3254                 GOTO(out, rc);
3255
3256         /*
3257          * if striping is created with local object's size > 0,
3258          * we have to propagate this size to specific object
3259          * the case is possible only when local object was created previously
3260          */
3261         if (dt_object_exists(next))
3262                 rc = lod_declare_init_size(env, dt, th);
3263
3264 out:
3265         /* failed to create striping or to set initial size, let's reset
3266          * config so that others don't get confused */
3267         if (rc)
3268                 lod_object_free_striping(env, lo);
3269
3270         RETURN(rc);
3271 }
3272
3273 /**
3274  * Implementation of dt_object_operations::do_declare_create.
3275  *
3276  * The method declares creation of a new object. If the object will be striped,
3277  * then helper functions are called to find FIDs for the stripes, declare
3278  * creation of the stripes and declare initialization of the striping
3279  * information to be stored in the master object.
3280  *
3281  * \see dt_object_operations::do_declare_create() in the API description
3282  * for details.
3283  */
3284 static int lod_declare_object_create(const struct lu_env *env,
3285                                      struct dt_object *dt,
3286                                      struct lu_attr *attr,
3287                                      struct dt_allocation_hint *hint,
3288                                      struct dt_object_format *dof,
3289                                      struct thandle *th)
3290 {
3291         struct dt_object   *next = dt_object_child(dt);
3292         struct lod_object  *lo = lod_dt_obj(dt);
3293         int                 rc;
3294         ENTRY;
3295
3296         LASSERT(dof);
3297         LASSERT(attr);
3298         LASSERT(th);
3299
3300         /*
3301          * first of all, we declare creation of local object
3302          */
3303         rc = lod_sub_object_declare_create(env, next, attr, hint, dof, th);
3304         if (rc != 0)
3305                 GOTO(out, rc);
3306
3307         if (dof->dof_type == DFT_SYM)
3308                 dt->do_body_ops = &lod_body_lnk_ops;
3309         else if (dof->dof_type == DFT_REGULAR)
3310                 dt->do_body_ops = &lod_body_ops;
3311
3312         /*
3313          * it's lod_ah_init() that has decided the object will be striped
3314          */
3315         if (dof->dof_type == DFT_REGULAR) {
3316                 /* callers don't want stripes */
3317                 /* XXX: all tricky interactions with ->ah_make_hint() decided
3318                  * to use striping, then ->declare_create() behaving differently
3319                  * should be cleaned */
3320                 if (dof->u.dof_reg.striped == 0)
3321                         lo->ldo_stripenr = 0;
3322                 if (lo->ldo_stripenr > 0)
3323                         rc = lod_declare_striped_object(env, dt, attr,
3324                                                         NULL, th);
3325         } else if (dof->dof_type == DFT_DIR) {
3326                 struct seq_server_site *ss;
3327
3328                 ss = lu_site2seq(dt->do_lu.lo_dev->ld_site);
3329
3330                 /* If the parent has default stripeEA, and client
3331                  * did not find it before sending create request,
3332                  * then MDT will return -EREMOTE, and client will
3333                  * retrieve the default stripeEA and re-create the
3334                  * sub directory.
3335                  *
3336                  * Note: if dah_eadata != NULL, it means creating the
3337                  * striped directory with specified stripeEA, then it
3338                  * should ignore the default stripeEA */
3339                 if (hint != NULL && hint->dah_eadata == NULL) {
3340                         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_STALE_DIR_LAYOUT))
3341                                 GOTO(out, rc = -EREMOTE);
3342
3343                         if (lo->ldo_dir_stripe_offset == -1) {
3344                                 /* child and parent should be in the same MDT */
3345                                 if (hint->dah_parent != NULL &&
3346                                     dt_object_remote(hint->dah_parent))
3347                                         GOTO(out, rc = -EREMOTE);
3348                         } else if (lo->ldo_dir_stripe_offset !=
3349                                    ss->ss_node_id) {
3350                                 struct lod_device *lod;
3351                                 struct lod_tgt_descs *ltd;
3352                                 struct lod_tgt_desc *tgt = NULL;
3353                                 bool found_mdt = false;
3354                                 int i;
3355
3356                                 lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev);
3357                                 ltd = &lod->lod_mdt_descs;
3358                                 cfs_foreach_bit(ltd->ltd_tgt_bitmap, i) {
3359                                         tgt = LTD_TGT(ltd, i);
3360                                         if (tgt->ltd_index ==
3361                                                 lo->ldo_dir_stripe_offset) {
3362                                                 found_mdt = true;
3363                                                 break;
3364                                         }
3365                                 }
3366
3367                                 /* If the MDT indicated by stripe_offset can be
3368                                  * found, then tell client to resend the create
3369                                  * request to the correct MDT, otherwise return
3370                                  * error to client */
3371                                 if (found_mdt)
3372                                         GOTO(out, rc = -EREMOTE);
3373                                 else
3374                                         GOTO(out, rc = -EINVAL);
3375                         }
3376                 }
3377
3378                 rc = lod_declare_dir_striping_create(env, dt, attr, dof, th);
3379         }
3380 out:
3381         RETURN(rc);
3382 }
3383
3384 /**
3385  * Creation of a striped regular object.
3386  *
3387  * The function is called to create the stripe objects for a regular
3388  * striped file. This can happen at the initial object creation or
3389  * when the caller asks LOD to do so using ->do_xattr_set() method
3390  * (so called late striping). Notice all the information are already
3391  * prepared in the form of the list of objects (ldo_stripe field).
3392  * This is done during declare phase.
3393  *
3394  * \param[in] env       execution environment
3395  * \param[in] dt        object
3396  * \param[in] attr      attributes the stripes will be created with
3397  * \param[in] dof       format of stripes (see OSD API description)
3398  * \param[in] th        transaction handle
3399  *
3400  * \retval              0 on success
3401  * \retval              negative if failed
3402  */
3403 int lod_striping_create(const struct lu_env *env, struct dt_object *dt,
3404                         struct lu_attr *attr, struct dt_object_format *dof,
3405                         struct thandle *th)
3406 {
3407         struct lod_object *lo = lod_dt_obj(dt);
3408         int                rc = 0, i;
3409         ENTRY;
3410
3411         /* create all underlying objects */
3412         for (i = 0; i < lo->ldo_stripenr; i++) {
3413                 LASSERT(lo->ldo_stripe[i]);
3414                 rc = lod_sub_object_create(env, lo->ldo_stripe[i], attr, NULL,
3415                                            dof, th);
3416                 if (rc)
3417                         break;
3418         }
3419
3420         if (rc == 0)
3421                 rc = lod_generate_and_set_lovea(env, lo, th);
3422
3423         RETURN(rc);
3424 }
3425
3426 /**
3427  * Implementation of dt_object_operations::do_create.
3428  *
3429  * If any of preceeding methods (like ->do_declare_create(),
3430  * ->do_ah_init(), etc) chose to create a striped object,
3431  * then this method will create the master and the stripes.
3432  *
3433  * \see dt_object_operations::do_create() in the API description for details.
3434  */
3435 static int lod_object_create(const struct lu_env *env, struct dt_object *dt,
3436                              struct lu_attr *attr,
3437                              struct dt_allocation_hint *hint,
3438                              struct dt_object_format *dof, struct thandle *th)
3439 {
3440         struct lod_object  *lo = lod_dt_obj(dt);
3441         int                 rc;
3442         ENTRY;
3443
3444         /* create local object */
3445         rc = lod_sub_object_create(env, dt_object_child(dt), attr, hint, dof,
3446                                    th);
3447         if (rc != 0)
3448                 RETURN(rc);
3449
3450         if (S_ISREG(dt->do_lu.lo_header->loh_attr) &&
3451             lo->ldo_stripe && dof->u.dof_reg.striped != 0)
3452                 rc = lod_striping_create(env, dt, attr, dof, th);
3453
3454         RETURN(rc);
3455 }
3456
3457 /**
3458  * Implementation of dt_object_operations::do_declare_destroy.
3459  *
3460  * If the object is a striped directory, then the function declares reference
3461  * removal from the master object (this is an index) to the stripes and declares
3462  * destroy of all the stripes. In all the cases, it declares an intention to
3463  * destroy the object itself.
3464  *
3465  * \see dt_object_operations::do_declare_destroy() in the API description
3466  * for details.
3467  */
3468 static int lod_declare_object_destroy(const struct lu_env *env,
3469                                       struct dt_object *dt,
3470                                       struct thandle *th)
3471 {
3472         struct dt_object   *next = dt_object_child(dt);
3473         struct lod_object  *lo = lod_dt_obj(dt);
3474         struct lod_thread_info *info = lod_env_info(env);
3475         char               *stripe_name = info->lti_key;
3476         int                 rc, i;
3477         ENTRY;
3478
3479         /*
3480          * load striping information, notice we don't do this when object
3481          * is being initialized as we don't need this information till
3482          * few specific cases like destroy, chown
3483          */
3484         rc = lod_load_striping(env, lo);
3485         if (rc)
3486                 RETURN(rc);
3487
3488         /* declare destroy for all underlying objects */
3489         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
3490                 rc = next->do_ops->do_index_try(env, next,
3491                                                 &dt_directory_features);
3492                 if (rc != 0)
3493                         RETURN(rc);
3494
3495                 for (i = 0; i < lo->ldo_stripenr; i++) {
3496                         rc = lod_sub_object_declare_ref_del(env, next, th);
3497                         if (rc != 0)
3498                                 RETURN(rc);
3499
3500                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%d",
3501                                 PFID(lu_object_fid(&lo->ldo_stripe[i]->do_lu)),
3502                                 i);
3503                         rc = lod_sub_object_declare_delete(env, next,
3504                                         (const struct dt_key *)stripe_name, th);
3505                         if (rc != 0)
3506                                 RETURN(rc);
3507                 }
3508         }
3509
3510         /*
3511          * we declare destroy for the local object
3512          */
3513         rc = lod_sub_object_declare_destroy(env, next, th);
3514         if (rc)
3515                 RETURN(rc);
3516
3517         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_MDTOBJ) ||
3518             OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_MDTOBJ2))
3519                 RETURN(0);
3520
3521         /* declare destroy all striped objects */
3522         for (i = 0; i < lo->ldo_stripenr; i++) {
3523                 if (lo->ldo_stripe[i] == NULL)
3524                         continue;
3525
3526                 if (S_ISDIR(dt->do_lu.lo_header->loh_attr))
3527                         rc = lod_sub_object_declare_ref_del(env,
3528                                         lo->ldo_stripe[i], th);
3529
3530                 rc = lod_sub_object_declare_destroy(env, lo->ldo_stripe[i],
3531                                         th);
3532                 if (rc != 0)
3533                         break;
3534         }
3535
3536         RETURN(rc);
3537 }
3538
3539 /**
3540  * Implementation of dt_object_operations::do_destroy.
3541  *
3542  * If the object is a striped directory, then the function removes references
3543  * from the master object (this is an index) to the stripes and destroys all
3544  * the stripes. In all the cases, the function destroys the object itself.
3545  *
3546  * \see dt_object_operations::do_destroy() in the API description for details.
3547  */
3548 static int lod_object_destroy(const struct lu_env *env,
3549                 struct dt_object *dt, struct thandle *th)
3550 {
3551         struct dt_object  *next = dt_object_child(dt);
3552         struct lod_object *lo = lod_dt_obj(dt);
3553         struct lod_thread_info *info = lod_env_info(env);
3554         char               *stripe_name = info->lti_key;
3555         unsigned int       i;
3556         int                rc;
3557         ENTRY;
3558
3559         /* destroy sub-stripe of master object */
3560         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
3561                 rc = next->do_ops->do_index_try(env, next,
3562                                                 &dt_directory_features);
3563                 if (rc != 0)
3564                         RETURN(rc);
3565
3566                 for (i = 0; i < lo->ldo_stripenr; i++) {
3567                         rc = lod_sub_object_ref_del(env, next, th);
3568                         if (rc != 0)
3569                                 RETURN(rc);
3570
3571                         snprintf(stripe_name, sizeof(info->lti_key), DFID":%d",
3572                                 PFID(lu_object_fid(&lo->ldo_stripe[i]->do_lu)),
3573                                 i);
3574
3575                         CDEBUG(D_INFO, DFID" delete stripe %s "DFID"\n",
3576                                PFID(lu_object_fid(&dt->do_lu)), stripe_name,
3577                                PFID(lu_object_fid(&lo->ldo_stripe[i]->do_lu)));
3578
3579                         rc = lod_sub_object_delete(env, next,
3580                                        (const struct dt_key *)stripe_name, th);
3581                         if (rc != 0)
3582                                 RETURN(rc);
3583                 }
3584         }
3585
3586         rc = lod_sub_object_destroy(env, next, th);
3587         if (rc != 0)
3588                 RETURN(rc);
3589
3590         if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_MDTOBJ) ||
3591             OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_MDTOBJ2))
3592                 RETURN(0);
3593
3594         /* destroy all striped objects */
3595         for (i = 0; i < lo->ldo_stripenr; i++) {
3596                 if (likely(lo->ldo_stripe[i] != NULL) &&
3597                     (!OBD_FAIL_CHECK(OBD_FAIL_LFSCK_LOST_SPEOBJ) ||
3598                      i == cfs_fail_val)) {
3599                         if (S_ISDIR(dt->do_lu.lo_header->loh_attr)) {
3600                                 dt_write_lock(env, lo->ldo_stripe[i],
3601                                               MOR_TGT_CHILD);
3602                                 rc = lod_sub_object_ref_del(env,
3603                                                 lo->ldo_stripe[i], th);
3604                                 dt_write_unlock(env, lo->ldo_stripe[i]);
3605                                 if (rc != 0)
3606                                         break;
3607                         }
3608
3609                         rc = lod_sub_object_destroy(env, lo->ldo_stripe[i], th);
3610                         if (rc != 0)
3611                                 break;
3612                 }
3613         }
3614
3615         RETURN(rc);
3616 }
3617
3618 /**
3619  * Implementation of dt_object_operations::do_declare_ref_add.
3620  *
3621  * \see dt_object_operations::do_declare_ref_add() in the API description
3622  * for details.
3623  */
3624 static int lod_declare_ref_add(const struct lu_env *env,
3625                                struct dt_object *dt, struct thandle *th)
3626 {
3627         return lod_sub_object_declare_ref_add(env, dt_object_child(dt), th);
3628 }
3629
3630 /**
3631  * Implementation of dt_object_operations::do_ref_add.
3632  *
3633  * \see dt_object_operations::do_ref_add() in the API description for details.
3634  */
3635 static int lod_ref_add(const struct lu_env *env,
3636                        struct dt_object *dt, struct thandle *th)
3637 {
3638         return lod_sub_object_ref_add(env, dt_object_child(dt), th);
3639 }
3640
3641 /**
3642  * Implementation of dt_object_operations::do_declare_ref_del.
3643  *
3644  * \see dt_object_operations::do_declare_ref_del() in the API description
3645  * for details.
3646  */
3647 static int lod_declare_ref_del(const struct lu_env *env,
3648                                struct dt_object *dt, struct thandle *th)
3649 {
3650         return lod_sub_object_declare_ref_del(env, dt_object_child(dt), th);
3651 }
3652
3653 /**
3654  * Implementation of dt_object_operations::do_ref_del
3655  *
3656  * \see dt_object_operations::do_ref_del() in the API description for details.
3657  */
3658 static int lod_ref_del(const struct lu_env *env,
3659                        struct dt_object *dt, struct thandle *th)
3660 {
3661         return lod_sub_object_ref_del(env, dt_object_child(dt), th);
3662 }
3663
3664 /**
3665  * Implementation of dt_object_operations::do_object_sync.
3666  *
3667  * \see dt_object_operations::do_object_sync() in the API description
3668  * for details.
3669  */
3670 static int lod_object_sync(const struct lu_env *env, struct dt_object *dt,
3671                            __u64 start, __u64 end)
3672 {
3673         return dt_object_sync(env, dt_object_child(dt), start, end);
3674 }
3675
3676 /**
3677  * Release LDLM locks on the stripes of a striped directory.
3678  *
3679  * Iterates over all the locks taken on the stripe objects and
3680  * cancel them.
3681  *
3682  * \param[in] env       execution environment
3683  * \param[in] dt        striped object
3684  * \param[in] einfo     lock description
3685  * \param[in] policy    data describing requested lock
3686  *
3687  * \retval              0 on success
3688  * \retval              negative if failed
3689  */
3690 static int lod_object_unlock_internal(const struct lu_env *env,
3691                                       struct dt_object *dt,
3692                                       struct ldlm_enqueue_info *einfo,
3693                                       union ldlm_policy_data *policy)
3694 {
3695         struct lustre_handle_array *slave_locks = einfo->ei_cbdata;
3696         int                     rc = 0;
3697         int                     i;
3698         ENTRY;
3699
3700         if (slave_locks == NULL)
3701                 RETURN(0);
3702
3703         for (i = 1; i < slave_locks->count; i++) {
3704                 if (lustre_handle_is_used(&slave_locks->handles[i]))
3705                         ldlm_lock_decref_and_cancel(&slave_locks->handles[i],
3706                                                     einfo->ei_mode);
3707         }
3708
3709         RETURN(rc);
3710 }
3711
3712 /**
3713  * Implementation of dt_object_operations::do_object_unlock.
3714  *
3715  * Used to release LDLM lock(s).
3716  *
3717  * \see dt_object_operations::do_object_unlock() in the API description
3718  * for details.
3719  */
3720 static int lod_object_unlock(const struct lu_env *env, struct dt_object *dt,
3721                              struct ldlm_enqueue_info *einfo,
3722                              union ldlm_policy_data *policy)
3723 {
3724         struct lod_object *lo = lod_dt_obj(dt);
3725         struct lustre_handle_array *slave_locks = einfo->ei_cbdata;
3726         int slave_locks_size;
3727         int i;
3728         ENTRY;
3729
3730         if (slave_locks == NULL)
3731                 RETURN(0);
3732
3733         LASSERT(S_ISDIR(dt->do_lu.lo_header->loh_attr));
3734         LASSERT(lo->ldo_stripenr > 1);
3735         /* Note: for remote lock for single stripe dir, MDT will cancel
3736          * the lock by lockh directly */
3737         LASSERT(!dt_object_remote(dt_object_child(dt)));
3738
3739         /* locks were unlocked in MDT layer */
3740         for (i = 1; i < slave_locks->count; i++) {
3741                 LASSERT(!lustre_handle_is_used(&slave_locks->handles[i]));
3742                 dt_invalidate(env, lo->ldo_stripe[i]);
3743         }
3744
3745         slave_locks_size = sizeof(*slave_locks) + slave_locks->count *
3746                            sizeof(slave_locks->handles[0]);
3747         OBD_FREE(slave_locks, slave_locks_size);
3748         einfo->ei_cbdata = NULL;
3749
3750         RETURN(0);
3751 }
3752
3753 /**
3754  * Implementation of dt_object_operations::do_object_lock.
3755  *
3756  * Used to get LDLM lock on the non-striped and striped objects.
3757  *
3758  * \see dt_object_operations::do_object_lock() in the API description
3759  * for details.
3760  */
3761 static int lod_object_lock(const struct lu_env *env,
3762                            struct dt_object *dt,
3763                            struct lustre_handle *lh,
3764                            struct ldlm_enqueue_info *einfo,
3765                            union ldlm_policy_data *policy)
3766 {
3767         struct lod_object       *lo = lod_dt_obj(dt);
3768         int                     rc = 0;
3769         int                     i;
3770         int                     slave_locks_size;
3771         struct lustre_handle_array *slave_locks = NULL;
3772         ENTRY;
3773
3774         /* remote object lock */
3775         if (!einfo->ei_enq_slave) {
3776                 LASSERT(dt_object_remote(dt));
3777                 return dt_object_lock(env, dt_object_child(dt), lh, einfo,
3778                                       policy);
3779         }
3780
3781         if (!S_ISDIR(dt->do_lu.lo_header->loh_attr))
3782                 GOTO(out, rc = -ENOTDIR);
3783
3784         rc = lod_load_striping(env, lo);
3785         if (rc != 0)
3786                 GOTO(out, rc);
3787
3788         /* No stripes */
3789         if (lo->ldo_stripenr <= 1) {
3790                 /*
3791                  * NB, ei_cbdata stores pointer to slave locks, if no locks
3792                  * taken, make sure it's set to NULL, otherwise MDT will try to
3793                  * unlock them.
3794                  */
3795                 einfo->ei_cbdata = NULL;
3796                 GOTO(out, rc = 0);
3797         }
3798
3799         slave_locks_size = sizeof(*slave_locks) + lo->ldo_stripenr *
3800                            sizeof(slave_locks->handles[0]);
3801         /* Freed in lod_object_unlock */
3802         OBD_ALLOC(slave_locks, slave_locks_size);
3803         if (slave_locks == NULL)
3804                 GOTO(out, rc = -ENOMEM);
3805         slave_locks->count = lo->ldo_stripenr;
3806
3807         /* striped directory lock */
3808         for (i = 1; i < lo->ldo_stripenr; i++) {
3809                 struct lustre_handle    lockh;
3810                 struct ldlm_res_id      *res_id;
3811
3812                 res_id = &lod_env_info(env)->lti_res_id;
3813                 fid_build_reg_res_name(lu_object_fid(&lo->ldo_stripe[i]->do_lu),
3814                                        res_id);
3815                 einfo->ei_res_id = res_id;
3816
3817                 LASSERT(lo->ldo_stripe[i] != NULL);
3818                 if (likely(dt_object_remote(lo->ldo_stripe[i]))) {
3819                         rc = dt_object_lock(env, lo->ldo_stripe[i], &lockh,
3820                                             einfo, policy);
3821                 } else {
3822                         struct ldlm_namespace *ns = einfo->ei_namespace;
3823                         ldlm_blocking_callback blocking = einfo->ei_cb_local_bl;
3824                         ldlm_completion_callback completion = einfo->ei_cb_cp;
3825                         __u64   dlmflags = LDLM_FL_ATOMIC_CB;
3826
3827                         if (einfo->ei_mode == LCK_PW ||
3828                             einfo->ei_mode == LCK_EX)
3829                                 dlmflags |= LDLM_FL_COS_INCOMPAT;
3830
3831                         /* This only happens if there are mulitple stripes
3832                          * on the master MDT, i.e. except stripe0, there are
3833                          * other stripes on the Master MDT as well, Only
3834                          * happens in the test case right now. */
3835                         LASSERT(ns != NULL);
3836                         rc = ldlm_cli_enqueue_local(ns, res_id, LDLM_IBITS,
3837                                                     policy, einfo->ei_mode,
3838                                                     &dlmflags, blocking,
3839                                                     completion, NULL,
3840                                                     NULL, 0, LVB_T_NONE,
3841                                                     NULL, &lockh);
3842                 }
3843                 if (rc != 0)
3844                         break;
3845                 slave_locks->handles[i] = lockh;
3846         }
3847         einfo->ei_cbdata = slave_locks;
3848
3849         if (rc != 0 && slave_locks != NULL) {
3850                 lod_object_unlock_internal(env, dt, einfo, policy);
3851                 OBD_FREE(slave_locks, slave_locks_size);
3852         }
3853         EXIT;
3854 out:
3855         if (rc != 0)
3856                 einfo->ei_cbdata = NULL;
3857         RETURN(rc);
3858 }
3859
3860 /**
3861  * Implementation of dt_object_operations::do_invalidate.
3862  *
3863  * \see dt_object_operations::do_invalidate() in the API description for details
3864  */
3865 static int lod_invalidate(const struct lu_env *env, struct dt_object *dt)
3866 {
3867         return dt_invalidate(env, dt_object_child(dt));
3868 }
3869
3870 struct dt_object_operations lod_obj_ops = {
3871         .do_read_lock           = lod_object_read_lock,
3872         .do_write_lock          = lod_object_write_lock,
3873         .do_read_unlock         = lod_object_read_unlock,
3874         .do_write_unlock        = lod_object_write_unlock,
3875         .do_write_locked        = lod_object_write_locked,
3876         .do_attr_get            = lod_attr_get,
3877         .do_declare_attr_set    = lod_declare_attr_set,
3878         .do_attr_set            = lod_attr_set,
3879         .do_xattr_get           = lod_xattr_get,
3880         .do_declare_xattr_set   = lod_declare_xattr_set,
3881         .do_xattr_set           = lod_xattr_set,
3882         .do_declare_xattr_del   = lod_declare_xattr_del,
3883         .do_xattr_del           = lod_xattr_del,
3884         .do_xattr_list          = lod_xattr_list,
3885         .do_ah_init             = lod_ah_init,
3886         .do_declare_create      = lod_declare_object_create,
3887         .do_create              = lod_object_create,
3888         .do_declare_destroy     = lod_declare_object_destroy,
3889         .do_destroy             = lod_object_destroy,
3890         .do_index_try           = lod_index_try,
3891         .do_declare_ref_add     = lod_declare_ref_add,
3892         .do_ref_add             = lod_ref_add,
3893         .do_declare_ref_del     = lod_declare_ref_del,
3894         .do_ref_del             = lod_ref_del,
3895         .do_object_sync         = lod_object_sync,
3896         .do_object_lock         = lod_object_lock,
3897         .do_object_unlock       = lod_object_unlock,
3898         .do_invalidate          = lod_invalidate,
3899 };
3900
3901 /**
3902  * Implementation of dt_body_operations::dbo_read.
3903  *
3904  * \see dt_body_operations::dbo_read() in the API description for details.
3905  */
3906 static ssize_t lod_read(const struct lu_env *env, struct dt_object *dt,
3907                         struct lu_buf *buf, loff_t *pos)
3908 {
3909         struct dt_object *next = dt_object_child(dt);
3910         return next->do_body_ops->dbo_read(env, next, buf, pos);
3911 }
3912
3913 /**
3914  * Implementation of dt_body_operations::dbo_declare_write.
3915  *
3916  * \see dt_body_operations::dbo_declare_write() in the API description
3917  * for details.
3918  */
3919 static ssize_t lod_declare_write(const struct lu_env *env,
3920                                  struct dt_object *dt,
3921                                  const struct lu_buf *buf, loff_t pos,
3922                                  struct thandle *th)
3923 {
3924         return lod_sub_object_declare_write(env, dt_object_child(dt), buf, pos,
3925                                             th);
3926 }
3927
3928 /**
3929  * Implementation of dt_body_operations::dbo_write.
3930  *
3931  * \see dt_body_operations::dbo_write() in the API description for details.
3932  */
3933 static ssize_t lod_write(const struct lu_env *env, struct dt_object *dt,
3934                          const struct lu_buf *buf, loff_t *pos,
3935                          struct thandle *th, int iq)
3936 {
3937         return lod_sub_object_write(env, dt_object_child(dt), buf, pos, th, iq);
3938 }
3939
3940 static int lod_declare_punch(const struct lu_env *env, struct dt_object *dt,
3941                              __u64 start, __u64 end, struct thandle *th)
3942 {
3943         if (dt_object_remote(dt))
3944                 return -ENOTSUPP;
3945
3946         return lod_sub_object_declare_punch(env, dt_object_child(dt), start,
3947                                             end, th);
3948 }
3949
3950 static int lod_punch(const struct lu_env *env, struct dt_object *dt,
3951                      __u64 start, __u64 end, struct thandle *th)
3952 {
3953         if (dt_object_remote(dt))
3954                 return -ENOTSUPP;
3955
3956         return lod_sub_object_punch(env, dt_object_child(dt), start, end, th);
3957 }
3958
3959 static const struct dt_body_operations lod_body_lnk_ops = {
3960         .dbo_read               = lod_read,
3961         .dbo_declare_write      = lod_declare_write,
3962         .dbo_write              = lod_write
3963 };
3964
3965 static const struct dt_body_operations lod_body_ops = {
3966         .dbo_read               = lod_read,
3967         .dbo_declare_write      = lod_declare_write,
3968         .dbo_write              = lod_write,
3969         .dbo_declare_punch      = lod_declare_punch,
3970         .dbo_punch              = lod_punch,
3971 };
3972
3973 /**
3974  * Implementation of lu_object_operations::loo_object_init.
3975  *
3976  * The function determines the type and the index of the target device using
3977  * sequence of the object's FID. Then passes control down to the
3978  * corresponding device:
3979  *  OSD for the local objects, OSP for remote
3980  *
3981  * \see lu_object_operations::loo_object_init() in the API description
3982  * for details.
3983  */
3984 static int lod_object_init(const struct lu_env *env, struct lu_object *lo,
3985                            const struct lu_object_conf *conf)
3986 {
3987         struct lod_device       *lod    = lu2lod_dev(lo->lo_dev);
3988         struct lu_device        *cdev   = NULL;
3989         struct lu_object        *cobj;
3990         struct lod_tgt_descs    *ltd    = NULL;
3991         struct lod_tgt_desc     *tgt;
3992         u32                      idx    = 0;
3993         int                      type   = LU_SEQ_RANGE_ANY;
3994         int                      rc;
3995         ENTRY;
3996
3997         rc = lod_fld_lookup(env, lod, lu_object_fid(lo), &idx, &type);
3998         if (rc != 0) {
3999                 /* Note: Sometimes, it will Return EAGAIN here, see
4000                  * ptrlpc_import_delay_req(), which might confuse
4001                  * lu_object_find_at() and make it wait there incorrectly.
4002                  * so we convert it to EIO here.*/
4003                 if (rc == -EAGAIN)
4004                         rc = -EIO;
4005
4006                 RETURN(rc);
4007         }
4008
4009         if (type == LU_SEQ_RANGE_MDT &&
4010             idx == lu_site2seq(lo->lo_dev->ld_site)->ss_node_id) {
4011                 cdev = &lod->lod_child->dd_lu_dev;
4012         } else if (type == LU_SEQ_RANGE_MDT) {
4013                 ltd = &lod->lod_mdt_descs;
4014                 lod_getref(ltd);
4015         } else if (type == LU_SEQ_RANGE_OST) {
4016                 ltd = &lod->lod_ost_descs;
4017                 lod_getref(ltd);
4018         } else {
4019                 LBUG();
4020         }
4021
4022         if (ltd != NULL) {
4023                 if (ltd->ltd_tgts_size > idx &&
4024                     cfs_bitmap_check(ltd->ltd_tgt_bitmap, idx)) {
4025                         tgt = LTD_TGT(ltd, idx);
4026
4027                         LASSERT(tgt != NULL);
4028                         LASSERT(tgt->ltd_tgt != NULL);
4029
4030                         cdev = &(tgt->ltd_tgt->dd_lu_dev);
4031                 }
4032                 lod_putref(lod, ltd);
4033         }
4034
4035         if (unlikely(cdev == NULL))
4036                 RETURN(-ENOENT);
4037
4038         cobj = cdev->ld_ops->ldo_object_alloc(env, lo->lo_header, cdev);
4039         if (unlikely(cobj == NULL))
4040                 RETURN(-ENOMEM);
4041
4042         lu_object_add(lo, cobj);
4043
4044         RETURN(0);
4045 }
4046
4047 /**
4048  *
4049  * Release resources associated with striping.
4050  *
4051  * If the object is striped (regular or directory), then release
4052  * the stripe objects references and free the ldo_stripe array.
4053  *
4054  * \param[in] env       execution environment
4055  * \param[in] lo        object
4056  */
4057 void lod_object_free_striping(const struct lu_env *env, struct lod_object *lo)
4058 {
4059         int len;
4060
4061         if (lo->ldo_stripe != NULL) {
4062                 int i;
4063
4064                 LASSERT(lo->ldo_stripes_allocated > 0);
4065
4066                 for (i = 0; i < lo->ldo_stripenr; i++) {
4067                         if (lo->ldo_stripe[i])
4068                                 lu_object_put(env, &lo->ldo_stripe[i]->do_lu);
4069                 }
4070
4071                 len = sizeof(struct dt_object *) * lo->ldo_stripes_allocated;
4072                 OBD_FREE(lo->ldo_stripe, len);
4073                 lo->ldo_stripe = NULL;
4074                 lo->ldo_stripes_allocated = 0;
4075         }
4076         lo->ldo_stripenr = 0;
4077 }
4078
4079 /**
4080  * Implementation of lu_object_operations::loo_object_start.
4081  *
4082  * \see lu_object_operations::loo_object_start() in the API description
4083  * for details.
4084  */
4085 static int lod_object_start(const struct lu_env *env, struct lu_object *o)
4086 {
4087         if (S_ISLNK(o->lo_header->loh_attr & S_IFMT)) {
4088                 lu2lod_obj(o)->ldo_obj.do_body_ops = &lod_body_lnk_ops;
4089         } else if (S_ISREG(o->lo_header->loh_attr & S_IFMT) ||
4090                    fid_is_local_file(lu_object_fid(o))) {
4091                 /* Note: some local file (like last rcvd) is created
4092                  * through bottom layer (OSD), so the object initialization
4093                  * comes to lod, it does not set loh_attr yet, so
4094                  * set do_body_ops for local file anyway */
4095                 lu2lod_obj(o)->ldo_obj.do_body_ops = &lod_body_ops;
4096         }
4097         return 0;
4098 }
4099
4100 /**
4101  * Implementation of lu_object_operations::loo_object_free.
4102  *
4103  * \see lu_object_operations::loo_object_free() in the API description
4104  * for details.
4105  */
4106 static void lod_object_free(const struct lu_env *env, struct lu_object *o)
4107 {
4108         struct lod_object *lo = lu2lod_obj(o);
4109
4110         lod_object_set_pool(lo, NULL);
4111         /* release all underlying object pinned */
4112         lod_object_free_striping(env, lo);
4113         lu_object_fini(o);
4114         OBD_SLAB_FREE_PTR(lo, lod_object_kmem);
4115 }
4116
4117 /**
4118  * Implementation of lu_object_operations::loo_object_release.
4119  *
4120  * \see lu_object_operations::loo_object_release() in the API description
4121  * for details.
4122  */
4123 static void lod_object_release(const struct lu_env *env, struct lu_object *o)
4124 {
4125         /* XXX: shouldn't we release everything here in case if object
4126          * creation failed before? */
4127 }
4128
4129 /**
4130  * Implementation of lu_object_operations::loo_object_print.
4131  *
4132  * \see lu_object_operations::loo_object_print() in the API description
4133  * for details.
4134  */
4135 static int lod_object_print(const struct lu_env *env, void *cookie,
4136                             lu_printer_t p, const struct lu_object *l)
4137 {
4138         struct lod_object *o = lu2lod_obj((struct lu_object *) l);
4139
4140         return (*p)(env, cookie, LUSTRE_LOD_NAME"-object@%p", o);
4141 }
4142
4143 struct lu_object_operations lod_lu_obj_ops = {
4144         .loo_object_init        = lod_object_init,
4145         .loo_object_start       = lod_object_start,
4146         .loo_object_free        = lod_object_free,
4147         .loo_object_release     = lod_object_release,
4148         .loo_object_print       = lod_object_print,
4149 };