cachepc-qemu

Fork of AMDESE/qemu with changes for cachepc side-channel attack
git clone https://git.sinitax.com/sinitax/cachepc-qemu
Log | Files | Refs | Submodules | LICENSE | sfeed.txt

s390_flic.c (14377B)

      1/*
      2 * QEMU S390x floating interrupt controller (flic)
      3 *
      4 * Copyright 2014 IBM Corp.
      5 * Author(s): Jens Freimann <jfrei@linux.vnet.ibm.com>
      6 *            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 "qemu/error-report.h"
     15#include "qemu/main-loop.h"
     16#include "qemu/module.h"
     17#include "hw/sysbus.h"
     18#include "hw/s390x/ioinst.h"
     19#include "hw/s390x/s390_flic.h"
     20#include "hw/qdev-properties.h"
     21#include "hw/s390x/css.h"
     22#include "trace.h"
     23#include "qapi/error.h"
     24#include "hw/s390x/s390-virtio-ccw.h"
     25
     26S390FLICStateClass *s390_get_flic_class(S390FLICState *fs)
     27{
     28    static S390FLICStateClass *class;
     29
     30    if (!class) {
     31        /* we only have one flic device, so this is fine to cache */
     32        class = S390_FLIC_COMMON_GET_CLASS(fs);
     33    }
     34    return class;
     35}
     36
     37QEMUS390FLICState *s390_get_qemu_flic(S390FLICState *fs)
     38{
     39    static QEMUS390FLICState *flic;
     40
     41    if (!flic) {
     42        /* we only have one flic device, so this is fine to cache */
     43        flic = QEMU_S390_FLIC(fs);
     44    }
     45    return flic;
     46}
     47
     48S390FLICState *s390_get_flic(void)
     49{
     50    static S390FLICState *fs;
     51
     52    if (!fs) {
     53        fs = S390_FLIC_COMMON(object_resolve_path_type("",
     54                                                       TYPE_S390_FLIC_COMMON,
     55                                                       NULL));
     56    }
     57    return fs;
     58}
     59
     60void s390_flic_init(void)
     61{
     62    DeviceState *dev;
     63
     64    if (kvm_enabled()) {
     65        dev = qdev_new(TYPE_KVM_S390_FLIC);
     66        object_property_add_child(qdev_get_machine(), TYPE_KVM_S390_FLIC,
     67                                  OBJECT(dev));
     68    } else {
     69        dev = qdev_new(TYPE_QEMU_S390_FLIC);
     70        object_property_add_child(qdev_get_machine(), TYPE_QEMU_S390_FLIC,
     71                                  OBJECT(dev));
     72    }
     73    sysbus_realize_and_unref(SYS_BUS_DEVICE(dev), &error_fatal);
     74}
     75
     76static int qemu_s390_register_io_adapter(S390FLICState *fs, uint32_t id,
     77                                         uint8_t isc, bool swap,
     78                                         bool is_maskable, uint8_t flags)
     79{
     80    /* nothing to do */
     81    return 0;
     82}
     83
     84static int qemu_s390_io_adapter_map(S390FLICState *fs, uint32_t id,
     85                                    uint64_t map_addr, bool do_map)
     86{
     87    /* nothing to do */
     88    return 0;
     89}
     90
     91static int qemu_s390_add_adapter_routes(S390FLICState *fs,
     92                                        AdapterRoutes *routes)
     93{
     94    return -ENOSYS;
     95}
     96
     97static void qemu_s390_release_adapter_routes(S390FLICState *fs,
     98                                             AdapterRoutes *routes)
     99{
    100}
    101
    102static int qemu_s390_clear_io_flic(S390FLICState *fs, uint16_t subchannel_id,
    103                           uint16_t subchannel_nr)
    104{
    105    QEMUS390FLICState *flic  = s390_get_qemu_flic(fs);
    106    QEMUS390FlicIO *cur, *next;
    107    uint8_t isc;
    108
    109    g_assert(qemu_mutex_iothread_locked());
    110    if (!(flic->pending & FLIC_PENDING_IO)) {
    111        return 0;
    112    }
    113
    114    /* check all iscs */
    115    for (isc = 0; isc < 8; isc++) {
    116        if (QLIST_EMPTY(&flic->io[isc])) {
    117            continue;
    118        }
    119
    120        /* search and delete any matching one */
    121        QLIST_FOREACH_SAFE(cur, &flic->io[isc], next, next) {
    122            if (cur->id == subchannel_id && cur->nr == subchannel_nr) {
    123                QLIST_REMOVE(cur, next);
    124                g_free(cur);
    125            }
    126        }
    127
    128        /* update our indicator bit */
    129        if (QLIST_EMPTY(&flic->io[isc])) {
    130            flic->pending &= ~ISC_TO_PENDING_IO(isc);
    131        }
    132    }
    133    return 0;
    134}
    135
    136static int qemu_s390_modify_ais_mode(S390FLICState *fs, uint8_t isc,
    137                                     uint16_t mode)
    138{
    139    QEMUS390FLICState *flic  = s390_get_qemu_flic(fs);
    140
    141    switch (mode) {
    142    case SIC_IRQ_MODE_ALL:
    143        flic->simm &= ~AIS_MODE_MASK(isc);
    144        flic->nimm &= ~AIS_MODE_MASK(isc);
    145        break;
    146    case SIC_IRQ_MODE_SINGLE:
    147        flic->simm |= AIS_MODE_MASK(isc);
    148        flic->nimm &= ~AIS_MODE_MASK(isc);
    149        break;
    150    default:
    151        return -EINVAL;
    152    }
    153
    154    return 0;
    155}
    156
    157static int qemu_s390_inject_airq(S390FLICState *fs, uint8_t type,
    158                                 uint8_t isc, uint8_t flags)
    159{
    160    QEMUS390FLICState *flic = s390_get_qemu_flic(fs);
    161    S390FLICStateClass *fsc = s390_get_flic_class(fs);
    162    bool flag = flags & S390_ADAPTER_SUPPRESSIBLE;
    163    uint32_t io_int_word = (isc << 27) | IO_INT_WORD_AI;
    164
    165    if (flag && (flic->nimm & AIS_MODE_MASK(isc))) {
    166        trace_qemu_s390_airq_suppressed(type, isc);
    167        return 0;
    168    }
    169
    170    fsc->inject_io(fs, 0, 0, 0, io_int_word);
    171
    172    if (flag && (flic->simm & AIS_MODE_MASK(isc))) {
    173        flic->nimm |= AIS_MODE_MASK(isc);
    174        trace_qemu_s390_suppress_airq(isc, "Single-Interruption Mode",
    175                                      "NO-Interruptions Mode");
    176    }
    177
    178    return 0;
    179}
    180
    181static void qemu_s390_flic_notify(uint32_t type)
    182{
    183    CPUState *cs;
    184
    185    /*
    186     * We have to make all CPUs see CPU_INTERRUPT_HARD, so they might
    187     * consider it. We will kick all running CPUs and only relevant
    188     * sleeping ones.
    189     */
    190    CPU_FOREACH(cs) {
    191        S390CPU *cpu = S390_CPU(cs);
    192
    193        cs->interrupt_request |= CPU_INTERRUPT_HARD;
    194
    195        /* ignore CPUs that are not sleeping */
    196        if (s390_cpu_get_state(cpu) != S390_CPU_STATE_OPERATING &&
    197            s390_cpu_get_state(cpu) != S390_CPU_STATE_LOAD) {
    198            continue;
    199        }
    200
    201        /* we always kick running CPUs for now, this is tricky */
    202        if (cs->halted) {
    203            /* don't check for subclasses, CPUs double check when waking up */
    204            if (type & FLIC_PENDING_SERVICE) {
    205                if (!(cpu->env.psw.mask & PSW_MASK_EXT)) {
    206                    continue;
    207                }
    208            } else if (type & FLIC_PENDING_IO) {
    209                if (!(cpu->env.psw.mask & PSW_MASK_IO)) {
    210                    continue;
    211                }
    212            } else if (type & FLIC_PENDING_MCHK_CR) {
    213                if (!(cpu->env.psw.mask & PSW_MASK_MCHECK)) {
    214                    continue;
    215                }
    216            }
    217        }
    218        cpu_interrupt(cs, CPU_INTERRUPT_HARD);
    219    }
    220}
    221
    222uint32_t qemu_s390_flic_dequeue_service(QEMUS390FLICState *flic)
    223{
    224    uint32_t tmp;
    225
    226    g_assert(qemu_mutex_iothread_locked());
    227    g_assert(flic->pending & FLIC_PENDING_SERVICE);
    228    tmp = flic->service_param;
    229    flic->service_param = 0;
    230    flic->pending &= ~FLIC_PENDING_SERVICE;
    231
    232    return tmp;
    233}
    234
    235/* caller has to free the returned object */
    236QEMUS390FlicIO *qemu_s390_flic_dequeue_io(QEMUS390FLICState *flic, uint64_t cr6)
    237{
    238    QEMUS390FlicIO *io;
    239    uint8_t isc;
    240
    241    g_assert(qemu_mutex_iothread_locked());
    242    if (!(flic->pending & CR6_TO_PENDING_IO(cr6))) {
    243        return NULL;
    244    }
    245
    246    for (isc = 0; isc < 8; isc++) {
    247        if (QLIST_EMPTY(&flic->io[isc]) || !(cr6 & ISC_TO_ISC_BITS(isc))) {
    248            continue;
    249        }
    250        io = QLIST_FIRST(&flic->io[isc]);
    251        QLIST_REMOVE(io, next);
    252
    253        /* update our indicator bit */
    254        if (QLIST_EMPTY(&flic->io[isc])) {
    255            flic->pending &= ~ISC_TO_PENDING_IO(isc);
    256        }
    257        return io;
    258    }
    259
    260    return NULL;
    261}
    262
    263void qemu_s390_flic_dequeue_crw_mchk(QEMUS390FLICState *flic)
    264{
    265    g_assert(qemu_mutex_iothread_locked());
    266    g_assert(flic->pending & FLIC_PENDING_MCHK_CR);
    267    flic->pending &= ~FLIC_PENDING_MCHK_CR;
    268}
    269
    270static void qemu_s390_inject_service(S390FLICState *fs, uint32_t parm)
    271{
    272    QEMUS390FLICState *flic = s390_get_qemu_flic(fs);
    273
    274    g_assert(qemu_mutex_iothread_locked());
    275    /* multiplexing is good enough for sclp - kvm does it internally as well */
    276    flic->service_param |= parm;
    277    flic->pending |= FLIC_PENDING_SERVICE;
    278
    279    qemu_s390_flic_notify(FLIC_PENDING_SERVICE);
    280}
    281
    282static void qemu_s390_inject_io(S390FLICState *fs, uint16_t subchannel_id,
    283                                uint16_t subchannel_nr, uint32_t io_int_parm,
    284                                uint32_t io_int_word)
    285{
    286    const uint8_t isc = IO_INT_WORD_ISC(io_int_word);
    287    QEMUS390FLICState *flic = s390_get_qemu_flic(fs);
    288    QEMUS390FlicIO *io;
    289
    290    g_assert(qemu_mutex_iothread_locked());
    291    io = g_new0(QEMUS390FlicIO, 1);
    292    io->id = subchannel_id;
    293    io->nr = subchannel_nr;
    294    io->parm = io_int_parm;
    295    io->word = io_int_word;
    296
    297    QLIST_INSERT_HEAD(&flic->io[isc], io, next);
    298    flic->pending |= ISC_TO_PENDING_IO(isc);
    299
    300    qemu_s390_flic_notify(ISC_TO_PENDING_IO(isc));
    301}
    302
    303static void qemu_s390_inject_crw_mchk(S390FLICState *fs)
    304{
    305    QEMUS390FLICState *flic = s390_get_qemu_flic(fs);
    306
    307    g_assert(qemu_mutex_iothread_locked());
    308    flic->pending |= FLIC_PENDING_MCHK_CR;
    309
    310    qemu_s390_flic_notify(FLIC_PENDING_MCHK_CR);
    311}
    312
    313bool qemu_s390_flic_has_service(QEMUS390FLICState *flic)
    314{
    315    /* called without lock via cc->has_work, will be validated under lock */
    316    return !!(flic->pending & FLIC_PENDING_SERVICE);
    317}
    318
    319bool qemu_s390_flic_has_io(QEMUS390FLICState *flic, uint64_t cr6)
    320{
    321    /* called without lock via cc->has_work, will be validated under lock */
    322    return !!(flic->pending & CR6_TO_PENDING_IO(cr6));
    323}
    324
    325bool qemu_s390_flic_has_crw_mchk(QEMUS390FLICState *flic)
    326{
    327    /* called without lock via cc->has_work, will be validated under lock */
    328    return !!(flic->pending & FLIC_PENDING_MCHK_CR);
    329}
    330
    331bool qemu_s390_flic_has_any(QEMUS390FLICState *flic)
    332{
    333    g_assert(qemu_mutex_iothread_locked());
    334    return !!flic->pending;
    335}
    336
    337static void qemu_s390_flic_reset(DeviceState *dev)
    338{
    339    QEMUS390FLICState *flic = QEMU_S390_FLIC(dev);
    340    QEMUS390FlicIO *cur, *next;
    341    int isc;
    342
    343    g_assert(qemu_mutex_iothread_locked());
    344    flic->simm = 0;
    345    flic->nimm = 0;
    346    flic->pending = 0;
    347
    348    /* remove all pending io interrupts */
    349    for (isc = 0; isc < 8; isc++) {
    350        QLIST_FOREACH_SAFE(cur, &flic->io[isc], next, next) {
    351            QLIST_REMOVE(cur, next);
    352            g_free(cur);
    353        }
    354    }
    355}
    356
    357bool ais_needed(void *opaque)
    358{
    359    S390FLICState *s = opaque;
    360
    361    return s->ais_supported;
    362}
    363
    364static const VMStateDescription qemu_s390_flic_vmstate = {
    365    .name = "qemu-s390-flic",
    366    .version_id = 1,
    367    .minimum_version_id = 1,
    368    .needed = ais_needed,
    369    .fields = (VMStateField[]) {
    370        VMSTATE_UINT8(simm, QEMUS390FLICState),
    371        VMSTATE_UINT8(nimm, QEMUS390FLICState),
    372        VMSTATE_END_OF_LIST()
    373    }
    374};
    375
    376static void qemu_s390_flic_instance_init(Object *obj)
    377{
    378    QEMUS390FLICState *flic = QEMU_S390_FLIC(obj);
    379    int isc;
    380
    381    for (isc = 0; isc < 8; isc++) {
    382        QLIST_INIT(&flic->io[isc]);
    383    }
    384}
    385
    386static void qemu_s390_flic_class_init(ObjectClass *oc, void *data)
    387{
    388    DeviceClass *dc = DEVICE_CLASS(oc);
    389    S390FLICStateClass *fsc = S390_FLIC_COMMON_CLASS(oc);
    390
    391    dc->reset = qemu_s390_flic_reset;
    392    dc->vmsd = &qemu_s390_flic_vmstate;
    393    fsc->register_io_adapter = qemu_s390_register_io_adapter;
    394    fsc->io_adapter_map = qemu_s390_io_adapter_map;
    395    fsc->add_adapter_routes = qemu_s390_add_adapter_routes;
    396    fsc->release_adapter_routes = qemu_s390_release_adapter_routes;
    397    fsc->clear_io_irq = qemu_s390_clear_io_flic;
    398    fsc->modify_ais_mode = qemu_s390_modify_ais_mode;
    399    fsc->inject_airq = qemu_s390_inject_airq;
    400    fsc->inject_service = qemu_s390_inject_service;
    401    fsc->inject_io = qemu_s390_inject_io;
    402    fsc->inject_crw_mchk = qemu_s390_inject_crw_mchk;
    403}
    404
    405static Property s390_flic_common_properties[] = {
    406    DEFINE_PROP_UINT32("adapter_routes_max_batch", S390FLICState,
    407                       adapter_routes_max_batch, ADAPTER_ROUTES_MAX_GSI),
    408    DEFINE_PROP_END_OF_LIST(),
    409};
    410
    411static void s390_flic_common_realize(DeviceState *dev, Error **errp)
    412{
    413    S390FLICState *fs = S390_FLIC_COMMON(dev);
    414    uint32_t max_batch = fs->adapter_routes_max_batch;
    415
    416    if (max_batch > ADAPTER_ROUTES_MAX_GSI) {
    417        error_setg(errp, "flic property adapter_routes_max_batch too big"
    418                   " (%d > %d)", max_batch, ADAPTER_ROUTES_MAX_GSI);
    419        return;
    420    }
    421
    422    fs->ais_supported = s390_has_feat(S390_FEAT_ADAPTER_INT_SUPPRESSION);
    423}
    424
    425static void s390_flic_class_init(ObjectClass *oc, void *data)
    426{
    427    DeviceClass *dc = DEVICE_CLASS(oc);
    428
    429    device_class_set_props(dc, s390_flic_common_properties);
    430    dc->realize = s390_flic_common_realize;
    431}
    432
    433static const TypeInfo qemu_s390_flic_info = {
    434    .name          = TYPE_QEMU_S390_FLIC,
    435    .parent        = TYPE_S390_FLIC_COMMON,
    436    .instance_size = sizeof(QEMUS390FLICState),
    437    .instance_init = qemu_s390_flic_instance_init,
    438    .class_init    = qemu_s390_flic_class_init,
    439};
    440
    441
    442static const TypeInfo s390_flic_common_info = {
    443    .name          = TYPE_S390_FLIC_COMMON,
    444    .parent        = TYPE_SYS_BUS_DEVICE,
    445    .instance_size = sizeof(S390FLICState),
    446    .class_init    = s390_flic_class_init,
    447    .class_size    = sizeof(S390FLICStateClass),
    448};
    449
    450static void qemu_s390_flic_register_types(void)
    451{
    452    type_register_static(&s390_flic_common_info);
    453    type_register_static(&qemu_s390_flic_info);
    454}
    455
    456type_init(qemu_s390_flic_register_types)
    457
    458static bool adapter_info_so_needed(void *opaque)
    459{
    460    return css_migration_enabled();
    461}
    462
    463const VMStateDescription vmstate_adapter_info_so = {
    464    .name = "s390_adapter_info/summary_offset",
    465    .version_id = 1,
    466    .minimum_version_id = 1,
    467    .needed = adapter_info_so_needed,
    468    .fields = (VMStateField[]) {
    469        VMSTATE_UINT32(summary_offset, AdapterInfo),
    470        VMSTATE_END_OF_LIST()
    471    }
    472};
    473
    474const VMStateDescription vmstate_adapter_info = {
    475    .name = "s390_adapter_info",
    476    .version_id = 1,
    477    .minimum_version_id = 1,
    478    .fields = (VMStateField[]) {
    479        VMSTATE_UINT64(ind_offset, AdapterInfo),
    480        /*
    481         * We do not have to migrate neither the id nor the addresses.
    482         * The id is set by css_register_io_adapter and the addresses
    483         * are set based on the IndAddr objects after those get mapped.
    484         */
    485        VMSTATE_END_OF_LIST()
    486    },
    487    .subsections = (const VMStateDescription * []) {
    488        &vmstate_adapter_info_so,
    489        NULL
    490    }
    491};
    492
    493const VMStateDescription vmstate_adapter_routes = {
    494
    495    .name = "s390_adapter_routes",
    496    .version_id = 1,
    497    .minimum_version_id = 1,
    498    .fields = (VMStateField[]) {
    499        VMSTATE_STRUCT(adapter, AdapterRoutes, 1, vmstate_adapter_info,
    500                       AdapterInfo),
    501        VMSTATE_END_OF_LIST()
    502    }
    503};