2 * QEMU S390 virtio target
4 * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
5 * Copyright IBM Corp 2012
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * Contributions after 2012-10-29 are licensed under the terms of the
18 * GNU GPL, version 2 or (at your option) any later version.
20 * You should have received a copy of the GNU (Lesser) General Public
21 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
24 #include "qemu/osdep.h"
26 #include "qapi/qmp/qerror.h"
27 #include "qemu/error-report.h"
28 #include "sysemu/block-backend.h"
29 #include "sysemu/blockdev.h"
30 #include "sysemu/sysemu.h"
32 #include "hw/boards.h"
33 #include "hw/loader.h"
34 #include "hw/virtio/virtio.h"
35 #include "sysemu/kvm.h"
36 #include "exec/address-spaces.h"
37 #include "sysemu/qtest.h"
39 #include "hw/s390x/sclp.h"
40 #include "hw/s390x/s390_flic.h"
41 #include "hw/s390x/s390-virtio.h"
42 #include "hw/s390x/storage-keys.h"
43 #include "hw/s390x/ipl.h"
49 #define DPRINTF(fmt, ...) \
50 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
52 #define DPRINTF(fmt, ...) \
56 #define MAX_BLK_DEVS 10
57 #define ZIPL_FILENAME "s390-zipl.rom"
58 #define S390_MACHINE "s390-virtio"
59 #define TYPE_S390_MACHINE MACHINE_TYPE_NAME(S390_MACHINE)
61 #define S390_TOD_CLOCK_VALUE_MISSING 0x00
62 #define S390_TOD_CLOCK_VALUE_PRESENT 0x01
64 static S390CPU
**ipi_states
;
66 S390CPU
*s390_cpu_addr2state(uint16_t cpu_addr
)
68 if (cpu_addr
>= smp_cpus
) {
72 return ipi_states
[cpu_addr
];
75 void s390_init_ipl_dev(const char *kernel_filename
,
76 const char *kernel_cmdline
,
77 const char *initrd_filename
,
81 Object
*new = object_new(TYPE_S390_IPL
);
82 DeviceState
*dev
= DEVICE(new);
84 if (kernel_filename
) {
85 qdev_prop_set_string(dev
, "kernel", kernel_filename
);
87 if (initrd_filename
) {
88 qdev_prop_set_string(dev
, "initrd", initrd_filename
);
90 qdev_prop_set_string(dev
, "cmdline", kernel_cmdline
);
91 qdev_prop_set_string(dev
, "firmware", firmware
);
92 qdev_prop_set_bit(dev
, "enforce_bios", enforce_bios
);
93 object_property_add_child(qdev_get_machine(), TYPE_S390_IPL
,
96 qdev_init_nofail(dev
);
99 void s390_init_cpus(const char *cpu_model
)
103 if (cpu_model
== NULL
) {
107 ipi_states
= g_malloc(sizeof(S390CPU
*) * smp_cpus
);
109 for (i
= 0; i
< smp_cpus
; i
++) {
113 cpu
= cpu_s390x_init(cpu_model
);
118 cs
->exception_index
= EXCP_HLT
;
123 void s390_create_virtio_net(BusState
*bus
, const char *name
)
127 for (i
= 0; i
< nb_nics
; i
++) {
128 NICInfo
*nd
= &nd_table
[i
];
132 nd
->model
= g_strdup("virtio");
135 qemu_check_nic_model(nd
, "virtio");
137 dev
= qdev_create(bus
, name
);
138 qdev_set_nic_properties(dev
, nd
);
139 qdev_init_nofail(dev
);
143 void gtod_save(QEMUFile
*f
, void *opaque
)
149 r
= s390_get_clock(&tod_high
, &tod_low
);
151 fprintf(stderr
, "WARNING: Unable to get guest clock for migration. "
152 "Error code %d. Guest clock will not be migrated "
153 "which could cause the guest to hang.\n", r
);
154 qemu_put_byte(f
, S390_TOD_CLOCK_VALUE_MISSING
);
158 qemu_put_byte(f
, S390_TOD_CLOCK_VALUE_PRESENT
);
159 qemu_put_byte(f
, tod_high
);
160 qemu_put_be64(f
, tod_low
);
163 int gtod_load(QEMUFile
*f
, void *opaque
, int version_id
)
169 if (qemu_get_byte(f
) == S390_TOD_CLOCK_VALUE_MISSING
) {
170 fprintf(stderr
, "WARNING: Guest clock was not migrated. This could "
171 "cause the guest to hang.\n");
175 tod_high
= qemu_get_byte(f
);
176 tod_low
= qemu_get_be64(f
);
178 r
= s390_set_clock(&tod_high
, &tod_low
);
180 fprintf(stderr
, "WARNING: Unable to set guest clock value. "
181 "s390_get_clock returned error %d. This could cause "
182 "the guest to hang.\n", r
);
188 void s390_nmi(NMIState
*n
, int cpu_index
, Error
**errp
)
190 CPUState
*cs
= qemu_get_cpu(cpu_index
);
192 if (s390_cpu_restart(S390_CPU(cs
))) {
193 error_setg(errp
, QERR_UNSUPPORTED
);
197 void s390_machine_reset(void)
199 S390CPU
*ipl_cpu
= S390_CPU(qemu_get_cpu(0));
201 qemu_devices_reset();
205 /* all cpus are stopped - configure and start the ipl cpu only */
206 s390_ipl_prepare_cpu(ipl_cpu
);
207 s390_cpu_set_state(CPU_STATE_OPERATING
, ipl_cpu
);