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