hw/s390-virtio-bus.c

   1 /*
   2  * QEMU S390 virtio target
   3  *
   4  * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "hw.h"
  21 #include "block/block.h"
  22 #include "sysemu/sysemu.h"
  23 #include "boards.h"
  24 #include "monitor/monitor.h"
  25 #include "loader.h"
  26 #include "elf.h"
  27 #include "hw/virtio.h"
  28 #include "hw/virtio-rng.h"
  29 #include "hw/virtio-serial.h"
  30 #include "hw/virtio-net.h"
  31 #include "hw/sysbus.h"
  32 #include "sysemu/kvm.h"
  33
  34 #include "hw/s390-virtio-bus.h"
  35
  36 /* #define DEBUG_S390 */
  37
  38 #ifdef DEBUG_S390
  39 #define dprintf(fmt, ...) \
  40     do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
  41 #else
  42 #define dprintf(fmt, ...) \
  43     do { } while (0)
  44 #endif
  45
  46 #define VIRTIO_EXT_CODE   0x2603
  47
  48 static const TypeInfo s390_virtio_bus_info = {
  49     .name = TYPE_S390_VIRTIO_BUS,
  50     .parent = TYPE_BUS,
  51     .instance_size = sizeof(VirtIOS390Bus),
  52 };
  53
  54 static const VirtIOBindings virtio_s390_bindings;
  55
  56 static ram_addr_t s390_virtio_device_num_vq(VirtIOS390Device *dev);
  57
  58 /* length of VirtIO device pages */
  59 const hwaddr virtio_size = S390_DEVICE_PAGES * TARGET_PAGE_SIZE;
  60
  61 static void s390_virtio_bus_reset(void *opaque)
  62 {
  63     VirtIOS390Bus *bus = opaque;
  64     bus->next_ring = bus->dev_page + TARGET_PAGE_SIZE;
  65 }
  66
  67 void s390_virtio_reset_idx(VirtIOS390Device *dev)
  68 {
  69     int i;
  70     hwaddr idx_addr;
  71     uint8_t num_vq;
  72
  73     num_vq = s390_virtio_device_num_vq(dev);
  74     for (i = 0; i < num_vq; i++) {
  75         idx_addr = virtio_queue_get_avail_addr(dev->vdev, i) +
  76             VIRTIO_VRING_AVAIL_IDX_OFFS;
  77         stw_phys(idx_addr, 0);
  78         idx_addr = virtio_queue_get_used_addr(dev->vdev, i) +
  79             VIRTIO_VRING_USED_IDX_OFFS;
  80         stw_phys(idx_addr, 0);
  81     }
  82 }
  83
  84 VirtIOS390Bus *s390_virtio_bus_init(ram_addr_t *ram_size)
  85 {
  86     VirtIOS390Bus *bus;
  87     BusState *_bus;
  88     DeviceState *dev;
  89
  90     /* Create bridge device */
  91     dev = qdev_create(NULL, "s390-virtio-bridge");
  92     qdev_init_nofail(dev);
  93
  94     /* Create bus on bridge device */
  95
  96     _bus = qbus_create(TYPE_S390_VIRTIO_BUS, dev, "s390-virtio");
  97     bus = DO_UPCAST(VirtIOS390Bus, bus, _bus);
  98
  99     bus->dev_page = *ram_size;
 100     bus->dev_offs = bus->dev_page;
 101     bus->next_ring = bus->dev_page + TARGET_PAGE_SIZE;
 102
 103     /* Enable hotplugging */
 104     _bus->allow_hotplug = 1;
 105
 106     /* Allocate RAM for VirtIO device pages (descriptors, queues, rings) */
 107     *ram_size += S390_DEVICE_PAGES * TARGET_PAGE_SIZE;
 108
 109     qemu_register_reset(s390_virtio_bus_reset, bus);
 110     return bus;
 111 }
 112
 113 static void s390_virtio_irq(S390CPU *cpu, int config_change, uint64_t token)
 114 {
 115     CPUS390XState *env = &cpu->env;
 116
 117     if (kvm_enabled()) {
 118         kvm_s390_virtio_irq(cpu, config_change, token);
 119     } else {
 120         cpu_inject_ext(env, VIRTIO_EXT_CODE, config_change, token);
 121     }
 122 }
 123
 124 static int s390_virtio_device_init(VirtIOS390Device *dev, VirtIODevice *vdev)
 125 {
 126     VirtIOS390Bus *bus;
 127     int dev_len;
 128
 129     bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 130     dev->vdev = vdev;
 131     dev->dev_offs = bus->dev_offs;
 132     dev->feat_len = sizeof(uint32_t); /* always keep 32 bits features */
 133
 134     dev_len = VIRTIO_DEV_OFFS_CONFIG;
 135     dev_len += s390_virtio_device_num_vq(dev) * VIRTIO_VQCONFIG_LEN;
 136     dev_len += dev->feat_len * 2;
 137     dev_len += vdev->config_len;
 138
 139     bus->dev_offs += dev_len;
 140
 141     virtio_bind_device(vdev, &virtio_s390_bindings, dev);
 142     dev->host_features = vdev->get_features(vdev, dev->host_features);
 143     s390_virtio_device_sync(dev);
 144     s390_virtio_reset_idx(dev);
 145     if (dev->qdev.hotplugged) {
 146         S390CPU *cpu = s390_cpu_addr2state(0);
 147         s390_virtio_irq(cpu, VIRTIO_PARAM_DEV_ADD, dev->dev_offs);
 148     }
 149
 150     return 0;
 151 }
 152
 153 static int s390_virtio_net_init(VirtIOS390Device *dev)
 154 {
 155     VirtIODevice *vdev;
 156
 157     vdev = virtio_net_init((DeviceState *)dev, &dev->nic, &dev->net);
 158     if (!vdev) {
 159         return -1;
 160     }
 161
 162     return s390_virtio_device_init(dev, vdev);
 163 }
 164
 165 static int s390_virtio_blk_init(VirtIOS390Device *dev)
 166 {
 167     VirtIODevice *vdev;
 168
 169     vdev = virtio_blk_init((DeviceState *)dev, &dev->blk);
 170     if (!vdev) {
 171         return -1;
 172     }
 173
 174     return s390_virtio_device_init(dev, vdev);
 175 }
 176
 177 static int s390_virtio_serial_init(VirtIOS390Device *dev)
 178 {
 179     VirtIOS390Bus *bus;
 180     VirtIODevice *vdev;
 181     int r;
 182
 183     bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 184
 185     vdev = virtio_serial_init((DeviceState *)dev, &dev->serial);
 186     if (!vdev) {
 187         return -1;
 188     }
 189
 190     r = s390_virtio_device_init(dev, vdev);
 191     if (!r) {
 192         bus->console = dev;
 193     }
 194
 195     return r;
 196 }
 197
 198 static int s390_virtio_scsi_init(VirtIOS390Device *dev)
 199 {
 200     VirtIODevice *vdev;
 201
 202     vdev = virtio_scsi_init((DeviceState *)dev, &dev->scsi);
 203     if (!vdev) {
 204         return -1;
 205     }
 206
 207     return s390_virtio_device_init(dev, vdev);
 208 }
 209
 210 static int s390_virtio_rng_init(VirtIOS390Device *dev)
 211 {
 212     VirtIODevice *vdev;
 213
 214     vdev = virtio_rng_init((DeviceState *)dev, &dev->rng);
 215     if (!vdev) {
 216         return -1;
 217     }
 218
 219     return s390_virtio_device_init(dev, vdev);
 220 }
 221
 222 static uint64_t s390_virtio_device_vq_token(VirtIOS390Device *dev, int vq)
 223 {
 224     ram_addr_t token_off;
 225
 226     token_off = (dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG) +
 227                 (vq * VIRTIO_VQCONFIG_LEN) +
 228                 VIRTIO_VQCONFIG_OFFS_TOKEN;
 229
 230     return ldq_be_phys(token_off);
 231 }
 232
 233 static ram_addr_t s390_virtio_device_num_vq(VirtIOS390Device *dev)
 234 {
 235     VirtIODevice *vdev = dev->vdev;
 236     int num_vq;
 237
 238     for (num_vq = 0; num_vq < VIRTIO_PCI_QUEUE_MAX; num_vq++) {
 239         if (!virtio_queue_get_num(vdev, num_vq)) {
 240             break;
 241         }
 242     }
 243
 244     return num_vq;
 245 }
 246
 247 static ram_addr_t s390_virtio_next_ring(VirtIOS390Bus *bus)
 248 {
 249     ram_addr_t r = bus->next_ring;
 250
 251     bus->next_ring += VIRTIO_RING_LEN;
 252     return r;
 253 }
 254
 255 void s390_virtio_device_sync(VirtIOS390Device *dev)
 256 {
 257     VirtIOS390Bus *bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 258     ram_addr_t cur_offs;
 259     uint8_t num_vq;
 260     int i;
 261
 262     virtio_reset(dev->vdev);
 263
 264     /* Sync dev space */
 265     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_TYPE, dev->vdev->device_id);
 266
 267     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_NUM_VQ, s390_virtio_device_num_vq(dev));
 268     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_FEATURE_LEN, dev->feat_len);
 269
 270     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG_LEN, dev->vdev->config_len);
 271
 272     num_vq = s390_virtio_device_num_vq(dev);
 273     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_NUM_VQ, num_vq);
 274
 275     /* Sync virtqueues */
 276     for (i = 0; i < num_vq; i++) {
 277         ram_addr_t vq = (dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG) +
 278                         (i * VIRTIO_VQCONFIG_LEN);
 279         ram_addr_t vring;
 280
 281         vring = s390_virtio_next_ring(bus);
 282         virtio_queue_set_addr(dev->vdev, i, vring);
 283         virtio_queue_set_vector(dev->vdev, i, i);
 284         stq_be_phys(vq + VIRTIO_VQCONFIG_OFFS_ADDRESS, vring);
 285         stw_be_phys(vq + VIRTIO_VQCONFIG_OFFS_NUM, virtio_queue_get_num(dev->vdev, i));
 286     }
 287
 288     cur_offs = dev->dev_offs;
 289     cur_offs += VIRTIO_DEV_OFFS_CONFIG;
 290     cur_offs += num_vq * VIRTIO_VQCONFIG_LEN;
 291
 292     /* Sync feature bitmap */
 293     stl_le_phys(cur_offs, dev->host_features);
 294
 295     dev->feat_offs = cur_offs + dev->feat_len;
 296     cur_offs += dev->feat_len * 2;
 297
 298     /* Sync config space */
 299     if (dev->vdev->get_config) {
 300         dev->vdev->get_config(dev->vdev, dev->vdev->config);
 301     }
 302
 303     cpu_physical_memory_write(cur_offs,
 304                               dev->vdev->config, dev->vdev->config_len);
 305     cur_offs += dev->vdev->config_len;
 306 }
 307
 308 void s390_virtio_device_update_status(VirtIOS390Device *dev)
 309 {
 310     VirtIODevice *vdev = dev->vdev;
 311     uint32_t features;
 312
 313     virtio_set_status(vdev, ldub_phys(dev->dev_offs + VIRTIO_DEV_OFFS_STATUS));
 314
 315     /* Update guest supported feature bitmap */
 316
 317     features = bswap32(ldl_be_phys(dev->feat_offs));
 318     virtio_set_features(vdev, features);
 319 }
 320
 321 VirtIOS390Device *s390_virtio_bus_console(VirtIOS390Bus *bus)
 322 {
 323     return bus->console;
 324 }
 325
 326 /* Find a device by vring address */
 327 VirtIOS390Device *s390_virtio_bus_find_vring(VirtIOS390Bus *bus,
 328                                              ram_addr_t mem,
 329                                              int *vq_num)
 330 {
 331     BusChild *kid;
 332     int i;
 333
 334     QTAILQ_FOREACH(kid, &bus->bus.children, sibling) {
 335         VirtIOS390Device *dev = (VirtIOS390Device *)kid->child;
 336
 337         for(i = 0; i < VIRTIO_PCI_QUEUE_MAX; i++) {
 338             if (!virtio_queue_get_addr(dev->vdev, i))
 339                 break;
 340             if (virtio_queue_get_addr(dev->vdev, i) == mem) {
 341                 if (vq_num) {
 342                     *vq_num = i;
 343                 }
 344                 return dev;
 345             }
 346         }
 347     }
 348
 349     return NULL;
 350 }
 351
 352 /* Find a device by device descriptor location */
 353 VirtIOS390Device *s390_virtio_bus_find_mem(VirtIOS390Bus *bus, ram_addr_t mem)
 354 {
 355     BusChild *kid;
 356
 357     QTAILQ_FOREACH(kid, &bus->bus.children, sibling) {
 358         VirtIOS390Device *dev = (VirtIOS390Device *)kid->child;
 359         if (dev->dev_offs == mem) {
 360             return dev;
 361         }
 362     }
 363
 364     return NULL;
 365 }
 366
 367 static void virtio_s390_notify(void *opaque, uint16_t vector)
 368 {
 369     VirtIOS390Device *dev = (VirtIOS390Device*)opaque;
 370     uint64_t token = s390_virtio_device_vq_token(dev, vector);
 371     S390CPU *cpu = s390_cpu_addr2state(0);
 372
 373     s390_virtio_irq(cpu, 0, token);
 374 }
 375
 376 static unsigned virtio_s390_get_features(void *opaque)
 377 {
 378     VirtIOS390Device *dev = (VirtIOS390Device*)opaque;
 379     return dev->host_features;
 380 }
 381
 382 /**************** S390 Virtio Bus Device Descriptions *******************/
 383
 384 static const VirtIOBindings virtio_s390_bindings = {
 385     .notify = virtio_s390_notify,
 386     .get_features = virtio_s390_get_features,
 387 };
 388
 389 static Property s390_virtio_net_properties[] = {
 390     DEFINE_NIC_PROPERTIES(VirtIOS390Device, nic),
 391     DEFINE_PROP_UINT32("x-txtimer", VirtIOS390Device,
 392                        net.txtimer, TX_TIMER_INTERVAL),
 393     DEFINE_PROP_INT32("x-txburst", VirtIOS390Device,
 394                       net.txburst, TX_BURST),
 395     DEFINE_PROP_STRING("tx", VirtIOS390Device, net.tx),
 396     DEFINE_PROP_END_OF_LIST(),
 397 };
 398
 399 static void s390_virtio_net_class_init(ObjectClass *klass, void *data)
 400 {
 401     DeviceClass *dc = DEVICE_CLASS(klass);
 402     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 403
 404     k->init = s390_virtio_net_init;
 405     dc->props = s390_virtio_net_properties;
 406 }
 407
 408 static TypeInfo s390_virtio_net = {
 409     .name          = "virtio-net-s390",
 410     .parent        = TYPE_VIRTIO_S390_DEVICE,
 411     .instance_size = sizeof(VirtIOS390Device),
 412     .class_init    = s390_virtio_net_class_init,
 413 };
 414
 415 static Property s390_virtio_blk_properties[] = {
 416     DEFINE_BLOCK_PROPERTIES(VirtIOS390Device, blk.conf),
 417     DEFINE_BLOCK_CHS_PROPERTIES(VirtIOS390Device, blk.conf),
 418     DEFINE_PROP_STRING("serial", VirtIOS390Device, blk.serial),
 419 #ifdef __linux__
 420     DEFINE_PROP_BIT("scsi", VirtIOS390Device, blk.scsi, 0, true),
 421 #endif
 422     DEFINE_PROP_END_OF_LIST(),
 423 };
 424
 425 static void s390_virtio_blk_class_init(ObjectClass *klass, void *data)
 426 {
 427     DeviceClass *dc = DEVICE_CLASS(klass);
 428     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 429
 430     k->init = s390_virtio_blk_init;
 431     dc->props = s390_virtio_blk_properties;
 432 }
 433
 434 static TypeInfo s390_virtio_blk = {
 435     .name          = "virtio-blk-s390",
 436     .parent        = TYPE_VIRTIO_S390_DEVICE,
 437     .instance_size = sizeof(VirtIOS390Device),
 438     .class_init    = s390_virtio_blk_class_init,
 439 };
 440
 441 static Property s390_virtio_serial_properties[] = {
 442     DEFINE_PROP_UINT32("max_ports", VirtIOS390Device,
 443                        serial.max_virtserial_ports, 31),
 444     DEFINE_PROP_END_OF_LIST(),
 445 };
 446
 447 static void s390_virtio_serial_class_init(ObjectClass *klass, void *data)
 448 {
 449     DeviceClass *dc = DEVICE_CLASS(klass);
 450     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 451
 452     k->init = s390_virtio_serial_init;
 453     dc->props = s390_virtio_serial_properties;
 454 }
 455
 456 static TypeInfo s390_virtio_serial = {
 457     .name          = "virtio-serial-s390",
 458     .parent        = TYPE_VIRTIO_S390_DEVICE,
 459     .instance_size = sizeof(VirtIOS390Device),
 460     .class_init    = s390_virtio_serial_class_init,
 461 };
 462
 463 static void s390_virtio_rng_initfn(Object *obj)
 464 {
 465     VirtIOS390Device *dev = VIRTIO_S390_DEVICE(obj);
 466
 467     object_property_add_link(obj, "rng", TYPE_RNG_BACKEND,
 468                              (Object **)&dev->rng.rng, NULL);
 469 }
 470
 471 static void s390_virtio_rng_class_init(ObjectClass *klass, void *data)
 472 {
 473     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 474
 475     k->init = s390_virtio_rng_init;
 476 }
 477
 478 static TypeInfo s390_virtio_rng = {
 479     .name          = "virtio-rng-s390",
 480     .parent        = TYPE_VIRTIO_S390_DEVICE,
 481     .instance_size = sizeof(VirtIOS390Device),
 482     .instance_init = s390_virtio_rng_initfn,
 483     .class_init    = s390_virtio_rng_class_init,
 484 };
 485
 486 static int s390_virtio_busdev_init(DeviceState *dev)
 487 {
 488     VirtIOS390Device *_dev = (VirtIOS390Device *)dev;
 489     VirtIOS390DeviceClass *_info = VIRTIO_S390_DEVICE_GET_CLASS(dev);
 490
 491     return _info->init(_dev);
 492 }
 493
 494 static void virtio_s390_device_class_init(ObjectClass *klass, void *data)
 495 {
 496     DeviceClass *dc = DEVICE_CLASS(klass);
 497
 498     dc->init = s390_virtio_busdev_init;
 499     dc->bus_type = TYPE_S390_VIRTIO_BUS;
 500     dc->unplug = qdev_simple_unplug_cb;
 501 }
 502
 503 static TypeInfo virtio_s390_device_info = {
 504     .name = TYPE_VIRTIO_S390_DEVICE,
 505     .parent = TYPE_DEVICE,
 506     .instance_size = sizeof(VirtIOS390Device),
 507     .class_init = virtio_s390_device_class_init,
 508     .class_size = sizeof(VirtIOS390DeviceClass),
 509     .abstract = true,
 510 };
 511
 512 static Property s390_virtio_scsi_properties[] = {
 513     DEFINE_VIRTIO_SCSI_PROPERTIES(VirtIOS390Device, host_features, scsi),
 514     DEFINE_PROP_END_OF_LIST(),
 515 };
 516
 517 static void s390_virtio_scsi_class_init(ObjectClass *klass, void *data)
 518 {
 519     DeviceClass *dc = DEVICE_CLASS(klass);
 520     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 521
 522     k->init = s390_virtio_scsi_init;
 523     dc->props = s390_virtio_scsi_properties;
 524 }
 525
 526 static TypeInfo s390_virtio_scsi = {
 527     .name          = "virtio-scsi-s390",
 528     .parent        = TYPE_VIRTIO_S390_DEVICE,
 529     .instance_size = sizeof(VirtIOS390Device),
 530     .class_init    = s390_virtio_scsi_class_init,
 531 };
 532
 533 /***************** S390 Virtio Bus Bridge Device *******************/
 534 /* Only required to have the virtio bus as child in the system bus */
 535
 536 static int s390_virtio_bridge_init(SysBusDevice *dev)
 537 {
 538     /* nothing */
 539     return 0;
 540 }
 541
 542 static void s390_virtio_bridge_class_init(ObjectClass *klass, void *data)
 543 {
 544     DeviceClass *dc = DEVICE_CLASS(klass);
 545     SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 546
 547     k->init = s390_virtio_bridge_init;
 548     dc->no_user = 1;
 549 }
 550
 551 static TypeInfo s390_virtio_bridge_info = {
 552     .name          = "s390-virtio-bridge",
 553     .parent        = TYPE_SYS_BUS_DEVICE,
 554     .instance_size = sizeof(SysBusDevice),
 555     .class_init    = s390_virtio_bridge_class_init,
 556 };
 557
 558 static void s390_virtio_register_types(void)
 559 {
 560     type_register_static(&s390_virtio_bus_info);
 561     type_register_static(&virtio_s390_device_info);
 562     type_register_static(&s390_virtio_serial);
 563     type_register_static(&s390_virtio_blk);
 564     type_register_static(&s390_virtio_net);
 565     type_register_static(&s390_virtio_scsi);
 566     type_register_static(&s390_virtio_rng);
 567     type_register_static(&s390_virtio_bridge_info);
 568 }
 569
 570 type_init(s390_virtio_register_types)