1 /*
2 * logdump.c --- dump the contents of the journal out to a file
3 *
4 * Authro: 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 <uuid/uuid.h>
37
38 enum journal_location {JOURNAL_IS_INTERNAL, JOURNAL_IS_EXTERNAL};
39
40 #define ANY_BLOCK ((blk64_t) -1)
41
42 static int dump_all, dump_old, dump_contents, dump_descriptors;
43 static blk64_t block_to_dump, bitmap_to_dump, inode_block_to_dump;
44 static unsigned int group_to_dump, inode_offset_to_dump;
45 static ext2_ino_t inode_to_dump;
46
47 struct journal_source
48 {
49 enum journal_location where;
50 int fd;
51 ext2_file_t file;
52 };
53
54 static void dump_journal(char *, FILE *, struct journal_source *);
55
56 static void dump_descriptor_block(FILE *, struct journal_source *,
57 char *, journal_superblock_t *,
58 unsigned int *, int, tid_t);
59
60 static void dump_revoke_block(FILE *, char *, journal_superblock_t *,
61 unsigned int, int, tid_t);
62
63 static void dump_metadata_block(FILE *, struct journal_source *,
64 journal_superblock_t*,
65 unsigned int, unsigned int, unsigned int,
66 int, tid_t);
67
68 static void do_hexdump (FILE *, char *, int);
69
70 #define WRAP(jsb, blocknr) \
71 if (blocknr >= be32_to_cpu((jsb)->s_maxlen)) \
72 blocknr -= (be32_to_cpu((jsb)->s_maxlen) - \
73 be32_to_cpu((jsb)->s_first));
74
do_logdump(int argc,char ** argv)75 void do_logdump(int argc, char **argv)
76 {
77 int c;
78 int retval;
79 char *out_fn;
80 FILE *out_file;
81
82 char *inode_spec = NULL;
83 char *journal_fn = NULL;
84 int journal_fd = 0;
85 int use_sb = 0;
86 ext2_ino_t journal_inum;
87 struct ext2_inode journal_inode;
88 ext2_file_t journal_file;
89 char *tmp;
90 struct journal_source journal_source;
91 struct ext2_super_block *es = NULL;
92
93 journal_source.where = JOURNAL_IS_INTERNAL;
94 journal_source.fd = 0;
95 journal_source.file = 0;
96 dump_all = 0;
97 dump_old = 0;
98 dump_contents = 0;
99 dump_descriptors = 1;
100 block_to_dump = ANY_BLOCK;
101 bitmap_to_dump = -1;
102 inode_block_to_dump = ANY_BLOCK;
103 inode_to_dump = -1;
104
105 reset_getopt();
106 while ((c = getopt (argc, argv, "ab:ci:f:Os")) != EOF) {
107 switch (c) {
108 case 'a':
109 dump_all++;
110 break;
111 case 'b':
112 block_to_dump = strtoul(optarg, &tmp, 0);
113 if (*tmp) {
114 com_err(argv[0], 0,
115 "Bad block number - %s", optarg);
116 return;
117 }
118 dump_descriptors = 0;
119 break;
120 case 'c':
121 dump_contents++;
122 break;
123 case 'f':
124 journal_fn = optarg;
125 break;
126 case 'i':
127 inode_spec = optarg;
128 dump_descriptors = 0;
129 break;
130 case 'O':
131 dump_old++;
132 break;
133 case 's':
134 use_sb++;
135 break;
136 default:
137 goto print_usage;
138 }
139 }
140 if (optind != argc && optind != argc-1) {
141 goto print_usage;
142 }
143
144 if (current_fs)
145 es = current_fs->super;
146
147 if (inode_spec) {
148 int inode_group, group_offset, inodes_per_block;
149
150 if (check_fs_open(argv[0]))
151 return;
152
153 inode_to_dump = string_to_inode(inode_spec);
154 if (!inode_to_dump)
155 return;
156
157 inode_group = ((inode_to_dump - 1)
158 / es->s_inodes_per_group);
159 group_offset = ((inode_to_dump - 1)
160 % es->s_inodes_per_group);
161 inodes_per_block = (current_fs->blocksize
162 / sizeof(struct ext2_inode));
163
164 inode_block_to_dump =
165 ext2fs_inode_table_loc(current_fs, inode_group) +
166 (group_offset / inodes_per_block);
167 inode_offset_to_dump = ((group_offset % inodes_per_block)
168 * sizeof(struct ext2_inode));
169 printf("Inode %u is at group %u, block %llu, offset %u\n",
170 inode_to_dump, inode_group,
171 inode_block_to_dump, inode_offset_to_dump);
172 }
173
174 if (optind == argc) {
175 out_file = stdout;
176 } else {
177 out_fn = argv[optind];
178 out_file = fopen(out_fn, "w");
179 if (!out_file) {
180 com_err(argv[0], errno, "while opening %s for logdump",
181 out_fn);
182 goto errout;
183 }
184 }
185
186 if (block_to_dump != ANY_BLOCK && current_fs != NULL) {
187 group_to_dump = ((block_to_dump -
188 es->s_first_data_block)
189 / es->s_blocks_per_group);
190 bitmap_to_dump = ext2fs_block_bitmap_loc(current_fs, group_to_dump);
191 }
192
193 if (!journal_fn && check_fs_open(argv[0]))
194 goto errout;
195
196 if (journal_fn) {
197 /* Set up to read journal from a regular file somewhere */
198 journal_fd = open(journal_fn, O_RDONLY, 0);
199 if (journal_fd < 0) {
200 com_err(argv[0], errno, "while opening %s for logdump",
201 journal_fn);
202 goto errout;
203 }
204
205 journal_source.where = JOURNAL_IS_EXTERNAL;
206 journal_source.fd = journal_fd;
207 } else if ((journal_inum = es->s_journal_inum)) {
208 if (use_sb) {
209 if (es->s_jnl_backup_type != EXT3_JNL_BACKUP_BLOCKS) {
210 com_err(argv[0], 0,
211 "no journal backup in super block\n");
212 goto errout;
213 }
214 memset(&journal_inode, 0, sizeof(struct ext2_inode));
215 memcpy(&journal_inode.i_block[0], es->s_jnl_blocks,
216 EXT2_N_BLOCKS*4);
217 journal_inode.i_size_high = es->s_jnl_blocks[15];
218 journal_inode.i_size = es->s_jnl_blocks[16];
219 journal_inode.i_links_count = 1;
220 journal_inode.i_mode = LINUX_S_IFREG | 0600;
221 } else {
222 if (debugfs_read_inode(journal_inum, &journal_inode,
223 argv[0]))
224 goto errout;
225 }
226
227 retval = ext2fs_file_open2(current_fs, journal_inum,
228 &journal_inode, 0, &journal_file);
229 if (retval) {
230 com_err(argv[0], retval, "while opening ext2 file");
231 goto errout;
232 }
233 journal_source.where = JOURNAL_IS_INTERNAL;
234 journal_source.file = journal_file;
235 } else {
236 char uuid[37];
237
238 uuid_unparse(es->s_journal_uuid, uuid);
239 journal_fn = blkid_get_devname(NULL, "UUID", uuid);
240 if (!journal_fn)
241 journal_fn = blkid_devno_to_devname(es->s_journal_dev);
242 if (!journal_fn) {
243 com_err(argv[0], 0, "filesystem has no journal");
244 goto errout;
245 }
246 journal_fd = open(journal_fn, O_RDONLY, 0);
247 if (journal_fd < 0) {
248 com_err(argv[0], errno, "while opening %s for logdump",
249 journal_fn);
250 free(journal_fn);
251 goto errout;
252 }
253 fprintf(out_file, "Using external journal found at %s\n",
254 journal_fn);
255 free(journal_fn);
256 journal_source.where = JOURNAL_IS_EXTERNAL;
257 journal_source.fd = journal_fd;
258 }
259
260 dump_journal(argv[0], out_file, &journal_source);
261
262 if (journal_source.where == JOURNAL_IS_INTERNAL)
263 ext2fs_file_close(journal_file);
264 else
265 close(journal_fd);
266
267 errout:
268 if (out_file && (out_file != stdout))
269 fclose(out_file);
270
271 return;
272
273 print_usage:
274 fprintf(stderr, "%s: Usage: logdump [-acsO] [-b<block>] [-i<filespec>]\n\t"
275 "[-f<journal_file>] [output_file]\n", argv[0]);
276 }
277
278
read_journal_block(const char * cmd,struct journal_source * source,ext2_loff_t offset,char * buf,unsigned int size)279 static int read_journal_block(const char *cmd, struct journal_source *source,
280 ext2_loff_t offset, char *buf, unsigned int size)
281 {
282 int retval;
283 unsigned int got;
284
285 if (source->where == JOURNAL_IS_EXTERNAL) {
286 if (lseek(source->fd, offset, SEEK_SET) < 0) {
287 retval = errno;
288 goto seek_err;
289 }
290 retval = read(source->fd, buf, size);
291 if (retval < 0) {
292 retval = errno;
293 goto read_err;
294 }
295 got = retval;
296 retval = 0;
297 } else {
298 retval = ext2fs_file_llseek(source->file, offset,
299 EXT2_SEEK_SET, NULL);
300 if (retval) {
301 seek_err:
302 com_err(cmd, retval, "while seeking in reading journal");
303 return retval;
304 }
305 retval = ext2fs_file_read(source->file, buf, size, &got);
306 if (retval) {
307 read_err:
308 com_err(cmd, retval, "while reading journal");
309 return retval;
310 }
311 }
312 if (got != size) {
313 com_err(cmd, 0, "short read (read %u, expected %u) "
314 "while reading journal", got, size);
315 retval = -1;
316 }
317 return retval;
318 }
319
type_to_name(int btype)320 static const char *type_to_name(int btype)
321 {
322 switch (btype) {
323 case JFS_DESCRIPTOR_BLOCK:
324 return "descriptor block";
325 case JFS_COMMIT_BLOCK:
326 return "commit block";
327 case JFS_SUPERBLOCK_V1:
328 return "V1 superblock";
329 case JFS_SUPERBLOCK_V2:
330 return "V2 superblock";
331 case JFS_REVOKE_BLOCK:
332 return "revoke table";
333 }
334 return "unrecognised type";
335 }
336
337
dump_journal(char * cmdname,FILE * out_file,struct journal_source * source)338 static void dump_journal(char *cmdname, FILE *out_file,
339 struct journal_source *source)
340 {
341 struct ext2_super_block *sb;
342 char jsb_buffer[1024];
343 char buf[8192];
344 journal_superblock_t *jsb;
345 unsigned int blocksize = 1024;
346 int retval;
347 __u32 magic, sequence, blocktype;
348 journal_header_t *header;
349 tid_t transaction;
350 unsigned int blocknr = 0;
351
352 /* First, check to see if there's an ext2 superblock header */
353 retval = read_journal_block(cmdname, source, 0, buf, 2048);
354 if (retval)
355 return;
356
357 jsb = (journal_superblock_t *) buf;
358 sb = (struct ext2_super_block *) (buf+1024);
359 #ifdef WORDS_BIGENDIAN
360 if (sb->s_magic == ext2fs_swab16(EXT2_SUPER_MAGIC))
361 ext2fs_swap_super(sb);
362 #endif
363
364 if ((be32_to_cpu(jsb->s_header.h_magic) != JFS_MAGIC_NUMBER) &&
365 (sb->s_magic == EXT2_SUPER_MAGIC) &&
366 ext2fs_has_feature_journal_dev(sb)) {
367 blocksize = EXT2_BLOCK_SIZE(sb);
368 blocknr = (blocksize == 1024) ? 2 : 1;
369 uuid_unparse(sb->s_uuid, jsb_buffer);
370 fprintf(out_file, "Ext2 superblock header found.\n");
371 if (dump_all) {
372 fprintf(out_file, "\tuuid=%s\n", jsb_buffer);
373 fprintf(out_file, "\tblocksize=%d\n", blocksize);
374 fprintf(out_file, "\tjournal data size %lu\n",
375 (unsigned long) ext2fs_blocks_count(sb));
376 }
377 }
378
379 /* Next, read the journal superblock */
380 retval = read_journal_block(cmdname, source,
381 ((ext2_loff_t) blocknr) * blocksize,
382 jsb_buffer, 1024);
383 if (retval)
384 return;
385
386 jsb = (journal_superblock_t *) jsb_buffer;
387 if (be32_to_cpu(jsb->s_header.h_magic) != JFS_MAGIC_NUMBER) {
388 fprintf(out_file,
389 "Journal superblock magic number invalid!\n");
390 return;
391 }
392 blocksize = be32_to_cpu(jsb->s_blocksize);
393 transaction = be32_to_cpu(jsb->s_sequence);
394 blocknr = be32_to_cpu(jsb->s_start);
395
396 fprintf(out_file, "Journal starts at block %u, transaction %u\n",
397 blocknr, transaction);
398
399 if (!blocknr) {
400 /* Empty journal, nothing to do. */
401 if (!dump_old)
402 return;
403 else
404 blocknr = 1;
405 }
406
407 while (1) {
408 retval = read_journal_block(cmdname, source,
409 ((ext2_loff_t) blocknr) * blocksize,
410 buf, blocksize);
411 if (retval)
412 return;
413
414 header = (journal_header_t *) buf;
415
416 magic = be32_to_cpu(header->h_magic);
417 sequence = be32_to_cpu(header->h_sequence);
418 blocktype = be32_to_cpu(header->h_blocktype);
419
420 if (magic != JFS_MAGIC_NUMBER) {
421 fprintf (out_file, "No magic number at block %u: "
422 "end of journal.\n", blocknr);
423 return;
424 }
425
426 if (sequence != transaction) {
427 fprintf (out_file, "Found sequence %u (not %u) at "
428 "block %u: end of journal.\n",
429 sequence, transaction, blocknr);
430 if (!dump_old)
431 return;
432 }
433
434 if (dump_descriptors) {
435 fprintf (out_file, "Found expected sequence %u, "
436 "type %u (%s) at block %u\n",
437 sequence, blocktype,
438 type_to_name(blocktype), blocknr);
439 }
440
441 switch (blocktype) {
442 case JFS_DESCRIPTOR_BLOCK:
443 dump_descriptor_block(out_file, source, buf, jsb,
444 &blocknr, blocksize,
445 transaction);
446 continue;
447
448 case JFS_COMMIT_BLOCK:
449 transaction++;
450 blocknr++;
451 WRAP(jsb, blocknr);
452 continue;
453
454 case JFS_REVOKE_BLOCK:
455 dump_revoke_block(out_file, buf, jsb,
456 blocknr, blocksize,
457 transaction);
458 blocknr++;
459 WRAP(jsb, blocknr);
460 continue;
461
462 default:
463 fprintf (out_file, "Unexpected block type %u at "
464 "block %u.\n", blocktype, blocknr);
465 return;
466 }
467 }
468 }
469
journal_super_tag_bytes(journal_superblock_t * jsb)470 static inline size_t journal_super_tag_bytes(journal_superblock_t *jsb)
471 {
472 size_t sz;
473
474 if (JSB_HAS_INCOMPAT_FEATURE(jsb, JFS_FEATURE_INCOMPAT_CSUM_V3))
475 return sizeof(journal_block_tag3_t);
476
477 sz = sizeof(journal_block_tag_t);
478
479 if (JSB_HAS_INCOMPAT_FEATURE(jsb, JFS_FEATURE_INCOMPAT_CSUM_V2))
480 sz += sizeof(__u16);
481
482 if (JSB_HAS_INCOMPAT_FEATURE(jsb, JFS_FEATURE_INCOMPAT_64BIT))
483 return sz;
484
485 return sz - sizeof(__u32);
486 }
487
dump_descriptor_block(FILE * out_file,struct journal_source * source,char * buf,journal_superblock_t * jsb,unsigned int * blockp,int blocksize,tid_t transaction)488 static void dump_descriptor_block(FILE *out_file,
489 struct journal_source *source,
490 char *buf,
491 journal_superblock_t *jsb,
492 unsigned int *blockp, int blocksize,
493 tid_t transaction)
494 {
495 int offset, tag_size, csum_size = 0;
496 char *tagp;
497 journal_block_tag_t *tag;
498 unsigned int blocknr;
499 __u32 tag_block;
500 __u32 tag_flags;
501
502 tag_size = journal_super_tag_bytes(jsb);
503 offset = sizeof(journal_header_t);
504 blocknr = *blockp;
505
506 if (JSB_HAS_INCOMPAT_FEATURE(jsb, JFS_FEATURE_INCOMPAT_CSUM_V3) ||
507 JSB_HAS_INCOMPAT_FEATURE(jsb, JFS_FEATURE_INCOMPAT_CSUM_V2))
508 csum_size = sizeof(struct journal_block_tail);
509
510 if (dump_all)
511 fprintf(out_file, "Dumping descriptor block, sequence %u, at "
512 "block %u:\n", transaction, blocknr);
513
514 ++blocknr;
515 WRAP(jsb, blocknr);
516
517 do {
518 /* Work out the location of the current tag, and skip to
519 * the next one... */
520 tagp = &buf[offset];
521 tag = (journal_block_tag_t *) tagp;
522 offset += tag_size;
523
524 /* ... and if we have gone too far, then we've reached the
525 end of this block. */
526 if (offset > blocksize - csum_size)
527 break;
528
529 tag_block = be32_to_cpu(tag->t_blocknr);
530 tag_flags = be16_to_cpu(tag->t_flags);
531
532 if (!(tag_flags & JFS_FLAG_SAME_UUID))
533 offset += 16;
534
535 dump_metadata_block(out_file, source, jsb,
536 blocknr, tag_block, tag_flags, blocksize,
537 transaction);
538
539 ++blocknr;
540 WRAP(jsb, blocknr);
541
542 } while (!(tag_flags & JFS_FLAG_LAST_TAG));
543
544 *blockp = blocknr;
545 }
546
547
dump_revoke_block(FILE * out_file,char * buf,journal_superblock_t * jsb EXT2FS_ATTR ((unused)),unsigned int blocknr,int blocksize EXT2FS_ATTR ((unused)),tid_t transaction)548 static void dump_revoke_block(FILE *out_file, char *buf,
549 journal_superblock_t *jsb EXT2FS_ATTR((unused)),
550 unsigned int blocknr,
551 int blocksize EXT2FS_ATTR((unused)),
552 tid_t transaction)
553 {
554 int offset, max;
555 journal_revoke_header_t *header;
556 unsigned long long rblock;
557 int tag_size = sizeof(__u32);
558
559 if (dump_all)
560 fprintf(out_file, "Dumping revoke block, sequence %u, at "
561 "block %u:\n", transaction, blocknr);
562
563 if (be32_to_cpu(jsb->s_feature_incompat) & JFS_FEATURE_INCOMPAT_64BIT)
564 tag_size = sizeof(__u64);
565
566 header = (journal_revoke_header_t *) buf;
567 offset = sizeof(journal_revoke_header_t);
568 max = be32_to_cpu(header->r_count);
569
570 while (offset < max) {
571 if (tag_size == sizeof(__u32)) {
572 __u32 *entry = (__u32 *) (buf + offset);
573 rblock = be32_to_cpu(*entry);
574 } else {
575 __u64 *entry = (__u64 *) (buf + offset);
576 rblock = ext2fs_be64_to_cpu(*entry);
577 }
578 if (dump_all || rblock == block_to_dump) {
579 fprintf(out_file, " Revoke FS block %llu", rblock);
580 if (dump_all)
581 fprintf(out_file, "\n");
582 else
583 fprintf(out_file," at block %u, sequence %u\n",
584 blocknr, transaction);
585 }
586 offset += tag_size;
587 }
588 }
589
590
show_extent(FILE * out_file,int start_extent,int end_extent,__u32 first_block)591 static void show_extent(FILE *out_file, int start_extent, int end_extent,
592 __u32 first_block)
593 {
594 if (start_extent >= 0 && first_block != 0)
595 fprintf(out_file, "(%d+%u): %u ",
596 start_extent, end_extent-start_extent, first_block);
597 }
598
show_indirect(FILE * out_file,const char * name,__u32 where)599 static void show_indirect(FILE *out_file, const char *name, __u32 where)
600 {
601 if (where)
602 fprintf(out_file, "(%s): %u ", name, where);
603 }
604
605
dump_metadata_block(FILE * out_file,struct journal_source * source,journal_superblock_t * jsb EXT2FS_ATTR ((unused)),unsigned int log_blocknr,unsigned int fs_blocknr,unsigned int log_tag_flags,int blocksize,tid_t transaction)606 static void dump_metadata_block(FILE *out_file, struct journal_source *source,
607 journal_superblock_t *jsb EXT2FS_ATTR((unused)),
608 unsigned int log_blocknr,
609 unsigned int fs_blocknr,
610 unsigned int log_tag_flags,
611 int blocksize,
612 tid_t transaction)
613 {
614 int retval;
615 char buf[8192];
616
617 if (!(dump_all
618 || (fs_blocknr == block_to_dump)
619 || (fs_blocknr == inode_block_to_dump)
620 || (fs_blocknr == bitmap_to_dump)))
621 return;
622
623 fprintf(out_file, " FS block %u logged at ", fs_blocknr);
624 if (!dump_all)
625 fprintf(out_file, "sequence %u, ", transaction);
626 fprintf(out_file, "journal block %u (flags 0x%x)\n", log_blocknr,
627 log_tag_flags);
628
629 /* There are two major special cases to parse:
630 *
631 * If this block is a block
632 * bitmap block, we need to give it special treatment so that we
633 * can log any allocates and deallocates which affect the
634 * block_to_dump query block.
635 *
636 * If the block is an inode block for the inode being searched
637 * for, then we need to dump the contents of that inode
638 * structure symbolically.
639 */
640
641 if (!(dump_contents && dump_all)
642 && fs_blocknr != block_to_dump
643 && fs_blocknr != bitmap_to_dump
644 && fs_blocknr != inode_block_to_dump)
645 return;
646
647 retval = read_journal_block("logdump", source,
648 ((ext2_loff_t) log_blocknr) * blocksize,
649 buf, blocksize);
650 if (retval)
651 return;
652
653 if (fs_blocknr == bitmap_to_dump) {
654 struct ext2_super_block *super;
655 int offset;
656
657 super = current_fs->super;
658 offset = ((block_to_dump - super->s_first_data_block) %
659 super->s_blocks_per_group);
660
661 fprintf(out_file, " (block bitmap for block %llu: "
662 "block is %s)\n",
663 block_to_dump,
664 ext2fs_test_bit(offset, buf) ? "SET" : "CLEAR");
665 }
666
667 if (fs_blocknr == inode_block_to_dump) {
668 struct ext2_inode *inode;
669 int first, prev, this, start_extent, i;
670
671 fprintf(out_file, " (inode block for inode %u):\n",
672 inode_to_dump);
673
674 inode = (struct ext2_inode *) (buf + inode_offset_to_dump);
675 internal_dump_inode(out_file, " ", inode_to_dump, inode, 0);
676
677 /* Dump out the direct/indirect blocks here:
678 * internal_dump_inode can only dump them from the main
679 * on-disk inode, not from the journaled copy of the
680 * inode. */
681
682 fprintf (out_file, " Blocks: ");
683 first = prev = start_extent = -1;
684
685 for (i=0; i<EXT2_NDIR_BLOCKS; i++) {
686 this = inode->i_block[i];
687 if (start_extent >= 0 && this == prev+1) {
688 prev = this;
689 continue;
690 } else {
691 show_extent(out_file, start_extent, i, first);
692 start_extent = i;
693 first = prev = this;
694 }
695 }
696 show_extent(out_file, start_extent, i, first);
697 show_indirect(out_file, "IND", inode->i_block[i++]);
698 show_indirect(out_file, "DIND", inode->i_block[i++]);
699 show_indirect(out_file, "TIND", inode->i_block[i++]);
700
701 fprintf(out_file, "\n");
702 }
703
704 if (dump_contents)
705 do_hexdump(out_file, buf, blocksize);
706
707 }
708
do_hexdump(FILE * out_file,char * buf,int blocksize)709 static void do_hexdump (FILE *out_file, char *buf, int blocksize)
710 {
711 int i,j;
712 int *intp;
713 char *charp;
714 unsigned char c;
715
716 intp = (int *) buf;
717 charp = (char *) buf;
718
719 for (i=0; i<blocksize; i+=16) {
720 fprintf(out_file, " %04x: ", i);
721 for (j=0; j<16; j+=4)
722 fprintf(out_file, "%08x ", *intp++);
723 for (j=0; j<16; j++) {
724 c = *charp++;
725 if (c < ' ' || c >= 127)
726 c = '.';
727 fprintf(out_file, "%c", c);
728 }
729 fprintf(out_file, "\n");
730 }
731 }
732
733