xref: /freebsd/sbin/fsck_ffs/fsutil.c (revision 33f12199250a09b573f7a518b523fdac3f120b8f)
1 /*
2  * Copyright (c) 1980, 1986, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 4. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #if 0
31 #ifndef lint
32 static const char sccsid[] = "@(#)utilities.c	8.6 (Berkeley) 5/19/95";
33 #endif /* not lint */
34 #endif
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
37 
38 #include <sys/param.h>
39 #include <sys/time.h>
40 #include <sys/types.h>
41 #include <sys/sysctl.h>
42 #include <sys/disklabel.h>
43 #include <sys/stat.h>
44 #include <sys/disklabel.h>
45 
46 #include <ufs/ufs/dinode.h>
47 #include <ufs/ufs/dir.h>
48 #include <ufs/ffs/fs.h>
49 
50 #include <err.h>
51 #include <errno.h>
52 #include <string.h>
53 #include <ctype.h>
54 #include <fstab.h>
55 #include <stdint.h>
56 #include <stdio.h>
57 #include <stdlib.h>
58 #include <unistd.h>
59 
60 #include "fsck.h"
61 
62 static void slowio_start(void);
63 static void slowio_end(void);
64 
65 long	diskreads, totalreads;	/* Disk cache statistics */
66 struct timeval slowio_starttime;
67 int slowio_delay_usec = 10000;	/* Initial IO delay for background fsck */
68 int slowio_pollcnt;
69 
70 int
71 ftypeok(union dinode *dp)
72 {
73 	switch (DIP(dp, di_mode) & IFMT) {
74 
75 	case IFDIR:
76 	case IFREG:
77 	case IFBLK:
78 	case IFCHR:
79 	case IFLNK:
80 	case IFSOCK:
81 	case IFIFO:
82 		return (1);
83 
84 	default:
85 		if (debug)
86 			printf("bad file type 0%o\n", DIP(dp, di_mode));
87 		return (0);
88 	}
89 }
90 
91 int
92 reply(const char *question)
93 {
94 	int persevere;
95 	char c;
96 
97 	if (preen)
98 		pfatal("INTERNAL ERROR: GOT TO reply()");
99 	persevere = !strcmp(question, "CONTINUE");
100 	printf("\n");
101 	if (!persevere && (nflag || (fswritefd < 0 && bkgrdflag == 0))) {
102 		printf("%s? no\n\n", question);
103 		resolved = 0;
104 		return (0);
105 	}
106 	if (yflag || (persevere && nflag)) {
107 		printf("%s? yes\n\n", question);
108 		return (1);
109 	}
110 	do	{
111 		printf("%s? [yn] ", question);
112 		(void) fflush(stdout);
113 		c = getc(stdin);
114 		while (c != '\n' && getc(stdin) != '\n') {
115 			if (feof(stdin)) {
116 				resolved = 0;
117 				return (0);
118 			}
119 		}
120 	} while (c != 'y' && c != 'Y' && c != 'n' && c != 'N');
121 	printf("\n");
122 	if (c == 'y' || c == 'Y')
123 		return (1);
124 	resolved = 0;
125 	return (0);
126 }
127 
128 /*
129  * Look up state information for an inode.
130  */
131 struct inostat *
132 inoinfo(ino_t inum)
133 {
134 	static struct inostat unallocated = { USTATE, 0, 0 };
135 	struct inostatlist *ilp;
136 	int iloff;
137 
138 	if (inum > maxino)
139 		errx(EEXIT, "inoinfo: inumber %d out of range", inum);
140 	ilp = &inostathead[inum / sblock.fs_ipg];
141 	iloff = inum % sblock.fs_ipg;
142 	if (iloff >= ilp->il_numalloced)
143 		return (&unallocated);
144 	return (&ilp->il_stat[iloff]);
145 }
146 
147 /*
148  * Malloc buffers and set up cache.
149  */
150 void
151 bufinit(void)
152 {
153 	struct bufarea *bp;
154 	long bufcnt, i;
155 	char *bufp;
156 
157 	pbp = pdirbp = (struct bufarea *)0;
158 	bufp = malloc((unsigned int)sblock.fs_bsize);
159 	if (bufp == 0)
160 		errx(EEXIT, "cannot allocate buffer pool");
161 	cgblk.b_un.b_buf = bufp;
162 	initbarea(&cgblk);
163 	bufhead.b_next = bufhead.b_prev = &bufhead;
164 	bufcnt = MAXBUFSPACE / sblock.fs_bsize;
165 	if (bufcnt < MINBUFS)
166 		bufcnt = MINBUFS;
167 	for (i = 0; i < bufcnt; i++) {
168 		bp = (struct bufarea *)malloc(sizeof(struct bufarea));
169 		bufp = malloc((unsigned int)sblock.fs_bsize);
170 		if (bp == NULL || bufp == NULL) {
171 			if (i >= MINBUFS)
172 				break;
173 			errx(EEXIT, "cannot allocate buffer pool");
174 		}
175 		bp->b_un.b_buf = bufp;
176 		bp->b_prev = &bufhead;
177 		bp->b_next = bufhead.b_next;
178 		bufhead.b_next->b_prev = bp;
179 		bufhead.b_next = bp;
180 		initbarea(bp);
181 	}
182 	bufhead.b_size = i;	/* save number of buffers */
183 }
184 
185 /*
186  * Manage a cache of directory blocks.
187  */
188 struct bufarea *
189 getdatablk(ufs2_daddr_t blkno, long size)
190 {
191 	struct bufarea *bp;
192 
193 	for (bp = bufhead.b_next; bp != &bufhead; bp = bp->b_next)
194 		if (bp->b_bno == fsbtodb(&sblock, blkno))
195 			goto foundit;
196 	for (bp = bufhead.b_prev; bp != &bufhead; bp = bp->b_prev)
197 		if ((bp->b_flags & B_INUSE) == 0)
198 			break;
199 	if (bp == &bufhead)
200 		errx(EEXIT, "deadlocked buffer pool");
201 	getblk(bp, blkno, size);
202 	/* fall through */
203 foundit:
204 	bp->b_prev->b_next = bp->b_next;
205 	bp->b_next->b_prev = bp->b_prev;
206 	bp->b_prev = &bufhead;
207 	bp->b_next = bufhead.b_next;
208 	bufhead.b_next->b_prev = bp;
209 	bufhead.b_next = bp;
210 	bp->b_flags |= B_INUSE;
211 	return (bp);
212 }
213 
214 void
215 getblk(struct bufarea *bp, ufs2_daddr_t blk, long size)
216 {
217 	ufs2_daddr_t dblk;
218 
219 	totalreads++;
220 	dblk = fsbtodb(&sblock, blk);
221 	if (bp->b_bno != dblk) {
222 		flush(fswritefd, bp);
223 		diskreads++;
224 		bp->b_errs = blread(fsreadfd, bp->b_un.b_buf, dblk, size);
225 		bp->b_bno = dblk;
226 		bp->b_size = size;
227 	}
228 }
229 
230 void
231 flush(int fd, struct bufarea *bp)
232 {
233 	int i, j;
234 
235 	if (!bp->b_dirty)
236 		return;
237 	bp->b_dirty = 0;
238 	if (fswritefd < 0) {
239 		pfatal("WRITING IN READ_ONLY MODE.\n");
240 		return;
241 	}
242 	if (bp->b_errs != 0)
243 		pfatal("WRITING %sZERO'ED BLOCK %lld TO DISK\n",
244 		    (bp->b_errs == bp->b_size / dev_bsize) ? "" : "PARTIALLY ",
245 		    (long long)bp->b_bno);
246 	bp->b_errs = 0;
247 	blwrite(fd, bp->b_un.b_buf, bp->b_bno, (long)bp->b_size);
248 	if (bp != &sblk)
249 		return;
250 	for (i = 0, j = 0; i < sblock.fs_cssize; i += sblock.fs_bsize, j++) {
251 		blwrite(fswritefd, (char *)sblock.fs_csp + i,
252 		    fsbtodb(&sblock, sblock.fs_csaddr + j * sblock.fs_frag),
253 		    sblock.fs_cssize - i < sblock.fs_bsize ?
254 		    sblock.fs_cssize - i : sblock.fs_bsize);
255 	}
256 }
257 
258 void
259 rwerror(const char *mesg, ufs2_daddr_t blk)
260 {
261 
262 	if (bkgrdcheck)
263 		exit(EEXIT);
264 	if (preen == 0)
265 		printf("\n");
266 	pfatal("CANNOT %s: %ld", mesg, (long)blk);
267 	if (reply("CONTINUE") == 0)
268 		exit(EEXIT);
269 }
270 
271 void
272 ckfini(int markclean)
273 {
274 	struct bufarea *bp, *nbp;
275 	int ofsmodified, cnt = 0;
276 
277 	if (bkgrdflag) {
278 		unlink(snapname);
279 		if ((!(sblock.fs_flags & FS_UNCLEAN)) != markclean) {
280 			cmd.value = FS_UNCLEAN;
281 			cmd.size = markclean ? -1 : 1;
282 			if (sysctlbyname("vfs.ffs.setflags", 0, 0,
283 			    &cmd, sizeof cmd) == -1)
284 				rwerror("SET FILE SYSTEM FLAGS", FS_UNCLEAN);
285 			if (!preen) {
286 				printf("\n***** FILE SYSTEM MARKED %s *****\n",
287 				    markclean ? "CLEAN" : "DIRTY");
288 				if (!markclean)
289 					rerun = 1;
290 			}
291 		} else if (!preen && !markclean) {
292 			printf("\n***** FILE SYSTEM STILL DIRTY *****\n");
293 			rerun = 1;
294 		}
295 	}
296 	if (fswritefd < 0) {
297 		(void)close(fsreadfd);
298 		return;
299 	}
300 	flush(fswritefd, &sblk);
301 	if (havesb && cursnapshot == 0 && sblock.fs_magic == FS_UFS2_MAGIC &&
302 	    sblk.b_bno != sblock.fs_sblockloc / dev_bsize &&
303 	    !preen && reply("UPDATE STANDARD SUPERBLOCK")) {
304 		sblk.b_bno = sblock.fs_sblockloc / dev_bsize;
305 		sbdirty();
306 		flush(fswritefd, &sblk);
307 	}
308 	flush(fswritefd, &cgblk);
309 	free(cgblk.b_un.b_buf);
310 	for (bp = bufhead.b_prev; bp && bp != &bufhead; bp = nbp) {
311 		cnt++;
312 		flush(fswritefd, bp);
313 		nbp = bp->b_prev;
314 		free(bp->b_un.b_buf);
315 		free((char *)bp);
316 	}
317 	if (bufhead.b_size != cnt)
318 		errx(EEXIT, "panic: lost %d buffers", bufhead.b_size - cnt);
319 	pbp = pdirbp = (struct bufarea *)0;
320 	if (cursnapshot == 0 && sblock.fs_clean != markclean) {
321 		if ((sblock.fs_clean = markclean) != 0) {
322 			sblock.fs_flags &= ~(FS_UNCLEAN | FS_NEEDSFSCK);
323 			sblock.fs_pendingblocks = 0;
324 			sblock.fs_pendinginodes = 0;
325 		}
326 		sbdirty();
327 		ofsmodified = fsmodified;
328 		flush(fswritefd, &sblk);
329 		fsmodified = ofsmodified;
330 		if (!preen) {
331 			printf("\n***** FILE SYSTEM MARKED %s *****\n",
332 			    markclean ? "CLEAN" : "DIRTY");
333 			if (!markclean)
334 				rerun = 1;
335 		}
336 	} else if (!preen && !markclean) {
337 		printf("\n***** FILE SYSTEM STILL DIRTY *****\n");
338 		rerun = 1;
339 	}
340 	if (debug && totalreads > 0)
341 		printf("cache missed %ld of %ld (%d%%)\n", diskreads,
342 		    totalreads, (int)(diskreads * 100 / totalreads));
343 	(void)close(fsreadfd);
344 	(void)close(fswritefd);
345 }
346 
347 int
348 blread(int fd, char *buf, ufs2_daddr_t blk, long size)
349 {
350 	char *cp;
351 	int i, errs;
352 	off_t offset;
353 
354 	offset = blk;
355 	offset *= dev_bsize;
356 	if (bkgrdflag)
357 		slowio_start();
358 	if (lseek(fd, offset, 0) < 0)
359 		rwerror("SEEK BLK", blk);
360 	else if (read(fd, buf, (int)size) == size) {
361 		if (bkgrdflag)
362 			slowio_end();
363 		return (0);
364 	}
365 	rwerror("READ BLK", blk);
366 	if (lseek(fd, offset, 0) < 0)
367 		rwerror("SEEK BLK", blk);
368 	errs = 0;
369 	memset(buf, 0, (size_t)size);
370 	printf("THE FOLLOWING DISK SECTORS COULD NOT BE READ:");
371 	for (cp = buf, i = 0; i < size; i += secsize, cp += secsize) {
372 		if (read(fd, cp, (int)secsize) != secsize) {
373 			(void)lseek(fd, offset + i + secsize, 0);
374 			if (secsize != dev_bsize && dev_bsize != 1)
375 				printf(" %jd (%jd),",
376 				    (intmax_t)(blk * dev_bsize + i) / secsize,
377 				    (intmax_t)blk + i / dev_bsize);
378 			else
379 				printf(" %jd,", (intmax_t)blk + i / dev_bsize);
380 			errs++;
381 		}
382 	}
383 	printf("\n");
384 	if (errs)
385 		resolved = 0;
386 	return (errs);
387 }
388 
389 void
390 blwrite(int fd, char *buf, ufs2_daddr_t blk, long size)
391 {
392 	int i;
393 	char *cp;
394 	off_t offset;
395 
396 	if (fd < 0)
397 		return;
398 	offset = blk;
399 	offset *= dev_bsize;
400 	if (lseek(fd, offset, 0) < 0)
401 		rwerror("SEEK BLK", blk);
402 	else if (write(fd, buf, (int)size) == size) {
403 		fsmodified = 1;
404 		return;
405 	}
406 	resolved = 0;
407 	rwerror("WRITE BLK", blk);
408 	if (lseek(fd, offset, 0) < 0)
409 		rwerror("SEEK BLK", blk);
410 	printf("THE FOLLOWING SECTORS COULD NOT BE WRITTEN:");
411 	for (cp = buf, i = 0; i < size; i += dev_bsize, cp += dev_bsize)
412 		if (write(fd, cp, (int)dev_bsize) != dev_bsize) {
413 			(void)lseek(fd, offset + i + dev_bsize, 0);
414 			printf(" %jd,", (intmax_t)blk + i / dev_bsize);
415 		}
416 	printf("\n");
417 	return;
418 }
419 
420 /*
421  * Check cg's magic number.  If catastrophic mode is enabled and the cg's
422  * magic number is bad, offer an option to clear the whole cg.
423  */
424 void
425 check_cgmagic(int cg, struct cg *cgp)
426 {
427 
428 	if (!cg_chkmagic(cgp)) {
429 	    pwarn("CG %d: BAD MAGIC NUMBER\n", cg);
430 	    if (catastrophicflag) {
431 		if (reply("CLEAR CG")) {
432 			memset(cgp, 0, (size_t)sblock.fs_cgsize);
433 			cgp->cg_initediblk = sblock.fs_ipg;
434 			cgp->cg_old_niblk = sblock.fs_ipg;
435 			cgp->cg_old_ncyl = sblock.fs_old_cpg;
436 			cgp->cg_cgx = cg;
437 			cgp->cg_niblk = sblock.fs_ipg;
438 			cgp->cg_ndblk = sblock.fs_size - cgbase(&sblock, cg);
439 			cgp->cg_magic = CG_MAGIC;
440 			cgdirty();
441 			printf("PLEASE RERUN FSCK.\n");
442 			rerun = 1;
443 		}
444 	    } else
445 		printf("YOU MAY NEED TO RERUN FSCK WITH -C IF IT CRASHED.\n");
446 	}
447 }
448 
449 /*
450  * allocate a data block with the specified number of fragments
451  */
452 ufs2_daddr_t
453 allocblk(long frags)
454 {
455 	int i, j, k, cg, baseblk;
456 	struct cg *cgp = &cgrp;
457 
458 	if (frags <= 0 || frags > sblock.fs_frag)
459 		return (0);
460 	for (i = 0; i < maxfsblock - sblock.fs_frag; i += sblock.fs_frag) {
461 		for (j = 0; j <= sblock.fs_frag - frags; j++) {
462 			if (testbmap(i + j))
463 				continue;
464 			for (k = 1; k < frags; k++)
465 				if (testbmap(i + j + k))
466 					break;
467 			if (k < frags) {
468 				j += k;
469 				continue;
470 			}
471 			cg = dtog(&sblock, i + j);
472 			getblk(&cgblk, cgtod(&sblock, cg), sblock.fs_cgsize);
473 			check_cgmagic(cg, cgp);
474 			baseblk = dtogd(&sblock, i + j);
475 			for (k = 0; k < frags; k++) {
476 				setbmap(i + j + k);
477 				clrbit(cg_blksfree(cgp), baseblk + k);
478 			}
479 			n_blks += frags;
480 			if (frags == sblock.fs_frag)
481 				cgp->cg_cs.cs_nbfree--;
482 			else
483 				cgp->cg_cs.cs_nffree -= frags;
484 			cgdirty();
485 			return (i + j);
486 		}
487 	}
488 	return (0);
489 }
490 
491 /*
492  * Free a previously allocated block
493  */
494 void
495 freeblk(ufs2_daddr_t blkno, long frags)
496 {
497 	struct inodesc idesc;
498 
499 	idesc.id_blkno = blkno;
500 	idesc.id_numfrags = frags;
501 	(void)pass4check(&idesc);
502 }
503 
504 /* Slow down IO so as to leave some disk bandwidth for other processes */
505 void
506 slowio_start()
507 {
508 
509 	/* Delay one in every 8 operations */
510 	slowio_pollcnt = (slowio_pollcnt + 1) & 7;
511 	if (slowio_pollcnt == 0) {
512 		gettimeofday(&slowio_starttime, NULL);
513 	}
514 }
515 
516 void
517 slowio_end()
518 {
519 	struct timeval tv;
520 	int delay_usec;
521 
522 	if (slowio_pollcnt != 0)
523 		return;
524 
525 	/* Update the slowdown interval. */
526 	gettimeofday(&tv, NULL);
527 	delay_usec = (tv.tv_sec - slowio_starttime.tv_sec) * 1000000 +
528 	    (tv.tv_usec - slowio_starttime.tv_usec);
529 	if (delay_usec < 64)
530 		delay_usec = 64;
531 	if (delay_usec > 2500000)
532 		delay_usec = 2500000;
533 	slowio_delay_usec = (slowio_delay_usec * 63 + delay_usec) >> 6;
534 	/* delay by 8 times the average IO delay */
535 	if (slowio_delay_usec > 64)
536 		usleep(slowio_delay_usec * 8);
537 }
538 
539 /*
540  * Find a pathname
541  */
542 void
543 getpathname(char *namebuf, ino_t curdir, ino_t ino)
544 {
545 	int len;
546 	char *cp;
547 	struct inodesc idesc;
548 	static int busy = 0;
549 
550 	if (curdir == ino && ino == ROOTINO) {
551 		(void)strcpy(namebuf, "/");
552 		return;
553 	}
554 	if (busy || !INO_IS_DVALID(curdir)) {
555 		(void)strcpy(namebuf, "?");
556 		return;
557 	}
558 	busy = 1;
559 	memset(&idesc, 0, sizeof(struct inodesc));
560 	idesc.id_type = DATA;
561 	idesc.id_fix = IGNORE;
562 	cp = &namebuf[MAXPATHLEN - 1];
563 	*cp = '\0';
564 	if (curdir != ino) {
565 		idesc.id_parent = curdir;
566 		goto namelookup;
567 	}
568 	while (ino != ROOTINO) {
569 		idesc.id_number = ino;
570 		idesc.id_func = findino;
571 		idesc.id_name = strdup("..");
572 		if ((ckinode(ginode(ino), &idesc) & FOUND) == 0)
573 			break;
574 	namelookup:
575 		idesc.id_number = idesc.id_parent;
576 		idesc.id_parent = ino;
577 		idesc.id_func = findname;
578 		idesc.id_name = namebuf;
579 		if ((ckinode(ginode(idesc.id_number), &idesc)&FOUND) == 0)
580 			break;
581 		len = strlen(namebuf);
582 		cp -= len;
583 		memmove(cp, namebuf, (size_t)len);
584 		*--cp = '/';
585 		if (cp < &namebuf[MAXNAMLEN])
586 			break;
587 		ino = idesc.id_number;
588 	}
589 	busy = 0;
590 	if (ino != ROOTINO)
591 		*--cp = '?';
592 	memmove(namebuf, cp, (size_t)(&namebuf[MAXPATHLEN] - cp));
593 }
594 
595 void
596 catch(int sig __unused)
597 {
598 
599 	ckfini(0);
600 	exit(12);
601 }
602 
603 /*
604  * When preening, allow a single quit to signal
605  * a special exit after file system checks complete
606  * so that reboot sequence may be interrupted.
607  */
608 void
609 catchquit(int sig __unused)
610 {
611 	printf("returning to single-user after file system check\n");
612 	returntosingle = 1;
613 	(void)signal(SIGQUIT, SIG_DFL);
614 }
615 
616 /*
617  * determine whether an inode should be fixed.
618  */
619 int
620 dofix(struct inodesc *idesc, const char *msg)
621 {
622 
623 	switch (idesc->id_fix) {
624 
625 	case DONTKNOW:
626 		if (idesc->id_type == DATA)
627 			direrror(idesc->id_number, msg);
628 		else
629 			pwarn("%s", msg);
630 		if (preen) {
631 			printf(" (SALVAGED)\n");
632 			idesc->id_fix = FIX;
633 			return (ALTERED);
634 		}
635 		if (reply("SALVAGE") == 0) {
636 			idesc->id_fix = NOFIX;
637 			return (0);
638 		}
639 		idesc->id_fix = FIX;
640 		return (ALTERED);
641 
642 	case FIX:
643 		return (ALTERED);
644 
645 	case NOFIX:
646 	case IGNORE:
647 		return (0);
648 
649 	default:
650 		errx(EEXIT, "UNKNOWN INODESC FIX MODE %d", idesc->id_fix);
651 	}
652 	/* NOTREACHED */
653 	return (0);
654 }
655 
656 #include <stdarg.h>
657 
658 /*
659  * An unexpected inconsistency occured.
660  * Die if preening or file system is running with soft dependency protocol,
661  * otherwise just print message and continue.
662  */
663 void
664 pfatal(const char *fmt, ...)
665 {
666 	va_list ap;
667 	va_start(ap, fmt);
668 	if (!preen) {
669 		(void)vfprintf(stdout, fmt, ap);
670 		va_end(ap);
671 		if (usedsoftdep)
672 			(void)fprintf(stdout,
673 			    "\nUNEXPECTED SOFT UPDATE INCONSISTENCY\n");
674 		/*
675 		 * Force foreground fsck to clean up inconsistency.
676 		 */
677 		if (bkgrdflag) {
678 			cmd.value = FS_NEEDSFSCK;
679 			cmd.size = 1;
680 			if (sysctlbyname("vfs.ffs.setflags", 0, 0,
681 			    &cmd, sizeof cmd) == -1)
682 				pwarn("CANNOT SET FS_NEEDSFSCK FLAG\n");
683 			fprintf(stdout, "CANNOT RUN IN BACKGROUND\n");
684 			ckfini(0);
685 			exit(EEXIT);
686 		}
687 		return;
688 	}
689 	if (cdevname == NULL)
690 		cdevname = strdup("fsck");
691 	(void)fprintf(stdout, "%s: ", cdevname);
692 	(void)vfprintf(stdout, fmt, ap);
693 	(void)fprintf(stdout,
694 	    "\n%s: UNEXPECTED%sINCONSISTENCY; RUN fsck MANUALLY.\n",
695 	    cdevname, usedsoftdep ? " SOFT UPDATE " : " ");
696 	/*
697 	 * Force foreground fsck to clean up inconsistency.
698 	 */
699 	if (bkgrdflag) {
700 		cmd.value = FS_NEEDSFSCK;
701 		cmd.size = 1;
702 		if (sysctlbyname("vfs.ffs.setflags", 0, 0,
703 		    &cmd, sizeof cmd) == -1)
704 			pwarn("CANNOT SET FS_NEEDSFSCK FLAG\n");
705 	}
706 	ckfini(0);
707 	exit(EEXIT);
708 }
709 
710 /*
711  * Pwarn just prints a message when not preening or running soft dependency
712  * protocol, or a warning (preceded by filename) when preening.
713  */
714 void
715 pwarn(const char *fmt, ...)
716 {
717 	va_list ap;
718 	va_start(ap, fmt);
719 	if (preen)
720 		(void)fprintf(stdout, "%s: ", cdevname);
721 	(void)vfprintf(stdout, fmt, ap);
722 	va_end(ap);
723 }
724 
725 /*
726  * Stub for routines from kernel.
727  */
728 void
729 panic(const char *fmt, ...)
730 {
731 	va_list ap;
732 	va_start(ap, fmt);
733 	pfatal("INTERNAL INCONSISTENCY:");
734 	(void)vfprintf(stdout, fmt, ap);
735 	va_end(ap);
736 	exit(EEXIT);
737 }
738