Merge branch 'master' of /home/nchip/public_html/qemu into garage-push
[qemu] / hw / mac_nvram.c
1 /*
2  * PowerMac NVRAM emulation
3  *
4  * Copyright (c) 2005-2007 Fabrice Bellard
5  * Copyright (c) 2007 Jocelyn Mayer
6  *
7  * Permission is hereby granted, free of charge, to any person obtaining a copy
8  * of this software and associated documentation files (the "Software"), to deal
9  * in the Software without restriction, including without limitation the rights
10  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11  * copies of the Software, and to permit persons to whom the Software is
12  * furnished to do so, subject to the following conditions:
13  *
14  * The above copyright notice and this permission notice shall be included in
15  * all copies or substantial portions of the Software.
16  *
17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
23  * THE SOFTWARE.
24  */
25 #include "hw.h"
26 #include "firmware_abi.h"
27 #include "sysemu.h"
28 #include "ppc_mac.h"
29
30 /* debug NVR */
31 //#define DEBUG_NVR
32
33 #ifdef DEBUG_NVR
34 #define NVR_DPRINTF(fmt, ...)                                   \
35     do { printf("NVR: " fmt , ## __VA_ARGS__); } while (0)
36 #else
37 #define NVR_DPRINTF(fmt, ...)
38 #endif
39
40 struct MacIONVRAMState {
41     target_phys_addr_t size;
42     int mem_index;
43     unsigned int it_shift;
44     uint8_t *data;
45 };
46
47 #define DEF_SYSTEM_SIZE 0xc10
48
49 /* Direct access to NVRAM */
50 uint32_t macio_nvram_read (void *opaque, uint32_t addr)
51 {
52     MacIONVRAMState *s = opaque;
53     uint32_t ret;
54
55     if (addr < s->size)
56         ret = s->data[addr];
57     else
58         ret = -1;
59     NVR_DPRINTF("read addr %04x val %x\n", addr, ret);
60
61     return ret;
62 }
63
64 void macio_nvram_write (void *opaque, uint32_t addr, uint32_t val)
65 {
66     MacIONVRAMState *s = opaque;
67
68     NVR_DPRINTF("write addr %04x val %x\n", addr, val);
69     if (addr < s->size)
70         s->data[addr] = val;
71 }
72
73 /* macio style NVRAM device */
74 static void macio_nvram_writeb (void *opaque,
75                                 target_phys_addr_t addr, uint32_t value)
76 {
77     MacIONVRAMState *s = opaque;
78
79     addr = (addr >> s->it_shift) & (s->size - 1);
80     s->data[addr] = value;
81     NVR_DPRINTF("writeb addr %04x val %x\n", (int)addr, value);
82 }
83
84 static uint32_t macio_nvram_readb (void *opaque, target_phys_addr_t addr)
85 {
86     MacIONVRAMState *s = opaque;
87     uint32_t value;
88
89     addr = (addr >> s->it_shift) & (s->size - 1);
90     value = s->data[addr];
91     NVR_DPRINTF("readb addr %04x val %x\n", (int)addr, value);
92
93     return value;
94 }
95
96 static CPUWriteMemoryFunc *nvram_write[] = {
97     &macio_nvram_writeb,
98     &macio_nvram_writeb,
99     &macio_nvram_writeb,
100 };
101
102 static CPUReadMemoryFunc *nvram_read[] = {
103     &macio_nvram_readb,
104     &macio_nvram_readb,
105     &macio_nvram_readb,
106 };
107
108 static void macio_nvram_save(QEMUFile *f, void *opaque)
109 {
110     MacIONVRAMState *s = (MacIONVRAMState *)opaque;
111
112     qemu_put_buffer(f, s->data, s->size);
113 }
114
115 static int macio_nvram_load(QEMUFile *f, void *opaque, int version_id)
116 {
117     MacIONVRAMState *s = (MacIONVRAMState *)opaque;
118
119     if (version_id != 1)
120         return -EINVAL;
121
122     qemu_get_buffer(f, s->data, s->size);
123
124     return 0;
125 }
126
127 static void macio_nvram_reset(void *opaque)
128 {
129 }
130
131 MacIONVRAMState *macio_nvram_init (int *mem_index, target_phys_addr_t size,
132                                    unsigned int it_shift)
133 {
134     MacIONVRAMState *s;
135
136     s = qemu_mallocz(sizeof(MacIONVRAMState));
137     s->data = qemu_mallocz(size);
138     s->size = size;
139     s->it_shift = it_shift;
140
141     s->mem_index = cpu_register_io_memory(0, nvram_read, nvram_write, s);
142     *mem_index = s->mem_index;
143     register_savevm("macio_nvram", -1, 1, macio_nvram_save, macio_nvram_load,
144                     s);
145     qemu_register_reset(macio_nvram_reset, 0, s);
146     macio_nvram_reset(s);
147
148     return s;
149 }
150
151 void macio_nvram_map (void *opaque, target_phys_addr_t mem_base)
152 {
153     MacIONVRAMState *s;
154
155     s = opaque;
156     cpu_register_physical_memory(mem_base, s->size << s->it_shift,
157                                  s->mem_index);
158 }
159
160 /* Set up a system OpenBIOS NVRAM partition */
161 void pmac_format_nvram_partition (MacIONVRAMState *nvr, int len)
162 {
163     unsigned int i;
164     uint32_t start = 0, end;
165     struct OpenBIOS_nvpart_v1 *part_header;
166
167     // OpenBIOS nvram variables
168     // Variable partition
169     part_header = (struct OpenBIOS_nvpart_v1 *)nvr->data;
170     part_header->signature = OPENBIOS_PART_SYSTEM;
171     pstrcpy(part_header->name, sizeof(part_header->name), "system");
172
173     end = start + sizeof(struct OpenBIOS_nvpart_v1);
174     for (i = 0; i < nb_prom_envs; i++)
175         end = OpenBIOS_set_var(nvr->data, end, prom_envs[i]);
176
177     // End marker
178     nvr->data[end++] = '\0';
179
180     end = start + ((end - start + 15) & ~15);
181     /* XXX: OpenBIOS is not able to grow up a partition. Leave some space for
182        new variables. */
183     if (end < DEF_SYSTEM_SIZE)
184         end = DEF_SYSTEM_SIZE;
185     OpenBIOS_finish_partition(part_header, end - start);
186
187     // free partition
188     start = end;
189     part_header = (struct OpenBIOS_nvpart_v1 *)&nvr->data[start];
190     part_header->signature = OPENBIOS_PART_FREE;
191     pstrcpy(part_header->name, sizeof(part_header->name), "free");
192
193     end = len;
194     OpenBIOS_finish_partition(part_header, end - start);
195 }