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