Until67915de9f0
("s390x/event-facility: variable-length event masks") we only supported sclp event masks with a size of exactly 4 bytes, even though the architecture allows the guests to set up sclp event masks from 1 to 1021 bytes in length. After that patch, the behaviour was almost compliant, but some issues were still remaining, in particular regarding the handling of selective reads and migration. When setting the sclp event mask, a mask size is also specified. Until now we only considered the size in order to decide which bits to save in the internal state. On the other hand, when a guest performs a selective read, it sends a mask, but it does not specify a size; the implied size is the size of the last mask that has been set. Specifying bits in the mask of selective read that are not available in the internal mask should return an error, and bits past the end of the mask should obviously be ignored. This can only be achieved by keeping track of the lenght of the mask. The mask length is thus now part of the internal state that needs to be migrated. This patch fixes the handling of selective reads, whose size will now match the length of the event mask, as per architecture. While the default behaviour is to be compliant with the architecture, when using older machine models the old broken behaviour is selected (allowing only masks of size exactly 4), in order to be able to migrate toward older versions. Fixes:67915de9f0
("s390x/event-facility: variable-length event masks") Signed-off-by: Claudio Imbrenda <imbrenda@linux.vnet.ibm.com> Message-Id: <1519407778-23095-2-git-send-email-imbrenda@linux.vnet.ibm.com> Reviewed-by: Christian Borntraeger <borntraeger@de.ibm.com> Signed-off-by: Cornelia Huck <cohuck@redhat.com>
885 lines
26 KiB
C
885 lines
26 KiB
C
/*
|
|
* virtio ccw machine
|
|
*
|
|
* Copyright 2012 IBM Corp.
|
|
* Copyright (c) 2009 Alexander Graf <agraf@suse.de>
|
|
* Author(s): Cornelia Huck <cornelia.huck@de.ibm.com>
|
|
*
|
|
* This work is licensed under the terms of the GNU GPL, version 2 or (at
|
|
* your option) any later version. See the COPYING file in the top-level
|
|
* directory.
|
|
*/
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "qapi/error.h"
|
|
#include "cpu.h"
|
|
#include "hw/boards.h"
|
|
#include "exec/address-spaces.h"
|
|
#include "hw/s390x/s390-virtio-hcall.h"
|
|
#include "hw/s390x/sclp.h"
|
|
#include "hw/s390x/s390_flic.h"
|
|
#include "hw/s390x/ioinst.h"
|
|
#include "hw/s390x/css.h"
|
|
#include "virtio-ccw.h"
|
|
#include "qemu/config-file.h"
|
|
#include "qemu/error-report.h"
|
|
#include "qemu/option.h"
|
|
#include "s390-pci-bus.h"
|
|
#include "hw/s390x/storage-keys.h"
|
|
#include "hw/s390x/storage-attributes.h"
|
|
#include "hw/s390x/event-facility.h"
|
|
#include "hw/compat.h"
|
|
#include "ipl.h"
|
|
#include "hw/s390x/s390-virtio-ccw.h"
|
|
#include "hw/s390x/css-bridge.h"
|
|
#include "migration/register.h"
|
|
#include "cpu_models.h"
|
|
#include "hw/nmi.h"
|
|
|
|
S390CPU *s390_cpu_addr2state(uint16_t cpu_addr)
|
|
{
|
|
static MachineState *ms;
|
|
|
|
if (!ms) {
|
|
ms = MACHINE(qdev_get_machine());
|
|
g_assert(ms->possible_cpus);
|
|
}
|
|
|
|
/* CPU address corresponds to the core_id and the index */
|
|
if (cpu_addr >= ms->possible_cpus->len) {
|
|
return NULL;
|
|
}
|
|
return S390_CPU(ms->possible_cpus->cpus[cpu_addr].cpu);
|
|
}
|
|
|
|
static S390CPU *s390x_new_cpu(const char *typename, uint32_t core_id,
|
|
Error **errp)
|
|
{
|
|
S390CPU *cpu = S390_CPU(object_new(typename));
|
|
Error *err = NULL;
|
|
|
|
object_property_set_int(OBJECT(cpu), core_id, "core-id", &err);
|
|
if (err != NULL) {
|
|
goto out;
|
|
}
|
|
object_property_set_bool(OBJECT(cpu), true, "realized", &err);
|
|
|
|
out:
|
|
object_unref(OBJECT(cpu));
|
|
if (err) {
|
|
error_propagate(errp, err);
|
|
cpu = NULL;
|
|
}
|
|
return cpu;
|
|
}
|
|
|
|
static void s390_init_cpus(MachineState *machine)
|
|
{
|
|
MachineClass *mc = MACHINE_GET_CLASS(machine);
|
|
int i;
|
|
|
|
/* initialize possible_cpus */
|
|
mc->possible_cpu_arch_ids(machine);
|
|
|
|
for (i = 0; i < smp_cpus; i++) {
|
|
s390x_new_cpu(machine->cpu_type, i, &error_fatal);
|
|
}
|
|
}
|
|
|
|
static const char *const reset_dev_types[] = {
|
|
TYPE_VIRTUAL_CSS_BRIDGE,
|
|
"s390-sclp-event-facility",
|
|
"s390-flic",
|
|
"diag288",
|
|
};
|
|
|
|
void subsystem_reset(void)
|
|
{
|
|
DeviceState *dev;
|
|
int i;
|
|
|
|
for (i = 0; i < ARRAY_SIZE(reset_dev_types); i++) {
|
|
dev = DEVICE(object_resolve_path_type("", reset_dev_types[i], NULL));
|
|
if (dev) {
|
|
qdev_reset_all(dev);
|
|
}
|
|
}
|
|
}
|
|
|
|
static int virtio_ccw_hcall_notify(const uint64_t *args)
|
|
{
|
|
uint64_t subch_id = args[0];
|
|
uint64_t queue = args[1];
|
|
SubchDev *sch;
|
|
int cssid, ssid, schid, m;
|
|
|
|
if (ioinst_disassemble_sch_ident(subch_id, &m, &cssid, &ssid, &schid)) {
|
|
return -EINVAL;
|
|
}
|
|
sch = css_find_subch(m, cssid, ssid, schid);
|
|
if (!sch || !css_subch_visible(sch)) {
|
|
return -EINVAL;
|
|
}
|
|
if (queue >= VIRTIO_QUEUE_MAX) {
|
|
return -EINVAL;
|
|
}
|
|
virtio_queue_notify(virtio_ccw_get_vdev(sch), queue);
|
|
return 0;
|
|
|
|
}
|
|
|
|
static int virtio_ccw_hcall_early_printk(const uint64_t *args)
|
|
{
|
|
uint64_t mem = args[0];
|
|
|
|
if (mem < ram_size) {
|
|
/* Early printk */
|
|
return 0;
|
|
}
|
|
return -EINVAL;
|
|
}
|
|
|
|
static void virtio_ccw_register_hcalls(void)
|
|
{
|
|
s390_register_virtio_hypercall(KVM_S390_VIRTIO_CCW_NOTIFY,
|
|
virtio_ccw_hcall_notify);
|
|
/* Tolerate early printk. */
|
|
s390_register_virtio_hypercall(KVM_S390_VIRTIO_NOTIFY,
|
|
virtio_ccw_hcall_early_printk);
|
|
}
|
|
|
|
/*
|
|
* KVM does only support memory slots up to KVM_MEM_MAX_NR_PAGES pages
|
|
* as the dirty bitmap must be managed by bitops that take an int as
|
|
* position indicator. If we have a guest beyond that we will split off
|
|
* new subregions. The split must happen on a segment boundary (1MB).
|
|
*/
|
|
#define KVM_MEM_MAX_NR_PAGES ((1ULL << 31) - 1)
|
|
#define SEG_MSK (~0xfffffULL)
|
|
#define KVM_SLOT_MAX_BYTES ((KVM_MEM_MAX_NR_PAGES * TARGET_PAGE_SIZE) & SEG_MSK)
|
|
static void s390_memory_init(ram_addr_t mem_size)
|
|
{
|
|
MemoryRegion *sysmem = get_system_memory();
|
|
ram_addr_t chunk, offset = 0;
|
|
unsigned int number = 0;
|
|
gchar *name;
|
|
|
|
/* allocate RAM for core */
|
|
name = g_strdup_printf("s390.ram");
|
|
while (mem_size) {
|
|
MemoryRegion *ram = g_new(MemoryRegion, 1);
|
|
uint64_t size = mem_size;
|
|
|
|
/* KVM does not allow memslots >= 8 TB */
|
|
chunk = MIN(size, KVM_SLOT_MAX_BYTES);
|
|
memory_region_allocate_system_memory(ram, NULL, name, chunk);
|
|
memory_region_add_subregion(sysmem, offset, ram);
|
|
mem_size -= chunk;
|
|
offset += chunk;
|
|
g_free(name);
|
|
name = g_strdup_printf("s390.ram.%u", ++number);
|
|
}
|
|
g_free(name);
|
|
|
|
/* Initialize storage key device */
|
|
s390_skeys_init();
|
|
/* Initialize storage attributes device */
|
|
s390_stattrib_init();
|
|
}
|
|
|
|
#define S390_TOD_CLOCK_VALUE_MISSING 0x00
|
|
#define S390_TOD_CLOCK_VALUE_PRESENT 0x01
|
|
|
|
static void gtod_save(QEMUFile *f, void *opaque)
|
|
{
|
|
uint64_t tod_low;
|
|
uint8_t tod_high;
|
|
int r;
|
|
|
|
r = s390_get_clock(&tod_high, &tod_low);
|
|
if (r) {
|
|
warn_report("Unable to get guest clock for migration: %s",
|
|
strerror(-r));
|
|
error_printf("Guest clock will not be migrated "
|
|
"which could cause the guest to hang.");
|
|
qemu_put_byte(f, S390_TOD_CLOCK_VALUE_MISSING);
|
|
return;
|
|
}
|
|
|
|
qemu_put_byte(f, S390_TOD_CLOCK_VALUE_PRESENT);
|
|
qemu_put_byte(f, tod_high);
|
|
qemu_put_be64(f, tod_low);
|
|
}
|
|
|
|
static int gtod_load(QEMUFile *f, void *opaque, int version_id)
|
|
{
|
|
uint64_t tod_low;
|
|
uint8_t tod_high;
|
|
int r;
|
|
|
|
if (qemu_get_byte(f) == S390_TOD_CLOCK_VALUE_MISSING) {
|
|
warn_report("Guest clock was not migrated. This could "
|
|
"cause the guest to hang.");
|
|
return 0;
|
|
}
|
|
|
|
tod_high = qemu_get_byte(f);
|
|
tod_low = qemu_get_be64(f);
|
|
|
|
r = s390_set_clock(&tod_high, &tod_low);
|
|
if (r) {
|
|
error_report("Unable to set KVM guest TOD clock: %s", strerror(-r));
|
|
}
|
|
|
|
return r;
|
|
}
|
|
|
|
static SaveVMHandlers savevm_gtod = {
|
|
.save_state = gtod_save,
|
|
.load_state = gtod_load,
|
|
};
|
|
|
|
static void s390_init_ipl_dev(const char *kernel_filename,
|
|
const char *kernel_cmdline,
|
|
const char *initrd_filename, const char *firmware,
|
|
const char *netboot_fw, bool enforce_bios)
|
|
{
|
|
Object *new = object_new(TYPE_S390_IPL);
|
|
DeviceState *dev = DEVICE(new);
|
|
|
|
if (kernel_filename) {
|
|
qdev_prop_set_string(dev, "kernel", kernel_filename);
|
|
}
|
|
if (initrd_filename) {
|
|
qdev_prop_set_string(dev, "initrd", initrd_filename);
|
|
}
|
|
qdev_prop_set_string(dev, "cmdline", kernel_cmdline);
|
|
qdev_prop_set_string(dev, "firmware", firmware);
|
|
qdev_prop_set_bit(dev, "enforce_bios", enforce_bios);
|
|
if (!strlen(object_property_get_str(new, "netboot_fw", &error_abort))) {
|
|
qdev_prop_set_string(dev, "netboot_fw", netboot_fw);
|
|
}
|
|
object_property_add_child(qdev_get_machine(), TYPE_S390_IPL,
|
|
new, NULL);
|
|
object_unref(new);
|
|
qdev_init_nofail(dev);
|
|
}
|
|
|
|
static void s390_create_virtio_net(BusState *bus, const char *name)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < nb_nics; i++) {
|
|
NICInfo *nd = &nd_table[i];
|
|
DeviceState *dev;
|
|
|
|
if (!nd->model) {
|
|
nd->model = g_strdup("virtio");
|
|
}
|
|
|
|
qemu_check_nic_model(nd, "virtio");
|
|
|
|
dev = qdev_create(bus, name);
|
|
qdev_set_nic_properties(dev, nd);
|
|
qdev_init_nofail(dev);
|
|
}
|
|
}
|
|
|
|
static void ccw_init(MachineState *machine)
|
|
{
|
|
int ret;
|
|
VirtualCssBus *css_bus;
|
|
DeviceState *dev;
|
|
|
|
s390_sclp_init();
|
|
s390_memory_init(machine->ram_size);
|
|
|
|
/* init CPUs (incl. CPU model) early so s390_has_feature() works */
|
|
s390_init_cpus(machine);
|
|
|
|
s390_flic_init();
|
|
|
|
/* init the SIGP facility */
|
|
s390_init_sigp();
|
|
|
|
/* get a BUS */
|
|
css_bus = virtual_css_bus_init();
|
|
s390_init_ipl_dev(machine->kernel_filename, machine->kernel_cmdline,
|
|
machine->initrd_filename, "s390-ccw.img",
|
|
"s390-netboot.img", true);
|
|
|
|
/*
|
|
* We cannot easily make the pci host bridge conditional as older QEMUs
|
|
* always created it. Doing so would break migration across QEMU versions.
|
|
*/
|
|
dev = qdev_create(NULL, TYPE_S390_PCI_HOST_BRIDGE);
|
|
object_property_add_child(qdev_get_machine(), TYPE_S390_PCI_HOST_BRIDGE,
|
|
OBJECT(dev), NULL);
|
|
qdev_init_nofail(dev);
|
|
|
|
/* register hypercalls */
|
|
virtio_ccw_register_hcalls();
|
|
|
|
s390_enable_css_support(s390_cpu_addr2state(0));
|
|
/*
|
|
* Non mcss-e enabled guests only see the devices from the default
|
|
* css, which is determined by the value of the squash_mcss property.
|
|
*/
|
|
if (css_bus->squash_mcss) {
|
|
ret = css_create_css_image(0, true);
|
|
} else {
|
|
ret = css_create_css_image(VIRTUAL_CSSID, true);
|
|
}
|
|
if (qemu_opt_get(qemu_get_machine_opts(), "s390-squash-mcss")) {
|
|
warn_report("The machine property 's390-squash-mcss' is deprecated"
|
|
" (obsoleted by lifting the cssid restrictions).");
|
|
}
|
|
|
|
assert(ret == 0);
|
|
if (css_migration_enabled()) {
|
|
css_register_vmstate();
|
|
}
|
|
|
|
/* Create VirtIO network adapters */
|
|
s390_create_virtio_net(BUS(css_bus), "virtio-net-ccw");
|
|
|
|
/* Register savevm handler for guest TOD clock */
|
|
register_savevm_live(NULL, "todclock", 0, 1, &savevm_gtod, NULL);
|
|
}
|
|
|
|
static void s390_cpu_plug(HotplugHandler *hotplug_dev,
|
|
DeviceState *dev, Error **errp)
|
|
{
|
|
MachineState *ms = MACHINE(hotplug_dev);
|
|
S390CPU *cpu = S390_CPU(dev);
|
|
|
|
g_assert(!ms->possible_cpus->cpus[cpu->env.core_id].cpu);
|
|
ms->possible_cpus->cpus[cpu->env.core_id].cpu = OBJECT(dev);
|
|
|
|
if (dev->hotplugged) {
|
|
raise_irq_cpu_hotplug();
|
|
}
|
|
}
|
|
|
|
static void s390_machine_reset(void)
|
|
{
|
|
S390CPU *ipl_cpu = S390_CPU(qemu_get_cpu(0));
|
|
|
|
s390_cmma_reset();
|
|
qemu_devices_reset();
|
|
s390_crypto_reset();
|
|
|
|
/* all cpus are stopped - configure and start the ipl cpu only */
|
|
s390_ipl_prepare_cpu(ipl_cpu);
|
|
s390_cpu_set_state(S390_CPU_STATE_OPERATING, ipl_cpu);
|
|
}
|
|
|
|
static void s390_machine_device_plug(HotplugHandler *hotplug_dev,
|
|
DeviceState *dev, Error **errp)
|
|
{
|
|
if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
|
|
s390_cpu_plug(hotplug_dev, dev, errp);
|
|
}
|
|
}
|
|
|
|
static void s390_machine_device_unplug_request(HotplugHandler *hotplug_dev,
|
|
DeviceState *dev, Error **errp)
|
|
{
|
|
if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
|
|
error_setg(errp, "CPU hot unplug not supported on this machine");
|
|
return;
|
|
}
|
|
}
|
|
|
|
static CpuInstanceProperties s390_cpu_index_to_props(MachineState *ms,
|
|
unsigned cpu_index)
|
|
{
|
|
MachineClass *mc = MACHINE_GET_CLASS(ms);
|
|
const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(ms);
|
|
|
|
assert(cpu_index < possible_cpus->len);
|
|
return possible_cpus->cpus[cpu_index].props;
|
|
}
|
|
|
|
static const CPUArchIdList *s390_possible_cpu_arch_ids(MachineState *ms)
|
|
{
|
|
int i;
|
|
|
|
if (ms->possible_cpus) {
|
|
g_assert(ms->possible_cpus && ms->possible_cpus->len == max_cpus);
|
|
return ms->possible_cpus;
|
|
}
|
|
|
|
ms->possible_cpus = g_malloc0(sizeof(CPUArchIdList) +
|
|
sizeof(CPUArchId) * max_cpus);
|
|
ms->possible_cpus->len = max_cpus;
|
|
for (i = 0; i < ms->possible_cpus->len; i++) {
|
|
ms->possible_cpus->cpus[i].type = ms->cpu_type;
|
|
ms->possible_cpus->cpus[i].vcpus_count = 1;
|
|
ms->possible_cpus->cpus[i].arch_id = i;
|
|
ms->possible_cpus->cpus[i].props.has_core_id = true;
|
|
ms->possible_cpus->cpus[i].props.core_id = i;
|
|
}
|
|
|
|
return ms->possible_cpus;
|
|
}
|
|
|
|
static HotplugHandler *s390_get_hotplug_handler(MachineState *machine,
|
|
DeviceState *dev)
|
|
{
|
|
if (object_dynamic_cast(OBJECT(dev), TYPE_CPU)) {
|
|
return HOTPLUG_HANDLER(machine);
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
static void s390_hot_add_cpu(const int64_t id, Error **errp)
|
|
{
|
|
MachineState *machine = MACHINE(qdev_get_machine());
|
|
ObjectClass *oc;
|
|
|
|
g_assert(machine->possible_cpus->cpus[0].cpu);
|
|
oc = OBJECT_CLASS(CPU_GET_CLASS(machine->possible_cpus->cpus[0].cpu));
|
|
|
|
s390x_new_cpu(object_class_get_name(oc), id, errp);
|
|
}
|
|
|
|
static void s390_nmi(NMIState *n, int cpu_index, Error **errp)
|
|
{
|
|
CPUState *cs = qemu_get_cpu(cpu_index);
|
|
|
|
s390_cpu_restart(S390_CPU(cs));
|
|
}
|
|
|
|
static void ccw_machine_class_init(ObjectClass *oc, void *data)
|
|
{
|
|
MachineClass *mc = MACHINE_CLASS(oc);
|
|
NMIClass *nc = NMI_CLASS(oc);
|
|
HotplugHandlerClass *hc = HOTPLUG_HANDLER_CLASS(oc);
|
|
S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
|
|
|
|
s390mc->ri_allowed = true;
|
|
s390mc->cpu_model_allowed = true;
|
|
s390mc->css_migration_enabled = true;
|
|
mc->init = ccw_init;
|
|
mc->reset = s390_machine_reset;
|
|
mc->hot_add_cpu = s390_hot_add_cpu;
|
|
mc->block_default_type = IF_VIRTIO;
|
|
mc->no_cdrom = 1;
|
|
mc->no_floppy = 1;
|
|
mc->no_serial = 1;
|
|
mc->no_parallel = 1;
|
|
mc->no_sdcard = 1;
|
|
mc->use_sclp = 1;
|
|
mc->max_cpus = S390_MAX_CPUS;
|
|
mc->has_hotpluggable_cpus = true;
|
|
mc->get_hotplug_handler = s390_get_hotplug_handler;
|
|
mc->cpu_index_to_instance_props = s390_cpu_index_to_props;
|
|
mc->possible_cpu_arch_ids = s390_possible_cpu_arch_ids;
|
|
/* it is overridden with 'host' cpu *in kvm_arch_init* */
|
|
mc->default_cpu_type = S390_CPU_TYPE_NAME("qemu");
|
|
hc->plug = s390_machine_device_plug;
|
|
hc->unplug_request = s390_machine_device_unplug_request;
|
|
nc->nmi_monitor_handler = s390_nmi;
|
|
}
|
|
|
|
static inline bool machine_get_aes_key_wrap(Object *obj, Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
return ms->aes_key_wrap;
|
|
}
|
|
|
|
static inline void machine_set_aes_key_wrap(Object *obj, bool value,
|
|
Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
ms->aes_key_wrap = value;
|
|
}
|
|
|
|
static inline bool machine_get_dea_key_wrap(Object *obj, Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
return ms->dea_key_wrap;
|
|
}
|
|
|
|
static inline void machine_set_dea_key_wrap(Object *obj, bool value,
|
|
Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
ms->dea_key_wrap = value;
|
|
}
|
|
|
|
static S390CcwMachineClass *current_mc;
|
|
|
|
static S390CcwMachineClass *get_machine_class(void)
|
|
{
|
|
if (unlikely(!current_mc)) {
|
|
/*
|
|
* No s390 ccw machine was instantiated, we are likely to
|
|
* be called for the 'none' machine. The properties will
|
|
* have their after-initialization values.
|
|
*/
|
|
current_mc = S390_MACHINE_CLASS(
|
|
object_class_by_name(TYPE_S390_CCW_MACHINE));
|
|
}
|
|
return current_mc;
|
|
}
|
|
|
|
bool ri_allowed(void)
|
|
{
|
|
/* for "none" machine this results in true */
|
|
return get_machine_class()->ri_allowed;
|
|
}
|
|
|
|
bool cpu_model_allowed(void)
|
|
{
|
|
/* for "none" machine this results in true */
|
|
return get_machine_class()->cpu_model_allowed;
|
|
}
|
|
|
|
static char *machine_get_loadparm(Object *obj, Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
return g_memdup(ms->loadparm, sizeof(ms->loadparm));
|
|
}
|
|
|
|
static void machine_set_loadparm(Object *obj, const char *val, Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
int i;
|
|
|
|
for (i = 0; i < sizeof(ms->loadparm) && val[i]; i++) {
|
|
uint8_t c = qemu_toupper(val[i]); /* mimic HMC */
|
|
|
|
if (('A' <= c && c <= 'Z') || ('0' <= c && c <= '9') || (c == '.') ||
|
|
(c == ' ')) {
|
|
ms->loadparm[i] = c;
|
|
} else {
|
|
error_setg(errp, "LOADPARM: invalid character '%c' (ASCII 0x%02x)",
|
|
c, c);
|
|
return;
|
|
}
|
|
}
|
|
|
|
for (; i < sizeof(ms->loadparm); i++) {
|
|
ms->loadparm[i] = ' '; /* pad right with spaces */
|
|
}
|
|
}
|
|
static inline bool machine_get_squash_mcss(Object *obj, Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
return ms->s390_squash_mcss;
|
|
}
|
|
|
|
static inline void machine_set_squash_mcss(Object *obj, bool value,
|
|
Error **errp)
|
|
{
|
|
S390CcwMachineState *ms = S390_CCW_MACHINE(obj);
|
|
|
|
ms->s390_squash_mcss = value;
|
|
}
|
|
|
|
static inline void s390_machine_initfn(Object *obj)
|
|
{
|
|
object_property_add_bool(obj, "aes-key-wrap",
|
|
machine_get_aes_key_wrap,
|
|
machine_set_aes_key_wrap, NULL);
|
|
object_property_set_description(obj, "aes-key-wrap",
|
|
"enable/disable AES key wrapping using the CPACF wrapping key",
|
|
NULL);
|
|
object_property_set_bool(obj, true, "aes-key-wrap", NULL);
|
|
|
|
object_property_add_bool(obj, "dea-key-wrap",
|
|
machine_get_dea_key_wrap,
|
|
machine_set_dea_key_wrap, NULL);
|
|
object_property_set_description(obj, "dea-key-wrap",
|
|
"enable/disable DEA key wrapping using the CPACF wrapping key",
|
|
NULL);
|
|
object_property_set_bool(obj, true, "dea-key-wrap", NULL);
|
|
object_property_add_str(obj, "loadparm",
|
|
machine_get_loadparm, machine_set_loadparm, NULL);
|
|
object_property_set_description(obj, "loadparm",
|
|
"Up to 8 chars in set of [A-Za-z0-9. ] (lower case chars converted"
|
|
" to upper case) to pass to machine loader, boot manager,"
|
|
" and guest kernel",
|
|
NULL);
|
|
object_property_add_bool(obj, "s390-squash-mcss",
|
|
machine_get_squash_mcss,
|
|
machine_set_squash_mcss, NULL);
|
|
object_property_set_description(obj, "s390-squash-mcss", "(deprecated) "
|
|
"enable/disable squashing subchannels into the default css",
|
|
NULL);
|
|
object_property_set_bool(obj, false, "s390-squash-mcss", NULL);
|
|
}
|
|
|
|
static const TypeInfo ccw_machine_info = {
|
|
.name = TYPE_S390_CCW_MACHINE,
|
|
.parent = TYPE_MACHINE,
|
|
.abstract = true,
|
|
.instance_size = sizeof(S390CcwMachineState),
|
|
.instance_init = s390_machine_initfn,
|
|
.class_size = sizeof(S390CcwMachineClass),
|
|
.class_init = ccw_machine_class_init,
|
|
.interfaces = (InterfaceInfo[]) {
|
|
{ TYPE_NMI },
|
|
{ TYPE_HOTPLUG_HANDLER},
|
|
{ }
|
|
},
|
|
};
|
|
|
|
bool css_migration_enabled(void)
|
|
{
|
|
return get_machine_class()->css_migration_enabled;
|
|
}
|
|
|
|
#define DEFINE_CCW_MACHINE(suffix, verstr, latest) \
|
|
static void ccw_machine_##suffix##_class_init(ObjectClass *oc, \
|
|
void *data) \
|
|
{ \
|
|
MachineClass *mc = MACHINE_CLASS(oc); \
|
|
ccw_machine_##suffix##_class_options(mc); \
|
|
mc->desc = "VirtIO-ccw based S390 machine v" verstr; \
|
|
if (latest) { \
|
|
mc->alias = "s390-ccw-virtio"; \
|
|
mc->is_default = 1; \
|
|
} \
|
|
} \
|
|
static void ccw_machine_##suffix##_instance_init(Object *obj) \
|
|
{ \
|
|
MachineState *machine = MACHINE(obj); \
|
|
current_mc = S390_MACHINE_CLASS(MACHINE_GET_CLASS(machine)); \
|
|
ccw_machine_##suffix##_instance_options(machine); \
|
|
} \
|
|
static const TypeInfo ccw_machine_##suffix##_info = { \
|
|
.name = MACHINE_TYPE_NAME("s390-ccw-virtio-" verstr), \
|
|
.parent = TYPE_S390_CCW_MACHINE, \
|
|
.class_init = ccw_machine_##suffix##_class_init, \
|
|
.instance_init = ccw_machine_##suffix##_instance_init, \
|
|
}; \
|
|
static void ccw_machine_register_##suffix(void) \
|
|
{ \
|
|
type_register_static(&ccw_machine_##suffix##_info); \
|
|
} \
|
|
type_init(ccw_machine_register_##suffix)
|
|
|
|
#define CCW_COMPAT_2_11 \
|
|
HW_COMPAT_2_11 \
|
|
{\
|
|
.driver = TYPE_SCLP_EVENT_FACILITY,\
|
|
.property = "allow_all_mask_sizes",\
|
|
.value = "off",\
|
|
},
|
|
|
|
#define CCW_COMPAT_2_10 \
|
|
HW_COMPAT_2_10
|
|
|
|
#define CCW_COMPAT_2_9 \
|
|
HW_COMPAT_2_9 \
|
|
{\
|
|
.driver = TYPE_S390_STATTRIB,\
|
|
.property = "migration-enabled",\
|
|
.value = "off",\
|
|
},
|
|
|
|
#define CCW_COMPAT_2_8 \
|
|
HW_COMPAT_2_8 \
|
|
{\
|
|
.driver = TYPE_S390_FLIC_COMMON,\
|
|
.property = "adapter_routes_max_batch",\
|
|
.value = "64",\
|
|
},
|
|
|
|
#define CCW_COMPAT_2_7 \
|
|
HW_COMPAT_2_7
|
|
|
|
#define CCW_COMPAT_2_6 \
|
|
HW_COMPAT_2_6 \
|
|
{\
|
|
.driver = TYPE_S390_IPL,\
|
|
.property = "iplbext_migration",\
|
|
.value = "off",\
|
|
}, {\
|
|
.driver = TYPE_VIRTUAL_CSS_BRIDGE,\
|
|
.property = "css_dev_path",\
|
|
.value = "off",\
|
|
},
|
|
|
|
#define CCW_COMPAT_2_5 \
|
|
HW_COMPAT_2_5
|
|
|
|
#define CCW_COMPAT_2_4 \
|
|
HW_COMPAT_2_4 \
|
|
{\
|
|
.driver = TYPE_S390_SKEYS,\
|
|
.property = "migration-enabled",\
|
|
.value = "off",\
|
|
},{\
|
|
.driver = "virtio-blk-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-balloon-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-serial-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-9p-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-rng-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-net-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "virtio-scsi-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},{\
|
|
.driver = "vhost-scsi-ccw",\
|
|
.property = "max_revision",\
|
|
.value = "0",\
|
|
},
|
|
|
|
static void ccw_machine_2_12_instance_options(MachineState *machine)
|
|
{
|
|
}
|
|
|
|
static void ccw_machine_2_12_class_options(MachineClass *mc)
|
|
{
|
|
}
|
|
DEFINE_CCW_MACHINE(2_12, "2.12", true);
|
|
|
|
static void ccw_machine_2_11_instance_options(MachineState *machine)
|
|
{
|
|
static const S390FeatInit qemu_cpu_feat = { S390_FEAT_LIST_QEMU_V2_11 };
|
|
ccw_machine_2_12_instance_options(machine);
|
|
|
|
/* before 2.12 we emulated the very first z900 */
|
|
s390_set_qemu_cpu_model(0x2064, 7, 1, qemu_cpu_feat);
|
|
}
|
|
|
|
static void ccw_machine_2_11_class_options(MachineClass *mc)
|
|
{
|
|
ccw_machine_2_12_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_11);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_11, "2.11", false);
|
|
|
|
static void ccw_machine_2_10_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_11_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_10_class_options(MachineClass *mc)
|
|
{
|
|
ccw_machine_2_11_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_10);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_10, "2.10", false);
|
|
|
|
static void ccw_machine_2_9_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_10_instance_options(machine);
|
|
s390_cpudef_featoff_greater(12, 1, S390_FEAT_ESOP);
|
|
s390_cpudef_featoff_greater(12, 1, S390_FEAT_SIDE_EFFECT_ACCESS_ESOP2);
|
|
s390_cpudef_featoff_greater(12, 1, S390_FEAT_ZPCI);
|
|
s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_INT_SUPPRESSION);
|
|
s390_cpudef_featoff_greater(12, 1, S390_FEAT_ADAPTER_EVENT_NOTIFICATION);
|
|
}
|
|
|
|
static void ccw_machine_2_9_class_options(MachineClass *mc)
|
|
{
|
|
S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
|
|
|
|
ccw_machine_2_10_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_9);
|
|
s390mc->css_migration_enabled = false;
|
|
}
|
|
DEFINE_CCW_MACHINE(2_9, "2.9", false);
|
|
|
|
static void ccw_machine_2_8_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_9_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_8_class_options(MachineClass *mc)
|
|
{
|
|
ccw_machine_2_9_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_8);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_8, "2.8", false);
|
|
|
|
static void ccw_machine_2_7_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_8_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_7_class_options(MachineClass *mc)
|
|
{
|
|
S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
|
|
|
|
s390mc->cpu_model_allowed = false;
|
|
ccw_machine_2_8_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_7);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_7, "2.7", false);
|
|
|
|
static void ccw_machine_2_6_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_7_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_6_class_options(MachineClass *mc)
|
|
{
|
|
S390CcwMachineClass *s390mc = S390_MACHINE_CLASS(mc);
|
|
|
|
s390mc->ri_allowed = false;
|
|
ccw_machine_2_7_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_6);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_6, "2.6", false);
|
|
|
|
static void ccw_machine_2_5_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_6_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_5_class_options(MachineClass *mc)
|
|
{
|
|
ccw_machine_2_6_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_5);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_5, "2.5", false);
|
|
|
|
static void ccw_machine_2_4_instance_options(MachineState *machine)
|
|
{
|
|
ccw_machine_2_5_instance_options(machine);
|
|
}
|
|
|
|
static void ccw_machine_2_4_class_options(MachineClass *mc)
|
|
{
|
|
ccw_machine_2_5_class_options(mc);
|
|
SET_MACHINE_COMPAT(mc, CCW_COMPAT_2_4);
|
|
}
|
|
DEFINE_CCW_MACHINE(2_4, "2.4", false);
|
|
|
|
static void ccw_machine_register_types(void)
|
|
{
|
|
type_register_static(&ccw_machine_info);
|
|
}
|
|
|
|
type_init(ccw_machine_register_types)
|