1 #include "stdinc.h" 2 #include "dat.h" 3 #include "fns.h" 4 5 uchar buf[64*1024]; 6 7 void 8 usage(void) 9 { 10 fprint(2, "usage: printarenapart arenafile [offset]\n"); 11 threadexitsall("usage"); 12 } 13 14 static void 15 rdarena(Arena *arena, u64int offset) 16 { 17 u64int a, aa, e; 18 u32int magic; 19 Clump cl; 20 uchar score[VtScoreSize]; 21 ZBlock *lump; 22 23 printarena(2, arena); 24 25 a = arena->base; 26 e = arena->base + arena->size; 27 if(offset != ~(u64int)0) { 28 if(offset >= e-a) 29 sysfatal("bad offset %llud >= %llud", 30 offset, e-a); 31 aa = offset; 32 } else 33 aa = 0; 34 35 for(; aa < e; aa += ClumpSize+cl.info.size) { 36 magic = clumpmagic(arena, aa); 37 if(magic == ClumpFreeMagic) 38 break; 39 if(magic != arena->clumpmagic) { 40 fprint(2, "illegal clump magic number %#8.8ux offset %llud\n", 41 magic, aa); 42 break; 43 } 44 lump = loadclump(arena, aa, 0, &cl, score, 0); 45 if(lump == nil) { 46 fprint(2, "clump %llud failed to read: %r\n", aa); 47 break; 48 } 49 if(cl.info.type != VtCorruptType) { 50 scoremem(score, lump->data, cl.info.uncsize); 51 if(scorecmp(cl.info.score, score) != 0) { 52 fprint(2, "clump %llud has mismatched score\n", aa); 53 break; 54 } 55 if(vttypevalid(cl.info.type) < 0) { 56 fprint(2, "clump %llud has bad type %d\n", aa, cl.info.type); 57 break; 58 } 59 } 60 print("%22llud %V %3d %5d\n", aa, score, cl.info.type, cl.info.uncsize); 61 freezblock(lump); 62 } 63 print("end offset %llud\n", aa); 64 } 65 66 void 67 threadmain(int argc, char *argv[]) 68 { 69 char *file, *p, *name; 70 char *table; 71 u64int offset; 72 Part *part; 73 ArenaPart ap; 74 ArenaHead head; 75 Arena tail; 76 char ct[40], mt[40]; 77 78 readonly = 1; /* for part.c */ 79 ARGBEGIN{ 80 default: 81 usage(); 82 break; 83 }ARGEND 84 85 switch(argc) { 86 default: 87 usage(); 88 case 1: 89 file = argv[0]; 90 } 91 92 ventifmtinstall(); 93 statsinit(); 94 95 part = initpart(file, OREAD|ODIRECT); 96 if(part == nil) 97 sysfatal("can't open file %s: %r", file); 98 if(readpart(part, PartBlank, buf, sizeof buf) < 0) 99 sysfatal("can't read file %s: %r", file); 100 101 if(unpackarenapart(&ap, buf) < 0) 102 sysfatal("corrupted arena part header: %r"); 103 104 print("# arena part version=%d blocksize=%d arenabase=%d\n", 105 ap.version, ap.blocksize, ap.arenabase); 106 ap.tabbase = (PartBlank+HeadSize+ap.blocksize-1)&~(ap.blocksize-1); 107 ap.tabsize = ap.arenabase - ap.tabbase; 108 109 table = malloc(ap.tabsize+1); 110 if(readpart(part, ap.tabbase, (uchar*)table, ap.tabsize) < 0) 111 sysfatal("read %s: %r", file); 112 table[ap.tabsize] = 0; 113 114 partblocksize(part, ap.blocksize); 115 initdcache(8 * MaxDiskBlock); 116 117 for(p=table; p && *p; p=strchr(p, '\n')){ 118 if(*p == '\n') 119 p++; 120 name = p; 121 p = strpbrk(p, " \t"); 122 if(p == nil){ 123 fprint(2, "bad line: %s\n", name); 124 break; 125 } 126 offset = strtoull(p, nil, 0); 127 if(readpart(part, offset, buf, sizeof buf) < 0){ 128 fprint(2, "%s: read %s: %r\n", argv0, file); 129 continue; 130 } 131 if(unpackarenahead(&head, buf) < 0){ 132 fprint(2, "%s: unpackarenahead: %r\n", argv0); 133 continue; 134 } 135 if(readpart(part, offset+head.size-head.blocksize, buf, head.blocksize) < 0){ 136 fprint(2, "%s: read %s: %r\n", argv0, file); 137 continue; 138 } 139 if(unpackarena(&tail, buf) < 0){ 140 fprint(2, "%s: unpackarena: %r\n", argv0); 141 continue; 142 } 143 print("arena %s %lld clumps=%,d cclumps=%,d used=%,lld uncsize=%,lld%s\n", 144 tail.name, offset, 145 tail.diskstats.clumps, tail.diskstats.cclumps, 146 tail.diskstats.used, tail.diskstats.uncsize, 147 tail.diskstats.sealed ? " sealed" : ""); 148 strcpy(ct, ctime(tail.ctime)); 149 ct[28] = 0; 150 strcpy(mt, ctime(tail.wtime)); 151 mt[28] = 0; 152 print("\tctime=%s\n\tmtime=%s\n", ct, mt); 153 } 154 threadexitsall(0); 155 } 156