root / hw / leon3.c @ da665c99
History | View | Annotate | Download (6.7 kB)
1 |
/*
|
---|---|
2 |
* QEMU Leon3 System Emulator
|
3 |
*
|
4 |
* Copyright (c) 2010-2011 AdaCore
|
5 |
*
|
6 |
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
7 |
* of this software and associated documentation files (the "Software"), to deal
|
8 |
* in the Software without restriction, including without limitation the rights
|
9 |
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10 |
* copies of the Software, and to permit persons to whom the Software is
|
11 |
* furnished to do so, subject to the following conditions:
|
12 |
*
|
13 |
* The above copyright notice and this permission notice shall be included in
|
14 |
* all copies or substantial portions of the Software.
|
15 |
*
|
16 |
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17 |
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18 |
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
19 |
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20 |
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21 |
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22 |
* THE SOFTWARE.
|
23 |
*/
|
24 |
#include "hw.h" |
25 |
#include "qemu-timer.h" |
26 |
#include "ptimer.h" |
27 |
#include "qemu-char.h" |
28 |
#include "sysemu.h" |
29 |
#include "boards.h" |
30 |
#include "loader.h" |
31 |
#include "elf.h" |
32 |
#include "trace.h" |
33 |
#include "exec-memory.h" |
34 |
|
35 |
#include "grlib.h" |
36 |
|
37 |
/* Default system clock. */
|
38 |
#define CPU_CLK (40 * 1000 * 1000) |
39 |
|
40 |
#define PROM_FILENAME "u-boot.bin" |
41 |
|
42 |
#define MAX_PILS 16 |
43 |
|
44 |
typedef struct ResetData { |
45 |
SPARCCPU *cpu; |
46 |
uint32_t entry; /* save kernel entry in case of reset */
|
47 |
} ResetData; |
48 |
|
49 |
static void main_cpu_reset(void *opaque) |
50 |
{ |
51 |
ResetData *s = (ResetData *)opaque; |
52 |
CPUSPARCState *env = &s->cpu->env; |
53 |
|
54 |
cpu_reset(CPU(s->cpu)); |
55 |
|
56 |
env->halted = 0;
|
57 |
env->pc = s->entry; |
58 |
env->npc = s->entry + 4;
|
59 |
} |
60 |
|
61 |
void leon3_irq_ack(void *irq_manager, int intno) |
62 |
{ |
63 |
grlib_irqmp_ack((DeviceState *)irq_manager, intno); |
64 |
} |
65 |
|
66 |
static void leon3_set_pil_in(void *opaque, uint32_t pil_in) |
67 |
{ |
68 |
CPUSPARCState *env = (CPUSPARCState *)opaque; |
69 |
|
70 |
assert(env != NULL);
|
71 |
|
72 |
env->pil_in = pil_in; |
73 |
|
74 |
if (env->pil_in && (env->interrupt_index == 0 || |
75 |
(env->interrupt_index & ~15) == TT_EXTINT)) {
|
76 |
unsigned int i; |
77 |
|
78 |
for (i = 15; i > 0; i--) { |
79 |
if (env->pil_in & (1 << i)) { |
80 |
int old_interrupt = env->interrupt_index;
|
81 |
|
82 |
env->interrupt_index = TT_EXTINT | i; |
83 |
if (old_interrupt != env->interrupt_index) {
|
84 |
trace_leon3_set_irq(i); |
85 |
cpu_interrupt(env, CPU_INTERRUPT_HARD); |
86 |
} |
87 |
break;
|
88 |
} |
89 |
} |
90 |
} else if (!env->pil_in && (env->interrupt_index & ~15) == TT_EXTINT) { |
91 |
trace_leon3_reset_irq(env->interrupt_index & 15);
|
92 |
env->interrupt_index = 0;
|
93 |
cpu_reset_interrupt(env, CPU_INTERRUPT_HARD); |
94 |
} |
95 |
} |
96 |
|
97 |
static void leon3_generic_hw_init(ram_addr_t ram_size, |
98 |
const char *boot_device, |
99 |
const char *kernel_filename, |
100 |
const char *kernel_cmdline, |
101 |
const char *initrd_filename, |
102 |
const char *cpu_model) |
103 |
{ |
104 |
SPARCCPU *cpu; |
105 |
CPUSPARCState *env; |
106 |
MemoryRegion *address_space_mem = get_system_memory(); |
107 |
MemoryRegion *ram = g_new(MemoryRegion, 1);
|
108 |
MemoryRegion *prom = g_new(MemoryRegion, 1);
|
109 |
int ret;
|
110 |
char *filename;
|
111 |
qemu_irq *cpu_irqs = NULL;
|
112 |
int bios_size;
|
113 |
int prom_size;
|
114 |
ResetData *reset_info; |
115 |
|
116 |
/* Init CPU */
|
117 |
if (!cpu_model) {
|
118 |
cpu_model = "LEON3";
|
119 |
} |
120 |
|
121 |
cpu = cpu_sparc_init(cpu_model); |
122 |
if (cpu == NULL) { |
123 |
fprintf(stderr, "qemu: Unable to find Sparc CPU definition\n");
|
124 |
exit(1);
|
125 |
} |
126 |
env = &cpu->env; |
127 |
|
128 |
cpu_sparc_set_id(env, 0);
|
129 |
|
130 |
/* Reset data */
|
131 |
reset_info = g_malloc0(sizeof(ResetData));
|
132 |
reset_info->cpu = cpu; |
133 |
qemu_register_reset(main_cpu_reset, reset_info); |
134 |
|
135 |
/* Allocate IRQ manager */
|
136 |
grlib_irqmp_create(0x80000200, env, &cpu_irqs, MAX_PILS, &leon3_set_pil_in);
|
137 |
|
138 |
env->qemu_irq_ack = leon3_irq_manager; |
139 |
|
140 |
/* Allocate RAM */
|
141 |
if ((uint64_t)ram_size > (1UL << 30)) { |
142 |
fprintf(stderr, |
143 |
"qemu: Too much memory for this machine: %d, maximum 1G\n",
|
144 |
(unsigned int)(ram_size / (1024 * 1024))); |
145 |
exit(1);
|
146 |
} |
147 |
|
148 |
memory_region_init_ram(ram, "leon3.ram", ram_size);
|
149 |
vmstate_register_ram_global(ram); |
150 |
memory_region_add_subregion(address_space_mem, 0x40000000, ram);
|
151 |
|
152 |
/* Allocate BIOS */
|
153 |
prom_size = 8 * 1024 * 1024; /* 8Mb */ |
154 |
memory_region_init_ram(prom, "Leon3.bios", prom_size);
|
155 |
vmstate_register_ram_global(prom); |
156 |
memory_region_set_readonly(prom, true);
|
157 |
memory_region_add_subregion(address_space_mem, 0x00000000, prom);
|
158 |
|
159 |
/* Load boot prom */
|
160 |
if (bios_name == NULL) { |
161 |
bios_name = PROM_FILENAME; |
162 |
} |
163 |
filename = qemu_find_file(QEMU_FILE_TYPE_BIOS, bios_name); |
164 |
|
165 |
bios_size = get_image_size(filename); |
166 |
|
167 |
if (bios_size > prom_size) {
|
168 |
fprintf(stderr, "qemu: could not load prom '%s': file too big\n",
|
169 |
filename); |
170 |
exit(1);
|
171 |
} |
172 |
|
173 |
if (bios_size > 0) { |
174 |
ret = load_image_targphys(filename, 0x00000000, bios_size);
|
175 |
if (ret < 0 || ret > prom_size) { |
176 |
fprintf(stderr, "qemu: could not load prom '%s'\n", filename);
|
177 |
exit(1);
|
178 |
} |
179 |
} else if (kernel_filename == NULL) { |
180 |
fprintf(stderr, "Can't read bios image %s\n", filename);
|
181 |
exit(1);
|
182 |
} |
183 |
|
184 |
/* Can directly load an application. */
|
185 |
if (kernel_filename != NULL) { |
186 |
long kernel_size;
|
187 |
uint64_t entry; |
188 |
|
189 |
kernel_size = load_elf(kernel_filename, NULL, NULL, &entry, NULL, NULL, |
190 |
1 /* big endian */, ELF_MACHINE, 0); |
191 |
if (kernel_size < 0) { |
192 |
fprintf(stderr, "qemu: could not load kernel '%s'\n",
|
193 |
kernel_filename); |
194 |
exit(1);
|
195 |
} |
196 |
if (bios_size <= 0) { |
197 |
/* If there is no bios/monitor, start the application. */
|
198 |
env->pc = entry; |
199 |
env->npc = entry + 4;
|
200 |
reset_info->entry = entry; |
201 |
} |
202 |
} |
203 |
|
204 |
/* Allocate timers */
|
205 |
grlib_gptimer_create(0x80000300, 2, CPU_CLK, cpu_irqs, 6); |
206 |
|
207 |
/* Allocate uart */
|
208 |
if (serial_hds[0]) { |
209 |
grlib_apbuart_create(0x80000100, serial_hds[0], cpu_irqs[3]); |
210 |
} |
211 |
} |
212 |
|
213 |
static QEMUMachine leon3_generic_machine = {
|
214 |
.name = "leon3_generic",
|
215 |
.desc = "Leon-3 generic",
|
216 |
.init = leon3_generic_hw_init, |
217 |
.use_scsi = 0,
|
218 |
}; |
219 |
|
220 |
static void leon3_machine_init(void) |
221 |
{ |
222 |
qemu_register_machine(&leon3_generic_machine); |
223 |
} |
224 |
|
225 |
machine_init(leon3_machine_init); |