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 "hw/sysbus.h" 16 #include "hw/s390x/ioinst.h" 17 #include "hw/s390x/s390_flic.h" 18 #include "hw/s390x/css.h" 19 #include "trace.h" 20 #include "cpu.h" 21 #include "hw/qdev.h" 22 #include "qapi/error.h" 23 #include "hw/s390x/s390-virtio-ccw.h" 24 25 S390FLICState *s390_get_flic(void) 26 { 27 static S390FLICState *fs; 28 29 if (!fs) { 30 fs = S390_FLIC_COMMON(object_resolve_path_type("", 31 TYPE_S390_FLIC_COMMON, 32 NULL)); 33 } 34 return fs; 35 } 36 37 void s390_flic_init(void) 38 { 39 DeviceState *dev; 40 41 if (kvm_enabled()) { 42 dev = qdev_create(NULL, TYPE_KVM_S390_FLIC); 43 object_property_add_child(qdev_get_machine(), TYPE_KVM_S390_FLIC, 44 OBJECT(dev), NULL); 45 } else { 46 dev = qdev_create(NULL, TYPE_QEMU_S390_FLIC); 47 object_property_add_child(qdev_get_machine(), TYPE_QEMU_S390_FLIC, 48 OBJECT(dev), NULL); 49 } 50 qdev_init_nofail(dev); 51 } 52 53 static int qemu_s390_register_io_adapter(S390FLICState *fs, uint32_t id, 54 uint8_t isc, bool swap, 55 bool is_maskable, uint8_t flags) 56 { 57 /* nothing to do */ 58 return 0; 59 } 60 61 static int qemu_s390_io_adapter_map(S390FLICState *fs, uint32_t id, 62 uint64_t map_addr, bool do_map) 63 { 64 /* nothing to do */ 65 return 0; 66 } 67 68 static int qemu_s390_add_adapter_routes(S390FLICState *fs, 69 AdapterRoutes *routes) 70 { 71 return -ENOSYS; 72 } 73 74 static void qemu_s390_release_adapter_routes(S390FLICState *fs, 75 AdapterRoutes *routes) 76 { 77 } 78 79 static int qemu_s390_clear_io_flic(S390FLICState *fs, uint16_t subchannel_id, 80 uint16_t subchannel_nr) 81 { 82 /* Fixme TCG */ 83 return -ENOSYS; 84 } 85 86 static int qemu_s390_modify_ais_mode(S390FLICState *fs, uint8_t isc, 87 uint16_t mode) 88 { 89 QEMUS390FLICState *flic = QEMU_S390_FLIC(fs); 90 91 switch (mode) { 92 case SIC_IRQ_MODE_ALL: 93 flic->simm &= ~AIS_MODE_MASK(isc); 94 flic->nimm &= ~AIS_MODE_MASK(isc); 95 break; 96 case SIC_IRQ_MODE_SINGLE: 97 flic->simm |= AIS_MODE_MASK(isc); 98 flic->nimm &= ~AIS_MODE_MASK(isc); 99 break; 100 default: 101 return -EINVAL; 102 } 103 104 return 0; 105 } 106 107 static int qemu_s390_inject_airq(S390FLICState *fs, uint8_t type, 108 uint8_t isc, uint8_t flags) 109 { 110 QEMUS390FLICState *flic = QEMU_S390_FLIC(fs); 111 bool flag = flags & S390_ADAPTER_SUPPRESSIBLE; 112 uint32_t io_int_word = (isc << 27) | IO_INT_WORD_AI; 113 114 if (flag && (flic->nimm & AIS_MODE_MASK(isc))) { 115 trace_qemu_s390_airq_suppressed(type, isc); 116 return 0; 117 } 118 119 s390_io_interrupt(0, 0, 0, io_int_word); 120 121 if (flag && (flic->simm & AIS_MODE_MASK(isc))) { 122 flic->nimm |= AIS_MODE_MASK(isc); 123 trace_qemu_s390_suppress_airq(isc, "Single-Interruption Mode", 124 "NO-Interruptions Mode"); 125 } 126 127 return 0; 128 } 129 130 static void qemu_s390_inject_service(S390FLICState *fs, uint32_t parm) 131 { 132 133 S390CPU *dummy_cpu = s390_cpu_addr2state(0); 134 135 /* FIXME: don't inject into dummy CPU */ 136 cpu_inject_service(dummy_cpu, parm); 137 } 138 139 static void qemu_s390_inject_io(S390FLICState *fs, uint16_t subchannel_id, 140 uint16_t subchannel_nr, uint32_t io_int_parm, 141 uint32_t io_int_word) 142 { 143 S390CPU *dummy_cpu = s390_cpu_addr2state(0); 144 145 /* FIXME: don't inject into dummy CPU */ 146 cpu_inject_io(dummy_cpu, subchannel_id, subchannel_nr, io_int_parm, 147 io_int_word); 148 } 149 150 static void qemu_s390_inject_crw_mchk(S390FLICState *fs) 151 { 152 S390CPU *dummy_cpu = s390_cpu_addr2state(0); 153 154 /* FIXME: don't inject into dummy CPU */ 155 cpu_inject_crw_mchk(dummy_cpu); 156 } 157 158 static void qemu_s390_flic_reset(DeviceState *dev) 159 { 160 QEMUS390FLICState *flic = QEMU_S390_FLIC(dev); 161 162 flic->simm = 0; 163 flic->nimm = 0; 164 } 165 166 bool ais_needed(void *opaque) 167 { 168 S390FLICState *s = opaque; 169 170 return s->ais_supported; 171 } 172 173 static const VMStateDescription qemu_s390_flic_vmstate = { 174 .name = "qemu-s390-flic", 175 .version_id = 1, 176 .minimum_version_id = 1, 177 .needed = ais_needed, 178 .fields = (VMStateField[]) { 179 VMSTATE_UINT8(simm, QEMUS390FLICState), 180 VMSTATE_UINT8(nimm, QEMUS390FLICState), 181 VMSTATE_END_OF_LIST() 182 } 183 }; 184 185 static void qemu_s390_flic_class_init(ObjectClass *oc, void *data) 186 { 187 DeviceClass *dc = DEVICE_CLASS(oc); 188 S390FLICStateClass *fsc = S390_FLIC_COMMON_CLASS(oc); 189 190 dc->reset = qemu_s390_flic_reset; 191 dc->vmsd = &qemu_s390_flic_vmstate; 192 fsc->register_io_adapter = qemu_s390_register_io_adapter; 193 fsc->io_adapter_map = qemu_s390_io_adapter_map; 194 fsc->add_adapter_routes = qemu_s390_add_adapter_routes; 195 fsc->release_adapter_routes = qemu_s390_release_adapter_routes; 196 fsc->clear_io_irq = qemu_s390_clear_io_flic; 197 fsc->modify_ais_mode = qemu_s390_modify_ais_mode; 198 fsc->inject_airq = qemu_s390_inject_airq; 199 fsc->inject_service = qemu_s390_inject_service; 200 fsc->inject_io = qemu_s390_inject_io; 201 fsc->inject_crw_mchk = qemu_s390_inject_crw_mchk; 202 } 203 204 static Property s390_flic_common_properties[] = { 205 DEFINE_PROP_UINT32("adapter_routes_max_batch", S390FLICState, 206 adapter_routes_max_batch, ADAPTER_ROUTES_MAX_GSI), 207 DEFINE_PROP_END_OF_LIST(), 208 }; 209 210 static void s390_flic_common_realize(DeviceState *dev, Error **errp) 211 { 212 S390FLICState *fs = S390_FLIC_COMMON(dev); 213 uint32_t max_batch = fs->adapter_routes_max_batch; 214 215 if (max_batch > ADAPTER_ROUTES_MAX_GSI) { 216 error_setg(errp, "flic property adapter_routes_max_batch too big" 217 " (%d > %d)", max_batch, ADAPTER_ROUTES_MAX_GSI); 218 return; 219 } 220 221 fs->ais_supported = s390_has_feat(S390_FEAT_ADAPTER_INT_SUPPRESSION); 222 } 223 224 static void s390_flic_class_init(ObjectClass *oc, void *data) 225 { 226 DeviceClass *dc = DEVICE_CLASS(oc); 227 228 dc->props = s390_flic_common_properties; 229 dc->realize = s390_flic_common_realize; 230 } 231 232 static const TypeInfo qemu_s390_flic_info = { 233 .name = TYPE_QEMU_S390_FLIC, 234 .parent = TYPE_S390_FLIC_COMMON, 235 .instance_size = sizeof(QEMUS390FLICState), 236 .class_init = qemu_s390_flic_class_init, 237 }; 238 239 240 static const TypeInfo s390_flic_common_info = { 241 .name = TYPE_S390_FLIC_COMMON, 242 .parent = TYPE_SYS_BUS_DEVICE, 243 .instance_size = sizeof(S390FLICState), 244 .class_init = s390_flic_class_init, 245 .class_size = sizeof(S390FLICStateClass), 246 }; 247 248 static void qemu_s390_flic_register_types(void) 249 { 250 type_register_static(&s390_flic_common_info); 251 type_register_static(&qemu_s390_flic_info); 252 } 253 254 type_init(qemu_s390_flic_register_types) 255 256 static bool adapter_info_so_needed(void *opaque) 257 { 258 return css_migration_enabled(); 259 } 260 261 const VMStateDescription vmstate_adapter_info_so = { 262 .name = "s390_adapter_info/summary_offset", 263 .version_id = 1, 264 .minimum_version_id = 1, 265 .needed = adapter_info_so_needed, 266 .fields = (VMStateField[]) { 267 VMSTATE_UINT32(summary_offset, AdapterInfo), 268 VMSTATE_END_OF_LIST() 269 } 270 }; 271 272 const VMStateDescription vmstate_adapter_info = { 273 .name = "s390_adapter_info", 274 .version_id = 1, 275 .minimum_version_id = 1, 276 .fields = (VMStateField[]) { 277 VMSTATE_UINT64(ind_offset, AdapterInfo), 278 /* 279 * We do not have to migrate neither the id nor the addresses. 280 * The id is set by css_register_io_adapter and the addresses 281 * are set based on the IndAddr objects after those get mapped. 282 */ 283 VMSTATE_END_OF_LIST() 284 }, 285 .subsections = (const VMStateDescription * []) { 286 &vmstate_adapter_info_so, 287 NULL 288 } 289 }; 290 291 const VMStateDescription vmstate_adapter_routes = { 292 293 .name = "s390_adapter_routes", 294 .version_id = 1, 295 .minimum_version_id = 1, 296 .fields = (VMStateField[]) { 297 VMSTATE_STRUCT(adapter, AdapterRoutes, 1, vmstate_adapter_info, 298 AdapterInfo), 299 VMSTATE_END_OF_LIST() 300 } 301 }; 302