fdb4be34bbc6d48b70e7a1da42a2bcc91b81e777
[coreboot.git] / payloads / libpayload / drivers / options.c
1 /*
2  * This file is part of the libpayload project.
3  *
4  * Copyright (C) 2008 coresystems GmbH
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29
30 #include <libpayload.h>
31 #include <coreboot_tables.h>
32
33 static int options_checksum_valid(void)
34 {
35         int i;
36         int range_start = lib_sysinfo.cmos_range_start / 8;
37         int range_end = lib_sysinfo.cmos_range_end / 8;
38         int checksum_location = lib_sysinfo.cmos_checksum_location / 8;
39         u16 checksum = 0, checksum_old;
40
41         for(i = range_start; i <= range_end; i++) {
42                 checksum += nvram_read(i);
43         }
44         checksum = (~checksum)&0xffff;
45
46         checksum_old = ((nvram_read(checksum_location)<<8) | nvram_read(checksum_location+1));
47
48         return (checksum_old == checksum);
49 }
50
51 void fix_options_checksum(void)
52 {
53         int i;
54         int range_start = lib_sysinfo.cmos_range_start / 8;
55         int range_end = lib_sysinfo.cmos_range_end / 8;
56         int checksum_location = lib_sysinfo.cmos_checksum_location / 8;
57         u16 checksum = 0;
58
59         for(i = range_start; i <= range_end; i++) {
60                 checksum += nvram_read(i);
61         }
62         checksum = (~checksum)&0xffff;
63
64         nvram_write((checksum >> 8), checksum_location);
65         nvram_write((checksum & 0xff), checksum_location + 1);
66 }
67
68 static int get_cmos_value(u32 bitnum, u32 len, void *valptr)
69 {
70         u8 *value = (u8 *)valptr;
71         int offs = 0;
72         u32 addr, bit;
73         u8 reg8;
74
75         /* Convert to byte borders */
76         addr=(bitnum / 8);
77         bit=(bitnum % 8);
78
79         /* Handle single byte or less */
80         if(len <= 8) {
81                 reg8 = nvram_read(addr);
82                 reg8 >>= bit;
83                 value[0] = reg8 & ((1 << len) -1);
84                 return 0;
85         }
86
87         /* When handling more than a byte, copy whole bytes */
88         while (len > 0) {
89                 len -= 8;
90                 value[offs++]=nvram_read(addr++);
91         }
92
93         return 0;
94 }
95
96 int get_option_from(struct cb_cmos_option_table *option_table, void *dest, char *name)
97 {
98         struct cb_cmos_entries *cmos_entry;
99         int len = strnlen(name, CMOS_MAX_NAME_LENGTH);
100
101         /* cmos entries are located right after the option table */
102
103         for (   cmos_entry = (struct cb_cmos_entries*)((unsigned char *)option_table + option_table->header_length);
104                 cmos_entry->tag == CB_TAG_OPTION;
105                 cmos_entry = (struct cb_cmos_entries*)((unsigned char *)cmos_entry + cmos_entry->size)) {
106                 if (memcmp((const char*)cmos_entry->name, name, len))
107                         continue;
108                 if(get_cmos_value(cmos_entry->bit, cmos_entry->length, dest))
109                         return 1;
110
111                 if(!options_checksum_valid())
112                         return 1;
113
114                 return 0;
115         }
116
117         printf("ERROR: No such CMOS option (%s)\n", name);
118         return 1;
119 }
120
121 int get_option(void *dest, char *name)
122 {
123         struct cb_cmos_option_table *option_table = phys_to_virt(lib_sysinfo.option_table);
124         return get_option_from(option_table, dest, name);
125 }