corinfo: Inital release of the coreinfo code

This is the intial release of the coreinfo payload code.

Signed-off-by: Jordan Crouse <jordan.crouse@amd.com>
Acked-by: Uwe Hermann <uwe@hermann-uwe.de>


git-svn-id: svn://svn.coreboot.org/coreboot/trunk@3173 2b7e53f0-3cfb-0310-b3e9-8179ed1497e1

1 files changed, 264 insertions, 0 deletions

diff --git a/payloads/coreinfo/coreboot_module.c b/payloads/coreinfo/coreboot_module.c
new file mode 100644
index 0000000000..324eb948bf
--- /dev/null
+++ b/payloads/coreinfo/coreboot_module.c
@@ -0,0 +1,264 @@
+/*
+ * This file is part of the coreinfo project.
+ *
+ * Copyright (C) 2008 Advanced Micro Devices, Inc.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; version 2 of the License.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
+ */
+
+#include <coreboot_tables.h>
+#include "coreinfo.h"
+
+#define MAX_MEMORY_COUNT 5
+
+static struct {
+	int mem_count;
+	int mem_actual;
+
+	struct cb_memory_range range[MAX_MEMORY_COUNT];
+
+	char vendor[32];
+	char part[32];
+
+	char strings[10][64];
+	
+	struct cb_serial serial;
+	struct cb_console console;
+} cb_info;
+
+static int tables_good = 0;
+
+int coreboot_module_redraw(WINDOW *win) 
+{
+	int row = 2;
+	int i;
+
+	print_module_title(win, "Coreboot Tables");
+
+	if (tables_good) {
+		mvwprintw(win, row++, 2, "No Coreboot tables were found");
+		return 0;
+	}
+		
+	mvwprintw(win, row++, 2, "Vendor: %s", cb_info.vendor);
+	mvwprintw(win, row++, 2, "Part: %s", cb_info.part);
+
+	mvwprintw(win, row++, 2, "Version: %s%s", 
+		 cb_info.strings[CB_TAG_VERSION - 0x4],
+		 cb_info.strings[CB_TAG_EXTRA_VERSION - 0x4]);
+
+	mvwprintw(win, row++, 2, "Built: %s (%s@%s.%s)",
+		  cb_info.strings[CB_TAG_BUILD - 0x4],
+		  cb_info.strings[CB_TAG_COMPILE_BY - 0x04],
+		  cb_info.strings[CB_TAG_COMPILE_HOST - 0x04],
+		  cb_info.strings[CB_TAG_COMPILE_DOMAIN - 0x04]);
+
+	if (cb_info.serial.tag != 0x0) {
+		mvwprintw(win, row++, 2, "Serial Port I/O base: 0x%x",
+			 cb_info.serial.ioport);
+	}
+
+	if (cb_info.console.tag != 0x0) {
+		mvwprintw(win, row++, 2, "Default Output Console: ");
+		
+		switch(cb_info.console.type) {
+		case CB_TAG_CONSOLE_SERIAL8250:
+			wprintw(win, "Serial Port");
+			break;
+		case CB_TAG_CONSOLE_VGA:
+			wprintw(win, "VGA");
+			break;
+		case CB_TAG_CONSOLE_BTEXT:
+			wprintw(win, "BTEXT");
+			break;
+		case CB_TAG_CONSOLE_LOGBUF:
+			wprintw(win, "Log Buffer");
+			break;
+		case CB_TAG_CONSOLE_SROM:
+			wprintw(win, "Serial ROM");
+			break;
+		case CB_TAG_CONSOLE_EHCI:
+			wprintw(win, "USB Debug");
+			break;
+		}
+	}
+
+	row++;
+	mvwprintw(win, row++, 2, "-- Memory Map --");
+	
+	for(i = 0; i < cb_info.mem_count; i++) {
+
+		switch(cb_info.range[i].type) {
+		case CB_MEM_RAM:
+			mvwprintw(win, row++, 4, "     RAM: ");
+			break;
+
+		case CB_MEM_RESERVED:
+			mvwprintw(win, row++, 4, "Reserved: ");
+			break;
+
+		case CB_MEM_TABLE:
+			mvwprintw(win, row++, 4, "   Table: ");
+		}
+
+		wprintw(win, "%16.16llx - %16.16llx",
+			UNPACK_CB64(cb_info.range[i].start),
+			UNPACK_CB64(cb_info.range[i].start) + 
+			UNPACK_CB64(cb_info.range[i].size) - 1);
+	}
+}
+
+static void parse_memory(unsigned char *ptr)
+{
+	struct cb_memory *mem = (struct cb_memory *) ptr;
+	
+	int max = (MEM_RANGE_COUNT(mem) > MAX_MEMORY_COUNT)
+		? MAX_MEMORY_COUNT : MEM_RANGE_COUNT(mem);
+	int i;
+
+	for(i = 0; i < max; i++) {
+		struct cb_memory_range *range = 
+			(struct cb_memory_range *) MEM_RANGE_PTR(mem, i);
+
+		memcpy(&cb_info.range[i], range, sizeof(*range));
+	}
+	
+	cb_info.mem_count = max;
+	cb_info.mem_actual = MEM_RANGE_COUNT(mem);
+}
+
+static void parse_mainboard(unsigned char *ptr)	
+{
+	struct cb_mainboard *mb = (struct cb_mainboard *) ptr;
+
+	strncpy(cb_info.vendor, MB_VENDOR_STRING(mb), 31);
+	strncpy(cb_info.part, MB_PART_STRING(mb), 31);
+}
+
+static void parse_strings(unsigned char *ptr)
+{
+	struct cb_string *string = (struct cb_string *) ptr;
+	int index = string->tag - CB_TAG_VERSION;
+	
+	strncpy(cb_info.strings[index], string->string, 63);
+	cb_info.strings[index][63] = 0;
+}
+
+static void parse_serial(unsigned char *ptr)
+{
+	memcpy(&cb_info.serial, (struct cb_serial *) ptr,
+	       sizeof(struct cb_serial));
+}
+
+static void parse_console(unsigned char *ptr)
+{	
+	memcpy(&cb_info.console, (struct cb_console *) ptr,
+	       sizeof(struct cb_console));
+}
+ 	
+static int parse_header(void *addr, int len)
+{
+	struct cb_header *header;
+	unsigned char *ptr = (unsigned char *) addr;
+	int i;
+
+	for (i = 0; i < len; i += 16, ptr += 16) {
+		header = (struct cb_header *) ptr;
+
+		if (!strncmp(header->signature, "LBIO", 4))
+			break;
+	}
+
+	/* We walked the entire space and didn't find anything */
+	if (i >= len)
+		return -1;
+
+	if (!header->table_bytes)
+		return 0;
+	
+	/* FIXME: Check the checksum */
+
+	if (ipchksum((uint16_t *) header, sizeof(*header)))
+	  return -1;
+
+	if (ipchksum((uint16_t *) (ptr + sizeof(*header)), header->table_bytes) !=
+	    header->table_checksum)
+	  return -1;
+
+	/* Now, walk the tables */
+	ptr += header->header_bytes;
+
+	for(i = 0; i < header->table_entries; i++) {
+		struct cb_record *rec = (struct cb_record *) ptr;
+		
+		switch(rec->tag) {
+		case CB_TAG_MEMORY:
+			parse_memory(ptr);
+			break;
+			
+		case CB_TAG_MAINBOARD:
+			parse_mainboard(ptr);
+			break;
+			
+		case CB_TAG_VERSION:
+		case CB_TAG_EXTRA_VERSION:
+		case CB_TAG_BUILD:
+		case CB_TAG_COMPILE_TIME:
+		case CB_TAG_COMPILE_BY:
+		case CB_TAG_COMPILE_HOST:
+		case CB_TAG_COMPILE_DOMAIN:
+		case CB_TAG_COMPILER:
+		case CB_TAG_LINKER:
+		case CB_TAG_ASSEMBLER:
+			parse_strings(ptr);
+			break;
+
+		case CB_TAG_SERIAL:
+			parse_serial(ptr);
+			break;
+
+		case CB_TAG_CONSOLE:
+			parse_console(ptr);
+			break;
+
+		default:
+			break;
+		}
+
+		ptr += rec->size;
+	}
+	
+	return 1;
+}
+
+int coreboot_module_init(void)
+{
+	int ret = parse_header((void *) 0x00000, 0x1000);
+
+	if (ret != 1)
+		ret = parse_header((void *) 0xf0000, 0x1000);
+
+	/* return error if we couldn't find it at either address */
+
+	tables_good =  (ret == 1) ? 0 : -1;
+	return tables_good;
+}
+
+
+
+struct coreinfo_module coreboot_module = {
+	.name = "Coreboot",
+	.init = coreboot_module_init,
+	.redraw = coreboot_module_redraw,
+};