Merge branch 'linus' into cpus4096
[linux-2.6] / fs / gfs2 / recovery.c
1 /*
2  * Copyright (C) Sistina Software, Inc.  1997-2003 All rights reserved.
3  * Copyright (C) 2004-2006 Red Hat, Inc.  All rights reserved.
4  *
5  * This copyrighted material is made available to anyone wishing to use,
6  * modify, copy, or redistribute it subject to the terms and conditions
7  * of the GNU General Public License version 2.
8  */
9
10 #include <linux/slab.h>
11 #include <linux/spinlock.h>
12 #include <linux/completion.h>
13 #include <linux/buffer_head.h>
14 #include <linux/gfs2_ondisk.h>
15 #include <linux/crc32.h>
16 #include <linux/lm_interface.h>
17 #include <linux/kthread.h>
18 #include <linux/freezer.h>
19
20 #include "gfs2.h"
21 #include "incore.h"
22 #include "bmap.h"
23 #include "glock.h"
24 #include "glops.h"
25 #include "lops.h"
26 #include "meta_io.h"
27 #include "recovery.h"
28 #include "super.h"
29 #include "util.h"
30 #include "dir.h"
31
32 int gfs2_replay_read_block(struct gfs2_jdesc *jd, unsigned int blk,
33                            struct buffer_head **bh)
34 {
35         struct gfs2_inode *ip = GFS2_I(jd->jd_inode);
36         struct gfs2_glock *gl = ip->i_gl;
37         int new = 0;
38         u64 dblock;
39         u32 extlen;
40         int error;
41
42         error = gfs2_extent_map(&ip->i_inode, blk, &new, &dblock, &extlen);
43         if (error)
44                 return error;
45         if (!dblock) {
46                 gfs2_consist_inode(ip);
47                 return -EIO;
48         }
49
50         *bh = gfs2_meta_ra(gl, dblock, extlen);
51
52         return error;
53 }
54
55 int gfs2_revoke_add(struct gfs2_sbd *sdp, u64 blkno, unsigned int where)
56 {
57         struct list_head *head = &sdp->sd_revoke_list;
58         struct gfs2_revoke_replay *rr;
59         int found = 0;
60
61         list_for_each_entry(rr, head, rr_list) {
62                 if (rr->rr_blkno == blkno) {
63                         found = 1;
64                         break;
65                 }
66         }
67
68         if (found) {
69                 rr->rr_where = where;
70                 return 0;
71         }
72
73         rr = kmalloc(sizeof(struct gfs2_revoke_replay), GFP_NOFS);
74         if (!rr)
75                 return -ENOMEM;
76
77         rr->rr_blkno = blkno;
78         rr->rr_where = where;
79         list_add(&rr->rr_list, head);
80
81         return 1;
82 }
83
84 int gfs2_revoke_check(struct gfs2_sbd *sdp, u64 blkno, unsigned int where)
85 {
86         struct gfs2_revoke_replay *rr;
87         int wrap, a, b, revoke;
88         int found = 0;
89
90         list_for_each_entry(rr, &sdp->sd_revoke_list, rr_list) {
91                 if (rr->rr_blkno == blkno) {
92                         found = 1;
93                         break;
94                 }
95         }
96
97         if (!found)
98                 return 0;
99
100         wrap = (rr->rr_where < sdp->sd_replay_tail);
101         a = (sdp->sd_replay_tail < where);
102         b = (where < rr->rr_where);
103         revoke = (wrap) ? (a || b) : (a && b);
104
105         return revoke;
106 }
107
108 void gfs2_revoke_clean(struct gfs2_sbd *sdp)
109 {
110         struct list_head *head = &sdp->sd_revoke_list;
111         struct gfs2_revoke_replay *rr;
112
113         while (!list_empty(head)) {
114                 rr = list_entry(head->next, struct gfs2_revoke_replay, rr_list);
115                 list_del(&rr->rr_list);
116                 kfree(rr);
117         }
118 }
119
120 static int gfs2_log_header_in(struct gfs2_log_header_host *lh, const void *buf)
121 {
122         const struct gfs2_log_header *str = buf;
123
124         if (str->lh_header.mh_magic != cpu_to_be32(GFS2_MAGIC) ||
125             str->lh_header.mh_type != cpu_to_be32(GFS2_METATYPE_LH))
126                 return 1;
127
128         lh->lh_sequence = be64_to_cpu(str->lh_sequence);
129         lh->lh_flags = be32_to_cpu(str->lh_flags);
130         lh->lh_tail = be32_to_cpu(str->lh_tail);
131         lh->lh_blkno = be32_to_cpu(str->lh_blkno);
132         lh->lh_hash = be32_to_cpu(str->lh_hash);
133         return 0;
134 }
135
136 /**
137  * get_log_header - read the log header for a given segment
138  * @jd: the journal
139  * @blk: the block to look at
140  * @lh: the log header to return
141  *
142  * Read the log header for a given segement in a given journal.  Do a few
143  * sanity checks on it.
144  *
145  * Returns: 0 on success,
146  *          1 if the header was invalid or incomplete,
147  *          errno on error
148  */
149
150 static int get_log_header(struct gfs2_jdesc *jd, unsigned int blk,
151                           struct gfs2_log_header_host *head)
152 {
153         struct buffer_head *bh;
154         struct gfs2_log_header_host uninitialized_var(lh);
155         const u32 nothing = 0;
156         u32 hash;
157         int error;
158
159         error = gfs2_replay_read_block(jd, blk, &bh);
160         if (error)
161                 return error;
162
163         hash = crc32_le((u32)~0, bh->b_data, sizeof(struct gfs2_log_header) -
164                                              sizeof(u32));
165         hash = crc32_le(hash, (unsigned char const *)&nothing, sizeof(nothing));
166         hash ^= (u32)~0;
167         error = gfs2_log_header_in(&lh, bh->b_data);
168         brelse(bh);
169
170         if (error || lh.lh_blkno != blk || lh.lh_hash != hash)
171                 return 1;
172
173         *head = lh;
174
175         return 0;
176 }
177
178 /**
179  * find_good_lh - find a good log header
180  * @jd: the journal
181  * @blk: the segment to start searching from
182  * @lh: the log header to fill in
183  * @forward: if true search forward in the log, else search backward
184  *
185  * Call get_log_header() to get a log header for a segment, but if the
186  * segment is bad, either scan forward or backward until we find a good one.
187  *
188  * Returns: errno
189  */
190
191 static int find_good_lh(struct gfs2_jdesc *jd, unsigned int *blk,
192                         struct gfs2_log_header_host *head)
193 {
194         unsigned int orig_blk = *blk;
195         int error;
196
197         for (;;) {
198                 error = get_log_header(jd, *blk, head);
199                 if (error <= 0)
200                         return error;
201
202                 if (++*blk == jd->jd_blocks)
203                         *blk = 0;
204
205                 if (*blk == orig_blk) {
206                         gfs2_consist_inode(GFS2_I(jd->jd_inode));
207                         return -EIO;
208                 }
209         }
210 }
211
212 /**
213  * jhead_scan - make sure we've found the head of the log
214  * @jd: the journal
215  * @head: this is filled in with the log descriptor of the head
216  *
217  * At this point, seg and lh should be either the head of the log or just
218  * before.  Scan forward until we find the head.
219  *
220  * Returns: errno
221  */
222
223 static int jhead_scan(struct gfs2_jdesc *jd, struct gfs2_log_header_host *head)
224 {
225         unsigned int blk = head->lh_blkno;
226         struct gfs2_log_header_host lh;
227         int error;
228
229         for (;;) {
230                 if (++blk == jd->jd_blocks)
231                         blk = 0;
232
233                 error = get_log_header(jd, blk, &lh);
234                 if (error < 0)
235                         return error;
236                 if (error == 1)
237                         continue;
238
239                 if (lh.lh_sequence == head->lh_sequence) {
240                         gfs2_consist_inode(GFS2_I(jd->jd_inode));
241                         return -EIO;
242                 }
243                 if (lh.lh_sequence < head->lh_sequence)
244                         break;
245
246                 *head = lh;
247         }
248
249         return 0;
250 }
251
252 /**
253  * gfs2_find_jhead - find the head of a log
254  * @jd: the journal
255  * @head: the log descriptor for the head of the log is returned here
256  *
257  * Do a binary search of a journal and find the valid log entry with the
258  * highest sequence number.  (i.e. the log head)
259  *
260  * Returns: errno
261  */
262
263 int gfs2_find_jhead(struct gfs2_jdesc *jd, struct gfs2_log_header_host *head)
264 {
265         struct gfs2_log_header_host lh_1, lh_m;
266         u32 blk_1, blk_2, blk_m;
267         int error;
268
269         blk_1 = 0;
270         blk_2 = jd->jd_blocks - 1;
271
272         for (;;) {
273                 blk_m = (blk_1 + blk_2) / 2;
274
275                 error = find_good_lh(jd, &blk_1, &lh_1);
276                 if (error)
277                         return error;
278
279                 error = find_good_lh(jd, &blk_m, &lh_m);
280                 if (error)
281                         return error;
282
283                 if (blk_1 == blk_m || blk_m == blk_2)
284                         break;
285
286                 if (lh_1.lh_sequence <= lh_m.lh_sequence)
287                         blk_1 = blk_m;
288                 else
289                         blk_2 = blk_m;
290         }
291
292         error = jhead_scan(jd, &lh_1);
293         if (error)
294                 return error;
295
296         *head = lh_1;
297
298         return error;
299 }
300
301 /**
302  * foreach_descriptor - go through the active part of the log
303  * @jd: the journal
304  * @start: the first log header in the active region
305  * @end: the last log header (don't process the contents of this entry))
306  *
307  * Call a given function once for every log descriptor in the active
308  * portion of the log.
309  *
310  * Returns: errno
311  */
312
313 static int foreach_descriptor(struct gfs2_jdesc *jd, unsigned int start,
314                               unsigned int end, int pass)
315 {
316         struct gfs2_sbd *sdp = GFS2_SB(jd->jd_inode);
317         struct buffer_head *bh;
318         struct gfs2_log_descriptor *ld;
319         int error = 0;
320         u32 length;
321         __be64 *ptr;
322         unsigned int offset = sizeof(struct gfs2_log_descriptor);
323         offset += sizeof(__be64) - 1;
324         offset &= ~(sizeof(__be64) - 1);
325
326         while (start != end) {
327                 error = gfs2_replay_read_block(jd, start, &bh);
328                 if (error)
329                         return error;
330                 if (gfs2_meta_check(sdp, bh)) {
331                         brelse(bh);
332                         return -EIO;
333                 }
334                 ld = (struct gfs2_log_descriptor *)bh->b_data;
335                 length = be32_to_cpu(ld->ld_length);
336
337                 if (be32_to_cpu(ld->ld_header.mh_type) == GFS2_METATYPE_LH) {
338                         struct gfs2_log_header_host lh;
339                         error = get_log_header(jd, start, &lh);
340                         if (!error) {
341                                 gfs2_replay_incr_blk(sdp, &start);
342                                 brelse(bh);
343                                 continue;
344                         }
345                         if (error == 1) {
346                                 gfs2_consist_inode(GFS2_I(jd->jd_inode));
347                                 error = -EIO;
348                         }
349                         brelse(bh);
350                         return error;
351                 } else if (gfs2_metatype_check(sdp, bh, GFS2_METATYPE_LD)) {
352                         brelse(bh);
353                         return -EIO;
354                 }
355                 ptr = (__be64 *)(bh->b_data + offset);
356                 error = lops_scan_elements(jd, start, ld, ptr, pass);
357                 if (error) {
358                         brelse(bh);
359                         return error;
360                 }
361
362                 while (length--)
363                         gfs2_replay_incr_blk(sdp, &start);
364
365                 brelse(bh);
366         }
367
368         return 0;
369 }
370
371 /**
372  * clean_journal - mark a dirty journal as being clean
373  * @sdp: the filesystem
374  * @jd: the journal
375  * @gl: the journal's glock
376  * @head: the head journal to start from
377  *
378  * Returns: errno
379  */
380
381 static int clean_journal(struct gfs2_jdesc *jd, struct gfs2_log_header_host *head)
382 {
383         struct gfs2_inode *ip = GFS2_I(jd->jd_inode);
384         struct gfs2_sbd *sdp = GFS2_SB(jd->jd_inode);
385         unsigned int lblock;
386         struct gfs2_log_header *lh;
387         u32 hash;
388         struct buffer_head *bh;
389         int error;
390         struct buffer_head bh_map = { .b_state = 0, .b_blocknr = 0 };
391
392         lblock = head->lh_blkno;
393         gfs2_replay_incr_blk(sdp, &lblock);
394         bh_map.b_size = 1 << ip->i_inode.i_blkbits;
395         error = gfs2_block_map(&ip->i_inode, lblock, &bh_map, 0);
396         if (error)
397                 return error;
398         if (!bh_map.b_blocknr) {
399                 gfs2_consist_inode(ip);
400                 return -EIO;
401         }
402
403         bh = sb_getblk(sdp->sd_vfs, bh_map.b_blocknr);
404         lock_buffer(bh);
405         memset(bh->b_data, 0, bh->b_size);
406         set_buffer_uptodate(bh);
407         clear_buffer_dirty(bh);
408         unlock_buffer(bh);
409
410         lh = (struct gfs2_log_header *)bh->b_data;
411         memset(lh, 0, sizeof(struct gfs2_log_header));
412         lh->lh_header.mh_magic = cpu_to_be32(GFS2_MAGIC);
413         lh->lh_header.mh_type = cpu_to_be32(GFS2_METATYPE_LH);
414         lh->lh_header.mh_format = cpu_to_be32(GFS2_FORMAT_LH);
415         lh->lh_sequence = cpu_to_be64(head->lh_sequence + 1);
416         lh->lh_flags = cpu_to_be32(GFS2_LOG_HEAD_UNMOUNT);
417         lh->lh_blkno = cpu_to_be32(lblock);
418         hash = gfs2_disk_hash((const char *)lh, sizeof(struct gfs2_log_header));
419         lh->lh_hash = cpu_to_be32(hash);
420
421         set_buffer_dirty(bh);
422         if (sync_dirty_buffer(bh))
423                 gfs2_io_error_bh(sdp, bh);
424         brelse(bh);
425
426         return error;
427 }
428
429
430 static void gfs2_lm_recovery_done(struct gfs2_sbd *sdp, unsigned int jid,
431                                   unsigned int message)
432 {
433         if (!sdp->sd_lockstruct.ls_ops->lm_recovery_done)
434                 return;
435
436         if (likely(!test_bit(SDF_SHUTDOWN, &sdp->sd_flags)))
437                 sdp->sd_lockstruct.ls_ops->lm_recovery_done(
438                         sdp->sd_lockstruct.ls_lockspace, jid, message);
439 }
440
441
442 /**
443  * gfs2_recover_journal - recovery a given journal
444  * @jd: the struct gfs2_jdesc describing the journal
445  *
446  * Acquire the journal's lock, check to see if the journal is clean, and
447  * do recovery if necessary.
448  *
449  * Returns: errno
450  */
451
452 int gfs2_recover_journal(struct gfs2_jdesc *jd)
453 {
454         struct gfs2_inode *ip = GFS2_I(jd->jd_inode);
455         struct gfs2_sbd *sdp = GFS2_SB(jd->jd_inode);
456         struct gfs2_log_header_host head;
457         struct gfs2_holder j_gh, ji_gh, t_gh;
458         unsigned long t;
459         int ro = 0;
460         unsigned int pass;
461         int error;
462
463         if (jd->jd_jid != sdp->sd_lockstruct.ls_jid) {
464                 fs_info(sdp, "jid=%u: Trying to acquire journal lock...\n",
465                         jd->jd_jid);
466
467                 /* Acquire the journal lock so we can do recovery */
468
469                 error = gfs2_glock_nq_num(sdp, jd->jd_jid, &gfs2_journal_glops,
470                                           LM_ST_EXCLUSIVE,
471                                           LM_FLAG_NOEXP | LM_FLAG_TRY | GL_NOCACHE,
472                                           &j_gh);
473                 switch (error) {
474                 case 0:
475                         break;
476
477                 case GLR_TRYFAILED:
478                         fs_info(sdp, "jid=%u: Busy\n", jd->jd_jid);
479                         error = 0;
480
481                 default:
482                         goto fail;
483                 };
484
485                 error = gfs2_glock_nq_init(ip->i_gl, LM_ST_SHARED,
486                                            LM_FLAG_NOEXP | GL_NOCACHE, &ji_gh);
487                 if (error)
488                         goto fail_gunlock_j;
489         } else {
490                 fs_info(sdp, "jid=%u, already locked for use\n", jd->jd_jid);
491         }
492
493         fs_info(sdp, "jid=%u: Looking at journal...\n", jd->jd_jid);
494
495         error = gfs2_jdesc_check(jd);
496         if (error)
497                 goto fail_gunlock_ji;
498
499         error = gfs2_find_jhead(jd, &head);
500         if (error)
501                 goto fail_gunlock_ji;
502
503         if (!(head.lh_flags & GFS2_LOG_HEAD_UNMOUNT)) {
504                 fs_info(sdp, "jid=%u: Acquiring the transaction lock...\n",
505                         jd->jd_jid);
506
507                 t = jiffies;
508
509                 /* Acquire a shared hold on the transaction lock */
510
511                 error = gfs2_glock_nq_init(sdp->sd_trans_gl, LM_ST_SHARED,
512                                            LM_FLAG_NOEXP | LM_FLAG_PRIORITY |
513                                            GL_NOCACHE, &t_gh);
514                 if (error)
515                         goto fail_gunlock_ji;
516
517                 if (test_bit(SDF_JOURNAL_CHECKED, &sdp->sd_flags)) {
518                         if (!test_bit(SDF_JOURNAL_LIVE, &sdp->sd_flags))
519                                 ro = 1;
520                 } else {
521                         if (sdp->sd_vfs->s_flags & MS_RDONLY) {
522                                 /* check if device itself is read-only */
523                                 ro = bdev_read_only(sdp->sd_vfs->s_bdev);
524                                 if (!ro) {
525                                         fs_info(sdp, "recovery required on "
526                                                 "read-only filesystem.\n");
527                                         fs_info(sdp, "write access will be "
528                                                 "enabled during recovery.\n");
529                                 }
530                         }
531                 }
532
533                 if (ro) {
534                         fs_warn(sdp, "jid=%u: Can't replay: read-only block "
535                                 "device\n", jd->jd_jid);
536                         error = -EROFS;
537                         goto fail_gunlock_tr;
538                 }
539
540                 fs_info(sdp, "jid=%u: Replaying journal...\n", jd->jd_jid);
541
542                 for (pass = 0; pass < 2; pass++) {
543                         lops_before_scan(jd, &head, pass);
544                         error = foreach_descriptor(jd, head.lh_tail,
545                                                    head.lh_blkno, pass);
546                         lops_after_scan(jd, error, pass);
547                         if (error)
548                                 goto fail_gunlock_tr;
549                 }
550
551                 error = clean_journal(jd, &head);
552                 if (error)
553                         goto fail_gunlock_tr;
554
555                 gfs2_glock_dq_uninit(&t_gh);
556                 t = DIV_ROUND_UP(jiffies - t, HZ);
557                 fs_info(sdp, "jid=%u: Journal replayed in %lus\n",
558                         jd->jd_jid, t);
559         }
560
561         if (jd->jd_jid != sdp->sd_lockstruct.ls_jid)
562                 gfs2_glock_dq_uninit(&ji_gh);
563
564         gfs2_lm_recovery_done(sdp, jd->jd_jid, LM_RD_SUCCESS);
565
566         if (jd->jd_jid != sdp->sd_lockstruct.ls_jid)
567                 gfs2_glock_dq_uninit(&j_gh);
568
569         fs_info(sdp, "jid=%u: Done\n", jd->jd_jid);
570         return 0;
571
572 fail_gunlock_tr:
573         gfs2_glock_dq_uninit(&t_gh);
574 fail_gunlock_ji:
575         if (jd->jd_jid != sdp->sd_lockstruct.ls_jid) {
576                 gfs2_glock_dq_uninit(&ji_gh);
577 fail_gunlock_j:
578                 gfs2_glock_dq_uninit(&j_gh);
579         }
580
581         fs_info(sdp, "jid=%u: %s\n", jd->jd_jid, (error) ? "Failed" : "Done");
582
583 fail:
584         gfs2_lm_recovery_done(sdp, jd->jd_jid, LM_RD_GAVEUP);
585         return error;
586 }
587
588 static struct gfs2_jdesc *gfs2_jdesc_find_dirty(struct gfs2_sbd *sdp)
589 {
590         struct gfs2_jdesc *jd;
591         int found = 0;
592
593         spin_lock(&sdp->sd_jindex_spin);
594
595         list_for_each_entry(jd, &sdp->sd_jindex_list, jd_list) {
596                 if (jd->jd_dirty) {
597                         jd->jd_dirty = 0;
598                         found = 1;
599                         break;
600                 }
601         }
602         spin_unlock(&sdp->sd_jindex_spin);
603
604         if (!found)
605                 jd = NULL;
606
607         return jd;
608 }
609
610 /**
611  * gfs2_check_journals - Recover any dirty journals
612  * @sdp: the filesystem
613  *
614  */
615
616 static void gfs2_check_journals(struct gfs2_sbd *sdp)
617 {
618         struct gfs2_jdesc *jd;
619
620         for (;;) {
621                 jd = gfs2_jdesc_find_dirty(sdp);
622                 if (!jd)
623                         break;
624
625                 if (jd != sdp->sd_jdesc)
626                         gfs2_recover_journal(jd);
627         }
628 }
629
630 /**
631  * gfs2_recoverd - Recover dead machine's journals
632  * @sdp: Pointer to GFS2 superblock
633  *
634  */
635
636 int gfs2_recoverd(void *data)
637 {
638         struct gfs2_sbd *sdp = data;
639         unsigned long t;
640
641         while (!kthread_should_stop()) {
642                 gfs2_check_journals(sdp);
643                 t = gfs2_tune_get(sdp,  gt_recoverd_secs) * HZ;
644                 if (freezing(current))
645                         refrigerator();
646                 schedule_timeout_interruptible(t);
647         }
648
649         return 0;
650 }
651