inode.c revision 1.20.10.1 1 /* $NetBSD: inode.c,v 1.20.10.1 2008/01/09 01:38:04 matt 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.20.10.1 2008/01/09 01:38:04 matt 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 >= 0x80000000U)
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 >= 0x80000000U)
141 if (!setlarge())
142 return;
143 } else if (size >= 0x80000000U) {
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 *), nif;
244 u_int64_t sizepb;
245 char buf[BUFSIZ];
246 char pathbuf[MAXPATHLEN + 1];
247 struct ext2fs_dinode *dp;
248
249 if (idesc->id_type == ADDR) {
250 func = idesc->id_func;
251 if (((n = (*func)(idesc)) & KEEPON) == 0)
252 return (n);
253 } else
254 func = dirscan;
255 if (chkrange(idesc->id_blkno, idesc->id_numfrags))
256 return (SKIP);
257 bp = getdatablk(idesc->id_blkno, sblock.e2fs_bsize);
258 ilevel--;
259 for (sizepb = sblock.e2fs_bsize, i = 0; i < ilevel; i++)
260 sizepb *= NINDIR(&sblock);
261 if (isize > sizepb * NINDIR(&sblock))
262 nif = NINDIR(&sblock);
263 else
264 nif = howmany(isize, sizepb);
265 if (idesc->id_func == pass1check &&
266 nif < NINDIR(&sblock)) {
267 aplim = &bp->b_un.b_indir[NINDIR(&sblock)];
268 for (ap = &bp->b_un.b_indir[nif]; ap < aplim; ap++) {
269 if (*ap == 0)
270 continue;
271 (void)snprintf(buf, sizeof(buf),
272 "PARTIALLY TRUNCATED INODE I=%llu",
273 (unsigned long long)idesc->id_number);
274 if (dofix(idesc, buf)) {
275 *ap = 0;
276 dirty(bp);
277 }
278 }
279 flush(fswritefd, bp);
280 }
281 aplim = &bp->b_un.b_indir[nif];
282 for (ap = bp->b_un.b_indir; ap < aplim; ap++) {
283 if (*ap) {
284 idesc->id_blkno = fs2h32(*ap);
285 if (ilevel == 0)
286 n = (*func)(idesc);
287 else
288 n = iblock(idesc, ilevel, isize);
289 if (n & STOP) {
290 bp->b_flags &= ~B_INUSE;
291 return (n);
292 }
293 } else {
294 if (idesc->id_type == DATA && isize > 0) {
295 /* An empty block in a directory XXX */
296 getpathname(pathbuf, sizeof(pathbuf),
297 idesc->id_number, idesc->id_number);
298 pfatal("DIRECTORY %s: CONTAINS EMPTY BLOCKS",
299 pathbuf);
300 if (reply("ADJUST LENGTH") == 1) {
301 dp = ginode(idesc->id_number);
302 inossize(dp, inosize(dp) - isize);
303 isize = 0;
304 printf(
305 "YOU MUST RERUN FSCK AFTERWARDS\n");
306 rerun = 1;
307 inodirty();
308 bp->b_flags &= ~B_INUSE;
309 return(STOP);
310 }
311 }
312 }
313 isize -= sizepb;
314 }
315 bp->b_flags &= ~B_INUSE;
316 return (KEEPON);
317 }
318
319 /*
320 * Check that a block in a legal block number.
321 * Return 0 if in range, 1 if out of range.
322 */
323 int
324 chkrange(daddr_t blk, int cnt)
325 {
326 int c, overh;
327
328 if ((unsigned)(blk + cnt) > maxfsblock)
329 return (1);
330 c = dtog(&sblock, blk);
331 overh = cgoverhead(c);
332 if (blk < sblock.e2fs.e2fs_bpg * c + overh +
333 sblock.e2fs.e2fs_first_dblock) {
334 if ((blk + cnt) > sblock.e2fs.e2fs_bpg * c + overh +
335 sblock.e2fs.e2fs_first_dblock) {
336 if (debug) {
337 printf("blk %lld < cgdmin %d;",
338 (long long)blk,
339 sblock.e2fs.e2fs_bpg * c + overh +
340 sblock.e2fs.e2fs_first_dblock);
341 printf(" blk + cnt %lld > cgsbase %d\n",
342 (long long)(blk + cnt),
343 sblock.e2fs.e2fs_bpg * c +
344 overh + sblock.e2fs.e2fs_first_dblock);
345 }
346 return (1);
347 }
348 } else {
349 if ((blk + cnt) > sblock.e2fs.e2fs_bpg * (c + 1) + overh +
350 sblock.e2fs.e2fs_first_dblock) {
351 if (debug) {
352 printf("blk %lld >= cgdmin %d;",
353 (long long)blk,
354 sblock.e2fs.e2fs_bpg * c + overh +
355 sblock.e2fs.e2fs_first_dblock);
356 printf(" blk + cnt %lld > cgdmax %d\n",
357 (long long)(blk+cnt),
358 sblock.e2fs.e2fs_bpg * (c + 1) +
359 overh + sblock.e2fs.e2fs_first_dblock);
360 }
361 return (1);
362 }
363 }
364 return (0);
365 }
366
367 /*
368 * General purpose interface for reading inodes.
369 */
370 struct ext2fs_dinode *
371 ginode(ino_t inumber)
372 {
373 daddr_t iblk;
374
375 if ((inumber < EXT2_FIRSTINO &&
376 inumber != EXT2_ROOTINO &&
377 !(inumber == EXT2_RESIZEINO &&
378 (sblock.e2fs.e2fs_features_compat & EXT2F_COMPAT_RESIZE) != 0))
379 || inumber > maxino)
380 errexit("bad inode number %llu to ginode\n",
381 (unsigned long long)inumber);
382 if (startinum == 0 ||
383 inumber < startinum || inumber >= startinum + sblock.e2fs_ipb) {
384 iblk = fsck_ino_to_fsba(&sblock, inumber);
385 if (pbp != 0)
386 pbp->b_flags &= ~B_INUSE;
387 pbp = getdatablk(iblk, sblock.e2fs_bsize);
388 startinum = ((inumber -1) / sblock.e2fs_ipb) * sblock.e2fs_ipb + 1;
389 }
390 return (&pbp->b_un.b_dinode[(inumber-1) % sblock.e2fs_ipb]);
391 }
392
393 /*
394 * Special purpose version of ginode used to optimize first pass
395 * over all the inodes in numerical order.
396 */
397 ino_t nextino, lastinum;
398 long readcnt, readpercg, fullcnt, inobufsize, partialcnt, partialsize;
399 struct ext2fs_dinode *inodebuf;
400
401 struct ext2fs_dinode *
402 getnextinode(ino_t inumber)
403 {
404 long size;
405 daddr_t dblk;
406 static struct ext2fs_dinode *dp;
407
408 if (inumber != nextino++ || inumber > maxino)
409 errexit("bad inode number %llu to nextinode\n",
410 (unsigned long long)inumber);
411 if (inumber >= lastinum) {
412 readcnt++;
413 dblk = fsbtodb(&sblock, fsck_ino_to_fsba(&sblock, lastinum));
414 if (readcnt % readpercg == 0) {
415 size = partialsize;
416 lastinum += partialcnt;
417 } else {
418 size = inobufsize;
419 lastinum += fullcnt;
420 }
421 (void)bread(fsreadfd, (char *)inodebuf, dblk, size);
422 dp = inodebuf;
423 }
424 return (dp++);
425 }
426
427 void
428 resetinodebuf(void)
429 {
430
431 startinum = 0;
432 nextino = 1;
433 lastinum = 1;
434 readcnt = 0;
435 inobufsize = blkroundup(&sblock, INOBUFSIZE);
436 fullcnt = inobufsize / sizeof(struct ext2fs_dinode);
437 readpercg = sblock.e2fs.e2fs_ipg / fullcnt;
438 partialcnt = sblock.e2fs.e2fs_ipg % fullcnt;
439 partialsize = partialcnt * sizeof(struct ext2fs_dinode);
440 if (partialcnt != 0) {
441 readpercg++;
442 } else {
443 partialcnt = fullcnt;
444 partialsize = inobufsize;
445 }
446 if (inodebuf == NULL &&
447 (inodebuf = (struct ext2fs_dinode *)malloc((unsigned)inobufsize)) ==
448 NULL)
449 errexit("Cannot allocate space for inode buffer\n");
450 while (nextino < EXT2_ROOTINO)
451 (void)getnextinode(nextino);
452 }
453
454 void
455 freeinodebuf(void)
456 {
457
458 if (inodebuf != NULL)
459 free((char *)inodebuf);
460 inodebuf = NULL;
461 }
462
463 /*
464 * Routines to maintain information about directory inodes.
465 * This is built during the first pass and used during the
466 * second and third passes.
467 *
468 * Enter inodes into the cache.
469 */
470 void
471 cacheino(struct ext2fs_dinode *dp, ino_t inumber)
472 {
473 struct inoinfo *inp;
474 struct inoinfo **inpp;
475 unsigned int blks;
476
477 blks = howmany(inosize(dp), sblock.e2fs_bsize);
478 if (blks > NDADDR)
479 blks = NDADDR + NIADDR;
480 /* XXX ondisk32 */
481 inp = (struct inoinfo *)
482 malloc(sizeof(*inp) + (blks - 1) * sizeof(int32_t));
483 if (inp == NULL)
484 return;
485 inpp = &inphead[inumber % numdirs];
486 inp->i_nexthash = *inpp;
487 *inpp = inp;
488 inp->i_child = inp->i_sibling = inp->i_parentp = 0;
489 if (inumber == EXT2_ROOTINO)
490 inp->i_parent = EXT2_ROOTINO;
491 else
492 inp->i_parent = (ino_t)0;
493 inp->i_dotdot = (ino_t)0;
494 inp->i_number = inumber;
495 inp->i_isize = inosize(dp);
496 /* XXX ondisk32 */
497 inp->i_numblks = blks * sizeof(int32_t);
498 memcpy(&inp->i_blks[0], &dp->e2di_blocks[0], (size_t)inp->i_numblks);
499 if (inplast == listmax) {
500 listmax += 100;
501 inpsort = (struct inoinfo **)realloc((char *)inpsort,
502 (unsigned)listmax * sizeof(struct inoinfo *));
503 if (inpsort == NULL)
504 errexit("cannot increase directory list\n");
505 }
506 inpsort[inplast++] = inp;
507 }
508
509 /*
510 * Look up an inode cache structure.
511 */
512 struct inoinfo *
513 getinoinfo(ino_t inumber)
514 {
515 struct inoinfo *inp;
516
517 for (inp = inphead[inumber % numdirs]; inp; inp = inp->i_nexthash) {
518 if (inp->i_number != inumber)
519 continue;
520 return (inp);
521 }
522 errexit("cannot find inode %llu\n", (unsigned long long)inumber);
523 return ((struct inoinfo *)0);
524 }
525
526 /*
527 * Clean up all the inode cache structure.
528 */
529 void
530 inocleanup(void)
531 {
532 struct inoinfo **inpp;
533
534 if (inphead == NULL)
535 return;
536 for (inpp = &inpsort[inplast - 1]; inpp >= inpsort; inpp--)
537 free((char *)(*inpp));
538 free((char *)inphead);
539 free((char *)inpsort);
540 inphead = inpsort = NULL;
541 }
542
543 void
544 inodirty(void)
545 {
546
547 dirty(pbp);
548 }
549
550 void
551 clri(struct inodesc *idesc, const char *type, int flag)
552 {
553 struct ext2fs_dinode *dp;
554
555 dp = ginode(idesc->id_number);
556 if (flag == 1) {
557 pwarn("%s %s", type,
558 (dp->e2di_mode & IFMT) == IFDIR ? "DIR" : "FILE");
559 pinode(idesc->id_number);
560 }
561 if (preen || reply("CLEAR") == 1) {
562 if (preen)
563 printf(" (CLEARED)\n");
564 n_files--;
565 (void)ckinode(dp, idesc);
566 clearinode(dp);
567 statemap[idesc->id_number] = USTATE;
568 inodirty();
569 }
570 }
571
572 int
573 findname(struct inodesc *idesc)
574 {
575 struct ext2fs_direct *dirp = idesc->id_dirp;
576 u_int16_t namlen = dirp->e2d_namlen;
577 /* from utilities.c namebuf[] variable */
578 char *buf = __UNCONST(idesc->id_name);
579 if (namlen > MAXPATHLEN) {
580 /* XXX: Prevent overflow but don't fix */
581 namlen = MAXPATHLEN;
582 }
583
584 if (fs2h32(dirp->e2d_ino) != idesc->id_parent)
585 return (KEEPON);
586 (void)memcpy(buf, dirp->e2d_name, (size_t)namlen);
587 buf[namlen] = '\0';
588 return (STOP|FOUND);
589 }
590
591 int
592 findino(struct inodesc *idesc)
593 {
594 struct ext2fs_direct *dirp = idesc->id_dirp;
595 u_int32_t ino = fs2h32(dirp->e2d_ino);
596
597 if (ino == 0)
598 return (KEEPON);
599 if (strcmp(dirp->e2d_name, idesc->id_name) == 0 &&
600 (ino == EXT2_ROOTINO || ino >= EXT2_FIRSTINO)
601 && ino <= maxino) {
602 idesc->id_parent = ino;
603 return (STOP|FOUND);
604 }
605 return (KEEPON);
606 }
607
608 void
609 pinode(ino_t ino)
610 {
611 struct ext2fs_dinode *dp;
612 char *p;
613 struct passwd *pw;
614 time_t t;
615
616 printf(" I=%llu ", (unsigned long long)ino);
617 if ((ino < EXT2_FIRSTINO && ino != EXT2_ROOTINO) || ino > maxino)
618 return;
619 dp = ginode(ino);
620 printf(" OWNER=");
621 #ifndef SMALL
622 if ((pw = getpwuid((int)dp->e2di_uid)) != 0)
623 printf("%s ", pw->pw_name);
624 else
625 #endif
626 printf("%u ", (unsigned)fs2h16(dp->e2di_uid));
627 printf("MODE=%o\n", fs2h16(dp->e2di_mode));
628 if (preen)
629 printf("%s: ", cdevname());
630 printf("SIZE=%llu ", (long long)inosize(dp));
631 t = fs2h32(dp->e2di_mtime);
632 p = ctime(&t);
633 printf("MTIME=%12.12s %4.4s ", &p[4], &p[20]);
634 }
635
636 void
637 blkerror(ino_t ino, const char *type, daddr_t blk)
638 {
639
640 pfatal("%lld %s I=%llu", (long long)blk, type, (unsigned long long)ino);
641 printf("\n");
642 switch (statemap[ino]) {
643
644 case FSTATE:
645 statemap[ino] = FCLEAR;
646 return;
647
648 case DSTATE:
649 statemap[ino] = DCLEAR;
650 return;
651
652 case FCLEAR:
653 case DCLEAR:
654 return;
655
656 default:
657 errexit("BAD STATE %d TO BLKERR\n", statemap[ino]);
658 /* NOTREACHED */
659 }
660 }
661
662 /*
663 * allocate an unused inode
664 */
665 ino_t
666 allocino(ino_t request, int type)
667 {
668 ino_t ino;
669 struct ext2fs_dinode *dp;
670 time_t t;
671
672 if (request == 0)
673 request = EXT2_ROOTINO;
674 else if (statemap[request] != USTATE)
675 return (0);
676 for (ino = request; ino < maxino; ino++) {
677 if ((ino > EXT2_ROOTINO) && (ino < EXT2_FIRSTINO))
678 continue;
679 if (statemap[ino] == USTATE)
680 break;
681 }
682 if (ino == maxino)
683 return (0);
684 switch (type & IFMT) {
685 case IFDIR:
686 statemap[ino] = DSTATE;
687 break;
688 case IFREG:
689 case IFLNK:
690 statemap[ino] = FSTATE;
691 break;
692 default:
693 return (0);
694 }
695 dp = ginode(ino);
696 dp->e2di_blocks[0] = h2fs32(allocblk());
697 if (dp->e2di_blocks[0] == 0) {
698 statemap[ino] = USTATE;
699 return (0);
700 }
701 dp->e2di_mode = h2fs16(type);
702 (void)time(&t);
703 dp->e2di_atime = h2fs32(t);
704 dp->e2di_mtime = dp->e2di_ctime = dp->e2di_atime;
705 dp->e2di_dtime = 0;
706 inossize(dp, sblock.e2fs_bsize);
707 dp->e2di_nblock = h2fs32(btodb(sblock.e2fs_bsize));
708 n_files++;
709 inodirty();
710 typemap[ino] = E2IFTODT(type);
711 return (ino);
712 }
713
714 /*
715 * deallocate an inode
716 */
717 void
718 freeino(ino_t ino)
719 {
720 struct inodesc idesc;
721 struct ext2fs_dinode *dp;
722
723 memset(&idesc, 0, sizeof(struct inodesc));
724 idesc.id_type = ADDR;
725 idesc.id_func = pass4check;
726 idesc.id_number = ino;
727 dp = ginode(ino);
728 (void)ckinode(dp, &idesc);
729 clearinode(dp);
730 inodirty();
731 statemap[ino] = USTATE;
732 n_files--;
733 }
734