init_main.c revision 1.108 1 /* $NetBSD: init_main.c,v 1.108 1997/10/19 02:00:19 mycroft 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) 1996, 1997 The NetBSD Foundation, Inc. All rights reserved.
100 Copyright (c) 1982, 1986, 1989, 1991, 1993
101 The Regents of the University of California. All rights reserved.
102
103 ";
104
105 /* Components of the first process -- never freed. */
106 struct session session0;
107 struct pgrp pgrp0;
108 struct proc proc0;
109 struct pcred cred0;
110 struct filedesc0 filedesc0;
111 struct plimit limit0;
112 struct vmspace vmspace0;
113 struct proc *curproc = &proc0;
114 struct proc *initproc;
115
116 int cmask = CMASK;
117 extern struct user *proc0paddr;
118
119 struct vnode *rootvp, *swapdev_vp;
120 int boothowto;
121 struct timeval boottime;
122 struct timeval runtime;
123
124 static void check_console __P((struct proc *p));
125 static void start_init __P((struct proc *));
126 static void start_pagedaemon __P((struct proc *));
127 void main __P((void *));
128
129 #ifdef cpu_set_init_frame
130 void *initframep; /* XXX should go away */
131 #endif
132
133 extern char sigcode[], esigcode[];
134 #ifdef SYSCALL_DEBUG
135 extern char *syscallnames[];
136 #endif
137
138 struct emul emul_netbsd = {
139 "netbsd",
140 NULL,
141 sendsig,
142 SYS_syscall,
143 SYS_MAXSYSCALL,
144 sysent,
145 #ifdef SYSCALL_DEBUG
146 syscallnames,
147 #else
148 NULL,
149 #endif
150 0,
151 copyargs,
152 setregs,
153 sigcode,
154 esigcode,
155 };
156
157 /*
158 * System startup; initialize the world, create process 0, mount root
159 * filesystem, and fork to create init and pagedaemon. Most of the
160 * hard work is done in the lower-level initialization routines including
161 * startup(), which does memory initialization and autoconfiguration.
162 */
163 void
164 main(framep)
165 void *framep; /* XXX should go away */
166 {
167 register struct proc *p;
168 register struct pdevinit *pdev;
169 register int i;
170 int s, error;
171 register_t rval[2];
172 extern struct pdevinit pdevinit[];
173 extern void roundrobin __P((void *));
174 extern void schedcpu __P((void *));
175 extern void disk_init __P((void));
176 #if defined(NFSSERVER) || defined(NFS)
177 extern void nfs_init __P((void));
178 #endif
179
180 /*
181 * Initialize the current process pointer (curproc) before
182 * any possible traps/probes to simplify trap processing.
183 */
184 p = &proc0;
185 curproc = p;
186 /*
187 * Attempt to find console and initialize
188 * in case of early panic or other messages.
189 */
190 consinit();
191 printf(copyright);
192
193 vm_mem_init();
194 kmeminit();
195 disk_init(); /* must come before autoconfiguration */
196 tty_init(); /* initialise tty list */
197 #if NRND > 0
198 rnd_init();
199 #endif
200 config_init(); /* init autoconfiguration data structures */
201 cpu_startup();
202
203 /*
204 * Initialize process and pgrp structures.
205 */
206 procinit();
207
208 /*
209 * Create process 0 (the swapper).
210 */
211 LIST_INSERT_HEAD(&allproc, p, p_list);
212 p->p_pgrp = &pgrp0;
213 LIST_INSERT_HEAD(PGRPHASH(0), &pgrp0, pg_hash);
214 LIST_INIT(&pgrp0.pg_members);
215 LIST_INSERT_HEAD(&pgrp0.pg_members, p, p_pglist);
216
217 pgrp0.pg_session = &session0;
218 session0.s_count = 1;
219 session0.s_leader = p;
220
221 p->p_flag = P_INMEM | P_SYSTEM;
222 p->p_stat = SRUN;
223 p->p_nice = NZERO;
224 p->p_emul = &emul_netbsd;
225 bcopy("swapper", p->p_comm, sizeof ("swapper"));
226
227 /* Create credentials. */
228 cred0.p_refcnt = 1;
229 p->p_cred = &cred0;
230 p->p_ucred = crget();
231 p->p_ucred->cr_ngroups = 1; /* group 0 */
232
233 /* Create the file descriptor table. */
234 p->p_fd = &filedesc0.fd_fd;
235 filedesc0.fd_fd.fd_refcnt = 1;
236 filedesc0.fd_fd.fd_cmask = cmask;
237 filedesc0.fd_fd.fd_ofiles = filedesc0.fd_dfiles;
238 filedesc0.fd_fd.fd_ofileflags = filedesc0.fd_dfileflags;
239 filedesc0.fd_fd.fd_nfiles = NDFILE;
240
241 /* Create the limits structures. */
242 p->p_limit = &limit0;
243 for (i = 0; i < sizeof(p->p_rlimit)/sizeof(p->p_rlimit[0]); i++)
244 limit0.pl_rlimit[i].rlim_cur =
245 limit0.pl_rlimit[i].rlim_max = RLIM_INFINITY;
246 limit0.pl_rlimit[RLIMIT_NOFILE].rlim_cur = NOFILE;
247 limit0.pl_rlimit[RLIMIT_NPROC].rlim_cur = MAXUPRC;
248 i = ptoa(cnt.v_free_count);
249 limit0.pl_rlimit[RLIMIT_RSS].rlim_max = i;
250 limit0.pl_rlimit[RLIMIT_MEMLOCK].rlim_max = i;
251 limit0.pl_rlimit[RLIMIT_MEMLOCK].rlim_cur = i / 3;
252 limit0.p_refcnt = 1;
253
254 /* Allocate a prototype map so we have something to fork. */
255 p->p_vmspace = vmspace_alloc(round_page(VM_MIN_ADDRESS),
256 trunc_page(VM_MAX_ADDRESS), TRUE);
257
258 p->p_addr = proc0paddr; /* XXX */
259
260 /*
261 * We continue to place resource usage info and signal
262 * actions in the user struct so they're pageable.
263 */
264 p->p_stats = &p->p_addr->u_stats;
265 p->p_sigacts = &p->p_addr->u_sigacts;
266
267 /*
268 * Charge root for one process.
269 */
270 (void)chgproccnt(0, 1);
271
272 rqinit();
273
274 /* Configure virtual memory system, set vm rlimits. */
275 vm_init_limits(p);
276
277 /* Initialize the file systems. */
278 #if defined(NFSSERVER) || defined(NFS)
279 nfs_init(); /* initialize server/shared data */
280 #endif
281 vfsinit();
282
283 /* Start real time and statistics clocks. */
284 initclocks();
285
286 /* Initialize mbuf's. */
287 mbinit();
288
289 #ifdef REAL_CLISTS
290 /* Initialize clists. */
291 clist_init();
292 #endif
293
294 #ifdef SYSVSHM
295 /* Initialize System V style shared memory. */
296 shminit();
297 #endif
298
299 #ifdef SYSVSEM
300 /* Initialize System V style semaphores. */
301 seminit();
302 #endif
303
304 #ifdef SYSVMSG
305 /* Initialize System V style message queues. */
306 msginit();
307 #endif
308
309 /* Attach pseudo-devices. */
310 for (pdev = pdevinit; pdev->pdev_attach != NULL; pdev++)
311 (*pdev->pdev_attach)(pdev->pdev_count);
312
313 /*
314 * Initialize protocols. Block reception of incoming packets
315 * until everything is ready.
316 */
317 s = splimp();
318 ifinit();
319 domaininit();
320 splx(s);
321
322 #ifdef GPROF
323 /* Initialize kernel profiling. */
324 kmstartup();
325 #endif
326
327 /* Kick off timeout driven events by calling first time. */
328 roundrobin(NULL);
329 schedcpu(NULL);
330
331 /* Determine the root and dump devices. */
332 cpu_rootconf();
333 cpu_dumpconf();
334
335 /* Mount the root file system. */
336 do {
337 domountroothook();
338 if ((error = vfs_mountroot())) {
339 printf("cannot mount root, error = %d\n", error);
340 boothowto |= RB_ASKNAME;
341 setroot(root_device,
342 (rootdev != NODEV) ? DISKPART(rootdev) : 0, NULL);
343 }
344 } while (error != 0);
345 mountroothook_destroy();
346
347 mountlist.cqh_first->mnt_flag |= MNT_ROOTFS;
348 mountlist.cqh_first->mnt_op->vfs_refcount++;
349
350 /* Get the vnode for '/'. Set filedesc0.fd_fd.fd_cdir to reference it. */
351 if (VFS_ROOT(mountlist.cqh_first, &rootvnode))
352 panic("cannot find root vnode");
353 filedesc0.fd_fd.fd_cdir = rootvnode;
354 VREF(filedesc0.fd_fd.fd_cdir);
355 VOP_UNLOCK(rootvnode);
356 filedesc0.fd_fd.fd_rdir = NULL;
357 swapinit();
358
359 /*
360 * Now can look at time, having had a chance to verify the time
361 * from the file system. Reset p->p_rtime as it may have been
362 * munched in mi_switch() after the time got set.
363 */
364 p->p_stats->p_start = runtime = mono_time = boottime = time;
365 p->p_rtime.tv_sec = p->p_rtime.tv_usec = 0;
366
367 /* Initialize signal state for process 0. */
368 siginit(p);
369
370 /* Create process 1 (init(8)). */
371 if (sys_fork(p, NULL, rval))
372 panic("fork init");
373 #ifdef cpu_set_init_frame /* XXX should go away */
374 if (rval[1]) {
375 /*
376 * Now in process 1.
377 */
378 initframep = framep;
379 start_init(curproc);
380 return;
381 }
382 #else
383 cpu_set_kpc(pfind(1), start_init);
384 #endif
385
386 /* Create process 2 (the pageout daemon). */
387 if (sys_fork(p, NULL, rval))
388 panic("fork pager");
389 #ifdef cpu_set_init_frame /* XXX should go away */
390 if (rval[1]) {
391 /*
392 * Now in process 2.
393 */
394 start_pagedaemon(curproc);
395 }
396 #else
397 cpu_set_kpc(pfind(2), start_pagedaemon);
398 #endif
399
400 /* The scheduler is an infinite loop. */
401 scheduler();
402 /* NOTREACHED */
403 }
404
405 static void
406 check_console(p)
407 struct proc *p;
408 {
409 struct nameidata nd;
410 int error;
411
412 NDINIT(&nd, LOOKUP, FOLLOW, UIO_SYSSPACE, "/dev/console", p);
413 error = namei(&nd);
414 if (error == 0)
415 vrele(nd.ni_vp);
416 else if (error == ENOENT)
417 printf("warning: no /dev/console\n");
418 else
419 printf("warning: lookup /dev/console: error %d\n", error);
420 }
421
422 /*
423 * List of paths to try when searching for "init".
424 */
425 static char *initpaths[] = {
426 "/sbin/init",
427 "/sbin/oinit",
428 "/sbin/init.bak",
429 NULL,
430 };
431
432 /*
433 * Start the initial user process; try exec'ing each pathname in "initpaths".
434 * The program is invoked with one argument containing the boot flags.
435 */
436 static void
437 start_init(p)
438 struct proc *p;
439 {
440 vm_offset_t addr;
441 struct sys_execve_args /* {
442 syscallarg(const char *) path;
443 syscallarg(char * const *) argp;
444 syscallarg(char * const *) envp;
445 } */ args;
446 int options, i, error;
447 register_t retval[2];
448 char flags[4], *flagsp;
449 char **pathp, *path, *ucp, **uap, *arg0, *arg1 = NULL;
450
451 /*
452 * Now in process 1.
453 */
454 initproc = p;
455
456 #ifdef cpu_set_init_frame /* XXX should go away */
457 /*
458 * We need to set the system call frame as if we were entered through
459 * a syscall() so that when we call sys_execve() below, it will be able
460 * to set the entry point (see setregs) when it tries to exec. The
461 * startup code in "locore.s" has allocated space for the frame and
462 * passed a pointer to that space as main's argument.
463 */
464 cpu_set_init_frame(p, initframep);
465 #endif
466
467 /*
468 * This is not the right way to do this. We really should
469 * hand-craft a descriptor onto /dev/console to hand to init,
470 * but that's a _lot_ more work, and the benefit from this easy
471 * hack makes up for the "good is the enemy of the best" effect.
472 */
473 check_console(p);
474
475 /*
476 * Need just enough stack to hold the faked-up "execve()" arguments.
477 */
478 addr = USRSTACK - PAGE_SIZE;
479 if (vm_allocate(&p->p_vmspace->vm_map, &addr, (vm_size_t)PAGE_SIZE,
480 FALSE) != 0)
481 panic("init: couldn't allocate argument space");
482 p->p_vmspace->vm_maxsaddr = (caddr_t)addr;
483
484 for (pathp = &initpaths[0]; (path = *pathp) != NULL; pathp++) {
485 ucp = (char *)(addr + PAGE_SIZE);
486
487 /*
488 * Construct the boot flag argument.
489 */
490 flagsp = flags;
491 *flagsp++ = '-';
492 options = 0;
493
494 if (boothowto & RB_SINGLE) {
495 *flagsp++ = 's';
496 options = 1;
497 }
498 #ifdef notyet
499 if (boothowto & RB_FASTBOOT) {
500 *flagsp++ = 'f';
501 options = 1;
502 }
503 #endif
504
505 /*
506 * Move out the flags (arg 1), if necessary.
507 */
508 if (options != 0) {
509 *flagsp++ = '\0';
510 i = flagsp - flags;
511 #ifdef DEBUG
512 printf("init: copying out flags `%s' %d\n", flags, i);
513 #endif
514 (void)copyout((caddr_t)flags, (caddr_t)(ucp -= i), i);
515 arg1 = ucp;
516 }
517
518 /*
519 * Move out the file name (also arg 0).
520 */
521 i = strlen(path) + 1;
522 #ifdef DEBUG
523 printf("init: copying out path `%s' %d\n", path, i);
524 #endif
525 (void)copyout((caddr_t)path, (caddr_t)(ucp -= i), i);
526 arg0 = ucp;
527
528 /*
529 * Move out the arg pointers.
530 */
531 uap = (char **)((long)ucp & ~ALIGNBYTES);
532 (void)suword((caddr_t)--uap, 0); /* terminator */
533 if (options != 0)
534 (void)suword((caddr_t)--uap, (long)arg1);
535 (void)suword((caddr_t)--uap, (long)arg0);
536
537 /*
538 * Point at the arguments.
539 */
540 SCARG(&args, path) = arg0;
541 SCARG(&args, argp) = uap;
542 SCARG(&args, envp) = NULL;
543
544 /*
545 * Now try to exec the program. If can't for any reason
546 * other than it doesn't exist, complain.
547 */
548 error = sys_execve(p, &args, retval);
549 if (error == 0 || error == EJUSTRETURN)
550 return;
551 if (error != ENOENT)
552 printf("exec %s: error %d\n", path, error);
553 }
554 printf("init: not found\n");
555 panic("no init");
556 }
557
558 static void
559 start_pagedaemon(p)
560 struct proc *p;
561 {
562
563 /*
564 * Now in process 2.
565 */
566 p->p_flag |= P_INMEM | P_SYSTEM; /* XXX */
567 bcopy("pagedaemon", curproc->p_comm, sizeof ("pagedaemon"));
568 vm_pageout();
569 /* NOTREACHED */
570 }
571