X-Git-Url: https://git.saurik.com/apple/xnu.git/blobdiff_plain/6601e61aa18bf4f09af135ff61fc7f4771d23b06..c3c9b80d004dbbfdf763edeb97968c6997e3b45b:/pexpert/i386/pe_init.c diff --git a/pexpert/i386/pe_init.c b/pexpert/i386/pe_init.c index 89d90db7f..74c6c6276 100644 --- a/pexpert/i386/pe_init.c +++ b/pexpert/i386/pe_init.c @@ -1,367 +1,465 @@ /* - * Copyright (c) 2000 Apple Computer, Inc. All rights reserved. + * Copyright (c) 2000-2006 Apple Computer, Inc. All rights reserved. * - * @APPLE_LICENSE_HEADER_START@ - * - * The contents of this file constitute Original Code as defined in and - * are subject to the Apple Public Source License Version 1.1 (the - * "License"). You may not use this file except in compliance with the - * License. Please obtain a copy of the License at - * http://www.apple.com/publicsource and read it before using this file. - * - * This Original Code and all software distributed under the License are - * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER + * @APPLE_OSREFERENCE_LICENSE_HEADER_START@ + * + * This file contains Original Code and/or Modifications of Original Code + * as defined in and that are subject to the Apple Public Source License + * Version 2.0 (the 'License'). You may not use this file except in + * compliance with the License. The rights granted to you under the License + * may not be used to create, or enable the creation or redistribution of, + * unlawful or unlicensed copies of an Apple operating system, or to + * circumvent, violate, or enable the circumvention or violation of, any + * terms of an Apple operating system software license agreement. + * + * Please obtain a copy of the License at + * http://www.opensource.apple.com/apsl/ and read it before using this file. + * + * The Original Code and all software distributed under the License are + * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT. Please see the - * License for the specific language governing rights and limitations - * under the License. - * - * @APPLE_LICENSE_HEADER_END@ + * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. + * Please see the License for the specific language governing rights and + * limitations under the License. + * + * @APPLE_OSREFERENCE_LICENSE_HEADER_END@ */ /* * file: pe_init.c * i386 platform expert initialization. */ + +#include #include #include +#include #include #include #include #include #include #include +#include + +#if CONFIG_CSR +#include +#endif -#include "fakePPCStructs.h" -#include "fakePPCDeviceTree.h" #include "boot_images.h" /* extern references */ extern void pe_identify_machine(void * args); -extern void initialize_screen(void *, unsigned int); - -/* Local references */ -static int PE_fb_mode = TEXT_MODE; - +extern int kdb_printf(const char *format, ...) __printflike(1, 2); /* private globals */ PE_state_t PE_state; -dt_data gMemoryMapNode; -dt_data gDriversProp; -dt_data gRootpathProp; -dt_data gCompatibleProp; /* Clock Frequency Info */ clock_frequency_info_t gPEClockFrequencyInfo; -int PE_initialize_console( PE_Video * info, int op ) +void *gPEEFISystemTable; +void *gPEEFIRuntimeServices; + +static boot_icon_element* norootIcon_lzss; +static const uint8_t* norootClut_lzss; + +int +PE_initialize_console( PE_Video * info, int op ) { - static int last_console = -1; - Boot_Video bootInfo; - Boot_Video * bInfo; - - /* - * Refuse changes from outside pexpert. - * The video mode setup by the booter cannot be changed. - */ - if ( info ) - { - bootInfo.v_baseAddr = info->v_baseAddr; - bootInfo.v_rowBytes = info->v_rowBytes; - bootInfo.v_width = info->v_width; - bootInfo.v_height = info->v_height; - bootInfo.v_depth = info->v_depth; - bInfo = &bootInfo; - if (info == &PE_state.video) { - bootInfo.v_display = PE_fb_mode; - } else { - bootInfo.v_display = GRAPHICS_MODE; - } - } - else - bInfo = 0; - - switch ( op ) { - - case kPEDisableScreen: - initialize_screen((void *) bInfo, op); -#ifdef FIXME - last_console = switch_to_serial_console(); -#endif - kprintf("kPEDisableScreen %d\n", last_console); - break; - - case kPEEnableScreen: - initialize_screen((void *) bInfo, op); - kprintf("kPEEnableScreen %d\n", last_console); -#ifdef FIXME - if( last_console != -1) - switch_to_old_console( last_console); -#endif - break; - - default: - initialize_screen((void *) bInfo, op); - break; - } - - return 0; + static int last_console = -1; + + if (info) { + info->v_offset = 0; + info->v_length = 0; + info->v_display = GRAPHICS_MODE; + } + + switch (op) { + case kPEDisableScreen: + initialize_screen(info, op); + kprintf("kPEDisableScreen %d\n", last_console); + if (!console_is_serial()) { + last_console = switch_to_serial_console(); + } + break; + + case kPEEnableScreen: + initialize_screen(info, op); + if (info) { + PE_state.video = *info; + } + kprintf("kPEEnableScreen %d\n", last_console); + if (last_console != -1) { + switch_to_old_console( last_console); + } + break; + + case kPEBaseAddressChange: + if (info) { + PE_state.video = *info; + } + OS_FALLTHROUGH; + + default: + initialize_screen(info, op); + break; + } + + return 0; } -void PE_init_iokit(void) +void +PE_init_iokit(void) { - long * dt; - int i; - KernelBootArgs_t *kap = (KernelBootArgs_t *)PE_state.bootArgs; - enum { kMaxBootVar = 128 }; - char *rdValue, *platformValue; - - typedef struct { - char name[32]; - unsigned long length; - unsigned long value[2]; - } DriversPackageProp; - - PE_init_kprintf(TRUE); - PE_init_printf(TRUE); - - /* - * Update the fake device tree with the driver information provided by - * the booter. - */ - - gDriversProp.length = kap->numBootDrivers * sizeof(DriversPackageProp); - gMemoryMapNode.length = 2 * sizeof(long); - - rdValue = kalloc(kMaxBootVar); - if ( PE_parse_boot_arg("rd", rdValue) ) { - if (*rdValue == '*') { - gRootpathProp.address = (rdValue + 1); - } else { - gRootpathProp.address = rdValue; - } - strcat(rdValue, ","); - } else { - gRootpathProp.address = rdValue; - rdValue[0] = '\0'; - } - strcat(rdValue, kap->bootFile); - gRootpathProp.length = strlen(rdValue) + 1; - - platformValue = kalloc(kMaxBootVar); - if ( ! PE_parse_boot_arg("platform", platformValue) ) { - strcpy(platformValue, kDefaultPlatformName); - } - gCompatibleProp.address = platformValue; - gCompatibleProp.length = strlen(platformValue) + 1; - - dt = (long *) createdt( fakePPCDeviceTree, - &((boot_args*)PE_state.fakePPCBootArgs)->deviceTreeLength ); - - kfree(rdValue, kMaxBootVar); - kfree(platformValue, kMaxBootVar); - - - if ( dt ) - { - DriversPackageProp * prop = (DriversPackageProp *) gDriversProp.address; - - /* Copy driver info in kernBootStruct to fake device tree */ - - for ( i = 0; i < kap->numBootDrivers; i++, prop++ ) - { - switch ( kap->driverConfig[i].type ) - { - case kBootDriverTypeKEXT: - sprintf(prop->name, "Driver-%lx", kap->driverConfig[i].address); - break; - - case kBootDriverTypeMKEXT: - sprintf(prop->name, "DriversPackage-%lx", kap->driverConfig[i].address); - break; - - default: - sprintf(prop->name, "DriverBogus-%lx", kap->driverConfig[i].address); - break; - } - prop->length = sizeof(prop->value); - prop->value[0] = kap->driverConfig[i].address; - prop->value[1] = kap->driverConfig[i].size; - } - - *((long *)gMemoryMapNode.address) = kap->numBootDrivers + 1; - } - - /* Setup powermac_info and powermac_machine_info structures */ - - ((boot_args*)PE_state.fakePPCBootArgs)->deviceTreeP = (unsigned long *) dt; - ((boot_args*)PE_state.fakePPCBootArgs)->topOfKernelData = (unsigned long) kalloc(0x2000); - - /* - * Setup the OpenFirmware Device Tree routines - * so the console can be found and the right I/O space - * can be used.. - */ - DTInit(dt); - - /* - * Fetch the CLUT and the noroot image. - */ - bcopy( (void *) (uintptr_t) bootClut, (void *) appleClut8, sizeof(appleClut8) ); - - default_noroot.width = kFailedBootWidth; - default_noroot.height = kFailedBootHeight; - default_noroot.dx = 0; - default_noroot.dy = kFailedBootOffset; - default_noroot_data = failedBootPict; - - /* - * Initialize the panic UI - */ - panic_ui_initialize( (unsigned char *) appleClut8 ); - - /* - * Initialize the spinning wheel (progress indicator). - */ - vc_progress_initialize( &default_progress, default_progress_data, - (unsigned char *) appleClut8 ); - - (void) StartIOKit( (void*)dt, PE_state.bootArgs, 0, 0); + enum { kMaxBootVar = 128 }; + + boolean_t bootClutInitialized = FALSE; + boolean_t noroot_rle_Initialized = FALSE; + + DTEntry entry; + unsigned int size; + uint32_t const *map; + boot_progress_element *bootPict; + + norootIcon_lzss = NULL; + norootClut_lzss = NULL; + + PE_init_printf(TRUE); + + kprintf("Kernel boot args: '%s'\n", PE_boot_args()); + + /* + * Fetch the CLUT and the noroot image. + */ + + if (kSuccess == SecureDTLookupEntry(NULL, "/chosen/memory-map", &entry)) { + if (kSuccess == SecureDTGetProperty(entry, "BootCLUT", (void const **) &map, &size)) { + if (sizeof(appleClut8) <= map[1]) { + bcopy((void *)ml_static_ptovirt(map[0]), appleClut8, sizeof(appleClut8)); + bootClutInitialized = TRUE; + } + } + + if (kSuccess == SecureDTGetProperty(entry, "Pict-FailedBoot", (void const **) &map, &size)) { + bootPict = (boot_progress_element *) ml_static_ptovirt(map[0]); + default_noroot.width = bootPict->width; + default_noroot.height = bootPict->height; + default_noroot.dx = 0; + default_noroot.dy = bootPict->yOffset; + default_noroot_data = &bootPict->data[0]; + noroot_rle_Initialized = TRUE; + } + + if (kSuccess == SecureDTGetProperty(entry, "FailedCLUT", (void const **) &map, &size)) { + norootClut_lzss = (uint8_t*) ml_static_ptovirt(map[0]); + } + + if (kSuccess == SecureDTGetProperty(entry, "FailedImage", (void const **) &map, &size)) { + norootIcon_lzss = (boot_icon_element *) ml_static_ptovirt(map[0]); + if (norootClut_lzss == NULL) { + printf("ERROR: No FailedCLUT provided for noroot icon!\n"); + } + } + } + + if (!bootClutInitialized) { + bcopy((void *) (uintptr_t) bootClut, (void *) appleClut8, sizeof(appleClut8)); + } + + if (!noroot_rle_Initialized) { + default_noroot.width = kFailedBootWidth; + default_noroot.height = kFailedBootHeight; + default_noroot.dx = 0; + default_noroot.dy = kFailedBootOffset; + default_noroot_data = failedBootPict; + } + + /* + * Initialize the spinning wheel (progress indicator). + */ + vc_progress_initialize(&default_progress, + default_progress_data1x, + default_progress_data2x, + default_progress_data3x, + (unsigned char *) appleClut8); + + /* + * x86 only minimally enforces lockdown in hardware. Additionally, some pre-lockdown functionality + * such as commpage initialization requires IOKit enumeration of CPUs, which is heavily entangled + * with the ACPI stack. Therefore, we start the IOKit matching process immediately on x86. + */ + InitIOKit(PE_state.deviceTreeHead); + StartIOKitMatching(); } -void PE_init_platform(boolean_t vm_initialized, void * args) +void +PE_lockdown_iokit(void) { - if (PE_state.initialized == FALSE) - { - KernelBootArgs_t *kap = (KernelBootArgs_t *) args; - - PE_state.initialized = TRUE; - PE_state.bootArgs = args; - PE_state.video.v_baseAddr = kap->video.v_baseAddr; - PE_state.video.v_rowBytes = kap->video.v_rowBytes; - PE_state.video.v_height = kap->video.v_height; - PE_state.video.v_width = kap->video.v_width; - PE_state.video.v_depth = kap->video.v_depth; - PE_state.video.v_display = kap->video.v_display; - PE_fb_mode = kap->graphicsMode; - PE_state.fakePPCBootArgs = (boot_args *)&fakePPCBootArgs; - ((boot_args *)PE_state.fakePPCBootArgs)->machineType = 386; - - if (PE_fb_mode == TEXT_MODE) - { - /* Force a text display if the booter did not setup a - * VESA frame buffer. - */ - PE_state.video.v_display = 0; - } - } - - if (!vm_initialized) - { - /* Hack! FIXME.. */ - outb(0x21, 0xff); /* Maskout all interrupts Pic1 */ - outb(0xa1, 0xff); /* Maskout all interrupts Pic2 */ - - pe_identify_machine(args); - } - else - { - pe_init_debug(); - } + /* Ensure that at least the CPUs have been enumerated before moving forward. */ + ml_wait_max_cpus(); } -void PE_create_console( void ) +void +PE_init_platform(boolean_t vm_initialized, void * _args) { - if ( PE_state.video.v_display ) - PE_initialize_console( &PE_state.video, kPEGraphicsMode ); - else - PE_initialize_console( &PE_state.video, kPETextMode ); + boot_args *args = (boot_args *)_args; + + if (PE_state.initialized == FALSE) { + PE_state.initialized = TRUE; + + // New EFI-style + PE_state.bootArgs = _args; + PE_state.deviceTreeHead = (void *) ml_static_ptovirt(args->deviceTreeP); + PE_state.deviceTreeSize = args->deviceTreeLength; + if (args->Video.v_baseAddr) { + PE_state.video.v_baseAddr = args->Video.v_baseAddr;// remains physical address + PE_state.video.v_rowBytes = args->Video.v_rowBytes; + PE_state.video.v_depth = args->Video.v_depth; + PE_state.video.v_display = args->Video.v_display; + PE_state.video.v_rotate = args->Video.v_rotate; + + /* EFI doesn't have a good way of describing rotation internally, + * so it flips width and height in portrait mode. We flip it back. */ + if (PE_state.video.v_rotate == kDataRotate90 || + PE_state.video.v_rotate == kDataRotate270) { + PE_state.video.v_width = args->Video.v_height; + PE_state.video.v_height = args->Video.v_width; + } else { + PE_state.video.v_width = args->Video.v_width; + PE_state.video.v_height = args->Video.v_height; + } + + strlcpy(PE_state.video.v_pixelFormat, "PPPPPPPP", + sizeof(PE_state.video.v_pixelFormat)); + } else { + PE_state.video.v_baseAddr = args->VideoV1.v_baseAddr;// remains physical address + PE_state.video.v_rowBytes = args->VideoV1.v_rowBytes; + PE_state.video.v_width = args->VideoV1.v_width; + PE_state.video.v_height = args->VideoV1.v_height; + PE_state.video.v_depth = args->VideoV1.v_depth; + PE_state.video.v_display = args->VideoV1.v_display; + PE_state.video.v_rotate = kDataRotate0; /* no room for rotation info */ + strlcpy(PE_state.video.v_pixelFormat, "PPPPPPPP", + sizeof(PE_state.video.v_pixelFormat)); + } + +#ifdef kBootArgsFlagHiDPI + if (args->flags & kBootArgsFlagHiDPI) { + PE_state.video.v_scale = kPEScaleFactor2x; + } else { + PE_state.video.v_scale = kPEScaleFactor1x; + } +#else + PE_state.video.v_scale = kPEScaleFactor1x; +#endif + } + + if (!vm_initialized) { + if (PE_state.deviceTreeHead) { + SecureDTInit(PE_state.deviceTreeHead, PE_state.deviceTreeSize); + } + + pe_identify_machine(args); + pe_init_debug(); + } } -int PE_current_console( PE_Video * info ) +void +PE_create_console( void ) { - *info = PE_state.video; - - if ( PE_fb_mode == TEXT_MODE ) - { - /* - * FIXME: Prevent the IOBootFrameBuffer from starting up - * when we are in Text mode. - */ - info->v_baseAddr = 0; - - /* - * Scale the size of the text screen from characters - * to pixels. - */ - info->v_width *= 8; // CHARWIDTH - info->v_height *= 16; // CHARHEIGHT - } - - return (0); + if (PE_state.video.v_display == GRAPHICS_MODE) { + PE_initialize_console( &PE_state.video, kPEGraphicsMode ); + } else { + PE_initialize_console( &PE_state.video, kPETextMode ); + } } -void PE_display_icon( __unused unsigned int flags, __unused const char * name ) +int +PE_current_console( PE_Video * info ) { - if ( default_noroot_data ) - vc_display_icon( &default_noroot, default_noroot_data ); + *info = PE_state.video; + + return 0; } -extern boolean_t PE_get_hotkey( __unused unsigned char key ) +void +PE_display_icon( __unused unsigned int flags, __unused const char * name ) { - return (FALSE); + if (norootIcon_lzss && norootClut_lzss) { + uint32_t width = norootIcon_lzss->width; + uint32_t height = norootIcon_lzss->height; + uint32_t x = ((PE_state.video.v_width - width) / 2); + uint32_t y = ((PE_state.video.v_height - height) / 2) + norootIcon_lzss->y_offset_from_center; + + vc_display_lzss_icon(x, y, width, height, + &norootIcon_lzss->data[0], + norootIcon_lzss->data_size, + norootClut_lzss); + } else if (default_noroot_data) { + vc_display_icon( &default_noroot, default_noroot_data ); + } else { + printf("ERROR: No data found for noroot icon!\n"); + } +} + +boolean_t +PE_get_hotkey(__unused unsigned char key) +{ + return FALSE; } static timebase_callback_func gTimebaseCallback; -void PE_register_timebase_callback(timebase_callback_func callback) +void +PE_register_timebase_callback(timebase_callback_func callback) { - gTimebaseCallback = callback; - - PE_call_timebase_callback(); + gTimebaseCallback = callback; + + PE_call_timebase_callback(); } -void PE_call_timebase_callback(void) +void +PE_call_timebase_callback(void) { - struct timebase_freq_t timebase_freq; - unsigned long num, den, cnt; - - num = gPEClockFrequencyInfo.bus_clock_rate_num * gPEClockFrequencyInfo.bus_to_dec_rate_num; - den = gPEClockFrequencyInfo.bus_clock_rate_den * gPEClockFrequencyInfo.bus_to_dec_rate_den; - - cnt = 2; - while (cnt <= den) { - if ((num % cnt) || (den % cnt)) { - cnt++; - continue; - } - - num /= cnt; - den /= cnt; - } - - timebase_freq.timebase_num = num; - timebase_freq.timebase_den = den; - - if (gTimebaseCallback) gTimebaseCallback(&timebase_freq); + struct timebase_freq_t timebase_freq; + unsigned long num, den, cnt; + + num = gPEClockFrequencyInfo.bus_clock_rate_num * gPEClockFrequencyInfo.bus_to_dec_rate_num; + den = gPEClockFrequencyInfo.bus_clock_rate_den * gPEClockFrequencyInfo.bus_to_dec_rate_den; + + cnt = 2; + while (cnt <= den) { + if ((num % cnt) || (den % cnt)) { + cnt++; + continue; + } + + num /= cnt; + den /= cnt; + } + + timebase_freq.timebase_num = num; + timebase_freq.timebase_den = den; + + if (gTimebaseCallback) { + gTimebaseCallback(&timebase_freq); + } } /* * The default (non-functional) PE_poll_input handler. */ -static int +int PE_stub_poll_input(__unused unsigned int options, char * c) { - *c = 0xff; - return 1; /* 0 for success, 1 for unsupported */ + *c = 0xff; + return 1; /* 0 for success, 1 for unsupported */ } -/* - * Called by the kernel debugger to poll for keyboard input. - * Keyboard drivers may replace the default stub function - * with their polled-mode input function. - */ -int (*PE_poll_input)(unsigned int options, char * c) - = PE_stub_poll_input; +boolean_t +PE_reboot_on_panic(void) +{ + boot_args *args = (boot_args *)PE_state.bootArgs; + + if (args->flags & kBootArgsFlagRebootOnPanic) { + return TRUE; + } else { + return FALSE; + } +} + +void +PE_sync_panic_buffers(void) +{ +} + +/* rdar://problem/21244753 */ +uint32_t +PE_i_can_has_debugger(uint32_t *debug_flags) +{ +#if DEVELOPMENT || DEBUG + if (debug_flags) { + assert(startup_phase >= STARTUP_SUB_TUNABLES); + } +#endif + +#if CONFIG_CSR + if (csr_check(CSR_ALLOW_KERNEL_DEBUGGER) != 0) { + if (debug_flags) { + *debug_flags = 0; + } + return FALSE; + } +#endif + if (debug_flags) { + *debug_flags = debug_boot_arg; + } + return TRUE; +} +uint32_t +PE_get_offset_into_panic_region(char *location) +{ + assert(panic_info != NULL); + assert(location > (char *) panic_info); + + return (uint32_t) (location - (char *) panic_info); +} +void +PE_init_panicheader() +{ + bzero(panic_info, offsetof(struct macos_panic_header, mph_data)); + panic_info->mph_panic_log_offset = PE_get_offset_into_panic_region(debug_buf_base); + + panic_info->mph_magic = MACOS_PANIC_MAGIC; + panic_info->mph_version = MACOS_PANIC_HEADER_CURRENT_VERSION; + + return; +} +/* + * Tries to update the panic header to keep it consistent on nested panics. + * + * NOTE: The purpose of this function is NOT to detect/correct corruption in the panic region, + * it is to update the panic header to make it consistent when we nest panics. + * + * We try to avoid nested panics/asserts on x86 because they are difficult to debug, so log any + * inconsistencies we find. + */ +void +PE_update_panicheader_nestedpanic() +{ + /* If the panic log offset is not set, re-init the panic header */ + if (panic_info->mph_panic_log_offset == 0) { + PE_init_panicheader(); + panic_info->mph_panic_flags |= MACOS_PANIC_HEADER_FLAG_NESTED_PANIC; + return; + } + + panic_info->mph_panic_flags |= MACOS_PANIC_HEADER_FLAG_NESTED_PANIC; + + /* Usually indicative of corruption in the panic region */ + if (!(((panic_info->mph_stackshot_offset == 0) && (panic_info->mph_stackshot_len == 0)) || + ((panic_info->mph_stackshot_offset != 0) && (panic_info->mph_stackshot_len != 0)))) { + kdb_printf("panic_info contains invalid stackshot metadata: mph_stackshot_offset 0x%x mph_stackshot_len 0x%x\n", + panic_info->mph_stackshot_offset, panic_info->mph_stackshot_len); + } + + /* + * macOS panic logs contain nested panic data, if we've already closed the panic log, + * begin the other log. + */ + if ((panic_info->mph_panic_log_len != 0) && (panic_info->mph_other_log_offset == 0)) { + panic_info->mph_other_log_offset = PE_get_offset_into_panic_region(debug_buf_ptr); + + /* Usually indicative of corruption in the panic region */ + if (panic_info->mph_other_log_len != 0) { + kdb_printf("panic_info contains invalid other log metadata (zero offset but non-zero length), length was 0x%x, zeroing value\n", + panic_info->mph_other_log_len); + panic_info->mph_other_log_len = 0; + } + } + + return; +}