#include <sys/param.h>
#include <sys/filedesc.h>
#include <sys/kernel.h>
#include <sys/mount_internal.h>
#include <sys/proc_internal.h>
#include <sys/kauth.h>
#include <sys/systm.h>
#include <sys/vnode_internal.h>
#include <sys/conf.h>
#include <sys/buf_internal.h>
#include <sys/clist.h>
#include <sys/user.h>
#include <sys/time.h>
#include <sys/systm.h>
#include <sys/mman.h>
#include <bsm/audit_kernel.h>
#include <sys/malloc.h>
#include <sys/dkstat.h>
#include <kern/startup.h>
#include <kern/thread.h>
#include <kern/task.h>
#include <kern/ast.h>
#include <mach/vm_param.h>
#include <vm/vm_map.h>
#include <vm/vm_kern.h>
#include <sys/ux_exception.h>
#include <sys/reboot.h>
#include <mach/exception_types.h>
#include <dev/busvar.h>
#include <sys/kdebug.h>
#include <mach/mach_types.h>
#include <mach/vm_prot.h>
#include <mach/semaphore.h>
#include <mach/sync_policy.h>
#include <kern/clock.h>
#include <mach/kern_return.h>
#include <mach/shared_memory_server.h>
#include <vm/vm_shared_memory_server.h>
#include <net/init.h>
extern int app_profile;
char copyright[] =
"Copyright (c) 1982, 1986, 1989, 1991, 1993\n\t"
"The Regents of the University of California. "
"All rights reserved.\n\n";
extern void ux_handler();
struct proc proc0;
struct session session0;
struct pgrp pgrp0;
struct filedesc filedesc0;
struct plimit limit0;
struct pstats pstats0;
struct sigacts sigacts0;
struct proc *kernproc, *initproc;
long tk_cancc;
long tk_nin;
long tk_nout;
long tk_rawcc;
int lock_trace = 0;
int nswdev, nswap;
int nswapmap;
void *swapmap;
struct swdevt swdevt[1];
dev_t rootdev;
dev_t dumpdev;
long dumplo;
long hostid;
char hostname[MAXHOSTNAMELEN];
int hostnamelen;
char domainname[MAXDOMNAMELEN];
int domainnamelen;
char classichandler[32] = {0};
uint32_t classichandler_fsid = -1L;
long classichandler_fileid = -1L;
char rootdevice[16];
#ifdef KMEMSTATS
struct kmemstats kmemstats[M_LAST];
#endif
int lbolt;
struct vnode *rootvp;
int boothowto = RB_DEBUG;
#define BSD_PAGABLE_MAP_SIZE (16 * 512 * 1024)
vm_map_t bsd_pageable_map;
vm_map_t mb_map;
semaphore_t execve_semaphore;
int cmask = CMASK;
int parse_bsd_args(void);
extern int bsd_hardclockinit;
extern task_t bsd_init_task;
extern char init_task_failure_data[];
extern void time_zone_slock_init(void);
static void process_name(char *, struct proc *);
static void setconf(void);
funnel_t *kernel_flock;
extern void sysv_shm_lock_init(void);
extern void sysv_sem_lock_init(void);
extern void sysv_msg_lock_init(void);
extern void pshm_lock_init();
extern void psem_lock_init();
static void
process_name(s, p)
char *s;
struct proc *p;
{
int length = strlen(s);
bcopy(s, p->p_comm,
length >= sizeof(p->p_comm) ? sizeof(p->p_comm) :
length + 1);
}
#include <machine/vmparam.h>
struct rlimit vm_initial_limit_stack = { DFLSSIZ, MAXSSIZ };
struct rlimit vm_initial_limit_data = { DFLDSIZ, MAXDSIZ };
struct rlimit vm_initial_limit_core = { DFLCSIZ, MAXCSIZ };
extern thread_t cloneproc(struct proc *, int);
extern int (*mountroot)(void);
extern int netboot_mountroot();
extern int netboot_setup(struct proc * p);
lck_grp_t * proc_lck_grp;
lck_grp_attr_t * proc_lck_grp_attr;
lck_attr_t * proc_lck_attr;
void (*mountroot_post_hook)(void);
void
bsd_init()
{
register struct proc *p;
struct uthread *ut;
extern kauth_cred_t rootcred;
register int i;
int s;
thread_t th;
struct vfs_context context;
void lightning_bolt(void );
kern_return_t ret;
boolean_t funnel_state;
struct ucred temp_cred;
extern void file_lock_init(void);
kernel_flock = funnel_alloc(KERNEL_FUNNEL);
if (kernel_flock == (funnel_t *)0 ) {
panic("bsd_init: Failed to allocate kernel funnel");
}
funnel_state = thread_funnel_set(kernel_flock, TRUE);
printf(copyright);
kmeminit();
parse_bsd_args();
kauth_init();
procinit();
kernproc = &proc0;
p = kernproc;
set_bsdtask_info(kernel_task,(void *)p);
p->p_pid = 0;
process_name("kernel_task", p);
proc_lck_grp_attr= lck_grp_attr_alloc_init();
lck_grp_attr_setstat(proc_lck_grp_attr);
proc_lck_grp = lck_grp_alloc_init("proc", proc_lck_grp_attr);
proc_lck_attr = lck_attr_alloc_init();
lck_mtx_init(&p->p_mlock, proc_lck_grp, proc_lck_attr);
lck_mtx_init(&p->p_fdmlock, proc_lck_grp, proc_lck_attr);
if (current_task() != kernel_task)
printf("bsd_init: We have a problem, "
"current task is not kernel task\n");
ut = (uthread_t)get_bsdthread_info(current_thread());
LIST_INSERT_HEAD(&allproc, p, p_list);
p->p_pgrp = &pgrp0;
LIST_INSERT_HEAD(PGRPHASH(0), &pgrp0, pg_hash);
LIST_INIT(&pgrp0.pg_members);
LIST_INSERT_HEAD(&pgrp0.pg_members, p, p_pglist);
pgrp0.pg_session = &session0;
session0.s_count = 1;
session0.s_leader = p;
p->task = kernel_task;
p->p_stat = SRUN;
p->p_flag = P_SYSTEM;
p->p_nice = NZERO;
p->p_pptr = p;
lockinit(&p->signal_lock, PVM, "signal", 0, 0);
TAILQ_INIT(&p->p_uthlist);
p->sigwait = FALSE;
p->sigwait_thread = THREAD_NULL;
p->exit_thread = THREAD_NULL;
bzero(&temp_cred, sizeof(temp_cred));
temp_cred.cr_ngroups = 1;
p->p_ucred = kauth_cred_create(&temp_cred);
kauth_cred_ref(p->p_ucred);
ut->uu_ucred = p->p_ucred;
TAILQ_INIT(&p->aio_activeq);
TAILQ_INIT(&p->aio_doneq);
p->aio_active_count = 0;
p->aio_done_count = 0;
file_lock_init();
filedesc0.fd_refcnt = 1+1;
p->p_fd = &filedesc0;
filedesc0.fd_cmask = cmask;
filedesc0.fd_knlistsize = -1;
filedesc0.fd_knlist = NULL;
filedesc0.fd_knhash = NULL;
filedesc0.fd_knhashmask = 0;
p->p_limit = &limit0;
for (i = 0; i < sizeof(p->p_rlimit)/sizeof(p->p_rlimit[0]); i++)
limit0.pl_rlimit[i].rlim_cur =
limit0.pl_rlimit[i].rlim_max = RLIM_INFINITY;
limit0.pl_rlimit[RLIMIT_NOFILE].rlim_cur = NOFILE;
limit0.pl_rlimit[RLIMIT_NPROC].rlim_cur = MAXUPRC;
limit0.pl_rlimit[RLIMIT_NPROC].rlim_max = maxproc;
limit0.pl_rlimit[RLIMIT_STACK] = vm_initial_limit_stack;
limit0.pl_rlimit[RLIMIT_DATA] = vm_initial_limit_data;
limit0.pl_rlimit[RLIMIT_CORE] = vm_initial_limit_core;
limit0.p_refcnt = 1;
p->p_stats = &pstats0;
p->p_sigacts = &sigacts0;
(void)chgproccnt(0, 1);
{
vm_offset_t min;
ret = kmem_suballoc(kernel_map,
&min,
(vm_size_t)BSD_PAGABLE_MAP_SIZE,
TRUE,
VM_FLAGS_ANYWHERE,
&bsd_pageable_map);
if (ret != KERN_SUCCESS)
panic("bsd_init: Failed to allocate bsd pageable map");
}
bsd_bufferinit();
ret = semaphore_create(kernel_task, &execve_semaphore,
SYNC_POLICY_FIFO, (BSD_PAGABLE_MAP_SIZE / NCARGS));
if (ret != KERN_SUCCESS)
panic("bsd_init: Failed to create execve semaphore");
IOKitResetTime();
ubc_init();
vfsinit();
mbinit();
audit_init();
knote_init();
aio_init();
pipeinit();
sysv_shm_lock_init();
sysv_sem_lock_init();
sysv_msg_lock_init();
pshm_lock_init();
psem_lock_init();
pshm_cache_init();
psem_cache_init();
time_zone_slock_init();
sysctl_register_fixed();
sysctl_mib_init();
dlil_init();
proto_kpi_init();
socketinit();
domaininit();
p->p_fd->fd_cdir = NULL;
p->p_fd->fd_rdir = NULL;
#ifdef GPROF
kmstartup();
#endif
thread_wakeup(&lbolt);
timeout((void (*)(void *))lightning_bolt, 0, hz);
bsd_autoconf();
#include <loop.h>
#if NLOOP > 0
loopattach();
#endif
ether_family_init();
net_init_run();
vnode_pager_bootstrap();
#if 0
printf("\nabout to sleep for 10 seconds\n");
IOSleep( 10 * 1000 );
#endif
inittodr(0);
while( TRUE) {
int err;
setconf();
bsd_hardclockinit = -1;
if (0 == (err = vfs_mountroot()))
break;
#if NFSCLIENT
if (mountroot == netboot_mountroot) {
printf("cannot mount network root, errno = %d\n", err);
mountroot = NULL;
if (0 == (err = vfs_mountroot()))
break;
}
#endif
printf("cannot mount root, errno = %d\n", err);
boothowto |= RB_ASKNAME;
}
context.vc_proc = p;
context.vc_ucred = p->p_ucred;
mountlist.tqh_first->mnt_flag |= MNT_ROOTFS;
if (VFS_ROOT(mountlist.tqh_first, &rootvnode, &context))
panic("bsd_init: cannot find root vnode");
rootvnode->v_flag |= VROOT;
(void)vnode_ref(rootvnode);
(void)vnode_put(rootvnode);
filedesc0.fd_cdir = rootvnode;
#if NFSCLIENT
if (mountroot == netboot_mountroot) {
int err;
if (err = netboot_setup(p)) {
panic("bsd_init: NetBoot could not find root, %d", err);
}
}
#endif
microtime(&p->p_stats->p_start);
p->p_rtime.tv_sec = p->p_rtime.tv_usec = 0;
#if DEVFS
{
extern void devfs_kernel_mount(char * str);
devfs_kernel_mount("/dev");
}
#endif
siginit(p);
bsd_utaskbootstrap();
if (mountroot_post_hook != NULL)
mountroot_post_hook();
(void) thread_funnel_set(kernel_flock, funnel_state);
}
void
bsdinit_task(void)
{
struct proc *p = current_proc();
struct uthread *ut;
kern_return_t kr;
thread_t th_act;
shared_region_mapping_t system_region;
process_name("init", p);
ux_handler_init();
th_act = current_thread();
(void) host_set_exception_ports(host_priv_self(),
EXC_MASK_ALL & ~(EXC_MASK_SYSCALL |
EXC_MASK_MACH_SYSCALL |
EXC_MASK_RPC_ALERT),
ux_exception_port,
EXCEPTION_DEFAULT, 0);
(void) task_set_exception_ports(get_threadtask(th_act),
EXC_MASK_ALL & ~(EXC_MASK_SYSCALL |
EXC_MASK_MACH_SYSCALL |
EXC_MASK_RPC_ALERT),
ux_exception_port,
EXCEPTION_DEFAULT, 0);
ut = (uthread_t)get_bsdthread_info(th_act);
ut->uu_ar0 = (void *)get_user_regs(th_act);
bsd_hardclockinit = 1;
bsd_init_task = get_threadtask(th_act);
init_task_failure_data[0] = 0;
system_region = lookup_default_shared_region(ENV_DEFAULT_ROOT, cpu_type());
if (system_region == NULL) {
shared_file_boot_time_init(ENV_DEFAULT_ROOT, cpu_type());
} else {
vm_set_shared_region(get_threadtask(th_act), system_region);
}
load_init_program(p);
app_profile = 1;
lock_trace = 1;
}
void
lightning_bolt()
{
boolean_t funnel_state;
extern void klogwakeup(void);
funnel_state = thread_funnel_set(kernel_flock, TRUE);
thread_wakeup(&lbolt);
timeout(lightning_bolt,0,hz);
klogwakeup();
(void) thread_funnel_set(kernel_flock, FALSE);
}
bsd_autoconf()
{
extern kern_return_t IOKitBSDInit( void );
kminit();
{
struct pseudo_init *pi;
for (pi = pseudo_inits; pi->ps_func; pi++)
(*pi->ps_func) (pi->ps_count);
}
return( IOKitBSDInit());
}
#include <sys/disklabel.h>
static void
setconf(void)
{
extern kern_return_t IOFindBSDRoot( char * rootName,
dev_t * root, u_int32_t * flags );
u_int32_t flags;
kern_return_t err;
thread_funnel_set(kernel_flock, FALSE);
err = IOFindBSDRoot( rootdevice, &rootdev, &flags );
thread_funnel_set(kernel_flock, TRUE);
if( err) {
printf("setconf: IOFindBSDRoot returned an error (%d);"
"setting rootdevice to 'sd0a'.\n", err);
rootdev = makedev( 6, 0 );
strcpy( rootdevice, "sd0a" );
flags = 0;
}
#if NFSCLIENT
if( flags & 1 ) {
mountroot = netboot_mountroot;
} else {
#endif
mountroot = NULL;
#if NFSCLIENT
}
#endif
}
bsd_utaskbootstrap()
{
thread_t th_act;
struct uthread *ut;
th_act = cloneproc(kernproc, 0);
initproc = pfind(1);
microtime(&initproc->p_stats->p_start);
ut = (struct uthread *)get_bsdthread_info(th_act);
ut->uu_sigmask = 0;
act_set_astbsd(th_act);
(void) thread_resume(th_act);
}
parse_bsd_args()
{
extern char init_args[];
char namep[16];
extern int boothowto;
extern int srv;
extern int ncl;
int len;
if (PE_parse_boot_arg("-s", namep)) {
boothowto |= RB_SINGLE;
len = strlen(init_args);
if(len != 0)
strcat(init_args," -s");
else
strcat(init_args,"-s");
}
if (PE_parse_boot_arg("-b", namep)) {
boothowto |= RB_NOBOOTRC;
len = strlen(init_args);
if(len != 0)
strcat(init_args," -b");
else
strcat(init_args,"-b");
}
if (PE_parse_boot_arg("-F", namep)) {
len = strlen(init_args);
if(len != 0)
strcat(init_args," -F");
else
strcat(init_args,"-F");
}
if (PE_parse_boot_arg("-v", namep)) {
len = strlen(init_args);
if(len != 0)
strcat(init_args," -v");
else
strcat(init_args,"-v");
}
if (PE_parse_boot_arg("-x", namep)) {
len = strlen(init_args);
if(len != 0)
strcat(init_args," -x");
else
strcat(init_args,"-x");
}
if (PE_parse_boot_arg("-d", namep)) {
len = strlen(init_args);
if(len != 0)
strcat(init_args," -d");
else
strcat(init_args,"-d");
}
PE_parse_boot_arg("srv", &srv);
PE_parse_boot_arg("ncl", &ncl);
PE_parse_boot_arg("nbuf", &nbuf);
return 0;
}
#if !NFSCLIENT
int
netboot_root(void)
{
return(0);
}
#endif