2 * QEMU PPC PREP hardware System Emulator
4 * Copyright (c) 2003-2007 Jocelyn Mayer
5 * Copyright (c) 2017 Hervé Poussineau
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
26 #include "qemu/osdep.h"
27 #include "hw/rtc/m48t59.h"
28 #include "hw/char/serial.h"
29 #include "hw/block/fdc.h"
31 #include "hw/isa/isa.h"
32 #include "hw/pci/pci.h"
33 #include "hw/pci/pci_host.h"
34 #include "hw/ppc/ppc.h"
35 #include "hw/boards.h"
36 #include "qapi/error.h"
37 #include "qemu/error-report.h"
39 #include "hw/loader.h"
40 #include "hw/rtc/mc146818rtc.h"
41 #include "hw/isa/pc87312.h"
42 #include "hw/qdev-properties.h"
43 #include "sysemu/arch_init.h"
44 #include "sysemu/kvm.h"
45 #include "sysemu/reset.h"
46 #include "exec/address-spaces.h"
49 #include "qemu/units.h"
52 /* SMP is not enabled, for now */
57 #define CFG_ADDR 0xf0000510
59 #define KERNEL_LOAD_ADDR 0x01000000
60 #define INITRD_LOAD_ADDR 0x01800000
62 #define NVRAM_SIZE 0x2000
64 static void fw_cfg_boot_set(void *opaque
, const char *boot_device
,
67 fw_cfg_modify_i16(opaque
, FW_CFG_BOOT_DEVICE
, boot_device
[0]);
70 static void ppc_prep_reset(void *opaque
)
72 PowerPCCPU
*cpu
= opaque
;
78 /*****************************************************************************/
80 static inline uint32_t nvram_read(Nvram
*nvram
, uint32_t addr
)
82 NvramClass
*k
= NVRAM_GET_CLASS(nvram
);
83 return (k
->read
)(nvram
, addr
);
86 static inline void nvram_write(Nvram
*nvram
, uint32_t addr
, uint32_t val
)
88 NvramClass
*k
= NVRAM_GET_CLASS(nvram
);
89 (k
->write
)(nvram
, addr
, val
);
92 static void NVRAM_set_byte(Nvram
*nvram
, uint32_t addr
, uint8_t value
)
94 nvram_write(nvram
, addr
, value
);
97 static uint8_t NVRAM_get_byte(Nvram
*nvram
, uint32_t addr
)
99 return nvram_read(nvram
, addr
);
102 static void NVRAM_set_word(Nvram
*nvram
, uint32_t addr
, uint16_t value
)
104 nvram_write(nvram
, addr
, value
>> 8);
105 nvram_write(nvram
, addr
+ 1, value
& 0xFF);
108 static uint16_t NVRAM_get_word(Nvram
*nvram
, uint32_t addr
)
112 tmp
= nvram_read(nvram
, addr
) << 8;
113 tmp
|= nvram_read(nvram
, addr
+ 1);
118 static void NVRAM_set_lword(Nvram
*nvram
, uint32_t addr
, uint32_t value
)
120 nvram_write(nvram
, addr
, value
>> 24);
121 nvram_write(nvram
, addr
+ 1, (value
>> 16) & 0xFF);
122 nvram_write(nvram
, addr
+ 2, (value
>> 8) & 0xFF);
123 nvram_write(nvram
, addr
+ 3, value
& 0xFF);
126 static void NVRAM_set_string(Nvram
*nvram
, uint32_t addr
, const char *str
,
131 for (i
= 0; i
< max
&& str
[i
] != '\0'; i
++) {
132 nvram_write(nvram
, addr
+ i
, str
[i
]);
134 nvram_write(nvram
, addr
+ i
, str
[i
]);
135 nvram_write(nvram
, addr
+ max
- 1, '\0');
138 static uint16_t NVRAM_crc_update (uint16_t prev
, uint16_t value
)
141 uint16_t pd
, pd1
, pd2
;
146 pd2
= ((pd
>> 4) & 0x000F) ^ pd1
;
147 tmp
^= (pd1
<< 3) | (pd1
<< 8);
148 tmp
^= pd2
| (pd2
<< 7) | (pd2
<< 12);
153 static uint16_t NVRAM_compute_crc (Nvram
*nvram
, uint32_t start
, uint32_t count
)
156 uint16_t crc
= 0xFFFF;
161 for (i
= 0; i
!= count
; i
++) {
162 crc
= NVRAM_crc_update(crc
, NVRAM_get_word(nvram
, start
+ i
));
165 crc
= NVRAM_crc_update(crc
, NVRAM_get_byte(nvram
, start
+ i
) << 8);
171 #define CMDLINE_ADDR 0x017ff000
173 static int PPC_NVRAM_set_params (Nvram
*nvram
, uint16_t NVRAM_size
,
175 uint32_t RAM_size
, int boot_device
,
176 uint32_t kernel_image
, uint32_t kernel_size
,
178 uint32_t initrd_image
, uint32_t initrd_size
,
179 uint32_t NVRAM_image
,
180 int width
, int height
, int depth
)
184 /* Set parameters for Open Hack'Ware BIOS */
185 NVRAM_set_string(nvram
, 0x00, "QEMU_BIOS", 16);
186 NVRAM_set_lword(nvram
, 0x10, 0x00000002); /* structure v2 */
187 NVRAM_set_word(nvram
, 0x14, NVRAM_size
);
188 NVRAM_set_string(nvram
, 0x20, arch
, 16);
189 NVRAM_set_lword(nvram
, 0x30, RAM_size
);
190 NVRAM_set_byte(nvram
, 0x34, boot_device
);
191 NVRAM_set_lword(nvram
, 0x38, kernel_image
);
192 NVRAM_set_lword(nvram
, 0x3C, kernel_size
);
194 /* XXX: put the cmdline in NVRAM too ? */
195 pstrcpy_targphys("cmdline", CMDLINE_ADDR
, RAM_size
- CMDLINE_ADDR
,
197 NVRAM_set_lword(nvram
, 0x40, CMDLINE_ADDR
);
198 NVRAM_set_lword(nvram
, 0x44, strlen(cmdline
));
200 NVRAM_set_lword(nvram
, 0x40, 0);
201 NVRAM_set_lword(nvram
, 0x44, 0);
203 NVRAM_set_lword(nvram
, 0x48, initrd_image
);
204 NVRAM_set_lword(nvram
, 0x4C, initrd_size
);
205 NVRAM_set_lword(nvram
, 0x50, NVRAM_image
);
207 NVRAM_set_word(nvram
, 0x54, width
);
208 NVRAM_set_word(nvram
, 0x56, height
);
209 NVRAM_set_word(nvram
, 0x58, depth
);
210 crc
= NVRAM_compute_crc(nvram
, 0x00, 0xF8);
211 NVRAM_set_word(nvram
, 0xFC, crc
);
216 static int prep_set_cmos_checksum(DeviceState
*dev
, void *opaque
)
218 uint16_t checksum
= *(uint16_t *)opaque
;
221 if (object_dynamic_cast(OBJECT(dev
), TYPE_MC146818_RTC
)) {
222 rtc
= ISA_DEVICE(dev
);
223 rtc_set_memory(rtc
, 0x2e, checksum
& 0xff);
224 rtc_set_memory(rtc
, 0x3e, checksum
& 0xff);
225 rtc_set_memory(rtc
, 0x2f, checksum
>> 8);
226 rtc_set_memory(rtc
, 0x3f, checksum
>> 8);
228 object_property_add_alias(qdev_get_machine(), "rtc-time", OBJECT(rtc
),
234 static void ibm_40p_init(MachineState
*machine
)
236 const char *bios_name
= machine
->firmware
?: "openbios-ppc";
237 CPUPPCState
*env
= NULL
;
238 uint16_t cmos_checksum
;
240 DeviceState
*dev
, *i82378_dev
;
241 SysBusDevice
*pcihost
, *s
;
242 Nvram
*m48t59
= NULL
;
248 uint32_t kernel_base
= 0, initrd_base
= 0;
249 long kernel_size
= 0, initrd_size
= 0;
253 cpu
= POWERPC_CPU(cpu_create(machine
->cpu_type
));
255 if (PPC_INPUT(env
) != PPC_FLAGS_INPUT_6xx
) {
256 error_report("only 6xx bus is supported on this machine");
260 if (env
->flags
& POWERPC_FLAG_RTC_CLK
) {
261 /* POWER / PowerPC 601 RTC clock frequency is 7.8125 MHz */
262 cpu_ppc_tb_init(env
, 7812500UL);
264 /* Set time-base frequency to 100 Mhz */
265 cpu_ppc_tb_init(env
, 100UL * 1000UL * 1000UL);
267 qemu_register_reset(ppc_prep_reset
, cpu
);
270 dev
= qdev_new("raven-pcihost");
271 qdev_prop_set_string(dev
, "bios-name", bios_name
);
272 qdev_prop_set_uint32(dev
, "elf-machine", PPC_ELF_MACHINE
);
273 pcihost
= SYS_BUS_DEVICE(dev
);
274 object_property_add_child(qdev_get_machine(), "raven", OBJECT(dev
));
275 sysbus_realize_and_unref(pcihost
, &error_fatal
);
276 pci_bus
= PCI_BUS(qdev_get_child_bus(dev
, "pci.0"));
278 error_report("could not create PCI host controller");
282 /* PCI -> ISA bridge */
283 i82378_dev
= DEVICE(pci_create_simple(pci_bus
, PCI_DEVFN(11, 0), "i82378"));
284 qdev_connect_gpio_out(i82378_dev
, 0,
285 cpu
->env
.irq_inputs
[PPC6xx_INPUT_INT
]);
286 sysbus_connect_irq(pcihost
, 0, qdev_get_gpio_in(i82378_dev
, 15));
287 isa_bus
= ISA_BUS(qdev_get_child_bus(i82378_dev
, "isa.0"));
289 /* Memory controller */
290 isa_dev
= isa_new("rs6000-mc");
291 dev
= DEVICE(isa_dev
);
292 qdev_prop_set_uint32(dev
, "ram-size", machine
->ram_size
);
293 isa_realize_and_unref(isa_dev
, isa_bus
, &error_fatal
);
296 isa_dev
= isa_new(TYPE_MC146818_RTC
);
297 dev
= DEVICE(isa_dev
);
298 qdev_prop_set_int32(dev
, "base_year", 1900);
299 isa_realize_and_unref(isa_dev
, isa_bus
, &error_fatal
);
301 /* initialize CMOS checksums */
302 cmos_checksum
= 0x6aa9;
303 qbus_walk_children(BUS(isa_bus
), prep_set_cmos_checksum
, NULL
, NULL
, NULL
,
306 /* add some more devices */
307 if (defaults_enabled()) {
308 m48t59
= NVRAM(isa_create_simple(isa_bus
, "isa-m48t59"));
310 isa_dev
= isa_new("cs4231a");
311 dev
= DEVICE(isa_dev
);
312 qdev_prop_set_uint32(dev
, "iobase", 0x830);
313 qdev_prop_set_uint32(dev
, "irq", 10);
314 isa_realize_and_unref(isa_dev
, isa_bus
, &error_fatal
);
316 isa_dev
= isa_new("pc87312");
317 dev
= DEVICE(isa_dev
);
318 qdev_prop_set_uint32(dev
, "config", 12);
319 isa_realize_and_unref(isa_dev
, isa_bus
, &error_fatal
);
321 isa_dev
= isa_new("prep-systemio");
322 dev
= DEVICE(isa_dev
);
323 qdev_prop_set_uint32(dev
, "ibm-planar-id", 0xfc);
324 qdev_prop_set_uint32(dev
, "equipment", 0xc0);
325 isa_realize_and_unref(isa_dev
, isa_bus
, &error_fatal
);
327 dev
= DEVICE(pci_create_simple(pci_bus
, PCI_DEVFN(1, 0),
329 lsi53c8xx_handle_legacy_cmdline(dev
);
330 qdev_connect_gpio_out(dev
, 0, qdev_get_gpio_in(i82378_dev
, 13));
332 /* XXX: s3-trio at PCI_DEVFN(2, 0) */
333 pci_vga_init(pci_bus
);
335 for (i
= 0; i
< nb_nics
; i
++) {
336 pci_nic_init_nofail(&nd_table
[i
], pci_bus
, "pcnet",
337 i
== 0 ? "3" : NULL
);
341 /* Prepare firmware configuration for OpenBIOS */
342 dev
= qdev_new(TYPE_FW_CFG_MEM
);
343 fw_cfg
= FW_CFG(dev
);
344 qdev_prop_set_uint32(dev
, "data_width", 1);
345 qdev_prop_set_bit(dev
, "dma_enabled", false);
346 object_property_add_child(OBJECT(qdev_get_machine()), TYPE_FW_CFG
,
348 s
= SYS_BUS_DEVICE(dev
);
349 sysbus_realize_and_unref(s
, &error_fatal
);
350 sysbus_mmio_map(s
, 0, CFG_ADDR
);
351 sysbus_mmio_map(s
, 1, CFG_ADDR
+ 2);
353 if (machine
->kernel_filename
) {
355 kernel_base
= KERNEL_LOAD_ADDR
;
356 kernel_size
= load_image_targphys(machine
->kernel_filename
,
358 machine
->ram_size
- kernel_base
);
359 if (kernel_size
< 0) {
360 error_report("could not load kernel '%s'",
361 machine
->kernel_filename
);
364 fw_cfg_add_i32(fw_cfg
, FW_CFG_KERNEL_ADDR
, kernel_base
);
365 fw_cfg_add_i32(fw_cfg
, FW_CFG_KERNEL_SIZE
, kernel_size
);
367 if (machine
->initrd_filename
) {
368 initrd_base
= INITRD_LOAD_ADDR
;
369 initrd_size
= load_image_targphys(machine
->initrd_filename
,
371 machine
->ram_size
- initrd_base
);
372 if (initrd_size
< 0) {
373 error_report("could not load initial ram disk '%s'",
374 machine
->initrd_filename
);
377 fw_cfg_add_i32(fw_cfg
, FW_CFG_INITRD_ADDR
, initrd_base
);
378 fw_cfg_add_i32(fw_cfg
, FW_CFG_INITRD_SIZE
, initrd_size
);
380 if (machine
->kernel_cmdline
&& *machine
->kernel_cmdline
) {
381 fw_cfg_add_i32(fw_cfg
, FW_CFG_KERNEL_CMDLINE
, CMDLINE_ADDR
);
382 pstrcpy_targphys("cmdline", CMDLINE_ADDR
, TARGET_PAGE_SIZE
,
383 machine
->kernel_cmdline
);
384 fw_cfg_add_string(fw_cfg
, FW_CFG_CMDLINE_DATA
,
385 machine
->kernel_cmdline
);
386 fw_cfg_add_i32(fw_cfg
, FW_CFG_CMDLINE_SIZE
,
387 strlen(machine
->kernel_cmdline
) + 1);
391 boot_device
= machine
->boot_order
[0];
394 fw_cfg_add_i16(fw_cfg
, FW_CFG_MAX_CPUS
, (uint16_t)machine
->smp
.max_cpus
);
395 fw_cfg_add_i64(fw_cfg
, FW_CFG_RAM_SIZE
, (uint64_t)machine
->ram_size
);
396 fw_cfg_add_i16(fw_cfg
, FW_CFG_MACHINE_ID
, ARCH_PREP
);
398 fw_cfg_add_i16(fw_cfg
, FW_CFG_PPC_WIDTH
, graphic_width
);
399 fw_cfg_add_i16(fw_cfg
, FW_CFG_PPC_HEIGHT
, graphic_height
);
400 fw_cfg_add_i16(fw_cfg
, FW_CFG_PPC_DEPTH
, graphic_depth
);
402 fw_cfg_add_i32(fw_cfg
, FW_CFG_PPC_IS_KVM
, kvm_enabled());
406 fw_cfg_add_i32(fw_cfg
, FW_CFG_PPC_TBFREQ
, kvmppc_get_tbfreq());
407 hypercall
= g_malloc(16);
408 kvmppc_get_hypercall(env
, hypercall
, 16);
409 fw_cfg_add_bytes(fw_cfg
, FW_CFG_PPC_KVM_HC
, hypercall
, 16);
410 fw_cfg_add_i32(fw_cfg
, FW_CFG_PPC_KVM_PID
, getpid());
412 fw_cfg_add_i32(fw_cfg
, FW_CFG_PPC_TBFREQ
, NANOSECONDS_PER_SECOND
);
414 fw_cfg_add_i16(fw_cfg
, FW_CFG_BOOT_DEVICE
, boot_device
);
415 qemu_register_boot_set(fw_cfg_boot_set
, fw_cfg
);
417 /* Prepare firmware configuration for Open Hack'Ware */
419 PPC_NVRAM_set_params(m48t59
, NVRAM_SIZE
, "PREP", machine
->ram_size
,
421 kernel_base
, kernel_size
,
422 machine
->kernel_cmdline
,
423 initrd_base
, initrd_size
,
424 /* XXX: need an option to load a NVRAM image */
426 graphic_width
, graphic_height
, graphic_depth
);
430 static void ibm_40p_machine_init(MachineClass
*mc
)
432 mc
->desc
= "IBM RS/6000 7020 (40p)",
433 mc
->init
= ibm_40p_init
;
435 mc
->default_ram_size
= 128 * MiB
;
436 mc
->block_default_type
= IF_SCSI
;
437 mc
->default_boot_order
= "c";
438 mc
->default_cpu_type
= POWERPC_CPU_TYPE_NAME("604");
439 mc
->default_display
= "std";
442 DEFINE_MACHINE("40p", ibm_40p_machine_init
)