1*9ccb13abSnaddy /* $OpenBSD: efiboot.c,v 1.15 2018/02/06 20:35:21 naddy 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> 22f24071e5Spatrick #include <dev/cons.h> 23f24071e5Spatrick #include <sys/disklabel.h> 24f24071e5Spatrick 25f24071e5Spatrick #include <efi.h> 26f24071e5Spatrick #include <efiapi.h> 27f24071e5Spatrick #include <efiprot.h> 28f24071e5Spatrick #include <eficonsctl.h> 29f24071e5Spatrick 30f24071e5Spatrick #include <lib/libkern/libkern.h> 31f24071e5Spatrick #include <stand/boot/cmd.h> 32f24071e5Spatrick 33f24071e5Spatrick #include "disk.h" 3433e5575aSpatrick #include "efiboot.h" 35f24071e5Spatrick #include "eficall.h" 36f24071e5Spatrick #include "fdt.h" 37f24071e5Spatrick #include "libsa.h" 38f24071e5Spatrick 39f24071e5Spatrick EFI_SYSTEM_TABLE *ST; 40f24071e5Spatrick EFI_BOOT_SERVICES *BS; 41f24071e5Spatrick EFI_RUNTIME_SERVICES *RS; 42f673f4ddSkettenis EFI_HANDLE IH, efi_bootdp; 43f24071e5Spatrick 44fa854029Spatrick EFI_PHYSICAL_ADDRESS heap; 45fa854029Spatrick UINTN heapsiz = 1 * 1024 * 1024; 46f673f4ddSkettenis EFI_MEMORY_DESCRIPTOR *mmap; 47fa854029Spatrick UINTN mmap_key; 48fa854029Spatrick UINTN mmap_ndesc; 49fa854029Spatrick UINTN mmap_descsiz; 50f4dd1aebSkettenis UINT32 mmap_version; 51f24071e5Spatrick 52f24071e5Spatrick static EFI_GUID imgp_guid = LOADED_IMAGE_PROTOCOL; 53f24071e5Spatrick static EFI_GUID blkio_guid = BLOCK_IO_PROTOCOL; 54f24071e5Spatrick static EFI_GUID devp_guid = DEVICE_PATH_PROTOCOL; 551e44dc38Skettenis static EFI_GUID gop_guid = EFI_GRAPHICS_OUTPUT_PROTOCOL_GUID; 56f24071e5Spatrick 5733e5575aSpatrick int efi_device_path_depth(EFI_DEVICE_PATH *dp, int); 5833e5575aSpatrick int efi_device_path_ncmp(EFI_DEVICE_PATH *, EFI_DEVICE_PATH *, int); 59fa854029Spatrick static void efi_heap_init(void); 60fa854029Spatrick static void efi_memprobe_internal(void); 61f24071e5Spatrick static void efi_timer_init(void); 62f24071e5Spatrick static void efi_timer_cleanup(void); 63f24071e5Spatrick static EFI_STATUS efi_memprobe_find(UINTN, UINTN, EFI_PHYSICAL_ADDRESS *); 64f24071e5Spatrick 65f24071e5Spatrick EFI_STATUS 66f24071e5Spatrick efi_main(EFI_HANDLE image, EFI_SYSTEM_TABLE *systab) 67f24071e5Spatrick { 68f24071e5Spatrick extern char *progname; 69f24071e5Spatrick EFI_LOADED_IMAGE *imgp; 70f24071e5Spatrick EFI_DEVICE_PATH *dp = NULL; 71f24071e5Spatrick EFI_STATUS status; 72f24071e5Spatrick 73f24071e5Spatrick ST = systab; 74f24071e5Spatrick BS = ST->BootServices; 75f24071e5Spatrick IH = image; 76f24071e5Spatrick 77f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, image, &imgp_guid, 78f24071e5Spatrick (void **)&imgp); 79f24071e5Spatrick if (status == EFI_SUCCESS) 80f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, imgp->DeviceHandle, 81f24071e5Spatrick &devp_guid, (void **)&dp); 82f24071e5Spatrick if (status == EFI_SUCCESS) 83f24071e5Spatrick efi_bootdp = dp; 84f24071e5Spatrick 85f24071e5Spatrick progname = "BOOTAA64"; 86f24071e5Spatrick 87f24071e5Spatrick boot(0); 88f24071e5Spatrick 89f24071e5Spatrick return (EFI_SUCCESS); 90f24071e5Spatrick } 91f24071e5Spatrick 92f24071e5Spatrick static SIMPLE_TEXT_OUTPUT_INTERFACE *conout; 93f24071e5Spatrick static SIMPLE_INPUT_INTERFACE *conin; 94f24071e5Spatrick 95f24071e5Spatrick void 96f24071e5Spatrick efi_cons_probe(struct consdev *cn) 97f24071e5Spatrick { 98f24071e5Spatrick cn->cn_pri = CN_MIDPRI; 99f24071e5Spatrick cn->cn_dev = makedev(12, 0); 100f24071e5Spatrick } 101f24071e5Spatrick 102f24071e5Spatrick void 103f24071e5Spatrick efi_cons_init(struct consdev *cp) 104f24071e5Spatrick { 105f24071e5Spatrick conin = ST->ConIn; 106f24071e5Spatrick conout = ST->ConOut; 107f24071e5Spatrick } 108f24071e5Spatrick 109f24071e5Spatrick int 110f24071e5Spatrick efi_cons_getc(dev_t dev) 111f24071e5Spatrick { 112f24071e5Spatrick EFI_INPUT_KEY key; 113f24071e5Spatrick EFI_STATUS status; 114f24071e5Spatrick #if 0 115f24071e5Spatrick UINTN dummy; 116f24071e5Spatrick #endif 117f24071e5Spatrick static int lastchar = 0; 118f24071e5Spatrick 119f24071e5Spatrick if (lastchar) { 120f24071e5Spatrick int r = lastchar; 121f24071e5Spatrick if ((dev & 0x80) == 0) 122f24071e5Spatrick lastchar = 0; 123f24071e5Spatrick return (r); 124f24071e5Spatrick } 125f24071e5Spatrick 126f24071e5Spatrick status = conin->ReadKeyStroke(conin, &key); 127f24071e5Spatrick while (status == EFI_NOT_READY) { 128f24071e5Spatrick if (dev & 0x80) 129f24071e5Spatrick return (0); 130f24071e5Spatrick /* 131f24071e5Spatrick * XXX The implementation of WaitForEvent() in U-boot 132f24071e5Spatrick * is broken and neverreturns. 133f24071e5Spatrick */ 134f24071e5Spatrick #if 0 135f24071e5Spatrick BS->WaitForEvent(1, &conin->WaitForKey, &dummy); 136f24071e5Spatrick #endif 137f24071e5Spatrick status = conin->ReadKeyStroke(conin, &key); 138f24071e5Spatrick } 139f24071e5Spatrick 140f24071e5Spatrick if (dev & 0x80) 141f24071e5Spatrick lastchar = key.UnicodeChar; 142f24071e5Spatrick 143f24071e5Spatrick return (key.UnicodeChar); 144f24071e5Spatrick } 145f24071e5Spatrick 146f24071e5Spatrick void 147f24071e5Spatrick efi_cons_putc(dev_t dev, int c) 148f24071e5Spatrick { 149f24071e5Spatrick CHAR16 buf[2]; 150f24071e5Spatrick 151f24071e5Spatrick if (c == '\n') 152f24071e5Spatrick efi_cons_putc(dev, '\r'); 153f24071e5Spatrick 154f24071e5Spatrick buf[0] = c; 155f24071e5Spatrick buf[1] = 0; 156f24071e5Spatrick 157f24071e5Spatrick conout->OutputString(conout, buf); 158f24071e5Spatrick } 159f24071e5Spatrick 160f24071e5Spatrick static void 161f24071e5Spatrick efi_heap_init(void) 162f24071e5Spatrick { 163f24071e5Spatrick EFI_STATUS status; 164f24071e5Spatrick 165f24071e5Spatrick status = EFI_CALL(BS->AllocatePages, AllocateAnyPages, EfiLoaderData, 166f24071e5Spatrick EFI_SIZE_TO_PAGES(heapsiz), &heap); 167f24071e5Spatrick if (status != EFI_SUCCESS) 168f24071e5Spatrick panic("BS->AllocatePages()"); 169f24071e5Spatrick } 170f24071e5Spatrick 171f24071e5Spatrick EFI_BLOCK_IO *disk; 172f24071e5Spatrick 173f24071e5Spatrick void 174f24071e5Spatrick efi_diskprobe(void) 175f24071e5Spatrick { 176c6d7d0adSpatrick int i, depth = -1; 177f24071e5Spatrick UINTN sz; 178f24071e5Spatrick EFI_STATUS status; 179f24071e5Spatrick EFI_HANDLE *handles = NULL; 180f24071e5Spatrick EFI_BLOCK_IO *blkio; 181f24071e5Spatrick EFI_BLOCK_IO_MEDIA *media; 182c6d7d0adSpatrick EFI_DEVICE_PATH *dp; 183f24071e5Spatrick 184f24071e5Spatrick sz = 0; 185f24071e5Spatrick status = EFI_CALL(BS->LocateHandle, ByProtocol, &blkio_guid, 0, &sz, 0); 186f24071e5Spatrick if (status == EFI_BUFFER_TOO_SMALL) { 187f24071e5Spatrick handles = alloc(sz); 188f24071e5Spatrick status = EFI_CALL(BS->LocateHandle, ByProtocol, &blkio_guid, 189f24071e5Spatrick 0, &sz, handles); 190f24071e5Spatrick } 191f24071e5Spatrick if (handles == NULL || EFI_ERROR(status)) 19233e5575aSpatrick return; 193f24071e5Spatrick 194c6d7d0adSpatrick if (efi_bootdp != NULL) 195c6d7d0adSpatrick depth = efi_device_path_depth(efi_bootdp, MEDIA_DEVICE_PATH); 196c6d7d0adSpatrick 197c94e7257Skettenis /* 198c94e7257Skettenis * U-Boot incorrectly represents devices with a single 199c94e7257Skettenis * MEDIA_DEVICE_PATH component. In that case include that 200c94e7257Skettenis * component into the matching, otherwise we'll blindly select 201c94e7257Skettenis * the first device. 202c94e7257Skettenis */ 203c94e7257Skettenis if (depth == 0) 204c94e7257Skettenis depth = 1; 205c94e7257Skettenis 206f24071e5Spatrick for (i = 0; i < sz / sizeof(EFI_HANDLE); i++) { 207f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, handles[i], &blkio_guid, 208f24071e5Spatrick (void **)&blkio); 209f24071e5Spatrick if (EFI_ERROR(status)) 210f24071e5Spatrick panic("BS->HandleProtocol() returns %d", status); 211f24071e5Spatrick 212f24071e5Spatrick media = blkio->Media; 213f24071e5Spatrick if (media->LogicalPartition || !media->MediaPresent) 214f24071e5Spatrick continue; 215f24071e5Spatrick 216c6d7d0adSpatrick if (efi_bootdp == NULL || depth == -1) 217c6d7d0adSpatrick continue; 218f24071e5Spatrick status = EFI_CALL(BS->HandleProtocol, handles[i], &devp_guid, 219f24071e5Spatrick (void **)&dp); 220f24071e5Spatrick if (EFI_ERROR(status)) 221c6d7d0adSpatrick continue; 222c6d7d0adSpatrick if (efi_device_path_ncmp(efi_bootdp, dp, depth) == 0) { 223f24071e5Spatrick disk = blkio; 224f24071e5Spatrick break; 225f24071e5Spatrick } 226f24071e5Spatrick } 227f24071e5Spatrick 228f24071e5Spatrick free(handles, sz); 229f24071e5Spatrick } 230f24071e5Spatrick 231c94e7257Skettenis /* 232c94e7257Skettenis * Determine the number of nodes up to, but not including, the first 233c94e7257Skettenis * node of the specified type. 234c94e7257Skettenis */ 23533e5575aSpatrick int 236c6d7d0adSpatrick efi_device_path_depth(EFI_DEVICE_PATH *dp, int dptype) 237c6d7d0adSpatrick { 238c6d7d0adSpatrick int i; 239c6d7d0adSpatrick 240c6d7d0adSpatrick for (i = 0; !IsDevicePathEnd(dp); dp = NextDevicePathNode(dp), i++) { 241c6d7d0adSpatrick if (DevicePathType(dp) == dptype) 242c94e7257Skettenis return (i); 243c6d7d0adSpatrick } 244c6d7d0adSpatrick 245c6d7d0adSpatrick return (-1); 246c6d7d0adSpatrick } 247c6d7d0adSpatrick 24833e5575aSpatrick int 249c6d7d0adSpatrick efi_device_path_ncmp(EFI_DEVICE_PATH *dpa, EFI_DEVICE_PATH *dpb, int deptn) 250c6d7d0adSpatrick { 251c6d7d0adSpatrick int i, cmp; 252c6d7d0adSpatrick 253c6d7d0adSpatrick for (i = 0; i < deptn; i++) { 254c6d7d0adSpatrick if (IsDevicePathEnd(dpa) || IsDevicePathEnd(dpb)) 255c6d7d0adSpatrick return ((IsDevicePathEnd(dpa) && IsDevicePathEnd(dpb)) 256c6d7d0adSpatrick ? 0 : (IsDevicePathEnd(dpa))? -1 : 1); 257c6d7d0adSpatrick cmp = DevicePathNodeLength(dpa) - DevicePathNodeLength(dpb); 258c6d7d0adSpatrick if (cmp) 259c6d7d0adSpatrick return (cmp); 260c6d7d0adSpatrick cmp = memcmp(dpa, dpb, DevicePathNodeLength(dpa)); 261c6d7d0adSpatrick if (cmp) 262c6d7d0adSpatrick return (cmp); 263c6d7d0adSpatrick dpa = NextDevicePathNode(dpa); 264c6d7d0adSpatrick dpb = NextDevicePathNode(dpb); 265c6d7d0adSpatrick } 266c6d7d0adSpatrick 267c6d7d0adSpatrick return (0); 268c6d7d0adSpatrick } 269c6d7d0adSpatrick 2701e44dc38Skettenis void 2711e44dc38Skettenis efi_framebuffer(void) 2721e44dc38Skettenis { 2731e44dc38Skettenis EFI_GRAPHICS_OUTPUT *gop; 2741e44dc38Skettenis EFI_STATUS status; 2751e44dc38Skettenis void *node, *child; 2761e44dc38Skettenis uint32_t acells, scells; 2771e44dc38Skettenis uint64_t base, size; 2781e44dc38Skettenis uint32_t reg[4]; 2791e44dc38Skettenis uint32_t width, height, stride; 2801e44dc38Skettenis char *format; 2811e44dc38Skettenis 2821e44dc38Skettenis /* 2831e44dc38Skettenis * Don't create a "simple-framebuffer" node if we already have 2841e44dc38Skettenis * one. Besides "/chosen", we also check under "/" since that 2851e44dc38Skettenis * is where the Raspberry Pi firmware puts it. 2861e44dc38Skettenis */ 2871e44dc38Skettenis node = fdt_find_node("/chosen"); 2881e44dc38Skettenis for (child = fdt_child_node(node); child; 2891e44dc38Skettenis child = fdt_next_node(child)) { 2901e44dc38Skettenis if (fdt_node_is_compatible(child, "simple-framebuffer")) 2911e44dc38Skettenis return; 2921e44dc38Skettenis } 2931e44dc38Skettenis node = fdt_find_node("/"); 2941e44dc38Skettenis for (child = fdt_child_node(node); child; 2951e44dc38Skettenis child = fdt_next_node(child)) { 2961e44dc38Skettenis if (fdt_node_is_compatible(child, "simple-framebuffer")) 2971e44dc38Skettenis return; 2981e44dc38Skettenis } 2991e44dc38Skettenis 3001e44dc38Skettenis status = EFI_CALL(BS->LocateProtocol, &gop_guid, NULL, (void **)&gop); 3011e44dc38Skettenis if (status != EFI_SUCCESS) 3021e44dc38Skettenis return; 3031e44dc38Skettenis 3041e44dc38Skettenis /* Paranoia! */ 3051e44dc38Skettenis if (gop == NULL || gop->Mode == NULL || gop->Mode->Info == NULL) 3061e44dc38Skettenis return; 3071e44dc38Skettenis 3081e44dc38Skettenis /* We only support 32-bit pixel modes for now. */ 3091e44dc38Skettenis switch (gop->Mode->Info->PixelFormat) { 3101e44dc38Skettenis case PixelRedGreenBlueReserved8BitPerColor: 3111e44dc38Skettenis format = "a8r8g8b8"; 3121e44dc38Skettenis break; 3131e44dc38Skettenis case PixelBlueGreenRedReserved8BitPerColor: 3141e44dc38Skettenis format = "a8b8g8r8"; 3151e44dc38Skettenis break; 3161e44dc38Skettenis default: 3171e44dc38Skettenis return; 3181e44dc38Skettenis } 3191e44dc38Skettenis 3201e44dc38Skettenis base = gop->Mode->FrameBufferBase; 3211e44dc38Skettenis size = gop->Mode->FrameBufferSize; 3221e44dc38Skettenis width = htobe32(gop->Mode->Info->HorizontalResolution); 3231e44dc38Skettenis height = htobe32(gop->Mode->Info->VerticalResolution); 3241e44dc38Skettenis stride = htobe32(gop->Mode->Info->PixelsPerScanLine * 4); 3251e44dc38Skettenis 3261e44dc38Skettenis node = fdt_find_node("/"); 3271e44dc38Skettenis if (fdt_node_property_int(node, "#address-cells", &acells) != 1) 3281e44dc38Skettenis acells = 1; 3291e44dc38Skettenis if (fdt_node_property_int(node, "#size-cells", &scells) != 1) 3301e44dc38Skettenis scells = 1; 3311e44dc38Skettenis if (acells > 2 || scells > 2) 3321e44dc38Skettenis return; 3331e44dc38Skettenis if (acells >= 1) 3341e44dc38Skettenis reg[0] = htobe32(base); 3351e44dc38Skettenis if (acells == 2) { 3361e44dc38Skettenis reg[1] = reg[0]; 3371e44dc38Skettenis reg[0] = htobe32(base >> 32); 3381e44dc38Skettenis } 3391e44dc38Skettenis if (scells >= 1) 3401e44dc38Skettenis reg[acells] = htobe32(size); 3411e44dc38Skettenis if (scells == 2) { 3421e44dc38Skettenis reg[acells + 1] = reg[acells]; 3431e44dc38Skettenis reg[acells] = htobe32(size >> 32); 3441e44dc38Skettenis } 3451e44dc38Skettenis 3461e44dc38Skettenis node = fdt_find_node("/chosen"); 3471e44dc38Skettenis fdt_node_add_node(node, "framebuffer", &child); 3481e44dc38Skettenis fdt_node_add_property(child, "status", "okay", strlen("okay") + 1); 3491e44dc38Skettenis fdt_node_add_property(child, "format", format, strlen(format) + 1); 3501e44dc38Skettenis fdt_node_add_property(child, "stride", &stride, 4); 3511e44dc38Skettenis fdt_node_add_property(child, "height", &height, 4); 3521e44dc38Skettenis fdt_node_add_property(child, "width", &width, 4); 3531e44dc38Skettenis fdt_node_add_property(child, "reg", reg, (acells + scells) * 4); 3541e44dc38Skettenis fdt_node_add_property(child, "compatible", 3551e44dc38Skettenis "simple-framebuffer", strlen("simple-framebuffer") + 1); 3561e44dc38Skettenis } 3571e44dc38Skettenis 358*9ccb13abSnaddy char *bootmac = NULL; 359f24071e5Spatrick static EFI_GUID fdt_guid = FDT_TABLE_GUID; 360f24071e5Spatrick 361f24071e5Spatrick #define efi_guidcmp(_a, _b) memcmp((_a), (_b), sizeof(EFI_GUID)) 362f24071e5Spatrick 363f24071e5Spatrick void * 364f24071e5Spatrick efi_makebootargs(char *bootargs) 365f24071e5Spatrick { 366f24071e5Spatrick void *fdt = NULL; 367f4dd1aebSkettenis u_char bootduid[8]; 368f4dd1aebSkettenis u_char zero[8] = { 0 }; 369f4dd1aebSkettenis uint64_t uefi_system_table = htobe64((uintptr_t)ST); 370f24071e5Spatrick void *node; 371f24071e5Spatrick size_t len; 372f24071e5Spatrick int i; 373f24071e5Spatrick 374f24071e5Spatrick for (i = 0; i < ST->NumberOfTableEntries; i++) { 375f24071e5Spatrick if (efi_guidcmp(&fdt_guid, 376f24071e5Spatrick &ST->ConfigurationTable[i].VendorGuid) == 0) 377f24071e5Spatrick fdt = ST->ConfigurationTable[i].VendorTable; 378f24071e5Spatrick } 379f24071e5Spatrick 380f24071e5Spatrick if (!fdt_init(fdt)) 381f24071e5Spatrick return NULL; 382f24071e5Spatrick 383f24071e5Spatrick node = fdt_find_node("/chosen"); 384f24071e5Spatrick if (!node) 385f24071e5Spatrick return NULL; 386f24071e5Spatrick 387f24071e5Spatrick len = strlen(bootargs) + 1; 388f24071e5Spatrick fdt_node_add_property(node, "bootargs", bootargs, len); 389f24071e5Spatrick 390f24071e5Spatrick /* Pass DUID of the boot disk. */ 391f24071e5Spatrick memcpy(&bootduid, diskinfo.disklabel.d_uid, sizeof(bootduid)); 392f24071e5Spatrick if (memcmp(bootduid, zero, sizeof(bootduid)) != 0) { 393f24071e5Spatrick fdt_node_add_property(node, "openbsd,bootduid", bootduid, 394f24071e5Spatrick sizeof(bootduid)); 395f24071e5Spatrick } 396f24071e5Spatrick 397*9ccb13abSnaddy /* Pass netboot interface address. */ 398*9ccb13abSnaddy if (bootmac) 399*9ccb13abSnaddy fdt_node_add_property(node, "openbsd,bootmac", bootmac, 6); 400*9ccb13abSnaddy 401f4dd1aebSkettenis /* Pass EFI system table. */ 402f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-system-table", 403f4dd1aebSkettenis &uefi_system_table, sizeof(uefi_system_table)); 404f4dd1aebSkettenis 405f4dd1aebSkettenis /* Placeholders for EFI memory map. */ 406f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-start", zero, 8); 407f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-size", zero, 4); 408f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-desc-size", zero, 4); 409f4dd1aebSkettenis fdt_node_add_property(node, "openbsd,uefi-mmap-desc-ver", zero, 4); 410f4dd1aebSkettenis 4111e44dc38Skettenis efi_framebuffer(); 4121e44dc38Skettenis 413f24071e5Spatrick fdt_finalize(); 414f24071e5Spatrick 415f24071e5Spatrick return fdt; 416f24071e5Spatrick } 417f24071e5Spatrick 418f4dd1aebSkettenis void 419f4dd1aebSkettenis efi_updatefdt(void) 420f4dd1aebSkettenis { 421f4dd1aebSkettenis uint64_t uefi_mmap_start = htobe64((uintptr_t)mmap); 422f4dd1aebSkettenis uint32_t uefi_mmap_size = htobe32(mmap_ndesc * mmap_descsiz); 423f4dd1aebSkettenis uint32_t uefi_mmap_desc_size = htobe32(mmap_descsiz); 424f4dd1aebSkettenis uint32_t uefi_mmap_desc_ver = htobe32(mmap_version); 425f4dd1aebSkettenis void *node; 426f4dd1aebSkettenis 427f4dd1aebSkettenis node = fdt_find_node("/chosen"); 428f4dd1aebSkettenis if (!node) 429f4dd1aebSkettenis return; 430f4dd1aebSkettenis 431f4dd1aebSkettenis /* Pass EFI memory map. */ 432f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-start", 433f4dd1aebSkettenis &uefi_mmap_start, sizeof(uefi_mmap_start)); 434f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-size", 435f4dd1aebSkettenis &uefi_mmap_size, sizeof(uefi_mmap_size)); 436f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-desc-size", 437f4dd1aebSkettenis &uefi_mmap_desc_size, sizeof(uefi_mmap_desc_size)); 438f4dd1aebSkettenis fdt_node_set_property(node, "openbsd,uefi-mmap-desc-ver", 439f4dd1aebSkettenis &uefi_mmap_desc_ver, sizeof(uefi_mmap_desc_ver)); 440f4dd1aebSkettenis 441f4dd1aebSkettenis fdt_finalize(); 442f4dd1aebSkettenis } 443f4dd1aebSkettenis 444f24071e5Spatrick u_long efi_loadaddr; 445f24071e5Spatrick 446f24071e5Spatrick void 447f24071e5Spatrick machdep(void) 448f24071e5Spatrick { 449f24071e5Spatrick EFI_PHYSICAL_ADDRESS addr; 450f24071e5Spatrick 451f24071e5Spatrick cninit(); 452f24071e5Spatrick efi_heap_init(); 453f24071e5Spatrick 454f24071e5Spatrick /* 4559a118d7eSpatrick * The kernel expects to be loaded into a block of memory aligned 4569a118d7eSpatrick * on a 2MB boundary. We allocate a block of 64MB of memory, which 4579a118d7eSpatrick * gives us plenty of room for growth. 458f24071e5Spatrick */ 4599a118d7eSpatrick if (efi_memprobe_find(EFI_SIZE_TO_PAGES(64 * 1024 * 1024), 4609a118d7eSpatrick 0x200000, &addr) != EFI_SUCCESS) 461f24071e5Spatrick printf("Can't allocate memory\n"); 462f24071e5Spatrick efi_loadaddr = addr; 463f24071e5Spatrick 464f24071e5Spatrick efi_timer_init(); 465f24071e5Spatrick efi_diskprobe(); 46633e5575aSpatrick efi_pxeprobe(); 467f24071e5Spatrick } 468f24071e5Spatrick 469f24071e5Spatrick void 470f24071e5Spatrick efi_cleanup(void) 471f24071e5Spatrick { 472fa854029Spatrick int retry; 473fa854029Spatrick EFI_STATUS status; 474fa854029Spatrick 475f24071e5Spatrick efi_timer_cleanup(); 476f24071e5Spatrick 477fa854029Spatrick /* retry once in case of failure */ 478fa854029Spatrick for (retry = 1; retry >= 0; retry--) { 479fa854029Spatrick efi_memprobe_internal(); /* sync the current map */ 480f4dd1aebSkettenis efi_updatefdt(); 481fa854029Spatrick status = EFI_CALL(BS->ExitBootServices, IH, mmap_key); 482fa854029Spatrick if (status == EFI_SUCCESS) 483fa854029Spatrick break; 484fa854029Spatrick if (retry == 0) 485fa854029Spatrick panic("ExitBootServices failed (%d)", status); 486fa854029Spatrick } 487f24071e5Spatrick } 488f24071e5Spatrick 489f24071e5Spatrick void 490f24071e5Spatrick _rtt(void) 491f24071e5Spatrick { 492f24071e5Spatrick #ifdef EFI_DEBUG 493f24071e5Spatrick printf("Hit any key to reboot\n"); 494f24071e5Spatrick efi_cons_getc(0); 495f24071e5Spatrick #endif 496f24071e5Spatrick RS->ResetSystem(EfiResetCold, EFI_SUCCESS, 0, NULL); 497111d6387Skettenis for (;;) 498111d6387Skettenis continue; 499f24071e5Spatrick } 500f24071e5Spatrick 501f24071e5Spatrick /* 502f24071e5Spatrick * U-Boot only implements the GetTime() Runtime Service if it has been 503f24071e5Spatrick * configured with CONFIG_DM_RTC. Most board configurations don't 504f24071e5Spatrick * include that option, so we can't use it to implement our boot 505f24071e5Spatrick * prompt timeout. Instead we use timer events to simulate a clock 506f24071e5Spatrick * that ticks ever second. 507f24071e5Spatrick */ 508f24071e5Spatrick 509f24071e5Spatrick EFI_EVENT timer; 510f24071e5Spatrick int ticks; 511f24071e5Spatrick 512f24071e5Spatrick static VOID 513f24071e5Spatrick efi_timer(EFI_EVENT event, VOID *context) 514f24071e5Spatrick { 515f24071e5Spatrick ticks++; 516f24071e5Spatrick } 517f24071e5Spatrick 518f24071e5Spatrick static void 519f24071e5Spatrick efi_timer_init(void) 520f24071e5Spatrick { 521f24071e5Spatrick EFI_STATUS status; 522f24071e5Spatrick 523a4d88df4Sjsg status = BS->CreateEvent(EVT_TIMER | EVT_NOTIFY_SIGNAL, TPL_CALLBACK, 524f24071e5Spatrick efi_timer, NULL, &timer); 525f24071e5Spatrick if (status == EFI_SUCCESS) 526f24071e5Spatrick status = BS->SetTimer(timer, TimerPeriodic, 10000000); 527f24071e5Spatrick if (EFI_ERROR(status)) 528f24071e5Spatrick printf("Can't create timer\n"); 529f24071e5Spatrick } 530f24071e5Spatrick 531f24071e5Spatrick static void 532f24071e5Spatrick efi_timer_cleanup(void) 533f24071e5Spatrick { 534f24071e5Spatrick BS->CloseEvent(timer); 535f24071e5Spatrick } 536f24071e5Spatrick 537f24071e5Spatrick time_t 538f24071e5Spatrick getsecs(void) 539f24071e5Spatrick { 540f24071e5Spatrick return ticks; 541f24071e5Spatrick } 542f24071e5Spatrick 543f24071e5Spatrick /* 544f24071e5Spatrick * Various device-related bits. 545f24071e5Spatrick */ 546f24071e5Spatrick 547f24071e5Spatrick void 548f24071e5Spatrick devboot(dev_t dev, char *p) 549f24071e5Spatrick { 55033e5575aSpatrick if (disk) 551f24071e5Spatrick strlcpy(p, "sd0a", 5); 55233e5575aSpatrick else 55333e5575aSpatrick strlcpy(p, "tftp0a", 7); 554f24071e5Spatrick } 555f24071e5Spatrick 556f24071e5Spatrick int 557f24071e5Spatrick cnspeed(dev_t dev, int sp) 558f24071e5Spatrick { 559f24071e5Spatrick return 115200; 560f24071e5Spatrick } 561f24071e5Spatrick 562f24071e5Spatrick char * 563f24071e5Spatrick ttyname(int fd) 564f24071e5Spatrick { 565f24071e5Spatrick return "com0"; 566f24071e5Spatrick } 567f24071e5Spatrick 568f24071e5Spatrick dev_t 569f24071e5Spatrick ttydev(char *name) 570f24071e5Spatrick { 571f24071e5Spatrick return NODEV; 572f24071e5Spatrick } 573f24071e5Spatrick 574f24071e5Spatrick #define MAXDEVNAME 16 575f24071e5Spatrick 576f24071e5Spatrick /* 577f24071e5Spatrick * Parse a device spec. 578f24071e5Spatrick * 579f24071e5Spatrick * [A-Za-z]*[0-9]*[A-Za-z]:file 580f24071e5Spatrick * dev uint part 581f24071e5Spatrick */ 582f24071e5Spatrick int 583f24071e5Spatrick devparse(const char *fname, int *dev, int *unit, int *part, const char **file) 584f24071e5Spatrick { 585f24071e5Spatrick const char *s; 586f24071e5Spatrick 587f24071e5Spatrick *unit = 0; /* default to wd0a */ 588f24071e5Spatrick *part = 0; 589f24071e5Spatrick *dev = 0; 590f24071e5Spatrick 591f24071e5Spatrick s = strchr(fname, ':'); 592f24071e5Spatrick if (s != NULL) { 593f24071e5Spatrick int devlen; 594f24071e5Spatrick int i, u, p = 0; 595f24071e5Spatrick struct devsw *dp; 596f24071e5Spatrick char devname[MAXDEVNAME]; 597f24071e5Spatrick 598f24071e5Spatrick devlen = s - fname; 599f24071e5Spatrick if (devlen > MAXDEVNAME) 600f24071e5Spatrick return (EINVAL); 601f24071e5Spatrick 602f24071e5Spatrick /* extract device name */ 603f24071e5Spatrick for (i = 0; isalpha(fname[i]) && (i < devlen); i++) 604f24071e5Spatrick devname[i] = fname[i]; 605f24071e5Spatrick devname[i] = 0; 606f24071e5Spatrick 607f24071e5Spatrick if (!isdigit(fname[i])) 608f24071e5Spatrick return (EUNIT); 609f24071e5Spatrick 610f24071e5Spatrick /* device number */ 611f24071e5Spatrick for (u = 0; isdigit(fname[i]) && (i < devlen); i++) 612f24071e5Spatrick u = u * 10 + (fname[i] - '0'); 613f24071e5Spatrick 614f24071e5Spatrick if (!isalpha(fname[i])) 615f24071e5Spatrick return (EPART); 616f24071e5Spatrick 617f24071e5Spatrick /* partition number */ 618f24071e5Spatrick if (i < devlen) 619f24071e5Spatrick p = fname[i++] - 'a'; 620f24071e5Spatrick 621f24071e5Spatrick if (i != devlen) 622f24071e5Spatrick return (ENXIO); 623f24071e5Spatrick 624f24071e5Spatrick /* check device name */ 625f24071e5Spatrick for (dp = devsw, i = 0; i < ndevs; dp++, i++) { 626f24071e5Spatrick if (dp->dv_name && !strcmp(devname, dp->dv_name)) 627f24071e5Spatrick break; 628f24071e5Spatrick } 629f24071e5Spatrick 630f24071e5Spatrick if (i >= ndevs) 631f24071e5Spatrick return (ENXIO); 632f24071e5Spatrick 633f24071e5Spatrick *unit = u; 634f24071e5Spatrick *part = p; 635f24071e5Spatrick *dev = i; 636f24071e5Spatrick fname = ++s; 637f24071e5Spatrick } 638f24071e5Spatrick 639f24071e5Spatrick *file = fname; 640f24071e5Spatrick 641f24071e5Spatrick return (0); 642f24071e5Spatrick } 643f24071e5Spatrick 644f24071e5Spatrick int 645f24071e5Spatrick devopen(struct open_file *f, const char *fname, char **file) 646f24071e5Spatrick { 647f24071e5Spatrick struct devsw *dp; 648f24071e5Spatrick int dev, unit, part, error; 649f24071e5Spatrick 650f24071e5Spatrick error = devparse(fname, &dev, &unit, &part, (const char **)file); 651f24071e5Spatrick if (error) 652f24071e5Spatrick return (error); 653f24071e5Spatrick 65433e5575aSpatrick dp = &devsw[dev]; 655f24071e5Spatrick f->f_dev = dp; 656f24071e5Spatrick 657f24071e5Spatrick return (*dp->dv_open)(f, unit, part); 658f24071e5Spatrick } 659f24071e5Spatrick 660fa854029Spatrick static void 661fa854029Spatrick efi_memprobe_internal(void) 662fa854029Spatrick { 663fa854029Spatrick EFI_STATUS status; 664fa854029Spatrick UINTN mapkey, mmsiz, siz; 665fa854029Spatrick UINT32 mmver; 666fa854029Spatrick EFI_MEMORY_DESCRIPTOR *mm; 667fa854029Spatrick int n; 668fa854029Spatrick 669fa854029Spatrick free(mmap, mmap_ndesc * mmap_descsiz); 670fa854029Spatrick 671fa854029Spatrick siz = 0; 672fa854029Spatrick status = EFI_CALL(BS->GetMemoryMap, &siz, NULL, &mapkey, &mmsiz, 673fa854029Spatrick &mmver); 674fa854029Spatrick if (status != EFI_BUFFER_TOO_SMALL) 675fa854029Spatrick panic("cannot get the size of memory map"); 676fa854029Spatrick mm = alloc(siz); 677fa854029Spatrick status = EFI_CALL(BS->GetMemoryMap, &siz, mm, &mapkey, &mmsiz, &mmver); 678fa854029Spatrick if (status != EFI_SUCCESS) 679fa854029Spatrick panic("cannot get the memory map"); 680fa854029Spatrick n = siz / mmsiz; 681fa854029Spatrick mmap = mm; 682fa854029Spatrick mmap_key = mapkey; 683fa854029Spatrick mmap_ndesc = n; 684fa854029Spatrick mmap_descsiz = mmsiz; 685f4dd1aebSkettenis mmap_version = mmver; 686fa854029Spatrick } 687fa854029Spatrick 688f24071e5Spatrick /* 689f24071e5Spatrick * 64-bit ARMs can have a much wider memory mapping, as in somewhere 690f24071e5Spatrick * after the 32-bit region. To cope with our alignment requirement, 691f24071e5Spatrick * use the memory table to find a place where we can fit. 692f24071e5Spatrick */ 693f24071e5Spatrick static EFI_STATUS 694f24071e5Spatrick efi_memprobe_find(UINTN pages, UINTN align, EFI_PHYSICAL_ADDRESS *addr) 695f24071e5Spatrick { 696fa854029Spatrick EFI_MEMORY_DESCRIPTOR *mm; 697fa854029Spatrick int i, j; 698f24071e5Spatrick 699f24071e5Spatrick if (align < EFI_PAGE_SIZE) 700f24071e5Spatrick return EFI_INVALID_PARAMETER; 701f24071e5Spatrick 702fa854029Spatrick efi_memprobe_internal(); /* sync the current map */ 703f24071e5Spatrick 704fa854029Spatrick for (i = 0, mm = mmap; i < mmap_ndesc; 705fa854029Spatrick i++, mm = NextMemoryDescriptor(mm, mmap_descsiz)) { 706f24071e5Spatrick if (mm->Type != EfiConventionalMemory) 707f24071e5Spatrick continue; 708f24071e5Spatrick 709f24071e5Spatrick if (mm->NumberOfPages < pages) 710f24071e5Spatrick continue; 711f24071e5Spatrick 712f2c0e408Skettenis for (j = 0; j < mm->NumberOfPages; j++) { 713f24071e5Spatrick EFI_PHYSICAL_ADDRESS paddr; 714f24071e5Spatrick 715f24071e5Spatrick if (mm->NumberOfPages - j < pages) 716f24071e5Spatrick break; 717f24071e5Spatrick 718f24071e5Spatrick paddr = mm->PhysicalStart + (j * EFI_PAGE_SIZE); 71973dc1409Spatrick if (paddr & (align - 1)) 72073dc1409Spatrick continue; 72173dc1409Spatrick 72273dc1409Spatrick if (EFI_CALL(BS->AllocatePages, AllocateAddress, 72373dc1409Spatrick EfiLoaderData, pages, &paddr) == EFI_SUCCESS) { 724f24071e5Spatrick *addr = paddr; 725f24071e5Spatrick return EFI_SUCCESS; 726f24071e5Spatrick } 727f24071e5Spatrick } 728f24071e5Spatrick } 729f24071e5Spatrick return EFI_OUT_OF_RESOURCES; 730f24071e5Spatrick } 731111d6387Skettenis 732111d6387Skettenis /* 733111d6387Skettenis * Commands 734111d6387Skettenis */ 735111d6387Skettenis 736111d6387Skettenis int Xexit_efi(void); 737111d6387Skettenis int Xpoweroff_efi(void); 738111d6387Skettenis 739111d6387Skettenis const struct cmd_table cmd_machine[] = { 740111d6387Skettenis { "exit", CMDT_CMD, Xexit_efi }, 741111d6387Skettenis { "poweroff", CMDT_CMD, Xpoweroff_efi }, 742111d6387Skettenis { NULL, 0 } 743111d6387Skettenis }; 744111d6387Skettenis 745111d6387Skettenis int 746111d6387Skettenis Xexit_efi(void) 747111d6387Skettenis { 748111d6387Skettenis EFI_CALL(BS->Exit, IH, 0, 0, NULL); 749111d6387Skettenis for (;;) 750111d6387Skettenis continue; 751111d6387Skettenis return (0); 752111d6387Skettenis } 753111d6387Skettenis 754111d6387Skettenis int 755111d6387Skettenis Xpoweroff_efi(void) 756111d6387Skettenis { 757111d6387Skettenis EFI_CALL(RS->ResetSystem, EfiResetShutdown, EFI_SUCCESS, 0, NULL); 758111d6387Skettenis return (0); 759111d6387Skettenis } 760