qemu/hw/s390x/s390-virtio-ccw.c
<<
>>
Prefs
   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 "migration/register.h"
  36#include "cpu_models.h"
  37#include "hw/nmi.h"
  38#include "hw/s390x/tod.h"
  39
  40S390CPU *s390_cpu_addr2state(uint16_t cpu_addr)
  41{
  42    static MachineState *ms;
  43
  44    if (!ms) {
  45        ms = MACHINE(qdev_get_machine());
  46        g_assert(ms->possible_cpus);
  47    }
  48
  49    /* CPU address corresponds to the core_id and the index */
  50    if (cpu_addr >= ms->possible_cpus->len) {
  51        return NULL;
  52    }
  53    return S390_CPU(ms->possible_cpus->cpus[cpu_addr].cpu);
  54}
  55
  56static S390CPU *s390x_new_cpu(const char *typename, uint32_t core_id,
  57                              Error **errp)
  58{
  59    S390CPU *cpu = S390_CPU(object_new(typename));
  60    Error *err = NULL;
  61
  62    object_property_set_int(OBJECT(cpu), core_id, "core-id", &err);
  63    if (err != NULL) {
  64        goto out;
  65    }
  66    object_property_set_bool(OBJECT(cpu), true, "realized", &err);
  67
  68out:
  69    object_unref(OBJECT(cpu));
  70    if (err) {
  71        error_propagate(errp, err);
  72        cpu = NULL;
  73    }
  74    return cpu;
  75}
  76
  77static void s390_init_cpus(MachineState *machine)
  78{
  79    MachineClass *mc = MACHINE_GET_CLASS(machine);
  80    int i;
  81
  82    /* initialize possible_cpus */
  83    mc->possible_cpu_arch_ids(machine);
  84
  85    for (i = 0; i < smp_cpus; i++) {
  86        s390x_new_cpu(machine->cpu_type, i, &error_fatal);
  87    }
  88}
  89
  90static const char *const reset_dev_types[] = {
  91    TYPE_VIRTUAL_CSS_BRIDGE,
  92    "s390-sclp-event-facility",
  93    "s390-flic",
  94    "diag288",
  95};
  96
  97static void subsystem_reset(void)
  98{
  99    DeviceState *dev;
 100    int i;
 101
 102    for (i = 0; i < ARRAY_SIZE(reset_dev_types); i++) {
 103        dev = DEVICE(object_resolve_path_type("", reset_dev_types[i], NULL));
 104        if (dev) {
 105            qdev_reset_all(dev);
 106        }
 107    }
 108}
 109
 110static int virtio_ccw_hcall_notify(const uint64_t *args)
 111{
 112    uint64_t subch_id = args[0];
 113    uint64_t queue = args[1];
 114    SubchDev *sch;
 115    int cssid, ssid, schid, m;
 116
 117    if (ioinst_disassemble_sch_ident(subch_id, &m, &cssid, &ssid, &schid)) {
 118        return -EINVAL;
 119    }
 120    sch = css_find_subch(m, cssid, ssid, schid);
 121    if (!sch || !css_subch_visible(sch)) {
 122        return -EINVAL;
 123    }
 124    if (queue >= VIRTIO_QUEUE_MAX) {
 125        return -EINVAL;
 126    }
 127    virtio_queue_notify(virtio_ccw_get_vdev(sch), queue);
 128    return 0;
 129
 130}
 131
 132static int virtio_ccw_hcall_early_printk(const uint64_t *args)
 133{
 134    uint64_t mem = args[0];
 135
 136    if (mem < ram_size) {
 137        /* Early printk */
 138        return 0;
 139    }
 140    return -EINVAL;
 141}
 142
 143static void virtio_ccw_register_hcalls(void)
 144{
 145    s390_register_virtio_hypercall(KVM_S390_VIRTIO_CCW_NOTIFY,
 146                                   virtio_ccw_hcall_notify);
 147    /* Tolerate early printk. */
 148    s390_register_virtio_hypercall(KVM_S390_VIRTIO_NOTIFY,
 149                                   virtio_ccw_hcall_early_printk);
 150}
 151
 152/*
 153 * KVM does only support memory slots up to KVM_MEM_MAX_NR_PAGES pages
 154 * as the dirty bitmap must be managed by bitops that take an int as
 155 * position indicator. If we have a guest beyond that we will split off
 156 * new subregions. The split must happen on a segment boundary (1MB).
 157 */
 158#define KVM_MEM_MAX_NR_PAGES ((1ULL << 31) - 1)
 159#define SEG_MSK (~0xfffffULL)
 160#define KVM_SLOT_MAX_BYTES ((KVM_MEM_MAX_NR_PAGES * TARGET_PAGE_SIZE) & SEG_MSK)
 161static void s390_memory_init(ram_addr_t mem_size)
 162{
 163    MemoryRegion *sysmem = get_system_memory();
 164    ram_addr_t chunk, offset = 0;
 165    unsigned int number = 0;
 166    gchar *name;
 167
 168    /* allocate RAM for core */
 169    name = g_strdup_printf("s390.ram");
 170    while (mem_size) {
 171        MemoryRegion *ram = g_new(MemoryRegion, 1);
 172        uint64_t size = mem_size;
 173
 174        /* KVM does not allow memslots >= 8 TB */
 175        chunk = MIN(size, KVM_SLOT_MAX_BYTES);
 176        memory_region_allocate_system_memory(ram, NULL, name, chunk);
 177        memory_region_add_subregion(sysmem, offset, ram);
 178        mem_size -= chunk;
 179        offset += chunk;
 180        g_free(name);
 181        name = g_strdup_printf("s390.ram.%u", ++number);
 182    }
 183    g_free(name);
 184
 185    /* Initialize storage key device */
 186    s390_skeys_init();
 187    /* Initialize storage attributes device */
 188    s390_stattrib_init();
 189}
 190
 191static void s390_init_ipl_dev(const char *kernel_filename,
 192                              const char *kernel_cmdline,
 193                              const char *initrd_filename, const char *firmware,
 194                              const char *netboot_fw, bool enforce_bios)
 195{
 196    Object *new = object_new(TYPE_S390_IPL);
 197    DeviceState *dev = DEVICE(new);
 198    char *netboot_fw_prop;
 199
 200    if (kernel_filename) {
 201        qdev_prop_set_string(dev, "kernel", kernel_filename);
 202    }
 203    if (initrd_filename) {
 204        qdev_prop_set_string(dev, "initrd", initrd_filename);
 205    }
 206    qdev_prop_set_string(dev, "cmdline", kernel_cmdline);
 207    qdev_prop_set_string(dev, "firmware", firmware);
 208    qdev_prop_set_bit(dev, "enforce_bios", enforce_bios);
 209    netboot_fw_prop = object_property_get_str(new, "netboot_fw", &error_abort);
 210    if (!strlen(netboot_fw_prop)) {
 211        qdev_prop_set_string(dev, "netboot_fw", netboot_fw);
 212    }
 213    g_free(netboot_fw_prop);
 214    object_property_add_child(qdev_get_machine(), TYPE_S390_IPL,
 215                              new, NULL);
 216    object_unref(new);
 217    qdev_init_nofail(dev);
 218}
 219
 220static void s390_create_virtio_net(BusState *bus, const char *name)
 221{
 222    int i;
 223
 224    for (i = 0; i < nb_nics; i++) {
 225        NICInfo *nd = &nd_table[i];
 226        DeviceState *dev;
 227
 228        if (!nd->model) {
 229            nd->model = g_strdup("virtio");
 230        }
 231
 232        qemu_check_nic_model(nd, "virtio");
 233
 234        dev = qdev_create(bus, name);
 235        qdev_set_nic_properties(dev, nd);
 236        qdev_init_nofail(dev);
 237    }
 238}
 239
 240static void s390_create_sclpconsole(const char *type, Chardev *chardev)
 241{
 242    DeviceState *dev;
 243
 244    dev = qdev_create(sclp_get_event_facility_bus(), type);
 245    qdev_prop_set_chr(dev, "chardev", chardev);
 246    qdev_init_nofail(dev);
 247}
 248
 249static void ccw_init(MachineState *machine)
 250{
 251    int ret;
 252    VirtualCssBus *css_bus;
 253    DeviceState *dev;
 254
 255    s390_sclp_init();
 256    s390_memory_init(machine->ram_size);
 257
 258    /* init CPUs (incl. CPU model) early so s390_has_feature() works */
 259    s390_init_cpus(machine);
 260
 261    s390_flic_init();
 262
 263    /* init the SIGP facility */
 264    s390_init_sigp();
 265
 266    /* get a BUS */
 267    css_bus = virtual_css_bus_init();
 268    s390_init_ipl_dev(machine->kernel_filename, machine->kernel_cmdline,
 269                      machine->initrd_filename, "s390-ccw.img",
 270                      "s390-netboot.img", true);
 271
 272    /*
 273     * We cannot easily make the pci host bridge conditional as older QEMUs
 274     * always created it. Doing so would break migration across QEMU versions.
 275     */
 276    dev = qdev_create(NULL, TYPE_S390_PCI_HOST_BRIDGE);
 277    object_property_add_child(qdev_get_machine(), TYPE_S390_PCI_HOST_BRIDGE,
 278                              OBJECT(dev), NULL);
 279    qdev_init_nofail(dev);
 280
 281    /* register hypercalls */
 282    virtio_ccw_register_hcalls();
 283
 284    s390_enable_css_support(s390_cpu_addr2state(0));
 285    /*
 286     * Non mcss-e enabled guests only see the devices from the default
 287     * css, which is determined by the value of the squash_mcss property.
 288     */
 289    if (css_bus->squash_mcss) {
 290        ret = css_create_css_image(0, true);
 291    } else {
 292        ret = css_create_css_image(VIRTUAL_CSSID, true);
 293    }
 294    if (qemu_opt_get(qemu_get_machine_opts(), "s390-squash-mcss")) {
 295        warn_report("The machine property 's390-squash-mcss' is deprecated"
 296                    " (obsoleted by lifting the cssid restrictions).");
 297    }
 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
 319static 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
 333static 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
 341static 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
 383static 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
 391static 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
 400static 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
 410static 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
 433static 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
 442static 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
 453static 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
 460static 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    mc->init = ccw_init;
 471    mc->reset = s390_machine_reset;
 472    mc->hot_add_cpu = s390_hot_add_cpu;
 473    mc->block_default_type = IF_VIRTIO;
 474    mc->no_cdrom = 1;
 475    mc->no_floppy = 1;
 476    mc->no_parallel = 1;
 477    mc->no_sdcard = 1;
 478    mc->max_cpus = S390_MAX_CPUS;
 479    mc->has_hotpluggable_cpus = true;
 480    assert(!mc->get_hotplug_handler);
 481    mc->get_hotplug_handler = s390_get_hotplug_handler;
 482    mc->cpu_index_to_instance_props = s390_cpu_index_to_props;
 483    mc->possible_cpu_arch_ids = s390_possible_cpu_arch_ids;
 484    /* it is overridden with 'host' cpu *in kvm_arch_init* */
 485    mc->default_cpu_type = S390_CPU_TYPE_NAME("qemu");
 486    hc->plug = s390_machine_device_plug;
 487    hc->unplug_request = s390_machine_device_unplug_request;
 488    nc->nmi_monitor_handler = s390_nmi;
 489}
 490
 491static inline bool machine_get_aes_key_wrap(Object *obj, Error **errp)
 492{
 493    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 494
 495    return ms->aes_key_wrap;
 496}
 497
 498static inline void machine_set_aes_key_wrap(Object *obj, bool value,
 499                                            Error **errp)
 500{
 501    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 502
 503    ms->aes_key_wrap = value;
 504}
 505
 506static inline bool machine_get_dea_key_wrap(Object *obj, Error **errp)
 507{
 508    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 509
 510    return ms->dea_key_wrap;
 511}
 512
 513static inline void machine_set_dea_key_wrap(Object *obj, bool value,
 514                                            Error **errp)
 515{
 516    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 517
 518    ms->dea_key_wrap = value;
 519}
 520
 521static S390CcwMachineClass *current_mc;
 522
 523static S390CcwMachineClass *get_machine_class(void)
 524{
 525    if (unlikely(!current_mc)) {
 526        /*
 527        * No s390 ccw machine was instantiated, we are likely to
 528        * be called for the 'none' machine. The properties will
 529        * have their after-initialization values.
 530        */
 531        current_mc = S390_MACHINE_CLASS(
 532                     object_class_by_name(TYPE_S390_CCW_MACHINE));
 533    }
 534    return current_mc;
 535}
 536
 537bool ri_allowed(void)
 538{
 539    /* for "none" machine this results in true */
 540    return get_machine_class()->ri_allowed;
 541}
 542
 543bool cpu_model_allowed(void)
 544{
 545    /* for "none" machine this results in true */
 546    return get_machine_class()->cpu_model_allowed;
 547}
 548
 549static 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
 556static 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}
 578static inline bool machine_get_squash_mcss(Object *obj, Error **errp)
 579{
 580    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 581
 582    return ms->s390_squash_mcss;
 583}
 584
 585static inline void machine_set_squash_mcss(Object *obj, bool value,
 586                                           Error **errp)
 587{
 588    S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
 589
 590    ms->s390_squash_mcss = value;
 591}
 592
 593static inline void s390_machine_initfn(Object *obj)
 594{
 595    object_property_add_bool(obj, "aes-key-wrap",
 596                             machine_get_aes_key_wrap,
 597                             machine_set_aes_key_wrap, NULL);
 598    object_property_set_description(obj, "aes-key-wrap",
 599            "enable/disable AES key wrapping using the CPACF wrapping key",
 600            NULL);
 601    object_property_set_bool(obj, true, "aes-key-wrap", NULL);
 602
 603    object_property_add_bool(obj, "dea-key-wrap",
 604                             machine_get_dea_key_wrap,
 605                             machine_set_dea_key_wrap, NULL);
 606    object_property_set_description(obj, "dea-key-wrap",
 607            "enable/disable DEA key wrapping using the CPACF wrapping key",
 608            NULL);
 609    object_property_set_bool(obj, true, "dea-key-wrap", NULL);
 610    object_property_add_str(obj, "loadparm",
 611            machine_get_loadparm, machine_set_loadparm, NULL);
 612    object_property_set_description(obj, "loadparm",
 613            "Up to 8 chars in set of [A-Za-z0-9. ] (lower case chars converted"
 614            " to upper case) to pass to machine loader, boot manager,"
 615            " and guest kernel",
 616            NULL);
 617    object_property_add_bool(obj, "s390-squash-mcss",
 618                             machine_get_squash_mcss,
 619                             machine_set_squash_mcss, NULL);
 620    object_property_set_description(obj, "s390-squash-mcss", "(deprecated) "
 621            "enable/disable squashing subchannels into the default css",
 622            NULL);
 623    object_property_set_bool(obj, false, "s390-squash-mcss", NULL);
 624}
 625
 626static const TypeInfo ccw_machine_info = {
 627    .name          = TYPE_S390_CCW_MACHINE,
 628    .parent        = TYPE_MACHINE,
 629    .abstract      = true,
 630    .instance_size = sizeof(S390CcwMachineState),
 631    .instance_init = s390_machine_initfn,
 632    .class_size = sizeof(S390CcwMachineClass),
 633    .class_init    = ccw_machine_class_init,
 634    .interfaces = (InterfaceInfo[]) {
 635        { TYPE_NMI },
 636        { TYPE_HOTPLUG_HANDLER},
 637        { }
 638    },
 639};
 640
 641bool css_migration_enabled(void)
 642{
 643    return get_machine_class()->css_migration_enabled;
 644}
 645
 646#define DEFINE_CCW_MACHINE(suffix, verstr, latest)                            \
 647    static void ccw_machine_##suffix##_class_init(ObjectClass *oc,            \
 648                                                  void *data)                 \
 649    {                                                                         \
 650        MachineClass *mc = MACHINE_CLASS(oc);                                 \
 651        ccw_machine_##suffix##_class_options(mc);                             \
 652        mc->desc = "VirtIO-ccw based S390 machine v" verstr;                  \
 653        if (latest) {                                                         \
 654            mc->alias = "s390-ccw-virtio";                                    \
 655            mc->is_default = 1;                                               \
 656        }                                                                     \
 657    }                                                                         \
 658    static void ccw_machine_##suffix##_instance_init(Object *obj)             \
 659    {                                                                         \
 660        MachineState *machine = MACHINE(obj);                                 \
 661        current_mc = S390_MACHINE_CLASS(MACHINE_GET_CLASS(machine));          \
 662        ccw_machine_##suffix##_instance_options(machine);                     \
 663    }                                                                         \
 664    static const TypeInfo ccw_machine_##suffix##_info = {                     \
 665        .name = MACHINE_TYPE_NAME("s390-ccw-virtio-" verstr),                 \
 666        .parent = TYPE_S390_CCW_MACHINE,                                      \
 667        .class_init = ccw_machine_##suffix##_class_init,                      \
 668        .instance_init = ccw_machine_##suffix##_instance_init,                \
 669    };                                                                        \
 670    static void ccw_machine_register_##suffix(void)                           \
 671    {                                                                         \
 672        type_register_static(&ccw_machine_##suffix##_info);                   \
 673    }                                                                         \
 674    type_init(ccw_machine_register_##suffix)
 675
 676#define CCW_COMPAT_2_12 \
 677        HW_COMPAT_2_12
 678
 679#define CCW_COMPAT_2_11 \
 680        HW_COMPAT_2_11 \
 681        {\
 682            .driver   = TYPE_SCLP_EVENT_FACILITY,\
 683            .property = "allow_all_mask_sizes",\
 684            .value    = "off",\
 685        },
 686
 687#define CCW_COMPAT_2_10 \
 688        HW_COMPAT_2_10
 689
 690#define CCW_COMPAT_2_9 \
 691        HW_COMPAT_2_9 \
 692        {\
 693            .driver   = TYPE_S390_STATTRIB,\
 694            .property = "migration-enabled",\
 695            .value    = "off",\
 696        },
 697
 698#define CCW_COMPAT_2_8 \
 699        HW_COMPAT_2_8 \
 700        {\
 701            .driver   = TYPE_S390_FLIC_COMMON,\
 702            .property = "adapter_routes_max_batch",\
 703            .value    = "64",\
 704        },
 705
 706#define CCW_COMPAT_2_7 \
 707        HW_COMPAT_2_7
 708
 709#define CCW_COMPAT_2_6 \
 710        HW_COMPAT_2_6 \
 711        {\
 712            .driver   = TYPE_S390_IPL,\
 713            .property = "iplbext_migration",\
 714            .value    = "off",\
 715        }, {\
 716            .driver   = TYPE_VIRTUAL_CSS_BRIDGE,\
 717            .property = "css_dev_path",\
 718            .value    = "off",\
 719        },
 720
 721#define CCW_COMPAT_2_5 \
 722        HW_COMPAT_2_5
 723
 724#define CCW_COMPAT_2_4 \
 725        HW_COMPAT_2_4 \
 726        {\
 727            .driver   = TYPE_S390_SKEYS,\
 728            .property = "migration-enabled",\
 729            .value    = "off",\
 730        },{\
 731            .driver   = "virtio-blk-ccw",\
 732            .property = "max_revision",\
 733            .value    = "0",\
 734        },{\
 735            .driver   = "virtio-balloon-ccw",\
 736            .property = "max_revision",\
 737            .value    = "0",\
 738        },{\
 739            .driver   = "virtio-serial-ccw",\
 740            .property = "max_revision",\
 741            .value    = "0",\
 742        },{\
 743            .driver   = "virtio-9p-ccw",\
 744            .property = "max_revision",\
 745            .value    = "0",\
 746        },{\
 747            .driver   = "virtio-rng-ccw",\
 748            .property = "max_revision",\
 749            .value    = "0",\
 750        },{\
 751            .driver   = "virtio-net-ccw",\
 752            .property = "max_revision",\
 753            .value    = "0",\
 754        },{\
 755            .driver   = "virtio-scsi-ccw",\
 756            .property = "max_revision",\
 757            .value    = "0",\
 758        },{\
 759            .driver   = "vhost-scsi-ccw",\
 760            .property = "max_revision",\
 761            .value    = "0",\
 762        },
 763
 764static void ccw_machine_3_0_instance_options(MachineState *machine)
 765{
 766}
 767
 768static void ccw_machine_3_0_class_options(MachineClass *mc)
 769{
 770}
 771DEFINE_CCW_MACHINE(3_0, "3.0", true);
 772
 773static void ccw_machine_2_12_instance_options(MachineState *machine)
 774{
 775    ccw_machine_3_0_instance_options(machine);
 776    s390_cpudef_featoff_greater(11, 1, S390_FEAT_PPA15);
 777    s390_cpudef_featoff_greater(11, 1, S390_FEAT_BPB);
 778}
 779
 780static void ccw_machine_2_12_class_options(MachineClass *mc)
 781{
 782    ccw_machine_3_0_class_options(mc);
 783    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_12);
 784}
 785DEFINE_CCW_MACHINE(2_12, "2.12", false);
 786
 787static void ccw_machine_2_11_instance_options(MachineState *machine)
 788{
 789    static const S390FeatInit qemu_cpu_feat = { S390_FEAT_LIST_QEMU_V2_11 };
 790    ccw_machine_2_12_instance_options(machine);
 791
 792    /* before 2.12 we emulated the very first z900 */
 793    s390_set_qemu_cpu_model(0x2064, 7, 1, qemu_cpu_feat);
 794}
 795
 796static void ccw_machine_2_11_class_options(MachineClass *mc)
 797{
 798    ccw_machine_2_12_class_options(mc);
 799    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_11);
 800}
 801DEFINE_CCW_MACHINE(2_11, "2.11", false);
 802
 803static void ccw_machine_2_10_instance_options(MachineState *machine)
 804{
 805    ccw_machine_2_11_instance_options(machine);
 806}
 807
 808static void ccw_machine_2_10_class_options(MachineClass *mc)
 809{
 810    ccw_machine_2_11_class_options(mc);
 811    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_10);
 812}
 813DEFINE_CCW_MACHINE(2_10, "2.10", false);
 814
 815static void ccw_machine_2_9_instance_options(MachineState *machine)
 816{
 817    ccw_machine_2_10_instance_options(machine);
 818    s390_cpudef_featoff_greater(12, 1, S390_FEAT_ESOP);
 819    s390_cpudef_featoff_greater(12, 1, S390_FEAT_SIDE_EFFECT_ACCESS_ESOP2);
 820    s390_cpudef_featoff_greater(12, 1, S390_FEAT_ZPCI);
 821    s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_INT_SUPPRESSION);
 822    s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_EVENT_NOTIFICATION);
 823}
 824
 825static void ccw_machine_2_9_class_options(MachineClass *mc)
 826{
 827    S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
 828
 829    ccw_machine_2_10_class_options(mc);
 830    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_9);
 831    s390mc->css_migration_enabled = false;
 832}
 833DEFINE_CCW_MACHINE(2_9, "2.9", false);
 834
 835static void ccw_machine_2_8_instance_options(MachineState *machine)
 836{
 837    ccw_machine_2_9_instance_options(machine);
 838}
 839
 840static void ccw_machine_2_8_class_options(MachineClass *mc)
 841{
 842    ccw_machine_2_9_class_options(mc);
 843    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_8);
 844}
 845DEFINE_CCW_MACHINE(2_8, "2.8", false);
 846
 847static void ccw_machine_2_7_instance_options(MachineState *machine)
 848{
 849    ccw_machine_2_8_instance_options(machine);
 850}
 851
 852static void ccw_machine_2_7_class_options(MachineClass *mc)
 853{
 854    S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
 855
 856    s390mc->cpu_model_allowed = false;
 857    ccw_machine_2_8_class_options(mc);
 858    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_7);
 859}
 860DEFINE_CCW_MACHINE(2_7, "2.7", false);
 861
 862static void ccw_machine_2_6_instance_options(MachineState *machine)
 863{
 864    ccw_machine_2_7_instance_options(machine);
 865}
 866
 867static void ccw_machine_2_6_class_options(MachineClass *mc)
 868{
 869    S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
 870
 871    s390mc->ri_allowed = false;
 872    ccw_machine_2_7_class_options(mc);
 873    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_6);
 874}
 875DEFINE_CCW_MACHINE(2_6, "2.6", false);
 876
 877static void ccw_machine_2_5_instance_options(MachineState *machine)
 878{
 879    ccw_machine_2_6_instance_options(machine);
 880}
 881
 882static void ccw_machine_2_5_class_options(MachineClass *mc)
 883{
 884    ccw_machine_2_6_class_options(mc);
 885    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_5);
 886}
 887DEFINE_CCW_MACHINE(2_5, "2.5", false);
 888
 889static void ccw_machine_2_4_instance_options(MachineState *machine)
 890{
 891    ccw_machine_2_5_instance_options(machine);
 892}
 893
 894static void ccw_machine_2_4_class_options(MachineClass *mc)
 895{
 896    ccw_machine_2_5_class_options(mc);
 897    SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_4);
 898}
 899DEFINE_CCW_MACHINE(2_4, "2.4", false);
 900
 901static void ccw_machine_register_types(void)
 902{
 903    type_register_static(&ccw_machine_info);
 904}
 905
 906type_init(ccw_machine_register_types)
 907