]>
Commit | Line | Data |
---|---|---|
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 "char/char.h" | |
28 | #include "sysemu/sysemu.h" | |
29 | #include "boards.h" | |
30 | #include "loader.h" | |
31 | #include "elf.h" | |
32 | #include "trace.h" | |
33 | #include "exec/address-spaces.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(QEMUMachineInitArgs *args) | |
98 | { | |
99 | ram_addr_t ram_size = args->ram_size; | |
100 | const char *cpu_model = args->cpu_model; | |
101 | const char *kernel_filename = args->kernel_filename; | |
102 | SPARCCPU *cpu; | |
103 | CPUSPARCState *env; | |
104 | MemoryRegion *address_space_mem = get_system_memory(); | |
105 | MemoryRegion *ram = g_new(MemoryRegion, 1); | |
106 | MemoryRegion *prom = g_new(MemoryRegion, 1); | |
107 | int ret; | |
108 | char *filename; | |
109 | qemu_irq *cpu_irqs = NULL; | |
110 | int bios_size; | |
111 | int prom_size; | |
112 | ResetData *reset_info; | |
113 | ||
114 | /* Init CPU */ | |
115 | if (!cpu_model) { | |
116 | cpu_model = "LEON3"; | |
117 | } | |
118 | ||
119 | cpu = cpu_sparc_init(cpu_model); | |
120 | if (cpu == NULL) { | |
121 | fprintf(stderr, "qemu: Unable to find Sparc CPU definition\n"); | |
122 | exit(1); | |
123 | } | |
124 | env = &cpu->env; | |
125 | ||
126 | cpu_sparc_set_id(env, 0); | |
127 | ||
128 | /* Reset data */ | |
129 | reset_info = g_malloc0(sizeof(ResetData)); | |
130 | reset_info->cpu = cpu; | |
131 | qemu_register_reset(main_cpu_reset, reset_info); | |
132 | ||
133 | /* Allocate IRQ manager */ | |
134 | grlib_irqmp_create(0x80000200, env, &cpu_irqs, MAX_PILS, &leon3_set_pil_in); | |
135 | ||
136 | env->qemu_irq_ack = leon3_irq_manager; | |
137 | ||
138 | /* Allocate RAM */ | |
139 | if ((uint64_t)ram_size > (1UL << 30)) { | |
140 | fprintf(stderr, | |
141 | "qemu: Too much memory for this machine: %d, maximum 1G\n", | |
142 | (unsigned int)(ram_size / (1024 * 1024))); | |
143 | exit(1); | |
144 | } | |
145 | ||
146 | memory_region_init_ram(ram, "leon3.ram", ram_size); | |
147 | vmstate_register_ram_global(ram); | |
148 | memory_region_add_subregion(address_space_mem, 0x40000000, ram); | |
149 | ||
150 | /* Allocate BIOS */ | |
151 | prom_size = 8 * 1024 * 1024; /* 8Mb */ | |
152 | memory_region_init_ram(prom, "Leon3.bios", prom_size); | |
153 | vmstate_register_ram_global(prom); | |
154 | memory_region_set_readonly(prom, true); | |
155 | memory_region_add_subregion(address_space_mem, 0x00000000, prom); | |
156 | ||
157 | /* Load boot prom */ | |
158 | if (bios_name == NULL) { | |
159 | bios_name = PROM_FILENAME; | |
160 | } | |
161 | filename = qemu_find_file(QEMU_FILE_TYPE_BIOS, bios_name); | |
162 | ||
163 | bios_size = get_image_size(filename); | |
164 | ||
165 | if (bios_size > prom_size) { | |
166 | fprintf(stderr, "qemu: could not load prom '%s': file too big\n", | |
167 | filename); | |
168 | exit(1); | |
169 | } | |
170 | ||
171 | if (bios_size > 0) { | |
172 | ret = load_image_targphys(filename, 0x00000000, bios_size); | |
173 | if (ret < 0 || ret > prom_size) { | |
174 | fprintf(stderr, "qemu: could not load prom '%s'\n", filename); | |
175 | exit(1); | |
176 | } | |
177 | } else if (kernel_filename == NULL) { | |
178 | fprintf(stderr, "Can't read bios image %s\n", filename); | |
179 | exit(1); | |
180 | } | |
181 | ||
182 | /* Can directly load an application. */ | |
183 | if (kernel_filename != NULL) { | |
184 | long kernel_size; | |
185 | uint64_t entry; | |
186 | ||
187 | kernel_size = load_elf(kernel_filename, NULL, NULL, &entry, NULL, NULL, | |
188 | 1 /* big endian */, ELF_MACHINE, 0); | |
189 | if (kernel_size < 0) { | |
190 | fprintf(stderr, "qemu: could not load kernel '%s'\n", | |
191 | kernel_filename); | |
192 | exit(1); | |
193 | } | |
194 | if (bios_size <= 0) { | |
195 | /* If there is no bios/monitor, start the application. */ | |
196 | env->pc = entry; | |
197 | env->npc = entry + 4; | |
198 | reset_info->entry = entry; | |
199 | } | |
200 | } | |
201 | ||
202 | /* Allocate timers */ | |
203 | grlib_gptimer_create(0x80000300, 2, CPU_CLK, cpu_irqs, 6); | |
204 | ||
205 | /* Allocate uart */ | |
206 | if (serial_hds[0]) { | |
207 | grlib_apbuart_create(0x80000100, serial_hds[0], cpu_irqs[3]); | |
208 | } | |
209 | } | |
210 | ||
211 | static QEMUMachine leon3_generic_machine = { | |
212 | .name = "leon3_generic", | |
213 | .desc = "Leon-3 generic", | |
214 | .init = leon3_generic_hw_init, | |
215 | }; | |
216 | ||
217 | static void leon3_machine_init(void) | |
218 | { | |
219 | qemu_register_machine(&leon3_generic_machine); | |
220 | } | |
221 | ||
222 | machine_init(leon3_machine_init); |