2 * This file is part of the coreboot project.
4 * Copyright (C) 2003-2004 Eric Biederman
5 * Copyright (C) 2005-2010 coresystems GmbH
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; version 2 of
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
23 #include <console/console.h>
24 #include <ip_checksum.h>
25 #include <boot/tables.h>
26 #include <boot/coreboot_tables.h>
27 #include <arch/coreboot_tables.h>
30 #include <device/device.h>
32 #if (CONFIG_USE_OPTION_TABLE == 1)
33 #include <option_table.h>
37 static struct lb_header *lb_table_init(unsigned long addr)
39 struct lb_header *header;
41 /* 16 byte align the address */
45 header = (void *)addr;
46 header->signature[0] = 'L';
47 header->signature[1] = 'B';
48 header->signature[2] = 'I';
49 header->signature[3] = 'O';
50 header->header_bytes = sizeof(*header);
51 header->header_checksum = 0;
52 header->table_bytes = 0;
53 header->table_checksum = 0;
54 header->table_entries = 0;
58 static struct lb_record *lb_first_record(struct lb_header *header)
60 struct lb_record *rec;
61 rec = (void *)(((char *)header) + sizeof(*header));
65 static struct lb_record *lb_last_record(struct lb_header *header)
67 struct lb_record *rec;
68 rec = (void *)(((char *)header) + sizeof(*header) + header->table_bytes);
73 static struct lb_record *lb_next_record(struct lb_record *rec)
75 rec = (void *)(((char *)rec) + rec->size);
80 static struct lb_record *lb_new_record(struct lb_header *header)
82 struct lb_record *rec;
83 rec = lb_last_record(header);
84 if (header->table_entries) {
85 header->table_bytes += rec->size;
87 rec = lb_last_record(header);
88 header->table_entries++;
89 rec->tag = LB_TAG_UNUSED;
90 rec->size = sizeof(*rec);
95 static struct lb_memory *lb_memory(struct lb_header *header)
97 struct lb_record *rec;
98 struct lb_memory *mem;
99 rec = lb_new_record(header);
100 mem = (struct lb_memory *)rec;
101 mem->tag = LB_TAG_MEMORY;
102 mem->size = sizeof(*mem);
106 static struct lb_serial *lb_serial(struct lb_header *header)
108 #if CONFIG_CONSOLE_SERIAL8250
109 struct lb_record *rec;
110 struct lb_serial *serial;
111 rec = lb_new_record(header);
112 serial = (struct lb_serial *)rec;
113 serial->tag = LB_TAG_SERIAL;
114 serial->size = sizeof(*serial);
115 serial->type = LB_SERIAL_TYPE_IO_MAPPED;
116 serial->baseaddr = CONFIG_TTYS0_BASE;
117 serial->baud = CONFIG_TTYS0_BAUD;
119 #elif CONFIG_CONSOLE_SERIAL8250MEM
120 struct lb_record *rec;
121 struct lb_serial *serial;
122 rec = lb_new_record(header);
123 serial = (struct lb_serial *)rec;
124 serial->tag = LB_TAG_SERIAL;
125 serial->size = sizeof(*serial);
126 serial->type = LB_SERIAL_TYPE_MEMORY_MAPPED;
127 serial->baseaddr = uartmem_getbaseaddr();
128 serial->baud = CONFIG_TTYS0_BAUD;
135 #if CONFIG_CONSOLE_SERIAL8250 || CONFIG_CONSOLE_SERIAL8250MEM || \
136 CONFIG_CONSOLE_LOGBUF || CONFIG_USBDEBUG
137 static void add_console(struct lb_header *header, u16 consoletype)
139 struct lb_console *console;
141 console = (struct lb_console *)lb_new_record(header);
142 console->tag = LB_TAG_CONSOLE;
143 console->size = sizeof(*console);
144 console->type = consoletype;
148 static void lb_console(struct lb_header *header)
150 #if CONFIG_CONSOLE_SERIAL8250
151 add_console(header, LB_TAG_CONSOLE_SERIAL8250);
153 #if CONFIG_CONSOLE_SERIAL8250MEM
154 add_console(header, LB_TAG_CONSOLE_SERIAL8250MEM);
156 #if CONFIG_CONSOLE_LOGBUF
157 add_console(header, LB_TAG_CONSOLE_LOGBUF);
160 add_console(header, LB_TAG_CONSOLE_EHCI);
164 static void lb_framebuffer(struct lb_header *header)
166 #if CONFIG_FRAMEBUFFER_KEEP_VESA_MODE
167 void fill_lb_framebuffer(struct lb_framebuffer *framebuffer);
169 struct lb_framebuffer *framebuffer;
170 framebuffer = (struct lb_framebuffer *)lb_new_record(header);
171 framebuffer->tag = LB_TAG_FRAMEBUFFER;
172 framebuffer->size = sizeof(*framebuffer);
173 fill_lb_framebuffer(framebuffer);
177 static struct lb_mainboard *lb_mainboard(struct lb_header *header)
179 struct lb_record *rec;
180 struct lb_mainboard *mainboard;
181 rec = lb_new_record(header);
182 mainboard = (struct lb_mainboard *)rec;
183 mainboard->tag = LB_TAG_MAINBOARD;
185 mainboard->size = (sizeof(*mainboard) +
186 strlen(mainboard_vendor) + 1 +
187 strlen(mainboard_part_number) + 1 +
190 mainboard->vendor_idx = 0;
191 mainboard->part_number_idx = strlen(mainboard_vendor) + 1;
193 memcpy(mainboard->strings + mainboard->vendor_idx,
194 mainboard_vendor, strlen(mainboard_vendor) + 1);
195 memcpy(mainboard->strings + mainboard->part_number_idx,
196 mainboard_part_number, strlen(mainboard_part_number) + 1);
201 #if (CONFIG_USE_OPTION_TABLE == 1)
202 static struct cmos_checksum *lb_cmos_checksum(struct lb_header *header)
204 struct lb_record *rec;
205 struct cmos_checksum *cmos_checksum;
206 rec = lb_new_record(header);
207 cmos_checksum = (struct cmos_checksum *)rec;
208 cmos_checksum->tag = LB_TAG_OPTION_CHECKSUM;
210 cmos_checksum->size = (sizeof(*cmos_checksum));
212 cmos_checksum->range_start = LB_CKS_RANGE_START * 8;
213 cmos_checksum->range_end = ( LB_CKS_RANGE_END * 8 ) + 7;
214 cmos_checksum->location = LB_CKS_LOC * 8;
215 cmos_checksum->type = CHECKSUM_PCBIOS;
217 return cmos_checksum;
221 static void lb_strings(struct lb_header *header)
223 static const struct {
227 { LB_TAG_VERSION, coreboot_version, },
228 { LB_TAG_EXTRA_VERSION, coreboot_extra_version, },
229 { LB_TAG_BUILD, coreboot_build, },
230 { LB_TAG_COMPILE_TIME, coreboot_compile_time, },
231 { LB_TAG_COMPILE_BY, coreboot_compile_by, },
232 { LB_TAG_COMPILE_HOST, coreboot_compile_host, },
233 { LB_TAG_COMPILE_DOMAIN, coreboot_compile_domain, },
234 { LB_TAG_COMPILER, coreboot_compiler, },
235 { LB_TAG_LINKER, coreboot_linker, },
236 { LB_TAG_ASSEMBLER, coreboot_assembler, },
239 for(i = 0; i < ARRAY_SIZE(strings); i++) {
240 struct lb_string *rec;
242 rec = (struct lb_string *)lb_new_record(header);
243 len = strlen(strings[i].string);
244 rec->tag = strings[i].tag;
245 rec->size = (sizeof(*rec) + len + 1 + 3) & ~3;
246 memcpy(rec->string, strings[i].string, len+1);
251 #if CONFIG_WRITE_HIGH_TABLES == 1
252 static struct lb_forward *lb_forward(struct lb_header *header, struct lb_header *next_header)
254 struct lb_record *rec;
255 struct lb_forward *forward;
256 rec = lb_new_record(header);
257 forward = (struct lb_forward *)rec;
258 forward->tag = LB_TAG_FORWARD;
259 forward->size = sizeof(*forward);
260 forward->forward = (uint64_t)(unsigned long)next_header;
265 void lb_memory_range(struct lb_memory *mem,
266 uint32_t type, uint64_t start, uint64_t size)
269 entries = (mem->size - sizeof(*mem))/sizeof(mem->map[0]);
270 mem->map[entries].start = pack_lb64(start);
271 mem->map[entries].size = pack_lb64(size);
272 mem->map[entries].type = type;
273 mem->size += sizeof(mem->map[0]);
276 static void lb_reserve_table_memory(struct lb_header *head)
278 struct lb_record *last_rec;
279 struct lb_memory *mem;
284 last_rec = lb_last_record(head);
286 start = (unsigned long)head;
287 end = (unsigned long)last_rec;
288 entries = (mem->size - sizeof(*mem))/sizeof(mem->map[0]);
289 /* Resize the right two memory areas so this table is in
290 * a reserved area of memory. Everything has been carefully
291 * setup so that is all we need to do.
293 for(i = 0; i < entries; i++ ) {
294 uint64_t map_start = unpack_lb64(mem->map[i].start);
295 uint64_t map_end = map_start + unpack_lb64(mem->map[i].size);
296 /* Does this area need to be expanded? */
297 if (map_end == start) {
298 mem->map[i].size = pack_lb64(end - map_start);
300 /* Does this area need to be contracted? */
301 else if (map_start == start) {
302 mem->map[i].start = pack_lb64(end);
303 mem->map[i].size = pack_lb64(map_end - end);
308 static unsigned long lb_table_fini(struct lb_header *head, int fixup)
310 struct lb_record *rec, *first_rec;
311 rec = lb_last_record(head);
312 if (head->table_entries) {
313 head->table_bytes += rec->size;
317 lb_reserve_table_memory(head);
319 first_rec = lb_first_record(head);
320 head->table_checksum = compute_ip_checksum(first_rec, head->table_bytes);
321 head->header_checksum = 0;
322 head->header_checksum = compute_ip_checksum(head, sizeof(*head));
323 printk(BIOS_DEBUG, "Wrote coreboot table at: %p - %p checksum %x\n",
324 head, rec, head->table_checksum);
325 return (unsigned long)rec;
328 static void lb_cleanup_memory_ranges(struct lb_memory *mem)
332 entries = (mem->size - sizeof(*mem))/sizeof(mem->map[0]);
334 /* Sort the lb memory ranges */
335 for(i = 0; i < entries; i++) {
336 uint64_t entry_start = unpack_lb64(mem->map[i].start);
337 for(j = i; j < entries; j++) {
338 uint64_t temp_start = unpack_lb64(mem->map[j].start);
339 if (temp_start < entry_start) {
340 struct lb_memory_range tmp;
342 mem->map[i] = mem->map[j];
348 /* Merge adjacent entries */
349 for(i = 0; (i + 1) < entries; i++) {
350 uint64_t start, end, nstart, nend;
351 if (mem->map[i].type != mem->map[i + 1].type) {
354 start = unpack_lb64(mem->map[i].start);
355 end = start + unpack_lb64(mem->map[i].size);
356 nstart = unpack_lb64(mem->map[i + 1].start);
357 nend = nstart + unpack_lb64(mem->map[i + 1].size);
358 if ((start <= nstart) && (end > nstart)) {
359 if (start > nstart) {
365 /* Record the new region size */
366 mem->map[i].start = pack_lb64(start);
367 mem->map[i].size = pack_lb64(end - start);
369 /* Delete the entry I have merged with */
370 memmove(&mem->map[i + 1], &mem->map[i + 2],
371 ((entries - i - 2) * sizeof(mem->map[0])));
372 mem->size -= sizeof(mem->map[0]);
374 /* See if I can merge with the next entry as well */
380 static void lb_remove_memory_range(struct lb_memory *mem,
381 uint64_t start, uint64_t size)
388 entries = (mem->size - sizeof(*mem))/sizeof(mem->map[0]);
390 /* Remove a reserved area from the memory map */
391 for(i = 0; i < entries; i++) {
392 uint64_t map_start = unpack_lb64(mem->map[i].start);
393 uint64_t map_end = map_start + unpack_lb64(mem->map[i].size);
394 if ((start <= map_start) && (end >= map_end)) {
395 /* Remove the completely covered range */
396 memmove(&mem->map[i], &mem->map[i + 1],
397 ((entries - i - 1) * sizeof(mem->map[0])));
398 mem->size -= sizeof(mem->map[0]);
400 /* Since the index will disappear revisit what will appear here */
403 else if ((start > map_start) && (end < map_end)) {
404 /* Split the memory range */
405 memmove(&mem->map[i + 1], &mem->map[i],
406 ((entries - i) * sizeof(mem->map[0])));
407 mem->size += sizeof(mem->map[0]);
409 /* Update the first map entry */
410 mem->map[i].size = pack_lb64(start - map_start);
411 /* Update the second map entry */
412 mem->map[i + 1].start = pack_lb64(end);
413 mem->map[i + 1].size = pack_lb64(map_end - end);
414 /* Don't bother with this map entry again */
417 else if ((start <= map_start) && (end > map_start)) {
418 /* Shrink the start of the memory range */
419 mem->map[i].start = pack_lb64(end);
420 mem->map[i].size = pack_lb64(map_end - end);
422 else if ((start < map_end) && (start > map_start)) {
423 /* Shrink the end of the memory range */
424 mem->map[i].size = pack_lb64(start - map_start);
429 /* This function is used in mainboard specific code, too */
430 void lb_add_memory_range(struct lb_memory *mem,
431 uint32_t type, uint64_t start, uint64_t size)
433 lb_remove_memory_range(mem, start, size);
434 lb_memory_range(mem, type, start, size);
435 lb_cleanup_memory_ranges(mem);
438 static void lb_dump_memory_ranges(struct lb_memory *mem)
442 entries = (mem->size - sizeof(*mem))/sizeof(mem->map[0]);
444 printk(BIOS_DEBUG, "coreboot memory table:\n");
445 for(i = 0; i < entries; i++) {
446 uint64_t entry_start = unpack_lb64(mem->map[i].start);
447 uint64_t entry_size = unpack_lb64(mem->map[i].size);
448 const char *entry_type;
450 switch (mem->map[i].type) {
451 case LB_MEM_RAM: entry_type="RAM"; break;
452 case LB_MEM_RESERVED: entry_type="RESERVED"; break;
453 case LB_MEM_ACPI: entry_type="ACPI"; break;
454 case LB_MEM_NVS: entry_type="NVS"; break;
455 case LB_MEM_UNUSABLE: entry_type="UNUSABLE"; break;
456 case LB_MEM_VENDOR_RSVD: entry_type="VENDOR RESERVED"; break;
457 case LB_MEM_TABLE: entry_type="CONFIGURATION TABLES"; break;
458 default: entry_type="UNKNOWN!"; break;
461 printk(BIOS_DEBUG, "%2d. %016llx-%016llx: %s\n",
462 i, entry_start, entry_start+entry_size-1, entry_type);
468 /* Routines to extract part so the coreboot table or
469 * information from the coreboot table after we have written it.
470 * Currently get_lb_mem relies on a global we can change the
473 static struct lb_memory *mem_ranges = 0;
474 struct lb_memory *get_lb_mem(void)
479 static void build_lb_mem_range(void *gp, struct device *dev, struct resource *res)
481 struct lb_memory *mem = gp;
482 lb_memory_range(mem, LB_MEM_RAM, res->base, res->size);
485 static struct lb_memory *build_lb_mem(struct lb_header *head)
487 struct lb_memory *mem;
489 /* Record where the lb memory ranges will live */
490 mem = lb_memory(head);
493 /* Build the raw table of memory */
494 search_global_resources(
495 IORESOURCE_MEM | IORESOURCE_CACHEABLE, IORESOURCE_MEM | IORESOURCE_CACHEABLE,
496 build_lb_mem_range, mem);
497 lb_cleanup_memory_ranges(mem);
501 static void lb_add_rsvd_range(void *gp, struct device *dev, struct resource *res)
503 struct lb_memory *mem = gp;
504 lb_add_memory_range(mem, LB_MEM_RESERVED, res->base, res->size);
507 static void add_lb_reserved(struct lb_memory *mem)
509 /* Add reserved ranges */
510 search_global_resources(
511 IORESOURCE_MEM | IORESOURCE_RESERVE, IORESOURCE_MEM | IORESOURCE_RESERVE,
512 lb_add_rsvd_range, mem);
515 #if CONFIG_WRITE_HIGH_TABLES == 1
516 extern uint64_t high_tables_base, high_tables_size;
519 unsigned long write_coreboot_table(
520 unsigned long low_table_start, unsigned long low_table_end,
521 unsigned long rom_table_start, unsigned long rom_table_end)
523 struct lb_header *head;
524 struct lb_memory *mem;
526 #if CONFIG_WRITE_HIGH_TABLES == 1
527 printk(BIOS_DEBUG, "Writing high table forward entry at 0x%08lx\n",
529 head = lb_table_init(low_table_end);
530 lb_forward(head, (struct lb_header*)rom_table_end);
532 low_table_end = (unsigned long) lb_table_fini(head, 0);
533 printk(BIOS_DEBUG, "New low_table_end: 0x%08lx\n", low_table_end);
534 printk(BIOS_DEBUG, "Now going to write high coreboot table at 0x%08lx\n",
537 head = lb_table_init(rom_table_end);
538 rom_table_end = (unsigned long)head;
539 printk(BIOS_DEBUG, "rom_table_end = 0x%08lx\n", rom_table_end);
541 if(low_table_end > (0x1000 - sizeof(struct lb_header))) { /* after 4K */
542 /* We need to put lbtable on to [0xf0000,0x100000) */
543 head = lb_table_init(rom_table_end);
544 rom_table_end = (unsigned long)head;
546 head = lb_table_init(low_table_end);
547 low_table_end = (unsigned long)head;
551 printk(BIOS_DEBUG, "Adjust low_table_end from 0x%08lx to ", low_table_end);
552 low_table_end += 0xfff; // 4K aligned
553 low_table_end &= ~0xfff;
554 printk(BIOS_DEBUG, "0x%08lx \n", low_table_end);
556 /* The Linux kernel assumes this region is reserved */
557 printk(BIOS_DEBUG, "Adjust rom_table_end from 0x%08lx to ", rom_table_end);
558 rom_table_end += 0xffff; // 64K align
559 rom_table_end &= ~0xffff;
560 printk(BIOS_DEBUG, "0x%08lx \n", rom_table_end);
562 #if (CONFIG_USE_OPTION_TABLE == 1)
564 struct cmos_option_table *option_table = cbfs_find_file("cmos_layout.bin", 0x1aa);
566 struct lb_record *rec_dest = lb_new_record(head);
567 /* Copy the option config table, it's already a lb_record... */
568 memcpy(rec_dest, option_table, option_table->size);
569 /* Create cmos checksum entry in coreboot table */
570 lb_cmos_checksum(head);
572 printk(BIOS_ERR, "cmos_layout.bin could not be found!\n");
576 /* Record where RAM is located */
577 mem = build_lb_mem(head);
579 /* Record the mptable and the the lb_table (This will be adjusted later) */
580 lb_add_memory_range(mem, LB_MEM_TABLE,
581 low_table_start, low_table_end - low_table_start);
583 /* Record the pirq table, acpi tables, and maybe the mptable */
584 lb_add_memory_range(mem, LB_MEM_TABLE,
585 rom_table_start, rom_table_end-rom_table_start);
587 #if CONFIG_WRITE_HIGH_TABLES == 1
588 printk(BIOS_DEBUG, "Adding high table area\n");
589 // should this be LB_MEM_ACPI?
590 lb_add_memory_range(mem, LB_MEM_TABLE,
591 high_tables_base, high_tables_size);
594 /* Add reserved regions */
595 add_lb_reserved(mem);
597 #if (CONFIG_HAVE_MAINBOARD_RESOURCES == 1)
598 add_mainboard_resources(mem);
601 lb_dump_memory_ranges(mem);
604 * I assume that there is always memory at immediately after
605 * the low_table_end. This means that after I setup the coreboot table.
606 * I can trivially fixup the reserved memory ranges to hold the correct
607 * size of the coreboot table.
610 /* Record our motherboard */
612 /* Record the serial port, if present */
614 /* Record our console setup */
616 /* Record our various random string information */
618 /* Record our framebuffer */
619 lb_framebuffer(head);
621 /* Remember where my valid memory ranges are */
622 return lb_table_fini(head, 1);