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