1 a0d146ed 2005-07-12 devnull #include "stdinc.h"
2 a0d146ed 2005-07-12 devnull #include "dat.h"
3 a0d146ed 2005-07-12 devnull #include "fns.h"
6 a0d146ed 2005-07-12 devnull usage(void)
8 a0d146ed 2005-07-12 devnull fprint(2, "usage: printarena arenafile [offset]\n");
9 a0d146ed 2005-07-12 devnull threadexitsall("usage");
12 a0d146ed 2005-07-12 devnull static void
13 a0d146ed 2005-07-12 devnull rdarena(Arena *arena, u64int offset)
15 a0d146ed 2005-07-12 devnull u64int a, aa, e;
16 a0d146ed 2005-07-12 devnull u32int magic;
17 a0d146ed 2005-07-12 devnull Clump cl;
18 a0d146ed 2005-07-12 devnull uchar score[VtScoreSize];
19 a0d146ed 2005-07-12 devnull ZBlock *lump;
21 a0d146ed 2005-07-12 devnull printarena(2, arena);
23 a0d146ed 2005-07-12 devnull a = arena->base;
24 a0d146ed 2005-07-12 devnull e = arena->base + arena->size;
25 a0d146ed 2005-07-12 devnull if(offset != ~(u64int)0) {
26 a0d146ed 2005-07-12 devnull if(offset >= e-a)
27 a0d146ed 2005-07-12 devnull sysfatal("bad offset %llud >= %llud\n",
28 a0d146ed 2005-07-12 devnull offset, e-a);
29 a0d146ed 2005-07-12 devnull aa = offset;
33 a0d146ed 2005-07-12 devnull for(; aa < e; aa += ClumpSize+cl.info.size) {
34 a0d146ed 2005-07-12 devnull magic = clumpmagic(arena, aa);
35 a0d146ed 2005-07-12 devnull if(magic == ClumpFreeMagic)
37 a0d146ed 2005-07-12 devnull if(magic != arena->clumpmagic) {
38 a0d146ed 2005-07-12 devnull fprint(2, "illegal clump magic number %#8.8ux offset %llud\n",
39 a0d146ed 2005-07-12 devnull magic, aa);
42 a0d146ed 2005-07-12 devnull lump = loadclump(arena, aa, 0, &cl, score, 0);
43 a0d146ed 2005-07-12 devnull if(lump == nil) {
44 a0d146ed 2005-07-12 devnull fprint(2, "clump %llud failed to read: %r\n", aa);
47 a0d146ed 2005-07-12 devnull if(cl.info.type != VtCorruptType) {
48 a0d146ed 2005-07-12 devnull scoremem(score, lump->data, cl.info.uncsize);
49 a0d146ed 2005-07-12 devnull if(scorecmp(cl.info.score, score) != 0) {
50 a0d146ed 2005-07-12 devnull fprint(2, "clump %llud has mismatched score\n", aa);
53 a0d146ed 2005-07-12 devnull if(vttypevalid(cl.info.type) < 0) {
54 a0d146ed 2005-07-12 devnull fprint(2, "clump %llud has bad type %d\n", aa, cl.info.type);
58 a0d146ed 2005-07-12 devnull print("%22llud %V %3d %5d\n", aa, score, cl.info.type, cl.info.uncsize);
59 a0d146ed 2005-07-12 devnull freezblock(lump);
61 a0d146ed 2005-07-12 devnull print("end offset %llud\n", aa);
65 a0d146ed 2005-07-12 devnull threadmain(int argc, char *argv[])
67 a0d146ed 2005-07-12 devnull char *file;
68 a0d146ed 2005-07-12 devnull Arena *arena;
69 a0d146ed 2005-07-12 devnull u64int offset, aoffset;
70 a0d146ed 2005-07-12 devnull Part *part;
71 a0d146ed 2005-07-12 devnull uchar buf[8192];
72 a0d146ed 2005-07-12 devnull ArenaHead head;
74 a0d146ed 2005-07-12 devnull readonly = 1; /* for part.c */
75 a0d146ed 2005-07-12 devnull aoffset = 0;
76 a0d146ed 2005-07-12 devnull ARGBEGIN{
77 a0d146ed 2005-07-12 devnull case 'o':
78 a0d146ed 2005-07-12 devnull aoffset = strtoull(EARGF(usage()), 0, 0);
85 a0d146ed 2005-07-12 devnull offset = ~(u64int)0;
86 a0d146ed 2005-07-12 devnull switch(argc) {
90 a0d146ed 2005-07-12 devnull offset = strtoull(argv[1], 0, 0);
91 a0d146ed 2005-07-12 devnull /* fall through */
93 a0d146ed 2005-07-12 devnull file = argv[0];
97 a0d146ed 2005-07-12 devnull ventifmtinstall();
98 a0d146ed 2005-07-12 devnull statsinit();
100 a0d146ed 2005-07-12 devnull part = initpart(file, OREAD|ODIRECT);
101 a0d146ed 2005-07-12 devnull if(part == nil)
102 a0d146ed 2005-07-12 devnull sysfatal("can't open file %s: %r", file);
103 a0d146ed 2005-07-12 devnull if(readpart(part, aoffset, buf, sizeof buf) < 0)
104 a0d146ed 2005-07-12 devnull sysfatal("can't read file %s: %r", file);
106 a0d146ed 2005-07-12 devnull if(unpackarenahead(&head, buf) < 0)
107 a0d146ed 2005-07-12 devnull sysfatal("corrupted arena header: %r");
109 a0d146ed 2005-07-12 devnull print("# arena head version=%d name=%.*s blocksize=%d size=%lld clumpmagic=0x%.8ux\n",
110 a0d146ed 2005-07-12 devnull head.version, ANameSize, head.name, head.blocksize,
111 a0d146ed 2005-07-12 devnull head.size, head.clumpmagic);
113 1726f602 2005-10-29 devnull if(aoffset+head.size > part->size)
114 a0d146ed 2005-07-12 devnull sysfatal("arena is truncated: want %llud bytes have %llud\n",
115 1726f602 2005-10-29 devnull head.size, part->size);
117 a0d146ed 2005-07-12 devnull partblocksize(part, head.blocksize);
118 a0d146ed 2005-07-12 devnull initdcache(8 * MaxDiskBlock);
120 a0d146ed 2005-07-12 devnull arena = initarena(part, aoffset, head.size, head.blocksize);
121 a0d146ed 2005-07-12 devnull if(arena == nil)
122 a0d146ed 2005-07-12 devnull sysfatal("initarena: %r");
124 a0d146ed 2005-07-12 devnull rdarena(arena, offset);
125 a0d146ed 2005-07-12 devnull threadexitsall(0);