?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
target/arm: Tidy scr_write
[qemu/ar7.git] / hw / s390x / s390-virtio-ccw.c
blobfd9d0b0542bba67e60cff475902de97cc1fc8637
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 "hw/s390x/s390-virtio-hcall.h"
19 #include "hw/s390x/sclp.h"
20 #include "hw/s390x/s390_flic.h"
21 #include "hw/s390x/ioinst.h"
22 #include "hw/s390x/css.h"
23 #include "virtio-ccw.h"
24 #include "qemu/config-file.h"
25 #include "qemu/error-report.h"
26 #include "qemu/option.h"
27 #include "s390-pci-bus.h"
28 #include "hw/s390x/storage-keys.h"
29 #include "hw/s390x/storage-attributes.h"
30 #include "hw/s390x/event-facility.h"
31 #include "hw/compat.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 gchar *name;
168
169 /* allocate RAM for core */
170 name = g_strdup_printf("s390.ram");
171 while (mem_size) {
172 MemoryRegion *ram = g_new(MemoryRegion, 1);
173 uint64_t size = mem_size;
174
175 /* KVM does not allow memslots >= 8 TB */
176 chunk = MIN(size, KVM_SLOT_MAX_BYTES);
177 memory_region_allocate_system_memory(ram, NULL, name, chunk);
178 memory_region_add_subregion(sysmem, offset, ram);
179 mem_size -= chunk;
180 offset += chunk;
181 g_free(name);
182 name = g_strdup_printf("s390.ram.%u", ++number);
183 }
184 g_free(name);
185
186 /* Initialize storage key device */
187 s390_skeys_init();
188 /* Initialize storage attributes device */
189 s390_stattrib_init();
190 }
191
192 static void s390_init_ipl_dev(const char *kernel_filename,
193 const char *kernel_cmdline,
194 const char *initrd_filename, const char *firmware,
195 const char *netboot_fw, bool enforce_bios)
196 {
197 Object *new = object_new(TYPE_S390_IPL);
198 DeviceState *dev = DEVICE(new);
199 char *netboot_fw_prop;
200
201 if (kernel_filename) {
202 qdev_prop_set_string(dev, "kernel", kernel_filename);
203 }
204 if (initrd_filename) {
205 qdev_prop_set_string(dev, "initrd", initrd_filename);
206 }
207 qdev_prop_set_string(dev, "cmdline", kernel_cmdline);
208 qdev_prop_set_string(dev, "firmware", firmware);
209 qdev_prop_set_bit(dev, "enforce_bios", enforce_bios);
210 netboot_fw_prop = object_property_get_str(new, "netboot_fw", &error_abort);
211 if (!strlen(netboot_fw_prop)) {
212 qdev_prop_set_string(dev, "netboot_fw", netboot_fw);
213 }
214 g_free(netboot_fw_prop);
215 object_property_add_child(qdev_get_machine(), TYPE_S390_IPL,
216 new, NULL);
217 object_unref(new);
218 qdev_init_nofail(dev);
219 }
220
221 static void s390_create_virtio_net(BusState *bus, const char *name)
222 {
223 int i;
224
225 for (i = 0; i < nb_nics; i++) {
226 NICInfo *nd = &nd_table[i];
227 DeviceState *dev;
228
229 if (!nd->model) {
230 nd->model = g_strdup("virtio");
231 }
232
233 qemu_check_nic_model(nd, "virtio");
234
235 dev = qdev_create(bus, name);
236 qdev_set_nic_properties(dev, nd);
237 qdev_init_nofail(dev);
238 }
239 }
240
241 static void s390_create_sclpconsole(const char *type, Chardev *chardev)
242 {
243 DeviceState *dev;
244
245 dev = qdev_create(sclp_get_event_facility_bus(), type);
246 qdev_prop_set_chr(dev, "chardev", chardev);
247 qdev_init_nofail(dev);
248 }
249
250 static void ccw_init(MachineState *machine)
251 {
252 int ret;
253 VirtualCssBus *css_bus;
254 DeviceState *dev;
255
256 s390_sclp_init();
257 s390_memory_init(machine->ram_size);
258
259 /* init CPUs (incl. CPU model) early so s390_has_feature() works */
260 s390_init_cpus(machine);
261
262 s390_flic_init();
263
264 /* init the SIGP facility */
265 s390_init_sigp();
266
267 /* create AP bridge and bus(es) */
268 s390_init_ap();
269
270 /* get a BUS */
271 css_bus = virtual_css_bus_init();
272 s390_init_ipl_dev(machine->kernel_filename, machine->kernel_cmdline,
273 machine->initrd_filename, "s390-ccw.img",
274 "s390-netboot.img", true);
275
276 /*
277 * We cannot easily make the pci host bridge conditional as older QEMUs
278 * always created it. Doing so would break migration across QEMU versions.
279 */
280 dev = qdev_create(NULL, TYPE_S390_PCI_HOST_BRIDGE);
281 object_property_add_child(qdev_get_machine(), TYPE_S390_PCI_HOST_BRIDGE,
282 OBJECT(dev), NULL);
283 qdev_init_nofail(dev);
284
285 /* register hypercalls */
286 virtio_ccw_register_hcalls();
287
288 s390_enable_css_support(s390_cpu_addr2state(0));
289
290 ret = css_create_css_image(VIRTUAL_CSSID, true);
291
292 assert(ret == 0);
293 if (css_migration_enabled()) {
294 css_register_vmstate();
295 }
296
297 /* Create VirtIO network adapters */
298 s390_create_virtio_net(BUS(css_bus), "virtio-net-ccw");
299
300 /* init consoles */
301 if (serial_hd(0)) {
302 s390_create_sclpconsole("sclpconsole", serial_hd(0));
303 }
304 if (serial_hd(1)) {
305 s390_create_sclpconsole("sclplmconsole", serial_hd(1));
306 }
307
308 /* init the TOD clock */
309 s390_init_tod();
310 }
311
312 static void s390_cpu_plug(HotplugHandler *hotplug_dev,
313 DeviceState *dev, Error **errp)
314 {
315 MachineState *ms = MACHINE(hotplug_dev);
316 S390CPU *cpu = S390_CPU(dev);
317
318 g_assert(!ms->possible_cpus->cpus[cpu->env.core_id].cpu);
319 ms->possible_cpus->cpus[cpu->env.core_id].cpu = OBJECT(dev);
320
321 if (dev->hotplugged) {
322 raise_irq_cpu_hotplug();
323 }
324 }
325
326 static inline void s390_do_cpu_ipl(CPUState *cs, run_on_cpu_data arg)
327 {
328 S390CPU *cpu = S390_CPU(cs);
329
330 s390_ipl_prepare_cpu(cpu);
331 s390_cpu_set_state(S390_CPU_STATE_OPERATING, cpu);
332 }
333
334 static void s390_machine_reset(void)
335 {
336 enum s390_reset reset_type;
337 CPUState *cs, *t;
338
339 /* get the reset parameters, reset them once done */
340 s390_ipl_get_reset_request(&cs, &reset_type);
341
342 /* all CPUs are paused and synchronized at this point */
343 s390_cmma_reset();
344
345 switch (reset_type) {
346 case S390_RESET_EXTERNAL:
347 case S390_RESET_REIPL:
348 qemu_devices_reset();
349 s390_crypto_reset();
350
351 /* configure and start the ipl CPU only */
352 run_on_cpu(cs, s390_do_cpu_ipl, RUN_ON_CPU_NULL);
353 break;
354 case S390_RESET_MODIFIED_CLEAR:
355 CPU_FOREACH(t) {
356 run_on_cpu(t, s390_do_cpu_full_reset, RUN_ON_CPU_NULL);
357 }
358 subsystem_reset();
359 s390_crypto_reset();
360 run_on_cpu(cs, s390_do_cpu_load_normal, RUN_ON_CPU_NULL);
361 break;
362 case S390_RESET_LOAD_NORMAL:
363 CPU_FOREACH(t) {
364 run_on_cpu(t, s390_do_cpu_reset, RUN_ON_CPU_NULL);
365 }
366 subsystem_reset();
367 run_on_cpu(cs, s390_do_cpu_initial_reset, RUN_ON_CPU_NULL);
368 run_on_cpu(cs, s390_do_cpu_load_normal, RUN_ON_CPU_NULL);
369 break;
370 default:
371 g_assert_not_reached();
372 }
373 s390_ipl_clear_reset_request();
374 }
375
376 static void s390_machine_device_plug(HotplugHandler *hotplug_dev,
377 DeviceState *dev, Error **errp)
378 {
379 if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
380 s390_cpu_plug(hotplug_dev, dev, errp);
381 }
382 }
383
384 static void s390_machine_device_unplug_request(HotplugHandler *hotplug_dev,
385 DeviceState *dev, Error **errp)
386 {
387 if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
388 error_setg(errp, "CPU hot unplug not supported on this machine");
389 return;
390 }
391 }
392
393 static CpuInstanceProperties s390_cpu_index_to_props(MachineState *ms,
394 unsigned cpu_index)
395 {
396 MachineClass *mc = MACHINE_GET_CLASS(ms);
397 const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(ms);
398
399 assert(cpu_index < possible_cpus->len);
400 return possible_cpus->cpus[cpu_index].props;
401 }
402
403 static const CPUArchIdList *s390_possible_cpu_arch_ids(MachineState *ms)
404 {
405 int i;
406
407 if (ms->possible_cpus) {
408 g_assert(ms->possible_cpus && ms->possible_cpus->len == max_cpus);
409 return ms->possible_cpus;
410 }
411
412 ms->possible_cpus = g_malloc0(sizeof(CPUArchIdList) +
413 sizeof(CPUArchId) * max_cpus);
414 ms->possible_cpus->len = max_cpus;
415 for (i = 0; i < ms->possible_cpus->len; i++) {
416 ms->possible_cpus->cpus[i].type = ms->cpu_type;
417 ms->possible_cpus->cpus[i].vcpus_count = 1;
418 ms->possible_cpus->cpus[i].arch_id = i;
419 ms->possible_cpus->cpus[i].props.has_core_id = true;
420 ms->possible_cpus->cpus[i].props.core_id = i;
421 }
422
423 return ms->possible_cpus;
424 }
425
426 static HotplugHandler *s390_get_hotplug_handler(MachineState *machine,
427 DeviceState *dev)
428 {
429 if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
430 return HOTPLUG_HANDLER(machine);
431 }
432 return NULL;
433 }
434
435 static void s390_hot_add_cpu(const int64_t id, Error **errp)
436 {
437 MachineState *machine = MACHINE(qdev_get_machine());
438 ObjectClass *oc;
439
440 g_assert(machine->possible_cpus->cpus[0].cpu);
441 oc = OBJECT_CLASS(CPU_GET_CLASS(machine->possible_cpus->cpus[0].cpu));
442
443 s390x_new_cpu(object_class_get_name(oc), id, errp);
444 }
445
446 static void s390_nmi(NMIState *n, int cpu_index, Error **errp)
447 {
448 CPUState *cs = qemu_get_cpu(cpu_index);
449
450 s390_cpu_restart(S390_CPU(cs));
451 }
452
453 static void ccw_machine_class_init(ObjectClass *oc, void *data)
454 {
455 MachineClass *mc = MACHINE_CLASS(oc);
456 NMIClass *nc = NMI_CLASS(oc);
457 HotplugHandlerClass *hc = HOTPLUG_HANDLER_CLASS(oc);
458 S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
459
460 s390mc->ri_allowed = true;
461 s390mc->cpu_model_allowed = true;
462 s390mc->css_migration_enabled = true;
463 s390mc->hpage_1m_allowed = true;
464 mc->init = ccw_init;
465 mc->reset = s390_machine_reset;
466 mc->hot_add_cpu = s390_hot_add_cpu;
467 mc->block_default_type = IF_VIRTIO;
468 mc->no_cdrom = 1;
469 mc->no_floppy = 1;
470 mc->no_parallel = 1;
471 mc->no_sdcard = 1;
472 mc->max_cpus = S390_MAX_CPUS;
473 mc->has_hotpluggable_cpus = true;
474 assert(!mc->get_hotplug_handler);
475 mc->get_hotplug_handler = s390_get_hotplug_handler;
476 mc->cpu_index_to_instance_props = s390_cpu_index_to_props;
477 mc->possible_cpu_arch_ids = s390_possible_cpu_arch_ids;
478 /* it is overridden with 'host' cpu *in kvm_arch_init* */
479 mc->default_cpu_type = S390_CPU_TYPE_NAME("qemu");
480 hc->plug = s390_machine_device_plug;
481 hc->unplug_request = s390_machine_device_unplug_request;
482 nc->nmi_monitor_handler = s390_nmi;
483 }
484
485 static inline bool machine_get_aes_key_wrap(Object *obj, Error **errp)
486 {
487 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
488
489 return ms->aes_key_wrap;
490 }
491
492 static inline void machine_set_aes_key_wrap(Object *obj, bool value,
493 Error **errp)
494 {
495 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
496
497 ms->aes_key_wrap = value;
498 }
499
500 static inline bool machine_get_dea_key_wrap(Object *obj, Error **errp)
501 {
502 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
503
504 return ms->dea_key_wrap;
505 }
506
507 static inline void machine_set_dea_key_wrap(Object *obj, bool value,
508 Error **errp)
509 {
510 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
511
512 ms->dea_key_wrap = value;
513 }
514
515 static S390CcwMachineClass *current_mc;
516
517 static S390CcwMachineClass *get_machine_class(void)
518 {
519 if (unlikely(!current_mc)) {
520 /*
521 * No s390 ccw machine was instantiated, we are likely to
522 * be called for the 'none' machine. The properties will
523 * have their after-initialization values.
524 */
525 current_mc = S390_MACHINE_CLASS(
526 object_class_by_name(TYPE_S390_CCW_MACHINE));
527 }
528 return current_mc;
529 }
530
531 bool ri_allowed(void)
532 {
533 /* for "none" machine this results in true */
534 return get_machine_class()->ri_allowed;
535 }
536
537 bool cpu_model_allowed(void)
538 {
539 /* for "none" machine this results in true */
540 return get_machine_class()->cpu_model_allowed;
541 }
542
543 bool hpage_1m_allowed(void)
544 {
545 /* for "none" machine this results in true */
546 return get_machine_class()->hpage_1m_allowed;
547 }
548
549 static char *machine_get_loadparm(Object *obj, Error **errp)
550 {
551 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
552
553 return g_memdup(ms->loadparm, sizeof(ms->loadparm));
554 }
555
556 static void machine_set_loadparm(Object *obj, const char *val, Error **errp)
557 {
558 S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
559 int i;
560
561 for (i = 0; i < sizeof(ms->loadparm) && val[i]; i++) {
562 uint8_t c = qemu_toupper(val[i]); /* mimic HMC */
563
564 if (('A' <= c && c <= 'Z') || ('0' <= c && c <= '9') || (c == '.') ||
565 (c == ' ')) {
566 ms->loadparm[i] = c;
567 } else {
568 error_setg(errp, "LOADPARM: invalid character '%c' (ASCII 0x%02x)",
569 c, c);
570 return;
571 }
572 }
573
574 for (; i < sizeof(ms->loadparm); i++) {
575 ms->loadparm[i] = ' '; /* pad right with spaces */
576 }
577 }
578 static inline void s390_machine_initfn(Object *obj)
579 {
580 object_property_add_bool(obj, "aes-key-wrap",
581 machine_get_aes_key_wrap,
582 machine_set_aes_key_wrap, NULL);
583 object_property_set_description(obj, "aes-key-wrap",
584 "enable/disable AES key wrapping using the CPACF wrapping key",
585 NULL);
586 object_property_set_bool(obj, true, "aes-key-wrap", NULL);
587
588 object_property_add_bool(obj, "dea-key-wrap",
589 machine_get_dea_key_wrap,
590 machine_set_dea_key_wrap, NULL);
591 object_property_set_description(obj, "dea-key-wrap",
592 "enable/disable DEA key wrapping using the CPACF wrapping key",
593 NULL);
594 object_property_set_bool(obj, true, "dea-key-wrap", NULL);
595 object_property_add_str(obj, "loadparm",
596 machine_get_loadparm, machine_set_loadparm, NULL);
597 object_property_set_description(obj, "loadparm",
598 "Up to 8 chars in set of [A-Za-z0-9. ] (lower case chars converted"
599 " to upper case) to pass to machine loader, boot manager,"
600 " and guest kernel",
601 NULL);
602 }
603
604 static const TypeInfo ccw_machine_info = {
605 .name = TYPE_S390_CCW_MACHINE,
606 .parent = TYPE_MACHINE,
607 .abstract = true,
608 .instance_size = sizeof(S390CcwMachineState),
609 .instance_init = s390_machine_initfn,
610 .class_size = sizeof(S390CcwMachineClass),
611 .class_init = ccw_machine_class_init,
612 .interfaces = (InterfaceInfo[]) {
613 { TYPE_NMI },
614 { TYPE_HOTPLUG_HANDLER},
615 { }
616 },
617 };
618
619 bool css_migration_enabled(void)
620 {
621 return get_machine_class()->css_migration_enabled;
622 }
623
624 #define DEFINE_CCW_MACHINE(suffix, verstr, latest) \
625 static void ccw_machine_##suffix##_class_init(ObjectClass *oc, \
626 void *data) \
627 { \
628 MachineClass *mc = MACHINE_CLASS(oc); \
629 ccw_machine_##suffix##_class_options(mc); \
630 mc->desc = "VirtIO-ccw based S390 machine v" verstr; \
631 if (latest) { \
632 mc->alias = "s390-ccw-virtio"; \
633 mc->is_default = 1; \
634 } \
635 } \
636 static void ccw_machine_##suffix##_instance_init(Object *obj) \
637 { \
638 MachineState *machine = MACHINE(obj); \
639 current_mc = S390_MACHINE_CLASS(MACHINE_GET_CLASS(machine)); \
640 ccw_machine_##suffix##_instance_options(machine); \
641 } \
642 static const TypeInfo ccw_machine_##suffix##_info = { \
643 .name = MACHINE_TYPE_NAME("s390-ccw-virtio-" verstr), \
644 .parent = TYPE_S390_CCW_MACHINE, \
645 .class_init = ccw_machine_##suffix##_class_init, \
646 .instance_init = ccw_machine_##suffix##_instance_init, \
647 }; \
648 static void ccw_machine_register_##suffix(void) \
649 { \
650 type_register_static(&ccw_machine_##suffix##_info); \
651 } \
652 type_init(ccw_machine_register_##suffix)
653
654 #define CCW_COMPAT_3_1 \
655 HW_COMPAT_3_1
656
657 #define CCW_COMPAT_3_0 \
658 HW_COMPAT_3_0
659
660 #define CCW_COMPAT_2_12 \
661 HW_COMPAT_2_12
662
663 #define CCW_COMPAT_2_11 \
664 HW_COMPAT_2_11 \
665 {\
666 .driver = TYPE_SCLP_EVENT_FACILITY,\
667 .property = "allow_all_mask_sizes",\
668 .value = "off",\
669 },
670
671 #define CCW_COMPAT_2_10 \
672 HW_COMPAT_2_10
673
674 #define CCW_COMPAT_2_9 \
675 HW_COMPAT_2_9 \
676 {\
677 .driver = TYPE_S390_STATTRIB,\
678 .property = "migration-enabled",\
679 .value = "off",\
680 },
681
682 #define CCW_COMPAT_2_8 \
683 HW_COMPAT_2_8 \
684 {\
685 .driver = TYPE_S390_FLIC_COMMON,\
686 .property = "adapter_routes_max_batch",\
687 .value = "64",\
688 },
689
690 #define CCW_COMPAT_2_7 \
691 HW_COMPAT_2_7
692
693 #define CCW_COMPAT_2_6 \
694 HW_COMPAT_2_6 \
695 {\
696 .driver = TYPE_S390_IPL,\
697 .property = "iplbext_migration",\
698 .value = "off",\
699 }, {\
700 .driver = TYPE_VIRTUAL_CSS_BRIDGE,\
701 .property = "css_dev_path",\
702 .value = "off",\
703 },
704
705 #define CCW_COMPAT_2_5 \
706 HW_COMPAT_2_5
707
708 #define CCW_COMPAT_2_4 \
709 HW_COMPAT_2_4 \
710 {\
711 .driver = TYPE_S390_SKEYS,\
712 .property = "migration-enabled",\
713 .value = "off",\
714 },{\
715 .driver = "virtio-blk-ccw",\
716 .property = "max_revision",\
717 .value = "0",\
718 },{\
719 .driver = "virtio-balloon-ccw",\
720 .property = "max_revision",\
721 .value = "0",\
722 },{\
723 .driver = "virtio-serial-ccw",\
724 .property = "max_revision",\
725 .value = "0",\
726 },{\
727 .driver = "virtio-9p-ccw",\
728 .property = "max_revision",\
729 .value = "0",\
730 },{\
731 .driver = "virtio-rng-ccw",\
732 .property = "max_revision",\
733 .value = "0",\
734 },{\
735 .driver = "virtio-net-ccw",\
736 .property = "max_revision",\
737 .value = "0",\
738 },{\
739 .driver = "virtio-scsi-ccw",\
740 .property = "max_revision",\
741 .value = "0",\
742 },{\
743 .driver = "vhost-scsi-ccw",\
744 .property = "max_revision",\
745 .value = "0",\
746 },
747
748 static void ccw_machine_4_0_instance_options(MachineState *machine)
749 {
750 }
751
752 static void ccw_machine_4_0_class_options(MachineClass *mc)
753 {
754 }
755 DEFINE_CCW_MACHINE(4_0, "4.0", true);
756
757 static void ccw_machine_3_1_instance_options(MachineState *machine)
758 {
759 ccw_machine_4_0_instance_options(machine);
760 }
761
762 static void ccw_machine_3_1_class_options(MachineClass *mc)
763 {
764 ccw_machine_4_0_class_options(mc);
765 SET_MACHINE_COMPAT(mc, CCW_COMPAT_3_1);
766 }
767 DEFINE_CCW_MACHINE(3_1, "3.1", false);
768
769 static void ccw_machine_3_0_instance_options(MachineState *machine)
770 {
771 ccw_machine_3_1_instance_options(machine);
772 }
773
774 static void ccw_machine_3_0_class_options(MachineClass *mc)
775 {
776 S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
777
778 s390mc->hpage_1m_allowed = false;
779 ccw_machine_3_1_class_options(mc);
780 SET_MACHINE_COMPAT(mc, CCW_COMPAT_3_0);
781 }
782 DEFINE_CCW_MACHINE(3_0, "3.0", false);
783
784 static void ccw_machine_2_12_instance_options(MachineState *machine)
785 {
786 ccw_machine_3_0_instance_options(machine);
787 s390_cpudef_featoff_greater(11, 1, S390_FEAT_PPA15);
788 s390_cpudef_featoff_greater(11, 1, S390_FEAT_BPB);
789 }
790
791 static void ccw_machine_2_12_class_options(MachineClass *mc)
792 {
793 ccw_machine_3_0_class_options(mc);
794 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_12);
795 }
796 DEFINE_CCW_MACHINE(2_12, "2.12", false);
797
798 static void ccw_machine_2_11_instance_options(MachineState *machine)
799 {
800 static const S390FeatInit qemu_cpu_feat = { S390_FEAT_LIST_QEMU_V2_11 };
801 ccw_machine_2_12_instance_options(machine);
802
803 /* before 2.12 we emulated the very first z900 */
804 s390_set_qemu_cpu_model(0x2064, 7, 1, qemu_cpu_feat);
805 }
806
807 static void ccw_machine_2_11_class_options(MachineClass *mc)
808 {
809 ccw_machine_2_12_class_options(mc);
810 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_11);
811 }
812 DEFINE_CCW_MACHINE(2_11, "2.11", false);
813
814 static void ccw_machine_2_10_instance_options(MachineState *machine)
815 {
816 ccw_machine_2_11_instance_options(machine);
817 }
818
819 static void ccw_machine_2_10_class_options(MachineClass *mc)
820 {
821 ccw_machine_2_11_class_options(mc);
822 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_10);
823 }
824 DEFINE_CCW_MACHINE(2_10, "2.10", false);
825
826 static void ccw_machine_2_9_instance_options(MachineState *machine)
827 {
828 ccw_machine_2_10_instance_options(machine);
829 s390_cpudef_featoff_greater(12, 1, S390_FEAT_ESOP);
830 s390_cpudef_featoff_greater(12, 1, S390_FEAT_SIDE_EFFECT_ACCESS_ESOP2);
831 s390_cpudef_featoff_greater(12, 1, S390_FEAT_ZPCI);
832 s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_INT_SUPPRESSION);
833 s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_EVENT_NOTIFICATION);
834 }
835
836 static void ccw_machine_2_9_class_options(MachineClass *mc)
837 {
838 S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
839
840 ccw_machine_2_10_class_options(mc);
841 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_9);
842 s390mc->css_migration_enabled = false;
843 }
844 DEFINE_CCW_MACHINE(2_9, "2.9", false);
845
846 static void ccw_machine_2_8_instance_options(MachineState *machine)
847 {
848 ccw_machine_2_9_instance_options(machine);
849 }
850
851 static void ccw_machine_2_8_class_options(MachineClass *mc)
852 {
853 ccw_machine_2_9_class_options(mc);
854 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_8);
855 }
856 DEFINE_CCW_MACHINE(2_8, "2.8", false);
857
858 static void ccw_machine_2_7_instance_options(MachineState *machine)
859 {
860 ccw_machine_2_8_instance_options(machine);
861 }
862
863 static void ccw_machine_2_7_class_options(MachineClass *mc)
864 {
865 S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
866
867 s390mc->cpu_model_allowed = false;
868 ccw_machine_2_8_class_options(mc);
869 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_7);
870 }
871 DEFINE_CCW_MACHINE(2_7, "2.7", false);
872
873 static void ccw_machine_2_6_instance_options(MachineState *machine)
874 {
875 ccw_machine_2_7_instance_options(machine);
876 }
877
878 static void ccw_machine_2_6_class_options(MachineClass *mc)
879 {
880 S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
881
882 s390mc->ri_allowed = false;
883 ccw_machine_2_7_class_options(mc);
884 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_6);
885 }
886 DEFINE_CCW_MACHINE(2_6, "2.6", false);
887
888 static void ccw_machine_2_5_instance_options(MachineState *machine)
889 {
890 ccw_machine_2_6_instance_options(machine);
891 }
892
893 static void ccw_machine_2_5_class_options(MachineClass *mc)
894 {
895 ccw_machine_2_6_class_options(mc);
896 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_5);
897 }
898 DEFINE_CCW_MACHINE(2_5, "2.5", false);
899
900 static void ccw_machine_2_4_instance_options(MachineState *machine)
901 {
902 ccw_machine_2_5_instance_options(machine);
903 }
904
905 static void ccw_machine_2_4_class_options(MachineClass *mc)
906 {
907 ccw_machine_2_5_class_options(mc);
908 SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_4);
909 }
910 DEFINE_CCW_MACHINE(2_4, "2.4", false);
911
912 static void ccw_machine_register_types(void)
913 {
914 type_register_static(&ccw_machine_info);
915 }
916
917 type_init(ccw_machine_register_types)
AR7 emulation for QEMU