root / hw / petalogix_s3adsp1800_mmu.c @ 0dad6c35
History | View | Annotate | Download (7.8 kB)
1 |
/*
|
---|---|
2 |
* Model of Petalogix linux reference design targeting Xilinx Spartan 3ADSP-1800
|
3 |
* boards.
|
4 |
*
|
5 |
* Copyright (c) 2009 Edgar E. Iglesias.
|
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 |
|
26 |
#include "sysbus.h" |
27 |
#include "hw.h" |
28 |
#include "net.h" |
29 |
#include "flash.h" |
30 |
#include "sysemu.h" |
31 |
#include "devices.h" |
32 |
#include "boards.h" |
33 |
#include "device_tree.h" |
34 |
#include "xilinx.h" |
35 |
#include "loader.h" |
36 |
#include "elf.h" |
37 |
#include "blockdev.h" |
38 |
#include "exec-memory.h" |
39 |
|
40 |
#include "microblaze_pic_cpu.h" |
41 |
|
42 |
#define LMB_BRAM_SIZE (128 * 1024) |
43 |
#define FLASH_SIZE (16 * 1024 * 1024) |
44 |
|
45 |
static struct |
46 |
{ |
47 |
uint32_t bootstrap_pc; |
48 |
uint32_t cmdline; |
49 |
uint32_t fdt; |
50 |
} boot_info; |
51 |
|
52 |
static void main_cpu_reset(void *opaque) |
53 |
{ |
54 |
CPUState *env = opaque; |
55 |
|
56 |
cpu_reset(env); |
57 |
env->regs[5] = boot_info.cmdline;
|
58 |
env->regs[7] = boot_info.fdt;
|
59 |
env->sregs[SR_PC] = boot_info.bootstrap_pc; |
60 |
} |
61 |
|
62 |
#define BINARY_DEVICE_TREE_FILE "petalogix-s3adsp1800.dtb" |
63 |
static int petalogix_load_device_tree(target_phys_addr_t addr, |
64 |
uint32_t ramsize, |
65 |
target_phys_addr_t initrd_base, |
66 |
target_phys_addr_t initrd_size, |
67 |
const char *kernel_cmdline) |
68 |
{ |
69 |
char *path;
|
70 |
int fdt_size;
|
71 |
#ifdef CONFIG_FDT
|
72 |
void *fdt;
|
73 |
int r;
|
74 |
|
75 |
/* Try the local "mb.dtb" override. */
|
76 |
fdt = load_device_tree("mb.dtb", &fdt_size);
|
77 |
if (!fdt) {
|
78 |
path = qemu_find_file(QEMU_FILE_TYPE_BIOS, BINARY_DEVICE_TREE_FILE); |
79 |
if (path) {
|
80 |
fdt = load_device_tree(path, &fdt_size); |
81 |
g_free(path); |
82 |
} |
83 |
if (!fdt)
|
84 |
return 0; |
85 |
} |
86 |
|
87 |
r = qemu_devtree_setprop_string(fdt, "/chosen", "bootargs", kernel_cmdline); |
88 |
if (r < 0) |
89 |
fprintf(stderr, "couldn't set /chosen/bootargs\n");
|
90 |
cpu_physical_memory_write (addr, (void *)fdt, fdt_size);
|
91 |
#else
|
92 |
/* We lack libfdt so we cannot manipulate the fdt. Just pass on the blob
|
93 |
to the kernel. */
|
94 |
fdt_size = load_image_targphys("mb.dtb", addr, 0x10000); |
95 |
if (fdt_size < 0) { |
96 |
path = qemu_find_file(QEMU_FILE_TYPE_BIOS, BINARY_DEVICE_TREE_FILE); |
97 |
if (path) {
|
98 |
fdt_size = load_image_targphys(path, addr, 0x10000);
|
99 |
g_free(path); |
100 |
} |
101 |
} |
102 |
|
103 |
if (kernel_cmdline) {
|
104 |
fprintf(stderr, |
105 |
"Warning: missing libfdt, cannot pass cmdline to kernel!\n");
|
106 |
} |
107 |
#endif
|
108 |
return fdt_size;
|
109 |
} |
110 |
|
111 |
static uint64_t translate_kernel_address(void *opaque, uint64_t addr) |
112 |
{ |
113 |
return addr - 0x30000000LL; |
114 |
} |
115 |
|
116 |
static void |
117 |
petalogix_s3adsp1800_init(ram_addr_t ram_size, |
118 |
const char *boot_device, |
119 |
const char *kernel_filename, |
120 |
const char *kernel_cmdline, |
121 |
const char *initrd_filename, const char *cpu_model) |
122 |
{ |
123 |
DeviceState *dev; |
124 |
CPUState *env; |
125 |
int kernel_size;
|
126 |
DriveInfo *dinfo; |
127 |
int i;
|
128 |
target_phys_addr_t ddr_base = 0x90000000;
|
129 |
MemoryRegion *phys_lmb_bram = g_new(MemoryRegion, 1);
|
130 |
MemoryRegion *phys_ram = g_new(MemoryRegion, 1);
|
131 |
qemu_irq irq[32], *cpu_irq;
|
132 |
MemoryRegion *sysmem = get_system_memory(); |
133 |
|
134 |
/* init CPUs */
|
135 |
if (cpu_model == NULL) { |
136 |
cpu_model = "microblaze";
|
137 |
} |
138 |
env = cpu_init(cpu_model); |
139 |
|
140 |
env->pvr.regs[10] = 0x0c000000; /* spartan 3a dsp family. */ |
141 |
qemu_register_reset(main_cpu_reset, env); |
142 |
|
143 |
/* Attach emulated BRAM through the LMB. */
|
144 |
memory_region_init_ram(phys_lmb_bram, |
145 |
"petalogix_s3adsp1800.lmb_bram", LMB_BRAM_SIZE);
|
146 |
vmstate_register_ram_global(phys_lmb_bram); |
147 |
memory_region_add_subregion(sysmem, 0x00000000, phys_lmb_bram);
|
148 |
|
149 |
memory_region_init_ram(phys_ram, "petalogix_s3adsp1800.ram", ram_size);
|
150 |
vmstate_register_ram_global(phys_ram); |
151 |
memory_region_add_subregion(sysmem, ddr_base, phys_ram); |
152 |
|
153 |
dinfo = drive_get(IF_PFLASH, 0, 0); |
154 |
pflash_cfi01_register(0xa0000000,
|
155 |
NULL, "petalogix_s3adsp1800.flash", FLASH_SIZE, |
156 |
dinfo ? dinfo->bdrv : NULL, (64 * 1024), |
157 |
FLASH_SIZE >> 16,
|
158 |
1, 0x89, 0x18, 0x0000, 0x0, 1); |
159 |
|
160 |
cpu_irq = microblaze_pic_init_cpu(env); |
161 |
dev = xilinx_intc_create(0x81800000, cpu_irq[0], 2); |
162 |
for (i = 0; i < 32; i++) { |
163 |
irq[i] = qdev_get_gpio_in(dev, i); |
164 |
} |
165 |
|
166 |
sysbus_create_simple("xilinx,uartlite", 0x84000000, irq[3]); |
167 |
/* 2 timers at irq 2 @ 62 Mhz. */
|
168 |
xilinx_timer_create(0x83c00000, irq[0], 2, 62 * 1000000); |
169 |
xilinx_ethlite_create(&nd_table[0], 0x81000000, irq[1], 0, 0); |
170 |
|
171 |
if (kernel_filename) {
|
172 |
uint64_t entry, low, high; |
173 |
uint32_t base32; |
174 |
int big_endian = 0; |
175 |
|
176 |
#ifdef TARGET_WORDS_BIGENDIAN
|
177 |
big_endian = 1;
|
178 |
#endif
|
179 |
|
180 |
/* Boots a kernel elf binary. */
|
181 |
kernel_size = load_elf(kernel_filename, NULL, NULL, |
182 |
&entry, &low, &high, |
183 |
big_endian, ELF_MACHINE, 0);
|
184 |
base32 = entry; |
185 |
if (base32 == 0xc0000000) { |
186 |
kernel_size = load_elf(kernel_filename, translate_kernel_address, |
187 |
NULL, &entry, NULL, NULL, |
188 |
big_endian, ELF_MACHINE, 0);
|
189 |
} |
190 |
/* Always boot into physical ram. */
|
191 |
boot_info.bootstrap_pc = ddr_base + (entry & 0x0fffffff);
|
192 |
|
193 |
/* If it wasn't an ELF image, try an u-boot image. */
|
194 |
if (kernel_size < 0) { |
195 |
target_phys_addr_t uentry, loadaddr; |
196 |
|
197 |
kernel_size = load_uimage(kernel_filename, &uentry, &loadaddr, 0);
|
198 |
boot_info.bootstrap_pc = uentry; |
199 |
high = (loadaddr + kernel_size + 3) & ~3; |
200 |
} |
201 |
|
202 |
/* Not an ELF image nor an u-boot image, try a RAW image. */
|
203 |
if (kernel_size < 0) { |
204 |
kernel_size = load_image_targphys(kernel_filename, ddr_base, |
205 |
ram_size); |
206 |
boot_info.bootstrap_pc = ddr_base; |
207 |
high = (ddr_base + kernel_size + 3) & ~3; |
208 |
} |
209 |
|
210 |
boot_info.cmdline = high + 4096;
|
211 |
if (kernel_cmdline && strlen(kernel_cmdline)) {
|
212 |
pstrcpy_targphys("cmdline", boot_info.cmdline, 256, kernel_cmdline); |
213 |
} |
214 |
/* Provide a device-tree. */
|
215 |
boot_info.fdt = boot_info.cmdline + 4096;
|
216 |
petalogix_load_device_tree(boot_info.fdt, ram_size, |
217 |
0, 0, |
218 |
kernel_cmdline); |
219 |
} |
220 |
} |
221 |
|
222 |
static QEMUMachine petalogix_s3adsp1800_machine = {
|
223 |
.name = "petalogix-s3adsp1800",
|
224 |
.desc = "PetaLogix linux refdesign for xilinx Spartan 3ADSP1800",
|
225 |
.init = petalogix_s3adsp1800_init, |
226 |
.is_default = 1
|
227 |
}; |
228 |
|
229 |
static void petalogix_s3adsp1800_machine_init(void) |
230 |
{ |
231 |
qemu_register_machine(&petalogix_s3adsp1800_machine); |
232 |
} |
233 |
|
234 |
machine_init(petalogix_s3adsp1800_machine_init); |