2 * QEMU S390 virtio target
4 * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
28 #include "hw/virtio.h"
29 #include "hw/sysbus.h"
32 #include "hw/s390-virtio-bus.h"
37 #define dprintf(fmt, ...) \
38 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
40 #define dprintf(fmt, ...) \
44 #define KVM_S390_VIRTIO_NOTIFY 0
45 #define KVM_S390_VIRTIO_RESET 1
46 #define KVM_S390_VIRTIO_SET_STATUS 2
48 #define KERN_IMAGE_START 0x010000UL
49 #define KERN_PARM_AREA 0x010480UL
50 #define INITRD_START 0x800000UL
51 #define INITRD_PARM_START 0x010408UL
52 #define INITRD_PARM_SIZE 0x010410UL
53 #define PARMFILE_START 0x001000UL
55 #define ZIPL_START 0x009000UL
56 #define ZIPL_LOAD_ADDR 0x009000UL
57 #define ZIPL_FILENAME "s390-zipl.rom"
59 #define MAX_BLK_DEVS 10
61 static VirtIOS390Bus
*s390_bus
;
62 static CPUState
**ipi_states
;
64 void irq_info(Monitor
*mon
);
65 void pic_info(Monitor
*mon
);
67 void irq_info(Monitor
*mon
)
71 void pic_info(Monitor
*mon
)
75 CPUState
*s390_cpu_addr2state(uint16_t cpu_addr
)
77 if (cpu_addr
>= smp_cpus
) {
81 return ipi_states
[cpu_addr
];
84 int s390_virtio_hypercall(CPUState
*env
)
87 target_ulong mem
= env
->regs
[2];
89 dprintf("KVM hypercall: %ld\n", env
->regs
[1]);
90 switch (env
->regs
[1]) {
91 case KVM_S390_VIRTIO_NOTIFY
:
93 VirtIOS390Device
*dev
= s390_virtio_bus_find_vring(s390_bus
,
96 virtio_queue_notify(dev
->vdev
, i
);
104 case KVM_S390_VIRTIO_RESET
:
106 VirtIOS390Device
*dev
;
108 dev
= s390_virtio_bus_find_mem(s390_bus
, mem
);
109 virtio_reset(dev
->vdev
);
110 s390_virtio_device_sync(dev
);
113 case KVM_S390_VIRTIO_SET_STATUS
:
115 VirtIOS390Device
*dev
;
117 dev
= s390_virtio_bus_find_mem(s390_bus
, mem
);
119 s390_virtio_device_update_status(dev
);
134 /* PC hardware initialisation */
135 static void s390_init(QEMUMachine
*machine
, QemuOpts
*opts
)
137 ram_addr_t ram_size
= qemu_opt_get_number(opts
, "ram_size", 0);
138 const char *boot_device
= qemu_opt_get(opts
, "boot_device");
139 const char *kernel_filename
= qemu_opt_get(opts
, "kernel");
140 const char *kernel_cmdline
= qemu_opt_get(opts
, "cmdline");
141 const char *initrd_filename
= qemu_opt_get(opts
, "initrd");
142 const char *cpu_model
= qemu_opt_get(opts
, "cpu");
143 CPUState
*env
= NULL
;
145 ram_addr_t kernel_size
= 0;
146 ram_addr_t initrd_offset
;
147 ram_addr_t initrd_size
= 0;
150 /* XXX we only work on KVM for now */
152 if (!kvm_enabled()) {
153 fprintf(stderr
, "The S390 target only works with KVM enabled\n");
158 s390_bus
= s390_virtio_bus_init(&ram_size
);
161 ram_addr
= qemu_ram_alloc(ram_size
);
162 cpu_register_physical_memory(0, ram_size
, ram_addr
);
165 if (cpu_model
== NULL
) {
169 ipi_states
= qemu_malloc(sizeof(CPUState
*) * smp_cpus
);
171 for (i
= 0; i
< smp_cpus
; i
++) {
174 tmp_env
= cpu_init(cpu_model
);
178 ipi_states
[i
] = tmp_env
;
180 tmp_env
->exception_index
= EXCP_HLT
;
184 env
->exception_index
= 0;
186 if (kernel_filename
) {
187 kernel_size
= load_image(kernel_filename
, qemu_get_ram_ptr(0));
189 if (lduw_phys(KERN_IMAGE_START
) != 0x0dd0) {
190 fprintf(stderr
, "Specified image is not an s390 boot image\n");
194 env
->psw
.addr
= KERN_IMAGE_START
;
195 env
->psw
.mask
= 0x0000000180000000ULL
;
197 ram_addr_t bios_size
= 0;
200 /* Load zipl bootloader */
201 if (bios_name
== NULL
) {
202 bios_name
= ZIPL_FILENAME
;
205 bios_filename
= qemu_find_file(QEMU_FILE_TYPE_BIOS
, bios_name
);
206 bios_size
= load_image(bios_filename
, qemu_get_ram_ptr(ZIPL_LOAD_ADDR
));
208 if ((long)bios_size
< 0) {
209 hw_error("could not load bootloader '%s'\n", bios_name
);
212 if (bios_size
> 4096) {
213 hw_error("stage1 bootloader is > 4k\n");
216 env
->psw
.addr
= ZIPL_START
;
217 env
->psw
.mask
= 0x0000000180000000ULL
;
220 if (initrd_filename
) {
221 initrd_offset
= INITRD_START
;
222 while (kernel_size
+ 0x100000 > initrd_offset
) {
223 initrd_offset
+= 0x100000;
225 initrd_size
= load_image(initrd_filename
, qemu_get_ram_ptr(initrd_offset
));
227 stq_phys(INITRD_PARM_START
, initrd_offset
);
228 stq_phys(INITRD_PARM_SIZE
, initrd_size
);
231 if (kernel_cmdline
) {
232 cpu_physical_memory_rw(KERN_PARM_AREA
, (uint8_t *)kernel_cmdline
,
233 strlen(kernel_cmdline
), 1);
236 /* Create VirtIO network adapters */
237 for(i
= 0; i
< nb_nics
; i
++) {
238 NICInfo
*nd
= &nd_table
[i
];
242 nd
->model
= qemu_strdup("virtio");
245 if (strcmp(nd
->model
, "virtio")) {
246 fprintf(stderr
, "S390 only supports VirtIO nics\n");
250 dev
= qdev_create((BusState
*)s390_bus
, "virtio-net-s390");
251 qdev_set_nic_properties(dev
, nd
);
252 qdev_init_nofail(dev
);
255 /* Create VirtIO disk drives */
256 for(i
= 0; i
< MAX_BLK_DEVS
; i
++) {
260 dinfo
= drive_get(IF_IDE
, 0, i
);
265 dev
= qdev_create((BusState
*)s390_bus
, "virtio-blk-s390");
266 qdev_prop_set_drive(dev
, "drive", dinfo
);
267 qdev_init_nofail(dev
);
271 static QEMUMachine s390_machine
= {
272 .name
= "s390-virtio",
274 .desc
= "VirtIO based S390 machine",
284 static void s390_machine_init(void)
286 qemu_register_machine(&s390_machine
);
289 machine_init(s390_machine_init
);