xref: /original-bsd/sbin/fsck/setup.c (revision d0e3910b)
1 /*
2  * Copyright (c) 1980 Regents of the University of California.
3  * All rights reserved.  The Berkeley software License Agreement
4  * specifies the terms and conditions for redistribution.
5  */
6 
7 #ifndef lint
8 static char sccsid[] = "@(#)setup.c	5.16 (Berkeley) 04/06/88";
9 #endif not lint
10 
11 #define DKTYPENAMES
12 #include <sys/param.h>
13 #include <sys/inode.h>
14 #include <sys/fs.h>
15 #include <sys/stat.h>
16 #include <sys/ioctl.h>
17 #include <sys/disklabel.h>
18 #include <sys/file.h>
19 #include <ctype.h>
20 #include "fsck.h"
21 
22 #define POWEROF2(num)	(((num) & ((num) - 1)) == 0)
23 
24 char	*calloc();
25 char	*index();
26 
27 setup(dev)
28 	char *dev;
29 {
30 	dev_t rootdev;
31 	long cg, ncg, size, asked, i, j;
32 	struct disklabel *getdisklabel(), *lp;
33 	struct stat statb;
34 	struct fs proto;
35 
36 	havesb = 0;
37 	if (stat("/", &statb) < 0)
38 		errexit("Can't stat root\n");
39 	rootdev = statb.st_dev;
40 	if (stat(dev, &statb) < 0) {
41 		perror(dev);
42 		printf("Can't stat %s\n", dev);
43 		return (0);
44 	}
45 	rawflg = 0;
46 	if ((statb.st_mode & S_IFMT) == S_IFBLK)
47 		;
48 	else if ((statb.st_mode & S_IFMT) == S_IFCHR)
49 		rawflg++;
50 	else {
51 		if (reply("file is not a block or character device; OK") == 0)
52 			return (0);
53 	}
54 	if (rootdev == statb.st_rdev)
55 		hotroot++;
56 	if ((dfile.rfdes = open(dev, O_RDONLY)) < 0) {
57 		perror(dev);
58 		printf("Can't open %s\n", dev);
59 		return (0);
60 	}
61 	if (preen == 0)
62 		printf("** %s", dev);
63 	if (nflag || (dfile.wfdes = open(dev, O_WRONLY)) < 0) {
64 		dfile.wfdes = -1;
65 		if (preen)
66 			pfatal("NO WRITE ACCESS");
67 		printf(" (NO WRITE)");
68 	}
69 	if (preen == 0)
70 		printf("\n");
71 	dfile.mod = 0;
72 	lfdir = 0;
73 	initbarea(&sblk);
74 	initbarea(&fileblk);
75 	initbarea(&inoblk);
76 	initbarea(&cgblk);
77 	if (lp = getdisklabel((char *)NULL, dfile.rfdes))
78 		dev_bsize = secsize = lp->d_secsize;
79 	else {
80 		dev_bsize = DEV_BSIZE;
81 		secsize = 0;			/* guess later */
82 	}
83 	/*
84 	 * Read in the superblock, looking for alternates if necessary
85 	 */
86 	if (readsb(1) == 0) {
87 		if (bflag || preen || calcsb(dev, dfile.rfdes, &proto) == 0)
88 			return(0);
89 		if (reply("LOOK FOR ALTERNATE SUPERBLOCKS") == 0)
90 			return (0);
91 		for (cg = 0; cg < proto.fs_ncg; cg++) {
92 			bflag = fsbtodb(&proto, cgsblock(&proto, cg));
93 			if (readsb(0) != 0)
94 				break;
95 		}
96 		if (cg >= proto.fs_ncg) {
97 			printf("%s %s\n%s %s\n%s %s\n",
98 				"SEARCH FOR ALTERNATE SUPER-BLOCK",
99 				"FAILED. YOU MUST USE THE",
100 				"-b OPTION TO FSCK TO SPECIFY THE",
101 				"LOCATION OF AN ALTERNATE",
102 				"SUPER-BLOCK TO SUPPLY NEEDED",
103 				"INFORMATION; SEE fsck(8).");
104 			return(0);
105 		}
106 		pwarn("USING ALTERNATE SUPERBLOCK AT %d\n", bflag);
107 	}
108 	fmax = sblock.fs_size;
109 	imax = sblock.fs_ncg * sblock.fs_ipg;
110 	/*
111 	 * Check and potentially fix certain fields in the super block.
112 	 */
113 	if (sblock.fs_optim != FS_OPTTIME && sblock.fs_optim != FS_OPTSPACE) {
114 		pfatal("UNDEFINED OPTIMIZATION IN SUPERBLOCK");
115 		if (reply("SET TO DEFAULT") == 1) {
116 			sblock.fs_optim = FS_OPTTIME;
117 			sbdirty();
118 		}
119 	}
120 	if ((sblock.fs_minfree < 0 || sblock.fs_minfree > 99)) {
121 		pfatal("IMPOSSIBLE MINFREE=%d IN SUPERBLOCK",
122 			sblock.fs_minfree);
123 		if (reply("SET TO DEFAULT") == 1) {
124 			sblock.fs_minfree = 10;
125 			sbdirty();
126 		}
127 	}
128 	if (sblock.fs_interleave < 1) {
129 		pwarn("IMPOSSIBLE INTERLEAVE=%d IN SUPERBLOCK",
130 			sblock.fs_interleave);
131 		sblock.fs_interleave = 1;
132 		if (preen)
133 			printf(" (FIXED)\n");
134 		if (preen || reply("SET TO DEFAULT") == 1)
135 			sbdirty();
136 	}
137 	if (sblock.fs_npsect < sblock.fs_nsect) {
138 		pwarn("IMPOSSIBLE NPSECT=%d IN SUPERBLOCK",
139 			sblock.fs_npsect);
140 		sblock.fs_npsect = sblock.fs_nsect;
141 		if (preen)
142 			printf(" (FIXED)\n");
143 		if (preen || reply("SET TO DEFAULT") == 1)
144 			sbdirty();
145 	}
146 	/*
147 	 * read in the summary info.
148 	 */
149 	asked = 0;
150 	for (i = 0, j = 0; i < sblock.fs_cssize; i += sblock.fs_bsize, j++) {
151 		size = sblock.fs_cssize - i < sblock.fs_bsize ?
152 		    sblock.fs_cssize - i : sblock.fs_bsize;
153 		sblock.fs_csp[j] = (struct csum *)calloc(1, (unsigned)size);
154 		if (bread(&dfile, (char *)sblock.fs_csp[j],
155 		    fsbtodb(&sblock, sblock.fs_csaddr + j * sblock.fs_frag),
156 		    size) != 0 && !asked) {
157 			pfatal("BAD SUMMARY INFORMATION");
158 			if (reply("CONTINUE") == 0)
159 				errexit("");
160 			asked++;
161 		}
162 	}
163 	/*
164 	 * allocate and initialize the necessary maps
165 	 */
166 	bmapsz = roundup(howmany(fmax, NBBY), sizeof(short));
167 	blockmap = calloc((unsigned)bmapsz, sizeof (char));
168 	if (blockmap == NULL) {
169 		printf("cannot alloc %d bytes for blockmap\n", bmapsz);
170 		goto badsb;
171 	}
172 	statemap = calloc((unsigned)(imax + 1), sizeof(char));
173 	if (statemap == NULL) {
174 		printf("cannot alloc %d bytes for statemap\n", imax + 1);
175 		goto badsb;
176 	}
177 	lncntp = (short *)calloc((unsigned)(imax + 1), sizeof(short));
178 	if (lncntp == NULL) {
179 		printf("cannot alloc %d bytes for lncntp\n",
180 		    (imax + 1) * sizeof(short));
181 		goto badsb;
182 	}
183 
184 	return (1);
185 
186 badsb:
187 	ckfini();
188 	return (0);
189 }
190 
191 /*
192  * Read in the super block and its summary info.
193  */
194 readsb(listerr)
195 	int listerr;
196 {
197 	BUFAREA asblk;
198 #	define altsblock asblk.b_un.b_fs
199 	off_t sboff;
200 	daddr_t super = bflag ? bflag : SBOFF / dev_bsize;
201 
202 	initbarea(&asblk);
203 	if (bread(&dfile, (char *)&sblock, super, (long)SBSIZE) != 0)
204 		return (0);
205 	sblk.b_bno = super;
206 	sblk.b_size = SBSIZE;
207 	/*
208 	 * run a few consistency checks of the super block
209 	 */
210 	if (sblock.fs_magic != FS_MAGIC)
211 		{ badsb(listerr, "MAGIC NUMBER WRONG"); return (0); }
212 	if (sblock.fs_ncg < 1)
213 		{ badsb(listerr, "NCG OUT OF RANGE"); return (0); }
214 	if (sblock.fs_cpg < 1 || sblock.fs_cpg > MAXCPG)
215 		{ badsb(listerr, "CPG OUT OF RANGE"); return (0); }
216 	if (sblock.fs_ncg * sblock.fs_cpg < sblock.fs_ncyl ||
217 	    (sblock.fs_ncg - 1) * sblock.fs_cpg >= sblock.fs_ncyl)
218 		{ badsb(listerr, "NCYL LESS THAN NCG*CPG"); return (0); }
219 	if (sblock.fs_sbsize > SBSIZE)
220 		{ badsb(listerr, "SIZE PREPOSTEROUSLY LARGE"); return (0); }
221 	/*
222 	 * Compute block size that the filesystem is based on,
223 	 * according to fsbtodb, and adjust superblock block number
224 	 * so we can tell if this is an alternate later.
225 	 */
226 	if (sblock.fs_dbsize && secsize == 0)
227 		secsize = sblock.fs_dbsize;
228 	super *= dev_bsize;
229 	dev_bsize = sblock.fs_fsize / fsbtodb(&sblock, 1);
230 	sblk.b_bno = super / dev_bsize;
231 	/*
232 	 * Set all possible fields that could differ, then do check
233 	 * of whole super block against an alternate super block.
234 	 * When an alternate super-block is specified this check is skipped.
235 	 */
236 	if (bflag) {
237 		havesb = 1;
238 		return (1);
239 	}
240 	getblk(&asblk, cgsblock(&sblock, sblock.fs_ncg - 1), sblock.fs_sbsize);
241 	if (asblk.b_errs != NULL)
242 		return (0);
243 	altsblock.fs_fsbtodb = sblock.fs_fsbtodb;
244 	altsblock.fs_dbsize = sblock.fs_dbsize;
245 	altsblock.fs_link = sblock.fs_link;
246 	altsblock.fs_rlink = sblock.fs_rlink;
247 	altsblock.fs_time = sblock.fs_time;
248 	altsblock.fs_cstotal = sblock.fs_cstotal;
249 	altsblock.fs_cgrotor = sblock.fs_cgrotor;
250 	altsblock.fs_fmod = sblock.fs_fmod;
251 	altsblock.fs_clean = sblock.fs_clean;
252 	altsblock.fs_ronly = sblock.fs_ronly;
253 	altsblock.fs_flags = sblock.fs_flags;
254 	altsblock.fs_maxcontig = sblock.fs_maxcontig;
255 	altsblock.fs_minfree = sblock.fs_minfree;
256 	altsblock.fs_optim = sblock.fs_optim;
257 	altsblock.fs_rotdelay = sblock.fs_rotdelay;
258 	altsblock.fs_maxbpg = sblock.fs_maxbpg;
259 	altsblock.fs_npsect = sblock.fs_npsect;
260 	altsblock.fs_interleave = sblock.fs_interleave;
261 	bcopy((char *)sblock.fs_csp, (char *)altsblock.fs_csp,
262 		sizeof sblock.fs_csp);
263 	bcopy((char *)sblock.fs_fsmnt, (char *)altsblock.fs_fsmnt,
264 		sizeof sblock.fs_fsmnt);
265 	bcopy((char *)sblock.fs_sparecon, (char *)altsblock.fs_sparecon,
266 		sizeof sblock.fs_sparecon);
267 	if (bcmp((char *)&sblock, (char *)&altsblock, (int)sblock.fs_sbsize)) {
268 		badsb(listerr,
269 		"VALUES IN SUPER BLOCK DISAGREE WITH THOSE IN FIRST ALTERNATE");
270 		return (0);
271 	}
272 	havesb = 1;
273 	return (1);
274 #	undef altsblock
275 }
276 
277 badsb(listerr, s)
278 	int listerr;
279 	char *s;
280 {
281 
282 	if (!listerr)
283 		return;
284 	if (preen)
285 		printf("%s: ", devname);
286 	pfatal("BAD SUPER BLOCK: %s\n", s);
287 }
288 
289 /*
290  * Calculate a prototype superblock based on information in the disk label.
291  * When done the cgsblock macro can be calculated and the fs_ncg field
292  * can be used. Do NOT attempt to use other macros without verifying that
293  * their needed information is available!
294  */
295 calcsb(dev, devfd, fs)
296 	char *dev;
297 	int devfd;
298 	register struct fs *fs;
299 {
300 	register struct disklabel *lp;
301 	register struct partition *pp;
302 	register char *cp;
303 	int i;
304 	struct disklabel *getdisklabel();
305 
306 	cp = index(dev, '\0') - 1;
307 	if (cp == (char *)-1 || (*cp < 'a' || *cp > 'h') && !isdigit(*cp)) {
308 		pfatal("%s: CANNOT FIGURE OUT FILE SYSTEM PARTITION\n", dev);
309 		return (0);
310 	}
311 	lp = getdisklabel(dev, devfd);
312 	if (isdigit(*cp))
313 		pp = &lp->d_partitions[0];
314 	else
315 		pp = &lp->d_partitions[*cp - 'a'];
316 	if (pp->p_fstype != FS_BSDFFS) {
317 		pfatal("%s: NOT LABELED AS A BSD FILE SYSTEM (%s)\n",
318 			dev, pp->p_fstype < FSMAXTYPES ?
319 			fstypenames[pp->p_fstype] : "unknown");
320 		return (0);
321 	}
322 	bzero(fs, sizeof(struct fs));
323 	fs->fs_fsize = pp->p_fsize;
324 	fs->fs_frag = pp->p_frag;
325 	fs->fs_cpg = pp->p_cpg;
326 	fs->fs_size = pp->p_size;
327 	fs->fs_ntrak = lp->d_ntracks;
328 	fs->fs_nsect = lp->d_nsectors;
329 	fs->fs_spc = lp->d_secpercyl;
330 	fs->fs_nspf = fs->fs_fsize / lp->d_secsize;
331 	fs->fs_sblkno = roundup(
332 		howmany(lp->d_bbsize + lp->d_sbsize, fs->fs_fsize),
333 		fs->fs_frag);
334 	fs->fs_cgmask = 0xffffffff;
335 	for (i = fs->fs_ntrak; i > 1; i >>= 1)
336 		fs->fs_cgmask <<= 1;
337 	if (!POWEROF2(fs->fs_ntrak))
338 		fs->fs_cgmask <<= 1;
339 	fs->fs_cgoffset = roundup(
340 		howmany(fs->fs_nsect, NSPF(fs)), fs->fs_frag);
341 	fs->fs_fpg = (fs->fs_cpg * fs->fs_spc) / NSPF(fs);
342 	fs->fs_ncg = howmany(fs->fs_size / fs->fs_spc, fs->fs_cpg);
343 	for (fs->fs_fsbtodb = 0, i = NSPF(fs); i > 1; i >>= 1)
344 		fs->fs_fsbtodb++;
345 	dev_bsize = lp->d_secsize;
346 	return (1);
347 }
348 
349 struct disklabel *
350 getdisklabel(s, fd)
351 	char *s;
352 	int	fd;
353 {
354 	static struct disklabel lab;
355 
356 	if (ioctl(fd, DIOCGDINFO, (char *)&lab) < 0) {
357 		if (s == NULL)
358 			return ((struct disklabel *)NULL);
359 		pwarn("");
360 		perror("ioctl (GDINFO)");
361 		errexit("%s: can't read disk label", s);
362 	}
363 	return (&lab);
364 }
365