sbin/fsck/pass2.c

   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. 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  * @(#)pass2.c  8.9 (Berkeley) 4/28/95
  30  * $FreeBSD: src/sbin/fsck/pass2.c,v 1.10.2.2 2001/11/24 15:14:59 iedowse Exp $
  31  */
  32
  33 #include <sys/param.h>
  34
  35 #include <vfs/ufs/dinode.h>
  36 #include <vfs/ufs/dir.h>
  37
  38 #include <err.h>
  39 #include <string.h>
  40
  41 #include "fsck.h"
  42
  43 #define MINDIRSIZE      (sizeof (struct dirtemplate))
  44
  45 static int blksort(const void *, const void *);
  46 static int pass2check(struct inodesc *);
  47
  48 void
  49 pass2(void)
  50 {
  51         struct ufs1_dinode *dp;
  52         struct inoinfo **inpp, *inp;
  53         struct inoinfo **inpend;
  54         struct inodesc curino;
  55         struct ufs1_dinode dino;
  56         char pathbuf[MAXPATHLEN + 1];
  57         long i, n;
  58
  59         switch (inoinfo(UFS_ROOTINO)->ino_state) {
  60
  61         case USTATE:
  62                 pfatal("ROOT INODE UNALLOCATED");
  63                 if (reply("ALLOCATE") == 0) {
  64                         ckfini(0);
  65                         exit(EEXIT);
  66                 }
  67                 if (allocdir(UFS_ROOTINO, UFS_ROOTINO, 0755) != UFS_ROOTINO)
  68                         errx(EEXIT, "CANNOT ALLOCATE ROOT INODE");
  69                 break;
  70
  71         case DCLEAR:
  72                 pfatal("DUPS/BAD IN ROOT INODE");
  73                 if (reply("REALLOCATE")) {
  74                         freeino(UFS_ROOTINO);
  75                         if (allocdir(UFS_ROOTINO, UFS_ROOTINO, 0755) !=
  76                             UFS_ROOTINO)
  77                                 errx(EEXIT, "CANNOT ALLOCATE ROOT INODE");
  78                         break;
  79                 }
  80                 if (reply("CONTINUE") == 0) {
  81                         ckfini(0);
  82                         exit(EEXIT);
  83                 }
  84                 break;
  85
  86         case FSTATE:
  87         case FCLEAR:
  88                 pfatal("ROOT INODE NOT DIRECTORY");
  89                 if (reply("REALLOCATE")) {
  90                         freeino(UFS_ROOTINO);
  91                         if (allocdir(UFS_ROOTINO, UFS_ROOTINO, 0755) !=
  92                             UFS_ROOTINO)
  93                                 errx(EEXIT, "CANNOT ALLOCATE ROOT INODE");
  94                         break;
  95                 }
  96                 if (reply("FIX") == 0) {
  97                         ckfini(0);
  98                         exit(EEXIT);
  99                 }
 100                 dp = ginode(UFS_ROOTINO);
 101                 dp->di_mode &= ~IFMT;
 102                 dp->di_mode |= IFDIR;
 103                 inodirty();
 104                 break;
 105
 106         case DSTATE:
 107                 break;
 108
 109         default:
 110                 errx(EEXIT, "BAD STATE %d FOR ROOT INODE",
 111                     inoinfo(UFS_ROOTINO)->ino_state);
 112         }
 113         inoinfo(UFS_ROOTINO)->ino_state = DFOUND;
 114         if (newinofmt) {
 115                 inoinfo(UFS_WINO)->ino_state = FSTATE;
 116                 inoinfo(UFS_WINO)->ino_type = DT_WHT;
 117         }
 118         /*
 119          * Sort the directory list into disk block order.  Do this in blocks
 120          * of 1000 directories in order to maintain locality of reference
 121          * in memory in case fsck is using swap space.
 122          */
 123         for (i = 0; i < inplast; i += 1000) {
 124                 if ((n = inplast - i) > 1000)
 125                         n = 1000;
 126                 qsort(inpsort + i, (size_t)n, sizeof *inpsort, blksort);
 127         }
 128
 129         /*
 130          * Check the integrity of each directory.
 131          */
 132         memset(&curino, 0, sizeof(struct inodesc));
 133         curino.id_type = DATA;
 134         curino.id_func = pass2check;
 135         dp = &dino;
 136         inpend = &inpsort[inplast];
 137         for (inpp = inpsort; inpp < inpend; inpp++) {
 138                 if (got_siginfo) {
 139                         printf("%s: phase 2: dir %d of %ld (%d%%)\n", cdevname,
 140                             (int)(inpp - inpsort), inplast, (int)((inpp - inpsort) * 100 /
 141                             inplast));
 142                         got_siginfo = 0;
 143                 }
 144                 inp = *inpp;
 145                 if (inp->i_isize == 0)
 146                         continue;
 147                 if (inp->i_isize < MINDIRSIZE) {
 148                         direrror(inp->i_number, "DIRECTORY TOO SHORT");
 149                         inp->i_isize = roundup(MINDIRSIZE, DIRBLKSIZ);
 150                         if (reply("FIX") == 1) {
 151                                 dp = ginode(inp->i_number);
 152                                 dp->di_size = inp->i_isize;
 153                                 inodirty();
 154                                 dp = &dino;
 155                         }
 156                 } else if ((inp->i_isize & (DIRBLKSIZ - 1)) != 0) {
 157                         getpathname(pathbuf, inp->i_number, inp->i_number);
 158                         if (usedsoftdep)
 159                                 pfatal("%s %s: LENGTH %zu NOT MULTIPLE OF %d",
 160                                         "DIRECTORY", pathbuf, inp->i_isize,
 161                                         DIRBLKSIZ);
 162                         else
 163                                 pwarn("%s %s: LENGTH %zu NOT MULTIPLE OF %d",
 164                                         "DIRECTORY", pathbuf, inp->i_isize,
 165                                         DIRBLKSIZ);
 166                         if (preen)
 167                                 printf(" (ADJUSTED)\n");
 168                         inp->i_isize = roundup(inp->i_isize, DIRBLKSIZ);
 169                         if (preen || reply("ADJUST") == 1) {
 170                                 dp = ginode(inp->i_number);
 171                                 dp->di_size = roundup(inp->i_isize, DIRBLKSIZ);
 172                                 inodirty();
 173                                 dp = &dino;
 174                         }
 175                 }
 176                 memset(&dino, 0, sizeof(struct ufs1_dinode));
 177                 dino.di_mode = IFDIR;
 178                 dp->di_size = inp->i_isize;
 179                 memmove(&dp->di_db[0], &inp->i_blks[0], (size_t)inp->i_numblks);
 180                 curino.id_number = inp->i_number;
 181                 curino.id_parent = inp->i_parent;
 182                 ckinode(dp, &curino);
 183         }
 184         /*
 185          * Now that the parents of all directories have been found,
 186          * make another pass to verify the value of `..'
 187          */
 188         for (inpp = inpsort; inpp < inpend; inpp++) {
 189                 inp = *inpp;
 190                 if (inp->i_parent == 0 || inp->i_isize == 0)
 191                         continue;
 192                 if (inoinfo(inp->i_parent)->ino_state == DFOUND &&
 193                     inoinfo(inp->i_number)->ino_state == DSTATE)
 194                         inoinfo(inp->i_number)->ino_state = DFOUND;
 195                 if (inp->i_dotdot == inp->i_parent ||
 196                     inp->i_dotdot == (ufs1_ino_t)-1)
 197                         continue;
 198                 if (inp->i_dotdot == 0) {
 199                         inp->i_dotdot = inp->i_parent;
 200                         fileerror(inp->i_parent, inp->i_number, "MISSING '..'");
 201                         if (reply("FIX") == 0)
 202                                 continue;
 203                         makeentry(inp->i_number, inp->i_parent, "..");
 204                         inoinfo(inp->i_parent)->ino_linkcnt--;
 205                         continue;
 206                 }
 207                 fileerror(inp->i_parent, inp->i_number,
 208                     "BAD INODE NUMBER FOR '..'");
 209                 if (reply("FIX") == 0)
 210                         continue;
 211                 inoinfo(inp->i_dotdot)->ino_linkcnt++;
 212                 inoinfo(inp->i_parent)->ino_linkcnt--;
 213                 inp->i_dotdot = inp->i_parent;
 214                 changeino(inp->i_number, "..", inp->i_parent);
 215         }
 216         /*
 217          * Mark all the directories that can be found from the root.
 218          */
 219         propagate();
 220 }
 221
 222 static int
 223 pass2check(struct inodesc *idesc)
 224 {
 225         struct direct *dirp = idesc->id_dirp;
 226         struct inoinfo *inp;
 227         int n, entrysize, ret = 0;
 228         struct ufs1_dinode *dp;
 229         char *errmsg;
 230         struct direct proto;
 231         char namebuf[MAXPATHLEN + 1];
 232         char pathbuf[MAXPATHLEN + 1];
 233
 234         /*
 235          * If converting, set directory entry type.
 236          */
 237         if (doinglevel2 && dirp->d_ino > 0 && dirp->d_ino < maxino) {
 238                 dirp->d_type = inoinfo(dirp->d_ino)->ino_type;
 239                 ret |= ALTERED;
 240         }
 241         /*
 242          * check for "."
 243          */
 244         if (idesc->id_entryno != 0)
 245                 goto chk1;
 246         if (dirp->d_ino != 0 && strcmp(dirp->d_name, ".") == 0) {
 247                 if (dirp->d_ino != idesc->id_number) {
 248                         direrror(idesc->id_number, "BAD INODE NUMBER FOR '.'");
 249                         dirp->d_ino = idesc->id_number;
 250                         if (reply("FIX") == 1)
 251                                 ret |= ALTERED;
 252                 }
 253                 if (newinofmt && dirp->d_type != DT_DIR) {
 254                         direrror(idesc->id_number, "BAD TYPE VALUE FOR '.'");
 255                         dirp->d_type = DT_DIR;
 256                         if (reply("FIX") == 1)
 257                                 ret |= ALTERED;
 258                 }
 259                 goto chk1;
 260         }
 261         direrror(idesc->id_number, "MISSING '.'");
 262         proto.d_ino = idesc->id_number;
 263         if (newinofmt)
 264                 proto.d_type = DT_DIR;
 265         else
 266                 proto.d_type = 0;
 267         proto.d_namlen = 1;
 268         strcpy(proto.d_name, ".");
 269 #       if BYTE_ORDER == LITTLE_ENDIAN
 270                 if (!newinofmt) {
 271                         u_char tmp;
 272
 273                         tmp = proto.d_type;
 274                         proto.d_type = proto.d_namlen;
 275                         proto.d_namlen = tmp;
 276                 }
 277 #       endif
 278         entrysize = DIRSIZ(0, &proto);
 279         if (dirp->d_ino != 0 && strcmp(dirp->d_name, "..") != 0) {
 280                 pfatal("CANNOT FIX, FIRST ENTRY IN DIRECTORY CONTAINS %s\n",
 281                         dirp->d_name);
 282         } else if (dirp->d_reclen < entrysize) {
 283                 pfatal("CANNOT FIX, INSUFFICIENT SPACE TO ADD '.'\n");
 284         } else if (dirp->d_reclen < 2 * entrysize) {
 285                 proto.d_reclen = dirp->d_reclen;
 286                 memmove(dirp, &proto, (size_t)entrysize);
 287                 if (reply("FIX") == 1)
 288                         ret |= ALTERED;
 289         } else {
 290                 n = dirp->d_reclen - entrysize;
 291                 proto.d_reclen = entrysize;
 292                 memmove(dirp, &proto, (size_t)entrysize);
 293                 idesc->id_entryno++;
 294                 inoinfo(dirp->d_ino)->ino_linkcnt--;
 295                 dirp = (struct direct *)((char *)(dirp) + entrysize);
 296                 memset(dirp, 0, (size_t)n);
 297                 dirp->d_reclen = n;
 298                 if (reply("FIX") == 1)
 299                         ret |= ALTERED;
 300         }
 301 chk1:
 302         if (idesc->id_entryno > 1)
 303                 goto chk2;
 304         inp = getinoinfo(idesc->id_number);
 305         proto.d_ino = inp->i_parent;
 306         if (newinofmt)
 307                 proto.d_type = DT_DIR;
 308         else
 309                 proto.d_type = 0;
 310         proto.d_namlen = 2;
 311         strcpy(proto.d_name, "..");
 312 #       if BYTE_ORDER == LITTLE_ENDIAN
 313                 if (!newinofmt) {
 314                         u_char tmp;
 315
 316                         tmp = proto.d_type;
 317                         proto.d_type = proto.d_namlen;
 318                         proto.d_namlen = tmp;
 319                 }
 320 #       endif
 321         entrysize = DIRSIZ(0, &proto);
 322         if (idesc->id_entryno == 0) {
 323                 n = DIRSIZ(0, dirp);
 324                 if (dirp->d_reclen < n + entrysize)
 325                         goto chk2;
 326                 proto.d_reclen = dirp->d_reclen - n;
 327                 dirp->d_reclen = n;
 328                 idesc->id_entryno++;
 329                 inoinfo(dirp->d_ino)->ino_linkcnt--;
 330                 dirp = (struct direct *)((char *)(dirp) + n);
 331                 memset(dirp, 0, (size_t)proto.d_reclen);
 332                 dirp->d_reclen = proto.d_reclen;
 333         }
 334         if (dirp->d_ino != 0 && strcmp(dirp->d_name, "..") == 0) {
 335                 inp->i_dotdot = dirp->d_ino;
 336                 if (newinofmt && dirp->d_type != DT_DIR) {
 337                         direrror(idesc->id_number, "BAD TYPE VALUE FOR '..'");
 338                         dirp->d_type = DT_DIR;
 339                         if (reply("FIX") == 1)
 340                                 ret |= ALTERED;
 341                 }
 342                 goto chk2;
 343         }
 344         if (dirp->d_ino != 0 && strcmp(dirp->d_name, ".") != 0) {
 345                 fileerror(inp->i_parent, idesc->id_number, "MISSING '..'");
 346                 pfatal("CANNOT FIX, SECOND ENTRY IN DIRECTORY CONTAINS %s\n",
 347                         dirp->d_name);
 348                 inp->i_dotdot = (ufs1_ino_t)-1;
 349         } else if (dirp->d_reclen < entrysize) {
 350                 fileerror(inp->i_parent, idesc->id_number, "MISSING '..'");
 351                 pfatal("CANNOT FIX, INSUFFICIENT SPACE TO ADD '..'\n");
 352                 inp->i_dotdot = (ufs1_ino_t)-1;
 353         } else if (inp->i_parent != 0) {
 354                 /*
 355                  * We know the parent, so fix now.
 356                  */
 357                 inp->i_dotdot = inp->i_parent;
 358                 fileerror(inp->i_parent, idesc->id_number, "MISSING '..'");
 359                 proto.d_reclen = dirp->d_reclen;
 360                 memmove(dirp, &proto, (size_t)entrysize);
 361                 if (reply("FIX") == 1)
 362                         ret |= ALTERED;
 363         }
 364         idesc->id_entryno++;
 365         if (dirp->d_ino != 0)
 366                 inoinfo(dirp->d_ino)->ino_linkcnt--;
 367         return (ret|KEEPON);
 368 chk2:
 369         if (dirp->d_ino == 0)
 370                 return (ret|KEEPON);
 371         if (dirp->d_namlen <= 2 &&
 372             dirp->d_name[0] == '.' &&
 373             idesc->id_entryno >= 2) {
 374                 if (dirp->d_namlen == 1) {
 375                         direrror(idesc->id_number, "EXTRA '.' ENTRY");
 376                         dirp->d_ino = 0;
 377                         if (reply("FIX") == 1)
 378                                 ret |= ALTERED;
 379                         return (KEEPON | ret);
 380                 }
 381                 if (dirp->d_name[1] == '.') {
 382                         direrror(idesc->id_number, "EXTRA '..' ENTRY");
 383                         dirp->d_ino = 0;
 384                         if (reply("FIX") == 1)
 385                                 ret |= ALTERED;
 386                         return (KEEPON | ret);
 387                 }
 388         }
 389         idesc->id_entryno++;
 390         n = 0;
 391         if (dirp->d_ino > maxino) {
 392                 fileerror(idesc->id_number, dirp->d_ino, "I OUT OF RANGE");
 393                 n = reply("REMOVE");
 394         } else if (newinofmt &&
 395                    ((dirp->d_ino == UFS_WINO && dirp->d_type != DT_WHT) ||
 396                     (dirp->d_ino != UFS_WINO && dirp->d_type == DT_WHT))) {
 397                 fileerror(idesc->id_number, dirp->d_ino, "BAD WHITEOUT ENTRY");
 398                 dirp->d_ino = UFS_WINO;
 399                 dirp->d_type = DT_WHT;
 400                 if (reply("FIX") == 1)
 401                         ret |= ALTERED;
 402         } else {
 403 again:
 404                 switch (inoinfo(dirp->d_ino)->ino_state) {
 405                 case USTATE:
 406                         if (idesc->id_entryno <= 2)
 407                                 break;
 408                         fileerror(idesc->id_number, dirp->d_ino, "UNALLOCATED");
 409                         n = reply("REMOVE");
 410                         break;
 411
 412                 case DCLEAR:
 413                 case FCLEAR:
 414                         if (idesc->id_entryno <= 2)
 415                                 break;
 416                         if (inoinfo(dirp->d_ino)->ino_state == FCLEAR)
 417                                 errmsg = "DUP/BAD";
 418                         else if (!preen && !usedsoftdep)
 419                                 errmsg = "ZERO LENGTH DIRECTORY";
 420                         else {
 421                                 n = 1;
 422                                 break;
 423                         }
 424                         fileerror(idesc->id_number, dirp->d_ino, errmsg);
 425                         if ((n = reply("REMOVE")) == 1)
 426                                 break;
 427                         dp = ginode(dirp->d_ino);
 428                         inoinfo(dirp->d_ino)->ino_state =
 429                             (dp->di_mode & IFMT) == IFDIR ? DSTATE : FSTATE;
 430                         inoinfo(dirp->d_ino)->ino_linkcnt = dp->di_nlink;
 431                         goto again;
 432
 433                 case DSTATE:
 434                         if (inoinfo(idesc->id_number)->ino_state == DFOUND)
 435                                 inoinfo(dirp->d_ino)->ino_state = DFOUND;
 436                         /* fall through */
 437
 438                 case DFOUND:
 439                         inp = getinoinfo(dirp->d_ino);
 440                         if (inp->i_parent != 0 && idesc->id_entryno > 2) {
 441                                 getpathname(pathbuf, idesc->id_number,
 442                                     idesc->id_number);
 443                                 getpathname(namebuf, dirp->d_ino, dirp->d_ino);
 444                                 pwarn("%s%s%s %s %s\n", pathbuf,
 445                                     (strcmp(pathbuf, "/") == 0 ? "" : "/"),
 446                                     dirp->d_name,
 447                                     "IS AN EXTRANEOUS HARD LINK TO DIRECTORY",
 448                                     namebuf);
 449                                 if (preen) {
 450                                         printf(" (REMOVED)\n");
 451                                         n = 1;
 452                                         break;
 453                                 }
 454                                 if ((n = reply("REMOVE")) == 1)
 455                                         break;
 456                         }
 457                         if (idesc->id_entryno > 2)
 458                                 inp->i_parent = idesc->id_number;
 459                         /* fall through */
 460
 461                 case FSTATE:
 462                         if (newinofmt &&
 463                             dirp->d_type != inoinfo(dirp->d_ino)->ino_type) {
 464                                 fileerror(idesc->id_number, dirp->d_ino,
 465                                     "BAD TYPE VALUE");
 466                                 dirp->d_type = inoinfo(dirp->d_ino)->ino_type;
 467                                 if (reply("FIX") == 1)
 468                                         ret |= ALTERED;
 469                         }
 470                         inoinfo(dirp->d_ino)->ino_linkcnt--;
 471                         break;
 472
 473                 default:
 474                         errx(EEXIT, "BAD STATE %d FOR INODE I=%d",
 475                             inoinfo(dirp->d_ino)->ino_state, dirp->d_ino);
 476                 }
 477         }
 478         if (n == 0)
 479                 return (ret|KEEPON);
 480         dirp->d_ino = 0;
 481         return (ret|KEEPON|ALTERED);
 482 }
 483
 484 /*
 485  * Routine to sort disk blocks.
 486  */
 487 static int
 488 blksort(const void *arg1, const void *arg2)
 489 {
 490
 491         return ((*(struct inoinfo **)arg1)->i_blks[0] -
 492                 (*(struct inoinfo **)arg2)->i_blks[0]);
 493 }