debugfs/logdump.c

   1 /*
   2  * logdump.c --- dump the contents of the journal out to a file
   3  *
   4  * Author: Stephen C. Tweedie, 2001  <sct@redhat.com>
   5  * Copyright (C) 2001 Red Hat, Inc.
   6  * Based on portions  Copyright (C) 1994 Theodore Ts'o.
   7  *
   8  * This file may be redistributed under the terms of the GNU Public
   9  * License.
  10  */
  11
  12 #include "config.h"
  13 #include <stdio.h>
  14 #include <unistd.h>
  15 #include <stdlib.h>
  16 #include <ctype.h>
  17 #include <string.h>
  18 #include <time.h>
  19 #ifdef HAVE_ERRNO_H
  20 #include <errno.h>
  21 #endif
  22 #include <sys/types.h>
  23 #include <sys/stat.h>
  24 #include <fcntl.h>
  25 #include <utime.h>
  26 #ifdef HAVE_GETOPT_H
  27 #include <getopt.h>
  28 #else
  29 extern int optind;
  30 extern char *optarg;
  31 #endif
  32
  33 #include "debugfs.h"
  34 #include "blkid/blkid.h"
  35 #include "jfs_user.h"
  36 #include "ext2fs/fast_commit.h"
  37 #include <uuid/uuid.h>
  38
  39 enum journal_location {JOURNAL_IS_INTERNAL, JOURNAL_IS_EXTERNAL};
  40
  41 #define ANY_BLOCK ((blk64_t) -1)
  42
  43 static int              dump_all, dump_super, dump_old, dump_contents, dump_descriptors;
  44 static blk64_t          block_to_dump, bitmap_to_dump, inode_block_to_dump;
  45 static unsigned int     group_to_dump, inode_offset_to_dump;
  46 static ext2_ino_t       inode_to_dump;
  47
  48 struct journal_source
  49 {
  50         enum journal_location where;
  51         int fd;
  52         ext2_file_t file;
  53 };
  54
  55 static void dump_journal(char *, FILE *, struct journal_source *);
  56
  57 static void dump_descriptor_block(FILE *, struct journal_source *,
  58                                   char *, journal_superblock_t *,
  59                                   unsigned int *, int, tid_t);
  60
  61 static void dump_revoke_block(FILE *, char *, journal_superblock_t *,
  62                                   unsigned int, int, tid_t);
  63
  64 static void dump_metadata_block(FILE *, struct journal_source *,
  65                                 journal_superblock_t*,
  66                                 unsigned int, unsigned int, unsigned int,
  67                                 int, tid_t);
  68
  69 static void dump_fc_block(FILE *out_file, char *buf, int blocksize,
  70                           int transaction, int *fc_done, int dump_old);
  71
  72 static void do_hexdump (FILE *, char *, int);
  73
  74 #define WRAP(jsb, blocknr)                                      \
  75         if (blocknr >= be32_to_cpu((jsb)->s_maxlen))            \
  76                 blocknr -= (be32_to_cpu((jsb)->s_maxlen) -      \
  77                             be32_to_cpu((jsb)->s_first));
  78
  79 void do_logdump(int argc, char **argv, int sci_idx EXT2FS_ATTR((unused)),
  80                     void *infop EXT2FS_ATTR((unused)))
  81 {
  82         int             c;
  83         int             retval;
  84         char            *out_fn;
  85         FILE            *out_file;
  86
  87         char            *inode_spec = NULL;
  88         char            *journal_fn = NULL;
  89         int             journal_fd = 0;
  90         int             use_sb = 0;
  91         ext2_ino_t      journal_inum;
  92         struct ext2_inode journal_inode;
  93         ext2_file_t     journal_file;
  94         char            *tmp;
  95         struct journal_source journal_source;
  96         struct ext2_super_block *es = NULL;
  97
  98         journal_source.where = JOURNAL_IS_INTERNAL;
  99         journal_source.fd = 0;
 100         journal_source.file = 0;
 101         dump_all = 0;
 102         dump_old = 0;
 103         dump_contents = 0;
 104         dump_super = 0;
 105         dump_descriptors = 1;
 106         block_to_dump = ANY_BLOCK;
 107         bitmap_to_dump = -1;
 108         inode_block_to_dump = ANY_BLOCK;
 109         inode_to_dump = -1;
 110
 111         reset_getopt();
 112         while ((c = getopt (argc, argv, "ab:ci:f:OsS")) != EOF) {
 113                 switch (c) {
 114                 case 'a':
 115                         dump_all++;
 116                         break;
 117                 case 'b':
 118                         block_to_dump = strtoul(optarg, &tmp, 0);
 119                         if (*tmp) {
 120                                 com_err(argv[0], 0,
 121                                         "Bad block number - %s", optarg);
 122                                 return;
 123                         }
 124                         dump_descriptors = 0;
 125                         break;
 126                 case 'c':
 127                         dump_contents++;
 128                         break;
 129                 case 'f':
 130                         journal_fn = optarg;
 131                         break;
 132                 case 'i':
 133                         inode_spec = optarg;
 134                         dump_descriptors = 0;
 135                         break;
 136                 case 'O':
 137                         dump_old++;
 138                         break;
 139                 case 's':
 140                         use_sb++;
 141                         break;
 142                 case 'S':
 143                         dump_super++;
 144                         break;
 145                 default:
 146                         goto print_usage;
 147                 }
 148         }
 149         if (optind != argc && optind != argc-1) {
 150                 goto print_usage;
 151         }
 152
 153         if (current_fs)
 154                 es = current_fs->super;
 155
 156         if (inode_spec) {
 157                 int inode_group, group_offset, inodes_per_block;
 158
 159                 if (check_fs_open(argv[0]))
 160                         return;
 161
 162                 inode_to_dump = string_to_inode(inode_spec);
 163                 if (!inode_to_dump)
 164                         return;
 165
 166                 inode_group = ((inode_to_dump - 1)
 167                                / es->s_inodes_per_group);
 168                 group_offset = ((inode_to_dump - 1)
 169                                 % es->s_inodes_per_group);
 170                 inodes_per_block = (current_fs->blocksize
 171                                     / sizeof(struct ext2_inode));
 172
 173                 inode_block_to_dump =
 174                         ext2fs_inode_table_loc(current_fs, inode_group) +
 175                         (group_offset / inodes_per_block);
 176                 inode_offset_to_dump = ((group_offset % inodes_per_block)
 177                                         * sizeof(struct ext2_inode));
 178                 printf("Inode %u is at group %u, block %llu, offset %u\n",
 179                        inode_to_dump, inode_group,
 180                        (unsigned long long) inode_block_to_dump,
 181                        inode_offset_to_dump);
 182         }
 183
 184         if (optind == argc) {
 185                 out_file = stdout;
 186         } else {
 187                 out_fn = argv[optind];
 188                 out_file = fopen(out_fn, "w");
 189                 if (!out_file) {
 190                         com_err(argv[0], errno, "while opening %s for logdump",
 191                                 out_fn);
 192                         goto errout;
 193                 }
 194         }
 195
 196         if (block_to_dump != ANY_BLOCK && current_fs != NULL) {
 197                 group_to_dump = ((block_to_dump -
 198                                   es->s_first_data_block)
 199                                  / es->s_blocks_per_group);
 200                 bitmap_to_dump = ext2fs_block_bitmap_loc(current_fs, group_to_dump);
 201         }
 202
 203         if (!journal_fn && check_fs_open(argv[0]))
 204                 goto errout;
 205
 206         if (journal_fn) {
 207                 /* Set up to read journal from a regular file somewhere */
 208                 journal_fd = open(journal_fn, O_RDONLY, 0);
 209                 if (journal_fd < 0) {
 210                         com_err(argv[0], errno, "while opening %s for logdump",
 211                                 journal_fn);
 212                         goto errout;
 213                 }
 214
 215                 journal_source.where = JOURNAL_IS_EXTERNAL;
 216                 journal_source.fd = journal_fd;
 217         } else if ((journal_inum = es->s_journal_inum)) {
 218                 if (use_sb) {
 219                         if (es->s_jnl_backup_type != EXT3_JNL_BACKUP_BLOCKS) {
 220                                 com_err(argv[0], 0,
 221                                         "no journal backup in super block\n");
 222                                 goto errout;
 223                         }
 224                         memset(&journal_inode, 0, sizeof(struct ext2_inode));
 225                         memcpy(&journal_inode.i_block[0], es->s_jnl_blocks,
 226                                EXT2_N_BLOCKS*4);
 227                         journal_inode.i_size_high = es->s_jnl_blocks[15];
 228                         journal_inode.i_size = es->s_jnl_blocks[16];
 229                         journal_inode.i_links_count = 1;
 230                         journal_inode.i_mode = LINUX_S_IFREG | 0600;
 231                 } else {
 232                         if (debugfs_read_inode(journal_inum, &journal_inode,
 233                                                argv[0]))
 234                                 goto errout;
 235                 }
 236
 237                 retval = ext2fs_file_open2(current_fs, journal_inum,
 238                                            &journal_inode, 0, &journal_file);
 239                 if (retval) {
 240                         com_err(argv[0], retval, "while opening ext2 file");
 241                         goto errout;
 242                 }
 243                 journal_source.where = JOURNAL_IS_INTERNAL;
 244                 journal_source.file = journal_file;
 245         } else {
 246                 char uuid[37];
 247
 248                 uuid_unparse(es->s_journal_uuid, uuid);
 249                 journal_fn = blkid_get_devname(NULL, "UUID", uuid);
 250                 if (!journal_fn)
 251                                 journal_fn = blkid_devno_to_devname(es->s_journal_dev);
 252                 if (!journal_fn) {
 253                         com_err(argv[0], 0, "filesystem has no journal");
 254                         goto errout;
 255                 }
 256                 journal_fd = open(journal_fn, O_RDONLY, 0);
 257                 if (journal_fd < 0) {
 258                         com_err(argv[0], errno, "while opening %s for logdump",
 259                                 journal_fn);
 260                         free(journal_fn);
 261                         goto errout;
 262                 }
 263                 fprintf(out_file, "Using external journal found at %s\n",
 264                         journal_fn);
 265                 free(journal_fn);
 266                 journal_source.where = JOURNAL_IS_EXTERNAL;
 267                 journal_source.fd = journal_fd;
 268         }
 269
 270         dump_journal(argv[0], out_file, &journal_source);
 271
 272         if (journal_source.where == JOURNAL_IS_INTERNAL)
 273                 ext2fs_file_close(journal_file);
 274         else
 275                 close(journal_fd);
 276
 277 errout:
 278         if (out_file && (out_file != stdout))
 279                 fclose(out_file);
 280
 281         return;
 282
 283 print_usage:
 284         fprintf(stderr, "%s: Usage: logdump [-acsOS] [-b<block>] [-i<filespec>]\n\t"
 285                 "[-f<journal_file>] [output_file]\n", argv[0]);
 286 }
 287
 288
 289 static int read_journal_block(const char *cmd, struct journal_source *source,
 290                               ext2_loff_t offset, char *buf, unsigned int size)
 291 {
 292         int retval;
 293         unsigned int got;
 294
 295         if (source->where == JOURNAL_IS_EXTERNAL) {
 296                 if (lseek(source->fd, offset, SEEK_SET) < 0) {
 297                         retval = errno;
 298                         goto seek_err;
 299                 }
 300                 retval = read(source->fd, buf, size);
 301                 if (retval < 0) {
 302                         retval = errno;
 303                         goto read_err;
 304                 }
 305                 got = retval;
 306                 retval = 0;
 307         } else {
 308                 retval = ext2fs_file_llseek(source->file, offset,
 309                                             EXT2_SEEK_SET, NULL);
 310                 if (retval) {
 311                 seek_err:
 312                         com_err(cmd, retval, "while seeking in reading journal");
 313                         return retval;
 314                 }
 315                 retval = ext2fs_file_read(source->file, buf, size, &got);
 316                 if (retval) {
 317                 read_err:
 318                         com_err(cmd, retval, "while reading journal");
 319                         return retval;
 320                 }
 321         }
 322         if (got != size) {
 323                 com_err(cmd, 0, "short read (read %u, expected %u) "
 324                         "while reading journal", got, size);
 325                 retval = -1;
 326         }
 327         return retval;
 328 }
 329
 330 static const char *type_to_name(int btype)
 331 {
 332         switch (btype) {
 333         case JBD2_DESCRIPTOR_BLOCK:
 334                 return "descriptor block";
 335         case JBD2_COMMIT_BLOCK:
 336                 return "commit block";
 337         case JBD2_SUPERBLOCK_V1:
 338                 return "V1 superblock";
 339         case JBD2_SUPERBLOCK_V2:
 340                 return "V2 superblock";
 341         case JBD2_REVOKE_BLOCK:
 342                 return "revoke table";
 343         }
 344         return "unrecognised type";
 345 }
 346
 347
 348 static void dump_journal(char *cmdname, FILE *out_file,
 349                          struct journal_source *source)
 350 {
 351         struct ext2_super_block *sb;
 352         char                    jsb_buffer[1024];
 353         char                    buf[EXT2_MAX_BLOCK_SIZE];
 354         journal_superblock_t    *jsb;
 355         unsigned int            blocksize = 1024;
 356         int                     retval;
 357         __u32                   magic, sequence, blocktype;
 358         journal_header_t        *header;
 359         tid_t                   transaction;
 360         unsigned int            blocknr = 0;
 361         int                     fc_done;
 362
 363         /* First, check to see if there's an ext2 superblock header */
 364         retval = read_journal_block(cmdname, source, 0, buf, 2048);
 365         if (retval)
 366                 return;
 367
 368         jsb = (journal_superblock_t *) buf;
 369         sb = (struct ext2_super_block *) (buf+1024);
 370 #ifdef WORDS_BIGENDIAN
 371         if (sb->s_magic == ext2fs_swab16(EXT2_SUPER_MAGIC))
 372                 ext2fs_swap_super(sb);
 373 #endif
 374
 375         if ((be32_to_cpu(jsb->s_header.h_magic) != JBD2_MAGIC_NUMBER) &&
 376             (sb->s_magic == EXT2_SUPER_MAGIC) &&
 377             ext2fs_has_feature_journal_dev(sb)) {
 378                 blocksize = EXT2_BLOCK_SIZE(sb);
 379                 blocknr = (blocksize == 1024) ? 2 : 1;
 380                 uuid_unparse(sb->s_uuid, jsb_buffer);
 381                 fprintf(out_file, "Ext2 superblock header found.\n");
 382                 if (dump_all) {
 383                         fprintf(out_file, "\tuuid=%s\n", jsb_buffer);
 384                         fprintf(out_file, "\tblocksize=%d\n", blocksize);
 385                         fprintf(out_file, "\tjournal data size %lu\n",
 386                                 (unsigned long) ext2fs_blocks_count(sb));
 387                 }
 388         }
 389
 390         /* Next, read the journal superblock */
 391         retval = read_journal_block(cmdname, source,
 392                                     ((ext2_loff_t) blocknr) * blocksize,
 393                                     jsb_buffer, 1024);
 394         if (retval)
 395                 return;
 396
 397         if (dump_super) {
 398                 e2p_list_journal_super(out_file, jsb_buffer,
 399                                        current_fs->blocksize, 0);
 400                 fputc('\n', out_file);
 401         }
 402
 403         jsb = (journal_superblock_t *) jsb_buffer;
 404         if (be32_to_cpu(jsb->s_header.h_magic) != JBD2_MAGIC_NUMBER) {
 405                 fprintf(out_file,
 406                         "Journal superblock magic number invalid!\n");
 407                 return;
 408         }
 409         blocksize = be32_to_cpu(jsb->s_blocksize);
 410         if ((current_fs && (blocksize != current_fs->blocksize)) ||
 411             (!current_fs && (!blocksize || (blocksize & (blocksize - 1)) ||
 412                              (blocksize > EXT2_MAX_BLOCK_SIZE)))) {
 413                 fprintf(out_file,
 414                         "Journal block size invalid: %u (%u)\n",
 415                         be32_to_cpu(jsb->s_blocksize), blocksize);
 416                 return;
 417         }
 418         transaction = be32_to_cpu(jsb->s_sequence);
 419         blocknr = be32_to_cpu(jsb->s_start);
 420
 421         fprintf(out_file, "Journal starts at block %u, transaction %u\n",
 422                 blocknr, transaction);
 423
 424         if (!blocknr) {
 425                 /* Empty journal, nothing to do. */
 426                 if (!dump_old)
 427                         goto fc;
 428                 else
 429                         blocknr = 1;
 430         }
 431
 432         while (1) {
 433                 retval = read_journal_block(cmdname, source,
 434                                 ((ext2_loff_t) blocknr) * blocksize,
 435                                 buf, blocksize);
 436                 if (retval)
 437                         break;
 438
 439                 header = (journal_header_t *) buf;
 440
 441                 magic = be32_to_cpu(header->h_magic);
 442                 sequence = be32_to_cpu(header->h_sequence);
 443                 blocktype = be32_to_cpu(header->h_blocktype);
 444
 445                 if (magic != JBD2_MAGIC_NUMBER) {
 446                         fprintf (out_file, "No magic number at block %u: "
 447                                  "end of journal.\n", blocknr);
 448                         break;
 449                 }
 450
 451                 if (sequence != transaction) {
 452                         fprintf (out_file, "Found sequence %u (not %u) at "
 453                                  "block %u: end of journal.\n",
 454                                  sequence, transaction, blocknr);
 455                         if (!dump_old)
 456                                 break;
 457                 }
 458
 459                 if (dump_descriptors) {
 460                         fprintf (out_file, "Found expected sequence %u, "
 461                                  "type %u (%s) at block %u\n",
 462                                  sequence, blocktype,
 463                                  type_to_name(blocktype), blocknr);
 464                 }
 465
 466                 switch (blocktype) {
 467                 case JBD2_DESCRIPTOR_BLOCK:
 468                         dump_descriptor_block(out_file, source, buf, jsb,
 469                                               &blocknr, blocksize,
 470                                               transaction);
 471                         continue;
 472
 473                 case JBD2_COMMIT_BLOCK:
 474                         transaction++;
 475                         blocknr++;
 476                         WRAP(jsb, blocknr);
 477                         continue;
 478
 479                 case JBD2_REVOKE_BLOCK:
 480                         dump_revoke_block(out_file, buf, jsb,
 481                                           blocknr, blocksize,
 482                                           transaction);
 483                         blocknr++;
 484                         WRAP(jsb, blocknr);
 485                         continue;
 486
 487                 default:
 488                         fprintf (out_file, "Unexpected block type %u at "
 489                                  "block %u.\n", blocktype, blocknr);
 490                         break;
 491                 }
 492         }
 493
 494 fc:
 495         blocknr = be32_to_cpu(jsb->s_maxlen) - jbd2_journal_get_num_fc_blks(jsb) + 1;
 496         while (blocknr <= be32_to_cpu(jsb->s_maxlen)) {
 497                 retval = read_journal_block(cmdname, source,
 498                                 ((ext2_loff_t) blocknr) * blocksize,
 499                                 buf, blocksize);
 500                 if (retval)
 501                         return;
 502
 503                 dump_fc_block(out_file, buf, blocksize, transaction, &fc_done,
 504                         dump_old);
 505                 if (!dump_old && fc_done)
 506                         break;
 507                 blocknr++;
 508         }
 509 }
 510
 511 static inline size_t journal_super_tag_bytes(journal_superblock_t *jsb)
 512 {
 513         size_t sz;
 514
 515         if (JSB_HAS_INCOMPAT_FEATURE(jsb, JBD2_FEATURE_INCOMPAT_CSUM_V3))
 516                 return sizeof(journal_block_tag3_t);
 517
 518         sz = sizeof(journal_block_tag_t);
 519
 520         if (JSB_HAS_INCOMPAT_FEATURE(jsb, JBD2_FEATURE_INCOMPAT_CSUM_V2))
 521                 sz += sizeof(__u16);
 522
 523         if (JSB_HAS_INCOMPAT_FEATURE(jsb, JBD2_FEATURE_INCOMPAT_64BIT))
 524                 return sz;
 525
 526         return sz - sizeof(__u32);
 527 }
 528
 529 static void dump_fc_block(FILE *out_file, char *buf, int blocksize,
 530         int transaction, int *fc_done, int dump_old)
 531 {
 532         struct ext4_fc_tl       *tl;
 533         struct ext4_fc_head     *head;
 534         struct ext4_fc_add_range        *add_range;
 535         struct ext4_fc_del_range        *del_range;
 536         struct ext4_fc_dentry_info      *dentry_info;
 537         struct ext4_fc_tail             *tail;
 538         struct ext3_extent      *ex;
 539
 540         *fc_done = 0;
 541         fc_for_each_tl(buf, buf + blocksize, tl) {
 542                 switch (le16_to_cpu(tl->fc_tag)) {
 543                 case EXT4_FC_TAG_ADD_RANGE:
 544                         add_range =
 545                                 (struct ext4_fc_add_range *)ext4_fc_tag_val(tl);
 546                         ex = (struct ext3_extent *)add_range->fc_ex;
 547                         fprintf(out_file,
 548                                 "tag %s, inode %d, lblk %u, pblk %llu, len %lu\n",
 549                                 tag2str(tl->fc_tag),
 550                                 le32_to_cpu(add_range->fc_ino),
 551                                 le32_to_cpu(ex->ee_block),
 552                                 le32_to_cpu(ex->ee_start) +
 553                                 (((unsigned long long) le16_to_cpu(ex->ee_start_hi)) << 32),
 554                                 le16_to_cpu(ex->ee_len) > EXT_INIT_MAX_LEN ?
 555                                 le16_to_cpu(ex->ee_len) - EXT_INIT_MAX_LEN :
 556                                 le16_to_cpu(ex->ee_len));
 557                         break;
 558                 case EXT4_FC_TAG_DEL_RANGE:
 559                         del_range =
 560                                 (struct ext4_fc_del_range *)ext4_fc_tag_val(tl);
 561                         fprintf(out_file, "tag %s, inode %d, lblk %d, len %d\n",
 562                                 tag2str(tl->fc_tag),
 563                                 le32_to_cpu(del_range->fc_ino),
 564                                 le32_to_cpu(del_range->fc_lblk),
 565                                 le32_to_cpu(del_range->fc_len));
 566                         break;
 567                 case EXT4_FC_TAG_LINK:
 568                 case EXT4_FC_TAG_UNLINK:
 569                 case EXT4_FC_TAG_CREAT:
 570                         dentry_info =
 571                                 (struct ext4_fc_dentry_info *)
 572                                         ext4_fc_tag_val(tl);
 573                         fprintf(out_file,
 574                                 "tag %s, parent %d, ino %d, name \"%s\"\n",
 575                                 tag2str(tl->fc_tag),
 576                                 le32_to_cpu(dentry_info->fc_parent_ino),
 577                                 le32_to_cpu(dentry_info->fc_ino),
 578                                 dentry_info->fc_dname);
 579                         break;
 580                 case EXT4_FC_TAG_INODE:
 581                         fprintf(out_file, "tag %s, inode %d\n",
 582                                 tag2str(tl->fc_tag),
 583                                 le32_to_cpu(((struct ext4_fc_inode *)
 584                                         ext4_fc_tag_val(tl))->fc_ino));
 585                         break;
 586                 case EXT4_FC_TAG_PAD:
 587                         fprintf(out_file, "tag %s\n", tag2str(tl->fc_tag));
 588                         break;
 589                 case EXT4_FC_TAG_TAIL:
 590                         tail = (struct ext4_fc_tail *)ext4_fc_tag_val(tl);
 591                         fprintf(out_file, "tag %s, tid %d\n",
 592                                 tag2str(tl->fc_tag),
 593                                 le32_to_cpu(tail->fc_tid));
 594                         if (!dump_old &&
 595                                 le32_to_cpu(tail->fc_tid) < transaction) {
 596                                 *fc_done = 1;
 597                                 return;
 598                         }
 599                         break;
 600                 case EXT4_FC_TAG_HEAD:
 601                         fprintf(out_file, "\n*** Fast Commit Area ***\n");
 602                         head = (struct ext4_fc_head *)ext4_fc_tag_val(tl);
 603                         fprintf(out_file, "tag %s, features 0x%x, tid %d\n",
 604                                 tag2str(tl->fc_tag),
 605                                 le32_to_cpu(head->fc_features),
 606                                 le32_to_cpu(head->fc_tid));
 607                         if (!dump_old &&
 608                                 le32_to_cpu(head->fc_tid) < transaction) {
 609                                 *fc_done = 1;
 610                                 return;
 611                         }
 612                         break;
 613                 default:
 614                         *fc_done = 1;
 615                         break;
 616                 }
 617         }
 618 }
 619
 620 static void dump_descriptor_block(FILE *out_file,
 621                                   struct journal_source *source,
 622                                   char *buf,
 623                                   journal_superblock_t *jsb,
 624                                   unsigned int *blockp, int blocksize,
 625                                   tid_t transaction)
 626 {
 627         int                     offset, tag_size, csum_size = 0;
 628         char                    *tagp;
 629         journal_block_tag_t     *tag;
 630         unsigned int            blocknr;
 631         __u32                   tag_block;
 632         __u32                   tag_flags;
 633
 634         tag_size = journal_super_tag_bytes(jsb);
 635         offset = sizeof(journal_header_t);
 636         blocknr = *blockp;
 637
 638         if (JSB_HAS_INCOMPAT_FEATURE(jsb, JBD2_FEATURE_INCOMPAT_CSUM_V3) ||
 639             JSB_HAS_INCOMPAT_FEATURE(jsb, JBD2_FEATURE_INCOMPAT_CSUM_V2))
 640                 csum_size = sizeof(struct jbd2_journal_block_tail);
 641
 642         if (dump_all)
 643                 fprintf(out_file, "Dumping descriptor block, sequence %u, at "
 644                         "block %u:\n", transaction, blocknr);
 645
 646         ++blocknr;
 647         WRAP(jsb, blocknr);
 648
 649         do {
 650                 /* Work out the location of the current tag, and skip to
 651                  * the next one... */
 652                 tagp = &buf[offset];
 653                 tag = (journal_block_tag_t *) tagp;
 654                 offset += tag_size;
 655
 656                 /* ... and if we have gone too far, then we've reached the
 657                    end of this block. */
 658                 if (offset > blocksize - csum_size)
 659                         break;
 660
 661                 tag_block = be32_to_cpu(tag->t_blocknr);
 662                 tag_flags = be16_to_cpu(tag->t_flags);
 663
 664                 if (!(tag_flags & JBD2_FLAG_SAME_UUID))
 665                         offset += 16;
 666
 667                 dump_metadata_block(out_file, source, jsb,
 668                                     blocknr, tag_block, tag_flags, blocksize,
 669                                     transaction);
 670
 671                 ++blocknr;
 672                 WRAP(jsb, blocknr);
 673
 674         } while (!(tag_flags & JBD2_FLAG_LAST_TAG));
 675
 676         *blockp = blocknr;
 677 }
 678
 679
 680 static void dump_revoke_block(FILE *out_file, char *buf,
 681                               journal_superblock_t *jsb EXT2FS_ATTR((unused)),
 682                               unsigned int blocknr,
 683                               int blocksize EXT2FS_ATTR((unused)),
 684                               tid_t transaction)
 685 {
 686         int                     offset, max;
 687         jbd2_journal_revoke_header_t *header;
 688         unsigned long long      rblock;
 689         int                     tag_size = sizeof(__u32);
 690
 691         if (dump_all)
 692                 fprintf(out_file, "Dumping revoke block, sequence %u, at "
 693                         "block %u:\n", transaction, blocknr);
 694
 695         if (be32_to_cpu(jsb->s_feature_incompat) & JBD2_FEATURE_INCOMPAT_64BIT)
 696                 tag_size = sizeof(__u64);
 697
 698         header = (jbd2_journal_revoke_header_t *) buf;
 699         offset = sizeof(jbd2_journal_revoke_header_t);
 700         max = be32_to_cpu(header->r_count);
 701         if (max > jsb->s_blocksize) {
 702                 fprintf(out_file, "Revoke block's r_count invalid: %u\b",
 703                         max);
 704                 max = jsb->s_blocksize;
 705         }
 706
 707         while (offset < max) {
 708                 if (tag_size == sizeof(__u32)) {
 709                         __u32 *entry = (__u32 *) (buf + offset);
 710                         rblock = be32_to_cpu(*entry);
 711                 } else {
 712                         __u64 *entry = (__u64 *) (buf + offset);
 713                         rblock = ext2fs_be64_to_cpu(*entry);
 714                 }
 715                 if (dump_all || rblock == block_to_dump) {
 716                         fprintf(out_file, "  Revoke FS block %llu",
 717                                 (unsigned long long) rblock);
 718                         if (dump_all)
 719                                 fprintf(out_file, "\n");
 720                         else
 721                                 fprintf(out_file," at block %u, sequence %u\n",
 722                                         blocknr, transaction);
 723                 }
 724                 offset += tag_size;
 725         }
 726 }
 727
 728
 729 static void show_extent(FILE *out_file, int start_extent, int end_extent,
 730                         __u32 first_block)
 731 {
 732         if (start_extent >= 0 && first_block != 0)
 733                 fprintf(out_file, "(%d+%u): %u ",
 734                         start_extent, end_extent-start_extent, first_block);
 735 }
 736
 737 static void show_indirect(FILE *out_file, const char *name, __u32 where)
 738 {
 739         if (where)
 740                 fprintf(out_file, "(%s): %u ", name, where);
 741 }
 742
 743
 744 static void dump_metadata_block(FILE *out_file, struct journal_source *source,
 745                                 journal_superblock_t *jsb EXT2FS_ATTR((unused)),
 746                                 unsigned int log_blocknr,
 747                                 unsigned int fs_blocknr,
 748                                 unsigned int log_tag_flags,
 749                                 int blocksize,
 750                                 tid_t transaction)
 751 {
 752         int             retval;
 753         char            buf[8192];
 754
 755         if (!(dump_all
 756               || (fs_blocknr == block_to_dump)
 757               || (fs_blocknr == inode_block_to_dump)
 758               || (fs_blocknr == bitmap_to_dump)))
 759                 return;
 760
 761         fprintf(out_file, "  FS block %u logged at ", fs_blocknr);
 762         if (!dump_all)
 763                 fprintf(out_file, "sequence %u, ", transaction);
 764         fprintf(out_file, "journal block %u (flags 0x%x)\n", log_blocknr,
 765                 log_tag_flags);
 766
 767         /* There are two major special cases to parse:
 768          *
 769          * If this block is a block
 770          * bitmap block, we need to give it special treatment so that we
 771          * can log any allocates and deallocates which affect the
 772          * block_to_dump query block.
 773          *
 774          * If the block is an inode block for the inode being searched
 775          * for, then we need to dump the contents of that inode
 776          * structure symbolically.
 777          */
 778
 779         if (!(dump_contents && dump_all)
 780             && fs_blocknr != block_to_dump
 781             && fs_blocknr != bitmap_to_dump
 782             && fs_blocknr != inode_block_to_dump)
 783                 return;
 784
 785         retval = read_journal_block("logdump", source,
 786                                     ((ext2_loff_t) log_blocknr) * blocksize,
 787                                     buf, blocksize);
 788         if (retval)
 789                 return;
 790
 791         if (fs_blocknr == bitmap_to_dump) {
 792                 struct ext2_super_block *super;
 793                 int offset;
 794
 795                 super = current_fs->super;
 796                 offset = ((block_to_dump - super->s_first_data_block) %
 797                           super->s_blocks_per_group);
 798
 799                 fprintf(out_file, "    (block bitmap for block %llu: "
 800                         "block is %s)\n",
 801                         (unsigned long long) block_to_dump,
 802                         ext2fs_test_bit(offset, buf) ? "SET" : "CLEAR");
 803         }
 804
 805         if (fs_blocknr == inode_block_to_dump) {
 806                 struct ext2_inode *inode;
 807                 int first, prev, this, start_extent, i;
 808
 809                 fprintf(out_file, "    (inode block for inode %u):\n",
 810                         inode_to_dump);
 811
 812                 inode = (struct ext2_inode *) (buf + inode_offset_to_dump);
 813                 internal_dump_inode(out_file, "    ", inode_to_dump, inode, 0);
 814
 815                 /* Dump out the direct/indirect blocks here:
 816                  * internal_dump_inode can only dump them from the main
 817                  * on-disk inode, not from the journaled copy of the
 818                  * inode. */
 819
 820                 fprintf (out_file, "    Blocks:  ");
 821                 first = prev = start_extent = -1;
 822
 823                 for (i=0; i<EXT2_NDIR_BLOCKS; i++) {
 824                         this = inode->i_block[i];
 825                         if (start_extent >= 0  && this == prev+1) {
 826                                 prev = this;
 827                                 continue;
 828                         } else {
 829                                 show_extent(out_file, start_extent, i, first);
 830                                 start_extent = i;
 831                                 first = prev = this;
 832                         }
 833                 }
 834                 show_extent(out_file, start_extent, i, first);
 835                 show_indirect(out_file, "IND", inode->i_block[i++]);
 836                 show_indirect(out_file, "DIND", inode->i_block[i++]);
 837                 show_indirect(out_file, "TIND", inode->i_block[i++]);
 838
 839                 fprintf(out_file, "\n");
 840         }
 841
 842         if (dump_contents)
 843                 do_hexdump(out_file, buf, blocksize);
 844
 845 }
 846
 847 static void do_hexdump (FILE *out_file, char *buf, int blocksize)
 848 {
 849         int i,j;
 850         int *intp;
 851         char *charp;
 852         unsigned char c;
 853
 854         intp = (int *) buf;
 855         charp = (char *) buf;
 856
 857         for (i=0; i<blocksize; i+=16) {
 858                 fprintf(out_file, "    %04x:  ", i);
 859                 for (j=0; j<16; j+=4)
 860                         fprintf(out_file, "%08x ", *intp++);
 861                 for (j=0; j<16; j++) {
 862                         c = *charp++;
 863                         if (c < ' ' || c >= 127)
 864                                 c = '.';
 865                         fprintf(out_file, "%c", c);
 866                 }
 867                 fprintf(out_file, "\n");
 868         }
 869 }
 870