2 * Renesas SH7751R R2D-PLUS emulation
4 * Copyright (c) 2007 Magnus Damm
5 * Copyright (c) 2008 Paul Mundt
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:
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
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
33 #include "sh7750_regs.h"
36 #define SDRAM_BASE 0x0c000000 /* Physical location of SDRAM: Area 3 */
37 #define SDRAM_SIZE 0x04000000
39 #define SM501_VRAM_SIZE 0x800000
41 /* CONFIG_BOOT_LINK_OFFSET of Linux kernel */
42 #define LINUX_LOAD_OFFSET 0x800000
44 #define PA_IRLMSK 0x00
45 #define PA_POWOFF 0x30
46 #define PA_VERREG 0x32
47 #define PA_OUTPORT 0x36
78 PCI_INTD
, CF_IDE
, CF_CD
, PCI_INTC
, SM501
, KEY
, RTC_A
, RTC_T
,
79 SDCARD
, PCI_INTA
, PCI_INTB
, EXT
, TP
,
83 static const struct { short irl
; uint16_t msk
; } irqtab
[NR_IRQS
] = {
84 [CF_IDE
] = { 1, 1<<9 },
85 [CF_CD
] = { 2, 1<<8 },
86 [PCI_INTA
] = { 9, 1<<14 },
87 [PCI_INTB
] = { 10, 1<<13 },
88 [PCI_INTC
] = { 3, 1<<12 },
89 [PCI_INTD
] = { 0, 1<<11 },
90 [SM501
] = { 4, 1<<10 },
92 [RTC_A
] = { 6, 1<<5 },
93 [RTC_T
] = { 7, 1<<4 },
94 [SDCARD
] = { 8, 1<<7 },
99 static void update_irl(r2d_fpga_t
*fpga
)
102 for (i
= 0; i
< NR_IRQS
; i
++)
103 if (fpga
->irlmon
& fpga
->irlmsk
& irqtab
[i
].msk
)
104 if (irqtab
[i
].irl
< irl
)
106 qemu_set_irq(fpga
->irl
, irl
^ 15);
109 static void r2d_fpga_irq_set(void *opaque
, int n
, int level
)
111 r2d_fpga_t
*fpga
= opaque
;
113 fpga
->irlmon
|= irqtab
[n
].msk
;
115 fpga
->irlmon
&= ~irqtab
[n
].msk
;
119 static uint32_t r2d_fpga_read(void *opaque
, target_phys_addr_t addr
)
121 r2d_fpga_t
*s
= opaque
;
138 r2d_fpga_write(void *opaque
, target_phys_addr_t addr
, uint32_t value
)
140 r2d_fpga_t
*s
= opaque
;
159 static CPUReadMemoryFunc
* const r2d_fpga_readfn
[] = {
165 static CPUWriteMemoryFunc
* const r2d_fpga_writefn
[] = {
171 static qemu_irq
*r2d_fpga_init(target_phys_addr_t base
, qemu_irq irl
)
176 s
= qemu_mallocz(sizeof(r2d_fpga_t
));
180 iomemtype
= cpu_register_io_memory(r2d_fpga_readfn
,
181 r2d_fpga_writefn
, s
);
182 cpu_register_physical_memory(base
, 0x40, iomemtype
);
183 return qemu_allocate_irqs(r2d_fpga_irq_set
, s
, NR_IRQS
);
186 static void r2d_pci_set_irq(void *opaque
, int n
, int l
)
188 qemu_irq
*p
= opaque
;
190 qemu_set_irq(p
[n
], l
);
193 static int r2d_pci_map_irq(PCIDevice
*d
, int irq_num
)
195 const int intx
[] = { PCI_INTA
, PCI_INTB
, PCI_INTC
, PCI_INTD
};
196 return intx
[d
->devfn
>> 3];
199 static void r2d_init(ram_addr_t ram_size
,
200 const char *boot_device
,
201 const char *kernel_filename
, const char *kernel_cmdline
,
202 const char *initrd_filename
, const char *cpu_model
)
205 struct SH7750State
*s
;
206 ram_addr_t sdram_addr
;
213 cpu_model
= "SH7751R";
215 env
= cpu_init(cpu_model
);
217 fprintf(stderr
, "Unable to find CPU definition\n");
221 /* Allocate memory space */
222 sdram_addr
= qemu_ram_alloc(SDRAM_SIZE
);
223 cpu_register_physical_memory(SDRAM_BASE
, SDRAM_SIZE
, sdram_addr
);
224 /* Register peripherals */
225 s
= sh7750_init(env
);
226 irq
= r2d_fpga_init(0x04000000, sh7750_irl(s
));
227 pci
= sh_pci_register_bus(r2d_pci_set_irq
, r2d_pci_map_irq
, irq
, 0, 4);
229 sm501_init(0x10000000, SM501_VRAM_SIZE
, irq
[SM501
], serial_hds
[2]);
231 /* onboard CF (True IDE mode, Master only). */
232 if ((dinfo
= drive_get(IF_IDE
, 0, 0)) != NULL
)
233 mmio_ide_init(0x14001000, 0x1400080c, irq
[CF_IDE
], 1,
236 /* NIC: rtl8139 on-board, and 2 slots. */
237 for (i
= 0; i
< nb_nics
; i
++)
238 pci_nic_init(&nd_table
[i
], "rtl8139", i
==0 ? "2" : NULL
);
240 /* Todo: register on board registers */
241 if (kernel_filename
) {
243 /* initialization which should be done by firmware */
244 stl_phys(SH7750_BCR1
, 1<<3); /* cs3 SDRAM */
245 stw_phys(SH7750_BCR2
, 3<<(3*2)); /* cs3 32bit */
247 if (kernel_cmdline
) {
248 kernel_size
= load_image_targphys(kernel_filename
,
249 SDRAM_BASE
+ LINUX_LOAD_OFFSET
,
250 SDRAM_SIZE
- LINUX_LOAD_OFFSET
);
251 env
->pc
= (SDRAM_BASE
+ LINUX_LOAD_OFFSET
) | 0xa0000000;
252 pstrcpy_targphys(SDRAM_BASE
+ 0x10100, 256, kernel_cmdline
);
254 kernel_size
= load_image_targphys(kernel_filename
, SDRAM_BASE
, SDRAM_SIZE
);
255 env
->pc
= SDRAM_BASE
| 0xa0000000; /* Start from P2 area */
258 if (kernel_size
< 0) {
259 fprintf(stderr
, "qemu: could not load kernel '%s'\n", kernel_filename
);
265 static QEMUMachine r2d_machine
= {
267 .desc
= "r2d-plus board",
271 static void r2d_machine_init(void)
273 qemu_register_machine(&r2d_machine
);
276 machine_init(r2d_machine_init
);