#include <debug.h>
#include <mach_kdp.h>
#include <mach/boolean.h>
#include <mach/machine.h>
#include <mach/thread_act.h>
#include <mach/task_special_ports.h>
#include <mach/vm_param.h>
#include <ipc/ipc_init.h>
#include <kern/assert.h>
#include <kern/mach_param.h>
#include <kern/misc_protos.h>
#include <kern/clock.h>
#include <kern/coalition.h>
#include <kern/cpu_number.h>
#include <kern/cpu_quiesce.h>
#include <kern/ledger.h>
#include <kern/machine.h>
#include <kern/processor.h>
#include <kern/restartable.h>
#include <kern/sched_prim.h>
#include <kern/turnstile.h>
#if CONFIG_SCHED_SFI
#include <kern/sfi.h>
#endif
#include <kern/startup.h>
#include <kern/task.h>
#include <kern/thread.h>
#include <kern/timer.h>
#if CONFIG_TELEMETRY
#include <kern/telemetry.h>
#endif
#include <kern/zalloc.h>
#include <kern/locks.h>
#include <kern/debug.h>
#if KPERF
#include <kperf/kperf.h>
#endif
#include <corpses/task_corpse.h>
#include <prng/random.h>
#include <console/serial_protos.h>
#include <vm/vm_kern.h>
#include <vm/vm_init.h>
#include <vm/vm_map.h>
#include <vm/vm_object.h>
#include <vm/vm_page.h>
#include <vm/vm_pageout.h>
#include <vm/vm_shared_region.h>
#include <machine/pmap.h>
#include <machine/commpage.h>
#include <machine/machine_routines.h>
#include <libkern/version.h>
#include <sys/codesign.h>
#include <sys/kdebug.h>
#include <sys/random.h>
#include <sys/ktrace.h>
#include <libkern/section_keywords.h>
#include <kern/ltable.h>
#include <kern/waitq.h>
#include <ipc/ipc_voucher.h>
#include <voucher/ipc_pthread_priority_internal.h>
#include <mach/host_info.h>
#include <pthread/workqueue_internal.h>
#if CONFIG_XNUPOST
#include <tests/ktest.h>
#include <tests/xnupost.h>
#endif
#if CONFIG_ATM
#include <atm/atm_internal.h>
#endif
#if CONFIG_CSR
#include <sys/csr.h>
#endif
#include <bank/bank_internal.h>
#if ALTERNATE_DEBUGGER
#include <arm64/alternate_debugger.h>
#endif
#if MACH_KDP
#include <kdp/kdp.h>
#endif
#if CONFIG_MACF
#include <security/mac_mach_internal.h>
#if CONFIG_VNGUARD
extern void vnguard_policy_init(void);
#endif
#endif
#if KPC
#include <kern/kpc.h>
#endif
#if HYPERVISOR
#include <kern/hv_support.h>
#endif
#include <san/kasan.h>
#include <i386/pmCPU.h>
static void kernel_bootstrap_thread(void);
static void load_context(
thread_t thread);
#if CONFIG_ECC_LOGGING
#include <kern/ecc.h>
#endif
#if (defined(__i386__) || defined(__x86_64__)) && CONFIG_VMX
#include <i386/vmx/vmx_cpu.h>
#endif
#if CONFIG_DTRACE
extern void dtrace_early_init(void);
extern void sdt_early_init(void);
#endif
extern void OSKextRemoveKextBootstrap(void);
void scale_setup(void);
extern void bsd_scale_setup(int);
extern unsigned int semaphore_max;
extern void stackshot_init(void);
extern struct startup_entry startup_entries[]
__SECTION_START_SYM(STARTUP_HOOK_SEGMENT, STARTUP_HOOK_SECTION);
extern struct startup_entry startup_entries_end[]
__SECTION_END_SYM(STARTUP_HOOK_SEGMENT, STARTUP_HOOK_SECTION);
static struct startup_entry *__startup_data startup_entry_cur = startup_entries;
SECURITY_READ_ONLY_LATE(startup_subsystem_id_t) startup_phase = STARTUP_SUB_NONE;
extern int serverperfmode;
#if DEBUG || DEVELOPMENT
TUNABLE(startup_debug_t, startup_debug, "startup_debug", 0);
#endif
TUNABLE(unsigned int, new_nkdbufs, "trace", 0);
TUNABLE(unsigned int, wake_nkdbufs, "trace_wake", 0);
TUNABLE(unsigned int, write_trace_on_panic, "trace_panic", 0);
TUNABLE(unsigned int, trace_wrap, "trace_wrap", 0);
TUNABLE(int, log_leaks, "-l", 0);
static inline void
kernel_bootstrap_log(const char *message)
{
if ((startup_debug & STARTUP_DEBUG_VERBOSE) &&
startup_phase >= STARTUP_SUB_KPRINTF) {
kprintf("kernel_bootstrap: %s\n", message);
}
kernel_debug_string_early(message);
}
static inline void
kernel_bootstrap_thread_log(const char *message)
{
if ((startup_debug & STARTUP_DEBUG_VERBOSE) &&
startup_phase >= STARTUP_SUB_KPRINTF) {
kprintf("kernel_bootstrap_thread: %s\n", message);
}
kernel_debug_string_early(message);
}
extern void
qsort(void *a, size_t n, size_t es, int (*cmp)(const void *, const void *));
__startup_func
static int
startup_entry_cmp(const void *e1, const void *e2)
{
const struct startup_entry *a = e1;
const struct startup_entry *b = e2;
if (a->subsystem == b->subsystem) {
if (a->rank == b->rank) {
return 0;
}
return a->rank > b->rank ? 1 : -1;
}
return a->subsystem > b->subsystem ? 1 : -1;
}
__startup_func
void
kernel_startup_bootstrap(void)
{
size_t n = startup_entries_end - startup_entries;
if (n == 0) {
panic("Section %s,%s missing",
STARTUP_HOOK_SEGMENT, STARTUP_HOOK_SECTION);
}
if (((uintptr_t)startup_entries_end - (uintptr_t)startup_entries) %
sizeof(struct startup_entry)) {
panic("Section %s,%s has invalid size",
STARTUP_HOOK_SEGMENT, STARTUP_HOOK_SECTION);
}
qsort(startup_entries, n, sizeof(struct startup_entry), startup_entry_cmp);
kernel_startup_initialize_upto(STARTUP_SUB_LOCKS_EARLY);
}
__startup_func
extern void
kernel_startup_tunable_init(const struct startup_tunable_spec *spec)
{
if (PE_parse_boot_argn(spec->name, spec->var_addr, spec->var_len)) {
if (spec->var_is_bool) {
*(bool *)spec->var_addr = *(uint8_t *)spec->var_addr;
}
}
}
static void
kernel_startup_log(startup_subsystem_id_t subsystem)
{
static const char *names[] = {
[STARTUP_SUB_TUNABLES] = "tunables",
[STARTUP_SUB_LOCKS_EARLY] = "locks_early",
[STARTUP_SUB_KPRINTF] = "kprintf",
[STARTUP_SUB_PMAP_STEAL] = "pmap_steal",
[STARTUP_SUB_VM_KERNEL] = "vm_kernel",
[STARTUP_SUB_KMEM] = "kmem",
[STARTUP_SUB_KMEM_ALLOC] = "kmem_alloc",
[STARTUP_SUB_ZALLOC] = "zalloc",
[STARTUP_SUB_PERCPU] = "percpu",
[STARTUP_SUB_LOCKS] = "locks",
[STARTUP_SUB_CODESIGNING] = "codesigning",
[STARTUP_SUB_OSLOG] = "oslog",
[STARTUP_SUB_MACH_IPC] = "mach_ipc",
[STARTUP_SUB_SYSCTL] = "sysctl",
[STARTUP_SUB_EARLY_BOOT] = "early_boot",
};
static startup_subsystem_id_t logged = STARTUP_SUB_NONE;
if (subsystem <= logged) {
return;
}
if (subsystem < sizeof(names) / sizeof(names[0]) && names[subsystem]) {
kernel_bootstrap_log(names[subsystem]);
}
logged = subsystem;
}
__startup_func
void
kernel_startup_initialize_upto(startup_subsystem_id_t upto)
{
struct startup_entry *cur = startup_entry_cur;
assert(startup_phase < upto);
while (cur < startup_entries_end && cur->subsystem <= upto) {
if ((startup_debug & STARTUP_DEBUG_VERBOSE) &&
startup_phase >= STARTUP_SUB_KPRINTF) {
kprintf("%s[%d, rank %d]: %p(%p)\n", __func__,
cur->subsystem, cur->rank, cur->func, cur->arg);
}
startup_phase = cur->subsystem - 1;
kernel_startup_log(cur->subsystem);
cur->func(cur->arg);
startup_entry_cur = ++cur;
}
kernel_startup_log(upto);
if ((startup_debug & STARTUP_DEBUG_VERBOSE) &&
upto >= STARTUP_SUB_KPRINTF) {
kprintf("%s: reached phase %d\n", __func__, upto);
}
startup_phase = upto;
}
void
kernel_bootstrap(void)
{
kern_return_t result;
thread_t thread;
char namep[16];
printf("%s\n", version);
scale_setup();
kernel_bootstrap_log("vm_mem_bootstrap");
vm_mem_bootstrap();
machine_info.memory_size = (uint32_t)mem_size;
#if XNU_TARGET_OS_OSX
machine_info.max_mem = max_mem_actual;
#else
machine_info.max_mem = max_mem;
#endif
machine_info.major_version = version_major;
machine_info.minor_version = version_minor;
kernel_startup_initialize_upto(STARTUP_SUB_OSLOG);
#if KASAN
kernel_bootstrap_log("kasan_late_init");
kasan_late_init();
#endif
#if CONFIG_TELEMETRY
kernel_bootstrap_log("telemetry_init");
telemetry_init();
#endif
if (PE_i_can_has_debugger(NULL)) {
if (PE_parse_boot_argn("-show_pointers", &namep, sizeof(namep))) {
doprnt_hide_pointers = FALSE;
}
if (PE_parse_boot_argn("-no_slto_panic", &namep, sizeof(namep))) {
extern boolean_t spinlock_timeout_panic;
spinlock_timeout_panic = FALSE;
}
}
kernel_bootstrap_log("console_init");
console_init();
kernel_bootstrap_log("stackshot_init");
stackshot_init();
kernel_bootstrap_log("sched_init");
sched_init();
kernel_bootstrap_log("waitq_bootstrap");
waitq_bootstrap();
#if CONFIG_MACF
kernel_bootstrap_log("mac_policy_init");
mac_policy_init();
#endif
kernel_startup_initialize_upto(STARTUP_SUB_MACH_IPC);
kernel_bootstrap_log("PMAP_ACTIVATE_KERNEL");
PMAP_ACTIVATE_KERNEL(master_cpu);
kernel_bootstrap_log("mapping_free_prime");
mapping_free_prime();
kernel_bootstrap_log("machine_init");
machine_init();
kernel_bootstrap_log("thread_machine_init_template");
thread_machine_init_template();
kernel_bootstrap_log("clock_init");
clock_init();
#if CONFIG_THREAD_GROUPS
kernel_bootstrap_log("thread_group_init");
thread_group_init();
#endif
#if CONFIG_COALITIONS
kernel_bootstrap_log("coalitions_init");
coalitions_init();
#endif
kernel_bootstrap_log("task_init");
task_init();
kernel_bootstrap_log("thread_init");
thread_init();
kernel_bootstrap_log("restartable_init");
restartable_init();
kernel_bootstrap_log("workq_init");
workq_init();
kernel_bootstrap_log("turnstiles_init");
turnstiles_init();
#if CONFIG_ATM
kernel_bootstrap_log("atm_init");
atm_init();
#endif
kernel_bootstrap_log("mach_init_activity_id");
mach_init_activity_id();
kernel_bootstrap_log("bank_init");
bank_init();
kernel_bootstrap_log("ipc_pthread_priority_init");
ipc_pthread_priority_init();
corpses_init();
host_statistics_init();
kernel_bootstrap_log("exception_init");
exception_init();
#if CONFIG_SCHED_SFI
kernel_bootstrap_log("sfi_init");
sfi_init();
#endif
kernel_bootstrap_log("kernel_thread_create");
result = kernel_thread_create((thread_continue_t)kernel_bootstrap_thread, NULL, MAXPRI_KERNEL, &thread);
if (result != KERN_SUCCESS) {
panic("kernel_bootstrap: result = %08X\n", result);
}
assert(thread == current_thread());
thread->state = TH_RUN;
thread->last_made_runnable_time = mach_absolute_time();
thread_set_thread_name(thread, "kernel_bootstrap_thread");
thread_deallocate(thread);
kernel_bootstrap_log("load_context - done");
load_context(thread);
}
SECURITY_READ_ONLY_LATE(vm_offset_t) vm_kernel_addrperm;
SECURITY_READ_ONLY_LATE(vm_offset_t) buf_kernel_addrperm;
SECURITY_READ_ONLY_LATE(vm_offset_t) vm_kernel_addrperm_ext;
SECURITY_READ_ONLY_LATE(uint64_t) vm_kernel_addrhash_salt;
SECURITY_READ_ONLY_LATE(uint64_t) vm_kernel_addrhash_salt_ext;
static void
kernel_bootstrap_thread(void)
{
processor_t processor = current_processor();
kernel_bootstrap_thread_log("idle_thread_create");
idle_thread_create(processor);
kernel_bootstrap_thread_log("sched_startup");
sched_startup();
kernel_bootstrap_thread_log("thread_daemon_init");
thread_daemon_init();
vm_kernel_reserved_entry_init();
kernel_bootstrap_thread_log("thread_call_initialize");
thread_call_initialize();
kernel_bootstrap_thread_log("work_interval_initialize");
work_interval_subsystem_init();
kernel_bootstrap_thread_log("thread_bind");
thread_bind(processor);
kernel_bootstrap_thread_log("ipc_thread_call_init");
ipc_thread_call_init();
kernel_bootstrap_thread_log("mapping_adjust");
mapping_adjust();
kernel_bootstrap_thread_log("clock_service_create");
clock_service_create();
device_service_create();
phys_carveout_init();
#if MACH_KDP
kernel_bootstrap_log("kdp_init");
kdp_init();
#endif
#if ALTERNATE_DEBUGGER
alternate_debugger_init();
#endif
#if KPC
kpc_init();
#endif
#if HYPERVISOR
kernel_bootstrap_thread_log("hv_support_init");
hv_support_init();
#endif
#if CONFIG_TELEMETRY
kernel_bootstrap_log("bootprofile_init");
bootprofile_init();
#endif
char trace_typefilter[256] = {};
PE_parse_boot_arg_str("trace_typefilter", trace_typefilter,
sizeof(trace_typefilter));
#if KPERF
kperf_init();
#endif
kdebug_init(new_nkdbufs, trace_typefilter,
(trace_wrap ? KDOPT_WRAPPING : 0) | KDOPT_ATBOOT);
kernel_startup_initialize_upto(STARTUP_SUB_SYSCTL);
#ifdef IOKIT
kernel_bootstrap_log("PE_init_iokit");
PE_init_iokit();
#endif
assert(ml_get_interrupts_enabled() == FALSE);
kernel_startup_initialize_upto(STARTUP_SUB_EARLY_BOOT);
#if INTERRUPT_MASKED_DEBUG
ml_spin_debug_clear_self();
#endif
(void) spllo();
initialize_screen(NULL, kPEAcquireScreen);
vm_commpage_init();
vm_commpage_text_init();
#if CONFIG_MACF
kernel_bootstrap_log("mac_policy_initmach");
mac_policy_initmach();
#if CONFIG_VNGUARD
kernel_bootstrap_log("vnguard_policy_init");
vnguard_policy_init();
#endif
#endif
#if CONFIG_DTRACE
kernel_bootstrap_log("dtrace_early_init");
dtrace_early_init();
sdt_early_init();
#endif
#ifndef BCM2837
kernel_bootstrap_log("trust_cache_init");
trust_cache_init();
#endif
kernel_startup_initialize_upto(STARTUP_SUB_LOCKDOWN);
kernel_bootstrap_log("OSKextRemoveKextBootstrap");
OSKextRemoveKextBootstrap();
read_random(&vm_kernel_addrperm, sizeof(vm_kernel_addrperm));
vm_kernel_addrperm |= 1;
read_random(&buf_kernel_addrperm, sizeof(buf_kernel_addrperm));
buf_kernel_addrperm |= 1;
read_random(&vm_kernel_addrperm_ext, sizeof(vm_kernel_addrperm_ext));
vm_kernel_addrperm_ext |= 1;
read_random(&vm_kernel_addrhash_salt, sizeof(vm_kernel_addrhash_salt));
read_random(&vm_kernel_addrhash_salt_ext, sizeof(vm_kernel_addrhash_salt_ext));
kernel_bootstrap_log("machine_lockdown");
machine_lockdown();
#ifdef IOKIT
kernel_bootstrap_log("PE_lockdown_iokit");
PE_lockdown_iokit();
#endif
vm_set_restrictions(machine_info.max_cpus);
#ifdef CONFIG_XNUPOST
kern_return_t result = kernel_list_tests();
result = kernel_do_post();
if (result != KERN_SUCCESS) {
panic("kernel_do_post: Tests failed with result = 0x%08x\n", result);
}
kernel_bootstrap_log("kernel_do_post - done");
#endif
#if KPERF
kperf_init_early();
#endif
#ifdef MACH_BSD
bsd_init();
#endif
kdebug_free_early_buf();
serial_keyboard_init();
vm_page_init_local_q(machine_info.max_cpus);
thread_bind(PROCESSOR_NULL);
vm_free_delayed_pages();
vm_pageout();
}
void
slave_main(void *machine_param)
{
processor_t processor = current_processor();
thread_t thread;
if (processor->processor_offlined == true) {
assert(processor->startup_thread == THREAD_NULL);
thread = processor->idle_thread;
thread->parameter = machine_param;
} else if (processor->startup_thread) {
thread = processor->startup_thread;
processor->startup_thread = THREAD_NULL;
} else {
thread = processor->idle_thread;
thread->continuation = processor_start_thread;
thread->parameter = machine_param;
}
load_context(thread);
}
void
processor_start_thread(void *machine_param,
__unused wait_result_t result)
{
processor_t processor = current_processor();
thread_t self = current_thread();
slave_machine_init(machine_param);
if (self == processor->idle_thread) {
thread_block(idle_thread);
}
thread_terminate(self);
}
static void __attribute__((noreturn))
load_context(
thread_t thread)
{
processor_t processor = current_processor();
#define load_context_kprintf(x...)
load_context_kprintf("machine_set_current_thread\n");
machine_set_current_thread(thread);
load_context_kprintf("processor_up\n");
PMAP_ACTIVATE_KERNEL(processor->cpu_id);
load_context_kprintf("thread %p, stack %lx, stackptr %lx\n", thread,
thread->kernel_stack, thread->machine.kstackptr);
if (!thread->kernel_stack) {
load_context_kprintf("stack_alloc_try\n");
if (!stack_alloc_try(thread)) {
panic("load_context");
}
}
if (!(thread->state & TH_IDLE)) {
SCHED(run_count_incr)(thread);
}
processor->active_thread = thread;
processor_state_update_explicit(processor, thread->sched_pri,
SFI_CLASS_KERNEL, PSET_SMP, thread_get_perfcontrol_class(thread), THREAD_URGENCY_NONE,
((thread->state & TH_IDLE) || (thread->bound_processor != PROCESSOR_NULL)) ? TH_BUCKET_SCHED_MAX : thread->th_sched_bucket);
processor->current_is_bound = thread->bound_processor != PROCESSOR_NULL;
processor->current_is_NO_SMT = false;
processor->current_is_eagerpreempt = false;
#if CONFIG_THREAD_GROUPS
processor->current_thread_group = thread_group_get(thread);
#endif
processor->starting_pri = thread->sched_pri;
processor->deadline = UINT64_MAX;
thread->last_processor = processor;
processor_up(processor);
processor->last_dispatch = mach_absolute_time();
timer_start(&thread->system_timer, processor->last_dispatch);
processor->thread_timer = processor->kernel_timer = &thread->system_timer;
timer_start(&processor->system_state, processor->last_dispatch);
processor->current_state = &processor->system_state;
#if __AMP__
if (processor->processor_set->pset_cluster_type == PSET_AMP_P) {
timer_start(&thread->ptime, processor->last_dispatch);
}
#endif
cpu_quiescent_counter_join(processor->last_dispatch);
PMAP_ACTIVATE_USER(thread, processor->cpu_id);
load_context_kprintf("machine_load_context\n");
machine_load_context(thread);
}
void
scale_setup(void)
{
int scale = 0;
#if defined(__LP64__)
typeof(task_max) task_max_base = task_max;
if ((serverperfmode != 0) && ((uint64_t)max_mem_actual >= (uint64_t)(16 * 1024 * 1024 * 1024ULL))) {
scale = (int)((uint64_t)sane_size / (uint64_t)(8 * 1024 * 1024 * 1024ULL));
if (scale > 16) {
scale = 16;
}
task_max_base = 2500;
} else if ((uint64_t)max_mem_actual >= (uint64_t)(3 * 1024 * 1024 * 1024ULL)) {
if ((uint64_t)max_mem_actual < (uint64_t)(8 * 1024 * 1024 * 1024ULL)) {
scale = 2;
} else {
scale = MIN(16, (int)((uint64_t)max_mem_actual / (uint64_t)(4 * 1024 * 1024 * 1024ULL)));
}
}
task_max = MAX(task_max, task_max_base * scale);
if (scale != 0) {
task_threadmax = task_max;
thread_max = task_max * 5;
}
#endif
bsd_scale_setup(scale);
}