corinfo: Inital release of the coreinfo code
[coreboot.git] / payloads / coreinfo / coreboot_module.c
1 /*
2  * This file is part of the coreinfo project.
3  *
4  * Copyright (C) 2008 Advanced Micro Devices, Inc.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; version 2 of the License.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
18  */
19
20 #include <coreboot_tables.h>
21 #include "coreinfo.h"
22
23 #define MAX_MEMORY_COUNT 5
24
25 static struct {
26         int mem_count;
27         int mem_actual;
28
29         struct cb_memory_range range[MAX_MEMORY_COUNT];
30
31         char vendor[32];
32         char part[32];
33
34         char strings[10][64];
35         
36         struct cb_serial serial;
37         struct cb_console console;
38 } cb_info;
39
40 static int tables_good = 0;
41
42 int coreboot_module_redraw(WINDOW *win) 
43 {
44         int row = 2;
45         int i;
46
47         print_module_title(win, "Coreboot Tables");
48
49         if (tables_good) {
50                 mvwprintw(win, row++, 2, "No Coreboot tables were found");
51                 return 0;
52         }
53                 
54         mvwprintw(win, row++, 2, "Vendor: %s", cb_info.vendor);
55         mvwprintw(win, row++, 2, "Part: %s", cb_info.part);
56
57         mvwprintw(win, row++, 2, "Version: %s%s", 
58                  cb_info.strings[CB_TAG_VERSION - 0x4],
59                  cb_info.strings[CB_TAG_EXTRA_VERSION - 0x4]);
60
61         mvwprintw(win, row++, 2, "Built: %s (%s@%s.%s)",
62                   cb_info.strings[CB_TAG_BUILD - 0x4],
63                   cb_info.strings[CB_TAG_COMPILE_BY - 0x04],
64                   cb_info.strings[CB_TAG_COMPILE_HOST - 0x04],
65                   cb_info.strings[CB_TAG_COMPILE_DOMAIN - 0x04]);
66
67         if (cb_info.serial.tag != 0x0) {
68                 mvwprintw(win, row++, 2, "Serial Port I/O base: 0x%x",
69                          cb_info.serial.ioport);
70         }
71
72         if (cb_info.console.tag != 0x0) {
73                 mvwprintw(win, row++, 2, "Default Output Console: ");
74                 
75                 switch(cb_info.console.type) {
76                 case CB_TAG_CONSOLE_SERIAL8250:
77                         wprintw(win, "Serial Port");
78                         break;
79                 case CB_TAG_CONSOLE_VGA:
80                         wprintw(win, "VGA");
81                         break;
82                 case CB_TAG_CONSOLE_BTEXT:
83                         wprintw(win, "BTEXT");
84                         break;
85                 case CB_TAG_CONSOLE_LOGBUF:
86                         wprintw(win, "Log Buffer");
87                         break;
88                 case CB_TAG_CONSOLE_SROM:
89                         wprintw(win, "Serial ROM");
90                         break;
91                 case CB_TAG_CONSOLE_EHCI:
92                         wprintw(win, "USB Debug");
93                         break;
94                 }
95         }
96
97         row++;
98         mvwprintw(win, row++, 2, "-- Memory Map --");
99         
100         for(i = 0; i < cb_info.mem_count; i++) {
101
102                 switch(cb_info.range[i].type) {
103                 case CB_MEM_RAM:
104                         mvwprintw(win, row++, 4, "     RAM: ");
105                         break;
106
107                 case CB_MEM_RESERVED:
108                         mvwprintw(win, row++, 4, "Reserved: ");
109                         break;
110
111                 case CB_MEM_TABLE:
112                         mvwprintw(win, row++, 4, "   Table: ");
113                 }
114
115                 wprintw(win, "%16.16llx - %16.16llx",
116                         UNPACK_CB64(cb_info.range[i].start),
117                         UNPACK_CB64(cb_info.range[i].start) + 
118                         UNPACK_CB64(cb_info.range[i].size) - 1);
119         }
120 }
121
122 static void parse_memory(unsigned char *ptr)
123 {
124         struct cb_memory *mem = (struct cb_memory *) ptr;
125         
126         int max = (MEM_RANGE_COUNT(mem) > MAX_MEMORY_COUNT)
127                 ? MAX_MEMORY_COUNT : MEM_RANGE_COUNT(mem);
128         int i;
129
130         for(i = 0; i < max; i++) {
131                 struct cb_memory_range *range = 
132                         (struct cb_memory_range *) MEM_RANGE_PTR(mem, i);
133
134                 memcpy(&cb_info.range[i], range, sizeof(*range));
135         }
136         
137         cb_info.mem_count = max;
138         cb_info.mem_actual = MEM_RANGE_COUNT(mem);
139 }
140
141 static void parse_mainboard(unsigned char *ptr) 
142 {
143         struct cb_mainboard *mb = (struct cb_mainboard *) ptr;
144
145         strncpy(cb_info.vendor, MB_VENDOR_STRING(mb), 31);
146         strncpy(cb_info.part, MB_PART_STRING(mb), 31);
147 }
148
149 static void parse_strings(unsigned char *ptr)
150 {
151         struct cb_string *string = (struct cb_string *) ptr;
152         int index = string->tag - CB_TAG_VERSION;
153         
154         strncpy(cb_info.strings[index], string->string, 63);
155         cb_info.strings[index][63] = 0;
156 }
157
158 static void parse_serial(unsigned char *ptr)
159 {
160         memcpy(&cb_info.serial, (struct cb_serial *) ptr,
161                sizeof(struct cb_serial));
162 }
163
164 static void parse_console(unsigned char *ptr)
165 {       
166         memcpy(&cb_info.console, (struct cb_console *) ptr,
167                sizeof(struct cb_console));
168 }
169         
170 static int parse_header(void *addr, int len)
171 {
172         struct cb_header *header;
173         unsigned char *ptr = (unsigned char *) addr;
174         int i;
175
176         for (i = 0; i < len; i += 16, ptr += 16) {
177                 header = (struct cb_header *) ptr;
178
179                 if (!strncmp(header->signature, "LBIO", 4))
180                         break;
181         }
182
183         /* We walked the entire space and didn't find anything */
184         if (i >= len)
185                 return -1;
186
187         if (!header->table_bytes)
188                 return 0;
189         
190         /* FIXME: Check the checksum */
191
192         if (ipchksum((uint16_t *) header, sizeof(*header)))
193           return -1;
194
195         if (ipchksum((uint16_t *) (ptr + sizeof(*header)), header->table_bytes) !=
196             header->table_checksum)
197           return -1;
198
199         /* Now, walk the tables */
200         ptr += header->header_bytes;
201
202         for(i = 0; i < header->table_entries; i++) {
203                 struct cb_record *rec = (struct cb_record *) ptr;
204                 
205                 switch(rec->tag) {
206                 case CB_TAG_MEMORY:
207                         parse_memory(ptr);
208                         break;
209                         
210                 case CB_TAG_MAINBOARD:
211                         parse_mainboard(ptr);
212                         break;
213                         
214                 case CB_TAG_VERSION:
215                 case CB_TAG_EXTRA_VERSION:
216                 case CB_TAG_BUILD:
217                 case CB_TAG_COMPILE_TIME:
218                 case CB_TAG_COMPILE_BY:
219                 case CB_TAG_COMPILE_HOST:
220                 case CB_TAG_COMPILE_DOMAIN:
221                 case CB_TAG_COMPILER:
222                 case CB_TAG_LINKER:
223                 case CB_TAG_ASSEMBLER:
224                         parse_strings(ptr);
225                         break;
226
227                 case CB_TAG_SERIAL:
228                         parse_serial(ptr);
229                         break;
230
231                 case CB_TAG_CONSOLE:
232                         parse_console(ptr);
233                         break;
234
235                 default:
236                         break;
237                 }
238
239                 ptr += rec->size;
240         }
241         
242         return 1;
243 }
244
245 int coreboot_module_init(void)
246 {
247         int ret = parse_header((void *) 0x00000, 0x1000);
248
249         if (ret != 1)
250                 ret = parse_header((void *) 0xf0000, 0x1000);
251
252         /* return error if we couldn't find it at either address */
253
254         tables_good =  (ret == 1) ? 0 : -1;
255         return tables_good;
256 }
257
258
259
260 struct coreinfo_module coreboot_module = {
261         .name = "Coreboot",
262         .init = coreboot_module_init,
263         .redraw = coreboot_module_redraw,
264 };