1 // Coreboot interface support.
3 // Copyright (C) 2008 Kevin O'Connor <kevin@koconnor.net>
5 // This file may be distributed under the terms of the GNU LGPLv3 license.
7 #include "memmap.h" // add_e820
8 #include "util.h" // dprintf
9 #include "pci.h" // struct pir_header
10 #include "acpi.h" // struct rsdp_descriptor
11 #include "mptable.h" // MPTABLE_SIGNATURE
12 #include "biosvar.h" // GET_EBDA
15 /****************************************************************
17 ****************************************************************/
22 struct pir_header *p = pos;
23 if (p->signature != PIR_SIGNATURE)
27 if (p->size < sizeof(*p))
29 if (checksum(pos, p->size) != 0)
31 bios_table_cur_addr = ALIGN(bios_table_cur_addr, 16);
32 if (bios_table_cur_addr + p->size > bios_table_end_addr) {
33 dprintf(1, "No room to copy PIR table!\n");
36 dprintf(1, "Copying PIR from %p to %x\n", pos, bios_table_cur_addr);
37 memcpy((void*)bios_table_cur_addr, pos, p->size);
38 PirOffset = bios_table_cur_addr - BUILD_BIOS_ADDR;
39 bios_table_cur_addr += p->size;
43 copy_mptable(void *pos)
45 struct mptable_floating_s *p = pos;
46 if (p->signature != MPTABLE_SIGNATURE)
50 if (checksum(pos, sizeof(*p)) != 0)
52 u32 length = p->length * 16;
53 bios_table_cur_addr = ALIGN(bios_table_cur_addr, 16);
54 u16 mpclength = ((struct mptable_config_s *)p->physaddr)->length;
55 if (bios_table_cur_addr + length + mpclength > bios_table_end_addr) {
56 dprintf(1, "No room to copy MPTABLE!\n");
59 dprintf(1, "Copying MPTABLE from %p/%x to %x\n"
60 , pos, p->physaddr, bios_table_cur_addr);
61 memcpy((void*)bios_table_cur_addr, pos, length);
62 struct mptable_floating_s *newp = (void*)bios_table_cur_addr;
63 newp->physaddr = bios_table_cur_addr + length;
65 newp->checksum = -checksum(newp, sizeof(*newp));
66 memcpy((void*)bios_table_cur_addr + length, (void*)p->physaddr, mpclength);
67 bios_table_cur_addr += length + mpclength;
71 copy_acpi_rsdp(void *pos)
75 struct rsdp_descriptor *p = pos;
76 if (p->signature != RSDP_SIGNATURE)
79 if (checksum(pos, length) != 0)
81 if (p->revision > 1) {
83 if (checksum(pos, length) != 0)
86 bios_table_cur_addr = ALIGN(bios_table_cur_addr, 16);
87 if (bios_table_cur_addr + length > bios_table_end_addr) {
88 dprintf(1, "No room to copy ACPI RSDP table!\n");
91 dprintf(1, "Copying ACPI RSDP from %p to %x\n", pos, bios_table_cur_addr);
92 RsdpAddr = (void*)bios_table_cur_addr;
93 memcpy(RsdpAddr, pos, length);
94 bios_table_cur_addr += length;
97 // Attempt to find (and relocate) any standard bios tables found in a
98 // given address range.
100 scan_tables(u32 start, u32 size)
102 void *p = (void*)ALIGN(start, 16);
103 void *end = (void*)start + size;
104 for (; p<end; p += 16) {
112 /****************************************************************
114 ****************************************************************/
125 #define CB_SIGNATURE 0x4f49424C // "LBIO"
127 struct cb_memory_range {
133 #define CB_MEM_TABLE 16
138 struct cb_memory_range map[0];
141 #define CB_TAG_MEMORY 0x01
143 #define MEM_RANGE_COUNT(_rec) \
144 (((_rec)->size - sizeof(*(_rec))) / sizeof((_rec)->map[0]))
152 #define CB_TAG_FORWARD 0x11
155 ipchksum(char *buf, int count)
165 sum = (sum >> 16) + (sum & 0xffff);
170 // Try to locate the coreboot header in a given address range.
171 static struct cb_header *
172 find_cb_header(char *addr, int len)
174 char *end = addr + len;
175 for (; addr < end; addr += 16) {
176 struct cb_header *cbh = (struct cb_header *)addr;
177 if (cbh->signature != CB_SIGNATURE)
179 if (! cbh->table_bytes)
181 if (ipchksum(addr, sizeof(*cbh)) != 0)
183 if (ipchksum(addr + sizeof(*cbh), cbh->table_bytes)
184 != cbh->table_checksum)
191 // Try to find the coreboot memory table in the given coreboot table.
193 find_cb_subtable(struct cb_header *cbh, u32 tag)
195 char *tbl = (char *)cbh + sizeof(*cbh);
197 for (i=0; i<cbh->table_entries; i++) {
198 struct cb_memory *cbm = (struct cb_memory *)tbl;
206 // Populate max ram and e820 map info by scanning for a coreboot table.
210 dprintf(3, "Attempting to find coreboot table\n");
212 // Init variables set in coreboot table memory scan.
216 // Find coreboot table.
217 struct cb_header *cbh = find_cb_header(0, 0x1000);
220 struct cb_forward *cbf = find_cb_subtable(cbh, CB_TAG_FORWARD);
222 dprintf(3, "Found coreboot table forwarder.\n");
223 cbh = find_cb_header((char *)((u32)cbf->forward), 0x100);
227 dprintf(3, "Now attempting to find coreboot memory map\n");
228 struct cb_memory *cbm = find_cb_subtable(cbh, CB_TAG_MEMORY);
232 u64 maxram = 0, maxram_over4G = 0;
233 int i, count = MEM_RANGE_COUNT(cbm);
234 for (i=0; i<count; i++) {
235 struct cb_memory_range *m = &cbm->map[i];
237 if (type == CB_MEM_TABLE) {
238 type = E820_RESERVED;
239 scan_tables(m->start, m->size);
240 } else if (type == E820_ACPI || type == E820_RAM) {
241 u64 end = m->start + m->size;
242 if (end > 0x100000000ull) {
243 end -= 0x100000000ull;
244 if (end > maxram_over4G)
246 } else if (end > maxram)
249 add_e820(m->start, m->size, type);
253 RamSizeOver4G = maxram_over4G;
255 // Ughh - coreboot likes to set a map at 0x0000-0x1000, but this
256 // confuses grub. So, override it.
257 add_e820(0, 16*1024, E820_RAM);
259 // XXX - just create dummy smbios table for now - should detect if
260 // smbios/dmi table is found from coreboot and use that instead.
266 // No table found.. Use 16Megs as a dummy value.
267 dprintf(1, "Unable to find coreboot table!\n");
268 RamSize = 16*1024*1024;
270 add_e820(0, 16*1024*1024, E820_RAM);
275 /****************************************************************
276 * Coreboot flash format
277 ****************************************************************/
280 #define ntohl(x) ((((x)&0xff)<<24) | (((x)&0xff00)<<8) | \
281 (((x)&0xff0000) >> 8) | (((x)&0xff000000) >> 24))
282 #define htonl(x) ntohl(x)
284 #define CBFS_HEADER_MAGIC 0x4F524243
285 #define CBFS_HEADPTR_ADDR 0xFFFFFFFc
286 #define CBFS_VERSION1 0x31313131
298 static struct cbfs_header *CBHDR;
303 if (! CONFIG_COREBOOT_FLASH)
306 CBHDR = *(void **)CBFS_HEADPTR_ADDR;
307 if (CBHDR->magic != htonl(CBFS_HEADER_MAGIC)) {
308 dprintf(1, "Unable to find CBFS (got %x not %x)\n"
309 , CBHDR->magic, htonl(CBFS_HEADER_MAGIC));
314 dprintf(1, "Found CBFS header at %p\n", CBHDR);
317 #define CBFS_FILE_MAGIC 0x455649484352414cLL // LARCHIVE
327 static struct cbfs_file *
328 cbfs_find(char *fname)
330 if (! CONFIG_COREBOOT_FLASH)
335 dprintf(3, "Searching CBFS for %s\n", fname);
337 struct cbfs_file *file = (void *)(0 - ntohl(CBHDR->romsize) + ntohl(CBHDR->offset));
339 if (file < (struct cbfs_file *)(0xFFFFFFFF - ntohl(CBHDR->romsize)))
341 if (file->magic != CBFS_FILE_MAGIC) {
342 file = (void*)file + ntohl(CBHDR->align);
346 dprintf(3, "Found CBFS file %s\n", (char*)file + sizeof(*file));
347 if (streq(fname, (char*)file + sizeof(*file)))
349 file = (void*)file + ALIGN(ntohl(file->len) + ntohl(file->offset), ntohl(CBHDR->align));
364 return ((getHex(x&0xf) << 24)
365 | (getHex((x>>4)&0xf) << 16)
366 | (getHex((x>>8)&0xf) << 8)
371 cb_find_optionrom(u32 vendev)
373 if (! CONFIG_COREBOOT_FLASH)
377 // Ughh - poor man's sprintf of "pci%04x,%04x.rom"
378 *(u32*)fname = 0x20696370; // "pci"
379 *(u32*)&fname[3] = hexify4(vendev);
381 *(u32*)&fname[8] = hexify4(vendev >> 16);
382 *(u32*)&fname[12] = 0x6d6f722e; // ".rom"
385 struct cbfs_file *file = cbfs_find(fname);
389 dprintf(3, "Found rom at %p\n", (void*)file + ntohl(file->offset));
390 return (void*)file + ntohl(file->offset);