vfs_mount.c revision 54298
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: head/sys/kern/vfs_mount.c 54298 1999-12-08 10:01:18Z phk $
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
58MALLOC_DEFINE(M_MOUNT, "mount", "vfs mount structure");
59
60#define ROOTNAME	"root_device"
61
62struct vnode	*rootvnode;
63
64/*
65 * The root specifiers we will try if RB_CDROM is specified.
66 */
67static char *cdrom_rootdevnames[] = {
68	"cd9660:cd0a",
69	"cd9660:acd0a",
70	"cd9660:wcd0a",
71	NULL
72};
73
74static void	vfs_mountroot(void *junk);
75static int	vfs_mountroot_try(char *mountfrom);
76static int	vfs_mountroot_ask(void);
77static void	gets(char *cp);
78
79/* legacy find-root code */
80char		*rootdevnames[2] = {NULL, NULL};
81static int	setrootbyname(char *name);
82
83SYSINIT(mountroot, SI_SUB_MOUNT_ROOT, SI_ORDER_SECOND, vfs_mountroot, NULL);
84
85/*
86 * Find and mount the root filesystem
87 */
88static void
89vfs_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 */
162static int
163vfs_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	error = vfs_rootmountalloc(vfsname, path[0] != 0 ? path : ROOTNAME,
190				   &mp);
191	if (error != 0) {
192		printf("Can't allocate root mount for filesystem '%s': %d\n",
193		       vfsname, error);
194		goto done;
195	}
196	mp->mnt_flag |= MNT_ROOTFS;
197
198	/* do our best to set rootdev */
199	if ((path[0] != 0) && setrootbyname(path))
200		printf("setrootbyname failed\n");
201
202	/* If the root device is a type "memory disk", mount RW */
203	if (rootdev != NODEV && devsw(rootdev) &&
204	    (devsw(rootdev)->d_flags & D_MEMDISK))
205		mp->mnt_flag &= ~MNT_RDONLY;
206
207	error = VFS_MOUNT(mp, NULL, NULL, NULL, curproc);
208
209done:
210	if (vfsname != NULL)
211		free(vfsname, M_MOUNT);
212	if (path != NULL)
213		free(path, M_MOUNT);
214	if (error != 0) {
215		if (mp != NULL) {
216			vfs_unbusy(mp, curproc);
217			free(mp, M_MOUNT);
218		}
219		printf("Root mount failed: %d\n", error);
220	} else {
221
222		/* register with list of mounted filesystems */
223		simple_lock(&mountlist_slock);
224		TAILQ_INSERT_HEAD(&mountlist, mp, mnt_list);
225		simple_unlock(&mountlist_slock);
226
227		/* sanity check system clock against root filesystem timestamp */
228		inittodr(mp->mnt_time);
229		vfs_unbusy(mp, curproc);
230	}
231	return(error);
232}
233
234/*
235 * Spin prompting on the console for a suitable root filesystem
236 */
237static int
238vfs_mountroot_ask(void)
239{
240	char name[128];
241	int i;
242	dev_t dev;
243
244	for(;;) {
245		printf("\nManual root filesystem specification:\n");
246		printf("  <fstype>:<device>  Mount <device> using filesystem <fstype>\n");
247		printf("                       eg. ufs:/dev/da0s1a\n");
248		printf("  ?                  List valid disk boot devices\n");
249		printf("  <empty line>       Abort manual input\n");
250		printf("\n>>> ");
251		gets(name);
252		if (name[0] == 0)
253			return(1);
254		if (name[0] == '?') {
255			printf("Possibly valid devices for 'ufs' root:\n");
256			for (i = 0; i < NUMCDEVSW; i++) {
257				dev = makedev(i, 0);
258				if (devsw(dev) != NULL)
259					printf(" \"%s\"", devsw(dev)->d_name);
260			}
261			printf("\n");
262			continue;
263		}
264		if (!vfs_mountroot_try(name))
265			return(0);
266	}
267}
268
269static void
270gets(char *cp)
271{
272	char *lp;
273	int c;
274
275	lp = cp;
276	for (;;) {
277		printf("%c", c = cngetc() & 0177);
278		switch (c) {
279		case -1:
280		case '\n':
281		case '\r':
282			*lp++ = '\0';
283			return;
284		case '\b':
285		case '\177':
286			if (lp > cp) {
287				printf(" \b");
288				lp--;
289			}
290			continue;
291		case '#':
292			lp--;
293			if (lp < cp)
294				lp = cp;
295			continue;
296		case '@':
297		case 'u' & 037:
298			lp = cp;
299			printf("%c", '\n');
300			continue;
301		default:
302			*lp++ = c;
303		}
304	}
305}
306
307/*
308 * Set rootdev to match (name), given that we expect it to
309 * refer to a disk-like device.
310 */
311static int
312setrootbyname(char *name)
313{
314	char *cp;
315	int cd, unit, slice, part;
316	dev_t dev;
317
318	slice = 0;
319	part = 0;
320	cp = rindex(name, '/');
321	if (cp != NULL) {
322		name = cp + 1;
323	}
324	cp = name;
325	while (cp != '\0' && (*cp < '0' || *cp > '9'))
326		cp++;
327	if (cp == name) {
328		printf("missing device name\n");
329		return(1);
330	}
331	if (*cp == '\0') {
332		printf("missing unit number\n");
333		return(1);
334	}
335	unit = *cp - '0';
336	*cp++ = '\0';
337	for (cd = 0; cd < NUMCDEVSW; cd++) {
338		dev = makedev(cd, 0);
339		if (devsw(dev) != NULL &&
340		    strcmp(devsw(dev)->d_name, name) == 0)
341			goto gotit;
342	}
343	printf("no such device '%s'\n", name);
344	return (2);
345gotit:
346	while (*cp >= '0' && *cp <= '9')
347		unit += 10 * unit + *cp++ - '0';
348	if (*cp == 's' && cp[1] >= '0' && cp[1] <= '9') {
349		slice = cp[1] - '0' + 1;
350		cp += 2;
351	}
352	if (*cp >= 'a' && *cp <= 'h') {
353		part = *cp - 'a';
354		cp++;
355	}
356	if (*cp != '\0') {
357		printf("junk after name\n");
358		return (1);
359	}
360	rootdev = makedev(cd, dkmakeminor(unit, slice, part));
361	return 0;
362}
363
364