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 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 #if 0 36 static const char sccsid[] = "@(#)pass1.c 8.6 (Berkeley) 4/28/95"; 37 #endif 38 static const char rcsid[] = 39 "$FreeBSD$"; 40 #endif /* not lint */ 41 42 #include <sys/param.h> 43 #include <sys/stat.h> 44 #include <sys/sysctl.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 <string.h> 52 53 #include "fsck.h" 54 55 static ufs_daddr_t badblk; 56 static ufs_daddr_t dupblk; 57 static ino_t lastino; /* last inode in use */ 58 59 static void checkinode __P((ino_t inumber, struct inodesc *)); 60 61 void 62 pass1() 63 { 64 u_int8_t *cp; 65 ino_t inumber; 66 int c, i, cgd, inosused; 67 struct inostat *info; 68 struct inodesc idesc; 69 70 /* 71 * Set file system reserved blocks in used block map. 72 */ 73 for (c = 0; c < sblock.fs_ncg; c++) { 74 cgd = cgdmin(&sblock, c); 75 if (c == 0) { 76 i = cgbase(&sblock, c); 77 } else 78 i = cgsblock(&sblock, c); 79 for (; i < cgd; i++) 80 setbmap(i); 81 } 82 i = sblock.fs_csaddr; 83 cgd = i + howmany(sblock.fs_cssize, sblock.fs_fsize); 84 for (; i < cgd; i++) 85 setbmap(i); 86 87 /* 88 * Find all allocated blocks. 89 */ 90 memset(&idesc, 0, sizeof(struct inodesc)); 91 idesc.id_func = pass1check; 92 n_files = n_blks = 0; 93 for (c = 0; c < sblock.fs_ncg; c++) { 94 inumber = c * sblock.fs_ipg; 95 setinodebuf(inumber); 96 inosused = sblock.fs_ipg; 97 if (got_siginfo) { 98 printf("%s: phase 1: cyl group %d of %d (%d%%)\n", 99 cdevname, c, sblock.fs_ncg, 100 c * 100 / sblock.fs_ncg); 101 got_siginfo = 0; 102 } 103 /* 104 * If we are using soft updates, then we can trust the 105 * cylinder group inode allocation maps to tell us which 106 * inodes are allocated. We will scan the used inode map 107 * to find the inodes that are really in use, and then 108 * read only those inodes in from disk. 109 */ 110 if (preen && usedsoftdep) { 111 getblk(&cgblk, cgtod(&sblock, c), sblock.fs_cgsize); 112 if (!cg_chkmagic(&cgrp)) 113 pfatal("CG %d: BAD MAGIC NUMBER\n", c); 114 cp = &cg_inosused(&cgrp)[(sblock.fs_ipg - 1) / NBBY]; 115 for ( ; inosused > 0; inosused -= NBBY, cp--) { 116 if (*cp == 0) 117 continue; 118 for (i = 1 << (NBBY - 1); i > 0; i >>= 1) { 119 if (*cp & i) 120 break; 121 inosused--; 122 } 123 break; 124 } 125 if (inosused < 0) 126 inosused = 0; 127 } 128 /* 129 * Allocate inoinfo structures for the allocated inodes. 130 */ 131 inostathead[c].il_numalloced = inosused; 132 if (inosused == 0) { 133 inostathead[c].il_stat = 0; 134 continue; 135 } 136 info = calloc((unsigned)inosused, sizeof(struct inostat)); 137 if (info == NULL) 138 pfatal("cannot alloc %u bytes for inoinfo\n", 139 (unsigned)(sizeof(struct inostat) * inosused)); 140 inostathead[c].il_stat = info; 141 /* 142 * Scan the allocated inodes. 143 */ 144 for (i = 0; i < inosused; i++, inumber++) { 145 if (inumber < ROOTINO) { 146 (void)getnextinode(inumber); 147 continue; 148 } 149 checkinode(inumber, &idesc); 150 } 151 lastino += 1; 152 if (inosused < sblock.fs_ipg || inumber == lastino) 153 continue; 154 /* 155 * If we were not able to determine in advance which inodes 156 * were in use, then reduce the size of the inoinfo structure 157 * to the size necessary to describe the inodes that we 158 * really found. 159 */ 160 inosused = lastino - (c * sblock.fs_ipg); 161 if (inosused < 0) 162 inosused = 0; 163 inostathead[c].il_numalloced = inosused; 164 if (inosused == 0) { 165 free(inostathead[c].il_stat); 166 inostathead[c].il_stat = 0; 167 continue; 168 } 169 info = calloc((unsigned)inosused, sizeof(struct inostat)); 170 if (info == NULL) 171 pfatal("cannot alloc %u bytes for inoinfo\n", 172 (unsigned)(sizeof(struct inostat) * inosused)); 173 memmove(info, inostathead[c].il_stat, inosused * sizeof(*info)); 174 free(inostathead[c].il_stat); 175 inostathead[c].il_stat = info; 176 } 177 freeinodebuf(); 178 } 179 180 static void 181 checkinode(inumber, idesc) 182 ino_t inumber; 183 register struct inodesc *idesc; 184 { 185 register struct dinode *dp; 186 struct zlncnt *zlnp; 187 u_int64_t kernmaxfilesize; 188 ufs_daddr_t ndb, j; 189 mode_t mode; 190 char *symbuf; 191 192 dp = getnextinode(inumber); 193 mode = dp->di_mode & IFMT; 194 if (mode == 0) { 195 if (memcmp(dp->di_db, zino.di_db, 196 NDADDR * sizeof(ufs_daddr_t)) || 197 memcmp(dp->di_ib, zino.di_ib, 198 NIADDR * sizeof(ufs_daddr_t)) || 199 dp->di_mode || dp->di_size) { 200 pfatal("PARTIALLY ALLOCATED INODE I=%lu", inumber); 201 if (reply("CLEAR") == 1) { 202 dp = ginode(inumber); 203 clearinode(dp); 204 inodirty(); 205 } 206 } 207 inoinfo(inumber)->ino_state = USTATE; 208 return; 209 } 210 lastino = inumber; 211 /* This should match the file size limit in ffs_mountfs(). */ 212 kernmaxfilesize = (u_int64_t)0x40000000 * sblock.fs_bsize - 1; 213 if (dp->di_size > kernmaxfilesize || 214 dp->di_size > sblock.fs_maxfilesize || 215 (mode == IFDIR && dp->di_size > MAXDIRSIZE)) { 216 if (debug) 217 printf("bad size %qu:", dp->di_size); 218 goto unknown; 219 } 220 if (!preen && mode == IFMT && reply("HOLD BAD BLOCK") == 1) { 221 dp = ginode(inumber); 222 dp->di_size = sblock.fs_fsize; 223 dp->di_mode = IFREG|0600; 224 inodirty(); 225 } 226 if ((mode == IFBLK || mode == IFCHR || mode == IFIFO || 227 mode == IFSOCK) && dp->di_size != 0) { 228 if (debug) 229 printf("bad special-file size %qu:", dp->di_size); 230 goto unknown; 231 } 232 if ((mode == IFBLK || mode == IFCHR) && (dev_t)dp->di_rdev == NODEV) { 233 if (debug) 234 printf("bad special-file rdev NODEV:"); 235 goto unknown; 236 } 237 ndb = howmany(dp->di_size, sblock.fs_bsize); 238 if (ndb < 0) { 239 if (debug) 240 printf("bad size %qu ndb %d:", 241 dp->di_size, ndb); 242 goto unknown; 243 } 244 if (mode == IFBLK || mode == IFCHR) 245 ndb++; 246 if (mode == IFLNK) { 247 if (doinglevel2 && 248 dp->di_size > 0 && dp->di_size < MAXSYMLINKLEN && 249 dp->di_blocks != 0) { 250 symbuf = alloca(secsize); 251 if (bread(fsreadfd, symbuf, 252 fsbtodb(&sblock, dp->di_db[0]), 253 (long)secsize) != 0) 254 errx(EEXIT, "cannot read symlink"); 255 if (debug) { 256 symbuf[dp->di_size] = 0; 257 printf("convert symlink %lu(%s) of size %ld\n", 258 (u_long)inumber, symbuf, (long)dp->di_size); 259 } 260 dp = ginode(inumber); 261 memmove(dp->di_shortlink, symbuf, (long)dp->di_size); 262 dp->di_blocks = 0; 263 inodirty(); 264 } 265 /* 266 * Fake ndb value so direct/indirect block checks below 267 * will detect any garbage after symlink string. 268 */ 269 if (dp->di_size < (u_int64_t)sblock.fs_maxsymlinklen) { 270 ndb = howmany(dp->di_size, sizeof(ufs_daddr_t)); 271 if (ndb > NDADDR) { 272 j = ndb - NDADDR; 273 for (ndb = 1; j > 1; j--) 274 ndb *= NINDIR(&sblock); 275 ndb += NDADDR; 276 } 277 } 278 } 279 for (j = ndb; j < NDADDR; j++) 280 if (dp->di_db[j] != 0) { 281 if (debug) 282 printf("bad direct addr: %ld\n", 283 (long)dp->di_db[j]); 284 goto unknown; 285 } 286 for (j = 0, ndb -= NDADDR; ndb > 0; j++) 287 ndb /= NINDIR(&sblock); 288 for (; j < NIADDR; j++) 289 if (dp->di_ib[j] != 0) { 290 if (debug) 291 printf("bad indirect addr: %ld\n", 292 (long)dp->di_ib[j]); 293 goto unknown; 294 } 295 if (ftypeok(dp) == 0) 296 goto unknown; 297 n_files++; 298 inoinfo(inumber)->ino_linkcnt = dp->di_nlink; 299 if (dp->di_nlink <= 0) { 300 zlnp = (struct zlncnt *)malloc(sizeof *zlnp); 301 if (zlnp == NULL) { 302 pfatal("LINK COUNT TABLE OVERFLOW"); 303 if (reply("CONTINUE") == 0) { 304 ckfini(0); 305 exit(EEXIT); 306 } 307 } else { 308 zlnp->zlncnt = inumber; 309 zlnp->next = zlnhead; 310 zlnhead = zlnp; 311 } 312 } 313 if (mode == IFDIR) { 314 if (dp->di_size == 0) 315 inoinfo(inumber)->ino_state = DCLEAR; 316 else 317 inoinfo(inumber)->ino_state = DSTATE; 318 cacheino(dp, inumber); 319 countdirs++; 320 } else 321 inoinfo(inumber)->ino_state = FSTATE; 322 inoinfo(inumber)->ino_type = IFTODT(mode); 323 if (doinglevel2 && 324 (dp->di_ouid != (u_short)-1 || dp->di_ogid != (u_short)-1)) { 325 dp = ginode(inumber); 326 dp->di_uid = dp->di_ouid; 327 dp->di_ouid = -1; 328 dp->di_gid = dp->di_ogid; 329 dp->di_ogid = -1; 330 inodirty(); 331 } 332 badblk = dupblk = 0; 333 idesc->id_number = inumber; 334 if (dp->di_flags & SF_SNAPSHOT) 335 idesc->id_type = SNAP; 336 else 337 idesc->id_type = ADDR; 338 (void)ckinode(dp, idesc); 339 idesc->id_entryno *= btodb(sblock.fs_fsize); 340 if (dp->di_blocks != idesc->id_entryno) { 341 pwarn("INCORRECT BLOCK COUNT I=%lu (%ld should be %ld)", 342 inumber, dp->di_blocks, idesc->id_entryno); 343 if (preen) 344 printf(" (CORRECTED)\n"); 345 else if (reply("CORRECT") == 0) 346 return; 347 if (bkgrdflag == 0) { 348 dp = ginode(inumber); 349 dp->di_blocks = idesc->id_entryno; 350 inodirty(); 351 } else { 352 cmd.value = idesc->id_number; 353 cmd.size = idesc->id_entryno - dp->di_blocks; 354 if (debug) 355 printf("adjblkcnt ino %d amount %d\n", 356 (long)cmd.value, cmd.size); 357 if (sysctl(adjblkcnt, MIBSIZE, 0, 0, 358 &cmd, sizeof cmd) == -1) 359 rwerror("ADJUST INODE BLOCK COUNT", cmd.value); 360 } 361 } 362 return; 363 unknown: 364 pfatal("UNKNOWN FILE TYPE I=%lu", inumber); 365 inoinfo(inumber)->ino_state = FCLEAR; 366 if (reply("CLEAR") == 1) { 367 inoinfo(inumber)->ino_state = USTATE; 368 dp = ginode(inumber); 369 clearinode(dp); 370 inodirty(); 371 } 372 } 373 374 int 375 pass1check(idesc) 376 register struct inodesc *idesc; 377 { 378 int res = KEEPON; 379 int anyout, nfrags; 380 ufs_daddr_t blkno = idesc->id_blkno; 381 register struct dups *dlp; 382 struct dups *new; 383 384 if (idesc->id_type == SNAP) { 385 if (blkno == BLK_NOCOPY) 386 return (KEEPON); 387 if (idesc->id_number == cursnapshot) { 388 if (blkno == blkstofrags(&sblock, idesc->id_lbn)) 389 return (KEEPON); 390 if (blkno == BLK_SNAP) { 391 blkno = blkstofrags(&sblock, idesc->id_lbn); 392 idesc->id_entryno -= idesc->id_numfrags; 393 } 394 } else { 395 if (blkno == BLK_SNAP) 396 return (KEEPON); 397 } 398 } 399 if ((anyout = chkrange(blkno, idesc->id_numfrags)) != 0) { 400 blkerror(idesc->id_number, "BAD", blkno); 401 if (badblk++ >= MAXBAD) { 402 pwarn("EXCESSIVE BAD BLKS I=%lu", 403 idesc->id_number); 404 if (preen) 405 printf(" (SKIPPING)\n"); 406 else if (reply("CONTINUE") == 0) { 407 ckfini(0); 408 exit(EEXIT); 409 } 410 return (STOP); 411 } 412 } 413 for (nfrags = idesc->id_numfrags; nfrags > 0; blkno++, nfrags--) { 414 if (anyout && chkrange(blkno, 1)) { 415 res = SKIP; 416 } else if (!testbmap(blkno)) { 417 n_blks++; 418 setbmap(blkno); 419 } else { 420 blkerror(idesc->id_number, "DUP", blkno); 421 if (dupblk++ >= MAXDUP) { 422 pwarn("EXCESSIVE DUP BLKS I=%lu", 423 idesc->id_number); 424 if (preen) 425 printf(" (SKIPPING)\n"); 426 else if (reply("CONTINUE") == 0) { 427 ckfini(0); 428 exit(EEXIT); 429 } 430 return (STOP); 431 } 432 new = (struct dups *)malloc(sizeof(struct dups)); 433 if (new == NULL) { 434 pfatal("DUP TABLE OVERFLOW."); 435 if (reply("CONTINUE") == 0) { 436 ckfini(0); 437 exit(EEXIT); 438 } 439 return (STOP); 440 } 441 new->dup = blkno; 442 if (muldup == 0) { 443 duplist = muldup = new; 444 new->next = 0; 445 } else { 446 new->next = muldup->next; 447 muldup->next = new; 448 } 449 for (dlp = duplist; dlp != muldup; dlp = dlp->next) 450 if (dlp->dup == blkno) 451 break; 452 if (dlp == muldup && dlp->dup != blkno) 453 muldup = new; 454 } 455 /* 456 * count the number of blocks found in id_entryno 457 */ 458 idesc->id_entryno++; 459 } 460 return (res); 461 } 462