1*678d37b9Syasuoka /* $OpenBSD: efiboot.c,v 1.21 2018/08/25 00:12:14 yasuoka Exp $ */ 2f24071e5Spatrick 3f24071e5Spatrick /* 4f24071e5Spatrick * Copyright (c) 2015 YASUOKA Masahiko <yasuoka@yasuoka.net> 5f24071e5Spatrick * Copyright (c) 2016 Mark Kettenis 6f24071e5Spatrick * 7f24071e5Spatrick * Permission to use, copy, modify, and distribute this software for any 8f24071e5Spatrick * purpose with or without fee is hereby granted, provided that the above 9f24071e5Spatrick * copyright notice and this permission notice appear in all copies. 10f24071e5Spatrick * 11f24071e5Spatrick * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 12f24071e5Spatrick * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 13f24071e5Spatrick * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 14f24071e5Spatrick * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 15f24071e5Spatrick * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 16f24071e5Spatrick * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 17f24071e5Spatrick * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 18f24071e5Spatrick */ 19f24071e5Spatrick 20f24071e5Spatrick #include <sys/param.h> 21f24071e5Spatrick #include <sys/queue.h> 226f83097eSpatrick #include <sys/stat.h> 23f24071e5Spatrick #include <dev/cons.h> 24f24071e5Spatrick #include <sys/disklabel.h> 25f24071e5Spatrick 26f24071e5Spatrick #include <efi.h> 27f24071e5Spatrick #include <efiapi.h> 28f24071e5Spatrick #include <efiprot.h> 29f24071e5Spatrick #include <eficonsctl.h> 30f24071e5Spatrick 31f24071e5Spatrick #include <lib/libkern/libkern.h> 32f24071e5Spatrick #include <stand/boot/cmd.h> 33f24071e5Spatrick 34f24071e5Spatrick #include "disk.h" 3533e5575aSpatrick #include "efiboot.h" 36f24071e5Spatrick #include "eficall.h" 37f24071e5Spatrick #include "fdt.h" 38f24071e5Spatrick #include "libsa.h" 39f24071e5Spatrick 40f24071e5Spatrick EFI_SYSTEM_TABLE *ST; 41f24071e5Spatrick EFI_BOOT_SERVICES *BS; 42f24071e5Spatrick EFI_RUNTIME_SERVICES *RS; 43f673f4ddSkettenis EFI_HANDLE IH, efi_bootdp; 44f24071e5Spatrick 45fa854029Spatrick EFI_PHYSICAL_ADDRESS heap; 46fa854029Spatrick UINTN heapsiz = 1 * 1024 * 1024; 47f673f4ddSkettenis EFI_MEMORY_DESCRIPTOR *mmap; 48fa854029Spatrick UINTN mmap_key; 49fa854029Spatrick UINTN mmap_ndesc; 50fa854029Spatrick UINTN mmap_descsiz; 51f4dd1aebSkettenis UINT32 mmap_version; 52f24071e5Spatrick 53f24071e5Spatrick static EFI_GUID imgp_guid = LOADED_IMAGE_PROTOCOL; 54f24071e5Spatrick static EFI_GUID blkio_guid = BLOCK_IO_PROTOCOL; 55f24071e5Spatrick static EFI_GUID devp_guid = DEVICE_PATH_PROTOCOL; 561e44dc38Skettenis static EFI_GUID gop_guid = EFI_GRAPHICS_OUTPUT_PROTOCOL_GUID; 57f24071e5Spatrick 5833e5575aSpatrick int efi_device_path_depth(EFI_DEVICE_PATH *dp, int); 5933e5575aSpatrick int efi_device_path_ncmp(EFI_DEVICE_PATH *, EFI_DEVICE_PATH *, int); 60fa854029Spatrick static void efi_heap_init(void); 61fa854029Spatrick static void efi_memprobe_internal(void); 62f24071e5Spatrick static void efi_timer_init(void); 63f24071e5Spatrick static void efi_timer_cleanup(void); 64f24071e5Spatrick static EFI_STATUS efi_memprobe_find(UINTN, UINTN, EFI_PHYSICAL_ADDRESS *); 65f24071e5Spatrick 66f24071e5Spatrick EFI_STATUS 67f24071e5Spatrick efi_main(EFI_HANDLE image, EFI_SYSTEM_TABLE *systab) 68f24071e5Spatrick { 69f24071e5Spatrick extern char *progname; 70f24071e5Spatrick EFI_LOADED_IMAGE *imgp; 71f24071e5Spatrick EFI_DEVICE_PATH *dp = NULL; 72f24071e5Spatrick EFI_STATUS status; 73f24071e5Spatrick 74f24071e5Spatrick ST = systab; 75f24071e5Spatrick BS = ST->BootServices; 76496ffee0Spatrick RS = ST->RuntimeServices; 77f24071e5Spatrick IH = image; 78f24071e5Spatrick 79f0da534cSjsg /* disable reset by watchdog after 5 minutes */ 80f0da534cSjsg EFI_CALL(BS->SetWatchdogTimer, 0, 0, 0, NULL); 81f0da534cSjsg 82f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, image, &imgp_guid, 83f24071e5Spatrick (void **)&imgp); 84f24071e5Spatrick if (status == EFI_SUCCESS) 85f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, imgp->DeviceHandle, 86f24071e5Spatrick &devp_guid, (void **)&dp); 87f24071e5Spatrick if (status == EFI_SUCCESS) 88f24071e5Spatrick efi_bootdp = dp; 89f24071e5Spatrick 90f24071e5Spatrick progname = "BOOTAA64"; 91f24071e5Spatrick 92f24071e5Spatrick boot(0); 93f24071e5Spatrick 94f24071e5Spatrick return (EFI_SUCCESS); 95f24071e5Spatrick } 96f24071e5Spatrick 97f24071e5Spatrick static SIMPLE_TEXT_OUTPUT_INTERFACE *conout; 98f24071e5Spatrick static SIMPLE_INPUT_INTERFACE *conin; 99f24071e5Spatrick 100f24071e5Spatrick void 101f24071e5Spatrick efi_cons_probe(struct consdev *cn) 102f24071e5Spatrick { 103f24071e5Spatrick cn->cn_pri = CN_MIDPRI; 104f24071e5Spatrick cn->cn_dev = makedev(12, 0); 105f24071e5Spatrick } 106f24071e5Spatrick 107f24071e5Spatrick void 108f24071e5Spatrick efi_cons_init(struct consdev *cp) 109f24071e5Spatrick { 110f24071e5Spatrick conin = ST->ConIn; 111f24071e5Spatrick conout = ST->ConOut; 112f24071e5Spatrick } 113f24071e5Spatrick 114f24071e5Spatrick int 115f24071e5Spatrick efi_cons_getc(dev_t dev) 116f24071e5Spatrick { 117f24071e5Spatrick EFI_INPUT_KEY key; 118f24071e5Spatrick EFI_STATUS status; 119f24071e5Spatrick #if 0 120f24071e5Spatrick UINTN dummy; 121f24071e5Spatrick #endif 122f24071e5Spatrick static int lastchar = 0; 123f24071e5Spatrick 124f24071e5Spatrick if (lastchar) { 125f24071e5Spatrick int r = lastchar; 126f24071e5Spatrick if ((dev & 0x80) == 0) 127f24071e5Spatrick lastchar = 0; 128f24071e5Spatrick return (r); 129f24071e5Spatrick } 130f24071e5Spatrick 131f24071e5Spatrick status = conin->ReadKeyStroke(conin, &key); 132*678d37b9Syasuoka while (status == EFI_NOT_READY || key.UnicodeChar == 0) { 133f24071e5Spatrick if (dev & 0x80) 134f24071e5Spatrick return (0); 135f24071e5Spatrick /* 136f24071e5Spatrick * XXX The implementation of WaitForEvent() in U-boot 137f24071e5Spatrick * is broken and neverreturns. 138f24071e5Spatrick */ 139f24071e5Spatrick #if 0 140f24071e5Spatrick BS->WaitForEvent(1, &conin->WaitForKey, &dummy); 141f24071e5Spatrick #endif 142f24071e5Spatrick status = conin->ReadKeyStroke(conin, &key); 143f24071e5Spatrick } 144f24071e5Spatrick 145f24071e5Spatrick if (dev & 0x80) 146f24071e5Spatrick lastchar = key.UnicodeChar; 147f24071e5Spatrick 148f24071e5Spatrick return (key.UnicodeChar); 149f24071e5Spatrick } 150f24071e5Spatrick 151f24071e5Spatrick void 152f24071e5Spatrick efi_cons_putc(dev_t dev, int c) 153f24071e5Spatrick { 154f24071e5Spatrick CHAR16 buf[2]; 155f24071e5Spatrick 156f24071e5Spatrick if (c == '\n') 157f24071e5Spatrick efi_cons_putc(dev, '\r'); 158f24071e5Spatrick 159f24071e5Spatrick buf[0] = c; 160f24071e5Spatrick buf[1] = 0; 161f24071e5Spatrick 162f24071e5Spatrick conout->OutputString(conout, buf); 163f24071e5Spatrick } 164f24071e5Spatrick 165f24071e5Spatrick static void 166f24071e5Spatrick efi_heap_init(void) 167f24071e5Spatrick { 168f24071e5Spatrick EFI_STATUS status; 169f24071e5Spatrick 170f24071e5Spatrick status = EFI_CALL(BS->AllocatePages, AllocateAnyPages, EfiLoaderData, 171f24071e5Spatrick EFI_SIZE_TO_PAGES(heapsiz), &heap); 172f24071e5Spatrick if (status != EFI_SUCCESS) 173f24071e5Spatrick panic("BS->AllocatePages()"); 174f24071e5Spatrick } 175f24071e5Spatrick 176f24071e5Spatrick EFI_BLOCK_IO *disk; 177f24071e5Spatrick 178f24071e5Spatrick void 179f24071e5Spatrick efi_diskprobe(void) 180f24071e5Spatrick { 181c6d7d0adSpatrick int i, depth = -1; 182f24071e5Spatrick UINTN sz; 183f24071e5Spatrick EFI_STATUS status; 184f24071e5Spatrick EFI_HANDLE *handles = NULL; 185f24071e5Spatrick EFI_BLOCK_IO *blkio; 186f24071e5Spatrick EFI_BLOCK_IO_MEDIA *media; 187c6d7d0adSpatrick EFI_DEVICE_PATH *dp; 188f24071e5Spatrick 189f24071e5Spatrick sz = 0; 190f24071e5Spatrick status = EFI_CALL(BS->LocateHandle, ByProtocol, &blkio_guid, 0, &sz, 0); 191f24071e5Spatrick if (status == EFI_BUFFER_TOO_SMALL) { 192f24071e5Spatrick handles = alloc(sz); 193f24071e5Spatrick status = EFI_CALL(BS->LocateHandle, ByProtocol, &blkio_guid, 194f24071e5Spatrick 0, &sz, handles); 195f24071e5Spatrick } 196f24071e5Spatrick if (handles == NULL || EFI_ERROR(status)) 19733e5575aSpatrick return; 198f24071e5Spatrick 199c6d7d0adSpatrick if (efi_bootdp != NULL) 200c6d7d0adSpatrick depth = efi_device_path_depth(efi_bootdp, MEDIA_DEVICE_PATH); 201c6d7d0adSpatrick 202c94e7257Skettenis /* 203c94e7257Skettenis * U-Boot incorrectly represents devices with a single 204c94e7257Skettenis * MEDIA_DEVICE_PATH component. In that case include that 205c94e7257Skettenis * component into the matching, otherwise we'll blindly select 206c94e7257Skettenis * the first device. 207c94e7257Skettenis */ 208c94e7257Skettenis if (depth == 0) 209c94e7257Skettenis depth = 1; 210c94e7257Skettenis 211f24071e5Spatrick for (i = 0; i < sz / sizeof(EFI_HANDLE); i++) { 212f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, handles[i], &blkio_guid, 213f24071e5Spatrick (void **)&blkio); 214f24071e5Spatrick if (EFI_ERROR(status)) 215f24071e5Spatrick panic("BS->HandleProtocol() returns %d", status); 216f24071e5Spatrick 217f24071e5Spatrick media = blkio->Media; 218f24071e5Spatrick if (media->LogicalPartition || !media->MediaPresent) 219f24071e5Spatrick continue; 220f24071e5Spatrick 221c6d7d0adSpatrick if (efi_bootdp == NULL || depth == -1) 222c6d7d0adSpatrick continue; 223f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, handles[i], &devp_guid, 224f24071e5Spatrick (void **)&dp); 225f24071e5Spatrick if (EFI_ERROR(status)) 226c6d7d0adSpatrick continue; 227c6d7d0adSpatrick if (efi_device_path_ncmp(efi_bootdp, dp, depth) == 0) { 228f24071e5Spatrick disk = blkio; 229f24071e5Spatrick break; 230f24071e5Spatrick } 231f24071e5Spatrick } 232f24071e5Spatrick 233f24071e5Spatrick free(handles, sz); 234f24071e5Spatrick } 235f24071e5Spatrick 236c94e7257Skettenis /* 237c94e7257Skettenis * Determine the number of nodes up to, but not including, the first 238c94e7257Skettenis * node of the specified type. 239c94e7257Skettenis */ 24033e5575aSpatrick int 241c6d7d0adSpatrick efi_device_path_depth(EFI_DEVICE_PATH *dp, int dptype) 242c6d7d0adSpatrick { 243c6d7d0adSpatrick int i; 244c6d7d0adSpatrick 245c6d7d0adSpatrick for (i = 0; !IsDevicePathEnd(dp); dp = NextDevicePathNode(dp), i++) { 246c6d7d0adSpatrick if (DevicePathType(dp) == dptype) 247c94e7257Skettenis return (i); 248c6d7d0adSpatrick } 249c6d7d0adSpatrick 250c6d7d0adSpatrick return (-1); 251c6d7d0adSpatrick } 252c6d7d0adSpatrick 25333e5575aSpatrick int 254c6d7d0adSpatrick efi_device_path_ncmp(EFI_DEVICE_PATH *dpa, EFI_DEVICE_PATH *dpb, int deptn) 255c6d7d0adSpatrick { 256c6d7d0adSpatrick int i, cmp; 257c6d7d0adSpatrick 258c6d7d0adSpatrick for (i = 0; i < deptn; i++) { 259c6d7d0adSpatrick if (IsDevicePathEnd(dpa) || IsDevicePathEnd(dpb)) 260c6d7d0adSpatrick return ((IsDevicePathEnd(dpa) && IsDevicePathEnd(dpb)) 261c6d7d0adSpatrick ? 0 : (IsDevicePathEnd(dpa))? -1 : 1); 262c6d7d0adSpatrick cmp = DevicePathNodeLength(dpa) - DevicePathNodeLength(dpb); 263c6d7d0adSpatrick if (cmp) 264c6d7d0adSpatrick return (cmp); 265c6d7d0adSpatrick cmp = memcmp(dpa, dpb, DevicePathNodeLength(dpa)); 266c6d7d0adSpatrick if (cmp) 267c6d7d0adSpatrick return (cmp); 268c6d7d0adSpatrick dpa = NextDevicePathNode(dpa); 269c6d7d0adSpatrick dpb = NextDevicePathNode(dpb); 270c6d7d0adSpatrick } 271c6d7d0adSpatrick 272c6d7d0adSpatrick return (0); 273c6d7d0adSpatrick } 274c6d7d0adSpatrick 2751e44dc38Skettenis void 2761e44dc38Skettenis efi_framebuffer(void) 2771e44dc38Skettenis { 2781e44dc38Skettenis EFI_GRAPHICS_OUTPUT *gop; 2791e44dc38Skettenis EFI_STATUS status; 2801e44dc38Skettenis void *node, *child; 2811e44dc38Skettenis uint32_t acells, scells; 2821e44dc38Skettenis uint64_t base, size; 2831e44dc38Skettenis uint32_t reg[4]; 2841e44dc38Skettenis uint32_t width, height, stride; 2851e44dc38Skettenis char *format; 2861e44dc38Skettenis 2871e44dc38Skettenis /* 2881e44dc38Skettenis * Don't create a "simple-framebuffer" node if we already have 2891e44dc38Skettenis * one. Besides "/chosen", we also check under "/" since that 2901e44dc38Skettenis * is where the Raspberry Pi firmware puts it. 2911e44dc38Skettenis */ 2921e44dc38Skettenis node = fdt_find_node("/chosen"); 2931e44dc38Skettenis for (child = fdt_child_node(node); child; 2941e44dc38Skettenis child = fdt_next_node(child)) { 2951e44dc38Skettenis if (fdt_node_is_compatible(child, "simple-framebuffer")) 2961e44dc38Skettenis return; 2971e44dc38Skettenis } 2981e44dc38Skettenis node = fdt_find_node("/"); 2991e44dc38Skettenis for (child = fdt_child_node(node); child; 3001e44dc38Skettenis child = fdt_next_node(child)) { 3011e44dc38Skettenis if (fdt_node_is_compatible(child, "simple-framebuffer")) 3021e44dc38Skettenis return; 3031e44dc38Skettenis } 3041e44dc38Skettenis 3051e44dc38Skettenis status = EFI_CALL(BS->LocateProtocol, &gop_guid, NULL, (void **)&gop); 3061e44dc38Skettenis if (status != EFI_SUCCESS) 3071e44dc38Skettenis return; 3081e44dc38Skettenis 3091e44dc38Skettenis /* Paranoia! */ 3101e44dc38Skettenis if (gop == NULL || gop->Mode == NULL || gop->Mode->Info == NULL) 3111e44dc38Skettenis return; 3121e44dc38Skettenis 3131e44dc38Skettenis /* We only support 32-bit pixel modes for now. */ 3141e44dc38Skettenis switch (gop->Mode->Info->PixelFormat) { 3151e44dc38Skettenis case PixelRedGreenBlueReserved8BitPerColor: 3161e44dc38Skettenis format = "a8r8g8b8"; 3171e44dc38Skettenis break; 3181e44dc38Skettenis case PixelBlueGreenRedReserved8BitPerColor: 3191e44dc38Skettenis format = "a8b8g8r8"; 3201e44dc38Skettenis break; 3211e44dc38Skettenis default: 3221e44dc38Skettenis return; 3231e44dc38Skettenis } 3241e44dc38Skettenis 3251e44dc38Skettenis base = gop->Mode->FrameBufferBase; 3261e44dc38Skettenis size = gop->Mode->FrameBufferSize; 3271e44dc38Skettenis width = htobe32(gop->Mode->Info->HorizontalResolution); 3281e44dc38Skettenis height = htobe32(gop->Mode->Info->VerticalResolution); 3291e44dc38Skettenis stride = htobe32(gop->Mode->Info->PixelsPerScanLine * 4); 3301e44dc38Skettenis 3311e44dc38Skettenis node = fdt_find_node("/"); 3321e44dc38Skettenis if (fdt_node_property_int(node, "#address-cells", &acells) != 1) 3331e44dc38Skettenis acells = 1; 3341e44dc38Skettenis if (fdt_node_property_int(node, "#size-cells", &scells) != 1) 3351e44dc38Skettenis scells = 1; 3361e44dc38Skettenis if (acells > 2 || scells > 2) 3371e44dc38Skettenis return; 3381e44dc38Skettenis if (acells >= 1) 3391e44dc38Skettenis reg[0] = htobe32(base); 3401e44dc38Skettenis if (acells == 2) { 3411e44dc38Skettenis reg[1] = reg[0]; 3421e44dc38Skettenis reg[0] = htobe32(base >> 32); 3431e44dc38Skettenis } 3441e44dc38Skettenis if (scells >= 1) 3451e44dc38Skettenis reg[acells] = htobe32(size); 3461e44dc38Skettenis if (scells == 2) { 3471e44dc38Skettenis reg[acells + 1] = reg[acells]; 3481e44dc38Skettenis reg[acells] = htobe32(size >> 32); 3491e44dc38Skettenis } 3501e44dc38Skettenis 3511e44dc38Skettenis node = fdt_find_node("/chosen"); 3521e44dc38Skettenis fdt_node_add_node(node, "framebuffer", &child); 3531e44dc38Skettenis fdt_node_add_property(child, "status", "okay", strlen("okay") + 1); 3541e44dc38Skettenis fdt_node_add_property(child, "format", format, strlen(format) + 1); 3551e44dc38Skettenis fdt_node_add_property(child, "stride", &stride, 4); 3561e44dc38Skettenis fdt_node_add_property(child, "height", &height, 4); 3571e44dc38Skettenis fdt_node_add_property(child, "width", &width, 4); 3581e44dc38Skettenis fdt_node_add_property(child, "reg", reg, (acells + scells) * 4); 3591e44dc38Skettenis fdt_node_add_property(child, "compatible", 3601e44dc38Skettenis "simple-framebuffer", strlen("simple-framebuffer") + 1); 3611e44dc38Skettenis } 3621e44dc38Skettenis 363be07ee62Skettenis int acpi = 0; 3646f83097eSpatrick void *fdt = NULL; 3659ccb13abSnaddy char *bootmac = NULL; 366f24071e5Spatrick static EFI_GUID fdt_guid = FDT_TABLE_GUID; 367f24071e5Spatrick 368f24071e5Spatrick #define efi_guidcmp(_a, _b) memcmp((_a), (_b), sizeof(EFI_GUID)) 369f24071e5Spatrick 370f24071e5Spatrick void * 371f24071e5Spatrick efi_makebootargs(char *bootargs) 372f24071e5Spatrick { 373f4dd1aebSkettenis u_char bootduid[8]; 374f4dd1aebSkettenis u_char zero[8] = { 0 }; 375f4dd1aebSkettenis uint64_t uefi_system_table = htobe64((uintptr_t)ST); 376f24071e5Spatrick void *node; 377f24071e5Spatrick size_t len; 378f24071e5Spatrick int i; 379f24071e5Spatrick 3806f83097eSpatrick if (fdt == NULL) { 381f24071e5Spatrick for (i = 0; i < ST->NumberOfTableEntries; i++) { 382f24071e5Spatrick if (efi_guidcmp(&fdt_guid, 383f24071e5Spatrick &ST->ConfigurationTable[i].VendorGuid) == 0) 384f24071e5Spatrick fdt = ST->ConfigurationTable[i].VendorTable; 385f24071e5Spatrick } 3866f83097eSpatrick } 387f24071e5Spatrick 388be07ee62Skettenis if (fdt == NULL || acpi) 3899a1480b1Skettenis fdt = efi_acpi(); 3909a1480b1Skettenis 391f24071e5Spatrick if (!fdt_init(fdt)) 392f24071e5Spatrick return NULL; 393f24071e5Spatrick 394f24071e5Spatrick node = fdt_find_node("/chosen"); 395f24071e5Spatrick if (!node) 396f24071e5Spatrick return NULL; 397f24071e5Spatrick 398f24071e5Spatrick len = strlen(bootargs) + 1; 399f24071e5Spatrick fdt_node_add_property(node, "bootargs", bootargs, len); 400f24071e5Spatrick 401f24071e5Spatrick /* Pass DUID of the boot disk. */ 402f24071e5Spatrick memcpy(&bootduid, diskinfo.disklabel.d_uid, sizeof(bootduid)); 403f24071e5Spatrick if (memcmp(bootduid, zero, sizeof(bootduid)) != 0) { 404f24071e5Spatrick fdt_node_add_property(node, "openbsd,bootduid", bootduid, 405f24071e5Spatrick sizeof(bootduid)); 406f24071e5Spatrick } 407f24071e5Spatrick 4089ccb13abSnaddy /* Pass netboot interface address. */ 4099ccb13abSnaddy if (bootmac) 4109ccb13abSnaddy fdt_node_add_property(node, "openbsd,bootmac", bootmac, 6); 4119ccb13abSnaddy 412f4dd1aebSkettenis /* Pass EFI system table. */ 413f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-system-table", 414f4dd1aebSkettenis &uefi_system_table, sizeof(uefi_system_table)); 415f4dd1aebSkettenis 416f4dd1aebSkettenis /* Placeholders for EFI memory map. */ 417f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-start", zero, 8); 418f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-size", zero, 4); 419f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-desc-size", zero, 4); 420f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-desc-ver", zero, 4); 421f4dd1aebSkettenis 4221e44dc38Skettenis efi_framebuffer(); 4231e44dc38Skettenis 424f24071e5Spatrick fdt_finalize(); 425f24071e5Spatrick 426f24071e5Spatrick return fdt; 427f24071e5Spatrick } 428f24071e5Spatrick 429f4dd1aebSkettenis void 430f4dd1aebSkettenis efi_updatefdt(void) 431f4dd1aebSkettenis { 432f4dd1aebSkettenis uint64_t uefi_mmap_start = htobe64((uintptr_t)mmap); 433f4dd1aebSkettenis uint32_t uefi_mmap_size = htobe32(mmap_ndesc * mmap_descsiz); 434f4dd1aebSkettenis uint32_t uefi_mmap_desc_size = htobe32(mmap_descsiz); 435f4dd1aebSkettenis uint32_t uefi_mmap_desc_ver = htobe32(mmap_version); 436f4dd1aebSkettenis void *node; 437f4dd1aebSkettenis 438f4dd1aebSkettenis node = fdt_find_node("/chosen"); 439f4dd1aebSkettenis if (!node) 440f4dd1aebSkettenis return; 441f4dd1aebSkettenis 442f4dd1aebSkettenis /* Pass EFI memory map. */ 443f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-start", 444f4dd1aebSkettenis &uefi_mmap_start, sizeof(uefi_mmap_start)); 445f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-size", 446f4dd1aebSkettenis &uefi_mmap_size, sizeof(uefi_mmap_size)); 447f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-desc-size", 448f4dd1aebSkettenis &uefi_mmap_desc_size, sizeof(uefi_mmap_desc_size)); 449f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-desc-ver", 450f4dd1aebSkettenis &uefi_mmap_desc_ver, sizeof(uefi_mmap_desc_ver)); 451f4dd1aebSkettenis 452f4dd1aebSkettenis fdt_finalize(); 453f4dd1aebSkettenis } 454f4dd1aebSkettenis 455f24071e5Spatrick u_long efi_loadaddr; 456f24071e5Spatrick 457f24071e5Spatrick void 458f24071e5Spatrick machdep(void) 459f24071e5Spatrick { 460f24071e5Spatrick EFI_PHYSICAL_ADDRESS addr; 461f24071e5Spatrick 462f24071e5Spatrick cninit(); 463f24071e5Spatrick efi_heap_init(); 464f24071e5Spatrick 465f24071e5Spatrick /* 4669a118d7eSpatrick * The kernel expects to be loaded into a block of memory aligned 4679a118d7eSpatrick * on a 2MB boundary. We allocate a block of 64MB of memory, which 4689a118d7eSpatrick * gives us plenty of room for growth. 469f24071e5Spatrick */ 4709a118d7eSpatrick if (efi_memprobe_find(EFI_SIZE_TO_PAGES(64 * 1024 * 1024), 4719a118d7eSpatrick 0x200000, &addr) != EFI_SUCCESS) 472f24071e5Spatrick printf("Can't allocate memory\n"); 473f24071e5Spatrick efi_loadaddr = addr; 474f24071e5Spatrick 475f24071e5Spatrick efi_timer_init(); 476f24071e5Spatrick efi_diskprobe(); 47733e5575aSpatrick efi_pxeprobe(); 478f24071e5Spatrick } 479f24071e5Spatrick 480f24071e5Spatrick void 481f24071e5Spatrick efi_cleanup(void) 482f24071e5Spatrick { 483fa854029Spatrick int retry; 484fa854029Spatrick EFI_STATUS status; 485fa854029Spatrick 486f24071e5Spatrick efi_timer_cleanup(); 487f24071e5Spatrick 488fa854029Spatrick /* retry once in case of failure */ 489fa854029Spatrick for (retry = 1; retry >= 0; retry--) { 490fa854029Spatrick efi_memprobe_internal(); /* sync the current map */ 491f4dd1aebSkettenis efi_updatefdt(); 492fa854029Spatrick status = EFI_CALL(BS->ExitBootServices, IH, mmap_key); 493fa854029Spatrick if (status == EFI_SUCCESS) 494fa854029Spatrick break; 495fa854029Spatrick if (retry == 0) 496fa854029Spatrick panic("ExitBootServices failed (%d)", status); 497fa854029Spatrick } 498f24071e5Spatrick } 499f24071e5Spatrick 500f24071e5Spatrick void 501f24071e5Spatrick _rtt(void) 502f24071e5Spatrick { 503f24071e5Spatrick #ifdef EFI_DEBUG 504f24071e5Spatrick printf("Hit any key to reboot\n"); 505f24071e5Spatrick efi_cons_getc(0); 506f24071e5Spatrick #endif 507f24071e5Spatrick RS->ResetSystem(EfiResetCold, EFI_SUCCESS, 0, NULL); 508111d6387Skettenis for (;;) 509111d6387Skettenis continue; 510f24071e5Spatrick } 511f24071e5Spatrick 512f24071e5Spatrick /* 513f24071e5Spatrick * U-Boot only implements the GetTime() Runtime Service if it has been 514f24071e5Spatrick * configured with CONFIG_DM_RTC. Most board configurations don't 515f24071e5Spatrick * include that option, so we can't use it to implement our boot 516f24071e5Spatrick * prompt timeout. Instead we use timer events to simulate a clock 517f24071e5Spatrick * that ticks ever second. 518f24071e5Spatrick */ 519f24071e5Spatrick 520f24071e5Spatrick EFI_EVENT timer; 521f24071e5Spatrick int ticks; 522f24071e5Spatrick 523f24071e5Spatrick static VOID 524f24071e5Spatrick efi_timer(EFI_EVENT event, VOID *context) 525f24071e5Spatrick { 526f24071e5Spatrick ticks++; 527f24071e5Spatrick } 528f24071e5Spatrick 529f24071e5Spatrick static void 530f24071e5Spatrick efi_timer_init(void) 531f24071e5Spatrick { 532f24071e5Spatrick EFI_STATUS status; 533f24071e5Spatrick 534a4d88df4Sjsg status = BS->CreateEvent(EVT_TIMER | EVT_NOTIFY_SIGNAL, TPL_CALLBACK, 535f24071e5Spatrick efi_timer, NULL, &timer); 536f24071e5Spatrick if (status == EFI_SUCCESS) 537f24071e5Spatrick status = BS->SetTimer(timer, TimerPeriodic, 10000000); 538f24071e5Spatrick if (EFI_ERROR(status)) 539f24071e5Spatrick printf("Can't create timer\n"); 540f24071e5Spatrick } 541f24071e5Spatrick 542f24071e5Spatrick static void 543f24071e5Spatrick efi_timer_cleanup(void) 544f24071e5Spatrick { 545f24071e5Spatrick BS->CloseEvent(timer); 546f24071e5Spatrick } 547f24071e5Spatrick 548f24071e5Spatrick time_t 549f24071e5Spatrick getsecs(void) 550f24071e5Spatrick { 551f24071e5Spatrick return ticks; 552f24071e5Spatrick } 553f24071e5Spatrick 554f24071e5Spatrick /* 555f24071e5Spatrick * Various device-related bits. 556f24071e5Spatrick */ 557f24071e5Spatrick 558f24071e5Spatrick void 559f24071e5Spatrick devboot(dev_t dev, char *p) 560f24071e5Spatrick { 56133e5575aSpatrick if (disk) 562f24071e5Spatrick strlcpy(p, "sd0a", 5); 56333e5575aSpatrick else 56433e5575aSpatrick strlcpy(p, "tftp0a", 7); 565f24071e5Spatrick } 566f24071e5Spatrick 567f24071e5Spatrick int 568f24071e5Spatrick cnspeed(dev_t dev, int sp) 569f24071e5Spatrick { 570f24071e5Spatrick return 115200; 571f24071e5Spatrick } 572f24071e5Spatrick 573f24071e5Spatrick char * 574f24071e5Spatrick ttyname(int fd) 575f24071e5Spatrick { 576f24071e5Spatrick return "com0"; 577f24071e5Spatrick } 578f24071e5Spatrick 579f24071e5Spatrick dev_t 580f24071e5Spatrick ttydev(char *name) 581f24071e5Spatrick { 582f24071e5Spatrick return NODEV; 583f24071e5Spatrick } 584f24071e5Spatrick 585f24071e5Spatrick #define MAXDEVNAME 16 586f24071e5Spatrick 587f24071e5Spatrick /* 588f24071e5Spatrick * Parse a device spec. 589f24071e5Spatrick * 590f24071e5Spatrick * [A-Za-z]*[0-9]*[A-Za-z]:file 591f24071e5Spatrick * dev uint part 592f24071e5Spatrick */ 593f24071e5Spatrick int 594f24071e5Spatrick devparse(const char *fname, int *dev, int *unit, int *part, const char **file) 595f24071e5Spatrick { 596f24071e5Spatrick const char *s; 597f24071e5Spatrick 598f24071e5Spatrick *unit = 0; /* default to wd0a */ 599f24071e5Spatrick *part = 0; 600f24071e5Spatrick *dev = 0; 601f24071e5Spatrick 602f24071e5Spatrick s = strchr(fname, ':'); 603f24071e5Spatrick if (s != NULL) { 604f24071e5Spatrick int devlen; 605f24071e5Spatrick int i, u, p = 0; 606f24071e5Spatrick struct devsw *dp; 607f24071e5Spatrick char devname[MAXDEVNAME]; 608f24071e5Spatrick 609f24071e5Spatrick devlen = s - fname; 610f24071e5Spatrick if (devlen > MAXDEVNAME) 611f24071e5Spatrick return (EINVAL); 612f24071e5Spatrick 613f24071e5Spatrick /* extract device name */ 614f24071e5Spatrick for (i = 0; isalpha(fname[i]) && (i < devlen); i++) 615f24071e5Spatrick devname[i] = fname[i]; 616f24071e5Spatrick devname[i] = 0; 617f24071e5Spatrick 618f24071e5Spatrick if (!isdigit(fname[i])) 619f24071e5Spatrick return (EUNIT); 620f24071e5Spatrick 621f24071e5Spatrick /* device number */ 622f24071e5Spatrick for (u = 0; isdigit(fname[i]) && (i < devlen); i++) 623f24071e5Spatrick u = u * 10 + (fname[i] - '0'); 624f24071e5Spatrick 625f24071e5Spatrick if (!isalpha(fname[i])) 626f24071e5Spatrick return (EPART); 627f24071e5Spatrick 628f24071e5Spatrick /* partition number */ 629f24071e5Spatrick if (i < devlen) 630f24071e5Spatrick p = fname[i++] - 'a'; 631f24071e5Spatrick 632f24071e5Spatrick if (i != devlen) 633f24071e5Spatrick return (ENXIO); 634f24071e5Spatrick 635f24071e5Spatrick /* check device name */ 636f24071e5Spatrick for (dp = devsw, i = 0; i < ndevs; dp++, i++) { 637f24071e5Spatrick if (dp->dv_name && !strcmp(devname, dp->dv_name)) 638f24071e5Spatrick break; 639f24071e5Spatrick } 640f24071e5Spatrick 641f24071e5Spatrick if (i >= ndevs) 642f24071e5Spatrick return (ENXIO); 643f24071e5Spatrick 644f24071e5Spatrick *unit = u; 645f24071e5Spatrick *part = p; 646f24071e5Spatrick *dev = i; 647f24071e5Spatrick fname = ++s; 648f24071e5Spatrick } 649f24071e5Spatrick 650f24071e5Spatrick *file = fname; 651f24071e5Spatrick 652f24071e5Spatrick return (0); 653f24071e5Spatrick } 654f24071e5Spatrick 655f24071e5Spatrick int 656f24071e5Spatrick devopen(struct open_file *f, const char *fname, char **file) 657f24071e5Spatrick { 658f24071e5Spatrick struct devsw *dp; 659f24071e5Spatrick int dev, unit, part, error; 660f24071e5Spatrick 661f24071e5Spatrick error = devparse(fname, &dev, &unit, &part, (const char **)file); 662f24071e5Spatrick if (error) 663f24071e5Spatrick return (error); 664f24071e5Spatrick 66533e5575aSpatrick dp = &devsw[dev]; 666f24071e5Spatrick f->f_dev = dp; 667f24071e5Spatrick 668f24071e5Spatrick return (*dp->dv_open)(f, unit, part); 669f24071e5Spatrick } 670f24071e5Spatrick 671fa854029Spatrick static void 672fa854029Spatrick efi_memprobe_internal(void) 673fa854029Spatrick { 674fa854029Spatrick EFI_STATUS status; 675fa854029Spatrick UINTN mapkey, mmsiz, siz; 676fa854029Spatrick UINT32 mmver; 677fa854029Spatrick EFI_MEMORY_DESCRIPTOR *mm; 678fa854029Spatrick int n; 679fa854029Spatrick 680fa854029Spatrick free(mmap, mmap_ndesc * mmap_descsiz); 681fa854029Spatrick 682fa854029Spatrick siz = 0; 683fa854029Spatrick status = EFI_CALL(BS->GetMemoryMap, &siz, NULL, &mapkey, &mmsiz, 684fa854029Spatrick &mmver); 685fa854029Spatrick if (status != EFI_BUFFER_TOO_SMALL) 686fa854029Spatrick panic("cannot get the size of memory map"); 687fa854029Spatrick mm = alloc(siz); 688fa854029Spatrick status = EFI_CALL(BS->GetMemoryMap, &siz, mm, &mapkey, &mmsiz, &mmver); 689fa854029Spatrick if (status != EFI_SUCCESS) 690fa854029Spatrick panic("cannot get the memory map"); 691fa854029Spatrick n = siz / mmsiz; 692fa854029Spatrick mmap = mm; 693fa854029Spatrick mmap_key = mapkey; 694fa854029Spatrick mmap_ndesc = n; 695fa854029Spatrick mmap_descsiz = mmsiz; 696f4dd1aebSkettenis mmap_version = mmver; 697fa854029Spatrick } 698fa854029Spatrick 699f24071e5Spatrick /* 700f24071e5Spatrick * 64-bit ARMs can have a much wider memory mapping, as in somewhere 701f24071e5Spatrick * after the 32-bit region. To cope with our alignment requirement, 702f24071e5Spatrick * use the memory table to find a place where we can fit. 703f24071e5Spatrick */ 704f24071e5Spatrick static EFI_STATUS 705f24071e5Spatrick efi_memprobe_find(UINTN pages, UINTN align, EFI_PHYSICAL_ADDRESS *addr) 706f24071e5Spatrick { 707fa854029Spatrick EFI_MEMORY_DESCRIPTOR *mm; 708fa854029Spatrick int i, j; 709f24071e5Spatrick 710f24071e5Spatrick if (align < EFI_PAGE_SIZE) 711f24071e5Spatrick return EFI_INVALID_PARAMETER; 712f24071e5Spatrick 713fa854029Spatrick efi_memprobe_internal(); /* sync the current map */ 714f24071e5Spatrick 715fa854029Spatrick for (i = 0, mm = mmap; i < mmap_ndesc; 716fa854029Spatrick i++, mm = NextMemoryDescriptor(mm, mmap_descsiz)) { 717f24071e5Spatrick if (mm->Type != EfiConventionalMemory) 718f24071e5Spatrick continue; 719f24071e5Spatrick 720f24071e5Spatrick if (mm->NumberOfPages < pages) 721f24071e5Spatrick continue; 722f24071e5Spatrick 723f2c0e408Skettenis for (j = 0; j < mm->NumberOfPages; j++) { 724f24071e5Spatrick EFI_PHYSICAL_ADDRESS paddr; 725f24071e5Spatrick 726f24071e5Spatrick if (mm->NumberOfPages - j < pages) 727f24071e5Spatrick break; 728f24071e5Spatrick 729f24071e5Spatrick paddr = mm->PhysicalStart + (j * EFI_PAGE_SIZE); 73073dc1409Spatrick if (paddr & (align - 1)) 73173dc1409Spatrick continue; 73273dc1409Spatrick 73373dc1409Spatrick if (EFI_CALL(BS->AllocatePages, AllocateAddress, 73473dc1409Spatrick EfiLoaderData, pages, &paddr) == EFI_SUCCESS) { 735f24071e5Spatrick *addr = paddr; 736f24071e5Spatrick return EFI_SUCCESS; 737f24071e5Spatrick } 738f24071e5Spatrick } 739f24071e5Spatrick } 740f24071e5Spatrick return EFI_OUT_OF_RESOURCES; 741f24071e5Spatrick } 742111d6387Skettenis 743111d6387Skettenis /* 744111d6387Skettenis * Commands 745111d6387Skettenis */ 746111d6387Skettenis 747be07ee62Skettenis int Xacpi_efi(void); 7486f83097eSpatrick int Xdtb_efi(void); 749111d6387Skettenis int Xexit_efi(void); 750111d6387Skettenis int Xpoweroff_efi(void); 751111d6387Skettenis 752111d6387Skettenis const struct cmd_table cmd_machine[] = { 753be07ee62Skettenis { "acpi", CMDT_CMD, Xacpi_efi }, 7546f83097eSpatrick { "dtb", CMDT_CMD, Xdtb_efi }, 755111d6387Skettenis { "exit", CMDT_CMD, Xexit_efi }, 756111d6387Skettenis { "poweroff", CMDT_CMD, Xpoweroff_efi }, 757111d6387Skettenis { NULL, 0 } 758111d6387Skettenis }; 759111d6387Skettenis 760111d6387Skettenis int 761be07ee62Skettenis Xacpi_efi(void) 762be07ee62Skettenis { 763be07ee62Skettenis acpi = 1; 764be07ee62Skettenis return (0); 765be07ee62Skettenis } 766be07ee62Skettenis 767be07ee62Skettenis int 7686f83097eSpatrick Xdtb_efi(void) 7696f83097eSpatrick { 7706f83097eSpatrick EFI_PHYSICAL_ADDRESS addr; 7716f83097eSpatrick char path[MAXPATHLEN]; 7726f83097eSpatrick struct stat sb; 7736f83097eSpatrick int fd; 7746f83097eSpatrick 7756f83097eSpatrick #define O_RDONLY 0 7766f83097eSpatrick 7776f83097eSpatrick if (cmd.argc != 2) 7786f83097eSpatrick return (1); 7796f83097eSpatrick 7806f83097eSpatrick snprintf(path, sizeof(path), "%s:%s", cmd.bootdev, cmd.argv[1]); 7816f83097eSpatrick 7826f83097eSpatrick fd = open(path, O_RDONLY); 7836f83097eSpatrick if (fd < 0 || fstat(fd, &sb) == -1) { 7846f83097eSpatrick printf("cannot open %s\n", path); 7856f83097eSpatrick return (1); 7866f83097eSpatrick } 7876f83097eSpatrick if (efi_memprobe_find(EFI_SIZE_TO_PAGES(sb.st_size), 7886f83097eSpatrick 0x1000, &addr) != EFI_SUCCESS) { 7896f83097eSpatrick printf("cannot allocate memory for %s\n", path); 7906f83097eSpatrick return (1); 7916f83097eSpatrick } 7926f83097eSpatrick if (read(fd, (void *)addr, sb.st_size) != sb.st_size) { 7936f83097eSpatrick printf("cannot read from %s\n", path); 7946f83097eSpatrick return (1); 7956f83097eSpatrick } 7966f83097eSpatrick 7976f83097eSpatrick fdt = (void *)addr; 7986f83097eSpatrick return (0); 7996f83097eSpatrick } 8006f83097eSpatrick 8016f83097eSpatrick int 802111d6387Skettenis Xexit_efi(void) 803111d6387Skettenis { 804111d6387Skettenis EFI_CALL(BS->Exit, IH, 0, 0, NULL); 805111d6387Skettenis for (;;) 806111d6387Skettenis continue; 807111d6387Skettenis return (0); 808111d6387Skettenis } 809111d6387Skettenis 810111d6387Skettenis int 811111d6387Skettenis Xpoweroff_efi(void) 812111d6387Skettenis { 813111d6387Skettenis EFI_CALL(RS->ResetSystem, EfiResetShutdown, EFI_SUCCESS, 0, NULL); 814111d6387Skettenis return (0); 815111d6387Skettenis } 816