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