xref: /original-bsd/sbin/fsck/setup.c (revision 68d9582f)
1 /*
2  * Copyright (c) 1980, 1986 The Regents of the University of California.
3  * All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  */
7 
8 #ifndef lint
9 static char sccsid[] = "@(#)setup.c	5.38 (Berkeley) 06/17/92";
10 #endif /* not lint */
11 
12 #define DKTYPENAMES
13 #include <sys/param.h>
14 #include <sys/time.h>
15 #include <ufs/ufs/dinode.h>
16 #include <ufs/ffs/fs.h>
17 #include <sys/stat.h>
18 #include <sys/ioctl.h>
19 #include <sys/disklabel.h>
20 #include <sys/file.h>
21 #include <errno.h>
22 #include <stdlib.h>
23 #include <string.h>
24 #include <ctype.h>
25 #include "fsck.h"
26 
27 struct bufarea asblk;
28 #define altsblock (*asblk.b_un.b_fs)
29 #define POWEROF2(num)	(((num) & ((num) - 1)) == 0)
30 
31 /*
32  * The size of a cylinder group is calculated by CGSIZE. The maximum size
33  * is limited by the fact that cylinder groups are at most one block.
34  * Its size is derived from the size of the maps maintained in the
35  * cylinder group and the (struct cg) size.
36  */
37 #define CGSIZE(fs) \
38     /* base cg */	(sizeof(struct cg) + \
39     /* blktot size */	(fs)->fs_cpg * sizeof(long) + \
40     /* blks size */	(fs)->fs_cpg * (fs)->fs_nrpos * sizeof(short) + \
41     /* inode map */	howmany((fs)->fs_ipg, NBBY) + \
42     /* block map */	howmany((fs)->fs_cpg * (fs)->fs_spc / NSPF(fs), NBBY))
43 
44 char	*index();
45 struct	disklabel *getdisklabel();
46 
47 setup(dev)
48 	char *dev;
49 {
50 	long cg, size, asked, i, j;
51 	long bmapsize;
52 	struct disklabel *lp;
53 	struct stat statb;
54 	struct fs proto;
55 
56 	havesb = 0;
57 	if (stat(dev, &statb) < 0) {
58 		printf("Can't stat %s: %s\n", dev, strerror(errno));
59 		return (0);
60 	}
61 	if ((statb.st_mode & S_IFMT) != S_IFCHR) {
62 		pfatal("%s is not a character device", dev);
63 		if (reply("CONTINUE") == 0)
64 			return (0);
65 	}
66 	if ((fsreadfd = open(dev, O_RDONLY)) < 0) {
67 		printf("Can't open %s: %s\n", dev, strerror(errno));
68 		return (0);
69 	}
70 	if (preen == 0)
71 		printf("** %s", dev);
72 	if (nflag || (fswritefd = open(dev, O_WRONLY)) < 0) {
73 		fswritefd = -1;
74 		if (preen)
75 			pfatal("NO WRITE ACCESS");
76 		printf(" (NO WRITE)");
77 	}
78 	if (preen == 0)
79 		printf("\n");
80 	fsmodified = 0;
81 	lfdir = 0;
82 	initbarea(&sblk);
83 	initbarea(&asblk);
84 	sblk.b_un.b_buf = malloc(SBSIZE);
85 	asblk.b_un.b_buf = malloc(SBSIZE);
86 	if (sblk.b_un.b_buf == NULL || asblk.b_un.b_buf == NULL)
87 		errexit("cannot allocate space for superblock\n");
88 	if (lp = getdisklabel((char *)NULL, fsreadfd))
89 		dev_bsize = secsize = lp->d_secsize;
90 	else
91 		dev_bsize = secsize = DEV_BSIZE;
92 #ifdef tahoe
93 	/*
94 	 * On the tahoe, the disk label and the disk driver disagree.
95 	 * The label knows that sectors are 512 bytes, but the disk
96 	 * drivers will only transfer in 1024 sized pieces.
97 	 */
98 	secsize = 1024;
99 #endif
100 	/*
101 	 * Read in the superblock, looking for alternates if necessary
102 	 */
103 	if (readsb(1) == 0) {
104 		if (bflag || preen || calcsb(dev, fsreadfd, &proto) == 0)
105 			return(0);
106 		if (reply("LOOK FOR ALTERNATE SUPERBLOCKS") == 0)
107 			return (0);
108 		for (cg = 0; cg < proto.fs_ncg; cg++) {
109 			bflag = fsbtodb(&proto, cgsblock(&proto, cg));
110 			if (readsb(0) != 0)
111 				break;
112 		}
113 		if (cg >= proto.fs_ncg) {
114 			printf("%s %s\n%s %s\n%s %s\n",
115 				"SEARCH FOR ALTERNATE SUPER-BLOCK",
116 				"FAILED. YOU MUST USE THE",
117 				"-b OPTION TO FSCK TO SPECIFY THE",
118 				"LOCATION OF AN ALTERNATE",
119 				"SUPER-BLOCK TO SUPPLY NEEDED",
120 				"INFORMATION; SEE fsck(8).");
121 			return(0);
122 		}
123 		pwarn("USING ALTERNATE SUPERBLOCK AT %d\n", bflag);
124 	}
125 	maxfsblock = sblock.fs_size;
126 	maxino = sblock.fs_ncg * sblock.fs_ipg;
127 	/*
128 	 * Check and potentially fix certain fields in the super block.
129 	 */
130 	if (sblock.fs_optim != FS_OPTTIME && sblock.fs_optim != FS_OPTSPACE) {
131 		pfatal("UNDEFINED OPTIMIZATION IN SUPERBLOCK");
132 		if (reply("SET TO DEFAULT") == 1) {
133 			sblock.fs_optim = FS_OPTTIME;
134 			sbdirty();
135 		}
136 	}
137 	if ((sblock.fs_minfree < 0 || sblock.fs_minfree > 99)) {
138 		pfatal("IMPOSSIBLE MINFREE=%d IN SUPERBLOCK",
139 			sblock.fs_minfree);
140 		if (reply("SET TO DEFAULT") == 1) {
141 			sblock.fs_minfree = 10;
142 			sbdirty();
143 		}
144 	}
145 	if (sblock.fs_interleave < 1 ||
146 	    sblock.fs_interleave > sblock.fs_nsect) {
147 		pwarn("IMPOSSIBLE INTERLEAVE=%d IN SUPERBLOCK",
148 			sblock.fs_interleave);
149 		sblock.fs_interleave = 1;
150 		if (preen)
151 			printf(" (FIXED)\n");
152 		if (preen || reply("SET TO DEFAULT") == 1) {
153 			sbdirty();
154 			dirty(&asblk);
155 		}
156 	}
157 	if (sblock.fs_npsect < sblock.fs_nsect ||
158 	    sblock.fs_npsect > sblock.fs_nsect*2) {
159 		pwarn("IMPOSSIBLE NPSECT=%d IN SUPERBLOCK",
160 			sblock.fs_npsect);
161 		sblock.fs_npsect = sblock.fs_nsect;
162 		if (preen)
163 			printf(" (FIXED)\n");
164 		if (preen || reply("SET TO DEFAULT") == 1) {
165 			sbdirty();
166 			dirty(&asblk);
167 		}
168 	}
169 	if (cvtflag) {
170 		if (sblock.fs_postblformat == FS_42POSTBLFMT) {
171 			/*
172 			 * Requested to convert from old format to new format
173 			 */
174 			if (preen)
175 				pwarn("CONVERTING TO NEW FILE SYSTEM FORMAT\n");
176 			else if (!reply("CONVERT TO NEW FILE SYSTEM FORMAT"))
177 				return(0);
178 			sblock.fs_postblformat = FS_DYNAMICPOSTBLFMT;
179 			sblock.fs_nrpos = 8;
180 			sblock.fs_postbloff =
181 			    (char *)(&sblock.fs_opostbl[0][0]) -
182 			    (char *)(&sblock.fs_link);
183 			sblock.fs_rotbloff = &sblock.fs_space[0] -
184 			    (u_char *)(&sblock.fs_link);
185 			sblock.fs_cgsize =
186 				fragroundup(&sblock, CGSIZE(&sblock));
187 			/*
188 			 * Planning now for future expansion.
189 			 */
190 #			ifdef _NOQUAD
191 				sblock.fs_qbmask.val[_QUAD_HIGHWORD] = 0;
192 				sblock.fs_qbmask.val[_QUAD_LOWWORD] =
193 				    ~sblock.fs_bmask;
194 				sblock.fs_qfmask.val[_QUAD_HIGHWORD] = 0;
195 				sblock.fs_qfmask.val[_QUAD_LOWWORD] =
196 				    ~sblock.fs_fmask;
197 #			else /* QUAD */
198 				sblock.fs_qbmask = ~sblock.fs_bmask;
199 				sblock.fs_qfmask = ~sblock.fs_fmask;
200 #			endif /* QUAD */
201 			sbdirty();
202 			dirty(&asblk);
203 		} else if (sblock.fs_postblformat == FS_DYNAMICPOSTBLFMT) {
204 			/*
205 			 * Requested to convert from new format to old format
206 			 */
207 			if (sblock.fs_nrpos != 8 || sblock.fs_ipg > 2048 ||
208 			    sblock.fs_cpg > 32 || sblock.fs_cpc > 16) {
209 				printf(
210 				"PARAMETERS OF CURRENT FILE SYSTEM DO NOT\n\t");
211 				errexit(
212 				"ALLOW CONVERSION TO OLD FILE SYSTEM FORMAT\n");
213 			}
214 			if (preen)
215 				pwarn("CONVERTING TO OLD FILE SYSTEM FORMAT\n");
216 			else if (!reply("CONVERT TO OLD FILE SYSTEM FORMAT"))
217 				return(0);
218 			sblock.fs_postblformat = FS_42POSTBLFMT;
219 			sblock.fs_cgsize = fragroundup(&sblock,
220 			    sizeof(struct ocg) + howmany(sblock.fs_fpg, NBBY));
221 			sbdirty();
222 			dirty(&asblk);
223 		} else {
224 			errexit("UNKNOWN FILE SYSTEM FORMAT\n");
225 		}
226 	}
227 	if (asblk.b_dirty) {
228 		bcopy((char *)&sblock, (char *)&altsblock,
229 			(size_t)sblock.fs_sbsize);
230 		flush(fswritefd, &asblk);
231 	}
232 	/*
233 	 * read in the summary info.
234 	 */
235 	asked = 0;
236 	for (i = 0, j = 0; i < sblock.fs_cssize; i += sblock.fs_bsize, j++) {
237 		size = sblock.fs_cssize - i < sblock.fs_bsize ?
238 		    sblock.fs_cssize - i : sblock.fs_bsize;
239 		sblock.fs_csp[j] = (struct csum *)calloc(1, (unsigned)size);
240 		if (bread(fsreadfd, (char *)sblock.fs_csp[j],
241 		    fsbtodb(&sblock, sblock.fs_csaddr + j * sblock.fs_frag),
242 		    size) != 0 && !asked) {
243 			pfatal("BAD SUMMARY INFORMATION");
244 			if (reply("CONTINUE") == 0)
245 				errexit("");
246 			asked++;
247 		}
248 	}
249 	/*
250 	 * allocate and initialize the necessary maps
251 	 */
252 	bmapsize = roundup(howmany(maxfsblock, NBBY), sizeof(short));
253 	blockmap = calloc((unsigned)bmapsize, sizeof (char));
254 	if (blockmap == NULL) {
255 		printf("cannot alloc %u bytes for blockmap\n",
256 		    (unsigned)bmapsize);
257 		goto badsb;
258 	}
259 	statemap = calloc((unsigned)(maxino + 1), sizeof(char));
260 	if (statemap == NULL) {
261 		printf("cannot alloc %u bytes for statemap\n",
262 		    (unsigned)(maxino + 1));
263 		goto badsb;
264 	}
265 	lncntp = (short *)calloc((unsigned)(maxino + 1), sizeof(short));
266 	if (lncntp == NULL) {
267 		printf("cannot alloc %u bytes for lncntp\n",
268 		    (unsigned)(maxino + 1) * sizeof(short));
269 		goto badsb;
270 	}
271 	numdirs = sblock.fs_cstotal.cs_ndir;
272 	inplast = 0;
273 	listmax = numdirs + 10;
274 	inpsort = (struct inoinfo **)calloc((unsigned)listmax,
275 	    sizeof(struct inoinfo *));
276 	inphead = (struct inoinfo **)calloc((unsigned)numdirs,
277 	    sizeof(struct inoinfo *));
278 	if (inpsort == NULL || inphead == NULL) {
279 		printf("cannot alloc %u bytes for inphead\n",
280 		    (unsigned)numdirs * sizeof(struct inoinfo *));
281 		goto badsb;
282 	}
283 	bufinit();
284 	return (1);
285 
286 badsb:
287 	ckfini();
288 	return (0);
289 }
290 
291 /*
292  * Read in the super block and its summary info.
293  */
294 readsb(listerr)
295 	int listerr;
296 {
297 	daddr_t super = bflag ? bflag : SBOFF / dev_bsize;
298 
299 	if (bread(fsreadfd, (char *)&sblock, super, (long)SBSIZE) != 0)
300 		return (0);
301 	sblk.b_bno = super;
302 	sblk.b_size = SBSIZE;
303 	/*
304 	 * run a few consistency checks of the super block
305 	 */
306 	if (sblock.fs_magic != FS_MAGIC)
307 		{ badsb(listerr, "MAGIC NUMBER WRONG"); return (0); }
308 	if (sblock.fs_ncg < 1)
309 		{ badsb(listerr, "NCG OUT OF RANGE"); return (0); }
310 	if (sblock.fs_cpg < 1)
311 		{ badsb(listerr, "CPG OUT OF RANGE"); return (0); }
312 	if (sblock.fs_ncg * sblock.fs_cpg < sblock.fs_ncyl ||
313 	    (sblock.fs_ncg - 1) * sblock.fs_cpg >= sblock.fs_ncyl)
314 		{ badsb(listerr, "NCYL LESS THAN NCG*CPG"); return (0); }
315 	if (sblock.fs_sbsize > SBSIZE)
316 		{ badsb(listerr, "SIZE PREPOSTEROUSLY LARGE"); return (0); }
317 	/*
318 	 * Compute block size that the filesystem is based on,
319 	 * according to fsbtodb, and adjust superblock block number
320 	 * so we can tell if this is an alternate later.
321 	 */
322 	super *= dev_bsize;
323 	dev_bsize = sblock.fs_fsize / fsbtodb(&sblock, 1);
324 	sblk.b_bno = super / dev_bsize;
325 	if (bflag) {
326 		havesb = 1;
327 		return (1);
328 	}
329 	/*
330 	 * Set all possible fields that could differ, then do check
331 	 * of whole super block against an alternate super block.
332 	 * When an alternate super-block is specified this check is skipped.
333 	 */
334 	getblk(&asblk, cgsblock(&sblock, sblock.fs_ncg - 1), sblock.fs_sbsize);
335 	if (asblk.b_errs)
336 		return (0);
337 	altsblock.fs_link = sblock.fs_link;
338 	altsblock.fs_rlink = sblock.fs_rlink;
339 	altsblock.fs_time = sblock.fs_time;
340 	altsblock.fs_cstotal = sblock.fs_cstotal;
341 	altsblock.fs_cgrotor = sblock.fs_cgrotor;
342 	altsblock.fs_fmod = sblock.fs_fmod;
343 	altsblock.fs_clean = sblock.fs_clean;
344 	altsblock.fs_ronly = sblock.fs_ronly;
345 	altsblock.fs_flags = sblock.fs_flags;
346 	altsblock.fs_maxcontig = sblock.fs_maxcontig;
347 	altsblock.fs_minfree = sblock.fs_minfree;
348 	altsblock.fs_optim = sblock.fs_optim;
349 	altsblock.fs_rotdelay = sblock.fs_rotdelay;
350 	altsblock.fs_maxbpg = sblock.fs_maxbpg;
351 	bcopy((char *)sblock.fs_csp, (char *)altsblock.fs_csp,
352 		sizeof sblock.fs_csp);
353 	bcopy((char *)sblock.fs_fsmnt, (char *)altsblock.fs_fsmnt,
354 		sizeof sblock.fs_fsmnt);
355 	bcopy((char *)sblock.fs_sparecon, (char *)altsblock.fs_sparecon,
356 		sizeof sblock.fs_sparecon);
357 	/*
358 	 * The following should not have to be copied.
359 	 */
360 	altsblock.fs_fsbtodb = sblock.fs_fsbtodb;
361 	altsblock.fs_interleave = sblock.fs_interleave;
362 	altsblock.fs_npsect = sblock.fs_npsect;
363 	altsblock.fs_nrpos = sblock.fs_nrpos;
364 	altsblock.fs_qbmask = sblock.fs_qbmask;
365 	altsblock.fs_qfmask = sblock.fs_qfmask;
366 	altsblock.fs_state = sblock.fs_state;
367 	altsblock.fs_maxfilesize = sblock.fs_maxfilesize;
368 	if (bcmp((char *)&sblock, (char *)&altsblock, (int)sblock.fs_sbsize)) {
369 		badsb(listerr,
370 		"VALUES IN SUPER BLOCK DISAGREE WITH THOSE IN FIRST ALTERNATE");
371 		return (0);
372 	}
373 	havesb = 1;
374 	return (1);
375 }
376 
377 badsb(listerr, s)
378 	int listerr;
379 	char *s;
380 {
381 
382 	if (!listerr)
383 		return;
384 	if (preen)
385 		printf("%s: ", devname);
386 	pfatal("BAD SUPER BLOCK: %s\n", s);
387 }
388 
389 /*
390  * Calculate a prototype superblock based on information in the disk label.
391  * When done the cgsblock macro can be calculated and the fs_ncg field
392  * can be used. Do NOT attempt to use other macros without verifying that
393  * their needed information is available!
394  */
395 calcsb(dev, devfd, fs)
396 	char *dev;
397 	int devfd;
398 	register struct fs *fs;
399 {
400 	register struct disklabel *lp;
401 	register struct partition *pp;
402 	register char *cp;
403 	int i;
404 
405 	cp = index(dev, '\0') - 1;
406 	if (cp == (char *)-1 || (*cp < 'a' || *cp > 'h') && !isdigit(*cp)) {
407 		pfatal("%s: CANNOT FIGURE OUT FILE SYSTEM PARTITION\n", dev);
408 		return (0);
409 	}
410 	lp = getdisklabel(dev, devfd);
411 	if (isdigit(*cp))
412 		pp = &lp->d_partitions[0];
413 	else
414 		pp = &lp->d_partitions[*cp - 'a'];
415 	if (pp->p_fstype != FS_BSDFFS) {
416 		pfatal("%s: NOT LABELED AS A BSD FILE SYSTEM (%s)\n",
417 			dev, pp->p_fstype < FSMAXTYPES ?
418 			fstypenames[pp->p_fstype] : "unknown");
419 		return (0);
420 	}
421 	bzero((char *)fs, sizeof(struct fs));
422 	fs->fs_fsize = pp->p_fsize;
423 	fs->fs_frag = pp->p_frag;
424 	fs->fs_cpg = pp->p_cpg;
425 	fs->fs_size = pp->p_size;
426 	fs->fs_ntrak = lp->d_ntracks;
427 	fs->fs_nsect = lp->d_nsectors;
428 	fs->fs_spc = lp->d_secpercyl;
429 	fs->fs_nspf = fs->fs_fsize / lp->d_secsize;
430 	fs->fs_sblkno = roundup(
431 		howmany(lp->d_bbsize + lp->d_sbsize, fs->fs_fsize),
432 		fs->fs_frag);
433 	fs->fs_cgmask = 0xffffffff;
434 	for (i = fs->fs_ntrak; i > 1; i >>= 1)
435 		fs->fs_cgmask <<= 1;
436 	if (!POWEROF2(fs->fs_ntrak))
437 		fs->fs_cgmask <<= 1;
438 	fs->fs_cgoffset = roundup(
439 		howmany(fs->fs_nsect, NSPF(fs)), fs->fs_frag);
440 	fs->fs_fpg = (fs->fs_cpg * fs->fs_spc) / NSPF(fs);
441 	fs->fs_ncg = howmany(fs->fs_size / fs->fs_spc, fs->fs_cpg);
442 	for (fs->fs_fsbtodb = 0, i = NSPF(fs); i > 1; i >>= 1)
443 		fs->fs_fsbtodb++;
444 	dev_bsize = lp->d_secsize;
445 	return (1);
446 }
447 
448 struct disklabel *
449 getdisklabel(s, fd)
450 	char *s;
451 	int	fd;
452 {
453 	static struct disklabel lab;
454 
455 	if (ioctl(fd, DIOCGDINFO, (char *)&lab) < 0) {
456 		if (s == NULL)
457 			return ((struct disklabel *)NULL);
458 		pwarn("ioctl (GCINFO): %s\n", strerror(errno));
459 		errexit("%s: can't read disk label\n", s);
460 	}
461 	return (&lab);
462 }
463