1206376Srpaulo/*-
2206376Srpaulo * Copyright (c) 2004, 2006 Marcel Moolenaar
3206376Srpaulo * All rights reserved.
4206376Srpaulo *
5206376Srpaulo * Redistribution and use in source and binary forms, with or without
6206376Srpaulo * modification, are permitted provided that the following conditions
7206376Srpaulo * are met:
8206376Srpaulo *
9206376Srpaulo * 1. Redistributions of source code must retain the above copyright
10206376Srpaulo *    notice, this list of conditions and the following disclaimer.
11206376Srpaulo * 2. Redistributions in binary form must reproduce the above copyright
12206376Srpaulo *    notice, this list of conditions and the following disclaimer in the
13206376Srpaulo *    documentation and/or other materials provided with the distribution.
14206376Srpaulo *
15206376Srpaulo * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16206376Srpaulo * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17206376Srpaulo * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18206376Srpaulo * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19206376Srpaulo * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20206376Srpaulo * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21206376Srpaulo * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22206376Srpaulo * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23206376Srpaulo * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24206376Srpaulo * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25206376Srpaulo */
26206376Srpaulo
27206376Srpaulo#include <sys/cdefs.h>
28206376Srpaulo__FBSDID("$FreeBSD$");
29206376Srpaulo
30206376Srpaulo#include <stand.h>
31206376Srpaulo
32206376Srpaulo#include <efi.h>
33206376Srpaulo#include <efilib.h>
34206376Srpaulo
35206376Srpaulo#include <libi386.h>
36206376Srpaulo#include <machine/bootinfo.h>
37206376Srpaulo
38206376Srpaulo#define EFI_INTEL_FPSWA		\
39206376Srpaulo    {0xc41b6531,0x97b9,0x11d3,{0x9a,0x29,0x00,0x90,0x27,0x3f,0xc1,0x4d}}
40206376Srpaulo
41206376Srpaulostatic EFI_GUID fpswa_guid = EFI_INTEL_FPSWA;
42206376Srpaulo
43206376Srpaulo/* DIG64 Headless Console & Debug Port Table. */
44206376Srpaulo#define	HCDP_TABLE_GUID		\
45206376Srpaulo    {0xf951938d,0x620b,0x42ef,{0x82,0x79,0xa8,0x4b,0x79,0x61,0x78,0x98}}
46206376Srpaulo
47206376Srpaulostatic EFI_GUID hcdp_guid = HCDP_TABLE_GUID;
48206376Srpaulo
49206376Srpaulostatic UINTN mapkey;
50206376Srpaulo
51206376Srpaulouint64_t
52206376Srpauloldr_alloc(vm_offset_t va)
53206376Srpaulo{
54206376Srpaulo
55206376Srpaulo	return (0);
56206376Srpaulo}
57206376Srpaulo
58206376Srpauloint
59206376Srpauloldr_bootinfo(struct bootinfo *bi, uint64_t *bi_addr)
60206376Srpaulo{
61206376Srpaulo	VOID *fpswa;
62206376Srpaulo	EFI_MEMORY_DESCRIPTOR *mm;
63206376Srpaulo	EFI_PHYSICAL_ADDRESS addr;
64206376Srpaulo	EFI_HANDLE handle;
65206376Srpaulo	EFI_STATUS status;
66206376Srpaulo	size_t bisz;
67206376Srpaulo	UINTN mmsz, pages, sz;
68206376Srpaulo	UINT32 mmver;
69206376Srpaulo
70206376Srpaulo	bi->bi_systab = (uint64_t)ST;
71206376Srpaulo	bi->bi_hcdp = (uint64_t)efi_get_table(&hcdp_guid);
72206376Srpaulo
73206376Srpaulo	sz = sizeof(EFI_HANDLE);
74206376Srpaulo	status = BS->LocateHandle(ByProtocol, &fpswa_guid, 0, &sz, &handle);
75206376Srpaulo	if (status == 0)
76206376Srpaulo		status = BS->HandleProtocol(handle, &fpswa_guid, &fpswa);
77206376Srpaulo	bi->bi_fpswa = (status == 0) ? (uint64_t)fpswa : 0;
78206376Srpaulo
79206376Srpaulo	bisz = (sizeof(struct bootinfo) + 0x0f) & ~0x0f;
80206376Srpaulo
81206376Srpaulo	/*
82206376Srpaulo	 * Allocate enough pages to hold the bootinfo block and the memory
83206376Srpaulo	 * map EFI will return to us. The memory map has an unknown size,
84206376Srpaulo	 * so we have to determine that first. Note that the AllocatePages
85206376Srpaulo	 * call can itself modify the memory map, so we have to take that
86206376Srpaulo	 * into account as well. The changes to the memory map are caused
87206376Srpaulo	 * by splitting a range of free memory into two (AFAICT), so that
88206376Srpaulo	 * one is marked as being loader data.
89206376Srpaulo	 */
90206376Srpaulo	sz = 0;
91206376Srpaulo	BS->GetMemoryMap(&sz, NULL, &mapkey, &mmsz, &mmver);
92206376Srpaulo	sz += mmsz;
93206376Srpaulo	sz = (sz + 15) & ~15;
94206376Srpaulo	pages = EFI_SIZE_TO_PAGES(sz + bisz);
95206376Srpaulo	status = BS->AllocatePages(AllocateAnyPages, EfiLoaderData, pages,
96206376Srpaulo	    &addr);
97206376Srpaulo	if (EFI_ERROR(status)) {
98206376Srpaulo		printf("%s: AllocatePages() returned 0x%lx\n", __func__,
99206376Srpaulo		    (long)status);
100206376Srpaulo		return (ENOMEM);
101206376Srpaulo	}
102206376Srpaulo
103206376Srpaulo	/*
104206376Srpaulo	 * Read the memory map and stash it after bootinfo. Align the
105206376Srpaulo	 * memory map on a 16-byte boundary (the bootinfo block is page
106206376Srpaulo	 * aligned).
107206376Srpaulo	 */
108206376Srpaulo	*bi_addr = addr;
109206376Srpaulo	mm = (void *)(addr + bisz);
110206376Srpaulo	sz = (EFI_PAGE_SIZE * pages) - bisz;
111206376Srpaulo	status = BS->GetMemoryMap(&sz, mm, &mapkey, &mmsz, &mmver);
112206376Srpaulo	if (EFI_ERROR(status)) {
113206376Srpaulo		printf("%s: GetMemoryMap() returned 0x%lx\n", __func__,
114206376Srpaulo		    (long)status);
115206376Srpaulo		return (EINVAL);
116206376Srpaulo	}
117206376Srpaulo	bi->bi_memmap = (uint64_t)mm;
118206376Srpaulo	bi->bi_memmap_size = sz;
119206376Srpaulo	bi->bi_memdesc_size = mmsz;
120206376Srpaulo	bi->bi_memdesc_version = mmver;
121206376Srpaulo
122206376Srpaulo	bcopy(bi, (void *)(*bi_addr), sizeof(*bi));
123206376Srpaulo	return (0);
124206376Srpaulo}
125206376Srpaulo
126206376Srpauloint
127206376Srpauloldr_enter(const char *kernel)
128206376Srpaulo{
129206376Srpaulo	EFI_STATUS status;
130206376Srpaulo
131206376Srpaulo	status = BS->ExitBootServices(IH, mapkey);
132206376Srpaulo	if (EFI_ERROR(status)) {
133206376Srpaulo		printf("%s: ExitBootServices() returned 0x%lx\n", __func__,
134206376Srpaulo		    (long)status);
135206376Srpaulo		return (EINVAL);
136206376Srpaulo	}
137206376Srpaulo
138206376Srpaulo	return (0);
139206376Srpaulo}
140