Whamcloud - gitweb
73c710e2ee0e79f60c0ddc6a725e95c89317032f
[fs/lustre-release.git] / 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.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2011, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  * Lustre is a trademark of Sun Microsystems, Inc.
31  *
32  * lustre/mdt/mdt_reint.c
33  *
34  * Lustre Metadata Target (mdt) reintegration routines
35  *
36  * Author: Peter Braam <braam@clusterfs.com>
37  * Author: Andreas Dilger <adilger@clusterfs.com>
38  * Author: Phil Schwan <phil@clusterfs.com>
39  * Author: Huang Hua <huanghua@clusterfs.com>
40  * Author: Yury Umanets <umka@clusterfs.com>
41  */
42
43 #define DEBUG_SUBSYSTEM S_MDS
44
45 #include <lprocfs_status.h>
46 #include "mdt_internal.h"
47 #include <lustre_lmv.h>
48
49 static inline void mdt_reint_init_ma(struct mdt_thread_info *info,
50                                      struct md_attr *ma)
51 {
52         ma->ma_need = MA_INODE;
53         ma->ma_valid = 0;
54 }
55
56 /**
57  * Get version of object by fid.
58  *
59  * Return real version or ENOENT_VERSION if object doesn't exist
60  */
61 static void mdt_obj_version_get(struct mdt_thread_info *info,
62                                 struct mdt_object *o, __u64 *version)
63 {
64         LASSERT(o);
65
66         if (mdt_object_exists(o) && !mdt_object_remote(o) &&
67             !fid_is_obf(mdt_object_fid(o)))
68                 *version = dt_version_get(info->mti_env, mdt_obj2dt(o));
69         else
70                 *version = ENOENT_VERSION;
71         CDEBUG(D_INODE, "FID "DFID" version is %#llx\n",
72                PFID(mdt_object_fid(o)), *version);
73 }
74
75 /**
76  * Check version is correct.
77  *
78  * Should be called only during replay.
79  */
80 static int mdt_version_check(struct ptlrpc_request *req,
81                              __u64 version, int idx)
82 {
83         __u64 *pre_ver = lustre_msg_get_versions(req->rq_reqmsg);
84         ENTRY;
85
86         if (!exp_connect_vbr(req->rq_export))
87                 RETURN(0);
88
89         LASSERT(req_is_replay(req));
90         /** VBR: version is checked always because costs nothing */
91         LASSERT(idx < PTLRPC_NUM_VERSIONS);
92         /** Sanity check for malformed buffers */
93         if (pre_ver == NULL) {
94                 CERROR("No versions in request buffer\n");
95                 spin_lock(&req->rq_export->exp_lock);
96                 req->rq_export->exp_vbr_failed = 1;
97                 spin_unlock(&req->rq_export->exp_lock);
98                 RETURN(-EOVERFLOW);
99         } else if (pre_ver[idx] != version) {
100                 CDEBUG(D_INODE, "Version mismatch %#llx != %#llx\n",
101                        pre_ver[idx], version);
102                 spin_lock(&req->rq_export->exp_lock);
103                 req->rq_export->exp_vbr_failed = 1;
104                 spin_unlock(&req->rq_export->exp_lock);
105                 RETURN(-EOVERFLOW);
106         }
107         RETURN(0);
108 }
109
110 /**
111  * Save pre-versions in reply.
112  */
113 static void mdt_version_save(struct ptlrpc_request *req, __u64 version,
114                              int idx)
115 {
116         __u64 *reply_ver;
117
118         if (!exp_connect_vbr(req->rq_export))
119                 return;
120
121         LASSERT(!req_is_replay(req));
122         LASSERT(req->rq_repmsg != NULL);
123         reply_ver = lustre_msg_get_versions(req->rq_repmsg);
124         if (reply_ver)
125                 reply_ver[idx] = version;
126 }
127
128 /**
129  * Save enoent version, it is needed when it is obvious that object doesn't
130  * exist, e.g. child during create.
131  */
132 static void mdt_enoent_version_save(struct mdt_thread_info *info, int idx)
133 {
134         /* save version of file name for replay, it must be ENOENT here */
135         if (!req_is_replay(mdt_info_req(info))) {
136                 info->mti_ver[idx] = ENOENT_VERSION;
137                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
138         }
139 }
140
141 /**
142  * Get version from disk and save in reply buffer.
143  *
144  * Versions are saved in reply only during normal operations not replays.
145  */
146 void mdt_version_get_save(struct mdt_thread_info *info,
147                           struct mdt_object *mto, int idx)
148 {
149         /* don't save versions during replay */
150         if (!req_is_replay(mdt_info_req(info))) {
151                 mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
152                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
153         }
154 }
155
156 /**
157  * Get version from disk and check it, no save in reply.
158  */
159 int mdt_version_get_check(struct mdt_thread_info *info,
160                           struct mdt_object *mto, int idx)
161 {
162         /* only check versions during replay */
163         if (!req_is_replay(mdt_info_req(info)))
164                 return 0;
165
166         mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
167         return mdt_version_check(mdt_info_req(info), info->mti_ver[idx], idx);
168 }
169
170 /**
171  * Get version from disk and check if recovery or just save.
172  */
173 int mdt_version_get_check_save(struct mdt_thread_info *info,
174                                struct mdt_object *mto, int idx)
175 {
176         int rc = 0;
177
178         mdt_obj_version_get(info, mto, &info->mti_ver[idx]);
179         if (req_is_replay(mdt_info_req(info)))
180                 rc = mdt_version_check(mdt_info_req(info), info->mti_ver[idx],
181                                        idx);
182         else
183                 mdt_version_save(mdt_info_req(info), info->mti_ver[idx], idx);
184         return rc;
185 }
186
187 /**
188  * Lookup with version checking.
189  *
190  * This checks version of 'name'. Many reint functions uses 'name' for child not
191  * FID, therefore we need to get object by name and check its version.
192  */
193 static int mdt_lookup_version_check(struct mdt_thread_info *info,
194                                     struct mdt_object *p,
195                                     const struct lu_name *lname,
196                                     struct lu_fid *fid, int idx)
197 {
198         int rc, vbrc;
199
200         rc = mdo_lookup(info->mti_env, mdt_object_child(p), lname, fid,
201                         &info->mti_spec);
202         /* Check version only during replay */
203         if (!req_is_replay(mdt_info_req(info)))
204                 return rc;
205
206         info->mti_ver[idx] = ENOENT_VERSION;
207         if (rc == 0) {
208                 struct mdt_object *child;
209                 child = mdt_object_find(info->mti_env, info->mti_mdt, fid);
210                 if (likely(!IS_ERR(child))) {
211                         mdt_obj_version_get(info, child, &info->mti_ver[idx]);
212                         mdt_object_put(info->mti_env, child);
213                 }
214         }
215         vbrc = mdt_version_check(mdt_info_req(info), info->mti_ver[idx], idx);
216         return vbrc ? vbrc : rc;
217
218 }
219
220 static int mdt_unlock_slaves(struct mdt_thread_info *mti,
221                              struct mdt_object *obj,
222                              struct ldlm_enqueue_info *einfo,
223                              int decref)
224 {
225         union ldlm_policy_data *policy = &mti->mti_policy;
226         struct mdt_lock_handle *lh = &mti->mti_lh[MDT_LH_LOCAL];
227         struct lustre_handle_array *slave_locks = einfo->ei_cbdata;
228         int i;
229
230         LASSERT(S_ISDIR(obj->mot_header.loh_attr));
231         LASSERT(slave_locks);
232
233         memset(policy, 0, sizeof(*policy));
234         policy->l_inodebits.bits = einfo->ei_inodebits;
235         mdt_lock_handle_init(lh);
236         mdt_lock_reg_init(lh, einfo->ei_mode);
237         for (i = 0; i < slave_locks->ha_count; i++) {
238                 if (test_bit(i, (void *)slave_locks->ha_map))
239                         lh->mlh_rreg_lh = slave_locks->ha_handles[i];
240                 else
241                         lh->mlh_reg_lh = slave_locks->ha_handles[i];
242                 mdt_object_unlock(mti, NULL, lh, decref);
243                 slave_locks->ha_handles[i].cookie = 0ull;
244         }
245
246         return mo_object_unlock(mti->mti_env, mdt_object_child(obj), einfo,
247                                 policy);
248 }
249
250 static inline int mdt_object_striped(struct mdt_thread_info *mti,
251                                      struct mdt_object *obj)
252 {
253         struct lu_device *bottom_dev;
254         struct lu_object *bottom_obj;
255         int rc;
256
257         if (!S_ISDIR(obj->mot_header.loh_attr))
258                 return 0;
259
260         /* getxattr from bottom obj to avoid reading in shard FIDs */
261         bottom_dev = dt2lu_dev(mti->mti_mdt->mdt_bottom);
262         bottom_obj = lu_object_find_slice(mti->mti_env, bottom_dev,
263                                           mdt_object_fid(obj), NULL);
264         if (IS_ERR(bottom_obj))
265                 return PTR_ERR(bottom_obj);
266
267         rc = dt_xattr_get(mti->mti_env, lu2dt(bottom_obj), &LU_BUF_NULL,
268                           XATTR_NAME_LMV);
269         lu_object_put(mti->mti_env, bottom_obj);
270
271         return (rc > 0) ? 1 : (rc == -ENODATA) ? 0 : rc;
272 }
273
274 /**
275  * Lock slave stripes if necessary, the lock handles of slave stripes
276  * will be stored in einfo->ei_cbdata.
277  **/
278 static int mdt_lock_slaves(struct mdt_thread_info *mti, struct mdt_object *obj,
279                            enum ldlm_mode mode, __u64 ibits,
280                            struct ldlm_enqueue_info *einfo)
281 {
282         union ldlm_policy_data *policy = &mti->mti_policy;
283
284         LASSERT(S_ISDIR(obj->mot_header.loh_attr));
285
286         einfo->ei_type = LDLM_IBITS;
287         einfo->ei_mode = mode;
288         einfo->ei_cb_bl = mdt_remote_blocking_ast;
289         einfo->ei_cb_local_bl = mdt_blocking_ast;
290         einfo->ei_cb_cp = ldlm_completion_ast;
291         einfo->ei_enq_slave = 1;
292         einfo->ei_namespace = mti->mti_mdt->mdt_namespace;
293         einfo->ei_inodebits = ibits;
294         memset(policy, 0, sizeof(*policy));
295         policy->l_inodebits.bits = ibits;
296
297         return mo_object_lock(mti->mti_env, mdt_object_child(obj), NULL, einfo,
298                               policy);
299 }
300
301 int mdt_reint_striped_lock(struct mdt_thread_info *info,
302                            struct mdt_object *o,
303                            struct mdt_lock_handle *lh,
304                            __u64 ibits,
305                            struct ldlm_enqueue_info *einfo,
306                            bool cos_incompat)
307 {
308         int rc;
309
310         LASSERT(!mdt_object_remote(o));
311
312         memset(einfo, 0, sizeof(*einfo));
313
314         rc = mdt_reint_object_lock(info, o, lh, ibits, cos_incompat);
315         if (rc)
316                 return rc;
317
318         rc = mdt_object_striped(info, o);
319         if (rc != 1) {
320                 if (rc < 0)
321                         mdt_object_unlock(info, o, lh, rc);
322                 return rc;
323         }
324
325         rc = mdt_lock_slaves(info, o, lh->mlh_reg_mode, ibits, einfo);
326         if (rc) {
327                 mdt_object_unlock(info, o, lh, rc);
328                 if (rc == -EIO && OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_SLAVE_NAME))
329                         rc = 0;
330         }
331
332         return rc;
333 }
334
335 void mdt_reint_striped_unlock(struct mdt_thread_info *info,
336                               struct mdt_object *o,
337                               struct mdt_lock_handle *lh,
338                               struct ldlm_enqueue_info *einfo, int decref)
339 {
340         if (einfo->ei_cbdata)
341                 mdt_unlock_slaves(info, o, einfo, decref);
342         mdt_object_unlock(info, o, lh, decref);
343 }
344
345 /*
346  * VBR: we save three versions in reply:
347  * 0 - parent. Check that parent version is the same during replay.
348  * 1 - name. Version of 'name' if file exists with the same name or
349  * ENOENT_VERSION, it is needed because file may appear due to missed replays.
350  * 2 - child. Version of child by FID. Must be ENOENT. It is mostly sanity
351  * check.
352  */
353 static int mdt_create(struct mdt_thread_info *info)
354 {
355         struct mdt_device       *mdt = info->mti_mdt;
356         struct mdt_object       *parent;
357         struct mdt_object       *child;
358         struct mdt_lock_handle  *lh;
359         struct mdt_body         *repbody;
360         struct md_attr          *ma = &info->mti_attr;
361         struct mdt_reint_record *rr = &info->mti_rr;
362         struct md_op_spec       *spec = &info->mti_spec;
363         int rc;
364         ENTRY;
365
366         DEBUG_REQ(D_INODE, mdt_info_req(info),
367                   "Create ("DNAME"->"DFID") in "DFID,
368                   PNAME(&rr->rr_name), PFID(rr->rr_fid2), PFID(rr->rr_fid1));
369
370         if (!fid_is_md_operative(rr->rr_fid1))
371                 RETURN(-EPERM);
372
373         if (S_ISDIR(ma->ma_attr.la_mode) &&
374             spec->u.sp_ea.eadata != NULL && spec->u.sp_ea.eadatalen != 0) {
375                 const struct lmv_user_md *lum = spec->u.sp_ea.eadata;
376                 struct lu_ucred *uc = mdt_ucred(info);
377                 struct obd_export *exp = mdt_info_req(info)->rq_export;
378
379                 /* Only new clients can create remote dir( >= 2.4) and
380                  * striped dir(>= 2.6), old client will return -ENOTSUPP */
381                 if (!mdt_is_dne_client(exp))
382                         RETURN(-ENOTSUPP);
383
384                 if (le32_to_cpu(lum->lum_stripe_count) > 1) {
385                         if (!mdt_is_striped_client(exp))
386                                 RETURN(-ENOTSUPP);
387
388                         if (!mdt->mdt_enable_striped_dir)
389                                 RETURN(-EPERM);
390                 } else if (!mdt->mdt_enable_remote_dir) {
391                         RETURN(-EPERM);
392                 }
393
394                 if (!md_capable(uc, CFS_CAP_SYS_ADMIN) &&
395                     uc->uc_gid != mdt->mdt_enable_remote_dir_gid &&
396                     mdt->mdt_enable_remote_dir_gid != -1)
397                         RETURN(-EPERM);
398         }
399
400         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
401
402         parent = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
403         if (IS_ERR(parent))
404                 RETURN(PTR_ERR(parent));
405
406         if (!mdt_object_exists(parent))
407                 GOTO(put_parent, rc = -ENOENT);
408
409         lh = &info->mti_lh[MDT_LH_PARENT];
410         mdt_lock_pdo_init(lh, LCK_PW, &rr->rr_name);
411         rc = mdt_object_lock(info, parent, lh, MDS_INODELOCK_UPDATE);
412         if (rc)
413                 GOTO(put_parent, rc);
414
415         if (!mdt_object_remote(parent)) {
416                 rc = mdt_version_get_check_save(info, parent, 0);
417                 if (rc)
418                         GOTO(unlock_parent, rc);
419         }
420
421         /*
422          * Check child name version during replay.
423          * During create replay a file may exist with same name.
424          */
425         rc = mdt_lookup_version_check(info, parent, &rr->rr_name,
426                                       &info->mti_tmp_fid1, 1);
427         if (rc == 0)
428                 GOTO(unlock_parent, rc = -EEXIST);
429
430         /* -ENOENT is expected here */
431         if (rc != -ENOENT)
432                 GOTO(unlock_parent, rc);
433
434         /* save version of file name for replay, it must be ENOENT here */
435         mdt_enoent_version_save(info, 1);
436
437         child = mdt_object_new(info->mti_env, mdt, rr->rr_fid2);
438         if (unlikely(IS_ERR(child)))
439                 GOTO(unlock_parent, rc = PTR_ERR(child));
440
441         ma->ma_need = MA_INODE;
442         ma->ma_valid = 0;
443
444         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
445                         OBD_FAIL_MDS_REINT_CREATE_WRITE);
446
447         /* Version of child will be updated on disk. */
448         tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(child));
449         rc = mdt_version_get_check_save(info, child, 2);
450         if (rc)
451                 GOTO(put_child, rc);
452
453         /* Let lower layer know current lock mode. */
454         info->mti_spec.sp_cr_mode = mdt_dlm_mode2mdl_mode(lh->mlh_pdo_mode);
455
456         /*
457          * Do not perform lookup sanity check. We know that name does
458          * not exist.
459          */
460         info->mti_spec.sp_cr_lookup = 0;
461         info->mti_spec.sp_feat = &dt_directory_features;
462
463         rc = mdo_create(info->mti_env, mdt_object_child(parent), &rr->rr_name,
464                         mdt_object_child(child), &info->mti_spec, ma);
465         if (rc == 0)
466                 rc = mdt_attr_get_complex(info, child, ma);
467
468         if (rc < 0)
469                 GOTO(put_child, rc);
470
471         /*
472          * On DNE, we need to eliminate dependey between 'mkdir a' and
473          * 'mkdir a/b' if b is a striped directory, to achieve this, two
474          * things are done below:
475          * 1. save child and slaves lock.
476          * 2. if the child is a striped directory, relock parent so to
477          *    compare against with COS locks to ensure parent was
478          *    committed to disk.
479          */
480         if (mdt_slc_is_enabled(mdt) && S_ISDIR(ma->ma_attr.la_mode)) {
481                 struct mdt_lock_handle *lhc;
482                 struct ldlm_enqueue_info *einfo = &info->mti_einfo[0];
483                 bool cos_incompat;
484
485                 rc = mdt_object_striped(info, child);
486                 if (rc < 0)
487                         GOTO(put_child, rc);
488
489                 cos_incompat = rc;
490                 if (cos_incompat) {
491                         if (!mdt_object_remote(parent)) {
492                                 mdt_object_unlock(info, parent, lh, 1);
493                                 mdt_lock_pdo_init(lh, LCK_PW, &rr->rr_name);
494                                 rc = mdt_reint_object_lock(info, parent, lh,
495                                                            MDS_INODELOCK_UPDATE,
496                                                            true);
497                                 if (rc)
498                                         GOTO(put_child, rc);
499                         }
500                 }
501
502                 lhc = &info->mti_lh[MDT_LH_CHILD];
503                 mdt_lock_handle_init(lhc);
504                 mdt_lock_reg_init(lhc, LCK_PW);
505                 rc = mdt_reint_striped_lock(info, child, lhc,
506                                             MDS_INODELOCK_UPDATE, einfo,
507                                             cos_incompat);
508                 if (rc)
509                         GOTO(put_child, rc);
510
511                 mdt_reint_striped_unlock(info, child, lhc, einfo, rc);
512         }
513
514         /* Return fid & attr to client. */
515         if (ma->ma_valid & MA_INODE)
516                 mdt_pack_attr2body(info, repbody, &ma->ma_attr,
517                                    mdt_object_fid(child));
518 put_child:
519         mdt_object_put(info->mti_env, child);
520 unlock_parent:
521         mdt_object_unlock(info, parent, lh, rc);
522 put_parent:
523         mdt_object_put(info->mti_env, parent);
524         RETURN(rc);
525 }
526
527 static int mdt_attr_set(struct mdt_thread_info *info, struct mdt_object *mo,
528                         struct md_attr *ma)
529 {
530         struct mdt_lock_handle  *lh;
531         int do_vbr = ma->ma_attr.la_valid &
532                         (LA_MODE | LA_UID | LA_GID | LA_PROJID | LA_FLAGS);
533         __u64 lockpart = MDS_INODELOCK_UPDATE;
534         struct ldlm_enqueue_info *einfo = &info->mti_einfo[0];
535         bool cos_incompat;
536         int rc;
537         ENTRY;
538
539         rc = mdt_object_striped(info, mo);
540         if (rc < 0)
541                 RETURN(rc);
542
543         cos_incompat = rc;
544
545         lh = &info->mti_lh[MDT_LH_PARENT];
546         mdt_lock_reg_init(lh, LCK_PW);
547
548         /* Even though the new MDT will grant PERM lock to the old
549          * client, but the old client will almost ignore that during
550          * So it needs to revoke both LOOKUP and PERM lock here, so
551          * both new and old client can cancel the dcache */
552         if (ma->ma_attr.la_valid & (LA_MODE|LA_UID|LA_GID))
553                 lockpart |= MDS_INODELOCK_LOOKUP | MDS_INODELOCK_PERM;
554
555         rc = mdt_reint_striped_lock(info, mo, lh, lockpart, einfo,
556                                     cos_incompat);
557         if (rc != 0)
558                 RETURN(rc);
559
560         /* all attrs are packed into mti_attr in unpack_setattr */
561         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
562                        OBD_FAIL_MDS_REINT_SETATTR_WRITE);
563
564         /* VBR: update version if attr changed are important for recovery */
565         if (do_vbr) {
566                 /* update on-disk version of changed object */
567                 tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(mo));
568                 rc = mdt_version_get_check_save(info, mo, 0);
569                 if (rc)
570                         GOTO(out_unlock, rc);
571         }
572
573         /* Ensure constant striping during chown(). See LU-2789. */
574         if (ma->ma_attr.la_valid & (LA_UID|LA_GID|LA_PROJID))
575                 mutex_lock(&mo->mot_lov_mutex);
576
577         /* all attrs are packed into mti_attr in unpack_setattr */
578         rc = mo_attr_set(info->mti_env, mdt_object_child(mo), ma);
579
580         if (ma->ma_attr.la_valid & (LA_UID|LA_GID|LA_PROJID))
581                 mutex_unlock(&mo->mot_lov_mutex);
582
583         if (rc != 0)
584                 GOTO(out_unlock, rc);
585         mdt_dom_obj_lvb_update(info->mti_env, mo, false);
586         EXIT;
587 out_unlock:
588         mdt_reint_striped_unlock(info, mo, lh, einfo, rc);
589         return rc;
590 }
591
592 /**
593  * Check HSM flags and add HS_DIRTY flag if relevant.
594  *
595  * A file could be set dirty only if it has a copy in the backend (HS_EXISTS)
596  * and is not RELEASED.
597  */
598 int mdt_add_dirty_flag(struct mdt_thread_info *info, struct mdt_object *mo,
599                         struct md_attr *ma)
600 {
601         struct lu_ucred *uc = mdt_ucred(info);
602         cfs_cap_t cap_saved;
603         int rc;
604         ENTRY;
605
606         /* If the file was modified, add the dirty flag */
607         ma->ma_need = MA_HSM;
608         rc = mdt_attr_get_complex(info, mo, ma);
609         if (rc) {
610                 CERROR("file attribute read error for "DFID": %d.\n",
611                         PFID(mdt_object_fid(mo)), rc);
612                 RETURN(rc);
613         }
614
615         /* If an up2date copy exists in the backend, add dirty flag */
616         if ((ma->ma_valid & MA_HSM) && (ma->ma_hsm.mh_flags & HS_EXISTS)
617             && !(ma->ma_hsm.mh_flags & (HS_DIRTY|HS_RELEASED))) {
618                 ma->ma_hsm.mh_flags |= HS_DIRTY;
619
620                 /* Bump cap so that closes from non-owner writers can
621                  * set the HSM state to dirty. */
622                 cap_saved = uc->uc_cap;
623                 uc->uc_cap |= MD_CAP_TO_MASK(CFS_CAP_FOWNER);
624                 rc = mdt_hsm_attr_set(info, mo, &ma->ma_hsm);
625                 uc->uc_cap = cap_saved;
626                 if (rc)
627                         CERROR("file attribute change error for "DFID": %d\n",
628                                 PFID(mdt_object_fid(mo)), rc);
629         }
630
631         RETURN(rc);
632 }
633
634 static int mdt_reint_setattr(struct mdt_thread_info *info,
635                              struct mdt_lock_handle *lhc)
636 {
637         struct mdt_device *mdt = info->mti_mdt;
638         struct md_attr *ma = &info->mti_attr;
639         struct mdt_reint_record *rr = &info->mti_rr;
640         struct ptlrpc_request *req = mdt_info_req(info);
641         struct mdt_object *mo;
642         struct mdt_body *repbody;
643         int rc, rc2;
644         ENTRY;
645
646         DEBUG_REQ(D_INODE, req, "setattr "DFID" %x", PFID(rr->rr_fid1),
647                   (unsigned int)ma->ma_attr.la_valid);
648
649         if (info->mti_dlm_req)
650                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
651
652         OBD_RACE(OBD_FAIL_PTLRPC_RESEND_RACE);
653
654         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
655         mo = mdt_object_find(info->mti_env, mdt, rr->rr_fid1);
656         if (IS_ERR(mo))
657                 GOTO(out, rc = PTR_ERR(mo));
658
659         if (!mdt_object_exists(mo))
660                 GOTO(out_put, rc = -ENOENT);
661
662         if (mdt_object_remote(mo))
663                 GOTO(out_put, rc = -EREMOTE);
664
665         /* revoke lease lock if size is going to be changed */
666         if (unlikely(ma->ma_attr.la_valid & LA_SIZE &&
667                      !(ma->ma_attr_flags & MDS_TRUNC_KEEP_LEASE) &&
668                      atomic_read(&mo->mot_lease_count) > 0)) {
669                 down_read(&mo->mot_open_sem);
670
671                 if (atomic_read(&mo->mot_lease_count) > 0) { /* lease exists */
672                         lhc = &info->mti_lh[MDT_LH_LOCAL];
673                         mdt_lock_reg_init(lhc, LCK_CW);
674
675                         rc = mdt_object_lock(info, mo, lhc, MDS_INODELOCK_OPEN);
676                         if (rc != 0) {
677                                 up_read(&mo->mot_open_sem);
678                                 GOTO(out_put, rc);
679                         }
680
681                         /* revoke lease lock */
682                         mdt_object_unlock(info, mo, lhc, 1);
683                 }
684                 up_read(&mo->mot_open_sem);
685         }
686
687         if (ma->ma_attr.la_valid & LA_SIZE || rr->rr_flags & MRF_OPEN_TRUNC) {
688                 /* Check write access for the O_TRUNC case */
689                 if (mdt_write_read(mo) < 0)
690                         GOTO(out_put, rc = -ETXTBSY);
691
692                 /* LU-10286: compatibility check for FLR.
693                  * Please check the comment in mdt_finish_open() for details */
694                 if (!exp_connect_flr(info->mti_exp) ||
695                     !exp_connect_overstriping(info->mti_exp)) {
696                         rc = mdt_big_xattr_get(info, mo, XATTR_NAME_LOV);
697                         if (rc < 0 && rc != -ENODATA)
698                                 GOTO(out_put, rc);
699
700                         if (!exp_connect_flr(info->mti_exp)) {
701                                 if (rc > 0 &&
702                                     mdt_lmm_is_flr(info->mti_big_lmm))
703                                         GOTO(out_put, rc = -EOPNOTSUPP);
704                         }
705
706                         if (!exp_connect_overstriping(info->mti_exp)) {
707                                 if (rc > 0 &&
708                                     mdt_lmm_is_overstriping(info->mti_big_lmm))
709                                         GOTO(out_put, rc = -EOPNOTSUPP);
710                         }
711                 }
712
713                 /* For truncate, the file size sent from client
714                  * is believable, but the blocks are incorrect,
715                  * which makes the block size in LSOM attribute
716                  * inconsisent with the real block size.
717                  */
718                 rc = mdt_lsom_update(info, mo, true);
719                 if (rc)
720                         GOTO(out_put, rc);
721         }
722
723         if ((ma->ma_valid & MA_INODE) && ma->ma_attr.la_valid) {
724                 if (ma->ma_valid & MA_LOV)
725                         GOTO(out_put, rc = -EPROTO);
726
727                 /* MDT supports FMD for regular files due to Data-on-MDT */
728                 if (S_ISREG(lu_object_attr(&mo->mot_obj)) &&
729                     ma->ma_attr.la_valid & (LA_ATIME | LA_MTIME | LA_CTIME))
730                         tgt_fmd_update(info->mti_exp, mdt_object_fid(mo),
731                                        req->rq_xid);
732
733                 rc = mdt_attr_set(info, mo, ma);
734                 if (rc)
735                         GOTO(out_put, rc);
736         } else if ((ma->ma_valid & (MA_LOV | MA_LMV)) &&
737                    (ma->ma_valid & MA_INODE)) {
738                 struct lu_buf *buf = &info->mti_buf;
739                 struct lu_ucred *uc = mdt_ucred(info);
740                 struct mdt_lock_handle *lh;
741                 const char *name;
742                 __u64 lockpart = MDS_INODELOCK_XATTR;
743
744                 /* reject if either remote or striped dir is disabled */
745                 if (ma->ma_valid & MA_LMV) {
746                         if (!mdt->mdt_enable_remote_dir ||
747                             !mdt->mdt_enable_striped_dir)
748                                 GOTO(out_put, rc = -EPERM);
749
750                         if (!md_capable(uc, CFS_CAP_SYS_ADMIN) &&
751                             uc->uc_gid != mdt->mdt_enable_remote_dir_gid &&
752                             mdt->mdt_enable_remote_dir_gid != -1)
753                                 GOTO(out_put, rc = -EPERM);
754                 }
755
756                 if (!S_ISDIR(lu_object_attr(&mo->mot_obj)))
757                         GOTO(out_put, rc = -ENOTDIR);
758
759                 if (ma->ma_attr.la_valid != 0)
760                         GOTO(out_put, rc = -EPROTO);
761
762                 if (ma->ma_valid & MA_LOV) {
763                         buf->lb_buf = ma->ma_lmm;
764                         buf->lb_len = ma->ma_lmm_size;
765                         name = XATTR_NAME_LOV;
766                 } else {
767                         struct lmv_user_md *lmu = &ma->ma_lmv->lmv_user_md;
768
769                         buf->lb_buf = lmu;
770                         buf->lb_len = ma->ma_lmv_size;
771
772                         if (le32_to_cpu(lmu->lum_hash_type) &
773                             LMV_HASH_FLAG_SPACE) {
774                                 /*
775                                  * only allow setting "space" hash flag on
776                                  * plain directory.
777                                  */
778                                 rc = mdt_object_striped(info, mo);
779                                 if (rc)
780                                         GOTO(out_put,
781                                              rc = (rc == 1) ? -EPERM : rc);
782                         }
783
784                         name = XATTR_NAME_DEFAULT_LMV;
785                         /* force client to update dir default layout */
786                         lockpart |= MDS_INODELOCK_LOOKUP;
787                 }
788
789                 lh = &info->mti_lh[MDT_LH_PARENT];
790                 mdt_lock_reg_init(lh, LCK_PW);
791
792                 rc = mdt_object_lock(info, mo, lh, lockpart);
793                 if (rc != 0)
794                         GOTO(out_put, rc);
795
796                 rc = mo_xattr_set(info->mti_env, mdt_object_child(mo), buf,
797                                   name, 0);
798
799                 mdt_object_unlock(info, mo, lh, rc);
800                 if (rc)
801                         GOTO(out_put, rc);
802         } else {
803                 GOTO(out_put, rc = -EPROTO);
804         }
805
806         /* If file data is modified, add the dirty flag */
807         if (ma->ma_attr_flags & MDS_DATA_MODIFIED)
808                 rc = mdt_add_dirty_flag(info, mo, ma);
809
810         ma->ma_need = MA_INODE;
811         ma->ma_valid = 0;
812         rc = mdt_attr_get_complex(info, mo, ma);
813         if (rc != 0)
814                 GOTO(out_put, rc);
815
816         mdt_pack_attr2body(info, repbody, &ma->ma_attr, mdt_object_fid(mo));
817
818         EXIT;
819 out_put:
820         mdt_object_put(info->mti_env, mo);
821 out:
822         if (rc == 0)
823                 mdt_counter_incr(req, LPROC_MDT_SETATTR);
824
825         mdt_client_compatibility(info);
826         rc2 = mdt_fix_reply(info);
827         if (rc == 0)
828                 rc = rc2;
829         return rc;
830 }
831
832 static int mdt_reint_create(struct mdt_thread_info *info,
833                             struct mdt_lock_handle *lhc)
834 {
835         struct ptlrpc_request   *req = mdt_info_req(info);
836         int                     rc;
837         ENTRY;
838
839         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_CREATE))
840                 RETURN(err_serious(-ESTALE));
841
842         if (info->mti_dlm_req)
843                 ldlm_request_cancel(mdt_info_req(info),
844                                     info->mti_dlm_req, 0, LATF_SKIP);
845
846         if (!lu_name_is_valid(&info->mti_rr.rr_name))
847                 RETURN(-EPROTO);
848
849         switch (info->mti_attr.ma_attr.la_mode & S_IFMT) {
850         case S_IFDIR:
851                 mdt_counter_incr(req, LPROC_MDT_MKDIR);
852                 break;
853         case S_IFREG:
854         case S_IFLNK:
855         case S_IFCHR:
856         case S_IFBLK:
857         case S_IFIFO:
858         case S_IFSOCK:
859                 /* Special file should stay on the same node as parent. */
860                 mdt_counter_incr(req, LPROC_MDT_MKNOD);
861                 break;
862         default:
863                 CERROR("%s: Unsupported mode %o\n",
864                        mdt_obd_name(info->mti_mdt),
865                        info->mti_attr.ma_attr.la_mode);
866                 RETURN(err_serious(-EOPNOTSUPP));
867         }
868
869         rc = mdt_create(info);
870         RETURN(rc);
871 }
872
873 /*
874  * VBR: save parent version in reply and child version getting by its name.
875  * Version of child is getting and checking during its lookup. If
876  */
877 static int mdt_reint_unlink(struct mdt_thread_info *info,
878                             struct mdt_lock_handle *lhc)
879 {
880         struct mdt_reint_record *rr = &info->mti_rr;
881         struct ptlrpc_request *req = mdt_info_req(info);
882         struct md_attr *ma = &info->mti_attr;
883         struct lu_fid *child_fid = &info->mti_tmp_fid1;
884         struct mdt_object *mp;
885         struct mdt_object *mc;
886         struct mdt_lock_handle *parent_lh;
887         struct mdt_lock_handle *child_lh;
888         struct ldlm_enqueue_info *einfo = &info->mti_einfo[0];
889         __u64 lock_ibits;
890         bool cos_incompat = false;
891         int no_name = 0;
892         int rc;
893
894         ENTRY;
895
896         DEBUG_REQ(D_INODE, req, "unlink "DFID"/"DNAME"", PFID(rr->rr_fid1),
897                   PNAME(&rr->rr_name));
898
899         if (info->mti_dlm_req)
900                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
901
902         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_UNLINK))
903                 RETURN(err_serious(-ENOENT));
904
905         if (!fid_is_md_operative(rr->rr_fid1))
906                 RETURN(-EPERM);
907
908         mp = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
909         if (IS_ERR(mp))
910                 RETURN(PTR_ERR(mp));
911
912         if (mdt_object_remote(mp)) {
913                 cos_incompat = true;
914         } else {
915                 rc = mdt_version_get_check_save(info, mp, 0);
916                 if (rc)
917                         GOTO(put_parent, rc);
918         }
919
920 relock:
921         parent_lh = &info->mti_lh[MDT_LH_PARENT];
922         mdt_lock_pdo_init(parent_lh, LCK_PW, &rr->rr_name);
923         rc = mdt_reint_object_lock(info, mp, parent_lh, MDS_INODELOCK_UPDATE,
924                                    cos_incompat);
925         if (rc != 0)
926                 GOTO(put_parent, rc);
927
928         /* lookup child object along with version checking */
929         fid_zero(child_fid);
930         rc = mdt_lookup_version_check(info, mp, &rr->rr_name, child_fid, 1);
931         if (rc != 0) {
932                 /* Name might not be able to find during resend of
933                  * remote unlink, considering following case.
934                  * dir_A is a remote directory, the name entry of
935                  * dir_A is on MDT0, the directory is on MDT1,
936                  *
937                  * 1. client sends unlink req to MDT1.
938                  * 2. MDT1 sends name delete update to MDT0.
939                  * 3. name entry is being deleted in MDT0 synchronously.
940                  * 4. MDT1 is restarted.
941                  * 5. client resends unlink req to MDT1. So it can not
942                  *    find the name entry on MDT0 anymore.
943                  * In this case, MDT1 only needs to destory the local
944                  * directory.
945                  * */
946                 if (mdt_object_remote(mp) && rc == -ENOENT &&
947                     !fid_is_zero(rr->rr_fid2) &&
948                     lustre_msg_get_flags(req->rq_reqmsg) & MSG_RESENT) {
949                         no_name = 1;
950                         *child_fid = *rr->rr_fid2;
951                  } else {
952                         GOTO(unlock_parent, rc);
953                  }
954         }
955
956         if (!fid_is_md_operative(child_fid))
957                 GOTO(unlock_parent, rc = -EPERM);
958
959         /* We will lock the child regardless it is local or remote. No harm. */
960         mc = mdt_object_find(info->mti_env, info->mti_mdt, child_fid);
961         if (IS_ERR(mc))
962                 GOTO(unlock_parent, rc = PTR_ERR(mc));
963
964         if (!cos_incompat) {
965                 rc = mdt_object_striped(info, mc);
966                 if (rc < 0)
967                         GOTO(put_child, rc);
968
969                 cos_incompat = rc;
970                 if (cos_incompat) {
971                         mdt_object_put(info->mti_env, mc);
972                         mdt_object_unlock(info, mp, parent_lh, -EAGAIN);
973                         goto relock;
974                 }
975         }
976
977         child_lh = &info->mti_lh[MDT_LH_CHILD];
978         mdt_lock_reg_init(child_lh, LCK_EX);
979         if (info->mti_spec.sp_rm_entry) {
980                 struct lu_ucred *uc  = mdt_ucred(info);
981
982                 if (!mdt_is_dne_client(req->rq_export))
983                         /* Return -ENOTSUPP for old client */
984                         GOTO(put_child, rc = -ENOTSUPP);
985
986                 if (!md_capable(uc, CFS_CAP_SYS_ADMIN))
987                         GOTO(put_child, rc = -EPERM);
988
989                 ma->ma_need = MA_INODE;
990                 ma->ma_valid = 0;
991                 rc = mdo_unlink(info->mti_env, mdt_object_child(mp),
992                                 NULL, &rr->rr_name, ma, no_name);
993                 GOTO(put_child, rc);
994         }
995
996         if (mdt_object_remote(mc)) {
997                 struct mdt_body  *repbody;
998
999                 if (!fid_is_zero(rr->rr_fid2)) {
1000                         CDEBUG(D_INFO, "%s: name "DNAME" cannot find "DFID"\n",
1001                                mdt_obd_name(info->mti_mdt),
1002                                PNAME(&rr->rr_name), PFID(mdt_object_fid(mc)));
1003                         GOTO(put_child, rc = -ENOENT);
1004                 }
1005                 CDEBUG(D_INFO, "%s: name "DNAME": "DFID" is on another MDT\n",
1006                        mdt_obd_name(info->mti_mdt),
1007                        PNAME(&rr->rr_name), PFID(mdt_object_fid(mc)));
1008
1009                 if (!mdt_is_dne_client(req->rq_export))
1010                         /* Return -ENOTSUPP for old client */
1011                         GOTO(put_child, rc = -ENOTSUPP);
1012
1013                 /* Revoke the LOOKUP lock of the remote object granted by
1014                  * this MDT. Since the unlink will happen on another MDT,
1015                  * it will release the LOOKUP lock right away. Then What
1016                  * would happen if another client try to grab the LOOKUP
1017                  * lock at the same time with unlink XXX */
1018                 mdt_object_lock(info, mc, child_lh, MDS_INODELOCK_LOOKUP);
1019                 repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
1020                 LASSERT(repbody != NULL);
1021                 repbody->mbo_fid1 = *mdt_object_fid(mc);
1022                 repbody->mbo_valid |= (OBD_MD_FLID | OBD_MD_MDS);
1023                 GOTO(unlock_child, rc = -EREMOTE);
1024         }
1025         /* We used to acquire MDS_INODELOCK_FULL here but we can't do
1026          * this now because a running HSM restore on the child (unlink
1027          * victim) will hold the layout lock. See LU-4002. */
1028         lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE;
1029         if (mdt_object_remote(mp)) {
1030                 /* Enqueue lookup lock from parent MDT */
1031                 rc = mdt_remote_object_lock(info, mp, mdt_object_fid(mc),
1032                                             &child_lh->mlh_rreg_lh,
1033                                             child_lh->mlh_rreg_mode,
1034                                             MDS_INODELOCK_LOOKUP, false);
1035                 if (rc != ELDLM_OK)
1036                         GOTO(put_child, rc);
1037
1038                 lock_ibits &= ~MDS_INODELOCK_LOOKUP;
1039         }
1040
1041         rc = mdt_reint_striped_lock(info, mc, child_lh, lock_ibits, einfo,
1042                                     cos_incompat);
1043         if (rc != 0)
1044                 GOTO(put_child, rc);
1045
1046         /*
1047          * Now we can only make sure we need MA_INODE, in mdd layer, will check
1048          * whether need MA_LOV and MA_COOKIE.
1049          */
1050         ma->ma_need = MA_INODE;
1051         ma->ma_valid = 0;
1052
1053         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
1054                        OBD_FAIL_MDS_REINT_UNLINK_WRITE);
1055         /* save version when object is locked */
1056         mdt_version_get_save(info, mc, 1);
1057
1058         mutex_lock(&mc->mot_lov_mutex);
1059
1060         rc = mdo_unlink(info->mti_env, mdt_object_child(mp),
1061                         mdt_object_child(mc), &rr->rr_name, ma, no_name);
1062
1063         mutex_unlock(&mc->mot_lov_mutex);
1064         if (rc != 0)
1065                 GOTO(unlock_child, rc);
1066
1067         if (!lu_object_is_dying(&mc->mot_header)) {
1068                 rc = mdt_attr_get_complex(info, mc, ma);
1069                 if (rc)
1070                         GOTO(out_stat, rc);
1071         } else if (mdt_dom_check_for_discard(info, mc)) {
1072                 mdt_dom_discard_data(info, mc);
1073         }
1074         mdt_handle_last_unlink(info, mc, ma);
1075
1076 out_stat:
1077         if (ma->ma_valid & MA_INODE) {
1078                 switch (ma->ma_attr.la_mode & S_IFMT) {
1079                 case S_IFDIR:
1080                         mdt_counter_incr(req, LPROC_MDT_RMDIR);
1081                         break;
1082                 case S_IFREG:
1083                 case S_IFLNK:
1084                 case S_IFCHR:
1085                 case S_IFBLK:
1086                 case S_IFIFO:
1087                 case S_IFSOCK:
1088                         mdt_counter_incr(req, LPROC_MDT_UNLINK);
1089                         break;
1090                 default:
1091                         LASSERTF(0, "bad file type %o unlinking\n",
1092                                 ma->ma_attr.la_mode);
1093                 }
1094         }
1095
1096         EXIT;
1097
1098 unlock_child:
1099         mdt_reint_striped_unlock(info, mc, child_lh, einfo, rc);
1100 put_child:
1101         mdt_object_put(info->mti_env, mc);
1102 unlock_parent:
1103         mdt_object_unlock(info, mp, parent_lh, rc);
1104 put_parent:
1105         mdt_object_put(info->mti_env, mp);
1106         CFS_RACE_WAKEUP(OBD_FAIL_OBD_ZERO_NLINK_RACE);
1107         return rc;
1108 }
1109
1110 /*
1111  * VBR: save versions in reply: 0 - parent; 1 - child by fid; 2 - target by
1112  * name.
1113  */
1114 static int mdt_reint_link(struct mdt_thread_info *info,
1115                           struct mdt_lock_handle *lhc)
1116 {
1117         struct mdt_reint_record *rr = &info->mti_rr;
1118         struct ptlrpc_request   *req = mdt_info_req(info);
1119         struct md_attr          *ma = &info->mti_attr;
1120         struct mdt_object       *ms;
1121         struct mdt_object       *mp;
1122         struct mdt_lock_handle  *lhs;
1123         struct mdt_lock_handle  *lhp;
1124         bool cos_incompat;
1125         int rc;
1126         ENTRY;
1127
1128         DEBUG_REQ(D_INODE, req, "link "DFID" to "DFID"/"DNAME,
1129                   PFID(rr->rr_fid1), PFID(rr->rr_fid2), PNAME(&rr->rr_name));
1130
1131         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_LINK))
1132                 RETURN(err_serious(-ENOENT));
1133
1134         if (OBD_FAIL_PRECHECK(OBD_FAIL_PTLRPC_RESEND_RACE)) {
1135                 req->rq_no_reply = 1;
1136                 RETURN(err_serious(-ENOENT));
1137         }
1138
1139         if (info->mti_dlm_req)
1140                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
1141
1142         /* Invalid case so return error immediately instead of
1143          * processing it */
1144         if (lu_fid_eq(rr->rr_fid1, rr->rr_fid2))
1145                 RETURN(-EPERM);
1146
1147         if (!fid_is_md_operative(rr->rr_fid1) ||
1148             !fid_is_md_operative(rr->rr_fid2))
1149                 RETURN(-EPERM);
1150
1151         /* step 1: find target parent dir */
1152         mp = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid2);
1153         if (IS_ERR(mp))
1154                 RETURN(PTR_ERR(mp));
1155
1156         rc = mdt_version_get_check_save(info, mp, 0);
1157         if (rc)
1158                 GOTO(put_parent, rc);
1159
1160         /* step 2: find source */
1161         ms = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
1162         if (IS_ERR(ms))
1163                 GOTO(put_parent, rc = PTR_ERR(ms));
1164
1165         if (!mdt_object_exists(ms)) {
1166                 CDEBUG(D_INFO, "%s: "DFID" does not exist.\n",
1167                        mdt_obd_name(info->mti_mdt), PFID(rr->rr_fid1));
1168                 GOTO(put_source, rc = -ENOENT);
1169         }
1170
1171         cos_incompat = (mdt_object_remote(mp) || mdt_object_remote(ms));
1172
1173         lhp = &info->mti_lh[MDT_LH_PARENT];
1174         mdt_lock_pdo_init(lhp, LCK_PW, &rr->rr_name);
1175         rc = mdt_reint_object_lock(info, mp, lhp, MDS_INODELOCK_UPDATE,
1176                                    cos_incompat);
1177         if (rc != 0)
1178                 GOTO(put_source, rc);
1179
1180         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME3, 5);
1181
1182         lhs = &info->mti_lh[MDT_LH_CHILD];
1183         mdt_lock_reg_init(lhs, LCK_EX);
1184         rc = mdt_reint_object_lock(info, ms, lhs,
1185                                    MDS_INODELOCK_UPDATE | MDS_INODELOCK_XATTR,
1186                                    cos_incompat);
1187         if (rc != 0)
1188                 GOTO(unlock_parent, rc);
1189
1190         /* step 3: link it */
1191         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
1192                         OBD_FAIL_MDS_REINT_LINK_WRITE);
1193
1194         tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(ms));
1195         rc = mdt_version_get_check_save(info, ms, 1);
1196         if (rc)
1197                 GOTO(unlock_source, rc);
1198
1199         /** check target version by name during replay */
1200         rc = mdt_lookup_version_check(info, mp, &rr->rr_name,
1201                                       &info->mti_tmp_fid1, 2);
1202         if (rc != 0 && rc != -ENOENT)
1203                 GOTO(unlock_source, rc);
1204         /* save version of file name for replay, it must be ENOENT here */
1205         if (!req_is_replay(mdt_info_req(info))) {
1206                 if (rc != -ENOENT) {
1207                         CDEBUG(D_INFO, "link target "DNAME" existed!\n",
1208                                PNAME(&rr->rr_name));
1209                         GOTO(unlock_source, rc = -EEXIST);
1210                 }
1211                 info->mti_ver[2] = ENOENT_VERSION;
1212                 mdt_version_save(mdt_info_req(info), info->mti_ver[2], 2);
1213         }
1214
1215         rc = mdo_link(info->mti_env, mdt_object_child(mp),
1216                       mdt_object_child(ms), &rr->rr_name, ma);
1217
1218         if (rc == 0)
1219                 mdt_counter_incr(req, LPROC_MDT_LINK);
1220
1221         EXIT;
1222 unlock_source:
1223         mdt_object_unlock(info, ms, lhs, rc);
1224 unlock_parent:
1225         mdt_object_unlock(info, mp, lhp, rc);
1226 put_source:
1227         mdt_object_put(info->mti_env, ms);
1228 put_parent:
1229         mdt_object_put(info->mti_env, mp);
1230         return rc;
1231 }
1232 /**
1233  * lock the part of the directory according to the hash of the name
1234  * (lh->mlh_pdo_hash) in parallel directory lock.
1235  */
1236 static int mdt_pdir_hash_lock(struct mdt_thread_info *info,
1237                               struct mdt_lock_handle *lh,
1238                               struct mdt_object *obj, __u64 ibits,
1239                               bool cos_incompat)
1240 {
1241         struct ldlm_res_id *res = &info->mti_res_id;
1242         struct ldlm_namespace *ns = info->mti_mdt->mdt_namespace;
1243         union ldlm_policy_data *policy = &info->mti_policy;
1244         __u64 dlmflags = LDLM_FL_LOCAL_ONLY | LDLM_FL_ATOMIC_CB;
1245         int rc;
1246
1247         /*
1248          * Finish res_id initializing by name hash marking part of
1249          * directory which is taking modification.
1250          */
1251         LASSERT(lh->mlh_pdo_hash != 0);
1252         fid_build_pdo_res_name(mdt_object_fid(obj), lh->mlh_pdo_hash, res);
1253         memset(policy, 0, sizeof(*policy));
1254         policy->l_inodebits.bits = ibits;
1255         if (cos_incompat &&
1256             (lh->mlh_reg_mode == LCK_PW || lh->mlh_reg_mode == LCK_EX))
1257                 dlmflags |= LDLM_FL_COS_INCOMPAT;
1258         /*
1259          * Use LDLM_FL_LOCAL_ONLY for this lock. We do not know yet if it is
1260          * going to be sent to client. If it is - mdt_intent_policy() path will
1261          * fix it up and turn FL_LOCAL flag off.
1262          */
1263         rc = mdt_fid_lock(info->mti_env, ns, &lh->mlh_reg_lh, lh->mlh_reg_mode,
1264                           policy, res, dlmflags,
1265                           &info->mti_exp->exp_handle.h_cookie);
1266         return rc;
1267 }
1268
1269 /**
1270  * Get BFL lock for rename or migrate process.
1271  **/
1272 static int mdt_rename_lock(struct mdt_thread_info *info,
1273                            struct lustre_handle *lh)
1274 {
1275         int     rc;
1276         ENTRY;
1277
1278         if (mdt_seq_site(info->mti_mdt)->ss_node_id != 0) {
1279                 struct lu_fid *fid = &info->mti_tmp_fid1;
1280                 struct mdt_object *obj;
1281
1282                 /* XXX, right now, it has to use object API to
1283                  * enqueue lock cross MDT, so it will enqueue
1284                  * rename lock(with LUSTRE_BFL_FID) by root object */
1285                 lu_root_fid(fid);
1286                 obj = mdt_object_find(info->mti_env, info->mti_mdt, fid);
1287                 if (IS_ERR(obj))
1288                         RETURN(PTR_ERR(obj));
1289
1290                 rc = mdt_remote_object_lock(info, obj,
1291                                             &LUSTRE_BFL_FID, lh,
1292                                             LCK_EX,
1293                                             MDS_INODELOCK_UPDATE, false);
1294                 mdt_object_put(info->mti_env, obj);
1295         } else {
1296                 struct ldlm_namespace *ns = info->mti_mdt->mdt_namespace;
1297                 union ldlm_policy_data *policy = &info->mti_policy;
1298                 struct ldlm_res_id *res_id = &info->mti_res_id;
1299                 __u64 flags = 0;
1300
1301                 fid_build_reg_res_name(&LUSTRE_BFL_FID, res_id);
1302                 memset(policy, 0, sizeof *policy);
1303                 policy->l_inodebits.bits = MDS_INODELOCK_UPDATE;
1304                 flags = LDLM_FL_LOCAL_ONLY | LDLM_FL_ATOMIC_CB;
1305                 rc = ldlm_cli_enqueue_local(info->mti_env, ns, res_id,
1306                                             LDLM_IBITS, policy, LCK_EX, &flags,
1307                                             ldlm_blocking_ast,
1308                                             ldlm_completion_ast, NULL, NULL, 0,
1309                                             LVB_T_NONE,
1310                                             &info->mti_exp->exp_handle.h_cookie,
1311                                             lh);
1312                 RETURN(rc);
1313         }
1314         RETURN(rc);
1315 }
1316
1317 static void mdt_rename_unlock(struct lustre_handle *lh)
1318 {
1319         ENTRY;
1320         LASSERT(lustre_handle_is_used(lh));
1321         /* Cancel the single rename lock right away */
1322         ldlm_lock_decref_and_cancel(lh, LCK_EX);
1323         EXIT;
1324 }
1325
1326 static struct mdt_object *mdt_parent_find_check(struct mdt_thread_info *info,
1327                                                 const struct lu_fid *fid,
1328                                                 int idx)
1329 {
1330         struct mdt_object *dir;
1331         int rc;
1332
1333         ENTRY;
1334
1335         dir = mdt_object_find(info->mti_env, info->mti_mdt, fid);
1336         if (IS_ERR(dir))
1337                 RETURN(dir);
1338
1339         /* check early, the real version will be saved after locking */
1340         rc = mdt_version_get_check(info, dir, idx);
1341         if (rc)
1342                 GOTO(out_put, rc);
1343
1344         if (!mdt_object_exists(dir))
1345                 GOTO(out_put, rc = -ENOENT);
1346
1347         if (!S_ISDIR(lu_object_attr(&dir->mot_obj)))
1348                 GOTO(out_put, rc = -ENOTDIR);
1349
1350         RETURN(dir);
1351 out_put:
1352         mdt_object_put(info->mti_env, dir);
1353         return ERR_PTR(rc);
1354 }
1355
1356 /*
1357  * in case obj is remote obj on its parent, revoke LOOKUP lock,
1358  * herein we don't really check it, just do revoke.
1359  */
1360 int mdt_revoke_remote_lookup_lock(struct mdt_thread_info *info,
1361                                   struct mdt_object *pobj,
1362                                   struct mdt_object *obj)
1363 {
1364         struct mdt_lock_handle *lh = &info->mti_lh[MDT_LH_LOCAL];
1365         int rc;
1366
1367         mdt_lock_handle_init(lh);
1368         mdt_lock_reg_init(lh, LCK_EX);
1369
1370         if (mdt_object_remote(pobj)) {
1371                 /* don't bother to check if pobj and obj are on the same MDT. */
1372                 rc = mdt_remote_object_lock(info, pobj, mdt_object_fid(obj),
1373                                             &lh->mlh_rreg_lh, LCK_EX,
1374                                             MDS_INODELOCK_LOOKUP, false);
1375         } else if (mdt_object_remote(obj)) {
1376                 struct ldlm_res_id *res = &info->mti_res_id;
1377                 union ldlm_policy_data *policy = &info->mti_policy;
1378                 __u64 dlmflags = LDLM_FL_LOCAL_ONLY | LDLM_FL_ATOMIC_CB |
1379                                  LDLM_FL_COS_INCOMPAT;
1380
1381                 fid_build_reg_res_name(mdt_object_fid(obj), res);
1382                 memset(policy, 0, sizeof(*policy));
1383                 policy->l_inodebits.bits = MDS_INODELOCK_LOOKUP;
1384                 rc = mdt_fid_lock(info->mti_env, info->mti_mdt->mdt_namespace,
1385                                   &lh->mlh_reg_lh, LCK_EX, policy, res,
1386                                   dlmflags, NULL);
1387         } else {
1388                 /* do nothing if both are local */
1389                 return 0;
1390         }
1391
1392         if (rc != ELDLM_OK)
1393                 return rc;
1394
1395         /*
1396          * TODO, currently we don't save this lock because there is no place to
1397          * hold this lock handle, but to avoid race we need to save this lock.
1398          */
1399         mdt_object_unlock(info, NULL, lh, 1);
1400
1401         return 0;
1402 }
1403
1404 /*
1405  * operation may takes locks of linkea, or directory stripes, group them in
1406  * different list.
1407  */
1408 struct mdt_sub_lock {
1409         struct mdt_object      *msl_obj;
1410         struct mdt_lock_handle  msl_lh;
1411         struct list_head        msl_linkage;
1412 };
1413
1414 static void mdt_unlock_list(struct mdt_thread_info *info,
1415                             struct list_head *list, int decref)
1416 {
1417         struct mdt_sub_lock *msl;
1418         struct mdt_sub_lock *tmp;
1419
1420         list_for_each_entry_safe(msl, tmp, list, msl_linkage) {
1421                 mdt_object_unlock_put(info, msl->msl_obj, &msl->msl_lh, decref);
1422                 list_del(&msl->msl_linkage);
1423                 OBD_FREE_PTR(msl);
1424         }
1425 }
1426
1427 static inline void mdt_migrate_object_unlock(struct mdt_thread_info *info,
1428                                              struct mdt_object *obj,
1429                                              struct mdt_lock_handle *lh,
1430                                              struct ldlm_enqueue_info *einfo,
1431                                              struct list_head *slave_locks,
1432                                              int decref)
1433 {
1434         if (mdt_object_remote(obj)) {
1435                 mdt_unlock_list(info, slave_locks, decref);
1436                 mdt_object_unlock(info, obj, lh, decref);
1437         } else {
1438                 mdt_reint_striped_unlock(info, obj, lh, einfo, decref);
1439         }
1440 }
1441
1442 /*
1443  * lock parents of links, and also check whether total locks don't exceed
1444  * RS_MAX_LOCKS.
1445  *
1446  * \retval      0 on success, and locks can be saved in ptlrpc_reply_stat
1447  * \retval      1 on success, but total lock count may exceed RS_MAX_LOCKS
1448  * \retval      -ev negative errno upon error
1449  */
1450 static int mdt_link_parents_lock(struct mdt_thread_info *info,
1451                                  struct mdt_object *pobj,
1452                                  const struct md_attr *ma,
1453                                  struct mdt_object *obj,
1454                                  struct mdt_lock_handle *lhp,
1455                                  struct ldlm_enqueue_info *peinfo,
1456                                  struct list_head *parent_slave_locks,
1457                                  struct list_head *link_locks)
1458 {
1459         struct mdt_device *mdt = info->mti_mdt;
1460         struct lu_buf *buf = &info->mti_big_buf;
1461         struct lu_name *lname = &info->mti_name;
1462         struct linkea_data ldata = { NULL };
1463         bool blocked = false;
1464         int local_lnkp_cnt = 0;
1465         int rc;
1466
1467         ENTRY;
1468
1469         if (S_ISDIR(lu_object_attr(&obj->mot_obj)))
1470                 RETURN(0);
1471
1472         buf = lu_buf_check_and_alloc(buf, MAX_LINKEA_SIZE);
1473         if (buf->lb_buf == NULL)
1474                 RETURN(-ENOMEM);
1475
1476         ldata.ld_buf = buf;
1477         rc = mdt_links_read(info, obj, &ldata);
1478         if (rc) {
1479                 if (rc == -ENOENT || rc == -ENODATA)
1480                         rc = 0;
1481                 RETURN(rc);
1482         }
1483
1484         for (linkea_first_entry(&ldata); ldata.ld_lee && !rc;
1485              linkea_next_entry(&ldata)) {
1486                 struct mdt_object *lnkp;
1487                 struct mdt_sub_lock *msl;
1488                 struct lu_fid fid;
1489                 __u64 ibits;
1490
1491                 linkea_entry_unpack(ldata.ld_lee, &ldata.ld_reclen, lname,
1492                                     &fid);
1493
1494                 /* check if it's also linked to parent */
1495                 if (lu_fid_eq(mdt_object_fid(pobj), &fid)) {
1496                         CDEBUG(D_INFO, "skip parent "DFID", reovke "DNAME"\n",
1497                                PFID(&fid), PNAME(lname));
1498                         /* in case link is remote object, revoke LOOKUP lock */
1499                         rc = mdt_revoke_remote_lookup_lock(info, pobj, obj);
1500                         continue;
1501                 }
1502
1503                 lnkp = NULL;
1504
1505                 /* check if it's linked to a stripe of parent */
1506                 if (ma->ma_valid & MA_LMV) {
1507                         struct lmv_mds_md_v1 *lmv = &ma->ma_lmv->lmv_md_v1;
1508                         struct lu_fid *stripe_fid = &info->mti_tmp_fid1;
1509                         int j = 0;
1510
1511                         for (; j < le32_to_cpu(lmv->lmv_stripe_count); j++) {
1512                                 fid_le_to_cpu(stripe_fid,
1513                                               &lmv->lmv_stripe_fids[j]);
1514                                 if (lu_fid_eq(stripe_fid, &fid)) {
1515                                         CDEBUG(D_INFO, "skip stripe "DFID
1516                                                ", reovke "DNAME"\n",
1517                                                PFID(&fid), PNAME(lname));
1518                                         lnkp = mdt_object_find(info->mti_env,
1519                                                                mdt, &fid);
1520                                         if (IS_ERR(lnkp))
1521                                                 GOTO(out, rc = PTR_ERR(lnkp));
1522                                         break;
1523                                 }
1524                         }
1525
1526                         if (lnkp) {
1527                                 rc = mdt_revoke_remote_lookup_lock(info, lnkp,
1528                                                                    obj);
1529                                 mdt_object_put(info->mti_env, lnkp);
1530                                 continue;
1531                         }
1532                 }
1533
1534                 /* Check if it's already locked */
1535                 list_for_each_entry(msl, link_locks, msl_linkage) {
1536                         if (lu_fid_eq(mdt_object_fid(msl->msl_obj), &fid)) {
1537                                 CDEBUG(D_INFO,
1538                                        DFID" was locked, revoke "DNAME"\n",
1539                                        PFID(&fid), PNAME(lname));
1540                                 lnkp = msl->msl_obj;
1541                                 break;
1542                         }
1543                 }
1544
1545                 if (lnkp) {
1546                         rc = mdt_revoke_remote_lookup_lock(info, lnkp, obj);
1547                         continue;
1548                 }
1549
1550                 CDEBUG(D_INFO, "lock "DFID":"DNAME"\n",
1551                        PFID(&fid), PNAME(lname));
1552
1553                 lnkp = mdt_object_find(info->mti_env, mdt, &fid);
1554                 if (IS_ERR(lnkp)) {
1555                         CWARN("%s: cannot find obj "DFID": %ld\n",
1556                               mdt_obd_name(mdt), PFID(&fid), PTR_ERR(lnkp));
1557                         continue;
1558                 }
1559
1560                 if (!mdt_object_exists(lnkp)) {
1561                         CDEBUG(D_INFO, DFID" doesn't exist, skip "DNAME"\n",
1562                               PFID(&fid), PNAME(lname));
1563                         mdt_object_put(info->mti_env, lnkp);
1564                         continue;
1565                 }
1566
1567                 if (!mdt_object_remote(lnkp))
1568                         local_lnkp_cnt++;
1569
1570                 OBD_ALLOC_PTR(msl);
1571                 if (msl == NULL)
1572                         GOTO(out, rc = -ENOMEM);
1573
1574                 /*
1575                  * we can't follow parent-child lock order like other MD
1576                  * operations, use lock_try here to avoid deadlock, if the lock
1577                  * cannot be taken, drop all locks taken, revoke the blocked
1578                  * one, and continue processing the remaining entries, and in
1579                  * the end of the loop restart from beginning.
1580                  */
1581                 mdt_lock_pdo_init(&msl->msl_lh, LCK_PW, lname);
1582                 ibits = 0;
1583                 rc = mdt_object_lock_try(info, lnkp, &msl->msl_lh, &ibits,
1584                                          MDS_INODELOCK_UPDATE, true);
1585                 if (!(ibits & MDS_INODELOCK_UPDATE)) {
1586
1587                         CDEBUG(D_INFO, "busy lock on "DFID" "DNAME"\n",
1588                                PFID(&fid), PNAME(lname));
1589
1590                         mdt_unlock_list(info, link_locks, 1);
1591                         /* also unlock parent locks to avoid deadlock */
1592                         if (!blocked)
1593                                 mdt_migrate_object_unlock(info, pobj, lhp,
1594                                                           peinfo,
1595                                                           parent_slave_locks,
1596                                                           1);
1597
1598                         blocked = true;
1599
1600                         mdt_lock_pdo_init(&msl->msl_lh, LCK_PW, lname);
1601                         rc = mdt_object_lock(info, lnkp, &msl->msl_lh,
1602                                              MDS_INODELOCK_UPDATE);
1603                         if (rc) {
1604                                 mdt_object_put(info->mti_env, lnkp);
1605                                 OBD_FREE_PTR(msl);
1606                                 GOTO(out, rc);
1607                         }
1608
1609                         if (mdt_object_remote(lnkp)) {
1610                                 struct ldlm_lock *lock;
1611
1612                                 /*
1613                                  * for remote object, set lock cb_atomic,
1614                                  * so lock can be released in blocking_ast()
1615                                  * immediately, then the next lock_try will
1616                                  * have better chance of success.
1617                                  */
1618                                 lock = ldlm_handle2lock(
1619                                                 &msl->msl_lh.mlh_rreg_lh);
1620                                 LASSERT(lock != NULL);
1621                                 lock_res_and_lock(lock);
1622                                 ldlm_set_atomic_cb(lock);
1623                                 unlock_res_and_lock(lock);
1624                                 LDLM_LOCK_PUT(lock);
1625                         }
1626
1627                         mdt_object_unlock_put(info, lnkp, &msl->msl_lh, 1);
1628                         OBD_FREE_PTR(msl);
1629                         continue;
1630                 }
1631
1632                 INIT_LIST_HEAD(&msl->msl_linkage);
1633                 msl->msl_obj = lnkp;
1634                 list_add_tail(&msl->msl_linkage, link_locks);
1635
1636                 rc = mdt_revoke_remote_lookup_lock(info, lnkp, obj);
1637         }
1638
1639         if (blocked)
1640                 GOTO(out, rc = -EBUSY);
1641
1642         EXIT;
1643 out:
1644         if (rc)
1645                 mdt_unlock_list(info, link_locks, rc);
1646         else if (local_lnkp_cnt > RS_MAX_LOCKS - 6)
1647                 /*
1648                  * parent may have 3 local objects: master object and 2 stripes
1649                  * (if it's being migrated too); source may have 2 local
1650                  * objects: master and 1 stripe; target has 1 local object.
1651                  */
1652                 rc = 1;
1653         return rc;
1654 }
1655
1656 static int mdt_lock_remote_slaves(struct mdt_thread_info *info,
1657                                   struct mdt_object *obj,
1658                                   const struct md_attr *ma,
1659                                   struct list_head *slave_locks)
1660 {
1661         struct mdt_device *mdt = info->mti_mdt;
1662         const struct lmv_mds_md_v1 *lmv = &ma->ma_lmv->lmv_md_v1;
1663         struct lu_fid *fid = &info->mti_tmp_fid1;
1664         struct mdt_object *slave;
1665         struct mdt_sub_lock *msl;
1666         int i;
1667         int rc;
1668
1669         ENTRY;
1670
1671         LASSERT(mdt_object_remote(obj));
1672         LASSERT(ma->ma_valid & MA_LMV);
1673         LASSERT(lmv);
1674
1675         if (le32_to_cpu(lmv->lmv_magic) != LMV_MAGIC_V1)
1676                 RETURN(-EINVAL);
1677
1678         if (le32_to_cpu(lmv->lmv_stripe_count) < 1)
1679                 RETURN(0);
1680
1681         for (i = 0; i < le32_to_cpu(lmv->lmv_stripe_count); i++) {
1682                 fid_le_to_cpu(fid, &lmv->lmv_stripe_fids[i]);
1683
1684                 if (!fid_is_sane(fid))
1685                         continue;
1686
1687                 slave = mdt_object_find(info->mti_env, mdt, fid);
1688                 if (IS_ERR(slave))
1689                         GOTO(out, rc = PTR_ERR(slave));
1690
1691                 OBD_ALLOC_PTR(msl);
1692                 if (!msl) {
1693                         mdt_object_put(info->mti_env, slave);
1694                         GOTO(out, rc = -ENOMEM);
1695                 }
1696
1697                 mdt_lock_reg_init(&msl->msl_lh, LCK_EX);
1698                 rc = mdt_reint_object_lock(info, slave, &msl->msl_lh,
1699                                            MDS_INODELOCK_UPDATE, true);
1700                 if (rc) {
1701                         OBD_FREE_PTR(msl);
1702                         mdt_object_put(info->mti_env, slave);
1703                         GOTO(out, rc);
1704                 }
1705
1706                 INIT_LIST_HEAD(&msl->msl_linkage);
1707                 msl->msl_obj = slave;
1708                 list_add_tail(&msl->msl_linkage, slave_locks);
1709         }
1710         EXIT;
1711
1712 out:
1713         if (rc)
1714                 mdt_unlock_list(info, slave_locks, rc);
1715         return rc;
1716 }
1717
1718 /* lock parent and its stripes */
1719 static int mdt_migrate_parent_lock(struct mdt_thread_info *info,
1720                                    struct mdt_object *obj,
1721                                    const struct md_attr *ma,
1722                                    struct mdt_lock_handle *lh,
1723                                    struct ldlm_enqueue_info *einfo,
1724                                    struct list_head *slave_locks)
1725 {
1726         int rc;
1727
1728         if (mdt_object_remote(obj)) {
1729                 rc = mdt_remote_object_lock(info, obj, mdt_object_fid(obj),
1730                                             &lh->mlh_rreg_lh, LCK_PW,
1731                                             MDS_INODELOCK_UPDATE, false);
1732                 if (rc != ELDLM_OK)
1733                         return rc;
1734
1735                 /*
1736                  * if obj is remote and striped, lock its stripes explicitly
1737                  * because it's not striped in LOD layer on this MDT.
1738                  */
1739                 if (ma->ma_valid & MA_LMV) {
1740                         rc = mdt_lock_remote_slaves(info, obj, ma, slave_locks);
1741                         if (rc)
1742                                 mdt_object_unlock(info, obj, lh, rc);
1743                 }
1744         } else {
1745                 rc = mdt_reint_striped_lock(info, obj, lh, MDS_INODELOCK_UPDATE,
1746                                             einfo, true);
1747         }
1748
1749         return rc;
1750 }
1751
1752 /*
1753  * in migration, object may be remote, and we need take full lock of it and its
1754  * stripes if it's directory, besides, object may be a remote object on its
1755  * parent, revoke its LOOKUP lock on where its parent is located.
1756  */
1757 static int mdt_migrate_object_lock(struct mdt_thread_info *info,
1758                                    struct mdt_object *pobj,
1759                                    struct mdt_object *obj,
1760                                    struct mdt_lock_handle *lh,
1761                                    struct ldlm_enqueue_info *einfo,
1762                                    struct list_head *slave_locks)
1763 {
1764         int rc;
1765
1766         if (mdt_object_remote(obj)) {
1767                 rc = mdt_revoke_remote_lookup_lock(info, pobj, obj);
1768                 if (rc)
1769                         return rc;
1770
1771                 rc = mdt_remote_object_lock(info, obj, mdt_object_fid(obj),
1772                                             &lh->mlh_rreg_lh, LCK_EX,
1773                                             MDS_INODELOCK_FULL, false);
1774                 if (rc != ELDLM_OK)
1775                         return rc;
1776
1777                 /*
1778                  * if obj is remote and striped, lock its stripes explicitly
1779                  * because it's not striped in LOD layer on this MDT.
1780                  */
1781                 if (S_ISDIR(lu_object_attr(&obj->mot_obj))) {
1782                         struct md_attr *ma = &info->mti_attr;
1783
1784                         ma->ma_lmv = info->mti_big_lmm;
1785                         ma->ma_lmv_size = info->mti_big_lmmsize;
1786                         ma->ma_valid = 0;
1787                         rc = mdt_stripe_get(info, obj, ma, XATTR_NAME_LMV);
1788                         if (rc) {
1789                                 mdt_object_unlock(info, obj, lh, rc);
1790                                 return rc;
1791                         }
1792
1793                         if (ma->ma_valid & MA_LMV) {
1794                                 rc = mdt_lock_remote_slaves(info, obj, ma,
1795                                                             slave_locks);
1796                                 if (rc)
1797                                         mdt_object_unlock(info, obj, lh, rc);
1798                         }
1799                 }
1800         } else {
1801                 if (mdt_object_remote(pobj)) {
1802                         rc = mdt_revoke_remote_lookup_lock(info, pobj, obj);
1803                         if (rc)
1804                                 return rc;
1805                 }
1806
1807                 rc = mdt_reint_striped_lock(info, obj, lh, MDS_INODELOCK_FULL,
1808                                             einfo, true);
1809         }
1810
1811         return rc;
1812 }
1813
1814 /*
1815  * lookup source by name, if parent is striped directory, we need to find the
1816  * corresponding stripe where source is located, and then lookup there.
1817  *
1818  * besides, if parent is migrating too, and file is already in target stripe,
1819  * this should be a redo of 'lfs migrate' on client side.
1820  */
1821 static int mdt_migrate_lookup(struct mdt_thread_info *info,
1822                               struct mdt_object *pobj,
1823                               const struct md_attr *ma,
1824                               const struct lu_name *lname,
1825                               struct mdt_object **spobj,
1826                               struct mdt_object **sobj)
1827 {
1828         const struct lu_env *env = info->mti_env;
1829         struct lu_fid *fid = &info->mti_tmp_fid1;
1830         struct mdt_object *stripe;
1831         int rc;
1832
1833         if (ma->ma_valid & MA_LMV) {
1834                 /* if parent is striped, lookup on corresponding stripe */
1835                 struct lmv_mds_md_v1 *lmv = &ma->ma_lmv->lmv_md_v1;
1836                 __u32 hash_type = le32_to_cpu(lmv->lmv_hash_type);
1837                 __u32 stripe_count = le32_to_cpu(lmv->lmv_stripe_count);
1838                 bool is_migrating = le32_to_cpu(lmv->lmv_hash_type) &
1839                                     LMV_HASH_FLAG_MIGRATION;
1840
1841                 if (is_migrating) {
1842                         hash_type = le32_to_cpu(lmv->lmv_migrate_hash);
1843                         stripe_count -= le32_to_cpu(lmv->lmv_migrate_offset);
1844                 }
1845
1846                 rc = lmv_name_to_stripe_index(hash_type, stripe_count,
1847                                               lname->ln_name,
1848                                               lname->ln_namelen);
1849                 if (rc < 0)
1850                         return rc;
1851
1852                 if (le32_to_cpu(lmv->lmv_hash_type) & LMV_HASH_FLAG_MIGRATION)
1853                         rc += le32_to_cpu(lmv->lmv_migrate_offset);
1854
1855                 fid_le_to_cpu(fid, &lmv->lmv_stripe_fids[rc]);
1856
1857                 stripe = mdt_object_find(env, info->mti_mdt, fid);
1858                 if (IS_ERR(stripe))
1859                         return PTR_ERR(stripe);
1860
1861                 fid_zero(fid);
1862                 rc = mdo_lookup(env, mdt_object_child(stripe), lname, fid,
1863                                 &info->mti_spec);
1864                 if (rc == -ENOENT && is_migrating) {
1865                         /*
1866                          * if parent is migrating, and lookup child failed on
1867                          * source stripe, lookup again on target stripe, if it
1868                          * exists, it means previous migration was interrupted,
1869                          * and current file was migrated already.
1870                          */
1871                         mdt_object_put(env, stripe);
1872
1873                         hash_type = le32_to_cpu(lmv->lmv_hash_type);
1874                         stripe_count = le32_to_cpu(lmv->lmv_migrate_offset);
1875
1876                         rc = lmv_name_to_stripe_index(hash_type, stripe_count,
1877                                                       lname->ln_name,
1878                                                       lname->ln_namelen);
1879                         if (rc < 0)
1880                                 return rc;
1881
1882                         fid_le_to_cpu(fid, &lmv->lmv_stripe_fids[rc]);
1883
1884                         stripe = mdt_object_find(env, info->mti_mdt, fid);
1885                         if (IS_ERR(stripe))
1886                                 return PTR_ERR(stripe);
1887
1888                         fid_zero(fid);
1889                         rc = mdo_lookup(env, mdt_object_child(stripe), lname,
1890                                         fid, &info->mti_spec);
1891                         mdt_object_put(env, stripe);
1892                         return rc ?: -EALREADY;
1893                 } else if (rc) {
1894                         mdt_object_put(env, stripe);
1895                         return rc;
1896                 }
1897         } else {
1898                 fid_zero(fid);
1899                 rc = mdo_lookup(env, mdt_object_child(pobj), lname, fid,
1900                                 &info->mti_spec);
1901                 if (rc)
1902                         return rc;
1903
1904                 stripe = pobj;
1905                 mdt_object_get(env, stripe);
1906         }
1907
1908         *spobj = stripe;
1909
1910         *sobj = mdt_object_find(env, info->mti_mdt, fid);
1911         if (IS_ERR(*sobj)) {
1912                 mdt_object_put(env, stripe);
1913                 rc = PTR_ERR(*sobj);
1914                 *spobj = NULL;
1915                 *sobj = NULL;
1916         }
1917
1918         return rc;
1919 }
1920
1921 /* end lease and close file for regular file */
1922 static int mdd_migrate_close(struct mdt_thread_info *info,
1923                              struct mdt_object *obj)
1924 {
1925         struct close_data *data;
1926         struct mdt_body *repbody;
1927         struct ldlm_lock *lease;
1928         int rc;
1929         int rc2;
1930
1931         rc = -EPROTO;
1932         if (!req_capsule_field_present(info->mti_pill, &RMF_MDT_EPOCH,
1933                                       RCL_CLIENT) ||
1934             !req_capsule_field_present(info->mti_pill, &RMF_CLOSE_DATA,
1935                                       RCL_CLIENT))
1936                 goto close;
1937
1938         data = req_capsule_client_get(info->mti_pill, &RMF_CLOSE_DATA);
1939         if (!data)
1940                 goto close;
1941
1942         rc = -ESTALE;
1943         lease = ldlm_handle2lock(&data->cd_handle);
1944         if (!lease)
1945                 goto close;
1946
1947         /* check if the lease was already canceled */
1948         lock_res_and_lock(lease);
1949         rc = ldlm_is_cancel(lease);
1950         unlock_res_and_lock(lease);
1951
1952         if (rc) {
1953                 rc = -EAGAIN;
1954                 LDLM_DEBUG(lease, DFID" lease broken",
1955                            PFID(mdt_object_fid(obj)));
1956         }
1957
1958         /*
1959          * cancel server side lease, client side counterpart should have been
1960          * cancelled, it's okay to cancel it now as we've held mot_open_sem.
1961          */
1962         ldlm_lock_cancel(lease);
1963         ldlm_reprocess_all(lease->l_resource, lease);
1964         LDLM_LOCK_PUT(lease);
1965
1966 close:
1967         rc2 = mdt_close_internal(info, mdt_info_req(info), NULL);
1968         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
1969         repbody->mbo_valid |= OBD_MD_CLOSE_INTENT_EXECED;
1970
1971         return rc ?: rc2;
1972 }
1973
1974 /*
1975  * migrate file in below steps:
1976  *  1. lock parent and its stripes
1977  *  2. lookup source by name
1978  *  3. lock parents of source links if source is not directory
1979  *  4. reject if source is in HSM
1980  *  5. take source open_sem and close file if source is regular file
1981  *  6. lock source and its stripes if it's directory
1982  *  7. lock target so subsequent change to it can trigger COS
1983  *  8. migrate file
1984  *  9. unlock above locks
1985  * 10. sync device if source has links
1986  */
1987 static int mdt_reint_migrate(struct mdt_thread_info *info,
1988                              struct mdt_lock_handle *unused)
1989 {
1990         const struct lu_env *env = info->mti_env;
1991         struct mdt_device *mdt = info->mti_mdt;
1992         struct ptlrpc_request *req = mdt_info_req(info);
1993         struct mdt_reint_record *rr = &info->mti_rr;
1994         struct lu_ucred *uc = mdt_ucred(info);
1995         struct md_attr *ma = &info->mti_attr;
1996         struct ldlm_enqueue_info *peinfo = &info->mti_einfo[0];
1997         struct ldlm_enqueue_info *seinfo = &info->mti_einfo[1];
1998         struct mdt_object *pobj;
1999         struct mdt_object *spobj = NULL;
2000         struct mdt_object *sobj = NULL;
2001         struct mdt_object *tobj;
2002         struct lustre_handle rename_lh = { 0 };
2003         struct mdt_lock_handle *lhp;
2004         struct mdt_lock_handle *lhs;
2005         struct mdt_lock_handle *lht;
2006         LIST_HEAD(parent_slave_locks);
2007         LIST_HEAD(child_slave_locks);
2008         LIST_HEAD(link_locks);
2009         int lock_retries = 5;
2010         bool open_sem_locked = false;
2011         bool do_sync = false;
2012         int rc;
2013         ENTRY;
2014
2015         CDEBUG(D_INODE, "migrate "DFID"/"DNAME" to "DFID"\n", PFID(rr->rr_fid1),
2016                PNAME(&rr->rr_name), PFID(rr->rr_fid2));
2017
2018         if (info->mti_dlm_req)
2019                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
2020
2021         if (!fid_is_md_operative(rr->rr_fid1) ||
2022             !fid_is_md_operative(rr->rr_fid2))
2023                 RETURN(-EPERM);
2024
2025         /* don't allow migrate . or .. */
2026         if (lu_name_is_dot_or_dotdot(&rr->rr_name))
2027                 RETURN(-EBUSY);
2028
2029         if (!mdt->mdt_enable_remote_dir || !mdt->mdt_enable_dir_migration)
2030                 RETURN(-EPERM);
2031
2032         if (!md_capable(uc, CFS_CAP_SYS_ADMIN) &&
2033             uc->uc_gid != mdt->mdt_enable_remote_dir_gid &&
2034             mdt->mdt_enable_remote_dir_gid != -1)
2035                 RETURN(-EPERM);
2036
2037         /*
2038          * Note: do not enqueue rename lock for replay request, because
2039          * if other MDT holds rename lock, but being blocked to wait for
2040          * this MDT to finish its recovery, and the failover MDT can not
2041          * get rename lock, which will cause deadlock.
2042          */
2043         if (!req_is_replay(req)) {
2044                 rc = mdt_rename_lock(info, &rename_lh);
2045                 if (rc != 0) {
2046                         CERROR("%s: can't lock FS for rename: rc = %d\n",
2047                                mdt_obd_name(info->mti_mdt), rc);
2048                         RETURN(rc);
2049                 }
2050         }
2051
2052         /* pobj is master object of parent */
2053         pobj = mdt_parent_find_check(info, rr->rr_fid1, 0);
2054         if (IS_ERR(pobj))
2055                 GOTO(unlock_rename, rc = PTR_ERR(pobj));
2056
2057         if (unlikely(!info->mti_big_lmm)) {
2058                 info->mti_big_lmmsize = lmv_mds_md_size(64, LMV_MAGIC);
2059                 OBD_ALLOC(info->mti_big_lmm, info->mti_big_lmmsize);
2060                 if (!info->mti_big_lmm)
2061                         GOTO(put_parent, rc = -ENOMEM);
2062         }
2063
2064         ma->ma_lmv = info->mti_big_lmm;
2065         ma->ma_lmv_size = info->mti_big_lmmsize;
2066         ma->ma_valid = 0;
2067         rc = mdt_stripe_get(info, pobj, ma, XATTR_NAME_LMV);
2068         if (rc)
2069                 GOTO(put_parent, rc);
2070
2071 lock_parent:
2072         /* lock parent object */
2073         lhp = &info->mti_lh[MDT_LH_PARENT];
2074         mdt_lock_reg_init(lhp, LCK_PW);
2075         rc = mdt_migrate_parent_lock(info, pobj, ma, lhp, peinfo,
2076                                      &parent_slave_locks);
2077         if (rc)
2078                 GOTO(put_parent, rc);
2079
2080         /*
2081          * spobj is the corresponding stripe against name if pobj is striped
2082          * directory, which is the real parent, and no need to lock, because
2083          * we've taken full lock of pobj.
2084          */
2085         rc = mdt_migrate_lookup(info, pobj, ma, &rr->rr_name, &spobj, &sobj);
2086         if (rc)
2087                 GOTO(unlock_parent, rc);
2088
2089         /* lock parents of source links, and revoke LOOKUP lock of links */
2090         rc = mdt_link_parents_lock(info, pobj, ma, sobj, lhp, peinfo,
2091                                    &parent_slave_locks, &link_locks);
2092         if (rc == -EBUSY && lock_retries-- > 0) {
2093                 mdt_object_put(env, sobj);
2094                 mdt_object_put(env, spobj);
2095                 goto lock_parent;
2096         }
2097
2098         if (rc < 0)
2099                 GOTO(put_source, rc);
2100
2101         /*
2102          * RS_MAX_LOCKS is the limit of number of locks that can be saved along
2103          * with one request, if total lock count exceeds this limit, we will
2104          * drop all locks after migration, and synchronous device in the end.
2105          */
2106         do_sync = rc;
2107
2108         /* TODO: DoM migration is not supported yet */
2109         if (S_ISREG(lu_object_attr(&sobj->mot_obj))) {
2110                 ma->ma_lmm = info->mti_big_lmm;
2111                 ma->ma_lmm_size = info->mti_big_lmmsize;
2112                 ma->ma_valid = 0;
2113                 rc = mdt_stripe_get(info, sobj, ma, XATTR_NAME_LOV);
2114                 if (rc)
2115                         GOTO(put_source, rc);
2116
2117                 if (ma->ma_valid & MA_LOV &&
2118                     mdt_lmm_dom_entry(ma->ma_lmm) != LMM_NO_DOM)
2119                         GOTO(put_source, rc = -EOPNOTSUPP);
2120         }
2121
2122         /* if migration HSM is allowed */
2123         if (!mdt->mdt_opts.mo_migrate_hsm_allowed) {
2124                 ma->ma_need = MA_HSM;
2125                 ma->ma_valid = 0;
2126                 rc = mdt_attr_get_complex(info, sobj, ma);
2127                 if (rc)
2128                         GOTO(unlock_links, rc);
2129
2130                 if ((ma->ma_valid & MA_HSM) && ma->ma_hsm.mh_flags != 0)
2131                         GOTO(unlock_links, rc = -EOPNOTSUPP);
2132         }
2133
2134         /* end lease and close file for regular file */
2135         if (info->mti_spec.sp_migrate_close) {
2136                 /* try to hold open_sem so that nobody else can open the file */
2137                 if (!down_write_trylock(&sobj->mot_open_sem)) {
2138                         /* close anyway */
2139                         mdd_migrate_close(info, sobj);
2140                         GOTO(unlock_links, rc = -EBUSY);
2141                 } else {
2142                         open_sem_locked = true;
2143                         rc = mdd_migrate_close(info, sobj);
2144                         if (rc)
2145                                 GOTO(unlock_open_sem, rc);
2146                 }
2147         }
2148
2149         /* lock source */
2150         lhs = &info->mti_lh[MDT_LH_OLD];
2151         mdt_lock_reg_init(lhs, LCK_EX);
2152         rc = mdt_migrate_object_lock(info, spobj, sobj, lhs, seinfo,
2153                                      &child_slave_locks);
2154         if (rc)
2155                 GOTO(unlock_open_sem, rc);
2156
2157         /* lock target */
2158         tobj = mdt_object_find(env, mdt, rr->rr_fid2);
2159         if (IS_ERR(tobj))
2160                 GOTO(unlock_source, rc = PTR_ERR(tobj));
2161
2162         lht = &info->mti_lh[MDT_LH_NEW];
2163         mdt_lock_reg_init(lht, LCK_EX);
2164         rc = mdt_reint_object_lock(info, tobj, lht, MDS_INODELOCK_FULL, true);
2165         if (rc)
2166                 GOTO(put_target, rc);
2167
2168         /* Don't do lookup sanity check. We know name doesn't exist. */
2169         info->mti_spec.sp_cr_lookup = 0;
2170         info->mti_spec.sp_feat = &dt_directory_features;
2171
2172         rc = mdo_migrate(env, mdt_object_child(pobj),
2173                          mdt_object_child(sobj), &rr->rr_name,
2174                          mdt_object_child(tobj), &info->mti_spec, ma);
2175         EXIT;
2176
2177         mdt_object_unlock(info, tobj, lht, rc);
2178 put_target:
2179         mdt_object_put(env, tobj);
2180 unlock_source:
2181         mdt_migrate_object_unlock(info, sobj, lhs, seinfo,
2182                                   &child_slave_locks, rc);
2183 unlock_open_sem:
2184         if (open_sem_locked)
2185                 up_write(&sobj->mot_open_sem);
2186 unlock_links:
2187         /* if we've got too many locks to save into RPC,
2188          * then just commit before the locks are released */
2189         if (!rc && do_sync)
2190                 mdt_device_sync(env, mdt);
2191         mdt_unlock_list(info, &link_locks, do_sync ? 1 : rc);
2192 put_source:
2193         mdt_object_put(env, sobj);
2194         mdt_object_put(env, spobj);
2195 unlock_parent:
2196         mdt_migrate_object_unlock(info, pobj, lhp, peinfo,
2197                                   &parent_slave_locks, rc);
2198 put_parent:
2199         mdt_object_put(env, pobj);
2200 unlock_rename:
2201         if (lustre_handle_is_used(&rename_lh))
2202                 mdt_rename_unlock(&rename_lh);
2203
2204         return rc;
2205 }
2206
2207 static int mdt_object_lock_save(struct mdt_thread_info *info,
2208                                 struct mdt_object *dir,
2209                                 struct mdt_lock_handle *lh,
2210                                 int idx, bool cos_incompat)
2211 {
2212         int rc;
2213
2214         /* we lock the target dir if it is local */
2215         rc = mdt_reint_object_lock(info, dir, lh, MDS_INODELOCK_UPDATE,
2216                                    cos_incompat);
2217         if (rc != 0)
2218                 return rc;
2219
2220         /* get and save correct version after locking */
2221         mdt_version_get_save(info, dir, idx);
2222         return 0;
2223 }
2224
2225 /*
2226  * determine lock order of sobj and tobj
2227  *
2228  * there are two situations we need to lock tobj before sobj:
2229  * 1. sobj is child of tobj
2230  * 2. sobj and tobj are stripes of a directory, and stripe index of sobj is
2231  *    larger than that of tobj
2232  *
2233  * \retval      1 lock tobj before sobj
2234  * \retval      0 lock sobj before tobj
2235  * \retval      -ev negative errno upon error
2236  */
2237 static int mdt_rename_determine_lock_order(struct mdt_thread_info *info,
2238                                            struct mdt_object *sobj,
2239                                            struct mdt_object *tobj)
2240 {
2241         struct md_attr *ma = &info->mti_attr;
2242         struct lu_fid *spfid = &info->mti_tmp_fid1;
2243         struct lu_fid *tpfid = &info->mti_tmp_fid2;
2244         struct lmv_mds_md_v1 *lmv;
2245         __u32 sindex;
2246         __u32 tindex;
2247         int rc;
2248
2249         /* sobj and tobj are the same */
2250         if (sobj == tobj)
2251                 return 0;
2252
2253         if (fid_is_root(mdt_object_fid(sobj)))
2254                 return 0;
2255
2256         if (fid_is_root(mdt_object_fid(tobj)))
2257                 return 1;
2258
2259         /* check whether sobj is child of tobj */
2260         rc = mdo_is_subdir(info->mti_env, mdt_object_child(sobj),
2261                            mdt_object_fid(tobj));
2262         if (rc < 0)
2263                 return rc;
2264
2265         if (rc == 1)
2266                 return 1;
2267
2268         /* check whether sobj and tobj are children of the same parent */
2269         rc = mdt_attr_get_pfid(info, sobj, spfid);
2270         if (rc)
2271                 return rc;
2272
2273         rc = mdt_attr_get_pfid(info, tobj, tpfid);
2274         if (rc)
2275                 return rc;
2276
2277         if (!lu_fid_eq(spfid, tpfid))
2278                 return 0;
2279
2280         /* check whether sobj and tobj are sibling stripes */
2281         ma->ma_need = MA_LMV;
2282         ma->ma_valid = 0;
2283         ma->ma_lmv = (union lmv_mds_md *)info->mti_xattr_buf;
2284         ma->ma_lmv_size = sizeof(info->mti_xattr_buf);
2285         rc = mdt_stripe_get(info, sobj, ma, XATTR_NAME_LMV);
2286         if (rc)
2287                 return rc;
2288
2289         if (!(ma->ma_valid & MA_LMV))
2290                 return 0;
2291
2292         lmv = &ma->ma_lmv->lmv_md_v1;
2293         if (!(le32_to_cpu(lmv->lmv_magic) & LMV_MAGIC_STRIPE))
2294                 return 0;
2295         sindex = le32_to_cpu(lmv->lmv_master_mdt_index);
2296
2297         ma->ma_valid = 0;
2298         rc = mdt_stripe_get(info, tobj, ma, XATTR_NAME_LMV);
2299         if (rc)
2300                 return rc;
2301
2302         if (!(ma->ma_valid & MA_LMV))
2303                 return -ENODATA;
2304
2305         lmv = &ma->ma_lmv->lmv_md_v1;
2306         if (!(le32_to_cpu(lmv->lmv_magic) & LMV_MAGIC_STRIPE))
2307                 return -EINVAL;
2308         tindex = le32_to_cpu(lmv->lmv_master_mdt_index);
2309
2310         /* check stripe index of sobj and tobj */
2311         if (sindex == tindex)
2312                 return -EINVAL;
2313
2314         return sindex < tindex ? 0 : 1;
2315 }
2316
2317 /*
2318  * VBR: rename versions in reply: 0 - srcdir parent; 1 - tgtdir parent;
2319  * 2 - srcdir child; 3 - tgtdir child.
2320  * Update on disk version of srcdir child.
2321  */
2322 static int mdt_reint_rename(struct mdt_thread_info *info,
2323                             struct mdt_lock_handle *unused)
2324 {
2325         struct mdt_device *mdt = info->mti_mdt;
2326         struct mdt_reint_record *rr = &info->mti_rr;
2327         struct md_attr *ma = &info->mti_attr;
2328         struct ptlrpc_request *req = mdt_info_req(info);
2329         struct mdt_object *msrcdir = NULL;
2330         struct mdt_object *mtgtdir = NULL;
2331         struct mdt_object *mold;
2332         struct mdt_object *mnew = NULL;
2333         struct lustre_handle rename_lh = { 0 };
2334         struct mdt_lock_handle *lh_srcdirp;
2335         struct mdt_lock_handle *lh_tgtdirp;
2336         struct mdt_lock_handle *lh_oldp = NULL;
2337         struct mdt_lock_handle *lh_newp = NULL;
2338         struct lu_fid *old_fid = &info->mti_tmp_fid1;
2339         struct lu_fid *new_fid = &info->mti_tmp_fid2;
2340         __u64 lock_ibits;
2341         bool reverse = false, discard = false;
2342         bool cos_incompat;
2343         int rc;
2344         ENTRY;
2345
2346         DEBUG_REQ(D_INODE, req, "rename "DFID"/"DNAME" to "DFID"/"DNAME,
2347                   PFID(rr->rr_fid1), PNAME(&rr->rr_name),
2348                   PFID(rr->rr_fid2), PNAME(&rr->rr_tgt_name));
2349
2350         if (info->mti_dlm_req)
2351                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
2352
2353         if (!fid_is_md_operative(rr->rr_fid1) ||
2354             !fid_is_md_operative(rr->rr_fid2))
2355                 RETURN(-EPERM);
2356
2357         /* find both parents. */
2358         msrcdir = mdt_parent_find_check(info, rr->rr_fid1, 0);
2359         if (IS_ERR(msrcdir))
2360                 RETURN(PTR_ERR(msrcdir));
2361
2362         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME3, 5);
2363
2364         if (lu_fid_eq(rr->rr_fid1, rr->rr_fid2)) {
2365                 mtgtdir = msrcdir;
2366                 mdt_object_get(info->mti_env, mtgtdir);
2367         } else {
2368                 mtgtdir = mdt_parent_find_check(info, rr->rr_fid2, 1);
2369                 if (IS_ERR(mtgtdir))
2370                         GOTO(out_put_srcdir, rc = PTR_ERR(mtgtdir));
2371         }
2372
2373         /*
2374          * Note: do not enqueue rename lock for replay request, because
2375          * if other MDT holds rename lock, but being blocked to wait for
2376          * this MDT to finish its recovery, and the failover MDT can not
2377          * get rename lock, which will cause deadlock.
2378          */
2379         if (!req_is_replay(req)) {
2380                 /*
2381                  * Normally rename RPC is handled on the MDT with the target
2382                  * directory (if target exists, it's on the MDT with the
2383                  * target), if the source directory is remote, it's a hint that
2384                  * source is remote too (this may not be true, but it won't
2385                  * cause any issue), return -EXDEV early to avoid taking
2386                  * rename_lock.
2387                  */
2388                 if (!mdt->mdt_enable_remote_rename &&
2389                     mdt_object_remote(msrcdir))
2390                         GOTO(out_put_tgtdir, rc = -EXDEV);
2391
2392                 rc = mdt_rename_lock(info, &rename_lh);
2393                 if (rc != 0) {
2394                         CERROR("%s: can't lock FS for rename: rc = %d\n",
2395                                mdt_obd_name(mdt), rc);
2396                         GOTO(out_put_tgtdir, rc);
2397                 }
2398         }
2399
2400         rc = mdt_rename_determine_lock_order(info, msrcdir, mtgtdir);
2401         if (rc < 0)
2402                 GOTO(out_unlock_rename, rc);
2403
2404         reverse = rc;
2405
2406         /* source needs to be looked up after locking source parent, otherwise
2407          * this rename may race with unlink source, and cause rename hang, see
2408          * sanityn.sh 55b, so check parents first, if later we found source is
2409          * remote, relock parents. */
2410         cos_incompat = (mdt_object_remote(msrcdir) ||
2411                         mdt_object_remote(mtgtdir));
2412
2413         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME4, 5);
2414
2415         /* lock parents in the proper order. */
2416         lh_srcdirp = &info->mti_lh[MDT_LH_PARENT];
2417         lh_tgtdirp = &info->mti_lh[MDT_LH_CHILD];
2418
2419 relock:
2420         mdt_lock_pdo_init(lh_srcdirp, LCK_PW, &rr->rr_name);
2421         mdt_lock_pdo_init(lh_tgtdirp, LCK_PW, &rr->rr_tgt_name);
2422
2423         if (reverse) {
2424                 rc = mdt_object_lock_save(info, mtgtdir, lh_tgtdirp, 1,
2425                                           cos_incompat);
2426                 if (rc)
2427                         GOTO(out_unlock_rename, rc);
2428
2429                 OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME, 5);
2430
2431                 rc = mdt_object_lock_save(info, msrcdir, lh_srcdirp, 0,
2432                                           cos_incompat);
2433                 if (rc != 0) {
2434                         mdt_object_unlock(info, mtgtdir, lh_tgtdirp, rc);
2435                         GOTO(out_unlock_rename, rc);
2436                 }
2437         } else {
2438                 rc = mdt_object_lock_save(info, msrcdir, lh_srcdirp, 0,
2439                                           cos_incompat);
2440                 if (rc)
2441                         GOTO(out_unlock_rename, rc);
2442
2443                 OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME, 5);
2444
2445                 if (mtgtdir != msrcdir) {
2446                         rc = mdt_object_lock_save(info, mtgtdir, lh_tgtdirp, 1,
2447                                                   cos_incompat);
2448                 } else if (!mdt_object_remote(mtgtdir) &&
2449                            lh_srcdirp->mlh_pdo_hash !=
2450                            lh_tgtdirp->mlh_pdo_hash) {
2451                         rc = mdt_pdir_hash_lock(info, lh_tgtdirp, mtgtdir,
2452                                                 MDS_INODELOCK_UPDATE,
2453                                                 cos_incompat);
2454                         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_PDO_LOCK2, 10);
2455                 }
2456                 if (rc != 0) {
2457                         mdt_object_unlock(info, msrcdir, lh_srcdirp, rc);
2458                         GOTO(out_unlock_rename, rc);
2459                 }
2460         }
2461
2462         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME4, 5);
2463         OBD_FAIL_TIMEOUT(OBD_FAIL_MDS_RENAME2, 5);
2464
2465         /* find mold object. */
2466         fid_zero(old_fid);
2467         rc = mdt_lookup_version_check(info, msrcdir, &rr->rr_name, old_fid, 2);
2468         if (rc != 0)
2469                 GOTO(out_unlock_parents, rc);
2470
2471         if (lu_fid_eq(old_fid, rr->rr_fid1) || lu_fid_eq(old_fid, rr->rr_fid2))
2472                 GOTO(out_unlock_parents, rc = -EINVAL);
2473
2474         if (!fid_is_md_operative(old_fid))
2475                 GOTO(out_unlock_parents, rc = -EPERM);
2476
2477         mold = mdt_object_find(info->mti_env, info->mti_mdt, old_fid);
2478         if (IS_ERR(mold))
2479                 GOTO(out_unlock_parents, rc = PTR_ERR(mold));
2480
2481         if (!mdt_object_exists(mold)) {
2482                 LU_OBJECT_DEBUG(D_INODE, info->mti_env,
2483                                 &mold->mot_obj,
2484                                 "object does not exist");
2485                 GOTO(out_put_old, rc = -ENOENT);
2486         }
2487
2488         if (mdt_object_remote(mold) && !mdt->mdt_enable_remote_rename)
2489                 GOTO(out_put_old, rc = -EXDEV);
2490
2491         /* Check if @mtgtdir is subdir of @mold, before locking child
2492          * to avoid reverse locking. */
2493         if (mtgtdir != msrcdir) {
2494                 rc = mdo_is_subdir(info->mti_env, mdt_object_child(mtgtdir),
2495                                    old_fid);
2496                 if (rc) {
2497                         if (rc == 1)
2498                                 rc = -EINVAL;
2499                         GOTO(out_put_old, rc);
2500                 }
2501         }
2502
2503         tgt_vbr_obj_set(info->mti_env, mdt_obj2dt(mold));
2504         /* save version after locking */
2505         mdt_version_get_save(info, mold, 2);
2506
2507         if (!cos_incompat && mdt_object_remote(mold)) {
2508                 cos_incompat = true;
2509                 mdt_object_put(info->mti_env, mold);
2510                 mdt_object_unlock(info, mtgtdir, lh_tgtdirp, -EAGAIN);
2511                 mdt_object_unlock(info, msrcdir, lh_srcdirp, -EAGAIN);
2512                 goto relock;
2513         }
2514
2515         /* find mnew object:
2516          * mnew target object may not exist now
2517          * lookup with version checking */
2518         fid_zero(new_fid);
2519         rc = mdt_lookup_version_check(info, mtgtdir, &rr->rr_tgt_name, new_fid,
2520                                       3);
2521         if (rc == 0) {
2522                 /* the new_fid should have been filled at this moment */
2523                 if (lu_fid_eq(old_fid, new_fid))
2524                         GOTO(out_put_old, rc);
2525
2526                 if (lu_fid_eq(new_fid, rr->rr_fid1) ||
2527                     lu_fid_eq(new_fid, rr->rr_fid2))
2528                         GOTO(out_put_old, rc = -EINVAL);
2529
2530                 if (!fid_is_md_operative(new_fid))
2531                         GOTO(out_put_old, rc = -EPERM);
2532
2533                 mnew = mdt_object_find(info->mti_env, info->mti_mdt, new_fid);
2534                 if (IS_ERR(mnew))
2535                         GOTO(out_put_old, rc = PTR_ERR(mnew));
2536
2537                 if (!mdt_object_exists(mnew)) {
2538                         LU_OBJECT_DEBUG(D_INODE, info->mti_env,
2539                                         &mnew->mot_obj,
2540                                         "object does not exist");
2541                         GOTO(out_put_new, rc = -ENOENT);
2542                 }
2543
2544                 if (mdt_object_remote(mnew)) {
2545                         struct mdt_body  *repbody;
2546
2547                         /* Always send rename req to the target child MDT */
2548                         repbody = req_capsule_server_get(info->mti_pill,
2549                                                          &RMF_MDT_BODY);
2550                         LASSERT(repbody != NULL);
2551                         repbody->mbo_fid1 = *new_fid;
2552                         repbody->mbo_valid |= (OBD_MD_FLID | OBD_MD_MDS);
2553                         GOTO(out_put_new, rc = -EXDEV);
2554                 }
2555                 /* Before locking the target dir, check we do not replace
2556                  * a dir with a non-dir, otherwise it may deadlock with
2557                  * link op which tries to create a link in this dir
2558                  * back to this non-dir. */
2559                 if (S_ISDIR(lu_object_attr(&mnew->mot_obj)) &&
2560                     !S_ISDIR(lu_object_attr(&mold->mot_obj)))
2561                         GOTO(out_put_new, rc = -EISDIR);
2562
2563                 lh_oldp = &info->mti_lh[MDT_LH_OLD];
2564                 mdt_lock_reg_init(lh_oldp, LCK_EX);
2565                 lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_XATTR;
2566                 if (mdt_object_remote(msrcdir)) {
2567                         /* Enqueue lookup lock from the parent MDT */
2568                         rc = mdt_remote_object_lock(info, msrcdir,
2569                                                     mdt_object_fid(mold),
2570                                                     &lh_oldp->mlh_rreg_lh,
2571                                                     lh_oldp->mlh_rreg_mode,
2572                                                     MDS_INODELOCK_LOOKUP,
2573                                                     false);
2574                         if (rc != ELDLM_OK)
2575                                 GOTO(out_put_new, rc);
2576
2577                         lock_ibits &= ~MDS_INODELOCK_LOOKUP;
2578                 }
2579
2580                 rc = mdt_reint_object_lock(info, mold, lh_oldp, lock_ibits,
2581                                            cos_incompat);
2582                 if (rc != 0)
2583                         GOTO(out_unlock_old, rc);
2584
2585                 /* Check if @msrcdir is subdir of @mnew, before locking child
2586                  * to avoid reverse locking. */
2587                 if (mtgtdir != msrcdir) {
2588                         rc = mdo_is_subdir(info->mti_env,
2589                                            mdt_object_child(msrcdir), new_fid);
2590                         if (rc) {
2591                                 if (rc == 1)
2592                                         rc = -EINVAL;
2593                                 GOTO(out_unlock_old, rc);
2594                         }
2595                 }
2596
2597                 /* We used to acquire MDS_INODELOCK_FULL here but we
2598                  * can't do this now because a running HSM restore on
2599                  * the rename onto victim will hold the layout
2600                  * lock. See LU-4002. */
2601
2602                 lh_newp = &info->mti_lh[MDT_LH_NEW];
2603                 mdt_lock_reg_init(lh_newp, LCK_EX);
2604                 rc = mdt_reint_object_lock(info, mnew, lh_newp,
2605                                            MDS_INODELOCK_LOOKUP |
2606                                            MDS_INODELOCK_UPDATE,
2607                                            cos_incompat);
2608                 if (rc != 0)
2609                         GOTO(out_unlock_old, rc);
2610
2611                 /* get and save version after locking */
2612                 mdt_version_get_save(info, mnew, 3);
2613         } else if (rc != -EREMOTE && rc != -ENOENT) {
2614                 GOTO(out_put_old, rc);
2615         } else {
2616                 lh_oldp = &info->mti_lh[MDT_LH_OLD];
2617                 mdt_lock_reg_init(lh_oldp, LCK_EX);
2618                 lock_ibits = MDS_INODELOCK_LOOKUP | MDS_INODELOCK_XATTR;
2619                 if (mdt_object_remote(msrcdir)) {
2620                         /* Enqueue lookup lock from the parent MDT */
2621                         rc = mdt_remote_object_lock(info, msrcdir,
2622                                                     mdt_object_fid(mold),
2623                                                     &lh_oldp->mlh_rreg_lh,
2624                                                     lh_oldp->mlh_rreg_mode,
2625                                                     MDS_INODELOCK_LOOKUP,
2626                                                     false);
2627                         if (rc != ELDLM_OK)
2628                                 GOTO(out_put_old, rc);
2629
2630                         lock_ibits &= ~MDS_INODELOCK_LOOKUP;
2631                 }
2632
2633                 rc = mdt_reint_object_lock(info, mold, lh_oldp, lock_ibits,
2634                                            cos_incompat);
2635                 if (rc != 0)
2636                         GOTO(out_unlock_old, rc);
2637
2638                 mdt_enoent_version_save(info, 3);
2639         }
2640
2641         /* step 5: rename it */
2642         mdt_reint_init_ma(info, ma);
2643
2644         mdt_fail_write(info->mti_env, info->mti_mdt->mdt_bottom,
2645                        OBD_FAIL_MDS_REINT_RENAME_WRITE);
2646
2647         if (mnew != NULL)
2648                 mutex_lock(&mnew->mot_lov_mutex);
2649
2650         rc = mdo_rename(info->mti_env, mdt_object_child(msrcdir),
2651                         mdt_object_child(mtgtdir), old_fid, &rr->rr_name,
2652                         mnew != NULL ? mdt_object_child(mnew) : NULL,
2653                         &rr->rr_tgt_name, ma);
2654
2655         if (mnew != NULL)
2656                 mutex_unlock(&mnew->mot_lov_mutex);
2657
2658         /* handle last link of tgt object */
2659         if (rc == 0) {
2660                 mdt_counter_incr(req, LPROC_MDT_RENAME);
2661                 if (mnew) {
2662                         mdt_handle_last_unlink(info, mnew, ma);
2663                         discard = mdt_dom_check_for_discard(info, mnew);
2664                 }
2665                 mdt_rename_counter_tally(info, info->mti_mdt, req,
2666                                          msrcdir, mtgtdir);
2667         }
2668
2669         EXIT;
2670         if (mnew != NULL)
2671                 mdt_object_unlock(info, mnew, lh_newp, rc);
2672 out_unlock_old:
2673         mdt_object_unlock(info, mold, lh_oldp, rc);
2674 out_put_new:
2675         if (mnew && !discard)
2676                 mdt_object_put(info->mti_env, mnew);
2677 out_put_old:
2678         mdt_object_put(info->mti_env, mold);
2679 out_unlock_parents:
2680         mdt_object_unlock(info, mtgtdir, lh_tgtdirp, rc);
2681         mdt_object_unlock(info, msrcdir, lh_srcdirp, rc);
2682 out_unlock_rename:
2683         if (lustre_handle_is_used(&rename_lh))
2684                 mdt_rename_unlock(&rename_lh);
2685 out_put_tgtdir:
2686         mdt_object_put(info->mti_env, mtgtdir);
2687 out_put_srcdir:
2688         mdt_object_put(info->mti_env, msrcdir);
2689
2690         /* The DoM discard can be done right in the place above where it is
2691          * assigned, meanwhile it is done here after rename unlock due to
2692          * compatibility with old clients, for them the discard blocks
2693          * the main thread until completion. Check LU-11359 for details.
2694          */
2695         if (discard) {
2696                 mdt_dom_discard_data(info, mnew);
2697                 mdt_object_put(info->mti_env, mnew);
2698         }
2699         return rc;
2700 }
2701
2702 static int mdt_reint_resync(struct mdt_thread_info *info,
2703                             struct mdt_lock_handle *lhc)
2704 {
2705         struct mdt_reint_record *rr = &info->mti_rr;
2706         struct ptlrpc_request *req = mdt_info_req(info);
2707         struct md_attr *ma = &info->mti_attr;
2708         struct mdt_object *mo;
2709         struct ldlm_lock *lease;
2710         struct mdt_body *repbody;
2711         struct md_layout_change layout = { .mlc_mirror_id = rr->rr_mirror_id };
2712         bool lease_broken;
2713         int rc, rc2;
2714
2715         ENTRY;
2716
2717         DEBUG_REQ(D_INODE, req, DFID", FLR file resync", PFID(rr->rr_fid1));
2718
2719         if (info->mti_dlm_req)
2720                 ldlm_request_cancel(req, info->mti_dlm_req, 0, LATF_SKIP);
2721
2722         mo = mdt_object_find(info->mti_env, info->mti_mdt, rr->rr_fid1);
2723         if (IS_ERR(mo))
2724                 GOTO(out, rc = PTR_ERR(mo));
2725
2726         if (!mdt_object_exists(mo))
2727                 GOTO(out_obj, rc = -ENOENT);
2728
2729         if (!S_ISREG(lu_object_attr(&mo->mot_obj)))
2730                 GOTO(out_obj, rc = -EINVAL);
2731
2732         if (mdt_object_remote(mo))
2733                 GOTO(out_obj, rc = -EREMOTE);
2734
2735         lease = ldlm_handle2lock(rr->rr_lease_handle);
2736         if (lease == NULL)
2737                 GOTO(out_obj, rc = -ESTALE);
2738
2739         /* It's really necessary to grab open_sem and check if the lease lock
2740          * has been lost. There would exist a concurrent writer coming in and
2741          * generating some dirty data in memory cache, the writeback would fail
2742          * after the layout version is increased by MDS_REINT_RESYNC RPC. */
2743         if (!down_write_trylock(&mo->mot_open_sem))
2744                 GOTO(out_put_lease, rc = -EBUSY);
2745
2746         lock_res_and_lock(lease);
2747         lease_broken = ldlm_is_cancel(lease);
2748         unlock_res_and_lock(lease);
2749         if (lease_broken)
2750                 GOTO(out_unlock, rc = -EBUSY);
2751
2752         /* the file has yet opened by anyone else after we took the lease. */
2753         layout.mlc_opc = MD_LAYOUT_RESYNC;
2754         lhc = &info->mti_lh[MDT_LH_LOCAL];
2755         rc = mdt_layout_change(info, mo, lhc, &layout);
2756         if (rc)
2757                 GOTO(out_unlock, rc);
2758
2759         mdt_object_unlock(info, mo, lhc, 0);
2760
2761         ma->ma_need = MA_INODE;
2762         ma->ma_valid = 0;
2763         rc = mdt_attr_get_complex(info, mo, ma);
2764         if (rc != 0)
2765                 GOTO(out_unlock, rc);
2766
2767         repbody = req_capsule_server_get(info->mti_pill, &RMF_MDT_BODY);
2768         mdt_pack_attr2body(info, repbody, &ma->ma_attr, mdt_object_fid(mo));
2769
2770         EXIT;
2771 out_unlock:
2772         up_write(&mo->mot_open_sem);
2773 out_put_lease:
2774         LDLM_LOCK_PUT(lease);
2775 out_obj:
2776         mdt_object_put(info->mti_env, mo);
2777 out:
2778         mdt_client_compatibility(info);
2779         rc2 = mdt_fix_reply(info);
2780         if (rc == 0)
2781                 rc = rc2;
2782         return rc;
2783 }
2784
2785 struct mdt_reinter {
2786         int (*mr_handler)(struct mdt_thread_info *, struct mdt_lock_handle *);
2787         enum lprocfs_extra_opc mr_extra_opc;
2788 };
2789
2790 static const struct mdt_reinter mdt_reinters[] = {
2791         [REINT_SETATTR] = {
2792                 .mr_handler = &mdt_reint_setattr,
2793                 .mr_extra_opc = MDS_REINT_SETATTR,
2794         },
2795         [REINT_CREATE] = {
2796                 .mr_handler = &mdt_reint_create,
2797                 .mr_extra_opc = MDS_REINT_CREATE,
2798         },
2799         [REINT_LINK] = {
2800                 .mr_handler = &mdt_reint_link,
2801                 .mr_extra_opc = MDS_REINT_LINK,
2802         },
2803         [REINT_UNLINK] = {
2804                 .mr_handler = &mdt_reint_unlink,
2805                 .mr_extra_opc = MDS_REINT_UNLINK,
2806         },
2807         [REINT_RENAME] = {
2808                 .mr_handler = &mdt_reint_rename,
2809                 .mr_extra_opc = MDS_REINT_RENAME,
2810         },
2811         [REINT_OPEN] = {
2812                 .mr_handler = &mdt_reint_open,
2813                 .mr_extra_opc = MDS_REINT_OPEN,
2814         },
2815         [REINT_SETXATTR] = {
2816                 .mr_handler = &mdt_reint_setxattr,
2817                 .mr_extra_opc = MDS_REINT_SETXATTR,
2818         },
2819         [REINT_RMENTRY] = {
2820                 .mr_handler = &mdt_reint_unlink,
2821                 .mr_extra_opc = MDS_REINT_UNLINK,
2822         },
2823         [REINT_MIGRATE] = {
2824                 .mr_handler = &mdt_reint_migrate,
2825                 .mr_extra_opc = MDS_REINT_RENAME,
2826         },
2827         [REINT_RESYNC] = {
2828                 .mr_handler = &mdt_reint_resync,
2829                 .mr_extra_opc = MDS_REINT_RESYNC,
2830         },
2831 };
2832
2833 int mdt_reint_rec(struct mdt_thread_info *info,
2834                   struct mdt_lock_handle *lhc)
2835 {
2836         const struct mdt_reinter *mr;
2837         int rc;
2838         ENTRY;
2839
2840         if (!(info->mti_rr.rr_opcode < ARRAY_SIZE(mdt_reinters)))
2841                 RETURN(-EPROTO);
2842
2843         mr = &mdt_reinters[info->mti_rr.rr_opcode];
2844         if (mr->mr_handler == NULL)
2845                 RETURN(-EPROTO);
2846
2847         rc = (*mr->mr_handler)(info, lhc);
2848
2849         lprocfs_counter_incr(ptlrpc_req2svc(mdt_info_req(info))->srv_stats,
2850                              PTLRPC_LAST_CNTR + mr->mr_extra_opc);
2851
2852         RETURN(rc);
2853 }