1 /* $NetBSD: inode.c,v 1.21 2007/11/16 16:55:04 tsutsui 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.21 2007/11/16 16:55:04 tsutsui 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