Home | History | Annotate | Line # | Download | only in kern
init_main.c revision 1.75
      1 /*	$NetBSD: init_main.c,v 1.75 1995/03/19 23:27:03 mycroft Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1982, 1986, 1989, 1991, 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  * (c) UNIX System Laboratories, Inc.
      7  * All or some portions of this file are derived from material licensed
      8  * to the University of California by American Telephone and Telegraph
      9  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
     10  * the permission of UNIX System Laboratories, Inc.
     11  *
     12  * Redistribution and use in source and binary forms, with or without
     13  * modification, are permitted provided that the following conditions
     14  * are met:
     15  * 1. Redistributions of source code must retain the above copyright
     16  *    notice, this list of conditions and the following disclaimer.
     17  * 2. Redistributions in binary form must reproduce the above copyright
     18  *    notice, this list of conditions and the following disclaimer in the
     19  *    documentation and/or other materials provided with the distribution.
     20  * 3. All advertising materials mentioning features or use of this software
     21  *    must display the following acknowledgement:
     22  *	This product includes software developed by the University of
     23  *	California, Berkeley and its contributors.
     24  * 4. Neither the name of the University nor the names of its contributors
     25  *    may be used to endorse or promote products derived from this software
     26  *    without specific prior written permission.
     27  *
     28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     38  * SUCH DAMAGE.
     39  *
     40  *	@(#)init_main.c	8.9 (Berkeley) 1/21/94
     41  */
     42 
     43 #include <sys/param.h>
     44 #include <sys/filedesc.h>
     45 #include <sys/errno.h>
     46 #include <sys/exec.h>
     47 #include <sys/kernel.h>
     48 #include <sys/mount.h>
     49 #include <sys/map.h>
     50 #include <sys/proc.h>
     51 #include <sys/resourcevar.h>
     52 #include <sys/signalvar.h>
     53 #include <sys/systm.h>
     54 #include <sys/vnode.h>
     55 #include <sys/conf.h>
     56 #include <sys/buf.h>
     57 #ifdef REAL_CLISTS
     58 #include <sys/clist.h>
     59 #endif
     60 #include <sys/device.h>
     61 #include <sys/protosw.h>
     62 #include <sys/reboot.h>
     63 #include <sys/user.h>
     64 
     65 #include <sys/syscallargs.h>
     66 
     67 #include <ufs/ufs/quota.h>
     68 
     69 #include <machine/cpu.h>
     70 
     71 #include <vm/vm.h>
     72 
     73 char	copyright[] =
     74 "Copyright (c) 1982, 1986, 1989, 1991, 1993\n\tThe Regents of the University of California.  All rights reserved.\n\n";
     75 
     76 /* Components of the first process -- never freed. */
     77 struct	session session0;
     78 struct	pgrp pgrp0;
     79 struct	proc proc0;
     80 struct	pcred cred0;
     81 struct	filedesc0 filedesc0;
     82 struct	plimit limit0;
     83 struct	vmspace vmspace0;
     84 struct	proc *curproc = &proc0;
     85 struct	proc *initproc, *pageproc;
     86 
     87 int	cmask = CMASK;
     88 extern	struct user *proc0paddr;
     89 
     90 struct	vnode *rootvp, *swapdev_vp;
     91 int	boothowto;
     92 struct	timeval boottime;
     93 struct	timeval runtime;
     94 
     95 static void start_init __P((struct proc *p, void *framep));
     96 
     97 /*
     98  * System startup; initialize the world, create process 0, mount root
     99  * filesystem, and fork to create init and pagedaemon.  Most of the
    100  * hard work is done in the lower-level initialization routines including
    101  * startup(), which does memory initialization and autoconfiguration.
    102  */
    103 int
    104 main(framep)
    105 	void *framep;
    106 {
    107 	register struct proc *p;
    108 	register struct filedesc0 *fdp;
    109 	register struct pdevinit *pdev;
    110 	register int i;
    111 	int s;
    112 	register_t rval[2];
    113 	extern int (*mountroot) __P((void));
    114 	extern struct pdevinit pdevinit[];
    115 	extern void roundrobin __P((void *));
    116 	extern void schedcpu __P((void *));
    117 
    118 	/*
    119 	 * Initialize the current process pointer (curproc) before
    120 	 * any possible traps/probes to simplify trap processing.
    121 	 */
    122 	p = &proc0;
    123 	curproc = p;
    124 	/*
    125 	 * Attempt to find console and initialize
    126 	 * in case of early panic or other messages.
    127 	 */
    128 	consinit();
    129 	printf(copyright);
    130 
    131 	vm_mem_init();
    132 	kmeminit();
    133 	cpu_startup();
    134 
    135 	/*
    136 	 * Initialize process and pgrp structures.
    137 	 */
    138 	procinit();
    139 
    140 	/*
    141 	 * Create process 0 (the swapper).
    142 	 */
    143 	LIST_INSERT_HEAD(&allproc, p, p_list);
    144 	p->p_pgrp = &pgrp0;
    145 	LIST_INSERT_HEAD(PGRPHASH(0), &pgrp0, pg_hash);
    146 	LIST_INIT(&pgrp0.pg_members);
    147 	LIST_INSERT_HEAD(&pgrp0.pg_members, p, p_pglist);
    148 
    149 	pgrp0.pg_session = &session0;
    150 	session0.s_count = 1;
    151 	session0.s_leader = p;
    152 
    153 	p->p_flag = P_INMEM | P_SYSTEM;
    154 	p->p_stat = SRUN;
    155 	p->p_nice = NZERO;
    156 	bcopy("swapper", p->p_comm, sizeof ("swapper"));
    157 
    158 	/* Create credentials. */
    159 	cred0.p_refcnt = 1;
    160 	p->p_cred = &cred0;
    161 	p->p_ucred = crget();
    162 	p->p_ucred->cr_ngroups = 1;	/* group 0 */
    163 
    164 	/* Create the file descriptor table. */
    165 	fdp = &filedesc0;
    166 	p->p_fd = &fdp->fd_fd;
    167 	fdp->fd_fd.fd_refcnt = 1;
    168 	fdp->fd_fd.fd_cmask = cmask;
    169 	fdp->fd_fd.fd_ofiles = fdp->fd_dfiles;
    170 	fdp->fd_fd.fd_ofileflags = fdp->fd_dfileflags;
    171 	fdp->fd_fd.fd_nfiles = NDFILE;
    172 
    173 	/* Create the limits structures. */
    174 	p->p_limit = &limit0;
    175 	for (i = 0; i < sizeof(p->p_rlimit)/sizeof(p->p_rlimit[0]); i++)
    176 		limit0.pl_rlimit[i].rlim_cur =
    177 		    limit0.pl_rlimit[i].rlim_max = RLIM_INFINITY;
    178 	limit0.pl_rlimit[RLIMIT_NOFILE].rlim_cur = NOFILE;
    179 	limit0.pl_rlimit[RLIMIT_NPROC].rlim_cur = MAXUPRC;
    180 	i = ptoa(cnt.v_free_count);
    181 	limit0.pl_rlimit[RLIMIT_RSS].rlim_max = i;
    182 	limit0.pl_rlimit[RLIMIT_MEMLOCK].rlim_max = i;
    183 	limit0.pl_rlimit[RLIMIT_MEMLOCK].rlim_cur = i / 3;
    184 	limit0.p_refcnt = 1;
    185 
    186 	/* Allocate a prototype map so we have something to fork. */
    187 	p->p_vmspace = &vmspace0;
    188 	vmspace0.vm_refcnt = 1;
    189 	pmap_pinit(&vmspace0.vm_pmap);
    190 	vm_map_init(&p->p_vmspace->vm_map, round_page(VM_MIN_ADDRESS),
    191 	    trunc_page(VM_MAX_ADDRESS), TRUE);
    192 	vmspace0.vm_map.pmap = &vmspace0.vm_pmap;
    193 	p->p_addr = proc0paddr;				/* XXX */
    194 
    195 	/*
    196 	 * We continue to place resource usage info and signal
    197 	 * actions in the user struct so they're pageable.
    198 	 */
    199 	p->p_stats = &p->p_addr->u_stats;
    200 	p->p_sigacts = &p->p_addr->u_sigacts;
    201 
    202 	/*
    203 	 * Charge root for one process.
    204 	 */
    205 	(void)chgproccnt(0, 1);
    206 
    207 	rqinit();
    208 
    209 	/* Configure virtual memory system, set vm rlimits. */
    210 	vm_init_limits(p);
    211 
    212 	/* Initialize the file systems. */
    213 	vfsinit();
    214 
    215 	/* Start real time and statistics clocks. */
    216 	initclocks();
    217 
    218 	/* Initialize mbuf's. */
    219 	mbinit();
    220 
    221 #ifdef REAL_CLISTS
    222 	/* Initialize clists. */
    223 	clist_init();
    224 #endif
    225 
    226 #ifdef SYSVSHM
    227 	/* Initialize System V style shared memory. */
    228 	shminit();
    229 #endif
    230 
    231 #ifdef SYSVSEM
    232 	/* Initialize System V style semaphores. */
    233 	seminit();
    234 #endif
    235 
    236 #ifdef SYSVMSG
    237 	/* Initialize System V style message queues. */
    238 	msginit();
    239 #endif
    240 
    241 	/* Attach pseudo-devices. */
    242 	for (pdev = pdevinit; pdev->pdev_attach != NULL; pdev++)
    243 		(*pdev->pdev_attach)(pdev->pdev_count);
    244 
    245 	/*
    246 	 * Initialize protocols.  Block reception of incoming packets
    247 	 * until everything is ready.
    248 	 */
    249 	s = splimp();
    250 	ifinit();
    251 	domaininit();
    252 	splx(s);
    253 
    254 #ifdef GPROF
    255 	/* Initialize kernel profiling. */
    256 	kmstartup();
    257 #endif
    258 
    259 	/* Kick off timeout driven events by calling first time. */
    260 	roundrobin(NULL);
    261 	schedcpu(NULL);
    262 
    263 	/* Mount the root file system. */
    264 	if ((*mountroot)())
    265 		panic("cannot mount root");
    266 	mountlist.cqh_first->mnt_flag |= MNT_ROOTFS;
    267 	mountlist.cqh_first->mnt_op->vfs_refcount++;
    268 
    269 	/* Get the vnode for '/'.  Set fdp->fd_fd.fd_cdir to reference it. */
    270 	if (VFS_ROOT(mountlist.cqh_first, &rootvnode))
    271 		panic("cannot find root vnode");
    272 	fdp->fd_fd.fd_cdir = rootvnode;
    273 	VREF(fdp->fd_fd.fd_cdir);
    274 	VOP_UNLOCK(rootvnode);
    275 	fdp->fd_fd.fd_rdir = NULL;
    276 	swapinit();
    277 
    278 	/*
    279 	 * Now can look at time, having had a chance to verify the time
    280 	 * from the file system.  Reset p->p_rtime as it may have been
    281 	 * munched in mi_switch() after the time got set.
    282 	 */
    283 	p->p_stats->p_start = runtime = mono_time = boottime = time;
    284 	p->p_rtime.tv_sec = p->p_rtime.tv_usec = 0;
    285 
    286 	/* Initialize signal state for process 0. */
    287 	siginit(p);
    288 
    289 	/* Create process 1 (init(8)). */
    290 	if (fork(p, NULL, rval))
    291 		panic("fork init");
    292 	if (rval[1]) {
    293 		start_init(curproc, framep);
    294 		return;
    295 	}
    296 
    297 	/* Create process 2 (the pageout daemon). */
    298 	if (fork(p, NULL, rval))
    299 		panic("fork pager");
    300 	if (rval[1]) {
    301 		/*
    302 		 * Now in process 2.
    303 		 */
    304 		p = curproc;
    305 		pageproc = p;
    306 		p->p_flag |= P_INMEM | P_SYSTEM;	/* XXX */
    307 		bcopy("pagedaemon", curproc->p_comm, sizeof ("pagedaemon"));
    308 		vm_pageout();
    309 		/* NOTREACHED */
    310 	}
    311 
    312 	/* The scheduler is an infinite loop. */
    313 	scheduler();
    314 	/* NOTREACHED */
    315 }
    316 
    317 /*
    318  * List of paths to try when searching for "init".
    319  */
    320 static char *initpaths[] = {
    321 	"/sbin/init",
    322 	"/sbin/oinit",
    323 	"/sbin/init.bak",
    324 	NULL,
    325 };
    326 
    327 /*
    328  * Start the initial user process; try exec'ing each pathname in "initpaths".
    329  * The program is invoked with one argument containing the boot flags.
    330  */
    331 static void
    332 start_init(p, framep)
    333 	struct proc *p;
    334 	void *framep;
    335 {
    336 	vm_offset_t addr;
    337 	struct execve_args /* {
    338 		syscallarg(char *) path;
    339 		syscallarg(char **) argp;
    340 		syscallarg(char **) envp;
    341 	} */ args;
    342 	int options, i, error;
    343 	register_t retval[2];
    344 	char flags[4], *flagsp;
    345 	char **pathp, *path, *ucp, **uap, *arg0, *arg1;
    346 
    347 	initproc = p;
    348 
    349 	/*
    350 	 * We need to set the system call frame as if we were entered through
    351 	 * a syscall() so that when we call execve() below, it will be able
    352 	 * to set the entry point (see setregs) when it tries to exec.  The
    353 	 * startup code in "locore.s" has allocated space for the frame and
    354 	 * passed a pointer to that space as main's argument.
    355 	 */
    356 	cpu_set_init_frame(p, framep);
    357 
    358 	/*
    359 	 * Need just enough stack to hold the faked-up "execve()" arguments.
    360 	 */
    361 	addr = USRSTACK - PAGE_SIZE;
    362 	if (vm_allocate(&p->p_vmspace->vm_map, &addr, (vm_size_t)PAGE_SIZE,
    363 	    FALSE) != 0)
    364 		panic("init: couldn't allocate argument space");
    365 	p->p_vmspace->vm_maxsaddr = (caddr_t)addr;
    366 
    367 	for (pathp = &initpaths[0]; (path = *pathp) != NULL; pathp++) {
    368 		ucp = (char *)(addr + PAGE_SIZE);
    369 
    370 		/*
    371 		 * Construct the boot flag argument.
    372 		 */
    373 		flagsp = flags;
    374 		*flagsp++ = '-';
    375 		options = 0;
    376 
    377 		if (boothowto & RB_SINGLE) {
    378 			*flagsp++ = 's';
    379 			options = 1;
    380 		}
    381 #ifdef notyet
    382 		if (boothowto & RB_FASTBOOT) {
    383 			*flagsp++ = 'f';
    384 			options = 1;
    385 		}
    386 #endif
    387 
    388 		/*
    389 		 * Move out the flags (arg 1), if necessary.
    390 		 */
    391 		if (options != 0) {
    392 			*flagsp++ = '\0';
    393 			i = flagsp - flags;
    394 #ifdef DEBUG
    395 			printf("init: copying out flags `%s' %d\n", flags, i);
    396 #endif
    397 			(void)copyout((caddr_t)flags, (caddr_t)(ucp -= i), i);
    398 			arg1 = ucp;
    399 		}
    400 
    401 		/*
    402 		 * Move out the file name (also arg 0).
    403 		 */
    404 		i = strlen(path) + 1;
    405 #ifdef DEBUG
    406 		printf("init: copying out path `%s' %d\n", path, i);
    407 #endif
    408 		(void)copyout((caddr_t)path, (caddr_t)(ucp -= i), i);
    409 		arg0 = ucp;
    410 
    411 		/*
    412 		 * Move out the arg pointers.
    413 		 */
    414 		uap = (char **)((long)ucp & ~ALIGNBYTES);
    415 		(void)suword((caddr_t)--uap, 0);	/* terminator */
    416 		if (options != 0)
    417 			(void)suword((caddr_t)--uap, (long)arg1);
    418 		(void)suword((caddr_t)--uap, (long)arg0);
    419 
    420 		/*
    421 		 * Point at the arguments.
    422 		 */
    423 		SCARG(&args, path) = arg0;
    424 		SCARG(&args, argp) = uap;
    425 		SCARG(&args, envp) = NULL;
    426 
    427 		/*
    428 		 * Now try to exec the program.  If can't for any reason
    429 		 * other than it doesn't exist, complain.
    430 		 */
    431 		if ((error = execve(p, &args, retval)) == 0)
    432 			return;
    433 		if (error != ENOENT)
    434 			printf("exec %s: error %d\n", path, error);
    435 	}
    436 	printf("init: not found\n");
    437 	panic("no init");
    438 }
    439