lustre/mds/mds_reint.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  *  linux/mds/mds_reint.c
   5  *
   6  *  Lustre Metadata Server (mds) reintegration routines
   7  *
   8  *  Copyright (C) 2002  Cluster File Systems, Inc.
   9  *  author: Peter Braam <braam@clusterfs.com>
  10  *
  11  *  This code is issued under the GNU General Public License.
  12  *  See the file COPYING in this distribution
  13  *
  14  */
  15
  16 // XXX - add transaction sequence numbers
  17
  18 #define EXPORT_SYMTAB
  19 #define DEBUG_SUBSYSTEM S_MDS
  20
  21 #include <linux/obd_support.h>
  22 #include <linux/obd_class.h>
  23 #include <linux/obd.h>
  24 #include <linux/lustre_lib.h>
  25 #include <linux/lustre_idl.h>
  26 #include <linux/lustre_mds.h>
  27 #include <linux/lustre_dlm.h>
  28 #include <linux/obd_class.h>
  29
  30 extern inline struct mds_obd *mds_req2mds(struct ptlrpc_request *req);
  31
  32 /* Assumes caller has already pushed us into the kernel context. */
  33 int mds_update_last_rcvd(struct mds_obd *mds, void *handle,
  34                          struct ptlrpc_request *req)
  35 {
  36         struct mds_export_data *med = &req->rq_export->exp_mds_data;
  37         struct mds_client_data *mcd = med->med_mcd;
  38         loff_t off;
  39         int rc;
  40
  41         off = MDS_LR_CLIENT + med->med_off * MDS_LR_SIZE;
  42
  43         ++mds->mds_last_rcvd;   /* lock this, or make it an LDLM function? */
  44         req->rq_repmsg->transno = HTON__u64(mds->mds_last_rcvd);
  45         mcd->mcd_last_rcvd = cpu_to_le64(mds->mds_last_rcvd);
  46         mcd->mcd_mount_count = cpu_to_le64(mds->mds_mount_count);
  47         mcd->mcd_last_xid = cpu_to_le64(req->rq_xid);
  48
  49         mds_fs_set_last_rcvd(mds, handle);
  50         rc = lustre_fwrite(mds->mds_rcvd_filp, (char *)mcd, sizeof(*mcd), &off);
  51         CDEBUG(D_INODE, "wrote trans #%Ld for client '%s' at #%d: rc = %d\n",
  52                mds->mds_last_rcvd, mcd->mcd_uuid, med->med_off, rc);
  53
  54         if (rc == sizeof(*mcd))
  55                 rc = 0;
  56         else {
  57                 CERROR("error writing to last_rcvd file: rc = %d\n", rc);
  58                 if (rc >= 0)
  59                         rc = -EIO;
  60         }
  61
  62         return rc;
  63 }
  64
  65 /* In the write-back case, the client holds a lock on a subtree.
  66  * In the intent case, the client holds a lock on the child inode.
  67  * In the pathname case, the client (may) hold a lock on the child inode. */
  68 static int mds_reint_setattr(struct mds_update_record *rec, int offset,
  69                              struct ptlrpc_request *req)
  70 {
  71         struct mds_obd *mds = mds_req2mds(req);
  72         struct obd_device *obd = req->rq_export->exp_obd;
  73         struct dentry *de;
  74         void *handle;
  75         struct lustre_handle child_lockh;
  76         int rc = 0, err;
  77
  78         if (req->rq_reqmsg->bufcount > offset + 1) {
  79                 struct dentry *dir;
  80                 struct lustre_handle dir_lockh;
  81                 char *name;
  82                 int namelen;
  83
  84                 /* a name was supplied by the client; fid1 is the directory */
  85                 dir = mds_fid2locked_dentry(obd, rec->ur_fid1, NULL, LCK_PR,
  86                                             &dir_lockh);
  87                 if (IS_ERR(dir)) {
  88                         LBUG();
  89                         GOTO(out_setattr, rc = PTR_ERR(dir));
  90                 }
  91
  92                 name = lustre_msg_buf(req->rq_reqmsg, offset + 1);
  93                 namelen = req->rq_reqmsg->buflens[offset + 1] - 1;
  94                 de = mds_name2locked_dentry(obd, dir, NULL, name, namelen,
  95                                             0, &child_lockh, LCK_PR);
  96                 l_dput(dir);
  97                 if (IS_ERR(de)) {
  98                         LBUG();
  99                         GOTO(out_setattr_de, rc = PTR_ERR(de));
 100                 }
 101         } else {
 102                 de = mds_fid2dentry(mds, rec->ur_fid1, NULL);
 103                 if (!de || IS_ERR(de)) {
 104                         LBUG();
 105                         GOTO(out_setattr_de, rc = -ESTALE);
 106                 }
 107         }
 108         CDEBUG(D_INODE, "ino %ld\n", de->d_inode->i_ino);
 109
 110         OBD_FAIL_WRITE(OBD_FAIL_MDS_REINT_SETATTR_WRITE,
 111                        de->d_inode->i_sb->s_dev);
 112
 113         lock_kernel();
 114         handle = mds_fs_start(mds, de->d_inode, MDS_FSOP_SETATTR);
 115         if (!handle)
 116                 GOTO(out_unlock, rc = PTR_ERR(handle));
 117         rc = mds_fs_setattr(mds, de, handle, &rec->ur_iattr);
 118
 119         if (!rc)
 120                 rc = mds_update_last_rcvd(mds, handle, req);
 121
 122         err = mds_fs_commit(mds, de->d_inode, handle);
 123         if (err) {
 124                 CERROR("error on commit: err = %d\n", err);
 125                 if (!rc)
 126                         rc = err;
 127         }
 128
 129         EXIT;
 130 out_unlock:
 131         unlock_kernel();
 132 out_setattr_de:
 133         l_dput(de);
 134 out_setattr:
 135         req->rq_status = rc;
 136         return (0);
 137 }
 138
 139 static int mds_reint_recreate(struct mds_update_record *rec, int offset,
 140                               struct ptlrpc_request *req)
 141 {
 142         struct dentry *de = NULL;
 143         struct mds_obd *mds = mds_req2mds(req);
 144         struct dentry *dchild = NULL;
 145         struct inode *dir;
 146         int rc = 0;
 147         ENTRY;
 148
 149         de = mds_fid2dentry(mds, rec->ur_fid1, NULL);
 150         if (IS_ERR(de) || OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_CREATE)) {
 151                 LBUG();
 152                 GOTO(out_create_de, rc = -ESTALE);
 153         }
 154         dir = de->d_inode;
 155         CDEBUG(D_INODE, "parent ino %ld\n", dir->i_ino);
 156
 157         down(&dir->i_sem);
 158         dchild = lookup_one_len(rec->ur_name, de, rec->ur_namelen - 1);
 159         if (IS_ERR(dchild)) {
 160                 CERROR("child lookup error %ld\n", PTR_ERR(dchild));
 161                 up(&dir->i_sem);
 162                 LBUG();
 163                 GOTO(out_create_dchild, rc = -ESTALE);
 164         }
 165
 166         if (dchild->d_inode) {
 167                 struct mds_body *body;
 168                 rc = 0;
 169                 body = lustre_msg_buf(req->rq_repmsg, 0);
 170                 body->ino = dchild->d_inode->i_ino;
 171                 body->generation = dchild->d_inode->i_generation;
 172         } else {
 173                 CERROR("child doesn't exist (dir %ld, name %s)\n",
 174                        dir->i_ino, rec->ur_name);
 175                 rc = -ENOENT;
 176                 LBUG();
 177         }
 178
 179 out_create_dchild:
 180         l_dput(dchild);
 181         up(&dir->i_sem);
 182 out_create_de:
 183         l_dput(de);
 184         req->rq_status = rc;
 185         return 0;
 186 }
 187
 188 static int mds_reint_create(struct mds_update_record *rec, int offset,
 189                             struct ptlrpc_request *req)
 190 {
 191         struct dentry *de = NULL;
 192         struct mds_obd *mds = mds_req2mds(req);
 193         struct obd_device *obd = req->rq_export->exp_obd;
 194         struct dentry *dchild = NULL;
 195         struct inode *dir;
 196         void *handle;
 197         struct lustre_handle lockh;
 198         int rc = 0, err, lock_mode, type = rec->ur_mode & S_IFMT;
 199         ENTRY;
 200
 201         /* requests were at offset 2, replies go back at 1 */
 202         if (offset)
 203                 offset = 1;
 204
 205         if (strcmp(req->rq_export->exp_obd->obd_type->typ_name, "mds") != 0)
 206                 LBUG();
 207
 208         lock_mode = (req->rq_reqmsg->opc == MDS_REINT) ? LCK_CW : LCK_PW;
 209
 210         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_CREATE))
 211                 GOTO(out_create, rc = -ESTALE);
 212
 213         de = mds_fid2locked_dentry(obd, rec->ur_fid1, NULL, lock_mode, &lockh);
 214         if (IS_ERR(de)) {
 215                 rc = PTR_ERR(de);
 216                 CERROR("parent lookup error %d\n", rc);
 217                 LBUG();
 218                 GOTO(out_create, rc);
 219         }
 220         dir = de->d_inode;
 221         CDEBUG(D_INODE, "parent ino %ld name %s mode %o\n",
 222                dir->i_ino, rec->ur_name, rec->ur_mode);
 223
 224         ldlm_lock_dump((void *)(unsigned long)lockh.addr);
 225
 226         down(&dir->i_sem);
 227         dchild = lookup_one_len(rec->ur_name, de, rec->ur_namelen - 1);
 228         if (IS_ERR(dchild)) {
 229                 CERROR("child lookup error %ld\n", PTR_ERR(dchild));
 230                 LBUG();
 231                 GOTO(out_create_de, rc = -ESTALE);
 232         }
 233
 234         if (dchild->d_inode) {
 235                 struct mds_body *body;
 236                 struct inode *inode = dchild->d_inode;
 237                 struct lov_mds_md *md;
 238                 CDEBUG(D_INODE, "child exists (dir %ld, name %s, ino %ld)\n",
 239                        dir->i_ino, rec->ur_name, dchild->d_inode->i_ino);
 240
 241                 body = lustre_msg_buf(req->rq_repmsg, offset);
 242                 mds_pack_inode2fid(&body->fid1, inode);
 243                 mds_pack_inode2body(body, inode);
 244                 if (S_ISREG(inode->i_mode)) {
 245                         md = lustre_msg_buf(req->rq_repmsg, offset + 1);
 246                         md->lmd_easize = mds->mds_max_mdsize;
 247
 248                         if (mds_fs_get_md(mds, inode, md) < 0)
 249                                 memset(md, 0, md->lmd_easize);
 250                 }
 251                 /* now a normal case for intent locking */
 252                 GOTO(out_create_dchild, rc = -EEXIST);
 253         }
 254
 255         OBD_FAIL_WRITE(OBD_FAIL_MDS_REINT_CREATE_WRITE, dir->i_sb->s_dev);
 256
 257         if (dir->i_mode & S_ISGID) {
 258                 rec->ur_gid = dir->i_gid;
 259                 if (S_ISDIR(rec->ur_mode))
 260                         rec->ur_mode |= S_ISGID;
 261         }
 262
 263         switch (type) {
 264         case S_IFREG:{
 265                 handle = mds_fs_start(mds, dir, MDS_FSOP_CREATE);
 266                 if (!handle)
 267                         GOTO(out_create_dchild, PTR_ERR(handle));
 268                 rc = vfs_create(dir, dchild, rec->ur_mode);
 269                 EXIT;
 270                 break;
 271         }
 272         case S_IFDIR:{
 273                 handle = mds_fs_start(mds, dir, MDS_FSOP_MKDIR);
 274                 if (!handle)
 275                         GOTO(out_create_dchild, PTR_ERR(handle));
 276                 rc = vfs_mkdir(dir, dchild, rec->ur_mode);
 277                 EXIT;
 278                 break;
 279         }
 280         case S_IFLNK:{
 281                 handle = mds_fs_start(mds, dir, MDS_FSOP_SYMLINK);
 282                 if (!handle)
 283                         GOTO(out_create_dchild, PTR_ERR(handle));
 284                 rc = vfs_symlink(dir, dchild, rec->ur_tgt);
 285                 EXIT;
 286                 break;
 287         }
 288         case S_IFCHR:
 289         case S_IFBLK:
 290         case S_IFIFO:
 291         case S_IFSOCK:{
 292                 int rdev = rec->ur_rdev;
 293                 handle = mds_fs_start(mds, dir, MDS_FSOP_MKNOD);
 294                 if (!handle)
 295                         GOTO(out_create_dchild, PTR_ERR(handle));
 296                 rc = vfs_mknod(dir, dchild, rec->ur_mode, rdev);
 297                 EXIT;
 298                 break;
 299         }
 300         default:
 301                 CERROR("bad file type %o creating %s\n", type, rec->ur_name);
 302                 GOTO(out_create_dchild, rc = -EINVAL);
 303         }
 304
 305         if (rc) {
 306                 CERROR("error during create: %d\n", rc);
 307                 if (rc != -ENOSPC)
 308                         LBUG();
 309                 GOTO(out_create_commit, rc);
 310         } else {
 311                 struct iattr iattr;
 312                 struct inode *inode = dchild->d_inode;
 313                 struct mds_body *body;
 314
 315                 CDEBUG(D_INODE, "created ino %ld\n", dchild->d_inode->i_ino);
 316                 if (!offset && type == S_IFREG) {
 317                         struct lov_mds_md *md;
 318                         md = lustre_msg_buf(req->rq_reqmsg, 2);
 319                         rc = mds_fs_set_md(mds, inode, handle, md);
 320                         if (rc) {
 321                                 CERROR("error %d setting LOV MD for %ld\n",
 322                                        rc, inode->i_ino);
 323                                 GOTO(out_create_unlink, rc);
 324                         }
 325                 }
 326
 327                 iattr.ia_atime = rec->ur_time;
 328                 iattr.ia_ctime = rec->ur_time;
 329                 iattr.ia_mtime = rec->ur_time;
 330                 iattr.ia_uid = rec->ur_uid;
 331                 iattr.ia_gid = rec->ur_gid;
 332                 iattr.ia_valid = ATTR_UID | ATTR_GID | ATTR_ATIME |
 333                         ATTR_MTIME | ATTR_CTIME;
 334
 335                 rc = mds_fs_setattr(mds, dchild, handle, &iattr);
 336                 if (rc) {
 337                         CERROR("error on setattr: rc = %d\n", rc);
 338                         /* XXX should we abort here in case of error? */
 339                 }
 340
 341                 rc = mds_update_last_rcvd(mds, handle, req);
 342                 if (rc) {
 343                         CERROR("error on update_last_rcvd: rc = %d\n", rc);
 344                         /* XXX should we abort here in case of error? */
 345                 }
 346
 347                 body = lustre_msg_buf(req->rq_repmsg, offset);
 348                 body->ino = inode->i_ino;
 349                 body->generation = inode->i_generation;
 350                 body->valid = OBD_MD_FLID | OBD_MD_FLGENER;
 351         }
 352         EXIT;
 353 out_create_commit:
 354         err = mds_fs_commit(mds, dir, handle);
 355         if (err) {
 356                 CERROR("error on commit: err = %d\n", err);
 357                 if (!rc)
 358                         rc = err;
 359         }
 360 out_create_dchild:
 361         l_dput(dchild);
 362         ldlm_lock_decref(&lockh, lock_mode);
 363 out_create_de:
 364         up(&dir->i_sem);
 365         l_dput(de);
 366 out_create:
 367         req->rq_status = rc;
 368         return 0;
 369
 370 out_create_unlink:
 371         /* Destroy the file we just created.  This should not need extra
 372          * journal credits, as we have already modified all of the blocks
 373          * needed in order to create the file in the first place.
 374          */
 375         switch (type) {
 376         case S_IFDIR:
 377                 err = vfs_rmdir(dir, dchild);
 378                 if (err)
 379                         CERROR("failed rmdir in error path: rc = %d\n", err);
 380                 break;
 381         default:
 382                 err = vfs_unlink(dir, dchild);
 383                 if (err)
 384                         CERROR("failed unlink in error path: rc = %d\n", err);
 385         }
 386
 387         goto out_create_commit;
 388 }
 389
 390 static int mds_reint_unlink(struct mds_update_record *rec, int offset,
 391                             struct ptlrpc_request *req)
 392 {
 393         struct dentry *de = NULL;
 394         struct dentry *dchild = NULL;
 395         struct mds_obd *mds = mds_req2mds(req);
 396         struct obd_device *obd = req->rq_export->exp_obd;
 397         char *name;
 398         struct inode *dir, *inode;
 399         struct lustre_handle lockh, child_lockh;
 400         void *handle;
 401         int namelen, lock_mode, err, rc = 0;
 402         ENTRY;
 403
 404         /* a name was supplied by the client; fid1 is the directory */
 405         lock_mode = (req->rq_reqmsg->opc == MDS_REINT) ? LCK_CW : LCK_PW;
 406         de = mds_fid2locked_dentry(obd, rec->ur_fid1, NULL, lock_mode, &lockh);
 407         if (IS_ERR(de)) {
 408                 LBUG();
 409                 RETURN(PTR_ERR(de));
 410         }
 411
 412         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_UNLINK))
 413                 GOTO(out_unlink, rc = -ENOENT);
 414
 415         name = lustre_msg_buf(req->rq_reqmsg, offset + 1);
 416         namelen = req->rq_reqmsg->buflens[offset + 1] - 1;
 417         dchild = mds_name2locked_dentry(obd, de, NULL, name, namelen,
 418                                         LCK_EX, &child_lockh, lock_mode);
 419
 420         if (IS_ERR(dchild)) {
 421                 LBUG();
 422                 GOTO(out_unlink, rc = PTR_ERR(dchild));
 423         }
 424
 425         dir = de->d_inode;
 426         inode = dchild->d_inode;
 427         CDEBUG(D_INODE, "parent ino %ld\n", dir->i_ino);
 428
 429         if (!inode) {
 430                 CDEBUG(D_INODE, "child doesn't exist (dir %ld, name %s\n",
 431                        dir->i_ino, rec->ur_name);
 432                 /* going to out_unlink_cancel causes an LBUG, don't know why */
 433                 GOTO(out_unlink_dchild, rc = -ENOENT);
 434         } else if (offset) {
 435                 struct mds_body *body = lustre_msg_buf(req->rq_repmsg, 1);
 436                 mds_pack_inode2fid(&body->fid1, inode);
 437                 mds_pack_inode2body(body, inode);
 438         }
 439
 440         OBD_FAIL_WRITE(OBD_FAIL_MDS_REINT_UNLINK_WRITE, dir->i_sb->s_dev);
 441
 442         switch (rec->ur_mode /* & S_IFMT ? */) {
 443         case S_IFDIR:
 444                 handle = mds_fs_start(mds, dir, MDS_FSOP_RMDIR);
 445                 if (!handle)
 446                         GOTO(out_unlink_cancel, rc = PTR_ERR(handle));
 447                 rc = vfs_rmdir(dir, dchild);
 448                 break;
 449         case S_IFREG:
 450                 /* get OBD EA data first so client can also destroy object */
 451                 if ((inode->i_mode & S_IFMT) == S_IFREG && offset) {
 452                         struct lov_mds_md *md;
 453
 454                         md = lustre_msg_buf(req->rq_repmsg, 2);
 455                         md->lmd_easize = mds->mds_max_mdsize;
 456                         if ((rc = mds_fs_get_md(mds, inode, md)) < 0) {
 457                                 CDEBUG(D_INFO, "No md for ino %ld: rc = %d\n",
 458                                        inode->i_ino, rc);
 459                                 memset(md, 0, md->lmd_easize);
 460                         }
 461                 }
 462                 /* no break */
 463         case S_IFLNK:
 464         case S_IFCHR:
 465         case S_IFBLK:
 466         case S_IFIFO:
 467         case S_IFSOCK:
 468                 handle = mds_fs_start(mds, dir, MDS_FSOP_UNLINK);
 469                 if (!handle)
 470                         GOTO(out_unlink_cancel, rc = PTR_ERR(handle));
 471                 rc = vfs_unlink(dir, dchild);
 472                 break;
 473         default:
 474                 CERROR("bad file type %o unlinking %s\n", rec->ur_mode, name);
 475                 handle = NULL;
 476                 LBUG();
 477                 GOTO(out_unlink_cancel, rc = -EINVAL);
 478         }
 479
 480         if (!rc)
 481                 rc = mds_update_last_rcvd(mds, handle, req);
 482         err = mds_fs_commit(mds, dir, handle);
 483         if (err) {
 484                 CERROR("error on commit: err = %d\n", err);
 485                 if (!rc)
 486                         rc = err;
 487         }
 488
 489         EXIT;
 490
 491 out_unlink_cancel:
 492         ldlm_lock_decref(&child_lockh, LCK_EX);
 493         err = ldlm_cli_cancel(&child_lockh);
 494         if (err < 0) {
 495                 CERROR("failed to cancel child inode lock: err = %d\n", err);
 496                 if (!rc)
 497                         rc = -ENOLCK;   /*XXX translate LDLM lock error */
 498         }
 499 out_unlink_dchild:
 500         l_dput(dchild);
 501         up(&dir->i_sem);
 502 out_unlink:
 503         ldlm_lock_decref(&lockh, lock_mode);
 504         l_dput(de);
 505         req->rq_status = rc;
 506         return 0;
 507 }
 508
 509 static int mds_reint_link(struct mds_update_record *rec, int offset,
 510                           struct ptlrpc_request *req)
 511 {
 512         struct dentry *de_src = NULL;
 513         struct dentry *de_tgt_dir = NULL;
 514         struct dentry *dchild = NULL;
 515         struct mds_obd *mds = mds_req2mds(req);
 516         void *handle;
 517         int rc = 0;
 518         int err;
 519
 520         ENTRY;
 521         de_src = mds_fid2dentry(mds, rec->ur_fid1, NULL);
 522         if (IS_ERR(de_src) || OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_LINK)) {
 523                 GOTO(out_link, rc = -ESTALE);
 524         }
 525
 526         de_tgt_dir = mds_fid2dentry(mds, rec->ur_fid2, NULL);
 527         if (IS_ERR(de_tgt_dir)) {
 528                 GOTO(out_link_de_src, rc = -ESTALE);
 529         }
 530
 531         down(&de_tgt_dir->d_inode->i_sem);
 532         dchild = lookup_one_len(rec->ur_name, de_tgt_dir, rec->ur_namelen - 1);
 533         if (IS_ERR(dchild)) {
 534                 CERROR("child lookup error %ld\n", PTR_ERR(dchild));
 535                 GOTO(out_link_de_tgt_dir, rc = -ESTALE);
 536         }
 537
 538         if (dchild->d_inode) {
 539                 CERROR("child exists (dir %ld, name %s\n",
 540                        de_tgt_dir->d_inode->i_ino, rec->ur_name);
 541                 GOTO(out_link_dchild, rc = -EEXIST);
 542         }
 543
 544         OBD_FAIL_WRITE(OBD_FAIL_MDS_REINT_LINK_WRITE,
 545                        de_src->d_inode->i_sb->s_dev);
 546
 547         handle = mds_fs_start(mds, de_tgt_dir->d_inode, MDS_FSOP_LINK);
 548         if (!handle)
 549                 GOTO(out_link_dchild, rc = PTR_ERR(handle));
 550
 551         rc = vfs_link(de_src, de_tgt_dir->d_inode, dchild);
 552
 553         if (!rc)
 554                 rc = mds_update_last_rcvd(mds, handle, req);
 555
 556         err = mds_fs_commit(mds, de_tgt_dir->d_inode, handle);
 557         if (err) {
 558                 CERROR("error on commit: err = %d\n", err);
 559                 if (!rc)
 560                         rc = err;
 561         }
 562         EXIT;
 563
 564 out_link_dchild:
 565         l_dput(dchild);
 566 out_link_de_tgt_dir:
 567         up(&de_tgt_dir->d_inode->i_sem);
 568         l_dput(de_tgt_dir);
 569 out_link_de_src:
 570         l_dput(de_src);
 571 out_link:
 572         req->rq_status = rc;
 573         return 0;
 574 }
 575
 576 static int mds_reint_rename(struct mds_update_record *rec, int offset,
 577                             struct ptlrpc_request *req)
 578 {
 579         struct obd_device *obd = req->rq_export->exp_obd;
 580         struct dentry *de_srcdir = NULL;
 581         struct dentry *de_tgtdir = NULL;
 582         struct dentry *de_old = NULL;
 583         struct dentry *de_new = NULL;
 584         struct mds_obd *mds = mds_req2mds(req);
 585         struct lustre_handle tgtlockh, srclockh, oldhandle;
 586         int flags, lock_mode, rc = 0, err;
 587         void *handle;
 588         __u64 res_id[3] = { 0 };
 589         ENTRY;
 590
 591         de_srcdir = mds_fid2dentry(mds, rec->ur_fid1, NULL);
 592         if (IS_ERR(de_srcdir))
 593                 GOTO(out_rename, rc = -ESTALE);
 594
 595         lock_mode = (req->rq_reqmsg->opc == MDS_REINT) ? LCK_CW : LCK_PW;
 596         res_id[0] = de_srcdir->d_inode->i_ino;
 597
 598         rc = ldlm_lock_match(obd->obd_namespace, res_id, LDLM_PLAIN,
 599                              NULL, 0, lock_mode, &srclockh);
 600         if (rc == 0) {
 601                 LDLM_DEBUG_NOLOCK("enqueue res %Lu", res_id[0]);
 602                 rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, NULL,
 603                                       res_id, LDLM_PLAIN, NULL, 0, lock_mode,
 604                                       &flags, ldlm_completion_ast,
 605                                       mds_blocking_ast, NULL, 0, &srclockh);
 606                 if (rc != ELDLM_OK) {
 607                         CERROR("lock enqueue: err: %d\n", rc);
 608                         GOTO(out_rename_srcput, rc = -EIO);
 609                 }
 610         } else
 611                 ldlm_lock_dump((void *)(unsigned long)srclockh.addr);
 612
 613         de_tgtdir = mds_fid2dentry(mds, rec->ur_fid2, NULL);
 614         if (IS_ERR(de_tgtdir))
 615                 GOTO(out_rename_srcdir, rc = -ESTALE);
 616
 617         lock_mode = (req->rq_reqmsg->opc == MDS_REINT) ? LCK_CW : LCK_PW;
 618         res_id[0] = de_tgtdir->d_inode->i_ino;
 619
 620         rc = ldlm_lock_match(obd->obd_namespace, res_id, LDLM_PLAIN,
 621                              NULL, 0, lock_mode, &tgtlockh);
 622         if (rc == 0) {
 623                 LDLM_DEBUG_NOLOCK("enqueue res %Lu", res_id[0]);
 624                 rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, NULL,
 625                                       res_id, LDLM_PLAIN, NULL, 0, lock_mode,
 626                                       &flags, ldlm_completion_ast,
 627                                       mds_blocking_ast, NULL, 0, &tgtlockh);
 628                 if (rc != ELDLM_OK) {
 629                         CERROR("lock enqueue: err: %d\n", rc);
 630                         GOTO(out_rename_tgtput, rc = -EIO);
 631                 }
 632         } else
 633                 ldlm_lock_dump((void *)(unsigned long)tgtlockh.addr);
 634
 635         double_lock(de_tgtdir, de_srcdir);
 636
 637         de_old = lookup_one_len(rec->ur_name, de_srcdir, rec->ur_namelen - 1);
 638         if (IS_ERR(de_old)) {
 639                 CERROR("old child lookup error (%*s): %ld\n",
 640                        rec->ur_namelen - 1, rec->ur_name, PTR_ERR(de_old));
 641                 GOTO(out_rename_tgtdir, rc = -ENOENT);
 642         }
 643
 644         de_new = lookup_one_len(rec->ur_tgt, de_tgtdir, rec->ur_tgtlen - 1);
 645         if (IS_ERR(de_new)) {
 646                 CERROR("new child lookup error (%*s): %ld\n",
 647                        rec->ur_tgtlen - 1, rec->ur_tgt, PTR_ERR(de_new));
 648                 GOTO(out_rename_deold, rc = -ENOENT);
 649         }
 650
 651         /* in intent case ship back attributes to client */
 652         if (offset) {
 653                 struct mds_body *body = lustre_msg_buf(req->rq_repmsg, 1);
 654                 struct inode *inode = de_new->d_inode;
 655
 656                 if (!inode) {
 657                         body->valid = 0;
 658                 } else {
 659                         mds_pack_inode2fid(&body->fid1, inode);
 660                         mds_pack_inode2body(body, inode);
 661                         if (S_ISREG(inode->i_mode)) {
 662                                 struct lov_mds_md *md;
 663
 664                                 md = lustre_msg_buf(req->rq_repmsg, 2);
 665                                 md->lmd_easize = mds->mds_max_mdsize;
 666                                 if ((rc = mds_fs_get_md(mds, inode, md)) < 0) {
 667                                         CDEBUG(D_INFO,"No md for %ld: rc %d\n",
 668                                                inode->i_ino, rc);
 669                                         memset(md, 0, md->lmd_easize);
 670                                 }
 671                         }
 672                 }
 673         }
 674
 675         OBD_FAIL_WRITE(OBD_FAIL_MDS_REINT_RENAME_WRITE,
 676                        de_srcdir->d_inode->i_sb->s_dev);
 677
 678         handle = mds_fs_start(mds, de_tgtdir->d_inode, MDS_FSOP_RENAME);
 679         if (!handle)
 680                 GOTO(out_rename_denew, rc = PTR_ERR(handle));
 681         lock_kernel();
 682         rc = vfs_rename(de_srcdir->d_inode, de_old, de_tgtdir->d_inode, de_new,
 683                         NULL);
 684         unlock_kernel();
 685
 686         if (!rc)
 687                 rc = mds_update_last_rcvd(mds, handle, req);
 688
 689         err = mds_fs_commit(mds, de_tgtdir->d_inode, handle);
 690         if (err) {
 691                 CERROR("error on commit: err = %d\n", err);
 692                 if (!rc)
 693                         rc = err;
 694         }
 695         EXIT;
 696
 697       out_rename_denew:
 698         l_dput(de_new);
 699       out_rename_deold:
 700         if (!rc) {
 701                 res_id[0] = de_old->d_inode->i_ino;
 702                 /* Take an exclusive lock on the resource that we're
 703                  * about to free, to force everyone to drop their
 704                  * locks. */
 705                 LDLM_DEBUG_NOLOCK("getting EX lock res %Lu", res_id[0]);
 706                 rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, NULL,
 707                                       res_id, LDLM_PLAIN, NULL, 0, LCK_EX,
 708                                       &flags, ldlm_completion_ast,
 709                                       mds_blocking_ast, NULL, 0, &oldhandle);
 710                 if (rc)
 711                         CERROR("failed to get child inode lock (child ino %Ld, "
 712                                "dir ino %ld)\n",
 713                                res_id[0], de_old->d_inode->i_ino);
 714         }
 715
 716         l_dput(de_old);
 717
 718         if (!rc) {
 719                 ldlm_lock_decref(&oldhandle, LCK_EX);
 720                 rc = ldlm_cli_cancel(&oldhandle);
 721                 if (rc < 0)
 722                         CERROR("failed to cancel child inode lock ino "
 723                                "%Ld: %d\n", res_id[0], rc);
 724         }
 725 out_rename_tgtdir:
 726         double_up(&de_srcdir->d_inode->i_sem, &de_tgtdir->d_inode->i_sem);
 727         ldlm_lock_decref(&tgtlockh, lock_mode);
 728 out_rename_tgtput:
 729         l_dput(de_tgtdir);
 730 out_rename_srcdir:
 731         ldlm_lock_decref(&srclockh, lock_mode);
 732 out_rename_srcput:
 733         l_dput(de_srcdir);
 734 out_rename:
 735         req->rq_status = rc;
 736         return 0;
 737 }
 738
 739 typedef int (*mds_reinter) (struct mds_update_record *, int offset,
 740                             struct ptlrpc_request *);
 741
 742 static mds_reinter reinters[REINT_MAX + 1] = {
 743         [REINT_SETATTR] mds_reint_setattr,
 744         [REINT_CREATE] mds_reint_create,
 745         [REINT_UNLINK] mds_reint_unlink,
 746         [REINT_LINK] mds_reint_link,
 747         [REINT_RENAME] mds_reint_rename,
 748         [REINT_RECREATE] mds_reint_recreate,
 749 };
 750
 751 int mds_reint_rec(struct mds_update_record *rec, int offset,
 752                   struct ptlrpc_request *req)
 753 {
 754         struct mds_obd *mds = mds_req2mds(req);
 755         struct obd_run_ctxt saved;
 756
 757         int rc;
 758
 759         if (rec->ur_opcode < 1 || rec->ur_opcode > REINT_MAX) {
 760                 CERROR("opcode %d not valid\n", rec->ur_opcode);
 761                 rc = req->rq_status = -EINVAL;
 762                 RETURN(rc);
 763         }
 764
 765         push_ctxt(&saved, &mds->mds_ctxt);
 766         rc = reinters[rec->ur_opcode] (rec, offset, req);
 767         pop_ctxt(&saved);
 768
 769         return rc;
 770 }