pass5.c revision 1.26 1 /* $NetBSD: pass5.c,v 1.26 2001/01/26 17:37:16 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1980, 1986, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by the University of
18 * California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include <sys/cdefs.h>
37 #ifndef lint
38 #if 0
39 static char sccsid[] = "@(#)pass5.c 8.9 (Berkeley) 4/28/95";
40 #else
41 __RCSID("$NetBSD: pass5.c,v 1.26 2001/01/26 17:37:16 thorpej Exp $");
42 #endif
43 #endif /* not lint */
44
45 #include <sys/param.h>
46 #include <sys/time.h>
47
48 #include <ufs/ufs/dinode.h>
49 #include <ufs/ffs/fs.h>
50 #include <ufs/ffs/ffs_extern.h>
51 #include <ufs/ufs/ufs_bswap.h>
52
53 #include <err.h>
54 #include <string.h>
55 #include <malloc.h>
56
57 #include "fsutil.h"
58 #include "fsck.h"
59 #include "extern.h"
60
61 void print_bmap __P((u_char *,u_int32_t));
62
63 void
64 pass5()
65 {
66 int c, blk, frags, basesize, sumsize, mapsize, savednrpos = 0;
67 int inomapsize, blkmapsize;
68 struct fs *fs = sblock;
69 ufs_daddr_t dbase, dmax;
70 ufs_daddr_t d;
71 long i, j, k;
72 struct csum *cs;
73 struct csum cstotal;
74 struct inodesc idesc[4];
75 char buf[MAXBSIZE];
76 struct cg *newcg = (struct cg *)buf;
77 struct ocg *ocg = (struct ocg *)buf;
78 struct cg *cg = cgrp;
79
80 statemap[WINO] = USTATE;
81 memset(newcg, 0, (size_t)fs->fs_cgsize);
82 newcg->cg_niblk = fs->fs_ipg;
83 if (cvtlevel >= 3) {
84 if (fs->fs_maxcontig < 2 && fs->fs_contigsumsize > 0) {
85 if (preen)
86 pwarn("DELETING CLUSTERING MAPS\n");
87 if (preen || reply("DELETE CLUSTERING MAPS")) {
88 fs->fs_contigsumsize = 0;
89 doinglevel1 = 1;
90 sbdirty();
91 }
92 }
93 if (fs->fs_maxcontig > 1) {
94 char *doit = 0;
95
96 if (fs->fs_contigsumsize < 1) {
97 doit = "CREAT";
98 } else if (fs->fs_contigsumsize < fs->fs_maxcontig &&
99 fs->fs_contigsumsize < FS_MAXCONTIG) {
100 doit = "EXPAND";
101 }
102 if (doit) {
103 i = fs->fs_contigsumsize;
104 fs->fs_contigsumsize =
105 MIN(fs->fs_maxcontig, FS_MAXCONTIG);
106 if (CGSIZE(fs) > fs->fs_bsize) {
107 pwarn("CANNOT %s CLUSTER MAPS\n", doit);
108 fs->fs_contigsumsize = i;
109 } else if (preen ||
110 reply("CREATE CLUSTER MAPS")) {
111 if (preen)
112 pwarn("%sING CLUSTER MAPS\n",
113 doit);
114 fs->fs_cgsize =
115 fragroundup(fs, CGSIZE(fs));
116 cg = cgrp =
117 realloc(cgrp, fs->fs_cgsize);
118 if (cg == NULL)
119 errx(EEXIT,
120 "cannot reallocate cg space");
121 doinglevel1 = 1;
122 sbdirty();
123 }
124 }
125 }
126 }
127 switch ((int)fs->fs_postblformat) {
128
129 case FS_42POSTBLFMT:
130 basesize = (char *)(&ocg->cg_btot[0]) -
131 (char *)(&ocg->cg_firstfield);
132 sumsize = &ocg->cg_iused[0] - (u_int8_t *)(&ocg->cg_btot[0]);
133 mapsize = &ocg->cg_free[howmany(fs->fs_fpg, NBBY)] -
134 (u_char *)&ocg->cg_iused[0];
135 blkmapsize = howmany(fs->fs_fpg, NBBY);
136 inomapsize = &ocg->cg_free[0] - (u_char *)&ocg->cg_iused[0];
137 ocg->cg_magic = CG_MAGIC;
138 savednrpos = fs->fs_nrpos;
139 fs->fs_nrpos = 8;
140 break;
141
142 case FS_DYNAMICPOSTBLFMT:
143 newcg->cg_btotoff =
144 &newcg->cg_space[0] - (u_char *)(&newcg->cg_firstfield);
145 newcg->cg_boff =
146 newcg->cg_btotoff + fs->fs_cpg * sizeof(int32_t);
147 newcg->cg_iusedoff = newcg->cg_boff +
148 fs->fs_cpg * fs->fs_nrpos * sizeof(int16_t);
149 newcg->cg_freeoff =
150 newcg->cg_iusedoff + howmany(fs->fs_ipg, NBBY);
151 inomapsize = newcg->cg_freeoff - newcg->cg_iusedoff;
152 newcg->cg_nextfreeoff = newcg->cg_freeoff +
153 howmany(fs->fs_cpg * fs->fs_spc / NSPF(fs), NBBY);
154 blkmapsize = newcg->cg_nextfreeoff - newcg->cg_freeoff;
155 if (fs->fs_contigsumsize > 0) {
156 newcg->cg_clustersumoff = newcg->cg_nextfreeoff -
157 sizeof(int32_t);
158 newcg->cg_clustersumoff =
159 roundup(newcg->cg_clustersumoff, sizeof(int32_t));
160 newcg->cg_clusteroff = newcg->cg_clustersumoff +
161 (fs->fs_contigsumsize + 1) * sizeof(int32_t);
162 newcg->cg_nextfreeoff = newcg->cg_clusteroff +
163 howmany(fs->fs_cpg * fs->fs_spc / NSPB(fs), NBBY);
164 }
165 newcg->cg_magic = CG_MAGIC;
166 basesize = &newcg->cg_space[0] -
167 (u_char *)(&newcg->cg_firstfield);
168 sumsize = newcg->cg_iusedoff - newcg->cg_btotoff;
169 mapsize = newcg->cg_nextfreeoff - newcg->cg_iusedoff;
170 break;
171
172 default:
173 inomapsize = blkmapsize = sumsize = 0; /* keep lint happy */
174 errx(EEXIT, "UNKNOWN ROTATIONAL TABLE FORMAT %d",
175 fs->fs_postblformat);
176 }
177 memset(&idesc[0], 0, sizeof idesc);
178 for (i = 0; i < 4; i++) {
179 idesc[i].id_type = ADDR;
180 if (doinglevel2)
181 idesc[i].id_fix = FIX;
182 }
183 memset(&cstotal, 0, sizeof(struct csum));
184 j = blknum(fs, fs->fs_size + fs->fs_frag - 1);
185 for (i = fs->fs_size; i < j; i++)
186 setbmap(i);
187 for (c = 0; c < fs->fs_ncg; c++) {
188 getblk(&cgblk, cgtod(fs, c), fs->fs_cgsize);
189 memcpy(cg, cgblk.b_un.b_cg, fs->fs_cgsize);
190 if((doswap && !needswap) || (!doswap && needswap))
191 swap_cg(cgblk.b_un.b_cg, cg);
192 if (!cg_chkmagic(cg, 0))
193 pfatal("CG %d: PASS5: BAD MAGIC NUMBER\n", c);
194 if(doswap)
195 cgdirty();
196 /*
197 * While we have the disk head where we want it,
198 * write back the superblock to the spare at this
199 * cylinder group.
200 */
201 if ((cvtlevel && sblk.b_dirty) || doswap) {
202 bwrite(fswritefd, sblk.b_un.b_buf,
203 fsbtodb(sblock, cgsblock(sblock, c)),
204 sblock->fs_sbsize);
205 } else {
206 /*
207 * Read in the current alternate superblock,
208 * and compare it to the master. If it's
209 * wrong, fix it up.
210 */
211 getblk(&asblk, cgsblock(sblock, c), sblock->fs_sbsize);
212 if (asblk.b_errs)
213 pfatal("CG %d: UNABLE TO READ ALTERNATE "
214 "SUPERBLK\n", c);
215 else {
216 memmove(altsblock, asblk.b_un.b_fs,
217 sblock->fs_sbsize);
218 if (needswap)
219 ffs_sb_swap(asblk.b_un.b_fs, altsblock,
220 needswap);
221 }
222 if ((asblk.b_errs || cmpsblks(sblock, altsblock)) &&
223 dofix(&idesc[3],
224 "ALTERNATE SUPERBLK(S) ARE INCORRECT")) {
225 bwrite(fswritefd, sblk.b_un.b_buf,
226 fsbtodb(sblock, cgsblock(sblock, c)),
227 sblock->fs_sbsize);
228 }
229 }
230 dbase = cgbase(fs, c);
231 dmax = dbase + fs->fs_fpg;
232 if (dmax > fs->fs_size)
233 dmax = fs->fs_size;
234 newcg->cg_time = cg->cg_time;
235 newcg->cg_cgx = c;
236 if (c == fs->fs_ncg - 1)
237 newcg->cg_ncyl = fs->fs_ncyl % fs->fs_cpg;
238 else
239 newcg->cg_ncyl = fs->fs_cpg;
240 newcg->cg_ndblk = dmax - dbase;
241 if (fs->fs_contigsumsize > 0)
242 newcg->cg_nclusterblks = newcg->cg_ndblk / fs->fs_frag;
243 newcg->cg_cs.cs_ndir = 0;
244 newcg->cg_cs.cs_nffree = 0;
245 newcg->cg_cs.cs_nbfree = 0;
246 newcg->cg_cs.cs_nifree = fs->fs_ipg;
247 if (cg->cg_rotor >= 0 && cg->cg_rotor < newcg->cg_ndblk)
248 newcg->cg_rotor = cg->cg_rotor;
249 else
250 newcg->cg_rotor = 0;
251 if (cg->cg_frotor >= 0 && cg->cg_frotor < newcg->cg_ndblk)
252 newcg->cg_frotor = cg->cg_frotor;
253 else
254 newcg->cg_frotor = 0;
255 if (cg->cg_irotor >= 0 && cg->cg_irotor < newcg->cg_niblk)
256 newcg->cg_irotor = cg->cg_irotor;
257 else
258 newcg->cg_irotor = 0;
259 memset(&newcg->cg_frsum[0], 0, sizeof newcg->cg_frsum);
260 memset(&cg_blktot(newcg, 0)[0], 0,
261 (size_t)(sumsize + mapsize));
262 if (fs->fs_postblformat == FS_42POSTBLFMT)
263 ocg->cg_magic = CG_MAGIC;
264 j = fs->fs_ipg * c;
265 for (i = 0; i < fs->fs_ipg; j++, i++) {
266 switch (statemap[j]) {
267
268 case USTATE:
269 break;
270
271 case DSTATE:
272 case DCLEAR:
273 case DFOUND:
274 newcg->cg_cs.cs_ndir++;
275 /* fall through */
276
277 case FSTATE:
278 case FCLEAR:
279 newcg->cg_cs.cs_nifree--;
280 setbit(cg_inosused(newcg, 0), i);
281 break;
282
283 default:
284 if (j < ROOTINO)
285 break;
286 errx(EEXIT, "BAD STATE %d FOR INODE I=%ld",
287 statemap[j], (long)j);
288 }
289 }
290 if (c == 0)
291 for (i = 0; i < ROOTINO; i++) {
292 setbit(cg_inosused(newcg, 0), i);
293 newcg->cg_cs.cs_nifree--;
294 }
295 for (i = 0, d = dbase;
296 d < dmax;
297 d += fs->fs_frag, i += fs->fs_frag) {
298 frags = 0;
299 for (j = 0; j < fs->fs_frag; j++) {
300 if (testbmap(d + j))
301 continue;
302 setbit(cg_blksfree(newcg, 0), i + j);
303 frags++;
304 }
305 if (frags == fs->fs_frag) {
306 newcg->cg_cs.cs_nbfree++;
307 j = cbtocylno(fs, i);
308 cg_blktot(newcg, 0)[j]++;
309 cg_blks(fs, newcg, j, 0)[cbtorpos(fs, i)]++;
310 if (fs->fs_contigsumsize > 0)
311 setbit(cg_clustersfree(newcg, 0),
312 i / fs->fs_frag);
313 } else if (frags > 0) {
314 newcg->cg_cs.cs_nffree += frags;
315 blk = blkmap(fs, cg_blksfree(newcg, 0), i);
316 ffs_fragacct(fs, blk, newcg->cg_frsum, 1, 0);
317 }
318 }
319 if (fs->fs_contigsumsize > 0) {
320 int32_t *sump = cg_clustersum(newcg, 0);
321 u_char *mapp = cg_clustersfree(newcg, 0);
322 int map = *mapp++;
323 int bit = 1;
324 int run = 0;
325
326 for (i = 0; i < newcg->cg_nclusterblks; i++) {
327 if ((map & bit) != 0) {
328 run++;
329 } else if (run != 0) {
330 if (run > fs->fs_contigsumsize)
331 run = fs->fs_contigsumsize;
332 sump[run]++;
333 run = 0;
334 }
335 if ((i & (NBBY - 1)) != (NBBY - 1)) {
336 bit <<= 1;
337 } else {
338 map = *mapp++;
339 bit = 1;
340 }
341 }
342 if (run != 0) {
343 if (run > fs->fs_contigsumsize)
344 run = fs->fs_contigsumsize;
345 sump[run]++;
346 }
347 }
348 cstotal.cs_nffree += newcg->cg_cs.cs_nffree;
349 cstotal.cs_nbfree += newcg->cg_cs.cs_nbfree;
350 cstotal.cs_nifree += newcg->cg_cs.cs_nifree;
351 cstotal.cs_ndir += newcg->cg_cs.cs_ndir;
352 cs = &fs->fs_cs(fs, c);
353 if (memcmp(&newcg->cg_cs, cs, sizeof *cs) != 0) {
354 if (dofix(&idesc[0], "FREE BLK COUNT(S) WRONG IN SUPERBLK")) {
355 memmove(cs, &newcg->cg_cs, sizeof *cs);
356 sbdirty();
357 } else
358 markclean = 0;
359 }
360 if (doinglevel1) {
361 memmove(cg, newcg, (size_t)fs->fs_cgsize);
362 cgdirty();
363 continue;
364 }
365 if (memcmp(newcg, cg, basesize) != 0 ||
366 memcmp(&cg_blktot(newcg, 0)[0],
367 &cg_blktot(cg, 0)[0], sumsize) != 0) {
368 if (dofix(&idesc[2], "SUMMARY INFORMATION BAD")) {
369 memmove(cg, newcg, (size_t)basesize);
370 memmove(&cg_blktot(cg, 0)[0],
371 &cg_blktot(newcg, 0)[0], (size_t)sumsize);
372 cgdirty();
373 } else
374 markclean = 0;
375 }
376 if (usedsoftdep) {
377 for (i = 0; i < inomapsize; i++) {
378 j = cg_inosused(newcg, 0)[i];
379 if ((cg_inosused(cg, 0)[i] & j) == j)
380 continue;
381 for (k = 0; k < NBBY; k++) {
382 if ((j & (1 << k)) == 0)
383 continue;
384 if (cg_inosused(cg, 0)[i] & (1 << k))
385 continue;
386 pwarn("ALLOCATED INODE %ld "
387 "MARKED FREE\n",
388 c * fs->fs_ipg + i * 8 + k);
389 }
390 }
391 for (i = 0; i < blkmapsize; i++) {
392 j = cg_blksfree(cg, 0)[i];
393 if ((cg_blksfree(newcg, 0)[i] & j) == j)
394 continue;
395 for (k = 0; k < NBBY; k++) {
396 if ((j & (1 << k)) == 0)
397 continue;
398 if (cg_inosused(cg, 0)[i] & (1 << k))
399 continue;
400 pwarn("ALLOCATED FRAG %ld "
401 "MARKED FREE\n",
402 c * fs->fs_fpg + i * 8 + k);
403 }
404 }
405 }
406 if (memcmp(cg_inosused(newcg, 0), cg_inosused(cg, 0), mapsize)
407 != 0 && dofix(&idesc[1], "BLK(S) MISSING IN BIT MAPS")) {
408 memmove(cg_inosused(cg, 0), cg_inosused(newcg, 0),
409 (size_t)mapsize);
410 cgdirty();
411 }
412 }
413 if (fs->fs_postblformat == FS_42POSTBLFMT)
414 fs->fs_nrpos = savednrpos;
415 if (memcmp(&cstotal, &fs->fs_cstotal, sizeof *cs) != 0) {
416 if (dofix(&idesc[0], "FREE BLK COUNT(S) WRONG IN SUPERBLK")) {
417 memmove(&fs->fs_cstotal, &cstotal, sizeof *cs);
418 fs->fs_ronly = 0;
419 fs->fs_fmod = 0;
420 sbdirty();
421 } else
422 markclean = 0;
423 }
424 }
425
426 void
427 print_bmap(map, size)
428 u_char *map;
429 u_int32_t size;
430 {
431 int i, j;
432
433 i = 0;
434 while (i < size) {
435 printf("%u: ",i);
436 for (j = 0; j < 16; j++, i++)
437 printf("%2x ", (u_int)map[i] & 0xff);
438 printf("\n");
439 }
440 }
441