xnu-1228.0.2.tar.gz

[apple/xnu.git] / bsd / kern / bsd_init.c

diff --git a/bsd/kern/bsd_init.c b/bsd/kern/bsd_init.c
index 862a0557aa0f586d35ee4f1ad5f123f871384f95..2ea3d6377226591794b60cfaf3087f4332696e42 100644 (file)
--- a/bsd/kern/bsd_init.c
+++ b/bsd/kern/bsd_init.c
@@ -1,5 +1,5 @@
 /*
 /*

- * Copyright (c) 2000-2004 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2000-2007 Apple Inc. All rights reserved.

  *
  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
  *
  * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 


@@ -72,6 +72,12 @@
  * All rights reserved.  The CMU software License Agreement specifies
  * the terms and conditions for use and redistribution.
  */
  * All rights reserved.  The CMU software License Agreement specifies
  * the terms and conditions for use and redistribution.
  */

+/*
+ * NOTICE: This file was modified by McAfee Research in 2004 to introduce
+ * support for mandatory and extensible security protections.  This notice
+ * is included in support of clause 2.2 (b) of the Apple Public License,
+ * Version 2.0.
+ */

 
 #include <sys/param.h>
 #include <sys/filedesc.h>
 
 #include <sys/param.h>
 #include <sys/filedesc.h>


@@ -93,6 +99,7 @@
 
 #include <sys/malloc.h>
 #include <sys/dkstat.h>
 
 #include <sys/malloc.h>
 #include <sys/dkstat.h>

+#include <sys/codesign.h>

 
 #include <kern/startup.h>
 #include <kern/thread.h>
 
 #include <kern/startup.h>
 #include <kern/thread.h>


@@ -117,23 +124,55 @@
 #include <mach/sync_policy.h>
 #include <kern/clock.h>
 #include <mach/kern_return.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 <mach/thread_act.h>           /* for thread_resume() */
+#include <mach/task.h>                 /* for task_set_exception_ports() */
+#include <sys/ux_exception.h>          /* for ux_handler() */
+#include <sys/ubc_internal.h>          /* for ubc_init() */
+#include <sys/mcache.h>                        /* for mcache_init() */
+#include <sys/mbuf.h>                  /* for mbinit() */
+#include <sys/event.h>                 /* for knote_init() */
+#include <sys/aio_kern.h>              /* for aio_init() */
+#include <sys/semaphore.h>             /* for psem_cache_init() */
+#include <net/dlil.h>                  /* for dlil_init() */
+#include <net/kpi_protocol.h>          /* for proto_kpi_init() */
+#include <sys/pipe.h>                  /* for pipeinit() */
+#include <sys/socketvar.h>             /* for socketinit() */
+#include <sys/protosw.h>               /* for domaininit() */
+#include <kern/sched_prim.h>           /* for thread_wakeup() */
+#include <net/if_ether.h>              /* for ether_family_init() */
+#include <vm/vm_protos.h>              /* for vnode_pager_bootstrap() */
+#include <miscfs/devfs/devfsdefs.h>    /* for devfs_kernel_mount() */
+#include <mach/host_priv.h>            /* for host_set_exception_ports() */
+#include <kern/host.h>                 /* for host_priv_self() */
+#include <vm/vm_kern.h>                        /* for kmem_suballoc() */
+#include <sys/semaphore.h>             /* for psem_lock_init() */
+#include <sys/msgbuf.h>                        /* for log_setsize() */

 
 #include <net/init.h>
 
 
 #include <net/init.h>
 

+#if CONFIG_MACF
+#include <security/mac_framework.h>
+#include <security/mac_internal.h>     /* mac_init_bsd() */
+#include <security/mac_mach_internal.h>        /* mac_update_task_label() */
+#endif
+

 #include <machine/exec.h>
 
 #include <machine/exec.h>
 

-extern int app_profile;                /* on/off switch for pre-heat cache */
+#if CONFIG_IMAGEBOOT
+#include <sys/imageboot.h>
+#endif
+
+#include <pexpert/pexpert.h>
+
+void * get_user_regs(thread_t);                /* XXX kludge for <machine/thread.h> */
+void IOKitInitializeTime(void);                /* XXX */
+void loopattach(void);                 /* XXX */

 
 char    copyright[] =
 "Copyright (c) 1982, 1986, 1989, 1991, 1993\n\t"
 "The Regents of the University of California. "
 "All rights reserved.\n\n";
 
 
 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();
-

 /* Components of the first process -- never freed. */
 struct proc proc0;
 struct session session0;
 /* Components of the first process -- never freed. */
 struct proc proc0;
 struct session session0;


@@ -142,7 +181,8 @@ struct      filedesc filedesc0;
 struct plimit limit0;
 struct pstats pstats0;
 struct sigacts sigacts0;
 struct plimit limit0;
 struct pstats pstats0;
 struct sigacts sigacts0;

-struct proc *kernproc, *initproc;
+proc_t kernproc;
+proc_t initproc;

 
 long tk_cancc;
 long tk_nin;
 
 long tk_cancc;
 long tk_nin;


@@ -174,7 +214,7 @@ struct exec_archhandler exec_archhandler_ppc;
 
 char rootdevice[16];   /* hfs device names have at least 9 chars */
 
 
 char rootdevice[16];   /* hfs device names have at least 9 chars */
 

-#ifdef  KMEMSTATS
+#if  KMEMSTATS

 struct kmemstats kmemstats[M_LAST];
 #endif
 
 struct kmemstats kmemstats[M_LAST];
 #endif
 


@@ -182,7 +222,21 @@ int        lbolt;                          /* awoken once a second */
 struct vnode *rootvp;
 int boothowto = RB_DEBUG;
 
 struct vnode *rootvp;
 int boothowto = RB_DEBUG;
 

-#define        BSD_PAGABLE_MAP_SIZE    (16 * 512 * 1024)
+void lightning_bolt(void *);
+extern kern_return_t IOFindBSDRoot(char *, dev_t *, u_int32_t *);
+extern void IOSecureBSDRoot(const char * rootName);
+extern kern_return_t IOKitBSDInit(void );
+extern void kminit(void);
+extern void klogwakeup(void);
+extern void file_lock_init(void);
+extern void kmeminit(void);
+extern void bsd_bufferinit(void);
+
+extern int srv;
+extern int ncl;
+
+#define BSD_SIMUL_EXECS       33 /* 32 , allow for rounding */
+#define        BSD_PAGABLE_MAP_SIZE    (BSD_SIMUL_EXECS * (NCARGS + PAGE_SIZE))

 vm_map_t       bsd_pageable_map;
 vm_map_t       mb_map;
 semaphore_t execve_semaphore;
 vm_map_t       bsd_pageable_map;
 vm_map_t       mb_map;
 semaphore_t execve_semaphore;


@@ -190,28 +244,44 @@ semaphore_t execve_semaphore;
 int    cmask = CMASK;
 extern int customnbuf;
 
 int    cmask = CMASK;
 extern int customnbuf;
 

-int parse_bsd_args(void);
-extern int bsd_hardclockinit;
+void bsd_init(void) __attribute__((section("__TEXT, initcode")));
+__private_extern__ void ubc_init(void )  __attribute__((section("__TEXT, initcode")));
+void vfsinit(void) __attribute__((section("__TEXT, initcode")));
+kern_return_t bsd_autoconf(void) __attribute__((section("__TEXT, initcode")));
+void bsd_utaskbootstrap(void) __attribute__((section("__TEXT, initcode")));
+
+static void parse_bsd_args(void);

 extern task_t bsd_init_task;
 extern char    init_task_failure_data[];
 extern void time_zone_slock_init(void);
 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 process_name(const char *, proc_t);

 
 static void setconf(void);
 
 funnel_t *kernel_flock;
 
 
 static void setconf(void);
 
 funnel_t *kernel_flock;
 

+#if SYSV_SHM

 extern void sysv_shm_lock_init(void);
 extern void sysv_shm_lock_init(void);

+#endif
+#if SYSV_SEM

 extern void sysv_sem_lock_init(void);
 extern void sysv_sem_lock_init(void);

+#endif
+#if SYSV_MSG

 extern void sysv_msg_lock_init(void);
 extern void sysv_msg_lock_init(void);

-extern void pshm_lock_init();
-extern void psem_lock_init();
-extern int maxprocperuid;
+#endif
+extern void pthread_init(void);

 
 /* kmem access not enabled by default; can be changed with boot-args */
 int setup_kmem = 0;
 
 
 /* kmem access not enabled by default; can be changed with boot-args */
 int setup_kmem = 0;
 

-extern void stackshot_lock_init();
+/* size of kernel trace buffer, disabled by default */
+unsigned int new_nkdbufs = 0;
+
+/* mach leak logging */
+int log_leaks = 0;
+int turn_on_log_leaks = 0;
+
+extern void stackshot_lock_init(void);

 
 /*
  * Initialization code.
 
 /*
  * Initialization code.


@@ -229,11 +299,9 @@ extern void stackshot_lock_init();
  *     Sets the name for the given task.
  */
 static void
  *     Sets the name for the given task.
  */
 static void

-process_name(s, p)
-       char            *s;
-       struct proc *p;
+process_name(const char *s, proc_t p)

 {
 {

-       int             length = strlen(s);
+       size_t length = strlen(s);

 
        bcopy(s, p->p_comm,
                length >= sizeof(p->p_comm) ? sizeof(p->p_comm) :
 
        bcopy(s, p->p_comm,
                length >= sizeof(p->p_comm) ? sizeof(p->p_comm) :


@@ -242,18 +310,20 @@ process_name(s, p)
 
 /* To allow these values to be patched, they're globals here */
 #include <machine/vmparam.h>
 
 /* To allow these values to be patched, they're globals here */
 #include <machine/vmparam.h>

-struct rlimit vm_initial_limit_stack = { DFLSSIZ, MAXSSIZ };
+struct rlimit vm_initial_limit_stack = { DFLSSIZ, MAXSSIZ - PAGE_SIZE };

 struct rlimit vm_initial_limit_data = { DFLDSIZ, MAXDSIZ };
 struct rlimit vm_initial_limit_core = { DFLCSIZ, MAXCSIZ };
 
 struct rlimit vm_initial_limit_data = { DFLDSIZ, MAXDSIZ };
 struct rlimit vm_initial_limit_core = { DFLCSIZ, MAXCSIZ };
 

-extern thread_t        cloneproc(struct proc *, int);
+extern thread_t        cloneproc(proc_t, int);

 extern int     (*mountroot)(void);
 extern int     (*mountroot)(void);

-extern int     netboot_mountroot();    /* netboot.c */
-extern int     netboot_setup(struct proc * p);
+extern int     netboot_mountroot(void);        /* netboot.c */
+extern int     netboot_setup(void);

 
 lck_grp_t * proc_lck_grp;
 lck_grp_attr_t * proc_lck_grp_attr;
 lck_attr_t * proc_lck_attr;
 
 lck_grp_t * proc_lck_grp;
 lck_grp_attr_t * proc_lck_grp_attr;
 lck_attr_t * proc_lck_attr;

+lck_mtx_t * proc_list_mlock;
+lck_mtx_t * proc_klist_mlock;

 
 /* hook called after root is mounted XXX temporary hack */
 void (*mountroot_post_hook)(void);
 
 /* hook called after root is mounted XXX temporary hack */
 void (*mountroot_post_hook)(void);


@@ -266,49 +336,46 @@ void (*mountroot_post_hook)(void);
  * Internally, kernel_thread_create() calls thread_create_internal(),
  * which calls uthread_alloc().  The function of uthread_alloc() is
  * normally to allocate a uthread structure, and fill out the uu_sigmask,
  * Internally, kernel_thread_create() calls thread_create_internal(),
  * which calls uthread_alloc().  The function of uthread_alloc() is
  * normally to allocate a uthread structure, and fill out the uu_sigmask,

- * uu_act, and uu_ucred fields.  It skips filling these out in the case
- * of the "task" being "kernel_task", because the order of operation is
- * inverted.  To account for that, we need to manually fill in at least
- * the uu_cred field so that the uthread structure can be used like any
- * other.
+ * uu_context fields.  It skips filling these out in the case of the "task"
+ * being "kernel_task", because the order of operation is inverted.  To
+ * account for that, we need to manually fill in at least the contents
+ * of the uu_context.vc_ucred field so that the uthread structure can be
+ * used like any other.

  */
 void
  */
 void

-bsd_init()
+bsd_init(void)

 {
 {

-       register struct proc *p;
+       proc_t p;

        struct uthread *ut;
        struct uthread *ut;

-       extern kauth_cred_t rootcred;
-       register int i;
-       int s;
+       unsigned int i;
+#if __i386__

        int error;
        int error;

-       thread_t        th;
+#endif 

        struct vfs_context context;
        struct vfs_context context;

-       void            lightning_bolt(void );

        kern_return_t   ret;
        kern_return_t   ret;

-       boolean_t funnel_state;

        struct ucred temp_cred;
        struct ucred temp_cred;

-       extern void file_lock_init(void);
+
+#define bsd_init_kprintf(x...) /* kprintf("bsd_init: " x) */

 
        kernel_flock = funnel_alloc(KERNEL_FUNNEL);
        if (kernel_flock == (funnel_t *)0 ) {
                panic("bsd_init: Failed to allocate kernel funnel");
        }
         
 
        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);
        
        printf(copyright);
        

+       bsd_init_kprintf("calling kmeminit\n");

        kmeminit();
        
        kmeminit();
        

+       bsd_init_kprintf("calling parse_bsd_args\n");

        parse_bsd_args();
 
        parse_bsd_args();
 

-       /* Initialize the uthread zone */
-       //uthread_zone_init();  /* XXX redundant: previous uthread_alloc() */
-

        /* Initialize kauth subsystem before instancing the first credential */
        /* Initialize kauth subsystem before instancing the first credential */

+       bsd_init_kprintf("calling kauth_init\n");

        kauth_init();
 
        /* Initialize process and pgrp structures. */
        kauth_init();
 
        /* Initialize process and pgrp structures. */

+       bsd_init_kprintf("calling procinit\n");

        procinit();
 
        kernproc = &proc0;
        procinit();
 
        kernproc = &proc0;


@@ -318,39 +385,74 @@ bsd_init()
        /* kernel_task->proc = kernproc; */
        set_bsdtask_info(kernel_task,(void *)p);
        p->p_pid = 0;
        /* kernel_task->proc = kernproc; */
        set_bsdtask_info(kernel_task,(void *)p);
        p->p_pid = 0;

+       p->p_ppid = 0;

 
        /* give kernproc a name */
 
        /* give kernproc a name */

+       bsd_init_kprintf("calling process_name\n");

        process_name("kernel_task", p);
 
        /* allocate proc lock group attribute and group */
        process_name("kernel_task", p);
 
        /* allocate proc lock group attribute and group */

+       bsd_init_kprintf("calling lck_grp_attr_alloc_init\n");

        proc_lck_grp_attr= lck_grp_attr_alloc_init();
        
        proc_lck_grp = lck_grp_alloc_init("proc",  proc_lck_grp_attr);
 
        /* Allocate proc lock attribute */
        proc_lck_attr = lck_attr_alloc_init();
        proc_lck_grp_attr= lck_grp_attr_alloc_init();
        
        proc_lck_grp = lck_grp_alloc_init("proc",  proc_lck_grp_attr);
 
        /* Allocate proc lock attribute */
        proc_lck_attr = lck_attr_alloc_init();

+#if 0
+#if __PROC_INTERNAL_DEBUG
+       lck_attr_setdebug(proc_lck_attr);
+#endif
+#endif

 
 

+       proc_list_mlock = lck_mtx_alloc_init(proc_lck_grp, proc_lck_attr);
+       proc_klist_mlock = lck_mtx_alloc_init(proc_lck_grp, proc_lck_attr);

        lck_mtx_init(&p->p_mlock, proc_lck_grp, proc_lck_attr);
        lck_mtx_init(&p->p_fdmlock, proc_lck_grp, proc_lck_attr);
        lck_mtx_init(&p->p_mlock, proc_lck_grp, proc_lck_attr);
        lck_mtx_init(&p->p_fdmlock, proc_lck_grp, proc_lck_attr);

+       lck_spin_init(&p->p_slock, 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");
        
 
        if (current_task() != kernel_task)
                printf("bsd_init: We have a problem, "
                                "current task is not kernel task\n");
        

+       bsd_init_kprintf("calling get_bsdthread_info\n");

        ut = (uthread_t)get_bsdthread_info(current_thread());
 
        ut = (uthread_t)get_bsdthread_info(current_thread());
 

+#if CONFIG_MACF
+       /*
+        * Initialize the MAC Framework
+        */
+       mac_policy_initbsd();
+       p->p_mac_enforce = 0;
+#endif /* MAC */
+

        /*
         * Create process 0.
         */
        /*
         * Create process 0.
         */

+       proc_list_lock();

        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(&allproc, p, p_list);
        p->p_pgrp = &pgrp0;
        LIST_INSERT_HEAD(PGRPHASH(0), &pgrp0, pg_hash);
        LIST_INIT(&pgrp0.pg_members);

+       lck_mtx_init(&pgrp0.pg_mlock, proc_lck_grp, proc_lck_attr);
+       /* There is no other bsd thread this point and is safe without pgrp lock */

        LIST_INSERT_HEAD(&pgrp0.pg_members, p, p_pglist);
        LIST_INSERT_HEAD(&pgrp0.pg_members, p, p_pglist);

+       p->p_listflag |= P_LIST_INPGRP;
+       p->p_pgrpid = 0;

 
        pgrp0.pg_session = &session0;
 
        pgrp0.pg_session = &session0;

+       pgrp0.pg_membercnt = 1;
+

        session0.s_count = 1;
        session0.s_leader = p;
        session0.s_count = 1;
        session0.s_leader = p;

+       session0.s_listflags = 0;
+       lck_mtx_init(&session0.s_mlock, proc_lck_grp, proc_lck_attr);
+       LIST_INSERT_HEAD(SESSHASH(0), &session0, s_hash);
+       proc_list_unlock();
+
+#if CONFIG_LCTX
+       p->p_lctx = NULL;
+#endif

 
        p->task = kernel_task;
        
 
        p->task = kernel_task;
        


@@ -358,33 +460,46 @@ bsd_init()
        p->p_flag = P_SYSTEM;
        p->p_nice = NZERO;
        p->p_pptr = p;
        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);
        TAILQ_INIT(&p->p_uthlist);

+       TAILQ_INSERT_TAIL(&p->p_uthlist, ut, uu_list);
+       

        p->sigwait = FALSE;
        p->sigwait_thread = THREAD_NULL;
        p->exit_thread = THREAD_NULL;
        p->sigwait = FALSE;
        p->sigwait_thread = THREAD_NULL;
        p->exit_thread = THREAD_NULL;

+       p->p_csflags = CS_VALID;

 
        /*
         * Create credential.  This also Initializes the audit information.
         * XXX It is not clear what the initial values should be for audit ID,
         * XXX session ID, etc..
         */
 
        /*
         * Create credential.  This also Initializes the audit information.
         * XXX It is not clear what the initial values should be for audit ID,
         * XXX session ID, etc..
         */

+       bsd_init_kprintf("calling bzero\n");

        bzero(&temp_cred, sizeof(temp_cred));
        temp_cred.cr_ngroups = 1;
 
        bzero(&temp_cred, sizeof(temp_cred));
        temp_cred.cr_ngroups = 1;
 

+       bsd_init_kprintf("calling kauth_cred_create\n");

        p->p_ucred = kauth_cred_create(&temp_cred); 
 
        /* give the (already exisiting) initial thread a reference on it */
        p->p_ucred = kauth_cred_create(&temp_cred); 
 
        /* give the (already exisiting) initial thread a reference on it */

+       bsd_init_kprintf("calling kauth_cred_ref\n");

        kauth_cred_ref(p->p_ucred);
        kauth_cred_ref(p->p_ucred);

-       ut->uu_ucred = p->p_ucred;
-       
+       ut->uu_context.vc_ucred = p->p_ucred;
+       ut->uu_context.vc_thread = current_thread();
+

        TAILQ_INIT(&p->aio_activeq);
        TAILQ_INIT(&p->aio_doneq);
        p->aio_active_count = 0;
        p->aio_done_count = 0;
 
        TAILQ_INIT(&p->aio_activeq);
        TAILQ_INIT(&p->aio_doneq);
        p->aio_active_count = 0;
        p->aio_done_count = 0;
 

+       bsd_init_kprintf("calling file_lock_init\n");

        file_lock_init();
 
        file_lock_init();
 

+#if CONFIG_MACF
+       mac_cred_label_associate_kernel(p->p_ucred);
+       mac_task_label_update_cred (p->p_ucred, (struct task *) p->task);
+#endif
+

        /* Create the file descriptor table. */
        filedesc0.fd_refcnt = 1+1;      /* +1 so shutdown will not _FREE_ZONE */
        p->p_fd = &filedesc0;
        /* Create the file descriptor table. */
        filedesc0.fd_refcnt = 1+1;      /* +1 so shutdown will not _FREE_ZONE */
        p->p_fd = &filedesc0;


@@ -405,7 +520,7 @@ bsd_init()
        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.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;
+       limit0.pl_refcnt = 1;

 
        p->p_stats = &pstats0;
        p->p_sigacts = &sigacts0;
 
        p->p_stats = &pstats0;
        p->p_sigacts = &sigacts0;


@@ -413,6 +528,7 @@ bsd_init()
        /*
         * Charge root for two  processes: init and mach_init.
         */
        /*
         * Charge root for two  processes: init and mach_init.
         */

+       bsd_init_kprintf("calling chgproccnt\n");

        (void)chgproccnt(0, 1);
 
        /*
        (void)chgproccnt(0, 1);
 
        /*


@@ -420,10 +536,11 @@ bsd_init()
         *      for temporary copying (execve()).
         */
        {
         *      for temporary copying (execve()).
         */
        {

-               vm_offset_t     min;
+               vm_offset_t     minimum;

 
 

+               bsd_init_kprintf("calling kmem_suballoc\n");

                ret = kmem_suballoc(kernel_map,
                ret = kmem_suballoc(kernel_map,

-                               &min,
+                               &minimum,

                                (vm_size_t)BSD_PAGABLE_MAP_SIZE,
                                TRUE,
                                VM_FLAGS_ANYWHERE,
                                (vm_size_t)BSD_PAGABLE_MAP_SIZE,
                                TRUE,
                                VM_FLAGS_ANYWHERE,


@@ -439,54 +556,97 @@ bsd_init()
         *              happen after a credential has been associated with
         *              the kernel task.
         */
         *              happen after a credential has been associated with
         *              the kernel task.
         */

+       bsd_init_kprintf("calling bsd_bufferinit\n");

        bsd_bufferinit();
 
        /* Initialize the execve() semaphore */
        bsd_bufferinit();
 
        /* Initialize the execve() semaphore */

+       bsd_init_kprintf("calling semaphore_create\n");

        ret = semaphore_create(kernel_task, &execve_semaphore,
        ret = semaphore_create(kernel_task, &execve_semaphore,

-                       SYNC_POLICY_FIFO, (BSD_PAGABLE_MAP_SIZE / NCARGS));
+                              SYNC_POLICY_FIFO, BSD_SIMUL_EXECS -1);

        if (ret != KERN_SUCCESS)
                panic("bsd_init: Failed to create execve semaphore");
 
        /*
         * Initialize the calendar.
         */
        if (ret != KERN_SUCCESS)
                panic("bsd_init: Failed to create execve semaphore");
 
        /*
         * Initialize the calendar.
         */

-       IOKitResetTime();
+       IOKitInitializeTime();

 
 

+       if (turn_on_log_leaks && !new_nkdbufs)
+               new_nkdbufs = 200000;
+       start_kern_tracing(new_nkdbufs);
+       if (turn_on_log_leaks)
+               log_leaks = 1;
+
+       bsd_init_kprintf("calling ubc_init\n");

        ubc_init();
 
        /* Initialize the file systems. */
        ubc_init();
 
        /* Initialize the file systems. */

+       bsd_init_kprintf("calling vfsinit\n");

        vfsinit();
 
        vfsinit();
 

+#if SOCKETS
+       /* Initialize per-CPU cache allocator */
+       mcache_init();
+

        /* Initialize mbuf's. */
        /* Initialize mbuf's. */

+       bsd_init_kprintf("calling mbinit\n");

        mbinit();
        mbinit();

+#endif /* SOCKETS */

 
        /*
         * Initializes security event auditing.
         * XXX: Should/could this occur later?
         */
 
        /*
         * Initializes security event auditing.
         * XXX: Should/could this occur later?
         */

-       audit_init();  
+#if AUDIT
+       bsd_init_kprintf("calling audit_init\n");
+       audit_init();  
+#endif

 
        /* Initialize kqueues */
 
        /* Initialize kqueues */

+       bsd_init_kprintf("calling knote_init\n");

        knote_init();
 
        knote_init();
 

+#if CONFIG_EMBEDDED
+       /* Initialize kernel memory status notifications */
+       bsd_init_kprintf("calling kern_memorystatus_init\n");
+       kern_memorystatus_init();
+#endif
+

        /* Initialize for async IO */
        /* Initialize for async IO */

+       bsd_init_kprintf("calling aio_init\n");

        aio_init();
 
        /* Initialize pipes */
        aio_init();
 
        /* Initialize pipes */

+       bsd_init_kprintf("calling pipeinit\n");

        pipeinit();
 
        /* Initialize SysV shm subsystem locks; the subsystem proper is
         * initialized through a sysctl.
         */
        pipeinit();
 
        /* Initialize SysV shm subsystem locks; the subsystem proper is
         * initialized through a sysctl.
         */

+#if SYSV_SHM
+       bsd_init_kprintf("calling sysv_shm_lock_init\n");

        sysv_shm_lock_init();
        sysv_shm_lock_init();

+#endif
+#if SYSV_SEM
+       bsd_init_kprintf("calling sysv_sem_lock_init\n");

        sysv_sem_lock_init();
        sysv_sem_lock_init();

+#endif
+#if SYSV_MSG
+       bsd_init_kprintf("sysv_msg_lock_init\n");

        sysv_msg_lock_init();
        sysv_msg_lock_init();

+#endif
+       bsd_init_kprintf("calling pshm_lock_init\n");

        pshm_lock_init();
        pshm_lock_init();

+       bsd_init_kprintf("calling psem_lock_init\n");

        psem_lock_init();
 
        psem_lock_init();
 

+       pthread_init();

        /* POSIX Shm and Sem */
        /* POSIX Shm and Sem */

+       bsd_init_kprintf("calling pshm_cache_init\n");

        pshm_cache_init();
        pshm_cache_init();

+       bsd_init_kprintf("calling psem_cache_init\n");

        psem_cache_init();
        psem_cache_init();

+       bsd_init_kprintf("calling time_zone_slock_init\n");

        time_zone_slock_init();
 
        /* Stack snapshot facility lock */
        time_zone_slock_init();
 
        /* Stack snapshot facility lock */


@@ -495,12 +655,22 @@ bsd_init()
         * Initialize protocols.  Block reception of incoming packets
         * until everything is ready.
         */
         * Initialize protocols.  Block reception of incoming packets
         * until everything is ready.
         */

+       bsd_init_kprintf("calling sysctl_register_fixed\n");

        sysctl_register_fixed(); 
        sysctl_register_fixed(); 

+       bsd_init_kprintf("calling sysctl_mib_init\n");

        sysctl_mib_init();
        sysctl_mib_init();

+#if NETWORKING
+       bsd_init_kprintf("calling dlil_init\n");

        dlil_init();
        dlil_init();

+       bsd_init_kprintf("calling proto_kpi_init\n");

        proto_kpi_init();
        proto_kpi_init();

+#endif /* NETWORKING */
+#if SOCKETS
+       bsd_init_kprintf("calling socketinit\n");

        socketinit();
        socketinit();

+       bsd_init_kprintf("calling domaininit\n");

        domaininit();
        domaininit();

+#endif /* SOCKETS */

 
        p->p_fd->fd_cdir = NULL;
        p->p_fd->fd_rdir = NULL;
 
        p->p_fd->fd_cdir = NULL;
        p->p_fd->fd_rdir = NULL;


@@ -512,10 +682,16 @@ bsd_init()
 
        /* kick off timeout driven events by calling first time */
        thread_wakeup(&lbolt);
 
        /* kick off timeout driven events by calling first time */
        thread_wakeup(&lbolt);

-       timeout((void (*)(void *))lightning_bolt, 0, hz);
+       timeout(lightning_bolt, 0, hz);

 
 

+       bsd_init_kprintf("calling bsd_autoconf\n");

        bsd_autoconf();
 
        bsd_autoconf();
 

+#if CONFIG_DTRACE
+       extern void dtrace_postinit(void);
+       dtrace_postinit();
+#endif
+

        /*
         * We attach the loopback interface *way* down here to ensure
         * it happens after autoconf(), otherwise it becomes the
        /*
         * We attach the loopback interface *way* down here to ensure
         * it happens after autoconf(), otherwise it becomes the


@@ -523,15 +699,23 @@ bsd_init()
         */
 #include <loop.h>
 #if NLOOP > 0
         */
 #include <loop.h>
 #if NLOOP > 0

+       bsd_init_kprintf("calling loopattach\n");

        loopattach();                   /* XXX */
 #endif
         
        loopattach();                   /* XXX */
 #endif
         

-        /* Register the built-in dlil ethernet interface family */
+#if NETHER > 0
+       /* Register the built-in dlil ethernet interface family */
+       bsd_init_kprintf("calling ether_family_init\n");

        ether_family_init();
        ether_family_init();

+#endif /* ETHER */

 
 

+#if NETWORKING

        /* Call any kext code that wants to run just after network init */
        /* Call any kext code that wants to run just after network init */

+       bsd_init_kprintf("calling net_init_run\n");

        net_init_run();
        net_init_run();

+#endif /* NETWORKING */

 
 

+       bsd_init_kprintf("calling vnode_pager_bootstrap\n");

        vnode_pager_bootstrap();
 #if 0
        /* XXX Hack for early debug stop */
        vnode_pager_bootstrap();
 #if 0
        /* XXX Hack for early debug stop */


@@ -540,36 +724,83 @@ bsd_init()
        /* Debugger("hello"); */
 #endif
 
        /* Debugger("hello"); */
 #endif
 

+       bsd_init_kprintf("calling inittodr\n");

        inittodr(0);
 
        inittodr(0);
 

+#if CONFIG_EMBEDDED
+       {
+               /* print out early VM statistics */
+               kern_return_t kr1;
+               vm_statistics_data_t stat;
+               mach_msg_type_number_t count;
+
+               count = HOST_VM_INFO_COUNT;
+               kr1 = host_statistics(host_self(),
+                                     HOST_VM_INFO,
+                                     (host_info_t)&stat,
+                                     &count);
+               kprintf("Mach Virtual Memory Statistics (page size of 4096) bytes\n"
+                       "Pages free:\t\t\t%u.\n"
+                       "Pages active:\t\t\t%u.\n"
+                       "Pages inactive:\t\t\t%u.\n"
+                       "Pages wired down:\t\t%u.\n"
+                       "\"Translation faults\":\t\t%u.\n"
+                       "Pages copy-on-write:\t\t%u.\n"
+                       "Pages zero filled:\t\t%u.\n"
+                       "Pages reactivated:\t\t%u.\n"
+                       "Pageins:\t\t\t%u.\n"
+                       "Pageouts:\t\t\t\%u.\n"
+                       "Object cache: %u hits of %u lookups (%d%% hit rate)\n",
+
+                       stat.free_count,
+                       stat.active_count,
+                       stat.inactive_count,
+                       stat.wire_count,
+                       stat.faults,
+                       stat.cow_faults,
+                       stat.zero_fill_count,
+                       stat.reactivations,
+                       stat.pageins,
+                       stat.pageouts,
+                       stat.hits,
+                       stat.lookups,
+                       (stat.hits == 0) ? 100 :
+                                          ((stat.lookups * 100) / stat.hits));
+       }
+#endif /* CONFIG_EMBEDDED */
+       

        /* Mount the root file system. */
        while( TRUE) {
                int err;
 
        /* Mount the root file system. */
        while( TRUE) {
                int err;
 

+               bsd_init_kprintf("calling setconf\n");

                setconf();
                setconf();

-               bsd_hardclockinit = -1; /* start ticking */

 
 

+               bsd_init_kprintf("vfs_mountroot\n");

                if (0 == (err = vfs_mountroot()))
                        break;
                if (0 == (err = vfs_mountroot()))
                        break;

+               rootdevice[0] = '\0';

 #if NFSCLIENT
                if (mountroot == netboot_mountroot) {
 #if NFSCLIENT
                if (mountroot == netboot_mountroot) {

-                       printf("cannot mount network root, errno = %d\n", err);
-                       mountroot = NULL;
-                       if (0 == (err = vfs_mountroot()))
-                               break;
+                       printf("bsd_init: netboot_mountroot failed,"
+                              " errno = %d\n", err);
+                       panic("bsd_init: failed to mount network root: %s", PE_boot_args());

                }
 #endif
                printf("cannot mount root, errno = %d\n", err);
                boothowto |= RB_ASKNAME;
        }
 
                }
 #endif
                printf("cannot mount root, errno = %d\n", err);
                boothowto |= RB_ASKNAME;
        }
 

-       context.vc_proc = p;
+       IOSecureBSDRoot(rootdevice);
+
+       context.vc_thread = current_thread();

        context.vc_ucred = p->p_ucred;
        mountlist.tqh_first->mnt_flag |= MNT_ROOTFS;
 
        context.vc_ucred = p->p_ucred;
        mountlist.tqh_first->mnt_flag |= MNT_ROOTFS;
 

+       bsd_init_kprintf("calling VFS_ROOT\n");

        /* Get the vnode for '/'.  Set fdp->fd_fd.fd_cdir to reference it. */
        if (VFS_ROOT(mountlist.tqh_first, &rootvnode, &context))
        /* Get the vnode for '/'.  Set fdp->fd_fd.fd_cdir to reference it. */
        if (VFS_ROOT(mountlist.tqh_first, &rootvnode, &context))

-               panic("bsd_init: cannot find root vnode");
+               panic("bsd_init: cannot find root vnode: %s", PE_boot_args());

        rootvnode->v_flag |= VROOT;
        (void)vnode_ref(rootvnode);
        (void)vnode_put(rootvnode);
        rootvnode->v_flag |= VROOT;
        (void)vnode_ref(rootvnode);
        (void)vnode_put(rootvnode);


@@ -579,97 +810,114 @@ bsd_init()
        if (mountroot == netboot_mountroot) {
                int err;
                /* post mount setup */
        if (mountroot == netboot_mountroot) {
                int err;
                /* post mount setup */

-               if (err = netboot_setup(p)) {
-                       panic("bsd_init: NetBoot could not find root, %d", err);
+               if ((err = netboot_setup()) != 0) {
+                       panic("bsd_init: NetBoot could not find root, %d: %s", err, PE_boot_args());

                }
        }
 #endif
        
 
                }
        }
 #endif
        
 

-       microtime(&p->p_stats->p_start);
+#if CONFIG_IMAGEBOOT
+       /*
+        * See if a system disk image is present. If so, mount it and
+        * switch the root vnode to point to it
+        */ 
+  
+       if(imageboot_needed()) {
+               int err;
+
+               /* An image was found */
+               if((err = imageboot_setup())) {
+                       /*
+                        * this is not fatal. Keep trying to root
+                        * off the original media
+                        */
+                       printf("%s: imageboot could not find root, %d\n",
+                               __FUNCTION__, err);
+               }
+       }
+#endif /* CONFIG_IMAGEBOOT */
+  
+       microtime(&p->p_stats->p_start);        /* for compat sake */
+       microtime(&p->p_start);

        p->p_rtime.tv_sec = p->p_rtime.tv_usec = 0;
 
 #if DEVFS
        {
        p->p_rtime.tv_sec = p->p_rtime.tv_usec = 0;
 
 #if DEVFS
        {

-           extern void devfs_kernel_mount(char * str);
-           
-           devfs_kernel_mount("/dev");
+           char mounthere[] = "/dev";  /* !const because of internal casting */
+
+           bsd_init_kprintf("calling devfs_kernel_mount\n");
+           devfs_kernel_mount(mounthere);

        }
 #endif /* DEVFS */
        
        /* Initialize signal state for process 0. */
        }
 #endif /* DEVFS */
        
        /* Initialize signal state for process 0. */

+       bsd_init_kprintf("calling siginit\n");

        siginit(p);
 
        siginit(p);
 

+       bsd_init_kprintf("calling bsd_utaskbootstrap\n");

        bsd_utaskbootstrap();
 
 #if __i386__
        bsd_utaskbootstrap();
 
 #if __i386__

-       // this should be done after the root filesystem is mounted
+       /* this should be done after the root filesystem is mounted */

        error = set_archhandler(p, CPU_TYPE_POWERPC);
        error = set_archhandler(p, CPU_TYPE_POWERPC);

-       if (error)
+       if (error) /* XXX make more generic */

                exec_archhandler_ppc.path[0] = 0;
 #endif 
                exec_archhandler_ppc.path[0] = 0;
 #endif 

-       
+
+       bsd_init_kprintf("calling mountroot_post_hook\n");
+

        /* invoke post-root-mount hook */
        if (mountroot_post_hook != NULL)
                mountroot_post_hook();
        /* invoke post-root-mount hook */
        if (mountroot_post_hook != NULL)
                mountroot_post_hook();

+
+#if 0 /* not yet */
+       IOKitJettisonKLD();
+       consider_zone_gc();
+#endif

        
        

-       (void) thread_funnel_set(kernel_flock, funnel_state);
+       bsd_init_kprintf("done\n");

 }
 
 /* Called with kernel funnel held */
 void
 bsdinit_task(void)
 {
 }
 
 /* Called with kernel funnel held */
 void
 bsdinit_task(void)
 {

-       struct proc *p = current_proc();
+       proc_t p = current_proc();

        struct uthread *ut;
        struct uthread *ut;

-       kern_return_t   kr;
-       thread_t th_act;
-       shared_region_mapping_t system_region;
+       thread_t thread;

 
        process_name("init", p);
 
        ux_handler_init();
 
 
        process_name("init", p);
 
        ux_handler_init();
 

-       th_act = current_thread();
+       thread = current_thread();

        (void) host_set_exception_ports(host_priv_self(),
                                        EXC_MASK_ALL & ~(EXC_MASK_SYSCALL |
                                                         EXC_MASK_MACH_SYSCALL |
        (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);
-
-
+                                                        EXC_MASK_RPC_ALERT |
+                                                        EXC_MASK_CRASH),
+                                       (mach_port_t)ux_exception_port,
+                                       EXCEPTION_DEFAULT| MACH_EXCEPTION_CODES,
+                                       0);

 
 

+       ut = (uthread_t)get_bsdthread_info(thread);

 
 

-       ut = (uthread_t)get_bsdthread_info(th_act);
-
-       bsd_hardclockinit = 1;  /* Start bsd hardclock */
-       bsd_init_task = get_threadtask(th_act);
+       bsd_init_task = get_threadtask(thread);

        init_task_failure_data[0] = 0;
        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);
-       }
+
+#if CONFIG_MACF
+       mac_cred_label_associate_user(p->p_ucred);
+       mac_task_label_update_cred (p->p_ucred, (struct task *) p->task);
+#endif

        load_init_program(p);
        load_init_program(p);

-       /* turn on app-profiling i.e. pre-heating */
-       app_profile = 1;

        lock_trace = 1;
 }
 
 void
        lock_trace = 1;
 }
 
 void

-lightning_bolt()
+lightning_bolt(__unused void *dummy)

 {                      
        boolean_t       funnel_state;
 {                      
        boolean_t       funnel_state;

-       extern void klogwakeup(void);

 
        funnel_state = thread_funnel_set(kernel_flock, TRUE);
 
 
        funnel_state = thread_funnel_set(kernel_flock, TRUE);
 


@@ -680,10 +928,10 @@ lightning_bolt()
        (void) thread_funnel_set(kernel_flock, FALSE);
 }
 
        (void) thread_funnel_set(kernel_flock, FALSE);
 }
 

-bsd_autoconf()
+kern_return_t
+bsd_autoconf(void)

 {
 {

-       extern kern_return_t IOKitBSDInit( void );
-
+       kprintf("bsd_autoconf: calling kminit\n");

        kminit();
 
        /* 
        kminit();
 
        /* 


@@ -705,8 +953,6 @@ bsd_autoconf()
 static void
 setconf(void)
 {      
 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;
 
        u_int32_t       flags;
        kern_return_t   err;
 


@@ -715,14 +961,12 @@ setconf(void)
         * which needs to be under network funnel. Right thing to do
         * here is to drop the funnel alltogether and regrab it afterwards
         */
         * which needs to be under network funnel. Right thing to do
         * here is to drop the funnel alltogether and regrab it afterwards
         */

-       thread_funnel_set(kernel_flock, FALSE);

        err = IOFindBSDRoot( rootdevice, &rootdev, &flags );
        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); /* XXX DEBUG TEMP */
                rootdev = makedev( 6, 0 );
        if( err) {
                printf("setconf: IOFindBSDRoot returned an error (%d);"
                        "setting rootdevice to 'sd0a'.\n", err); /* XXX DEBUG TEMP */
                rootdev = makedev( 6, 0 );

-               strcpy( rootdevice, "sd0a" );
+               strlcpy(rootdevice, "sd0a", sizeof(rootdevice));

                flags = 0;
        }
 
                flags = 0;
        }
 


@@ -740,89 +984,59 @@ setconf(void)
 
 }
 
 
 }
 

-bsd_utaskbootstrap()
+void
+bsd_utaskbootstrap(void)

 {
 {

-       thread_t th_act;
+       thread_t thread;

        struct uthread *ut;
 
        struct uthread *ut;
 

-       th_act = cloneproc(kernproc, 0);
-       initproc = pfind(1);                            
+       thread = cloneproc(kernproc, 0);
+       /* Hold the reference as it will be dropped during shutdown */
+       initproc = proc_find(1);                                
+#if __PROC_INTERNAL_DEBUG
+       if (initproc == PROC_NULL)
+               panic("bsd_utaskbootstrap: initproc not set\n");
+#endif

        /* Set the launch time for init */
        /* Set the launch time for init */

-       microtime(&initproc->p_stats->p_start);
+       microtime(&initproc->p_start);
+       microtime(&initproc->p_stats->p_start); /* for compat sake */
+       

 
 

-       ut = (struct uthread *)get_bsdthread_info(th_act);
+       ut = (struct uthread *)get_bsdthread_info(thread);

        ut->uu_sigmask = 0;
        ut->uu_sigmask = 0;

-       act_set_astbsd(th_act);
-       (void) thread_resume(th_act);
+       act_set_astbsd(thread);
+       (void) thread_resume(thread);

 }
 
 }
 

-parse_bsd_args()
+static void
+parse_bsd_args(void)

 {
 {

-       extern char init_args[];
-       char    namep[16];
-       extern int boothowto;
-       extern int srv;
-       extern int ncl;
-
-       int len;
+       char namep[16];
+       int msgbuf;

 
 

-       if (PE_parse_boot_arg("-s", namep)) {
+       if (PE_parse_boot_arg("-s", namep))

                boothowto |= RB_SINGLE;
                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)) {
+       if (PE_parse_boot_arg("-b", namep))

                boothowto |= RB_NOBOOTRC;
                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)) { /* safe boot */
-               len = strlen(init_args);
-               if(len != 0)
-                       strcat(init_args," -x");
-               else
-                       strcat(init_args,"-x");
-       }
+       if (PE_parse_boot_arg("-x", namep)) /* safe boot */
+               boothowto |= RB_SAFEBOOT;

 
 

-       if (PE_parse_boot_arg("-d", namep)) {
-               len = strlen(init_args);
-               if(len != 0)
-                       strcat(init_args," -d");
-               else
-                       strcat(init_args,"-d");
-       }
+       if (PE_parse_boot_arg("-l", namep)) /* leaks logging */
+               turn_on_log_leaks = 1;

 
        PE_parse_boot_arg("srv", &srv);
        PE_parse_boot_arg("ncl", &ncl);
 
        PE_parse_boot_arg("srv", &srv);
        PE_parse_boot_arg("ncl", &ncl);

-       if (PE_parse_boot_arg("nbuf", &max_nbuf_headers)) 
+       if (PE_parse_boot_arg("nbuf", &max_nbuf_headers)) {

                customnbuf = 1;
                customnbuf = 1;

+       }

        PE_parse_boot_arg("kmem", &setup_kmem);
        PE_parse_boot_arg("kmem", &setup_kmem);

+       PE_parse_boot_arg("trace", &new_nkdbufs);

 
 

-       return 0;
+       if (PE_parse_boot_arg("msgbuf", &msgbuf)) {
+               log_setsize(msgbuf);
+       }

 }
 
 #if !NFSCLIENT
 }
 
 #if !NFSCLIENT