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