5 static int writeclumphead(Arena *arena, u64int aa, Clump *cl);
6 static int writeclumpmagic(Arena *arena, u64int aa, u32int magic);
9 clumpinfocmp(ClumpInfo *c, ClumpInfo *d)
11 return c->type != d->type
13 || c->uncsize != d->uncsize
14 || scorecmp(c->score, d->score)!=0;
18 * synchronize the clump info directory with
19 * with the clumps actually stored in the arena.
20 * the directory should be at least as up to date
21 * as the arena's trailer.
23 * checks/updates at most n clumps.
25 * returns 0 if ok, flags if error occurred
28 syncarena(Arena *arena, u32int n, int zok, int fix)
33 static ClumpInfo zci = { .type = -1 };
34 u8int score[VtScoreSize];
35 u64int uncsize, used, aa;
36 u32int clump, clumps, cclumps, magic;
37 int err, flush, broken;
40 clumps = arena->clumps;
41 cclumps = arena->cclumps;
42 uncsize = arena->uncsize;
48 clump = arena->clumps;
49 magic = clumpmagic(arena, aa);
50 if(magic == ClumpFreeMagic)
52 if(magic != ClumpMagic){
53 fprint(2, "illegal clump magic number=%#8.8ux at clump=%d\n", magic, clump);
55 //ZZZ write a zero here?
56 if(0 && fix && writeclumpmagic(arena, aa, ClumpFreeMagic) < 0){
57 fprint(2, "can't write corrected clump free magic: %r");
65 lump = loadclump(arena, aa, 0, &cl, score, 0);
67 fprint(2, "clump=%d failed to read correctly: %r\n", clump);
69 }else if(cl.info.type != VtTypeCorrupt){
70 scoremem(score, lump->data, cl.info.uncsize);
71 if(scorecmp(cl.info.score, score) != 0){
72 fprint(2, "clump=%d has mismatched score\n", clump);
75 }else if(vttypevalid(cl.info.type) < 0){
76 fprint(2, "clump=%d has invalid type %d", clump, cl.info.type);
81 cl.info.type = VtTypeCorrupt;
82 if(writeclumphead(arena, aa, &cl) < 0){
83 fprint(2, "can't write corrected clump header: %r");
89 arena->used += ClumpSize + cl.info.size;
91 if(!broken && readclumpinfo(arena, clump, &ci)<0){
92 fprint(2, "arena directory read failed\n");
94 }else if(!broken && clumpinfocmp(&ci, &cl.info)!=0){
95 if(clumpinfocmp(&ci, &zci) == 0){
98 fprint(2, "unwritten clump info for clump=%d\n", clump);
101 fprint(2, "bad clump info for clump=%d\n", clump);
102 fprint(2, "\texpected score=%V type=%d size=%d uncsize=%d\n",
103 cl.info.score, cl.info.type, cl.info.size, cl.info.uncsize);
104 fprint(2, "\tfound score=%V type=%d size=%d uncsize=%d\n",
105 ci.score, ci.type, ci.size, ci.uncsize);
112 if(writeclumpinfo(arena, clump, &ci) < 0){
113 fprint(2, "can't write correct clump directory: %r\n");
118 arena->uncsize += cl.info.uncsize;
119 if(cl.info.size < cl.info.uncsize)
124 arena->wtime = now();
125 if(arena->ctime == 0 && arena->clumps)
126 arena->ctime = arena->wtime;
127 if(flushciblocks(arena) < 0){
128 fprint(2, "can't flush arena directory cache: %r");
134 if(used != arena->used
135 || clumps != arena->clumps
136 || cclumps != arena->cclumps
137 || uncsize != arena->uncsize)
144 writeclumphead(Arena *arena, u64int aa, Clump *cl)
149 zb = alloczblock(ClumpSize, 0);
152 bad = packclump(cl, zb->data)<0
153 || writearena(arena, aa, zb->data, ClumpSize) != ClumpSize;
159 writeclumpmagic(Arena *arena, u64int aa, u32int magic)
163 packmagic(magic, buf);
164 return writearena(arena, aa, buf, U32Size) == U32Size;