ide: refactor retry_unit set and clear into separate function
[qemu.git] / hw / s390x / s390-virtio.c
blob544c61643d1ae0ca7ad3adae55f76794a7a4143d
1 /*
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"
25 #include "qapi/error.h"
26 #include "hw/hw.h"
27 #include "qapi/qmp/qerror.h"
28 #include "qemu/error-report.h"
29 #include "sysemu/block-backend.h"
30 #include "sysemu/blockdev.h"
31 #include "sysemu/sysemu.h"
32 #include "net/net.h"
33 #include "hw/boards.h"
34 #include "hw/loader.h"
35 #include "hw/virtio/virtio.h"
36 #include "sysemu/kvm.h"
37 #include "exec/address-spaces.h"
38 #include "sysemu/qtest.h"
40 #include "hw/s390x/sclp.h"
41 #include "hw/s390x/s390_flic.h"
42 #include "hw/s390x/s390-virtio.h"
43 #include "hw/s390x/storage-keys.h"
44 #include "hw/s390x/ipl.h"
45 #include "cpu.h"
47 //#define DEBUG_S390
49 #ifdef DEBUG_S390
50 #define DPRINTF(fmt, ...) \
51 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
52 #else
53 #define DPRINTF(fmt, ...) \
54 do { } while (0)
55 #endif
57 #define MAX_BLK_DEVS 10
59 #define S390_TOD_CLOCK_VALUE_MISSING 0x00
60 #define S390_TOD_CLOCK_VALUE_PRESENT 0x01
62 static S390CPU **cpu_states;
64 S390CPU *s390_cpu_addr2state(uint16_t cpu_addr)
66 if (cpu_addr >= max_cpus) {
67 return NULL;
70 /* Fast lookup via CPU ID */
71 return cpu_states[cpu_addr];
74 void s390_init_ipl_dev(const char *kernel_filename,
75 const char *kernel_cmdline,
76 const char *initrd_filename,
77 const char *firmware,
78 bool enforce_bios)
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,
93 new, NULL);
94 object_unref(new);
95 qdev_init_nofail(dev);
98 void s390_init_cpus(MachineState *machine)
100 int i;
101 gchar *name;
103 if (machine->cpu_model == NULL) {
104 machine->cpu_model = "host";
107 cpu_states = g_new0(S390CPU *, max_cpus);
109 for (i = 0; i < max_cpus; i++) {
110 name = g_strdup_printf("cpu[%i]", i);
111 object_property_add_link(OBJECT(machine), name, TYPE_S390_CPU,
112 (Object **) &cpu_states[i],
113 object_property_allow_set_link,
114 OBJ_PROP_LINK_UNREF_ON_RELEASE,
115 &error_abort);
116 g_free(name);
119 for (i = 0; i < smp_cpus; i++) {
120 s390x_new_cpu(machine->cpu_model, i, &error_fatal);
125 void s390_create_virtio_net(BusState *bus, const char *name)
127 int i;
129 for (i = 0; i < nb_nics; i++) {
130 NICInfo *nd = &nd_table[i];
131 DeviceState *dev;
133 if (!nd->model) {
134 nd->model = g_strdup("virtio");
137 qemu_check_nic_model(nd, "virtio");
139 dev = qdev_create(bus, name);
140 qdev_set_nic_properties(dev, nd);
141 qdev_init_nofail(dev);
145 void gtod_save(QEMUFile *f, void *opaque)
147 uint64_t tod_low;
148 uint8_t tod_high;
149 int r;
151 r = s390_get_clock(&tod_high, &tod_low);
152 if (r) {
153 fprintf(stderr, "WARNING: Unable to get guest clock for migration. "
154 "Error code %d. Guest clock will not be migrated "
155 "which could cause the guest to hang.\n", r);
156 qemu_put_byte(f, S390_TOD_CLOCK_VALUE_MISSING);
157 return;
160 qemu_put_byte(f, S390_TOD_CLOCK_VALUE_PRESENT);
161 qemu_put_byte(f, tod_high);
162 qemu_put_be64(f, tod_low);
165 int gtod_load(QEMUFile *f, void *opaque, int version_id)
167 uint64_t tod_low;
168 uint8_t tod_high;
169 int r;
171 if (qemu_get_byte(f) == S390_TOD_CLOCK_VALUE_MISSING) {
172 fprintf(stderr, "WARNING: Guest clock was not migrated. This could "
173 "cause the guest to hang.\n");
174 return 0;
177 tod_high = qemu_get_byte(f);
178 tod_low = qemu_get_be64(f);
180 r = s390_set_clock(&tod_high, &tod_low);
181 if (r) {
182 fprintf(stderr, "WARNING: Unable to set guest clock value. "
183 "s390_get_clock returned error %d. This could cause "
184 "the guest to hang.\n", r);
187 return 0;
190 void s390_nmi(NMIState *n, int cpu_index, Error **errp)
192 CPUState *cs = qemu_get_cpu(cpu_index);
194 if (s390_cpu_restart(S390_CPU(cs))) {
195 error_setg(errp, QERR_UNSUPPORTED);
199 void s390_machine_reset(void)
201 S390CPU *ipl_cpu = S390_CPU(qemu_get_cpu(0));
203 qemu_devices_reset();
204 s390_cmma_reset();
205 s390_crypto_reset();
207 /* all cpus are stopped - configure and start the ipl cpu only */
208 s390_ipl_prepare_cpu(ipl_cpu);
209 s390_cpu_set_state(CPU_STATE_OPERATING, ipl_cpu);