xref: /openbmc/qemu/hw/s390x/s390-virtio-ccw.c (revision ae3c12a0)
1 /*
2  * virtio ccw machine
3  *
4  * Copyright 2012 IBM Corp.
5  * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
6  * Author(s): Cornelia Huck <cornelia.huck@de.ibm.com>
7  *
8  * This work is licensed under the terms of the GNU GPL, version 2 or (at
9  * your option) any later version. See the COPYING file in the top-level
10  * directory.
11  */
12 
13 #include "qemu/osdep.h"
14 #include "qapi/error.h"
15 #include "cpu.h"
16 #include "hw/boards.h"
17 #include "exec/address-spaces.h"
18 #include "exec/ram_addr.h"
19 #include "hw/s390x/s390-virtio-hcall.h"
20 #include "hw/s390x/sclp.h"
21 #include "hw/s390x/s390_flic.h"
22 #include "hw/s390x/ioinst.h"
23 #include "hw/s390x/css.h"
24 #include "virtio-ccw.h"
25 #include "qemu/config-file.h"
26 #include "qemu/error-report.h"
27 #include "qemu/option.h"
28 #include "s390-pci-bus.h"
29 #include "hw/s390x/storage-keys.h"
30 #include "hw/s390x/storage-attributes.h"
31 #include "hw/s390x/event-facility.h"
32 #include "ipl.h"
33 #include "hw/s390x/s390-virtio-ccw.h"
34 #include "hw/s390x/css-bridge.h"
35 #include "hw/s390x/ap-bridge.h"
36 #include "migration/register.h"
37 #include "cpu_models.h"
38 #include "hw/nmi.h"
39 #include "hw/s390x/tod.h"
40 
41 S390CPU *s390_cpu_addr2state(uint16_t cpu_addr)
42 {
43     static MachineState *ms;
44 
45     if (!ms) {
46         ms = MACHINE(qdev_get_machine());
47         g_assert(ms->possible_cpus);
48     }
49 
50     /* CPU address corresponds to the core_id and the index */
51     if (cpu_addr >= ms->possible_cpus->len) {
52         return NULL;
53     }
54     return S390_CPU(ms->possible_cpus->cpus[cpu_addr].cpu);
55 }
56 
57 static S390CPU *s390x_new_cpu(const char *typename, uint32_t core_id,
58                               Error **errp)
59 {
60     S390CPU *cpu = S390_CPU(object_new(typename));
61     Error *err = NULL;
62 
63     object_property_set_int(OBJECT(cpu), core_id, "core-id", &err);
64     if (err != NULL) {
65         goto out;
66     }
67     object_property_set_bool(OBJECT(cpu), true, "realized", &err);
68 
69 out:
70     object_unref(OBJECT(cpu));
71     if (err) {
72         error_propagate(errp, err);
73         cpu = NULL;
74     }
75     return cpu;
76 }
77 
78 static void s390_init_cpus(MachineState *machine)
79 {
80     MachineClass *mc = MACHINE_GET_CLASS(machine);
81     int i;
82 
83     /* initialize possible_cpus */
84     mc->possible_cpu_arch_ids(machine);
85 
86     for (i = 0; i < smp_cpus; i++) {
87         s390x_new_cpu(machine->cpu_type, i, &error_fatal);
88     }
89 }
90 
91 static const char *const reset_dev_types[] = {
92     TYPE_VIRTUAL_CSS_BRIDGE,
93     "s390-sclp-event-facility",
94     "s390-flic",
95     "diag288",
96 };
97 
98 static void subsystem_reset(void)
99 {
100     DeviceState *dev;
101     int i;
102 
103     for (i = 0; i < ARRAY_SIZE(reset_dev_types); i++) {
104         dev = DEVICE(object_resolve_path_type("", reset_dev_types[i], NULL));
105         if (dev) {
106             qdev_reset_all(dev);
107         }
108     }
109 }
110 
111 static int virtio_ccw_hcall_notify(const uint64_t *args)
112 {
113     uint64_t subch_id = args[0];
114     uint64_t queue = args[1];
115     SubchDev *sch;
116     int cssid, ssid, schid, m;
117 
118     if (ioinst_disassemble_sch_ident(subch_id, &m, &cssid, &ssid, &schid)) {
119         return -EINVAL;
120     }
121     sch = css_find_subch(m, cssid, ssid, schid);
122     if (!sch || !css_subch_visible(sch)) {
123         return -EINVAL;
124     }
125     if (queue >= VIRTIO_QUEUE_MAX) {
126         return -EINVAL;
127     }
128     virtio_queue_notify(virtio_ccw_get_vdev(sch), queue);
129     return 0;
130 
131 }
132 
133 static int virtio_ccw_hcall_early_printk(const uint64_t *args)
134 {
135     uint64_t mem = args[0];
136 
137     if (mem < ram_size) {
138         /* Early printk */
139         return 0;
140     }
141     return -EINVAL;
142 }
143 
144 static void virtio_ccw_register_hcalls(void)
145 {
146     s390_register_virtio_hypercall(KVM_S390_VIRTIO_CCW_NOTIFY,
147                                    virtio_ccw_hcall_notify);
148     /* Tolerate early printk. */
149     s390_register_virtio_hypercall(KVM_S390_VIRTIO_NOTIFY,
150                                    virtio_ccw_hcall_early_printk);
151 }
152 
153 /*
154  * KVM does only support memory slots up to KVM_MEM_MAX_NR_PAGES pages
155  * as the dirty bitmap must be managed by bitops that take an int as
156  * position indicator. If we have a guest beyond that we will split off
157  * new subregions. The split must happen on a segment boundary (1MB).
158  */
159 #define KVM_MEM_MAX_NR_PAGES ((1ULL << 31) - 1)
160 #define SEG_MSK (~0xfffffULL)
161 #define KVM_SLOT_MAX_BYTES ((KVM_MEM_MAX_NR_PAGES * TARGET_PAGE_SIZE) & SEG_MSK)
162 static void s390_memory_init(ram_addr_t mem_size)
163 {
164     MemoryRegion *sysmem = get_system_memory();
165     ram_addr_t chunk, offset = 0;
166     unsigned int number = 0;
167     Error *local_err = NULL;
168     gchar *name;
169 
170     /* allocate RAM for core */
171     name = g_strdup_printf("s390.ram");
172     while (mem_size) {
173         MemoryRegion *ram = g_new(MemoryRegion, 1);
174         uint64_t size = mem_size;
175 
176         /* KVM does not allow memslots >= 8 TB */
177         chunk = MIN(size, KVM_SLOT_MAX_BYTES);
178         memory_region_allocate_system_memory(ram, NULL, name, chunk);
179         memory_region_add_subregion(sysmem, offset, ram);
180         mem_size -= chunk;
181         offset += chunk;
182         g_free(name);
183         name = g_strdup_printf("s390.ram.%u", ++number);
184     }
185     g_free(name);
186 
187     /*
188      * Configure the maximum page size. As no memory devices were created
189      * yet, this is the page size of initial memory only.
190      */
191     s390_set_max_pagesize(qemu_maxrampagesize(), &local_err);
192     if (local_err) {
193         error_report_err(local_err);
194         exit(EXIT_FAILURE);
195     }
196     /* Initialize storage key device */
197     s390_skeys_init();
198     /* Initialize storage attributes device */
199     s390_stattrib_init();
200 }
201 
202 static void s390_init_ipl_dev(const char *kernel_filename,
203                               const char *kernel_cmdline,
204                               const char *initrd_filename, const char *firmware,
205                               const char *netboot_fw, bool enforce_bios)
206 {
207     Object *new = object_new(TYPE_S390_IPL);
208     DeviceState *dev = DEVICE(new);
209     char *netboot_fw_prop;
210 
211     if (kernel_filename) {
212         qdev_prop_set_string(dev, "kernel", kernel_filename);
213     }
214     if (initrd_filename) {
215         qdev_prop_set_string(dev, "initrd", initrd_filename);
216     }
217     qdev_prop_set_string(dev, "cmdline", kernel_cmdline);
218     qdev_prop_set_string(dev, "firmware", firmware);
219     qdev_prop_set_bit(dev, "enforce_bios", enforce_bios);
220     netboot_fw_prop = object_property_get_str(new, "netboot_fw", &error_abort);
221     if (!strlen(netboot_fw_prop)) {
222         qdev_prop_set_string(dev, "netboot_fw", netboot_fw);
223     }
224     g_free(netboot_fw_prop);
225     object_property_add_child(qdev_get_machine(), TYPE_S390_IPL,
226                               new, NULL);
227     object_unref(new);
228     qdev_init_nofail(dev);
229 }
230 
231 static void s390_create_virtio_net(BusState *bus, const char *name)
232 {
233     int i;
234 
235     for (i = 0; i < nb_nics; i++) {
236         NICInfo *nd = &nd_table[i];
237         DeviceState *dev;
238 
239         if (!nd->model) {
240             nd->model = g_strdup("virtio");
241         }
242 
243         qemu_check_nic_model(nd, "virtio");
244 
245         dev = qdev_create(bus, name);
246         qdev_set_nic_properties(dev, nd);
247         qdev_init_nofail(dev);
248     }
249 }
250 
251 static void s390_create_sclpconsole(const char *type, Chardev *chardev)
252 {
253     DeviceState *dev;
254 
255     dev = qdev_create(sclp_get_event_facility_bus(), type);
256     qdev_prop_set_chr(dev, "chardev", chardev);
257     qdev_init_nofail(dev);
258 }
259 
260 static void ccw_init(MachineState *machine)
261 {
262     int ret;
263     VirtualCssBus *css_bus;
264     DeviceState *dev;
265 
266     s390_sclp_init();
267     /* init memory + setup max page size. Required for the CPU model */
268     s390_memory_init(machine->ram_size);
269 
270     /* init CPUs (incl. CPU model) early so s390_has_feature() works */
271     s390_init_cpus(machine);
272 
273     s390_flic_init();
274 
275     /* init the SIGP facility */
276     s390_init_sigp();
277 
278     /* create AP bridge and bus(es) */
279     s390_init_ap();
280 
281     /* get a BUS */
282     css_bus = virtual_css_bus_init();
283     s390_init_ipl_dev(machine->kernel_filename, machine->kernel_cmdline,
284                       machine->initrd_filename, "s390-ccw.img",
285                       "s390-netboot.img", true);
286 
287     dev = qdev_create(NULL, TYPE_S390_PCI_HOST_BRIDGE);
288     object_property_add_child(qdev_get_machine(), TYPE_S390_PCI_HOST_BRIDGE,
289                               OBJECT(dev), NULL);
290     qdev_init_nofail(dev);
291 
292     /* register hypercalls */
293     virtio_ccw_register_hcalls();
294 
295     s390_enable_css_support(s390_cpu_addr2state(0));
296 
297     ret = css_create_css_image(VIRTUAL_CSSID, true);
298 
299     assert(ret == 0);
300     if (css_migration_enabled()) {
301         css_register_vmstate();
302     }
303 
304     /* Create VirtIO network adapters */
305     s390_create_virtio_net(BUS(css_bus), "virtio-net-ccw");
306 
307     /* init consoles */
308     if (serial_hd(0)) {
309         s390_create_sclpconsole("sclpconsole", serial_hd(0));
310     }
311     if (serial_hd(1)) {
312         s390_create_sclpconsole("sclplmconsole", serial_hd(1));
313     }
314 
315     /* init the TOD clock */
316     s390_init_tod();
317 }
318 
319 static void s390_cpu_plug(HotplugHandler *hotplug_dev,
320                         DeviceState *dev, Error **errp)
321 {
322     MachineState *ms = MACHINE(hotplug_dev);
323     S390CPU *cpu = S390_CPU(dev);
324 
325     g_assert(!ms->possible_cpus->cpus[cpu->env.core_id].cpu);
326     ms->possible_cpus->cpus[cpu->env.core_id].cpu = OBJECT(dev);
327 
328     if (dev->hotplugged) {
329         raise_irq_cpu_hotplug();
330     }
331 }
332 
333 static inline void s390_do_cpu_ipl(CPUState *cs, run_on_cpu_data arg)
334 {
335     S390CPU *cpu = S390_CPU(cs);
336 
337     s390_ipl_prepare_cpu(cpu);
338     s390_cpu_set_state(S390_CPU_STATE_OPERATING, cpu);
339 }
340 
341 static void s390_machine_reset(void)
342 {
343     enum s390_reset reset_type;
344     CPUState *cs, *t;
345 
346     /* get the reset parameters, reset them once done */
347     s390_ipl_get_reset_request(&cs, &reset_type);
348 
349     /* all CPUs are paused and synchronized at this point */
350     s390_cmma_reset();
351 
352     switch (reset_type) {
353     case S390_RESET_EXTERNAL:
354     case S390_RESET_REIPL:
355         qemu_devices_reset();
356         s390_crypto_reset();
357 
358         /* configure and start the ipl CPU only */
359         run_on_cpu(cs, s390_do_cpu_ipl, RUN_ON_CPU_NULL);
360         break;
361     case S390_RESET_MODIFIED_CLEAR:
362         CPU_FOREACH(t) {
363             run_on_cpu(t, s390_do_cpu_full_reset, RUN_ON_CPU_NULL);
364         }
365         subsystem_reset();
366         s390_crypto_reset();
367         run_on_cpu(cs, s390_do_cpu_load_normal, RUN_ON_CPU_NULL);
368         break;
369     case S390_RESET_LOAD_NORMAL:
370         CPU_FOREACH(t) {
371             run_on_cpu(t, s390_do_cpu_reset, RUN_ON_CPU_NULL);
372         }
373         subsystem_reset();
374         run_on_cpu(cs, s390_do_cpu_initial_reset, RUN_ON_CPU_NULL);
375         run_on_cpu(cs, s390_do_cpu_load_normal, RUN_ON_CPU_NULL);
376         break;
377     default:
378         g_assert_not_reached();
379     }
380     s390_ipl_clear_reset_request();
381 }
382 
383 static void s390_machine_device_plug(HotplugHandler *hotplug_dev,
384                                      DeviceState *dev, Error **errp)
385 {
386     if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
387         s390_cpu_plug(hotplug_dev, dev, errp);
388     }
389 }
390 
391 static void s390_machine_device_unplug_request(HotplugHandler *hotplug_dev,
392                                                DeviceState *dev, Error **errp)
393 {
394     if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
395         error_setg(errp, "CPU hot unplug not supported on this machine");
396         return;
397     }
398 }
399 
400 static CpuInstanceProperties s390_cpu_index_to_props(MachineState *ms,
401                                                      unsigned cpu_index)
402 {
403     MachineClass *mc = MACHINE_GET_CLASS(ms);
404     const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(ms);
405 
406     assert(cpu_index < possible_cpus->len);
407     return possible_cpus->cpus[cpu_index].props;
408 }
409 
410 static const CPUArchIdList *s390_possible_cpu_arch_ids(MachineState *ms)
411 {
412     int i;
413 
414     if (ms->possible_cpus) {
415         g_assert(ms->possible_cpus && ms->possible_cpus->len == max_cpus);
416         return ms->possible_cpus;
417     }
418 
419     ms->possible_cpus = g_malloc0(sizeof(CPUArchIdList) +
420                                   sizeof(CPUArchId) * max_cpus);
421     ms->possible_cpus->len = max_cpus;
422     for (i = 0; i < ms->possible_cpus->len; i++) {
423         ms->possible_cpus->cpus[i].type = ms->cpu_type;
424         ms->possible_cpus->cpus[i].vcpus_count = 1;
425         ms->possible_cpus->cpus[i].arch_id = i;
426         ms->possible_cpus->cpus[i].props.has_core_id = true;
427         ms->possible_cpus->cpus[i].props.core_id = i;
428     }
429 
430     return ms->possible_cpus;
431 }
432 
433 static HotplugHandler *s390_get_hotplug_handler(MachineState *machine,
434                                                 DeviceState *dev)
435 {
436     if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
437         return HOTPLUG_HANDLER(machine);
438     }
439     return NULL;
440 }
441 
442 static void s390_hot_add_cpu(const int64_t id, Error **errp)
443 {
444     MachineState *machine = MACHINE(qdev_get_machine());
445     ObjectClass *oc;
446 
447     g_assert(machine->possible_cpus->cpus[0].cpu);
448     oc = OBJECT_CLASS(CPU_GET_CLASS(machine->possible_cpus->cpus[0].cpu));
449 
450     s390x_new_cpu(object_class_get_name(oc), id, errp);
451 }
452 
453 static void s390_nmi(NMIState *n, int cpu_index, Error **errp)
454 {
455     CPUState *cs = qemu_get_cpu(cpu_index);
456 
457     s390_cpu_restart(S390_CPU(cs));
458 }
459 
460 static void ccw_machine_class_init(ObjectClass *oc, void *data)
461 {
462     MachineClass *mc = MACHINE_CLASS(oc);
463     NMIClass *nc = NMI_CLASS(oc);
464     HotplugHandlerClass *hc = HOTPLUG_HANDLER_CLASS(oc);
465     S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
466 
467     s390mc->ri_allowed = true;
468     s390mc->cpu_model_allowed = true;
469     s390mc->css_migration_enabled = true;
470     s390mc->hpage_1m_allowed = true;
471     mc->init = ccw_init;
472     mc->reset = s390_machine_reset;
473     mc->hot_add_cpu = s390_hot_add_cpu;
474     mc->block_default_type = IF_VIRTIO;
475     mc->no_cdrom = 1;
476     mc->no_floppy = 1;
477     mc->no_parallel = 1;
478     mc->no_sdcard = 1;
479     mc->max_cpus = S390_MAX_CPUS;
480     mc->has_hotpluggable_cpus = true;
481     assert(!mc->get_hotplug_handler);
482     mc->get_hotplug_handler = s390_get_hotplug_handler;
483     mc->cpu_index_to_instance_props = s390_cpu_index_to_props;
484     mc->possible_cpu_arch_ids = s390_possible_cpu_arch_ids;
485     /* it is overridden with 'host' cpu *in kvm_arch_init* */
486     mc->default_cpu_type = S390_CPU_TYPE_NAME("qemu");
487     hc->plug = s390_machine_device_plug;
488     hc->unplug_request = s390_machine_device_unplug_request;
489     nc->nmi_monitor_handler = s390_nmi;
490 }
491 
492 static inline bool machine_get_aes_key_wrap(Object *obj, Error **errp)
493 {
494     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
495 
496     return ms->aes_key_wrap;
497 }
498 
499 static inline void machine_set_aes_key_wrap(Object *obj, bool value,
500                                             Error **errp)
501 {
502     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
503 
504     ms->aes_key_wrap = value;
505 }
506 
507 static inline bool machine_get_dea_key_wrap(Object *obj, Error **errp)
508 {
509     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
510 
511     return ms->dea_key_wrap;
512 }
513 
514 static inline void machine_set_dea_key_wrap(Object *obj, bool value,
515                                             Error **errp)
516 {
517     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
518 
519     ms->dea_key_wrap = value;
520 }
521 
522 static S390CcwMachineClass *current_mc;
523 
524 static S390CcwMachineClass *get_machine_class(void)
525 {
526     if (unlikely(!current_mc)) {
527         /*
528         * No s390 ccw machine was instantiated, we are likely to
529         * be called for the 'none' machine. The properties will
530         * have their after-initialization values.
531         */
532         current_mc = S390_MACHINE_CLASS(
533                      object_class_by_name(TYPE_S390_CCW_MACHINE));
534     }
535     return current_mc;
536 }
537 
538 bool ri_allowed(void)
539 {
540     /* for "none" machine this results in true */
541     return get_machine_class()->ri_allowed;
542 }
543 
544 bool cpu_model_allowed(void)
545 {
546     /* for "none" machine this results in true */
547     return get_machine_class()->cpu_model_allowed;
548 }
549 
550 bool hpage_1m_allowed(void)
551 {
552     /* for "none" machine this results in true */
553     return get_machine_class()->hpage_1m_allowed;
554 }
555 
556 static char *machine_get_loadparm(Object *obj, Error **errp)
557 {
558     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
559 
560     return g_memdup(ms->loadparm, sizeof(ms->loadparm));
561 }
562 
563 static void machine_set_loadparm(Object *obj, const char *val, Error **errp)
564 {
565     S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
566     int i;
567 
568     for (i = 0; i < sizeof(ms->loadparm) && val[i]; i++) {
569         uint8_t c = qemu_toupper(val[i]); /* mimic HMC */
570 
571         if (('A' <= c && c <= 'Z') || ('0' <= c && c <= '9') || (c == '.') ||
572             (c == ' ')) {
573             ms->loadparm[i] = c;
574         } else {
575             error_setg(errp, "LOADPARM: invalid character '%c' (ASCII 0x%02x)",
576                        c, c);
577             return;
578         }
579     }
580 
581     for (; i < sizeof(ms->loadparm); i++) {
582         ms->loadparm[i] = ' '; /* pad right with spaces */
583     }
584 }
585 static inline void s390_machine_initfn(Object *obj)
586 {
587     object_property_add_bool(obj, "aes-key-wrap",
588                              machine_get_aes_key_wrap,
589                              machine_set_aes_key_wrap, NULL);
590     object_property_set_description(obj, "aes-key-wrap",
591             "enable/disable AES key wrapping using the CPACF wrapping key",
592             NULL);
593     object_property_set_bool(obj, true, "aes-key-wrap", NULL);
594 
595     object_property_add_bool(obj, "dea-key-wrap",
596                              machine_get_dea_key_wrap,
597                              machine_set_dea_key_wrap, NULL);
598     object_property_set_description(obj, "dea-key-wrap",
599             "enable/disable DEA key wrapping using the CPACF wrapping key",
600             NULL);
601     object_property_set_bool(obj, true, "dea-key-wrap", NULL);
602     object_property_add_str(obj, "loadparm",
603             machine_get_loadparm, machine_set_loadparm, NULL);
604     object_property_set_description(obj, "loadparm",
605             "Up to 8 chars in set of [A-Za-z0-9. ] (lower case chars converted"
606             " to upper case) to pass to machine loader, boot manager,"
607             " and guest kernel",
608             NULL);
609 }
610 
611 static const TypeInfo ccw_machine_info = {
612     .name          = TYPE_S390_CCW_MACHINE,
613     .parent        = TYPE_MACHINE,
614     .abstract      = true,
615     .instance_size = sizeof(S390CcwMachineState),
616     .instance_init = s390_machine_initfn,
617     .class_size = sizeof(S390CcwMachineClass),
618     .class_init    = ccw_machine_class_init,
619     .interfaces = (InterfaceInfo[]) {
620         { TYPE_NMI },
621         { TYPE_HOTPLUG_HANDLER},
622         { }
623     },
624 };
625 
626 bool css_migration_enabled(void)
627 {
628     return get_machine_class()->css_migration_enabled;
629 }
630 
631 #define DEFINE_CCW_MACHINE(suffix, verstr, latest)                            \
632     static void ccw_machine_##suffix##_class_init(ObjectClass *oc,            \
633                                                   void *data)                 \
634     {                                                                         \
635         MachineClass *mc = MACHINE_CLASS(oc);                                 \
636         ccw_machine_##suffix##_class_options(mc);                             \
637         mc->desc = "VirtIO-ccw based S390 machine v" verstr;                  \
638         if (latest) {                                                         \
639             mc->alias = "s390-ccw-virtio";                                    \
640             mc->is_default = 1;                                               \
641         }                                                                     \
642     }                                                                         \
643     static void ccw_machine_##suffix##_instance_init(Object *obj)             \
644     {                                                                         \
645         MachineState *machine = MACHINE(obj);                                 \
646         current_mc = S390_MACHINE_CLASS(MACHINE_GET_CLASS(machine));          \
647         ccw_machine_##suffix##_instance_options(machine);                     \
648     }                                                                         \
649     static const TypeInfo ccw_machine_##suffix##_info = {                     \
650         .name = MACHINE_TYPE_NAME("s390-ccw-virtio-" verstr),                 \
651         .parent = TYPE_S390_CCW_MACHINE,                                      \
652         .class_init = ccw_machine_##suffix##_class_init,                      \
653         .instance_init = ccw_machine_##suffix##_instance_init,                \
654     };                                                                        \
655     static void ccw_machine_register_##suffix(void)                           \
656     {                                                                         \
657         type_register_static(&ccw_machine_##suffix##_info);                   \
658     }                                                                         \
659     type_init(ccw_machine_register_##suffix)
660 
661 static void ccw_machine_4_1_instance_options(MachineState *machine)
662 {
663 }
664 
665 static void ccw_machine_4_1_class_options(MachineClass *mc)
666 {
667 }
668 DEFINE_CCW_MACHINE(4_1, "4.1", true);
669 
670 static void ccw_machine_4_0_instance_options(MachineState *machine)
671 {
672     ccw_machine_4_1_instance_options(machine);
673 }
674 
675 static void ccw_machine_4_0_class_options(MachineClass *mc)
676 {
677     ccw_machine_4_1_class_options(mc);
678     compat_props_add(mc->compat_props, hw_compat_4_0, hw_compat_4_0_len);
679 }
680 DEFINE_CCW_MACHINE(4_0, "4.0", false);
681 
682 static void ccw_machine_3_1_instance_options(MachineState *machine)
683 {
684     static const S390FeatInit qemu_cpu_feat = { S390_FEAT_LIST_QEMU_V3_1 };
685     ccw_machine_4_0_instance_options(machine);
686     s390_cpudef_featoff_greater(14, 1, S390_FEAT_MULTIPLE_EPOCH);
687     s390_cpudef_group_featoff_greater(14, 1, S390_FEAT_GROUP_MULTIPLE_EPOCH_PTFF);
688     s390_set_qemu_cpu_model(0x2827, 12, 2, qemu_cpu_feat);
689 }
690 
691 static void ccw_machine_3_1_class_options(MachineClass *mc)
692 {
693     ccw_machine_4_0_class_options(mc);
694     compat_props_add(mc->compat_props, hw_compat_3_1, hw_compat_3_1_len);
695 }
696 DEFINE_CCW_MACHINE(3_1, "3.1", false);
697 
698 static void ccw_machine_3_0_instance_options(MachineState *machine)
699 {
700     ccw_machine_3_1_instance_options(machine);
701 }
702 
703 static void ccw_machine_3_0_class_options(MachineClass *mc)
704 {
705     S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
706 
707     s390mc->hpage_1m_allowed = false;
708     ccw_machine_3_1_class_options(mc);
709     compat_props_add(mc->compat_props, hw_compat_3_0, hw_compat_3_0_len);
710 }
711 DEFINE_CCW_MACHINE(3_0, "3.0", false);
712 
713 static void ccw_machine_2_12_instance_options(MachineState *machine)
714 {
715     ccw_machine_3_0_instance_options(machine);
716     s390_cpudef_featoff_greater(11, 1, S390_FEAT_PPA15);
717     s390_cpudef_featoff_greater(11, 1, S390_FEAT_BPB);
718 }
719 
720 static void ccw_machine_2_12_class_options(MachineClass *mc)
721 {
722     ccw_machine_3_0_class_options(mc);
723     compat_props_add(mc->compat_props, hw_compat_2_12, hw_compat_2_12_len);
724 }
725 DEFINE_CCW_MACHINE(2_12, "2.12", false);
726 
727 static void ccw_machine_2_11_instance_options(MachineState *machine)
728 {
729     static const S390FeatInit qemu_cpu_feat = { S390_FEAT_LIST_QEMU_V2_11 };
730     ccw_machine_2_12_instance_options(machine);
731 
732     /* before 2.12 we emulated the very first z900 */
733     s390_set_qemu_cpu_model(0x2064, 7, 1, qemu_cpu_feat);
734 }
735 
736 static void ccw_machine_2_11_class_options(MachineClass *mc)
737 {
738     static GlobalProperty compat[] = {
739         { TYPE_SCLP_EVENT_FACILITY, "allow_all_mask_sizes", "off", },
740     };
741 
742     ccw_machine_2_12_class_options(mc);
743     compat_props_add(mc->compat_props, hw_compat_2_11, hw_compat_2_11_len);
744     compat_props_add(mc->compat_props, compat, G_N_ELEMENTS(compat));
745 }
746 DEFINE_CCW_MACHINE(2_11, "2.11", false);
747 
748 static void ccw_machine_2_10_instance_options(MachineState *machine)
749 {
750     ccw_machine_2_11_instance_options(machine);
751 }
752 
753 static void ccw_machine_2_10_class_options(MachineClass *mc)
754 {
755     ccw_machine_2_11_class_options(mc);
756     compat_props_add(mc->compat_props, hw_compat_2_10, hw_compat_2_10_len);
757 }
758 DEFINE_CCW_MACHINE(2_10, "2.10", false);
759 
760 static void ccw_machine_2_9_instance_options(MachineState *machine)
761 {
762     ccw_machine_2_10_instance_options(machine);
763     s390_cpudef_featoff_greater(12, 1, S390_FEAT_ESOP);
764     s390_cpudef_featoff_greater(12, 1, S390_FEAT_SIDE_EFFECT_ACCESS_ESOP2);
765     s390_cpudef_featoff_greater(12, 1, S390_FEAT_ZPCI);
766     s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_INT_SUPPRESSION);
767     s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_EVENT_NOTIFICATION);
768 }
769 
770 static void ccw_machine_2_9_class_options(MachineClass *mc)
771 {
772     S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
773     static GlobalProperty compat[] = {
774         { TYPE_S390_STATTRIB, "migration-enabled", "off", },
775     };
776 
777     ccw_machine_2_10_class_options(mc);
778     compat_props_add(mc->compat_props, hw_compat_2_9, hw_compat_2_9_len);
779     compat_props_add(mc->compat_props, compat, G_N_ELEMENTS(compat));
780     s390mc->css_migration_enabled = false;
781 }
782 DEFINE_CCW_MACHINE(2_9, "2.9", false);
783 
784 static void ccw_machine_2_8_instance_options(MachineState *machine)
785 {
786     ccw_machine_2_9_instance_options(machine);
787 }
788 
789 static void ccw_machine_2_8_class_options(MachineClass *mc)
790 {
791     static GlobalProperty compat[] = {
792         { TYPE_S390_FLIC_COMMON, "adapter_routes_max_batch", "64", },
793     };
794 
795     ccw_machine_2_9_class_options(mc);
796     compat_props_add(mc->compat_props, hw_compat_2_8, hw_compat_2_8_len);
797     compat_props_add(mc->compat_props, compat, G_N_ELEMENTS(compat));
798 }
799 DEFINE_CCW_MACHINE(2_8, "2.8", false);
800 
801 static void ccw_machine_2_7_instance_options(MachineState *machine)
802 {
803     ccw_machine_2_8_instance_options(machine);
804 }
805 
806 static void ccw_machine_2_7_class_options(MachineClass *mc)
807 {
808     S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
809 
810     s390mc->cpu_model_allowed = false;
811     ccw_machine_2_8_class_options(mc);
812     compat_props_add(mc->compat_props, hw_compat_2_7, hw_compat_2_7_len);
813 }
814 DEFINE_CCW_MACHINE(2_7, "2.7", false);
815 
816 static void ccw_machine_2_6_instance_options(MachineState *machine)
817 {
818     ccw_machine_2_7_instance_options(machine);
819 }
820 
821 static void ccw_machine_2_6_class_options(MachineClass *mc)
822 {
823     S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
824     static GlobalProperty compat[] = {
825         { TYPE_S390_IPL, "iplbext_migration", "off", },
826          { TYPE_VIRTUAL_CSS_BRIDGE, "css_dev_path", "off", },
827     };
828 
829     s390mc->ri_allowed = false;
830     ccw_machine_2_7_class_options(mc);
831     compat_props_add(mc->compat_props, hw_compat_2_6, hw_compat_2_6_len);
832     compat_props_add(mc->compat_props, compat, G_N_ELEMENTS(compat));
833 }
834 DEFINE_CCW_MACHINE(2_6, "2.6", false);
835 
836 static void ccw_machine_2_5_instance_options(MachineState *machine)
837 {
838     ccw_machine_2_6_instance_options(machine);
839 }
840 
841 static void ccw_machine_2_5_class_options(MachineClass *mc)
842 {
843     ccw_machine_2_6_class_options(mc);
844     compat_props_add(mc->compat_props, hw_compat_2_5, hw_compat_2_5_len);
845 }
846 DEFINE_CCW_MACHINE(2_5, "2.5", false);
847 
848 static void ccw_machine_2_4_instance_options(MachineState *machine)
849 {
850     ccw_machine_2_5_instance_options(machine);
851 }
852 
853 static void ccw_machine_2_4_class_options(MachineClass *mc)
854 {
855     static GlobalProperty compat[] = {
856         { TYPE_S390_SKEYS, "migration-enabled", "off", },
857         { "virtio-blk-ccw", "max_revision", "0", },
858         { "virtio-balloon-ccw", "max_revision", "0", },
859         { "virtio-serial-ccw", "max_revision", "0", },
860         { "virtio-9p-ccw", "max_revision", "0", },
861         { "virtio-rng-ccw", "max_revision", "0", },
862         { "virtio-net-ccw", "max_revision", "0", },
863         { "virtio-scsi-ccw", "max_revision", "0", },
864         { "vhost-scsi-ccw", "max_revision", "0", },
865     };
866 
867     ccw_machine_2_5_class_options(mc);
868     compat_props_add(mc->compat_props, hw_compat_2_4, hw_compat_2_4_len);
869     compat_props_add(mc->compat_props, compat, G_N_ELEMENTS(compat));
870 }
871 DEFINE_CCW_MACHINE(2_4, "2.4", false);
872 
873 static void ccw_machine_register_types(void)
874 {
875     type_register_static(&ccw_machine_info);
876 }
877 
878 type_init(ccw_machine_register_types)
879