Home | History | Annotate | Line # | Download | only in fsck_ext2fs
inode.c revision 1.29
      1 /*	$NetBSD: inode.c,v 1.29 2009/04/06 12:50:36 lukem 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 /*
     33  * Copyright (c) 1997 Manuel Bouyer.
     34  *
     35  * Redistribution and use in source and binary forms, with or without
     36  * modification, are permitted provided that the following conditions
     37  * are met:
     38  * 1. Redistributions of source code must retain the above copyright
     39  *    notice, this list of conditions and the following disclaimer.
     40  * 2. Redistributions in binary form must reproduce the above copyright
     41  *    notice, this list of conditions and the following disclaimer in the
     42  *    documentation and/or other materials provided with the distribution.
     43  * 3. All advertising materials mentioning features or use of this software
     44  *    must display the following acknowledgement:
     45  *	This product includes software developed by Manuel Bouyer.
     46  * 4. The name of the author may not be used to endorse or promote products
     47  *    derived from this software without specific prior written permission.
     48  *
     49  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     50  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     51  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     52  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     53  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     54  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     55  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     56  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     57  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     58  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     59  */
     60 
     61 #include <sys/cdefs.h>
     62 #ifndef lint
     63 #if 0
     64 static char sccsid[] = "@(#)inode.c	8.5 (Berkeley) 2/8/95";
     65 #else
     66 __RCSID("$NetBSD: inode.c,v 1.29 2009/04/06 12:50:36 lukem Exp $");
     67 #endif
     68 #endif /* not lint */
     69 
     70 #include <sys/param.h>
     71 #include <sys/time.h>
     72 #include <ufs/ext2fs/ext2fs_dinode.h>
     73 #include <ufs/ext2fs/ext2fs_dir.h>
     74 #include <ufs/ext2fs/ext2fs.h>
     75 
     76 #include <ufs/ufs/dinode.h> /* for IFMT & friends */
     77 #ifndef SMALL
     78 #include <pwd.h>
     79 #endif
     80 #include <stdio.h>
     81 #include <stdlib.h>
     82 #include <string.h>
     83 #include <time.h>
     84 
     85 #include "fsck.h"
     86 #include "fsutil.h"
     87 #include "extern.h"
     88 
     89 /*
     90  * CG is stored in fs byte order in memory, so we can't use ino_to_fsba
     91  * here.
     92  */
     93 
     94 #define fsck_ino_to_fsba(fs, x)                      \
     95 	(fs2h32((fs)->e2fs_gd[ino_to_cg(fs, x)].ext2bgd_i_tables) + \
     96 	(((x)-1) % (fs)->e2fs.e2fs_ipg)/(fs)->e2fs_ipb)
     97 
     98 
     99 static ino_t startinum;
    100 
    101 static int iblock(struct inodesc *, long, u_int64_t);
    102 
    103 static int setlarge(void);
    104 
    105 static int
    106 setlarge(void)
    107 {
    108 	if (sblock.e2fs.e2fs_rev < E2FS_REV1) {
    109 		pfatal("LARGE FILES UNSUPPORTED ON REVISION 0 FILESYSTEMS");
    110 		return 0;
    111 	}
    112 	if (!(sblock.e2fs.e2fs_features_rocompat & EXT2F_ROCOMPAT_LARGEFILE)) {
    113 		if (preen)
    114 			pwarn("SETTING LARGE FILE INDICATOR\n");
    115 		else if (!reply("SET LARGE FILE INDICATOR"))
    116 			return 0;
    117 		sblock.e2fs.e2fs_features_rocompat |= EXT2F_ROCOMPAT_LARGEFILE;
    118 		sbdirty();
    119 	}
    120 	return 1;
    121 }
    122 
    123 u_int64_t
    124 inosize(struct ext2fs_dinode *dp)
    125 {
    126 	u_int64_t size = fs2h32(dp->e2di_size);
    127 
    128 	if ((fs2h16(dp->e2di_mode) & IFMT) == IFREG)
    129 		size |= (u_int64_t)fs2h32(dp->e2di_dacl) << 32;
    130 	if (size > INT32_MAX)
    131 		(void)setlarge();
    132 	return size;
    133 }
    134 
    135 void
    136 inossize(struct ext2fs_dinode *dp, u_int64_t size)
    137 {
    138 	if ((fs2h16(dp->e2di_mode) & IFMT) == IFREG) {
    139 		dp->e2di_dacl = h2fs32(size >> 32);
    140 		if (size > INT32_MAX)
    141 			if (!setlarge())
    142 				return;
    143 	} else if (size > INT32_MAX) {
    144 		pfatal("TRYING TO SET FILESIZE TO %llu ON MODE %x FILE\n",
    145 		    (unsigned long long)size, fs2h16(dp->e2di_mode) & IFMT);
    146 		return;
    147 	}
    148 	dp->e2di_size = h2fs32(size);
    149 }
    150 
    151 int
    152 ckinode(struct ext2fs_dinode *dp, struct inodesc *idesc)
    153 {
    154 	u_int32_t *ap;
    155 	long ret, n, ndb;
    156 	struct ext2fs_dinode dino;
    157 	u_int64_t remsize, sizepb;
    158 	mode_t mode;
    159 	char pathbuf[MAXPATHLEN + 1];
    160 
    161 	if (idesc->id_fix != IGNORE)
    162 		idesc->id_fix = DONTKNOW;
    163 	idesc->id_entryno = 0;
    164 	idesc->id_filesize = inosize(dp);
    165 	mode = fs2h16(dp->e2di_mode) & IFMT;
    166 	if (mode == IFBLK || mode == IFCHR || mode == IFIFO ||
    167 	    (mode == IFLNK && (inosize(dp) < EXT2_MAXSYMLINKLEN)))
    168 		return (KEEPON);
    169 	dino = *dp;
    170 	ndb = howmany(inosize(&dino), sblock.e2fs_bsize);
    171 	for (ap = &dino.e2di_blocks[0]; ap < &dino.e2di_blocks[NDADDR];
    172 	    ap++,ndb--) {
    173 		idesc->id_numfrags = 1;
    174 		if (*ap == 0) {
    175 			if (idesc->id_type == DATA && ndb > 0) {
    176 				/* An empty block in a directory XXX */
    177 				getpathname(pathbuf, sizeof(pathbuf),
    178 				    idesc->id_number, idesc->id_number);
    179 				pfatal("DIRECTORY %s: CONTAINS EMPTY BLOCKS",
    180 				    pathbuf);
    181 				if (reply("ADJUST LENGTH") == 1) {
    182 					dp = ginode(idesc->id_number);
    183 					inossize(dp,
    184 					    (ap - &dino.e2di_blocks[0]) *
    185 					    sblock.e2fs_bsize);
    186 					printf(
    187 					    "YOU MUST RERUN FSCK AFTERWARDS\n");
    188 					rerun = 1;
    189 					inodirty();
    190 				}
    191 			}
    192 			continue;
    193 		}
    194 		idesc->id_blkno = fs2h32(*ap);
    195 		if (idesc->id_type == ADDR)
    196 			ret = (*idesc->id_func)(idesc);
    197 		else
    198 			ret = dirscan(idesc);
    199 		if (ret & STOP)
    200 			return (ret);
    201 	}
    202 	idesc->id_numfrags = 1;
    203 	remsize = inosize(&dino) - sblock.e2fs_bsize * NDADDR;
    204 	sizepb = sblock.e2fs_bsize;
    205 	for (ap = &dino.e2di_blocks[NDADDR], n = 1; n <= NIADDR; ap++, n++) {
    206 		if (*ap) {
    207 			idesc->id_blkno = fs2h32(*ap);
    208 			ret = iblock(idesc, n, remsize);
    209 			if (ret & STOP)
    210 				return (ret);
    211 		} else {
    212 			if (idesc->id_type == DATA && remsize > 0) {
    213 				/* An empty block in a directory XXX */
    214 				getpathname(pathbuf, sizeof(pathbuf),
    215 				    idesc->id_number, idesc->id_number);
    216 				pfatal("DIRECTORY %s: CONTAINS EMPTY BLOCKS",
    217 				    pathbuf);
    218 				if (reply("ADJUST LENGTH") == 1) {
    219 					dp = ginode(idesc->id_number);
    220 					inossize(dp, inosize(dp) - remsize);
    221 					remsize = 0;
    222 					printf(
    223 					    "YOU MUST RERUN FSCK AFTERWARDS\n");
    224 					rerun = 1;
    225 					inodirty();
    226 					break;
    227 				}
    228 			}
    229 		}
    230 		sizepb *= NINDIR(&sblock);
    231 		remsize -= sizepb;
    232 	}
    233 	return (KEEPON);
    234 }
    235 
    236 static int
    237 iblock(struct inodesc *idesc, long ilevel, u_int64_t isize)
    238 {
    239 	/* XXX ondisk32 */
    240 	int32_t *ap;
    241 	int32_t *aplim;
    242 	struct bufarea *bp;
    243 	int i, n, (*func)(struct inodesc *);
    244 	size_t nif;
    245 	u_int64_t sizepb;
    246 	char buf[BUFSIZ];
    247 	char pathbuf[MAXPATHLEN + 1];
    248 	struct ext2fs_dinode *dp;
    249 
    250 	if (idesc->id_type == ADDR) {
    251 		func = idesc->id_func;
    252 		if (((n = (*func)(idesc)) & KEEPON) == 0)
    253 			return (n);
    254 	} else
    255 		func = dirscan;
    256 	if (chkrange(idesc->id_blkno, idesc->id_numfrags))
    257 		return (SKIP);
    258 	bp = getdatablk(idesc->id_blkno, sblock.e2fs_bsize);
    259 	ilevel--;
    260 	for (sizepb = sblock.e2fs_bsize, i = 0; i < ilevel; i++)
    261 		sizepb *= NINDIR(&sblock);
    262 	if (isize > sizepb * NINDIR(&sblock))
    263 		nif = NINDIR(&sblock);
    264 	else
    265 		nif = howmany(isize, sizepb);
    266 	if (idesc->id_func == pass1check &&
    267 		nif < NINDIR(&sblock)) {
    268 		aplim = &bp->b_un.b_indir[NINDIR(&sblock)];
    269 		for (ap = &bp->b_un.b_indir[nif]; ap < aplim; ap++) {
    270 			if (*ap == 0)
    271 				continue;
    272 			(void)snprintf(buf, sizeof(buf),
    273 			    "PARTIALLY TRUNCATED INODE I=%llu",
    274 			    (unsigned long long)idesc->id_number);
    275 			if (dofix(idesc, buf)) {
    276 				*ap = 0;
    277 				dirty(bp);
    278 			}
    279 		}
    280 		flush(fswritefd, bp);
    281 	}
    282 	aplim = &bp->b_un.b_indir[nif];
    283 	for (ap = bp->b_un.b_indir; ap < aplim; ap++) {
    284 		if (*ap) {
    285 			idesc->id_blkno = fs2h32(*ap);
    286 			if (ilevel == 0)
    287 				n = (*func)(idesc);
    288 			else
    289 				n = iblock(idesc, ilevel, isize);
    290 			if (n & STOP) {
    291 				bp->b_flags &= ~B_INUSE;
    292 				return (n);
    293 			}
    294 		} else {
    295 			if (idesc->id_type == DATA && isize > 0) {
    296 				/* An empty block in a directory XXX */
    297 				getpathname(pathbuf, sizeof(pathbuf),
    298 				    idesc->id_number, idesc->id_number);
    299 				pfatal("DIRECTORY %s: CONTAINS EMPTY BLOCKS",
    300 				    pathbuf);
    301 				if (reply("ADJUST LENGTH") == 1) {
    302 					dp = ginode(idesc->id_number);
    303 					inossize(dp, inosize(dp) - isize);
    304 					isize = 0;
    305 					printf(
    306 					    "YOU MUST RERUN FSCK AFTERWARDS\n");
    307 					rerun = 1;
    308 					inodirty();
    309 					bp->b_flags &= ~B_INUSE;
    310 					return(STOP);
    311 				}
    312 			}
    313 		}
    314 		isize -= sizepb;
    315 	}
    316 	bp->b_flags &= ~B_INUSE;
    317 	return (KEEPON);
    318 }
    319 
    320 /*
    321  * Check that a block in a legal block number.
    322  * Return 0 if in range, 1 if out of range.
    323  */
    324 int
    325 chkrange(daddr_t blk, int cnt)
    326 {
    327 	int c, overh;
    328 
    329 	if ((unsigned int)(blk + cnt) > maxfsblock)
    330 		return (1);
    331 	c = dtog(&sblock, blk);
    332 	overh = cgoverhead(c);
    333 	if (blk < sblock.e2fs.e2fs_bpg * c + overh +
    334 	    sblock.e2fs.e2fs_first_dblock) {
    335 		if ((blk + cnt) > sblock.e2fs.e2fs_bpg * c + overh +
    336 		    sblock.e2fs.e2fs_first_dblock) {
    337 			if (debug) {
    338 				printf("blk %lld < cgdmin %d;",
    339 				    (long long)blk,
    340 				    sblock.e2fs.e2fs_bpg * c + overh +
    341 				    sblock.e2fs.e2fs_first_dblock);
    342 				printf(" blk + cnt %lld > cgsbase %d\n",
    343 				    (long long)(blk + cnt),
    344 				    sblock.e2fs.e2fs_bpg * c +
    345 				    overh + sblock.e2fs.e2fs_first_dblock);
    346 			}
    347 			return (1);
    348 		}
    349 	} else {
    350 		if ((blk + cnt) > sblock.e2fs.e2fs_bpg * (c + 1) + overh +
    351 		    sblock.e2fs.e2fs_first_dblock) {
    352 			if (debug)  {
    353 				printf("blk %lld >= cgdmin %d;",
    354 				    (long long)blk,
    355 				    sblock.e2fs.e2fs_bpg * c + overh +
    356 				    sblock.e2fs.e2fs_first_dblock);
    357 				printf(" blk + cnt %lld > cgdmax %d\n",
    358 				    (long long)(blk+cnt),
    359 				    sblock.e2fs.e2fs_bpg * (c + 1) +
    360 				    overh + sblock.e2fs.e2fs_first_dblock);
    361 			}
    362 			return (1);
    363 		}
    364 	}
    365 	return (0);
    366 }
    367 
    368 /*
    369  * General purpose interface for reading inodes.
    370  */
    371 struct ext2fs_dinode *
    372 ginode(ino_t inumber)
    373 {
    374 	daddr_t iblk;
    375 	struct ext2fs_dinode *dp;
    376 
    377 	if ((inumber < EXT2_FIRSTINO &&
    378 	     inumber != EXT2_ROOTINO &&
    379 	     !(inumber == EXT2_RESIZEINO &&
    380 	       (sblock.e2fs.e2fs_features_compat & EXT2F_COMPAT_RESIZE) != 0))
    381 		|| inumber > maxino)
    382 		errexit("bad inode number %llu to ginode",
    383 		    (unsigned long long)inumber);
    384 	if (startinum == 0 ||
    385 	    inumber < startinum || inumber >= startinum + sblock.e2fs_ipb) {
    386 		iblk = fsck_ino_to_fsba(&sblock, inumber);
    387 		if (pbp != 0)
    388 			pbp->b_flags &= ~B_INUSE;
    389 		pbp = getdatablk(iblk, sblock.e2fs_bsize);
    390 		startinum =
    391 		    ((inumber - 1) / sblock.e2fs_ipb) * sblock.e2fs_ipb + 1;
    392 	}
    393 	dp = (struct ext2fs_dinode *)(pbp->b_un.b_buf +
    394 	    EXT2_DINODE_SIZE(&sblock) * ino_to_fsbo(&sblock, inumber));
    395 
    396 	return dp;
    397 }
    398 
    399 /*
    400  * Special purpose version of ginode used to optimize first pass
    401  * over all the inodes in numerical order.
    402  */
    403 ino_t nextino, lastinum;
    404 long readcnt, readpercg, fullcnt, inobufsize, partialcnt, partialsize;
    405 char *inodebuf;
    406 
    407 struct ext2fs_dinode *
    408 getnextinode(ino_t inumber)
    409 {
    410 	long size;
    411 	daddr_t dblk;
    412 	struct ext2fs_dinode *dp;
    413 	static char *bp;
    414 
    415 	if (inumber != nextino++ || inumber > maxino)
    416 		errexit("bad inode number %llu to nextinode",
    417 		    (unsigned long long)inumber);
    418 	if (inumber >= lastinum) {
    419 		readcnt++;
    420 		dblk = fsbtodb(&sblock, fsck_ino_to_fsba(&sblock, lastinum));
    421 		if (readcnt % readpercg == 0) {
    422 			size = partialsize;
    423 			lastinum += partialcnt;
    424 		} else {
    425 			size = inobufsize;
    426 			lastinum += fullcnt;
    427 		}
    428 		(void)bread(fsreadfd, inodebuf, dblk, size);
    429 		bp = inodebuf;
    430 	}
    431 	dp = (struct ext2fs_dinode *)bp;
    432 	bp += EXT2_DINODE_SIZE(&sblock);
    433 
    434 	return dp;
    435 }
    436 
    437 void
    438 resetinodebuf(void)
    439 {
    440 
    441 	startinum = 0;
    442 	nextino = 1;
    443 	lastinum = 1;
    444 	readcnt = 0;
    445 	inobufsize = blkroundup(&sblock, INOBUFSIZE);
    446 	fullcnt = inobufsize / EXT2_DINODE_SIZE(&sblock);
    447 	readpercg = sblock.e2fs.e2fs_ipg / fullcnt;
    448 	partialcnt = sblock.e2fs.e2fs_ipg % fullcnt;
    449 	partialsize = partialcnt * EXT2_DINODE_SIZE(&sblock);
    450 	if (partialcnt != 0) {
    451 		readpercg++;
    452 	} else {
    453 		partialcnt = fullcnt;
    454 		partialsize = inobufsize;
    455 	}
    456 	if (inodebuf == NULL &&
    457 	    (inodebuf = malloc((unsigned int)inobufsize)) == NULL)
    458 		errexit("Cannot allocate space for inode buffer");
    459 	while (nextino < EXT2_ROOTINO)
    460 		(void)getnextinode(nextino);
    461 }
    462 
    463 void
    464 freeinodebuf(void)
    465 {
    466 
    467 	if (inodebuf != NULL)
    468 		free(inodebuf);
    469 	inodebuf = NULL;
    470 }
    471 
    472 /*
    473  * Routines to maintain information about directory inodes.
    474  * This is built during the first pass and used during the
    475  * second and third passes.
    476  *
    477  * Enter inodes into the cache.
    478  */
    479 void
    480 cacheino(struct ext2fs_dinode *dp, ino_t inumber)
    481 {
    482 	struct inoinfo *inp;
    483 	struct inoinfo **inpp;
    484 	unsigned int blks;
    485 
    486 	blks = howmany(inosize(dp), sblock.e2fs_bsize);
    487 	if (blks > NDADDR)
    488 		blks = NDADDR + NIADDR;
    489 	/* XXX ondisk32 */
    490 	inp = malloc(sizeof(*inp) + (blks - 1) * sizeof(int32_t));
    491 	if (inp == NULL)
    492 		return;
    493 	inpp = &inphead[inumber % numdirs];
    494 	inp->i_nexthash = *inpp;
    495 	*inpp = inp;
    496 	inp->i_child = inp->i_sibling = inp->i_parentp = 0;
    497 	if (inumber == EXT2_ROOTINO)
    498 		inp->i_parent = EXT2_ROOTINO;
    499 	else
    500 		inp->i_parent = (ino_t)0;
    501 	inp->i_dotdot = (ino_t)0;
    502 	inp->i_number = inumber;
    503 	inp->i_isize = inosize(dp);
    504 	/* XXX ondisk32 */
    505 	inp->i_numblks = blks * sizeof(int32_t);
    506 	memcpy(&inp->i_blks[0], &dp->e2di_blocks[0], (size_t)inp->i_numblks);
    507 	if (inplast == listmax) {
    508 		listmax += 100;
    509 		inpsort = (struct inoinfo **)realloc((char *)inpsort,
    510 		    (unsigned int)listmax * sizeof(struct inoinfo *));
    511 		if (inpsort == NULL)
    512 			errexit("cannot increase directory list");
    513 	}
    514 	inpsort[inplast++] = inp;
    515 }
    516 
    517 /*
    518  * Look up an inode cache structure.
    519  */
    520 struct inoinfo *
    521 getinoinfo(ino_t inumber)
    522 {
    523 	struct inoinfo *inp;
    524 
    525 	for (inp = inphead[inumber % numdirs]; inp; inp = inp->i_nexthash) {
    526 		if (inp->i_number != inumber)
    527 			continue;
    528 		return (inp);
    529 	}
    530 	errexit("cannot find inode %llu", (unsigned long long)inumber);
    531 	return ((struct inoinfo *)0);
    532 }
    533 
    534 /*
    535  * Clean up all the inode cache structure.
    536  */
    537 void
    538 inocleanup(void)
    539 {
    540 	struct inoinfo **inpp;
    541 
    542 	if (inphead == NULL)
    543 		return;
    544 	for (inpp = &inpsort[inplast - 1]; inpp >= inpsort; inpp--)
    545 		free(*inpp);
    546 	free(inphead);
    547 	free(inpsort);
    548 	inphead = inpsort = NULL;
    549 }
    550 
    551 void
    552 inodirty(void)
    553 {
    554 
    555 	dirty(pbp);
    556 }
    557 
    558 void
    559 clri(struct inodesc *idesc, const char *type, int flag)
    560 {
    561 	struct ext2fs_dinode *dp;
    562 
    563 	dp = ginode(idesc->id_number);
    564 	if (flag == 1) {
    565 		pwarn("%s %s", type,
    566 		    (fs2h16(dp->e2di_mode) & IFMT) == IFDIR ? "DIR" : "FILE");
    567 		pinode(idesc->id_number);
    568 	}
    569 	if (preen || reply("CLEAR") == 1) {
    570 		if (preen)
    571 			printf(" (CLEARED)\n");
    572 		n_files--;
    573 		(void)ckinode(dp, idesc);
    574 		clearinode(dp);
    575 		statemap[idesc->id_number] = USTATE;
    576 		inodirty();
    577 	}
    578 }
    579 
    580 int
    581 findname(struct inodesc *idesc)
    582 {
    583 	struct ext2fs_direct *dirp = idesc->id_dirp;
    584 	u_int16_t namlen = dirp->e2d_namlen;
    585 	/* from utilities.c namebuf[] variable */
    586 	char *buf = __UNCONST(idesc->id_name);
    587 	if (namlen > MAXPATHLEN) {
    588 		/* XXX: Prevent overflow but don't fix */
    589 		namlen = MAXPATHLEN;
    590 	}
    591 
    592 	if (fs2h32(dirp->e2d_ino) != idesc->id_parent)
    593 		return (KEEPON);
    594 	(void)memcpy(buf, dirp->e2d_name, (size_t)namlen);
    595 	buf[namlen] = '\0';
    596 	return (STOP|FOUND);
    597 }
    598 
    599 int
    600 findino(struct inodesc *idesc)
    601 {
    602 	struct ext2fs_direct *dirp = idesc->id_dirp;
    603 	u_int32_t ino = fs2h32(dirp->e2d_ino);
    604 
    605 	if (ino == 0)
    606 		return (KEEPON);
    607 	if (strcmp(dirp->e2d_name, idesc->id_name) == 0 &&
    608 	    (ino == EXT2_ROOTINO || ino >= EXT2_FIRSTINO)
    609 		&& ino <= maxino) {
    610 		idesc->id_parent = ino;
    611 		return (STOP|FOUND);
    612 	}
    613 	return (KEEPON);
    614 }
    615 
    616 void
    617 pinode(ino_t ino)
    618 {
    619 	struct ext2fs_dinode *dp;
    620 	char *p;
    621 	struct passwd *pw;
    622 	time_t t;
    623 	uid_t uid;
    624 
    625 	printf(" I=%llu ", (unsigned long long)ino);
    626 	if ((ino < EXT2_FIRSTINO && ino != EXT2_ROOTINO) || ino > maxino)
    627 		return;
    628 	dp = ginode(ino);
    629 	uid = fs2h16(dp->e2di_uid);
    630 	if (sblock.e2fs.e2fs_rev > E2FS_REV0)
    631 		uid |= fs2h16(dp->e2di_uid_high) << 16;
    632 	printf(" OWNER=");
    633 #ifndef SMALL
    634 	if (Uflag && (pw = getpwuid(uid)) != 0)
    635 		printf("%s ", pw->pw_name);
    636 	else
    637 #endif
    638 		printf("%u ", (unsigned int)uid);
    639 	printf("MODE=%o\n", fs2h16(dp->e2di_mode));
    640 	if (preen)
    641 		printf("%s: ", cdevname());
    642 	printf("SIZE=%llu ", (long long)inosize(dp));
    643 	t = fs2h32(dp->e2di_mtime);
    644 	p = ctime(&t);
    645 	printf("MTIME=%12.12s %4.4s ", &p[4], &p[20]);
    646 }
    647 
    648 void
    649 blkerror(ino_t ino, const char *type, daddr_t blk)
    650 {
    651 
    652 	pfatal("%lld %s I=%llu", (long long)blk, type, (unsigned long long)ino);
    653 	printf("\n");
    654 	switch (statemap[ino]) {
    655 
    656 	case FSTATE:
    657 		statemap[ino] = FCLEAR;
    658 		return;
    659 
    660 	case DSTATE:
    661 		statemap[ino] = DCLEAR;
    662 		return;
    663 
    664 	case FCLEAR:
    665 	case DCLEAR:
    666 		return;
    667 
    668 	default:
    669 		errexit("BAD STATE %d TO BLKERR", statemap[ino]);
    670 		/* NOTREACHED */
    671 	}
    672 }
    673 
    674 /*
    675  * allocate an unused inode
    676  */
    677 ino_t
    678 allocino(ino_t request, int type)
    679 {
    680 	ino_t ino;
    681 	struct ext2fs_dinode *dp;
    682 	time_t t;
    683 
    684 	if (request == 0)
    685 		request = EXT2_ROOTINO;
    686 	else if (statemap[request] != USTATE)
    687 		return (0);
    688 	for (ino = request; ino < maxino; ino++) {
    689 		if ((ino > EXT2_ROOTINO) && (ino < EXT2_FIRSTINO))
    690 			continue;
    691 		if (statemap[ino] == USTATE)
    692 			break;
    693 	}
    694 	if (ino == maxino)
    695 		return (0);
    696 	switch (type & IFMT) {
    697 	case IFDIR:
    698 		statemap[ino] = DSTATE;
    699 		break;
    700 	case IFREG:
    701 	case IFLNK:
    702 		statemap[ino] = FSTATE;
    703 		break;
    704 	default:
    705 		return (0);
    706 	}
    707 	dp = ginode(ino);
    708 	dp->e2di_blocks[0] = h2fs32(allocblk());
    709 	if (dp->e2di_blocks[0] == 0) {
    710 		statemap[ino] = USTATE;
    711 		return (0);
    712 	}
    713 	dp->e2di_mode = h2fs16(type);
    714 	(void)time(&t);
    715 	dp->e2di_atime = h2fs32(t);
    716 	dp->e2di_mtime = dp->e2di_ctime = dp->e2di_atime;
    717 	dp->e2di_dtime = 0;
    718 	inossize(dp, sblock.e2fs_bsize);
    719 	dp->e2di_nblock = h2fs32(btodb(sblock.e2fs_bsize));
    720 	n_files++;
    721 	inodirty();
    722 	typemap[ino] = E2IFTODT(type);
    723 	return (ino);
    724 }
    725 
    726 /*
    727  * deallocate an inode
    728  */
    729 void
    730 freeino(ino_t ino)
    731 {
    732 	struct inodesc idesc;
    733 	struct ext2fs_dinode *dp;
    734 
    735 	memset(&idesc, 0, sizeof(struct inodesc));
    736 	idesc.id_type = ADDR;
    737 	idesc.id_func = pass4check;
    738 	idesc.id_number = ino;
    739 	dp = ginode(ino);
    740 	(void)ckinode(dp, &idesc);
    741 	clearinode(dp);
    742 	inodirty();
    743 	statemap[ino] = USTATE;
    744 	n_files--;
    745 }
    746