lustre/mdt/mdt_reint.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  19  *
  20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  21  * CA 95054 USA or visit www.sun.com if you need additional information or
  22  * have any questions.
  23  *
  24  * GPL HEADER END
  25  */
  26 /*
  27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  *
  30  * Copyright (c) 2011, 2015, Intel Corporation.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  *
  36  * lustre/mdt/mdt_reint.c
  37  *
  38  * Lustre Metadata Target (mdt) reintegration routines
  39  *
  40  * Author: Peter Braam <braam@clusterfs.com>
  41  * Author: Andreas Dilger <adilger@clusterfs.com>
  42  * Author: Phil Schwan <phil@clusterfs.com>
  43  * Author: Huang Hua <huanghua@clusterfs.com>
  44  * Author: Yury Umanets <umka@clusterfs.com>
  45  */
  46
  47 #define DEBUG_SUBSYSTEM S_MDS
  48
  49 #include <lprocfs_status.h>
  50 #include "mdt_internal.h"
  51 #include <lustre_lmv.h>
  52
  53 static inline void mdt_reint_init_ma(struct mdt_thread_info *info,
  54                                      struct md_attr *ma)
  55 {
  56         ma->ma_need = MA_INODE;
  57         ma->ma_valid = 0;
  58 }
  59
  60 /**
  61  * Get version of object by fid.
  62  *
  63  * Return real version or ENOENT_VERSION if object doesn't exist
  64  */
  65 static void mdt_obj_version_get(struct mdt_thread_info *info,
  66                                 struct mdt_object *o, __u64 *version)
  67 {
  68         LASSERT(o);
  69         if (mdt_object_exists(o) && !mdt_object_remote(o) &&
  70             !fid_is_obf(mdt_object_fid(o)))
  71                 *version = dt_version_get(info->mti_env, mdt_obj2dt(o));
  72         else
  73                 *version = ENOENT_VERSION;
  74         CDEBUG(D_INODE, "FID "DFID" version is "LPX64"\n",
  75                PFID(mdt_object_fid(o)), *version);
  76 }
  77
  78 /**
  79  * Check version is correct.
  80  *
  81  * Should be called only during replay.
  82  */
  83 static int mdt_version_check(struct ptlrpc_request *req,
  84                              __u64 version, int idx)
  85 {
  86         __u64 *pre_ver = lustre_msg_get_versions(req->rq_reqmsg);
  87         ENTRY;
  88
  89         if (!exp_connect_vbr(req->rq_export))
  90                 RETURN(0);
  91
  92         LASSERT(req_is_replay(req));
  93         /** VBR: version is checked always because costs nothing */
  94         LASSERT(idx < PTLRPC_NUM_VERSIONS);
  95         /** Sanity check for malformed buffers */
  96         if (pre_ver == NULL) {
  97                 CERROR("No versions in request buffer\n");
  98                 spin_lock(&req->rq_export->exp_lock);
  99                 req->rq_export->exp_vbr_failed = 1;
 100                 spin_unlock(&req->rq_export->exp_lock);
 101                 RETURN(-EOVERFLOW);
 102         } else if (pre_ver[idx] != version) {
 103                 CDEBUG(D_INODE, "Version mismatch "LPX64" != "LPX64"\n",
 104                        pre_ver[idx], version);
 105                 spin_lock(&req->rq_export->exp_lock);
 106                 req->rq_export->exp_vbr_failed = 1;
 107                 spin_unlock(&req->rq_export->exp_lock);
 108                 RETURN(-EOVERFLOW);
 109         }
 110         RETURN(0);
 111 }
 112
 113 /**
 114  * Save pre-versions in reply.
 115  */
 116 static void mdt_version_save(struct ptlrpc_request *req, __u64 version,
 117                              int idx)
 118 {
 119         __u64 *reply_ver;
 120
 121         if (!exp_connect_vbr(req->rq_export))
 122                 return;
 123
 124         LASSERT(!req_is_replay(req));
 125         LASSERT(req->rq_repmsg != NULL);
 126         reply_ver = lustre_msg_get_versions(req->rq_repmsg);
 127         if (reply_ver)
 128                 reply_ver[idx] = version;
 129 }
 130
 131 /**
 132  * Save enoent version, it is needed when it is obvious that object doesn't
 133  * exist, e.g. child during create.
 134  */
 135 static void mdt_enoent_version_save(struct mdt_thread_info *info, int idx)
 136 {
 137         /* save version of file name for replay, it must be ENOENT here */
 138         if (!req_is_replay(mdt_info_req(info))) {
 139                 info->mti_ver[idx] = ENOENT_VERSION;
 140                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
 141         }
 142 }
 143
 144 /**
 145  * Get version from disk and save in reply buffer.
 146  *
 147  * Versions are saved in reply only during normal operations not replays.
 148  */
 149 void mdt_version_get_save(struct mdt_thread_info *info,
 150                           struct mdt_object *mto, int idx)
 151 {
 152         /* don't save versions during replay */
 153         if (!req_is_replay(mdt_info_req(info))) {
 154                 mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
 155                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
 156         }
 157 }
 158
 159 /**
 160  * Get version from disk and check it, no save in reply.
 161  */
 162 int mdt_version_get_check(struct mdt_thread_info *info,
 163                           struct mdt_object *mto, int idx)
 164 {
 165         /* only check versions during replay */
 166         if (!req_is_replay(mdt_info_req(info)))
 167                 return 0;
 168
 169         mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
 170         return mdt_version_check(mdt_info_req(info), info->mti_ver[idx], idx);
 171 }
 172
 173 /**
 174  * Get version from disk and check if recovery or just save.
 175  */
 176 int mdt_version_get_check_save(struct mdt_thread_info *info,
 177                                struct mdt_object *mto, int idx)
 178 {
 179         int rc = 0;
 180
 181         mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
 182         if (req_is_replay(mdt_info_req(info)))
 183                 rc = mdt_version_check(mdt_info_req(info), info->mti_ver[idx],
 184                                        idx);
 185         else
 186                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
 187         return rc;
 188 }
 189
 190 /**
 191  * Lookup with version checking.
 192  *
 193  * This checks version of 'name'. Many reint functions uses 'name' for child not
 194  * FID, therefore we need to get object by name and check its version.
 195  */
 196 static int mdt_lookup_version_check(struct mdt_thread_info *info,
 197                                     struct mdt_object *p,
 198                                     const struct lu_name *lname,
 199                                     struct lu_fid *fid, int idx)
 200 {
 201         int rc, vbrc;
 202
 203         rc = mdo_lookup(info->mti_env, mdt_object_child(p), lname, fid,
 204                         &info->mti_spec);
 205         /* Check version only during replay */
 206         if (!req_is_replay(mdt_info_req(info)))
 207                 return rc;
 208
 209         info->mti_ver[idx] = ENOENT_VERSION;
 210         if (rc == 0) {
 211                 struct mdt_object *child;
 212                 child = mdt_object_find(info->mti_env, info->mti_mdt, fid);
 213                 if (likely(!IS_ERR(child))) {
 214                         mdt_obj_version_get(info, child, &info->mti_ver[idx]);
 215                         mdt_object_put(info->mti_env, child);
 216                 }
 217         }
 218         vbrc = mdt_version_check(mdt_info_req(info), info->mti_ver[idx], idx);
 219         return vbrc ? vbrc : rc;
 220
 221 }
 222
 223 static inline int mdt_remote_permission_check(struct mdt_thread_info *info)
 224 {
 225         struct lu_ucred *uc  = mdt_ucred(info);
 226         struct mdt_device *mdt = info->mti_mdt;
 227
 228         if (!md_capable(uc, CFS_CAP_SYS_ADMIN)) {
 229                 if (uc->uc_gid != mdt->mdt_enable_remote_dir_gid &&
 230                     mdt->mdt_enable_remote_dir_gid != -1)
 231                         return -EPERM;
 232         }
 233
 234         return 0;
 235 }
 236
 237 /**
 238  * mdt_remote_permission: Check whether the remote operation is permitted,
 239  *
 240  * Only sysadmin can create remote directory / striped directory,
 241  * migrate directory and set default stripedEA on directory, unless
 242  *
 243  * lctl set_param mdt.*.enable_remote_dir_gid=allow_gid.
 244  *
 245  * param[in] info: mdt_thread_info.
 246  *
 247  * retval       = 0 remote operation is allowed.
 248  *              < 0 remote operation is denied.
 249  */
 250 static int mdt_remote_permission(struct mdt_thread_info *info)
 251 {
 252         struct md_op_spec *spec = &info->mti_spec;
 253         struct lu_attr *attr = &info->mti_attr.ma_attr;
 254         struct obd_export *exp = mdt_info_req(info)->rq_export;
 255         int rc;
 256
 257         if (info->mti_rr.rr_opcode == REINT_MIGRATE) {
 258                 rc = mdt_remote_permission_check(info);
 259                 if (rc != 0)
 260                         return rc;
 261         }
 262
 263         if (info->mti_rr.rr_opcode == REINT_CREATE &&
 264             (S_ISDIR(attr->la_mode) && spec->u.sp_ea.eadata != NULL &&
 265              spec->u.sp_ea.eadatalen != 0)) {
 266                 const struct lmv_user_md *lum = spec->u.sp_ea.eadata;
 267
 268                 /* Only new clients can create remote dir( >= 2.4) and
 269                  * striped dir(>= 2.6), old client will return -ENOTSUPP */
 270                 if (!mdt_is_dne_client(exp))
 271                         return -ENOTSUPP;
 272
 273                 if (le32_to_cpu(lum->lum_stripe_count) > 1 &&
 274                     !mdt_is_striped_client(exp))
 275                         return -ENOTSUPP;
 276
 277                 rc = mdt_remote_permission_check(info);
 278                 if (rc != 0)
 279                         return rc;
 280         }
 281
 282         if (info->mti_rr.rr_opcode == REINT_SETATTR) {
 283                 struct md_attr *ma = &info->mti_attr;
 284
 285                 if ((ma->ma_valid & MA_LMV)) {
 286                         rc = mdt_remote_permission_check(info);
 287                         if (rc != 0)
 288                                 return rc;
 289                 }
 290         }
 291
 292         return 0;
 293 }
 294
 295 /*
 296  * VBR: we save three versions in reply:
 297  * 0 - parent. Check that parent version is the same during replay.
 298  * 1 - name. Version of 'name' if file exists with the same name or
 299  * ENOENT_VERSION, it is needed because file may appear due to missed replays.
 300  * 2 - child. Version of child by FID. Must be ENOENT. It is mostly sanity
 301  * check.
 302  */
 303 static int mdt_md_create(struct mdt_thread_info *info)
 304 {
 305         struct mdt_device       *mdt = info->mti_mdt;
 306         struct mdt_object       *parent;
 307         struct mdt_object       *child;
 308         struct mdt_lock_handle  *lh;
 309         struct mdt_body         *repbody;
 310         struct md_attr          *ma = &info->mti_attr;
 311         struct mdt_reint_record *rr = &info->mti_rr;
 312         int rc;
 313         ENTRY;
 314
 315         DEBUG_REQ(D_INODE, mdt_info_req(info), "Create  ("DNAME"->"DFID") "
 316                   "in "DFID,
 317                   PNAME(&rr->rr_name), PFID(rr->rr_fid2), PFID(rr->rr_fid1));
 318
 319         if (!fid_is_md_operative(rr->rr_fid1))
 320                 RETURN(-EPERM);
 321
 322         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
 323
 324         parent = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
 325         if (IS_ERR(parent))
 326                 RETURN(PTR_ERR(parent));
 327
 328         if (!mdt_object_exists(parent))
 329                 GOTO(put_parent, rc = -ENOENT);
 330
 331         lh = &info->mti_lh[MDT_LH_PARENT];
 332         mdt_lock_pdo_init(lh, LCK_PW, &rr->rr_name);
 333         rc = mdt_object_lock(info, parent, lh, MDS_INODELOCK_UPDATE);
 334         if (rc)
 335                 GOTO(put_parent, rc);
 336
 337         if (!mdt_object_remote(parent)) {
 338                 rc = mdt_version_get_check_save(info, parent, 0);
 339                 if (rc)
 340                         GOTO(unlock_parent, rc);
 341         }
 342
 343         /*
 344          * Check child name version during replay.
 345          * During create replay a file may exist with same name.
 346          */
 347         rc = mdt_lookup_version_check(info, parent, &rr->rr_name,
 348                                       &info->mti_tmp_fid1, 1);
 349         if (rc == 0)
 350                 GOTO(unlock_parent, rc = -EEXIST);
 351
 352         /* -ENOENT is expected here */
 353         if (rc != -ENOENT)
 354                 GOTO(unlock_parent, rc);
 355
 356         /* save version of file name for replay, it must be ENOENT here */
 357         mdt_enoent_version_save(info, 1);
 358
 359         child = mdt_object_new(info->mti_env, mdt, rr->rr_fid2);
 360         if (likely(!IS_ERR(child))) {
 361                 struct md_object *next = mdt_object_child(parent);
 362
 363                 rc = mdt_remote_permission(info);
 364                 if (rc != 0)
 365                         GOTO(out_put_child, rc);
 366
 367                 ma->ma_need = MA_INODE;
 368                 ma->ma_valid = 0;
 369
 370                 mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
 371                                OBD_FAIL_MDS_REINT_CREATE_WRITE);
 372
 373                 /* Version of child will be updated on disk. */
 374                 tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(child));
 375                 rc = mdt_version_get_check_save(info, child, 2);
 376                 if (rc)
 377                         GOTO(out_put_child, rc);
 378
 379                 /* Let lower layer know current lock mode. */
 380                 info->mti_spec.sp_cr_mode =
 381                         mdt_dlm_mode2mdl_mode(lh->mlh_pdo_mode);
 382
 383                 /*
 384                  * Do not perform lookup sanity check. We know that name does
 385                  * not exist.
 386                  */
 387                 info->mti_spec.sp_cr_lookup = 0;
 388                 info->mti_spec.sp_feat = &dt_directory_features;
 389
 390                 rc = mdo_create(info->mti_env, next, &rr->rr_name,
 391                                 mdt_object_child(child), &info->mti_spec, ma);
 392                 if (rc == 0)
 393                         rc = mdt_attr_get_complex(info, child, ma);
 394
 395                 if (rc == 0) {
 396                         /* Return fid & attr to client. */
 397                         if (ma->ma_valid & MA_INODE)
 398                                 mdt_pack_attr2body(info, repbody, &ma->ma_attr,
 399                                                    mdt_object_fid(child));
 400                 }
 401 out_put_child:
 402                 mdt_object_put(info->mti_env, child);
 403         } else {
 404                 rc = PTR_ERR(child);
 405         }
 406 unlock_parent:
 407         mdt_object_unlock(info, parent, lh, rc);
 408 put_parent:
 409         mdt_object_put(info->mti_env, parent);
 410         RETURN(rc);
 411 }
 412
 413 static int mdt_unlock_slaves(struct mdt_thread_info *mti,
 414                              struct mdt_object *obj, __u64 ibits,
 415                              struct mdt_lock_handle *s0_lh,
 416                              struct mdt_object *s0_obj,
 417                              struct ldlm_enqueue_info *einfo)
 418 {
 419         union ldlm_policy_data *policy = &mti->mti_policy;
 420         int rc;
 421         ENTRY;
 422
 423         if (!S_ISDIR(obj->mot_header.loh_attr))
 424                 RETURN(0);
 425
 426         /* Unlock stripe 0 */
 427         if (s0_lh != NULL && lustre_handle_is_used(&s0_lh->mlh_reg_lh)) {
 428                 LASSERT(s0_obj != NULL);
 429                 mdt_object_unlock_put(mti, s0_obj, s0_lh, 1);
 430         }
 431
 432         memset(policy, 0, sizeof(*policy));
 433         policy->l_inodebits.bits = ibits;
 434
 435         rc = mo_object_unlock(mti->mti_env, mdt_object_child(obj), einfo,
 436                               policy);
 437         RETURN(rc);
 438 }
 439
 440 /**
 441  * Lock slave stripes if necessary, the lock handles of slave stripes
 442  * will be stored in einfo->ei_cbdata.
 443  **/
 444 static int mdt_lock_slaves(struct mdt_thread_info *mti, struct mdt_object *obj,
 445                            enum ldlm_mode mode, __u64 ibits,
 446                            struct mdt_lock_handle *s0_lh,
 447                            struct mdt_object **s0_objp,
 448                            struct ldlm_enqueue_info *einfo)
 449 {
 450         union ldlm_policy_data *policy = &mti->mti_policy;
 451         struct lu_buf *buf = &mti->mti_buf;
 452         struct lmv_mds_md_v1 *lmv;
 453         struct lu_fid *fid = &mti->mti_tmp_fid1;
 454         int rc;
 455         ENTRY;
 456
 457         if (!S_ISDIR(obj->mot_header.loh_attr))
 458                 RETURN(0);
 459
 460         buf->lb_buf = mti->mti_xattr_buf;
 461         buf->lb_len = sizeof(mti->mti_xattr_buf);
 462         rc = mo_xattr_get(mti->mti_env, mdt_object_child(obj), buf,
 463                           XATTR_NAME_LMV);
 464         if (rc == -ERANGE) {
 465                 rc = mdt_big_xattr_get(mti, obj, XATTR_NAME_LMV);
 466                 if (rc > 0) {
 467                         buf->lb_buf = mti->mti_big_lmm;
 468                         buf->lb_len = mti->mti_big_lmmsize;
 469                 }
 470         }
 471
 472         if (rc == -ENODATA || rc == -ENOENT)
 473                 RETURN(0);
 474
 475         if (rc <= 0)
 476                 RETURN(rc);
 477
 478         lmv = buf->lb_buf;
 479         if (le32_to_cpu(lmv->lmv_magic) != LMV_MAGIC_V1)
 480                 RETURN(-EINVAL);
 481
 482         fid_le_to_cpu(fid, &lmv->lmv_stripe_fids[0]);
 483         if (!lu_fid_eq(fid, mdt_object_fid(obj))) {
 484                 /* Except migrating object, whose 0_stripe and master
 485                  * object are the same object, 0_stripe and master
 486                  * object are different, though they are in the same
 487                  * MDT, to avoid adding osd_object_lock here, so we
 488                  * will enqueue the stripe0 lock in MDT0 for now */
 489                 *s0_objp = mdt_object_find_lock(mti, fid, s0_lh, ibits);
 490                 if (IS_ERR(*s0_objp))
 491                         RETURN(PTR_ERR(*s0_objp));
 492         }
 493
 494         memset(einfo, 0, sizeof(*einfo));
 495         einfo->ei_type = LDLM_IBITS;
 496         einfo->ei_mode = mode;
 497         einfo->ei_cb_bl = mdt_remote_blocking_ast;
 498         einfo->ei_cb_local_bl = mdt_blocking_ast;
 499         einfo->ei_cb_cp = ldlm_completion_ast;
 500         einfo->ei_enq_slave = 1;
 501         einfo->ei_namespace = mti->mti_mdt->mdt_namespace;
 502         memset(policy, 0, sizeof(*policy));
 503         policy->l_inodebits.bits = ibits;
 504
 505         rc = mo_object_lock(mti->mti_env, mdt_object_child(obj), NULL, einfo,
 506                             policy);
 507         RETURN(rc);
 508 }
 509
 510 static int mdt_attr_set(struct mdt_thread_info *info, struct mdt_object *mo,
 511                         struct md_attr *ma)
 512 {
 513         struct mdt_lock_handle  *lh;
 514         int do_vbr = ma->ma_attr.la_valid & (LA_MODE|LA_UID|LA_GID|LA_FLAGS);
 515         __u64 lockpart = MDS_INODELOCK_UPDATE;
 516         struct ldlm_enqueue_info *einfo = &info->mti_einfo;
 517         struct mdt_lock_handle  *s0_lh;
 518         struct mdt_object       *s0_obj = NULL;
 519         int rc;
 520         ENTRY;
 521
 522         lh = &info->mti_lh[MDT_LH_PARENT];
 523         mdt_lock_reg_init(lh, LCK_PW);
 524
 525         /* Even though the new MDT will grant PERM lock to the old
 526          * client, but the old client will almost ignore that during
 527          * So it needs to revoke both LOOKUP and PERM lock here, so
 528          * both new and old client can cancel the dcache */
 529         if (ma->ma_attr.la_valid & (LA_MODE|LA_UID|LA_GID))
 530                 lockpart |= MDS_INODELOCK_LOOKUP | MDS_INODELOCK_PERM;
 531
 532         rc = mdt_object_lock(info, mo, lh, lockpart);
 533         if (rc != 0)
 534                 RETURN(rc);
 535
 536         s0_lh = &info->mti_lh[MDT_LH_LOCAL];
 537         mdt_lock_reg_init(s0_lh, LCK_PW);
 538         rc = mdt_lock_slaves(info, mo, LCK_PW, lockpart, s0_lh, &s0_obj, einfo);
 539         if (rc != 0)
 540                 GOTO(out_unlock, rc);
 541
 542         /* all attrs are packed into mti_attr in unpack_setattr */
 543         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
 544                        OBD_FAIL_MDS_REINT_SETATTR_WRITE);
 545
 546         /* This is only for set ctime when rename's source is on remote MDS. */
 547         if (unlikely(ma->ma_attr.la_valid == LA_CTIME))
 548                 ma->ma_attr_flags |= MDS_VTX_BYPASS;
 549
 550         /* VBR: update version if attr changed are important for recovery */
 551         if (do_vbr) {
 552                 /* update on-disk version of changed object */
 553                 tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(mo));
 554                 rc = mdt_version_get_check_save(info, mo, 0);
 555                 if (rc)
 556                         GOTO(out_unlock, rc);
 557         }
 558
 559         /* Ensure constant striping during chown(). See LU-2789. */
 560         if (ma->ma_attr.la_valid & (LA_UID|LA_GID))
 561                 mutex_lock(&mo->mot_lov_mutex);
 562
 563         /* all attrs are packed into mti_attr in unpack_setattr */
 564         rc = mo_attr_set(info->mti_env, mdt_object_child(mo), ma);
 565
 566         if (ma->ma_attr.la_valid & (LA_UID|LA_GID))
 567                 mutex_unlock(&mo->mot_lov_mutex);
 568
 569         if (rc != 0)
 570                 GOTO(out_unlock, rc);
 571
 572         EXIT;
 573 out_unlock:
 574         mdt_unlock_slaves(info, mo, lockpart, s0_lh, s0_obj, einfo);
 575         mdt_object_unlock(info, mo, lh, rc);
 576         return rc;
 577 }
 578
 579 /**
 580  * Check HSM flags and add HS_DIRTY flag if relevant.
 581  *
 582  * A file could be set dirty only if it has a copy in the backend (HS_EXISTS)
 583  * and is not RELEASED.
 584  */
 585 int mdt_add_dirty_flag(struct mdt_thread_info *info, struct mdt_object *mo,
 586                         struct md_attr *ma)
 587 {
 588         int rc;
 589         ENTRY;
 590
 591         /* If the file was modified, add the dirty flag */
 592         ma->ma_need = MA_HSM;
 593         rc = mdt_attr_get_complex(info, mo, ma);
 594         if (rc) {
 595                 CERROR("file attribute read error for "DFID": %d.\n",
 596                         PFID(mdt_object_fid(mo)), rc);
 597                 RETURN(rc);
 598         }
 599
 600         /* If an up2date copy exists in the backend, add dirty flag */
 601         if ((ma->ma_valid & MA_HSM) && (ma->ma_hsm.mh_flags & HS_EXISTS)
 602             && !(ma->ma_hsm.mh_flags & (HS_DIRTY|HS_RELEASED))) {
 603                 struct mdt_lock_handle  *lh = &info->mti_lh[MDT_LH_CHILD];
 604
 605                 ma->ma_hsm.mh_flags |= HS_DIRTY;
 606
 607                 mdt_lock_reg_init(lh, LCK_PW);
 608                 rc = mdt_object_lock(info, mo, lh, MDS_INODELOCK_XATTR);
 609                 if (rc != 0)
 610                         RETURN(rc);
 611
 612                 rc = mdt_hsm_attr_set(info, mo, &ma->ma_hsm);
 613                 if (rc)
 614                         CERROR("file attribute change error for "DFID": %d\n",
 615                                 PFID(mdt_object_fid(mo)), rc);
 616                 mdt_object_unlock(info, mo, lh, rc);
 617         }
 618
 619         RETURN(rc);
 620 }
 621
 622 static int mdt_reint_setattr(struct mdt_thread_info *info,
 623                              struct mdt_lock_handle *lhc)
 624 {
 625         struct md_attr          *ma = &info->mti_attr;
 626         struct mdt_reint_record *rr = &info->mti_rr;
 627         struct ptlrpc_request   *req = mdt_info_req(info);
 628         struct mdt_object       *mo;
 629         struct mdt_body         *repbody;
 630         int                      rc, rc2;
 631         ENTRY;
 632
 633         DEBUG_REQ(D_INODE, req, "setattr "DFID" %x", PFID(rr->rr_fid1),
 634                   (unsigned int)ma->ma_attr.la_valid);
 635
 636         if (info->mti_dlm_req)
 637                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
 638
 639         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
 640         mo = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
 641         if (IS_ERR(mo))
 642                 GOTO(out, rc = PTR_ERR(mo));
 643
 644         if (!mdt_object_exists(mo))
 645                 GOTO(out_put, rc = -ENOENT);
 646
 647         if (mdt_object_remote(mo))
 648                 GOTO(out_put, rc = -EREMOTE);
 649
 650         if ((ma->ma_attr.la_valid & LA_SIZE) ||
 651             (rr->rr_flags & MRF_OPEN_TRUNC)) {
 652                 /* Check write access for the O_TRUNC case */
 653                 if (mdt_write_read(mo) < 0)
 654                         GOTO(out_put, rc = -ETXTBSY);
 655         }
 656
 657         if ((ma->ma_valid & MA_INODE) && ma->ma_attr.la_valid) {
 658                 if (ma->ma_valid & MA_LOV)
 659                         GOTO(out_put, rc = -EPROTO);
 660
 661                 rc = mdt_attr_set(info, mo, ma);
 662                 if (rc)
 663                         GOTO(out_put, rc);
 664         } else if ((ma->ma_valid & MA_LOV) && (ma->ma_valid & MA_INODE)) {
 665                 struct lu_buf *buf  = &info->mti_buf;
 666
 667                 if (ma->ma_attr.la_valid != 0)
 668                         GOTO(out_put, rc = -EPROTO);
 669
 670                 buf->lb_buf = ma->ma_lmm;
 671                 buf->lb_len = ma->ma_lmm_size;
 672                 rc = mo_xattr_set(info->mti_env, mdt_object_child(mo),
 673                                   buf, XATTR_NAME_LOV, 0);
 674                 if (rc)
 675                         GOTO(out_put, rc);
 676         } else if ((ma->ma_valid & MA_LMV) && (ma->ma_valid & MA_INODE)) {
 677                 struct lu_buf *buf  = &info->mti_buf;
 678                 struct mdt_lock_handle  *lh;
 679
 680                 rc = mdt_remote_permission(info);
 681                 if (rc < 0)
 682                         GOTO(out_put, rc);
 683
 684                 if (ma->ma_attr.la_valid != 0)
 685                         GOTO(out_put, rc = -EPROTO);
 686
 687                 lh = &info->mti_lh[MDT_LH_PARENT];
 688                 mdt_lock_reg_init(lh, LCK_PW);
 689
 690                 rc = mdt_object_lock(info, mo, lh,
 691                                      MDS_INODELOCK_XATTR);
 692                 if (rc != 0)
 693                         GOTO(out_put, rc);
 694
 695                 buf->lb_buf = ma->ma_lmv;
 696                 buf->lb_len = ma->ma_lmv_size;
 697                 rc = mo_xattr_set(info->mti_env, mdt_object_child(mo),
 698                                   buf, XATTR_NAME_DEFAULT_LMV, 0);
 699
 700                 mdt_object_unlock(info, mo, lh, rc);
 701                 if (rc)
 702                         GOTO(out_put, rc);
 703         } else {
 704                 GOTO(out_put, rc = -EPROTO);
 705         }
 706
 707         /* If file data is modified, add the dirty flag */
 708         if (ma->ma_attr_flags & MDS_DATA_MODIFIED)
 709                 rc = mdt_add_dirty_flag(info, mo, ma);
 710
 711         ma->ma_need = MA_INODE;
 712         ma->ma_valid = 0;
 713         rc = mdt_attr_get_complex(info, mo, ma);
 714         if (rc != 0)
 715                 GOTO(out_put, rc);
 716
 717         mdt_pack_attr2body(info, repbody, &ma->ma_attr, mdt_object_fid(mo));
 718
 719         EXIT;
 720 out_put:
 721         mdt_object_put(info->mti_env, mo);
 722 out:
 723         if (rc == 0)
 724                 mdt_counter_incr(req, LPROC_MDT_SETATTR);
 725
 726         mdt_client_compatibility(info);
 727         rc2 = mdt_fix_reply(info);
 728         if (rc == 0)
 729                 rc = rc2;
 730         return rc;
 731 }
 732
 733 static int mdt_reint_create(struct mdt_thread_info *info,
 734                             struct mdt_lock_handle *lhc)
 735 {
 736         struct ptlrpc_request   *req = mdt_info_req(info);
 737         int                     rc;
 738         ENTRY;
 739
 740         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_CREATE))
 741                 RETURN(err_serious(-ESTALE));
 742
 743         if (info->mti_dlm_req)
 744                 ldlm_request_cancel(mdt_info_req(info),
 745                                     info->mti_dlm_req, 0, LATF_SKIP);
 746
 747         if (!lu_name_is_valid(&info->mti_rr.rr_name))
 748                 RETURN(-EPROTO);
 749
 750         switch (info->mti_attr.ma_attr.la_mode & S_IFMT) {
 751         case S_IFDIR:
 752                 mdt_counter_incr(req, LPROC_MDT_MKDIR);
 753                 break;
 754         case S_IFREG:
 755         case S_IFLNK:
 756         case S_IFCHR:
 757         case S_IFBLK:
 758         case S_IFIFO:
 759         case S_IFSOCK:
 760                 /* Special file should stay on the same node as parent. */
 761                 mdt_counter_incr(req, LPROC_MDT_MKNOD);
 762                 break;
 763         default:
 764                 CERROR("%s: Unsupported mode %o\n",
 765                        mdt_obd_name(info->mti_mdt),
 766                        info->mti_attr.ma_attr.la_mode);
 767                 RETURN(err_serious(-EOPNOTSUPP));
 768         }
 769
 770         rc = mdt_md_create(info);
 771         RETURN(rc);
 772 }
 773
 774 /*
 775  * VBR: save parent version in reply and child version getting by its name.
 776  * Version of child is getting and checking during its lookup. If
 777  */
 778 static int mdt_reint_unlink(struct mdt_thread_info *info,
 779                             struct mdt_lock_handle *lhc)
 780 {
 781         struct mdt_reint_record *rr = &info->mti_rr;
 782         struct ptlrpc_request   *req = mdt_info_req(info);
 783         struct md_attr          *ma = &info->mti_attr;
 784         struct lu_fid           *child_fid = &info->mti_tmp_fid1;
 785         struct mdt_object       *mp;
 786         struct mdt_object       *mc;
 787         struct mdt_lock_handle  *parent_lh;
 788         struct mdt_lock_handle  *child_lh;
 789         struct ldlm_enqueue_info *einfo = &info->mti_einfo;
 790         struct mdt_lock_handle  *s0_lh = NULL;
 791         struct mdt_object       *s0_obj = NULL;
 792         __u64                   lock_ibits;
 793         int                     rc;
 794         int                     no_name = 0;
 795         ENTRY;
 796
 797         DEBUG_REQ(D_INODE, req, "unlink "DFID"/"DNAME"", PFID(rr->rr_fid1),
 798                   PNAME(&rr->rr_name));
 799
 800         if (info->mti_dlm_req)
 801                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
 802
 803         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_UNLINK))
 804                 RETURN(err_serious(-ENOENT));
 805
 806         if (!fid_is_md_operative(rr->rr_fid1))
 807                 RETURN(-EPERM);
 808
 809         /*
 810          * step 1: Found the parent.
 811          */
 812         mp = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
 813         if (IS_ERR(mp)) {
 814                 rc = PTR_ERR(mp);
 815                 GOTO(out, rc);
 816         }
 817
 818         parent_lh = &info->mti_lh[MDT_LH_PARENT];
 819         mdt_lock_pdo_init(parent_lh, LCK_PW, &rr->rr_name);
 820         rc = mdt_object_lock(info, mp, parent_lh, MDS_INODELOCK_UPDATE);
 821         if (rc != 0)
 822                 GOTO(put_parent, rc);
 823
 824         if (!mdt_object_remote(mp)) {
 825                 rc = mdt_version_get_check_save(info, mp, 0);
 826                 if (rc)
 827                         GOTO(unlock_parent, rc);
 828         }
 829
 830         /* step 2: find & lock the child */
 831         /* lookup child object along with version checking */
 832         fid_zero(child_fid);
 833         rc = mdt_lookup_version_check(info, mp, &rr->rr_name, child_fid, 1);
 834         if (rc != 0) {
 835                 /* Name might not be able to find during resend of
 836                  * remote unlink, considering following case.
 837                  * dir_A is a remote directory, the name entry of
 838                  * dir_A is on MDT0, the directory is on MDT1,
 839                  *
 840                  * 1. client sends unlink req to MDT1.
 841                  * 2. MDT1 sends name delete update to MDT0.
 842                  * 3. name entry is being deleted in MDT0 synchronously.
 843                  * 4. MDT1 is restarted.
 844                  * 5. client resends unlink req to MDT1. So it can not
 845                  *    find the name entry on MDT0 anymore.
 846                  * In this case, MDT1 only needs to destory the local
 847                  * directory.
 848                  * */
 849                 if (mdt_object_remote(mp) && rc == -ENOENT &&
 850                     !fid_is_zero(rr->rr_fid2) &&
 851                     lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT) {
 852                         no_name = 1;
 853                         *child_fid = *rr->rr_fid2;
 854                  } else {
 855                         GOTO(unlock_parent, rc);
 856                  }
 857         }
 858
 859         if (!fid_is_md_operative(child_fid))
 860                 GOTO(unlock_parent, rc = -EPERM);
 861
 862         /* We will lock the child regardless it is local or remote. No harm. */
 863         mc = mdt_object_find(info->mti_env, info->mti_mdt, child_fid);
 864         if (IS_ERR(mc))
 865                 GOTO(unlock_parent, rc = PTR_ERR(mc));
 866
 867         child_lh = &info->mti_lh[MDT_LH_CHILD];
 868         mdt_lock_reg_init(child_lh, LCK_EX);
 869         if (info->mti_spec.sp_rm_entry) {
 870                 struct lu_ucred *uc  = mdt_ucred(info);
 871
 872                 if (!mdt_is_dne_client(req->rq_export))
 873                         /* Return -ENOTSUPP for old client */
 874                         GOTO(put_child, rc = -ENOTSUPP);
 875
 876                 if (!md_capable(uc, CFS_CAP_SYS_ADMIN))
 877                         GOTO(put_child, rc = -EPERM);
 878
 879                 ma->ma_need = MA_INODE;
 880                 ma->ma_valid = 0;
 881                 rc = mdo_unlink(info->mti_env, mdt_object_child(mp),
 882                                 NULL, &rr->rr_name, ma, no_name);
 883                 GOTO(put_child, rc);
 884         }
 885
 886         if (mdt_object_remote(mc)) {
 887                 struct mdt_body  *repbody;
 888
 889                 if (!fid_is_zero(rr->rr_fid2)) {
 890                         CDEBUG(D_INFO, "%s: name "DNAME" cannot find "DFID"\n",
 891                                mdt_obd_name(info->mti_mdt),
 892                                PNAME(&rr->rr_name), PFID(mdt_object_fid(mc)));
 893                         GOTO(put_child, rc = -ENOENT);
 894                 }
 895                 CDEBUG(D_INFO, "%s: name "DNAME": "DFID" is on another MDT\n",
 896                        mdt_obd_name(info->mti_mdt),
 897                        PNAME(&rr->rr_name), PFID(mdt_object_fid(mc)));
 898
 899                 if (!mdt_is_dne_client(req->rq_export))
 900                         /* Return -ENOTSUPP for old client */
 901                         GOTO(put_child, rc = -ENOTSUPP);
 902
 903                 /* Revoke the LOOKUP lock of the remote object granted by
 904                  * this MDT. Since the unlink will happen on another MDT,
 905                  * it will release the LOOKUP lock right away. Then What
 906                  * would happen if another client try to grab the LOOKUP
 907                  * lock at the same time with unlink XXX */
 908                 mdt_object_lock(info, mc, child_lh, MDS_INODELOCK_LOOKUP);
 909                 repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
 910                 LASSERT(repbody != NULL);
 911                 repbody->mbo_fid1 = *mdt_object_fid(mc);
 912                 repbody->mbo_valid |= (OBD_MD_FLID | OBD_MD_MDS);
 913                 GOTO(unlock_child, rc = -EREMOTE);
 914         }
 915         /* We used to acquire MDS_INODELOCK_FULL here but we can't do
 916          * this now because a running HSM restore on the child (unlink
 917          * victim) will hold the layout lock. See LU-4002. */
 918         lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE;
 919         if (mdt_object_remote(mp)) {
 920                 /* Enqueue lookup lock from parent MDT */
 921                 rc = mdt_remote_object_lock(info, mp, mdt_object_fid(mc),
 922                                             &child_lh->mlh_rreg_lh,
 923                                             child_lh->mlh_rreg_mode,
 924                                             MDS_INODELOCK_LOOKUP, false);
 925                 if (rc != ELDLM_OK)
 926                         GOTO(put_child, rc);
 927
 928                 lock_ibits &= ~MDS_INODELOCK_LOOKUP;
 929         }
 930
 931         rc = mdt_object_lock(info, mc, child_lh, lock_ibits);
 932         if (rc != 0)
 933                 GOTO(put_child, rc);
 934         /*
 935          * Now we can only make sure we need MA_INODE, in mdd layer, will check
 936          * whether need MA_LOV and MA_COOKIE.
 937          */
 938         ma->ma_need = MA_INODE;
 939         ma->ma_valid = 0;
 940
 941         s0_lh = &info->mti_lh[MDT_LH_LOCAL];
 942         mdt_lock_reg_init(s0_lh, LCK_EX);
 943         rc = mdt_lock_slaves(info, mc, LCK_EX, MDS_INODELOCK_UPDATE, s0_lh,
 944                              &s0_obj, einfo);
 945         if (rc != 0)
 946                 GOTO(unlock_child, rc);
 947
 948         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
 949                        OBD_FAIL_MDS_REINT_UNLINK_WRITE);
 950         /* save version when object is locked */
 951         mdt_version_get_save(info, mc, 1);
 952
 953         mutex_lock(&mc->mot_lov_mutex);
 954
 955         rc = mdo_unlink(info->mti_env, mdt_object_child(mp),
 956                         mdt_object_child(mc), &rr->rr_name, ma, no_name);
 957
 958         mutex_unlock(&mc->mot_lov_mutex);
 959
 960         if (rc == 0 && !lu_object_is_dying(&mc->mot_header))
 961                 rc = mdt_attr_get_complex(info, mc, ma);
 962         if (rc == 0)
 963                 mdt_handle_last_unlink(info, mc, ma);
 964
 965         if (ma->ma_valid & MA_INODE) {
 966                 switch (ma->ma_attr.la_mode & S_IFMT) {
 967                 case S_IFDIR:
 968                         mdt_counter_incr(req, LPROC_MDT_RMDIR);
 969                         break;
 970                 case S_IFREG:
 971                 case S_IFLNK:
 972                 case S_IFCHR:
 973                 case S_IFBLK:
 974                 case S_IFIFO:
 975                 case S_IFSOCK:
 976                         mdt_counter_incr(req, LPROC_MDT_UNLINK);
 977                         break;
 978                 default:
 979                         LASSERTF(0, "bad file type %o unlinking\n",
 980                                  ma->ma_attr.la_mode);
 981                 }
 982         }
 983
 984         EXIT;
 985
 986 unlock_child:
 987         mdt_unlock_slaves(info, mc, MDS_INODELOCK_UPDATE, s0_lh, s0_obj, einfo);
 988         mdt_object_unlock(info, mc, child_lh, rc);
 989 put_child:
 990         mdt_object_put(info->mti_env, mc);
 991 unlock_parent:
 992         mdt_object_unlock(info, mp, parent_lh, rc);
 993 put_parent:
 994         mdt_object_put(info->mti_env, mp);
 995 out:
 996         return rc;
 997 }
 998
 999 /*
1000  * VBR: save versions in reply: 0 - parent; 1 - child by fid; 2 - target by
1001  * name.
1002  */
1003 static int mdt_reint_link(struct mdt_thread_info *info,
1004                           struct mdt_lock_handle *lhc)
1005 {
1006         struct mdt_reint_record *rr = &info->mti_rr;
1007         struct ptlrpc_request   *req = mdt_info_req(info);
1008         struct md_attr          *ma = &info->mti_attr;
1009         struct mdt_object       *ms;
1010         struct mdt_object       *mp;
1011         struct mdt_lock_handle  *lhs;
1012         struct mdt_lock_handle  *lhp;
1013         int rc;
1014         ENTRY;
1015
1016         DEBUG_REQ(D_INODE, req, "link "DFID" to "DFID"/"DNAME,
1017                   PFID(rr->rr_fid1), PFID(rr->rr_fid2), PNAME(&rr->rr_name));
1018
1019         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_LINK))
1020                 RETURN(err_serious(-ENOENT));
1021
1022         if (info->mti_dlm_req)
1023                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
1024
1025         /* Invalid case so return error immediately instead of
1026          * processing it */
1027         if (lu_fid_eq(rr->rr_fid1, rr->rr_fid2))
1028                 RETURN(-EPERM);
1029
1030         if (!fid_is_md_operative(rr->rr_fid1) ||
1031             !fid_is_md_operative(rr->rr_fid2))
1032                 RETURN(-EPERM);
1033
1034         /* step 1: find & lock the target parent dir */
1035         lhp = &info->mti_lh[MDT_LH_PARENT];
1036         mdt_lock_pdo_init(lhp, LCK_PW, &rr->rr_name);
1037         mp = mdt_object_find_lock(info, rr->rr_fid2, lhp,
1038                                   MDS_INODELOCK_UPDATE);
1039         if (IS_ERR(mp))
1040                 RETURN(PTR_ERR(mp));
1041
1042         rc = mdt_version_get_check_save(info, mp, 0);
1043         if (rc)
1044                 GOTO(out_unlock_parent, rc);
1045
1046         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME3, 5);
1047
1048         /* step 2: find & lock the source */
1049         lhs = &info->mti_lh[MDT_LH_CHILD];
1050         mdt_lock_reg_init(lhs, LCK_EX);
1051
1052         ms = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
1053         if (IS_ERR(ms))
1054                 GOTO(out_unlock_parent, rc = PTR_ERR(ms));
1055
1056         if (!mdt_object_exists(ms)) {
1057                 mdt_object_put(info->mti_env, ms);
1058                 CDEBUG(D_INFO, "%s: "DFID" does not exist.\n",
1059                        mdt_obd_name(info->mti_mdt), PFID(rr->rr_fid1));
1060                 GOTO(out_unlock_parent, rc = -ENOENT);
1061         }
1062
1063         rc = mdt_object_lock(info, ms, lhs, MDS_INODELOCK_UPDATE |
1064                              MDS_INODELOCK_XATTR);
1065         if (rc != 0) {
1066                 mdt_object_put(info->mti_env, ms);
1067                 GOTO(out_unlock_parent, rc);
1068         }
1069
1070         /* step 3: link it */
1071         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
1072                        OBD_FAIL_MDS_REINT_LINK_WRITE);
1073
1074         tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(ms));
1075         rc = mdt_version_get_check_save(info, ms, 1);
1076         if (rc)
1077                 GOTO(out_unlock_child, rc);
1078
1079         /** check target version by name during replay */
1080         rc = mdt_lookup_version_check(info, mp, &rr->rr_name,
1081                                       &info->mti_tmp_fid1, 2);
1082         if (rc != 0 && rc != -ENOENT)
1083                 GOTO(out_unlock_child, rc);
1084         /* save version of file name for replay, it must be ENOENT here */
1085         if (!req_is_replay(mdt_info_req(info))) {
1086                 if (rc != -ENOENT) {
1087                         CDEBUG(D_INFO, "link target "DNAME" existed!\n",
1088                                PNAME(&rr->rr_name));
1089                         GOTO(out_unlock_child, rc = -EEXIST);
1090                 }
1091                 info->mti_ver[2] = ENOENT_VERSION;
1092                 mdt_version_save(mdt_info_req(info), info->mti_ver[2], 2);
1093         }
1094
1095         rc = mdo_link(info->mti_env, mdt_object_child(mp),
1096               mdt_object_child(ms), &rr->rr_name, ma);
1097
1098         if (rc == 0)
1099                 mdt_counter_incr(req, LPROC_MDT_LINK);
1100
1101         EXIT;
1102 out_unlock_child:
1103         mdt_object_unlock_put(info, ms, lhs, rc);
1104 out_unlock_parent:
1105         mdt_object_unlock_put(info, mp, lhp, rc);
1106         return rc;
1107 }
1108 /**
1109  * lock the part of the directory according to the hash of the name
1110  * (lh->mlh_pdo_hash) in parallel directory lock.
1111  */
1112 static int mdt_pdir_hash_lock(struct mdt_thread_info *info,
1113                               struct mdt_lock_handle *lh,
1114                               struct mdt_object *obj, __u64 ibits)
1115 {
1116         struct ldlm_res_id *res = &info->mti_res_id;
1117         struct ldlm_namespace *ns = info->mti_mdt->mdt_namespace;
1118         union ldlm_policy_data *policy = &info->mti_policy;
1119         int rc;
1120
1121         /*
1122          * Finish res_id initializing by name hash marking part of
1123          * directory which is taking modification.
1124          */
1125         LASSERT(lh->mlh_pdo_hash != 0);
1126         fid_build_pdo_res_name(mdt_object_fid(obj), lh->mlh_pdo_hash, res);
1127         memset(policy, 0, sizeof(*policy));
1128         policy->l_inodebits.bits = ibits;
1129         /*
1130          * Use LDLM_FL_LOCAL_ONLY for this lock. We do not know yet if it is
1131          * going to be sent to client. If it is - mdt_intent_policy() path will
1132          * fix it up and turn FL_LOCAL flag off.
1133          */
1134         rc = mdt_fid_lock(ns, &lh->mlh_reg_lh, lh->mlh_reg_mode, policy,
1135                           res, LDLM_FL_LOCAL_ONLY | LDLM_FL_ATOMIC_CB,
1136                           &info->mti_exp->exp_handle.h_cookie);
1137         return rc;
1138 }
1139
1140 /**
1141  * Get BFL lock for rename or migrate process.
1142  **/
1143 static int mdt_rename_lock(struct mdt_thread_info *info,
1144                            struct lustre_handle *lh)
1145 {
1146         int     rc;
1147         ENTRY;
1148
1149         if (mdt_seq_site(info->mti_mdt)->ss_node_id != 0) {
1150                 struct lu_fid *fid = &info->mti_tmp_fid1;
1151                 struct mdt_object *obj;
1152
1153                 /* XXX, right now, it has to use object API to
1154                  * enqueue lock cross MDT, so it will enqueue
1155                  * rename lock(with LUSTRE_BFL_FID) by root object */
1156                 lu_root_fid(fid);
1157                 obj = mdt_object_find(info->mti_env, info->mti_mdt, fid);
1158                 if (IS_ERR(obj))
1159                         RETURN(PTR_ERR(obj));
1160
1161                 rc = mdt_remote_object_lock(info, obj,
1162                                             &LUSTRE_BFL_FID, lh,
1163                                             LCK_EX,
1164                                             MDS_INODELOCK_UPDATE, false);
1165                 mdt_object_put(info->mti_env, obj);
1166         } else {
1167                 struct ldlm_namespace *ns = info->mti_mdt->mdt_namespace;
1168                 union ldlm_policy_data *policy = &info->mti_policy;
1169                 struct ldlm_res_id *res_id = &info->mti_res_id;
1170                 __u64 flags = 0;
1171
1172                 fid_build_reg_res_name(&LUSTRE_BFL_FID, res_id);
1173                 memset(policy, 0, sizeof *policy);
1174                 policy->l_inodebits.bits = MDS_INODELOCK_UPDATE;
1175                 flags = LDLM_FL_LOCAL_ONLY | LDLM_FL_ATOMIC_CB;
1176                 rc = ldlm_cli_enqueue_local(ns, res_id, LDLM_IBITS, policy,
1177                                            LCK_EX, &flags, ldlm_blocking_ast,
1178                                            ldlm_completion_ast, NULL, NULL, 0,
1179                                            LVB_T_NONE,
1180                                            &info->mti_exp->exp_handle.h_cookie,
1181                                            lh);
1182                 RETURN(rc);
1183         }
1184         RETURN(rc);
1185 }
1186
1187 static void mdt_rename_unlock(struct lustre_handle *lh)
1188 {
1189         ENTRY;
1190         LASSERT(lustre_handle_is_used(lh));
1191         /* Cancel the single rename lock right away */
1192         ldlm_lock_decref_and_cancel(lh, LCK_EX);
1193         EXIT;
1194 }
1195
1196 /*
1197  * This is is_subdir() variant, it is CMD if cmm forwards it to correct
1198  * target. Source should not be ancestor of target dir. May be other rename
1199  * checks can be moved here later.
1200  */
1201 static int mdt_is_subdir(struct mdt_thread_info *info,
1202                          struct mdt_object *dir,
1203                          const struct lu_fid *fid)
1204 {
1205         struct lu_fid dir_fid = dir->mot_header.loh_fid;
1206         int rc = 0;
1207         ENTRY;
1208
1209         /* If the source and target are in the same directory, they can not
1210          * be parent/child relationship, so subdir check is not needed */
1211         if (lu_fid_eq(&dir_fid, fid))
1212                 return 0;
1213
1214         if (!mdt_object_exists(dir))
1215                 RETURN(-ENOENT);
1216
1217         rc = mdo_is_subdir(info->mti_env, mdt_object_child(dir),
1218                            fid, &dir_fid);
1219         if (rc < 0) {
1220                 CERROR("%s: failed subdir check in "DFID" for "DFID
1221                        ": rc = %d\n", mdt_obd_name(info->mti_mdt),
1222                        PFID(&dir_fid), PFID(fid), rc);
1223                 /* Return EINVAL only if a parent is the @fid */
1224                 if (rc == -EINVAL)
1225                         rc = -EIO;
1226         } else {
1227                 /* check the found fid */
1228                 if (lu_fid_eq(&dir_fid, fid))
1229                         rc = -EINVAL;
1230         }
1231
1232         RETURN(rc);
1233 }
1234
1235 /* Update object linkEA */
1236 struct mdt_lock_list {
1237         struct mdt_object       *mll_obj;
1238         struct mdt_lock_handle  mll_lh;
1239         struct list_head        mll_list;
1240 };
1241
1242 static void mdt_unlock_list(struct mdt_thread_info *info,
1243                             struct list_head *list, int rc)
1244 {
1245         struct mdt_lock_list *mll;
1246         struct mdt_lock_list *mll2;
1247
1248         list_for_each_entry_safe(mll, mll2, list, mll_list) {
1249                 mdt_object_unlock_put(info, mll->mll_obj, &mll->mll_lh, rc);
1250                 list_del(&mll->mll_list);
1251                 OBD_FREE_PTR(mll);
1252         }
1253 }
1254
1255 static int mdt_lock_objects_in_linkea(struct mdt_thread_info *info,
1256                                       struct mdt_object *obj,
1257                                       struct mdt_object *pobj,
1258                                       struct list_head *lock_list)
1259 {
1260         struct lu_buf           *buf = &info->mti_big_buf;
1261         struct linkea_data      ldata = { NULL };
1262         int                     count;
1263         int                     retry_count;
1264         int                     rc;
1265         ENTRY;
1266
1267         if (S_ISDIR(lu_object_attr(&obj->mot_obj)))
1268                 RETURN(0);
1269
1270         buf = lu_buf_check_and_alloc(buf, PATH_MAX);
1271         if (buf->lb_buf == NULL)
1272                 RETURN(-ENOMEM);
1273
1274         ldata.ld_buf = buf;
1275         rc = mdt_links_read(info, obj, &ldata);
1276         if (rc != 0) {
1277                 if (rc == -ENOENT || rc == -ENODATA)
1278                         rc = 0;
1279                 RETURN(rc);
1280         }
1281
1282         /* ignore the migrating parent(@pobj) */
1283         retry_count = ldata.ld_leh->leh_reccount - 1;
1284
1285 again:
1286         LASSERT(ldata.ld_leh != NULL);
1287         ldata.ld_lee = (struct link_ea_entry *)(ldata.ld_leh + 1);
1288         for (count = 0; count < ldata.ld_leh->leh_reccount; count++) {
1289                 struct mdt_device *mdt = info->mti_mdt;
1290                 struct mdt_object *mdt_pobj;
1291                 struct mdt_lock_list *mll;
1292                 struct lu_name name;
1293                 struct lu_fid  fid;
1294
1295                 linkea_entry_unpack(ldata.ld_lee, &ldata.ld_reclen,
1296                                     &name, &fid);
1297                 mdt_pobj = mdt_object_find(info->mti_env, mdt, &fid);
1298                 if (IS_ERR(mdt_pobj)) {
1299                         CWARN("%s: cannot find obj "DFID": rc = %ld\n",
1300                               mdt_obd_name(mdt), PFID(&fid), PTR_ERR(mdt_pobj));
1301                         goto next;
1302                 }
1303
1304                 if (!mdt_object_exists(mdt_pobj)) {
1305                         CDEBUG(D_INFO, "%s: obj "DFID" does not exist\n",
1306                               mdt_obd_name(mdt), PFID(&fid));
1307                         mdt_object_put(info->mti_env, mdt_pobj);
1308                         goto next;
1309                 }
1310
1311                 /* Check if the object already exists in the list */
1312                 list_for_each_entry(mll, lock_list, mll_list) {
1313                         if (mll->mll_obj == mdt_pobj) {
1314                                 mdt_object_put(info->mti_env, mdt_pobj);
1315                                 goto next;
1316                         }
1317                 }
1318
1319                 if (mdt_pobj == pobj) {
1320                         CDEBUG(D_INFO, "%s: skipping parent obj "DFID"\n",
1321                                mdt_obd_name(mdt), PFID(&fid));
1322                         mdt_object_put(info->mti_env, mdt_pobj);
1323                         goto next;
1324                 }
1325
1326                 OBD_ALLOC_PTR(mll);
1327                 if (mll == NULL) {
1328                         mdt_object_put(info->mti_env, mdt_pobj);
1329                         GOTO(out, rc = -ENOMEM);
1330                 }
1331
1332                 /* Since this needs to lock all of objects in linkea, to avoid
1333                  * deadlocks, because it does not follow parent-child order as
1334                  * other MDT operation, let's use try_lock here and if the lock
1335                  * cannot be gotten because of conflicting locks, then drop all
1336                  * current locks, send an AST to the client, and start again. */
1337                 mdt_lock_pdo_init(&mll->mll_lh, LCK_PW, &name);
1338                 rc = mdt_object_lock_try(info, mdt_pobj, &mll->mll_lh,
1339                                          MDS_INODELOCK_UPDATE);
1340                 if (rc == 0) {
1341                         mdt_unlock_list(info, lock_list, rc);
1342
1343                         CDEBUG(D_INFO, "%s: busy lock on "DFID" %s retry %d\n",
1344                                mdt_obd_name(mdt), PFID(&fid), name.ln_name,
1345                                retry_count);
1346
1347                         if (retry_count == 0) {
1348                                 mdt_object_put(info->mti_env, mdt_pobj);
1349                                 OBD_FREE_PTR(mll);
1350                                 GOTO(out, rc = -EBUSY);
1351                         }
1352
1353                         rc = mdt_object_lock(info, mdt_pobj, &mll->mll_lh,
1354                                              MDS_INODELOCK_UPDATE);
1355                         if (rc != 0) {
1356                                 mdt_object_put(info->mti_env, mdt_pobj);
1357                                 OBD_FREE_PTR(mll);
1358                                 GOTO(out, rc);
1359                         }
1360
1361                         if (mdt_object_remote(mdt_pobj)) {
1362                                 struct ldlm_lock *lock;
1363
1364                                 /* For remote object, Set lock to cb_atomic,
1365                                  * so lock can be released in blocking_ast()
1366                                  * immediately, then the next try_lock will
1367                                  * have better chance to succeds */
1368                                 lock =
1369                                 ldlm_handle2lock(&mll->mll_lh.mlh_rreg_lh);
1370                                 LASSERT(lock != NULL);
1371                                 lock_res_and_lock(lock);
1372                                 ldlm_set_atomic_cb(lock);
1373                                 unlock_res_and_lock(lock);
1374                                 LDLM_LOCK_PUT(lock);
1375                         }
1376                         mdt_object_unlock_put(info, mdt_pobj, &mll->mll_lh, rc);
1377                         OBD_FREE_PTR(mll);
1378                         retry_count--;
1379                         goto again;
1380                 }
1381                 rc = 0;
1382                 INIT_LIST_HEAD(&mll->mll_list);
1383                 mll->mll_obj = mdt_pobj;
1384                 list_add_tail(&mll->mll_list, lock_list);
1385 next:
1386                 ldata.ld_lee = (struct link_ea_entry *)((char *)ldata.ld_lee +
1387                                                          ldata.ld_reclen);
1388         }
1389 out:
1390         if (rc != 0)
1391                 mdt_unlock_list(info, lock_list, rc);
1392         RETURN(rc);
1393 }
1394
1395 /* migrate files from one MDT to another MDT */
1396 static int mdt_reint_migrate_internal(struct mdt_thread_info *info,
1397                                       struct mdt_lock_handle *lhc)
1398 {
1399         struct mdt_reint_record *rr = &info->mti_rr;
1400         struct md_attr          *ma = &info->mti_attr;
1401         struct mdt_object       *msrcdir;
1402         struct mdt_object       *mold;
1403         struct mdt_object       *mnew = NULL;
1404         struct mdt_lock_handle  *lh_dirp;
1405         struct mdt_lock_handle  *lh_childp;
1406         struct mdt_lock_handle  *lh_tgtp = NULL;
1407         struct lu_fid           *old_fid = &info->mti_tmp_fid1;
1408         struct list_head        lock_list;
1409         __u64                   lock_ibits;
1410         struct ldlm_lock        *lease = NULL;
1411         bool                    lock_open_sem = false;
1412         int                     rc;
1413         ENTRY;
1414
1415         CDEBUG(D_INODE, "migrate "DFID"/"DNAME" to "DFID"\n", PFID(rr->rr_fid1),
1416                PNAME(&rr->rr_name), PFID(rr->rr_fid2));
1417
1418         /* 1: lock the source dir. */
1419         msrcdir = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
1420         if (IS_ERR(msrcdir)) {
1421                 CERROR("%s: cannot find source dir "DFID" : rc = %d\n",
1422                         mdt_obd_name(info->mti_mdt), PFID(rr->rr_fid1),
1423                         (int)PTR_ERR(msrcdir));
1424                 RETURN(PTR_ERR(msrcdir));
1425         }
1426
1427         lh_dirp = &info->mti_lh[MDT_LH_PARENT];
1428         mdt_lock_pdo_init(lh_dirp, LCK_PW, &rr->rr_name);
1429         rc = mdt_object_lock(info, msrcdir, lh_dirp,
1430                              MDS_INODELOCK_UPDATE);
1431         if (rc)
1432                 GOTO(out_put_parent, rc);
1433
1434         if (!mdt_object_remote(msrcdir)) {
1435                 rc = mdt_version_get_check_save(info, msrcdir, 0);
1436                 if (rc)
1437                         GOTO(out_unlock_parent, rc);
1438         }
1439
1440         /* 2: sanity check and find the object to be migrated. */
1441         fid_zero(old_fid);
1442         rc = mdt_lookup_version_check(info, msrcdir, &rr->rr_name, old_fid, 2);
1443         if (rc != 0)
1444                 GOTO(out_unlock_parent, rc);
1445
1446         if (lu_fid_eq(old_fid, rr->rr_fid1) || lu_fid_eq(old_fid, rr->rr_fid2))
1447                 GOTO(out_unlock_parent, rc = -EINVAL);
1448
1449         if (!fid_is_md_operative(old_fid))
1450                 GOTO(out_unlock_parent, rc = -EPERM);
1451
1452         if (lu_fid_eq(old_fid, &info->mti_mdt->mdt_md_root_fid))
1453                 GOTO(out_unlock_parent, rc = -EPERM);
1454
1455         mold = mdt_object_find(info->mti_env, info->mti_mdt, old_fid);
1456         if (IS_ERR(mold))
1457                 GOTO(out_unlock_parent, rc = PTR_ERR(mold));
1458
1459         if (mdt_object_remote(mold)) {
1460                 CERROR("%s: source "DFID" is on the remote MDT\n",
1461                        mdt_obd_name(info->mti_mdt), PFID(old_fid));
1462                 GOTO(out_put_child, rc = -EREMOTE);
1463         }
1464
1465         if (S_ISREG(lu_object_attr(&mold->mot_obj)) &&
1466             !mdt_object_remote(msrcdir)) {
1467                 CERROR("%s: parent "DFID" is still on the same"
1468                        " MDT, which should be migrated first:"
1469                        " rc = %d\n", mdt_obd_name(info->mti_mdt),
1470                        PFID(mdt_object_fid(msrcdir)), -EPERM);
1471                 GOTO(out_put_child, rc = -EPERM);
1472         }
1473
1474         rc = mdt_remote_permission(info);
1475         if (rc != 0)
1476                 GOTO(out_put_child, rc);
1477
1478         /* 3: iterate the linkea of the object and lock all of the objects */
1479         INIT_LIST_HEAD(&lock_list);
1480         rc = mdt_lock_objects_in_linkea(info, mold, msrcdir, &lock_list);
1481         if (rc != 0)
1482                 GOTO(out_put_child, rc);
1483
1484         if (info->mti_spec.sp_migrate_close) {
1485                 struct close_data *data;
1486                 struct mdt_body  *repbody;
1487                 bool lease_broken = false;
1488
1489                 if (!req_capsule_field_present(info->mti_pill, &RMF_MDT_EPOCH,
1490                                       RCL_CLIENT) ||
1491                     !req_capsule_field_present(info->mti_pill, &RMF_CLOSE_DATA,
1492                                       RCL_CLIENT))
1493                         GOTO(out_lease, rc = -EPROTO);
1494
1495                 data = req_capsule_client_get(info->mti_pill, &RMF_CLOSE_DATA);
1496                 if (data == NULL)
1497                         GOTO(out_lease, rc = -EPROTO);
1498
1499                 lease = ldlm_handle2lock(&data->cd_handle);
1500                 if (lease == NULL)
1501                         GOTO(out_lease, rc = -ESTALE);
1502
1503                 /* try to hold open_sem so that nobody else can open the file */
1504                 if (!down_write_trylock(&mold->mot_open_sem)) {
1505                         ldlm_lock_cancel(lease);
1506                         GOTO(out_lease, rc = -EBUSY);
1507                 }
1508
1509                 lock_open_sem = true;
1510                 /* Check if the lease open lease has already canceled */
1511                 lock_res_and_lock(lease);
1512                 lease_broken = ldlm_is_cancel(lease);
1513                 unlock_res_and_lock(lease);
1514
1515                 LDLM_DEBUG(lease, DFID " lease broken? %d\n",
1516                            PFID(mdt_object_fid(mold)), lease_broken);
1517
1518                 /* Cancel server side lease. Client side counterpart should
1519                  * have been cancelled. It's okay to cancel it now as we've
1520                  * held mot_open_sem. */
1521                 ldlm_lock_cancel(lease);
1522
1523                 if (lease_broken)
1524                         GOTO(out_lease, rc = -EAGAIN);
1525 out_lease:
1526                 rc = mdt_close_internal(info, mdt_info_req(info), NULL);
1527                 repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
1528                 repbody->mbo_valid |= OBD_MD_CLOSE_INTENT_EXECED;
1529                 if (rc != 0)
1530                         GOTO(out_unlock_list, rc);
1531         }
1532
1533         /* 4: lock of the object migrated object */
1534         lh_childp = &info->mti_lh[MDT_LH_OLD];
1535         mdt_lock_reg_init(lh_childp, LCK_EX);
1536         lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE |
1537                      MDS_INODELOCK_LAYOUT;
1538         if (mdt_object_remote(msrcdir)) {
1539                 /* Enqueue lookup lock from the parent MDT */
1540                 rc = mdt_remote_object_lock(info, msrcdir, mdt_object_fid(mold),
1541                                             &lh_childp->mlh_rreg_lh,
1542                                             lh_childp->mlh_rreg_mode,
1543                                             MDS_INODELOCK_LOOKUP, false);
1544                 if (rc != ELDLM_OK)
1545                         GOTO(out_unlock_list, rc);
1546
1547                 lock_ibits &= ~MDS_INODELOCK_LOOKUP;
1548         }
1549
1550         rc = mdt_object_lock(info, mold, lh_childp, lock_ibits);
1551         if (rc != 0)
1552                 GOTO(out_unlock_child, rc);
1553
1554         /* Migration is incompatible with HSM. */
1555         ma->ma_need = MA_HSM;
1556         ma->ma_valid = 0;
1557         rc = mdt_attr_get_complex(info, mold, ma);
1558         if (rc != 0)
1559                 GOTO(out_unlock_child, rc);
1560
1561         if ((ma->ma_valid & MA_HSM) && ma->ma_hsm.mh_flags != 0) {
1562                 rc = -ENOSYS;
1563                 CERROR("%s: cannot migrate HSM archived file "DFID": rc = %d\n",
1564                        mdt_obd_name(info->mti_mdt), PFID(old_fid), rc);
1565                 GOTO(out_unlock_child, rc);
1566         }
1567
1568         ma->ma_need = MA_LMV;
1569         ma->ma_valid = 0;
1570         ma->ma_lmv = (union lmv_mds_md *)info->mti_xattr_buf;
1571         ma->ma_lmv_size = sizeof(info->mti_xattr_buf);
1572         rc = mdt_stripe_get(info, mold, ma, XATTR_NAME_LMV);
1573         if (rc != 0)
1574                 GOTO(out_unlock_child, rc);
1575
1576         if ((ma->ma_valid & MA_LMV)) {
1577                 struct lmv_mds_md_v1 *lmm1;
1578
1579                 lmv_le_to_cpu(ma->ma_lmv, ma->ma_lmv);
1580                 lmm1 = &ma->ma_lmv->lmv_md_v1;
1581                 if (!(lmm1->lmv_hash_type & LMV_HASH_FLAG_MIGRATION)) {
1582                         CERROR("%s: can not migrate striped dir "DFID
1583                                ": rc = %d\n", mdt_obd_name(info->mti_mdt),
1584                                PFID(mdt_object_fid(mold)), -EPERM);
1585                         GOTO(out_unlock_child, rc = -EPERM);
1586                 }
1587
1588                 if (!fid_is_sane(&lmm1->lmv_stripe_fids[1]))
1589                         GOTO(out_unlock_child, rc = -EINVAL);
1590
1591                 mnew = mdt_object_find(info->mti_env, info->mti_mdt,
1592                                        &lmm1->lmv_stripe_fids[1]);
1593                 if (IS_ERR(mnew))
1594                         GOTO(out_unlock_child, rc = PTR_ERR(mnew));
1595
1596                 if (!mdt_object_remote(mnew)) {
1597                         CERROR("%s: "DFID" being migrated is on this MDT:"
1598                                " rc  = %d\n", mdt_obd_name(info->mti_mdt),
1599                                PFID(rr->rr_fid2), -EPERM);
1600                         GOTO(out_put_new, rc = -EPERM);
1601                 }
1602
1603                 lh_tgtp = &info->mti_lh[MDT_LH_CHILD];
1604                 mdt_lock_reg_init(lh_tgtp, LCK_EX);
1605                 rc = mdt_remote_object_lock(info, mnew,
1606                                             mdt_object_fid(mnew),
1607                                             &lh_tgtp->mlh_rreg_lh,
1608                                             lh_tgtp->mlh_rreg_mode,
1609                                             MDS_INODELOCK_UPDATE, false);
1610                 if (rc != 0) {
1611                         lh_tgtp = NULL;
1612                         GOTO(out_put_new, rc);
1613                 }
1614         } else {
1615                 mnew = mdt_object_find(info->mti_env, info->mti_mdt,
1616                                        rr->rr_fid2);
1617                 if (IS_ERR(mnew))
1618                         GOTO(out_unlock_child, rc = PTR_ERR(mnew));
1619                 if (!mdt_object_remote(mnew)) {
1620                         CERROR("%s: Migration "DFID" is on this MDT:"
1621                                " rc = %d\n", mdt_obd_name(info->mti_mdt),
1622                                PFID(rr->rr_fid2), -EXDEV);
1623                         GOTO(out_put_new, rc = -EXDEV);
1624                 }
1625         }
1626
1627         /* 5: migrate it */
1628         mdt_reint_init_ma(info, ma);
1629
1630         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
1631                        OBD_FAIL_MDS_REINT_RENAME_WRITE);
1632
1633         rc = mdo_migrate(info->mti_env, mdt_object_child(msrcdir),
1634                          mdt_object_child(mold), &rr->rr_name,
1635                          mdt_object_child(mnew), ma);
1636         if (rc != 0)
1637                 GOTO(out_unlock_new, rc);
1638
1639 out_unlock_new:
1640         if (lh_tgtp != NULL)
1641                 mdt_object_unlock(info, mnew, lh_tgtp, rc);
1642 out_put_new:
1643         if (mnew)
1644                 mdt_object_put(info->mti_env, mnew);
1645 out_unlock_child:
1646         mdt_object_unlock(info, mold, lh_childp, rc);
1647 out_unlock_list:
1648         mdt_unlock_list(info, &lock_list, rc);
1649         if (lease != NULL) {
1650                 ldlm_reprocess_all(lease->l_resource);
1651                 LDLM_LOCK_PUT(lease);
1652         }
1653
1654         if (lock_open_sem)
1655                 up_write(&mold->mot_open_sem);
1656 out_put_child:
1657         mdt_object_put(info->mti_env, mold);
1658 out_unlock_parent:
1659         mdt_object_unlock(info, msrcdir, lh_dirp, rc);
1660 out_put_parent:
1661         mdt_object_put(info->mti_env, msrcdir);
1662
1663         RETURN(rc);
1664 }
1665
1666 static struct mdt_object *mdt_object_find_check(struct mdt_thread_info *info,
1667                                                 const struct lu_fid *fid,
1668                                                 int idx)
1669 {
1670         struct mdt_object *dir;
1671         int rc;
1672         ENTRY;
1673
1674         dir = mdt_object_find(info->mti_env, info->mti_mdt, fid);
1675         if (IS_ERR(dir))
1676                 RETURN(dir);
1677
1678         /* check early, the real version will be saved after locking */
1679         rc = mdt_version_get_check(info, dir, idx);
1680         if (rc)
1681                 GOTO(out_put, rc);
1682
1683         RETURN(dir);
1684 out_put:
1685         mdt_object_put(info->mti_env, dir);
1686         return ERR_PTR(rc);
1687 }
1688
1689 static int mdt_object_lock_save(struct mdt_thread_info *info,
1690                                 struct mdt_object *dir,
1691                                 struct mdt_lock_handle *lh,
1692                                 int idx)
1693 {
1694         int rc;
1695
1696         /* we lock the target dir if it is local */
1697         rc = mdt_object_lock(info, dir, lh, MDS_INODELOCK_UPDATE);
1698         if (rc != 0)
1699                 return rc;
1700
1701         /* get and save correct version after locking */
1702         mdt_version_get_save(info, dir, idx);
1703         return 0;
1704 }
1705
1706
1707 static int mdt_rename_parents_lock(struct mdt_thread_info *info,
1708                                    struct mdt_object **srcp,
1709                                    struct mdt_object **tgtp)
1710 {
1711         struct mdt_reint_record *rr = &info->mti_rr;
1712         const struct lu_fid     *fid_src = rr->rr_fid1;
1713         const struct lu_fid     *fid_tgt = rr->rr_fid2;
1714         struct mdt_lock_handle  *lh_src = &info->mti_lh[MDT_LH_PARENT];
1715         struct mdt_lock_handle  *lh_tgt = &info->mti_lh[MDT_LH_CHILD];
1716         struct mdt_object       *src;
1717         struct mdt_object       *tgt;
1718         int                      reverse = 0;
1719         int                      rc;
1720         ENTRY;
1721
1722         /* find both parents. */
1723         src = mdt_object_find_check(info, fid_src, 0);
1724         if (IS_ERR(src))
1725                 RETURN(PTR_ERR(src));
1726
1727         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME3, 5);
1728
1729         if (lu_fid_eq(fid_src, fid_tgt)) {
1730                 tgt = src;
1731                 mdt_object_get(info->mti_env, tgt);
1732         } else {
1733                 /* Check if the @src is not a child of the @tgt, otherwise a
1734                  * reverse locking must take place. */
1735                 rc = mdt_is_subdir(info, src, fid_tgt);
1736                 if (rc == -EINVAL)
1737                         reverse = 1;
1738                 else if (rc)
1739                         GOTO(err_src_put, rc);
1740
1741                 tgt = mdt_object_find_check(info, fid_tgt, 1);
1742                 if (IS_ERR(tgt))
1743                         GOTO(err_src_put, rc = PTR_ERR(tgt));
1744         }
1745
1746         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME4, 5);
1747
1748         /* lock parents in the proper order. */
1749         if (reverse) {
1750                 rc = mdt_object_lock_save(info, tgt, lh_tgt, 1);
1751                 if (rc)
1752                         GOTO(err_tgt_put, rc);
1753
1754                 OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME, 5);
1755
1756                 rc = mdt_object_lock_save(info, src, lh_src, 0);
1757         } else {
1758                 rc = mdt_object_lock_save(info, src, lh_src, 0);
1759                 if (rc)
1760                         GOTO(err_tgt_put, rc);
1761
1762                 OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME, 5);
1763
1764                 if (tgt != src)
1765                         rc = mdt_object_lock_save(info, tgt, lh_tgt, 1);
1766                 else if (lh_src->mlh_pdo_hash != lh_tgt->mlh_pdo_hash) {
1767                         rc = mdt_pdir_hash_lock(info, lh_tgt, tgt,
1768                                                 MDS_INODELOCK_UPDATE);
1769                         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_PDO_LOCK2, 10);
1770                 }
1771         }
1772         if (rc)
1773                 GOTO(err_unlock, rc);
1774
1775         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME4, 5);
1776
1777         *srcp = src;
1778         *tgtp = tgt;
1779         RETURN(0);
1780
1781 err_unlock:
1782         /* The order does not matter as the handle is checked inside,
1783          * as well as not used handle. */
1784         mdt_object_unlock(info, src, lh_src, rc);
1785         mdt_object_unlock(info, tgt, lh_tgt, rc);
1786 err_tgt_put:
1787         mdt_object_put(info->mti_env, tgt);
1788 err_src_put:
1789         mdt_object_put(info->mti_env, src);
1790         RETURN(rc);
1791 }
1792
1793 /*
1794  * VBR: rename versions in reply: 0 - src parent; 1 - tgt parent;
1795  * 2 - src child; 3 - tgt child.
1796  * Update on disk version of src child.
1797  */
1798 /**
1799  * For DNE phase I, only these renames are allowed
1800  *      mv src_p/src_c tgt_p/tgt_c
1801  * 1. src_p/src_c/tgt_p/tgt_c are in the same MDT.
1802  * 2. src_p and tgt_p are same directory, and tgt_c does not
1803  *    exists. In this case, all of modification will happen
1804  *    in the MDT where ithesource parent is, only one remote
1805  *    update is needed, i.e. set c_time/m_time on the child.
1806  *    And tgt_c will be still in the same MDT as the original
1807  *    src_c.
1808  */
1809 static int mdt_reint_rename_internal(struct mdt_thread_info *info,
1810                                      struct mdt_lock_handle *lhc)
1811 {
1812         struct mdt_reint_record *rr = &info->mti_rr;
1813         struct md_attr          *ma = &info->mti_attr;
1814         struct ptlrpc_request   *req = mdt_info_req(info);
1815         struct mdt_object       *msrcdir = NULL;
1816         struct mdt_object       *mtgtdir = NULL;
1817         struct mdt_object       *mold;
1818         struct mdt_object       *mnew = NULL;
1819         struct mdt_lock_handle  *lh_srcdirp;
1820         struct mdt_lock_handle  *lh_tgtdirp;
1821         struct mdt_lock_handle  *lh_oldp = NULL;
1822         struct mdt_lock_handle  *lh_newp = NULL;
1823         struct lu_fid           *old_fid = &info->mti_tmp_fid1;
1824         struct lu_fid           *new_fid = &info->mti_tmp_fid2;
1825         __u64                   lock_ibits;
1826         int                      rc;
1827         ENTRY;
1828
1829         DEBUG_REQ(D_INODE, req, "rename "DFID"/"DNAME" to "DFID"/"DNAME,
1830                   PFID(rr->rr_fid1), PNAME(&rr->rr_name),
1831                   PFID(rr->rr_fid2), PNAME(&rr->rr_tgt_name));
1832
1833         lh_srcdirp = &info->mti_lh[MDT_LH_PARENT];
1834         mdt_lock_pdo_init(lh_srcdirp, LCK_PW, &rr->rr_name);
1835         lh_tgtdirp = &info->mti_lh[MDT_LH_CHILD];
1836         mdt_lock_pdo_init(lh_tgtdirp, LCK_PW, &rr->rr_tgt_name);
1837
1838         /* step 1&2: lock the source and target dirs. */
1839         rc = mdt_rename_parents_lock(info, &msrcdir, &mtgtdir);
1840         if (rc)
1841                 RETURN(rc);
1842
1843         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME2, 5);
1844
1845         /* step 3: find & lock the old object. */
1846         fid_zero(old_fid);
1847         rc = mdt_lookup_version_check(info, msrcdir, &rr->rr_name, old_fid, 2);
1848         if (rc != 0)
1849                 GOTO(out_unlock_parents, rc);
1850
1851         if (lu_fid_eq(old_fid, rr->rr_fid1) || lu_fid_eq(old_fid, rr->rr_fid2))
1852                 GOTO(out_unlock_parents, rc = -EINVAL);
1853
1854         if (!fid_is_md_operative(old_fid))
1855                 GOTO(out_unlock_parents, rc = -EPERM);
1856
1857         mold = mdt_object_find(info->mti_env, info->mti_mdt, old_fid);
1858         if (IS_ERR(mold))
1859                 GOTO(out_unlock_parents, rc = PTR_ERR(mold));
1860
1861         /* Check if @mtgtdir is subdir of @mold, before locking child
1862          * to avoid reverse locking. */
1863         rc = mdt_is_subdir(info, mtgtdir, old_fid);
1864         if (rc)
1865                 GOTO(out_put_old, rc);
1866
1867         tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(mold));
1868         /* save version after locking */
1869         mdt_version_get_save(info, mold, 2);
1870
1871         /* step 4: find & lock the new object. */
1872         /* new target object may not exist now */
1873         /* lookup with version checking */
1874         fid_zero(new_fid);
1875         rc = mdt_lookup_version_check(info, mtgtdir, &rr->rr_tgt_name, new_fid,
1876                                       3);
1877         if (rc == 0) {
1878                 /* the new_fid should have been filled at this moment */
1879                 if (lu_fid_eq(old_fid, new_fid))
1880                         GOTO(out_put_old, rc);
1881
1882                 if (lu_fid_eq(new_fid, rr->rr_fid1) ||
1883                     lu_fid_eq(new_fid, rr->rr_fid2))
1884                         GOTO(out_put_old, rc = -EINVAL);
1885
1886                 if (!fid_is_md_operative(new_fid))
1887                         GOTO(out_put_old, rc = -EPERM);
1888
1889                 mnew = mdt_object_find(info->mti_env, info->mti_mdt, new_fid);
1890                 if (IS_ERR(mnew))
1891                         GOTO(out_put_old, rc = PTR_ERR(mnew));
1892
1893                 if (mdt_object_remote(mnew)) {
1894                         struct mdt_body  *repbody;
1895
1896                         /* Always send rename req to the target child MDT */
1897                         repbody = req_capsule_server_get(info->mti_pill,
1898                                                          &RMF_MDT_BODY);
1899                         LASSERT(repbody != NULL);
1900                         repbody->mbo_fid1 = *new_fid;
1901                         repbody->mbo_valid |= (OBD_MD_FLID | OBD_MD_MDS);
1902                         GOTO(out_put_new, rc = -EXDEV);
1903                 }
1904                 /* Before locking the target dir, check we do not replace
1905                  * a dir with a non-dir, otherwise it may deadlock with
1906                  * link op which tries to create a link in this dir
1907                  * back to this non-dir. */
1908                 if (S_ISDIR(lu_object_attr(&mnew->mot_obj)) &&
1909                     !S_ISDIR(lu_object_attr(&mold->mot_obj)))
1910                         GOTO(out_put_new, rc = -EISDIR);
1911
1912                 lh_oldp = &info->mti_lh[MDT_LH_OLD];
1913                 mdt_lock_reg_init(lh_oldp, LCK_EX);
1914
1915                 lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_XATTR;
1916                 if (mdt_object_remote(msrcdir)) {
1917                         /* Enqueue lookup lock from the parent MDT */
1918                         rc = mdt_remote_object_lock(info, msrcdir,
1919                                                     mdt_object_fid(mold),
1920                                                     &lh_oldp->mlh_rreg_lh,
1921                                                     lh_oldp->mlh_rreg_mode,
1922                                                     MDS_INODELOCK_LOOKUP,
1923                                                     false);
1924                         if (rc != ELDLM_OK)
1925                                 GOTO(out_put_new, rc);
1926
1927                         lock_ibits &= ~MDS_INODELOCK_LOOKUP;
1928                 }
1929
1930                 rc = mdt_object_lock(info, mold, lh_oldp, lock_ibits);
1931                 if (rc != 0)
1932                         GOTO(out_unlock_old, rc);
1933
1934                 /* Check if @msrcdir is subdir of @mnew, before locking child
1935                  * to avoid reverse locking. */
1936                 rc = mdt_is_subdir(info, msrcdir, new_fid);
1937                 if (rc)
1938                         GOTO(out_unlock_old, rc);
1939
1940                 /* We used to acquire MDS_INODELOCK_FULL here but we
1941                  * can't do this now because a running HSM restore on
1942                  * the rename onto victim will hold the layout
1943                  * lock. See LU-4002. */
1944
1945                 lh_newp = &info->mti_lh[MDT_LH_NEW];
1946                 mdt_lock_reg_init(lh_newp, LCK_EX);
1947                 rc = mdt_object_lock(info, mnew, lh_newp,
1948                                      MDS_INODELOCK_LOOKUP |
1949                                      MDS_INODELOCK_UPDATE);
1950                 if (rc != 0)
1951                         GOTO(out_unlock_old, rc);
1952
1953                 /* get and save version after locking */
1954                 mdt_version_get_save(info, mnew, 3);
1955         } else if (rc != -EREMOTE && rc != -ENOENT) {
1956                 GOTO(out_put_old, rc);
1957         } else {
1958                 lh_oldp = &info->mti_lh[MDT_LH_OLD];
1959                 mdt_lock_reg_init(lh_oldp, LCK_EX);
1960
1961                 lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_XATTR;
1962                 if (mdt_object_remote(msrcdir)) {
1963                         /* Enqueue lookup lock from the parent MDT */
1964                         rc = mdt_remote_object_lock(info, msrcdir,
1965                                                     mdt_object_fid(mold),
1966                                                     &lh_oldp->mlh_rreg_lh,
1967                                                     lh_oldp->mlh_rreg_mode,
1968                                                     MDS_INODELOCK_LOOKUP,
1969                                                     false);
1970                         if (rc != ELDLM_OK)
1971                                 GOTO(out_put_new, rc);
1972
1973                         lock_ibits &= ~MDS_INODELOCK_LOOKUP;
1974                 }
1975
1976                 rc = mdt_object_lock(info, mold, lh_oldp, lock_ibits);
1977                 if (rc != 0)
1978                         GOTO(out_put_old, rc);
1979
1980                 mdt_enoent_version_save(info, 3);
1981         }
1982
1983         /* step 5: rename it */
1984         mdt_reint_init_ma(info, ma);
1985
1986         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
1987                        OBD_FAIL_MDS_REINT_RENAME_WRITE);
1988
1989         if (mnew != NULL)
1990                 mutex_lock(&mnew->mot_lov_mutex);
1991
1992         rc = mdo_rename(info->mti_env, mdt_object_child(msrcdir),
1993                         mdt_object_child(mtgtdir), old_fid, &rr->rr_name,
1994                         mnew != NULL ? mdt_object_child(mnew) : NULL,
1995                         &rr->rr_tgt_name, ma);
1996
1997         if (mnew != NULL)
1998                 mutex_unlock(&mnew->mot_lov_mutex);
1999
2000         /* handle last link of tgt object */
2001         if (rc == 0) {
2002                 mdt_counter_incr(req, LPROC_MDT_RENAME);
2003                 if (mnew)
2004                         mdt_handle_last_unlink(info, mnew, ma);
2005
2006                 mdt_rename_counter_tally(info, info->mti_mdt, req,
2007                                          msrcdir, mtgtdir);
2008         }
2009
2010         EXIT;
2011         if (mnew != NULL)
2012                 mdt_object_unlock(info, mnew, lh_newp, rc);
2013 out_unlock_old:
2014         mdt_object_unlock(info, mold, lh_oldp, rc);
2015 out_put_new:
2016         if (mnew != NULL)
2017                 mdt_object_put(info->mti_env, mnew);
2018 out_put_old:
2019         mdt_object_put(info->mti_env, mold);
2020 out_unlock_parents:
2021         mdt_object_unlock_put(info, mtgtdir, lh_tgtdirp, rc);
2022         mdt_object_unlock_put(info, msrcdir, lh_srcdirp, rc);
2023         return rc;
2024 }
2025
2026 static int mdt_reint_rename_or_migrate(struct mdt_thread_info *info,
2027                                        struct mdt_lock_handle *lhc, bool rename)
2028 {
2029         struct mdt_reint_record *rr = &info->mti_rr;
2030         struct ptlrpc_request   *req = mdt_info_req(info);
2031         struct lustre_handle    rename_lh = { 0 };
2032         int                     rc;
2033         ENTRY;
2034
2035         if (info->mti_dlm_req)
2036                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
2037
2038         if (!fid_is_md_operative(rr->rr_fid1) ||
2039             !fid_is_md_operative(rr->rr_fid2))
2040                 RETURN(-EPERM);
2041
2042         /* Note: do not enqueue rename lock for replay request, because
2043          * if other MDT holds rename lock, but being blocked to wait for
2044          * this MDT to finish its recovery, and the failover MDT can not
2045          * get rename lock, which will cause deadlock. */
2046         if (!req_is_replay(req)) {
2047                 rc = mdt_rename_lock(info, &rename_lh);
2048                 if (rc != 0) {
2049                         CERROR("%s: can't lock FS for rename: rc  = %d\n",
2050                                mdt_obd_name(info->mti_mdt), rc);
2051                         RETURN(rc);
2052                 }
2053         }
2054
2055         if (rename)
2056                 rc = mdt_reint_rename_internal(info, lhc);
2057         else
2058                 rc = mdt_reint_migrate_internal(info, lhc);
2059
2060         if (lustre_handle_is_used(&rename_lh))
2061                 mdt_rename_unlock(&rename_lh);
2062
2063         RETURN(rc);
2064 }
2065
2066 static int mdt_reint_rename(struct mdt_thread_info *info,
2067                             struct mdt_lock_handle *lhc)
2068 {
2069         return mdt_reint_rename_or_migrate(info, lhc, true);
2070 }
2071
2072 static int mdt_reint_migrate(struct mdt_thread_info *info,
2073                             struct mdt_lock_handle *lhc)
2074 {
2075         return mdt_reint_rename_or_migrate(info, lhc, false);
2076 }
2077
2078 struct mdt_reinter {
2079         int (*mr_handler)(struct mdt_thread_info *, struct mdt_lock_handle *);
2080         enum lprocfs_extra_opc mr_extra_opc;
2081 };
2082
2083 static const struct mdt_reinter mdt_reinters[] = {
2084         [REINT_SETATTR] = {
2085                 .mr_handler = &mdt_reint_setattr,
2086                 .mr_extra_opc = MDS_REINT_SETATTR,
2087         },
2088         [REINT_CREATE] = {
2089                 .mr_handler = &mdt_reint_create,
2090                 .mr_extra_opc = MDS_REINT_CREATE,
2091         },
2092         [REINT_LINK] = {
2093                 .mr_handler = &mdt_reint_link,
2094                 .mr_extra_opc = MDS_REINT_LINK,
2095         },
2096         [REINT_UNLINK] = {
2097                 .mr_handler = &mdt_reint_unlink,
2098                 .mr_extra_opc = MDS_REINT_UNLINK,
2099         },
2100         [REINT_RENAME] = {
2101                 .mr_handler = &mdt_reint_rename,
2102                 .mr_extra_opc = MDS_REINT_RENAME,
2103         },
2104         [REINT_OPEN] = {
2105                 .mr_handler = &mdt_reint_open,
2106                 .mr_extra_opc = MDS_REINT_OPEN,
2107         },
2108         [REINT_SETXATTR] = {
2109                 .mr_handler = &mdt_reint_setxattr,
2110                 .mr_extra_opc = MDS_REINT_SETXATTR,
2111         },
2112         [REINT_RMENTRY] = {
2113                 .mr_handler = &mdt_reint_unlink,
2114                 .mr_extra_opc = MDS_REINT_UNLINK,
2115         },
2116         [REINT_MIGRATE] = {
2117                 .mr_handler = &mdt_reint_migrate,
2118                 .mr_extra_opc = MDS_REINT_RENAME,
2119         },
2120 };
2121
2122 int mdt_reint_rec(struct mdt_thread_info *info,
2123                   struct mdt_lock_handle *lhc)
2124 {
2125         const struct mdt_reinter *mr;
2126         int rc;
2127         ENTRY;
2128
2129         if (!(info->mti_rr.rr_opcode < ARRAY_SIZE(mdt_reinters)))
2130                 RETURN(-EPROTO);
2131
2132         mr = &mdt_reinters[info->mti_rr.rr_opcode];
2133         if (mr->mr_handler == NULL)
2134                 RETURN(-EPROTO);
2135
2136         rc = (*mr->mr_handler)(info, lhc);
2137
2138         lprocfs_counter_incr(ptlrpc_req2svc(mdt_info_req(info))->srv_stats,
2139                              PTLRPC_LAST_CNTR + mr->mr_extra_opc);
2140
2141         RETURN(rc);
2142 }