sys/kern/vfs_mount.c

   1 /*-
   2  * Copyright (c) 1999 Michael Smith
   3  * All rights reserved.
   4  * Copyright (c) 1999 Poul-Henning Kamp
   5  * 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  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  *      $FreeBSD$
  29  */
  30
  31 /*
  32  * Locate and mount the root filesystem.
  33  *
  34  * The root filesystem is detailed in the kernel environment variable
  35  * vfs.root.mountfrom, which is expected to be in the general format
  36  *
  37  * <vfsname>:[<path>]
  38  * vfsname   := the name of a VFS known to the kernel and capable
  39  *              of being mounted as root
  40  * path      := disk device name or other data used by the filesystem
  41  *              to locate its physical store
  42  *
  43  */
  44
  45 #include <sys/param.h>
  46 #include <sys/kernel.h>
  47 #include <sys/systm.h>
  48 #include <sys/proc.h>
  49 #include <sys/vnode.h>
  50 #include <sys/mount.h>
  51 #include <sys/malloc.h>
  52 #include <sys/reboot.h>
  53 #include <sys/diskslice.h>
  54 #include <sys/disklabel.h>
  55 #include <sys/conf.h>
  56 #include <sys/cons.h>
  57
  58 MALLOC_DEFINE(M_MOUNT, "mount", "vfs mount structure");
  59
  60 #define ROOTNAME        "root_device"
  61
  62 struct vnode    *rootvnode;
  63
  64 /*
  65  * The root specifiers we will try if RB_CDROM is specified.
  66  */
  67 static char *cdrom_rootdevnames[] = {
  68         "cd9660:cd0a",
  69         "cd9660:acd0a",
  70         "cd9660:wcd0a",
  71         NULL
  72 };
  73
  74 static void     vfs_mountroot(void *junk);
  75 static int      vfs_mountroot_try(char *mountfrom);
  76 static int      vfs_mountroot_ask(void);
  77 static void     gets(char *cp);
  78
  79 /* legacy find-root code */
  80 char            *rootdevnames[2] = {NULL, NULL};
  81 static int      setrootbyname(char *name);
  82
  83 SYSINIT(mountroot, SI_SUB_MOUNT_ROOT, SI_ORDER_SECOND, vfs_mountroot, NULL);
  84
  85 /*
  86  * Find and mount the root filesystem
  87  */
  88 static void
  89 vfs_mountroot(void *junk)
  90 {
  91         int             i;
  92
  93         /*
  94          * The root filesystem information is compiled in, and we are
  95          * booted with instructions to use it.
  96          */
  97 #ifdef ROOTDEVNAME
  98         if ((boothowto & RB_DFLTROOT) &&
  99             !vfs_mountroot_try(ROOTDEVNAME))
 100                 return;
 101 #endif
 102         /*
 103          * We are booted with instructions to prompt for the root filesystem,
 104          * or to use the compiled-in default when it doesn't exist.
 105          */
 106         if (boothowto & (RB_DFLTROOT | RB_ASKNAME)) {
 107                 if (!vfs_mountroot_ask())
 108                         return;
 109         }
 110
 111         /*
 112          * We've been given the generic "use CDROM as root" flag.  This is
 113          * necessary because one media may be used in many different
 114          * devices, so we need to search for them.
 115          */
 116         if (boothowto & RB_CDROM) {
 117                 for (i = 0; cdrom_rootdevnames[i] != NULL; i++) {
 118                         if (!vfs_mountroot_try(cdrom_rootdevnames[i]))
 119                                 return;
 120                 }
 121         }
 122
 123         /*
 124          * Try to use the value read by the loader from /etc/fstab, or
 125          * supplied via some other means.  This is the preferred
 126          * mechanism.
 127          */
 128         if (!vfs_mountroot_try(getenv("vfs.root.mountfrom")))
 129                 return;
 130
 131         /*
 132          * Try values that may have been computed by the machine-dependant
 133          * legacy code.
 134          */
 135         if (!vfs_mountroot_try(rootdevnames[0]))
 136                 return;
 137         if (!vfs_mountroot_try(rootdevnames[1]))
 138                 return;
 139
 140         /*
 141          * If we have a compiled-in default, and haven't already tried it, try
 142          * it now.
 143          */
 144 #ifdef ROOTDEVNAME
 145         if (!(boothowto & RB_DFLTROOT))
 146                 if (!vfs_mountroot_try(ROOTDEVNAME))
 147                         return;
 148 #endif
 149
 150         /*
 151          * Everything so far has failed, prompt on the console if we haven't
 152          * already tried that.
 153          */
 154         if (!(boothowto & (RB_DFLTROOT | RB_ASKNAME)) && !vfs_mountroot_ask())
 155                 return;
 156         panic("Root mount failed, startup aborted.");
 157 }
 158
 159 /*
 160  * Mount (mountfrom) as the root filesystem.
 161  */
 162 static int
 163 vfs_mountroot_try(char *mountfrom)
 164 {
 165         struct mount    *mp;
 166         char            *vfsname, *path;
 167         int             error;
 168         char            patt[32];
 169
 170         vfsname = NULL;
 171         path    = NULL;
 172         mp      = NULL;
 173         error   = EINVAL;
 174
 175         if (mountfrom == NULL)
 176                 return(error);          /* don't complain */
 177
 178         printf("Mounting root from %s\n", mountfrom);
 179
 180         /* parse vfs name and path */
 181         vfsname = malloc(MFSNAMELEN, M_MOUNT, M_WAITOK);
 182         path = malloc(MNAMELEN, M_MOUNT, M_WAITOK);
 183         vfsname[0] = path[0] = 0;
 184         sprintf(patt, "%%%d[a-z0-9]:%%%ds", MFSNAMELEN, MNAMELEN);
 185         if (sscanf(mountfrom, patt, vfsname, path) < 1)
 186                 goto done;
 187
 188         /* allocate a root mount */
 189         if ((error = vfs_rootmountalloc(vfsname, ROOTNAME, &mp))) {
 190                 printf("Can't allocate root mount for filesystem '%s': %d\n",
 191                        vfsname, error);
 192                 goto done;
 193         }
 194         mp->mnt_flag |= MNT_ROOTFS;
 195
 196         /* do our best to set rootdev */
 197         if ((path[0] != 0) && setrootbyname(path))
 198                 printf("setrootbyname failed\n");
 199
 200         strcpy(mp->mnt_stat.f_mntfromname, path);
 201         error = VFS_MOUNT(mp, NULL, NULL, NULL, curproc);
 202
 203 done:
 204         if (vfsname != NULL)
 205                 free(vfsname, M_MOUNT);
 206         if (path != NULL)
 207                 free(path, M_MOUNT);
 208         if (error != 0) {
 209                 if (mp != NULL)
 210                         free(mp, M_MOUNT);
 211                 printf("Root mount failed: %d\n", error);
 212         } else {
 213
 214                 /* register with list of mounted filesystems */
 215                 simple_lock(&mountlist_slock);
 216                 TAILQ_INSERT_HEAD(&mountlist, mp, mnt_list);
 217                 simple_unlock(&mountlist_slock);
 218
 219                 /* sanity check system clock against root filesystem timestamp */
 220                 inittodr(mp->mnt_time);
 221         }
 222         if (mp != NULL)
 223                 vfs_unbusy(mp, curproc);
 224         return(error);
 225 }
 226
 227 /*
 228  * Spin prompting on the console for a suitable root filesystem
 229  */
 230 static int
 231 vfs_mountroot_ask(void)
 232 {
 233         char name[128];
 234         int i;
 235         dev_t dev;
 236
 237         for(;;) {
 238                 printf("\nManual root filesystem specification:\n");
 239                 printf("  <fstype>:<device>  Mount <device> using filesystem <fstype>\n");
 240                 printf("                       eg. ufs:/dev/da0s1a\n");
 241                 printf("  ?                  List valid disk boot devices\n");
 242                 printf("  <empty line>       Abort manual input\n");
 243                 printf("\n>>> ");
 244                 gets(name);
 245                 if (name[0] == 0)
 246                         return(1);
 247                 if (name[0] == '?') {
 248                         printf("Possibly valid devices for 'ufs' root:\n");
 249                         for (i = 0; i < NUMCDEVSW; i++) {
 250                                 dev = makebdev(i, 0);
 251                                 if (devsw(dev) != NULL)
 252                                         printf(" \"%s\"", devsw(dev)->d_name);
 253                         }
 254                         printf("\n");
 255                         continue;
 256                 }
 257                 if (!vfs_mountroot_try(name))
 258                         return(0);
 259         }
 260 }
 261
 262 static void
 263 gets(char *cp)
 264 {
 265         char *lp;
 266         int c;
 267
 268         lp = cp;
 269         for (;;) {
 270                 printf("%c", c = cngetc() & 0177);
 271                 switch (c) {
 272                 case -1:
 273                 case '\n':
 274                 case '\r':
 275                         *lp++ = '\0';
 276                         return;
 277                 case '\b':
 278                 case '\177':
 279                         if (lp > cp) {
 280                                 printf(" \b");
 281                                 lp--;
 282                         }
 283                         continue;
 284                 case '#':
 285                         lp--;
 286                         if (lp < cp)
 287                                 lp = cp;
 288                         continue;
 289                 case '@':
 290                 case 'u' & 037:
 291                         lp = cp;
 292                         printf("%c", '\n');
 293                         continue;
 294                 default:
 295                         *lp++ = c;
 296                 }
 297         }
 298 }
 299
 300 /*
 301  * Set rootdev to match (name), given that we expect it to
 302  * refer to a disk-like device.
 303  */
 304 static int
 305 setrootbyname(char *name)
 306 {
 307         char *cp;
 308         int bd, unit, slice, part;
 309         dev_t dev;
 310
 311         slice = 0;
 312         part = 0;
 313         cp = rindex(name, '/');
 314         if (cp != NULL) {
 315                 name = cp + 1;
 316         }
 317         if (*name == 'r')
 318                 name++;
 319         cp = name;
 320         while (cp != '\0' && (*cp < '0' || *cp > '9'))
 321                 cp++;
 322         if (cp == name) {
 323                 printf("missing device name\n");
 324                 return(1);
 325         }
 326         if (*cp == '\0') {
 327                 printf("missing unit number\n");
 328                 return(1);
 329         }
 330         unit = *cp - '0';
 331         *cp++ = '\0';
 332         for (bd = 0; bd < NUMCDEVSW; bd++) {
 333                 dev = makebdev(bd, 0);
 334                 if (devsw(dev) != NULL &&
 335                     strcmp(devsw(dev)->d_name, name) == 0)
 336                         goto gotit;
 337         }
 338         printf("no such device '%s'\n", name);
 339         return (2);
 340 gotit:
 341         while (*cp >= '0' && *cp <= '9')
 342                 unit += 10 * unit + *cp++ - '0';
 343         if (*cp == 's' && cp[1] >= '0' && cp[1] <= '9') {
 344                 slice = cp[1] - '0' + 1;
 345                 cp += 2;
 346         }
 347         if (*cp >= 'a' && *cp <= 'h') {
 348                 part = *cp - 'a';
 349                 cp++;
 350         }
 351         if (*cp != '\0') {
 352                 printf("junk after name\n");
 353                 return (1);
 354         }
 355         rootdev = makebdev(bd, dkmakeminor(unit, slice, part));
 356         return 0;
 357 }
 358