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/>.
25 #include "qapi/qmp/qerror.h"
26 #include "qemu/error-report.h"
27 #include "sysemu/block-backend.h"
28 #include "sysemu/blockdev.h"
29 #include "sysemu/sysemu.h"
31 #include "hw/boards.h"
32 #include "hw/loader.h"
33 #include "hw/virtio/virtio.h"
34 #include "sysemu/kvm.h"
35 #include "exec/address-spaces.h"
36 #include "sysemu/qtest.h"
38 #include "hw/s390x/sclp.h"
39 #include "hw/s390x/s390_flic.h"
40 #include "hw/s390x/s390-virtio.h"
41 #include "hw/s390x/storage-keys.h"
42 #include "hw/s390x/ipl.h"
48 #define DPRINTF(fmt, ...) \
49 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
51 #define DPRINTF(fmt, ...) \
55 #define MAX_BLK_DEVS 10
56 #define ZIPL_FILENAME "s390-zipl.rom"
57 #define S390_MACHINE "s390-virtio"
58 #define TYPE_S390_MACHINE MACHINE_TYPE_NAME(S390_MACHINE)
60 #define S390_TOD_CLOCK_VALUE_MISSING 0x00
61 #define S390_TOD_CLOCK_VALUE_PRESENT 0x01
63 static S390CPU
**ipi_states
;
65 S390CPU
*s390_cpu_addr2state(uint16_t cpu_addr
)
67 if (cpu_addr
>= smp_cpus
) {
71 return ipi_states
[cpu_addr
];
74 void s390_init_ipl_dev(const char *kernel_filename
,
75 const char *kernel_cmdline
,
76 const char *initrd_filename
,
80 Object
*new = object_new(TYPE_S390_IPL
);
81 DeviceState
*dev
= DEVICE(new);
83 if (kernel_filename
) {
84 qdev_prop_set_string(dev
, "kernel", kernel_filename
);
86 if (initrd_filename
) {
87 qdev_prop_set_string(dev
, "initrd", initrd_filename
);
89 qdev_prop_set_string(dev
, "cmdline", kernel_cmdline
);
90 qdev_prop_set_string(dev
, "firmware", firmware
);
91 qdev_prop_set_bit(dev
, "enforce_bios", enforce_bios
);
92 object_property_add_child(qdev_get_machine(), TYPE_S390_IPL
,
95 qdev_init_nofail(dev
);
98 void s390_init_cpus(const char *cpu_model
)
102 if (cpu_model
== NULL
) {
106 ipi_states
= g_malloc(sizeof(S390CPU
*) * smp_cpus
);
108 for (i
= 0; i
< smp_cpus
; i
++) {
112 cpu
= cpu_s390x_init(cpu_model
);
117 cs
->exception_index
= EXCP_HLT
;
122 void s390_create_virtio_net(BusState
*bus
, const char *name
)
126 for (i
= 0; i
< nb_nics
; i
++) {
127 NICInfo
*nd
= &nd_table
[i
];
131 nd
->model
= g_strdup("virtio");
134 qemu_check_nic_model(nd
, "virtio");
136 dev
= qdev_create(bus
, name
);
137 qdev_set_nic_properties(dev
, nd
);
138 qdev_init_nofail(dev
);
142 void gtod_save(QEMUFile
*f
, void *opaque
)
148 r
= s390_get_clock(&tod_high
, &tod_low
);
150 fprintf(stderr
, "WARNING: Unable to get guest clock for migration. "
151 "Error code %d. Guest clock will not be migrated "
152 "which could cause the guest to hang.\n", r
);
153 qemu_put_byte(f
, S390_TOD_CLOCK_VALUE_MISSING
);
157 qemu_put_byte(f
, S390_TOD_CLOCK_VALUE_PRESENT
);
158 qemu_put_byte(f
, tod_high
);
159 qemu_put_be64(f
, tod_low
);
162 int gtod_load(QEMUFile
*f
, void *opaque
, int version_id
)
168 if (qemu_get_byte(f
) == S390_TOD_CLOCK_VALUE_MISSING
) {
169 fprintf(stderr
, "WARNING: Guest clock was not migrated. This could "
170 "cause the guest to hang.\n");
174 tod_high
= qemu_get_byte(f
);
175 tod_low
= qemu_get_be64(f
);
177 r
= s390_set_clock(&tod_high
, &tod_low
);
179 fprintf(stderr
, "WARNING: Unable to set guest clock value. "
180 "s390_get_clock returned error %d. This could cause "
181 "the guest to hang.\n", r
);
187 void s390_nmi(NMIState
*n
, int cpu_index
, Error
**errp
)
189 CPUState
*cs
= qemu_get_cpu(cpu_index
);
191 if (s390_cpu_restart(S390_CPU(cs
))) {
192 error_setg(errp
, QERR_UNSUPPORTED
);
196 void s390_machine_reset(void)
198 S390CPU
*ipl_cpu
= S390_CPU(qemu_get_cpu(0));
200 qemu_devices_reset();
204 /* all cpus are stopped - configure and start the ipl cpu only */
205 s390_ipl_prepare_cpu(ipl_cpu
);
206 s390_cpu_set_state(CPU_STATE_OPERATING
, ipl_cpu
);