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(CPUS390XState *env, int config_change, uint64_t token)
 114 {
 115     if (kvm_enabled()) {
 116         kvm_s390_virtio_irq(env, config_change, token);
 117     } else {
 118         cpu_inject_ext(env, VIRTIO_EXT_CODE, config_change, token);
 119     }
 120 }
 121
 122 static int s390_virtio_device_init(VirtIOS390Device *dev, VirtIODevice *vdev)
 123 {
 124     VirtIOS390Bus *bus;
 125     int dev_len;
 126
 127     bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 128     dev->vdev = vdev;
 129     dev->dev_offs = bus->dev_offs;
 130     dev->feat_len = sizeof(uint32_t); /* always keep 32 bits features */
 131
 132     dev_len = VIRTIO_DEV_OFFS_CONFIG;
 133     dev_len += s390_virtio_device_num_vq(dev) * VIRTIO_VQCONFIG_LEN;
 134     dev_len += dev->feat_len * 2;
 135     dev_len += vdev->config_len;
 136
 137     bus->dev_offs += dev_len;
 138
 139     virtio_bind_device(vdev, &virtio_s390_bindings, DEVICE(dev));
 140     dev->host_features = vdev->get_features(vdev, dev->host_features);
 141     s390_virtio_device_sync(dev);
 142     s390_virtio_reset_idx(dev);
 143     if (dev->qdev.hotplugged) {
 144         S390CPU *cpu = s390_cpu_addr2state(0);
 145         CPUS390XState *env = &cpu->env;
 146         s390_virtio_irq(env, VIRTIO_PARAM_DEV_ADD, dev->dev_offs);
 147     }
 148
 149     return 0;
 150 }
 151
 152 static int s390_virtio_net_init(VirtIOS390Device *dev)
 153 {
 154     VirtIODevice *vdev;
 155
 156     vdev = virtio_net_init((DeviceState *)dev, &dev->nic, &dev->net);
 157     if (!vdev) {
 158         return -1;
 159     }
 160
 161     return s390_virtio_device_init(dev, vdev);
 162 }
 163
 164 static int s390_virtio_blk_init(VirtIOS390Device *dev)
 165 {
 166     VirtIODevice *vdev;
 167
 168     vdev = virtio_blk_init((DeviceState *)dev, &dev->blk);
 169     if (!vdev) {
 170         return -1;
 171     }
 172
 173     return s390_virtio_device_init(dev, vdev);
 174 }
 175
 176 static int s390_virtio_serial_init(VirtIOS390Device *dev)
 177 {
 178     VirtIOS390Bus *bus;
 179     VirtIODevice *vdev;
 180     int r;
 181
 182     bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 183
 184     vdev = virtio_serial_init((DeviceState *)dev, &dev->serial);
 185     if (!vdev) {
 186         return -1;
 187     }
 188
 189     r = s390_virtio_device_init(dev, vdev);
 190     if (!r) {
 191         bus->console = dev;
 192     }
 193
 194     return r;
 195 }
 196
 197 static int s390_virtio_scsi_init(VirtIOS390Device *dev)
 198 {
 199     VirtIODevice *vdev;
 200
 201     vdev = virtio_scsi_init((DeviceState *)dev, &dev->scsi);
 202     if (!vdev) {
 203         return -1;
 204     }
 205
 206     return s390_virtio_device_init(dev, vdev);
 207 }
 208
 209 static int s390_virtio_rng_init(VirtIOS390Device *dev)
 210 {
 211     VirtIODevice *vdev;
 212
 213     vdev = virtio_rng_init((DeviceState *)dev, &dev->rng);
 214     if (!vdev) {
 215         return -1;
 216     }
 217
 218     return s390_virtio_device_init(dev, vdev);
 219 }
 220
 221 static uint64_t s390_virtio_device_vq_token(VirtIOS390Device *dev, int vq)
 222 {
 223     ram_addr_t token_off;
 224
 225     token_off = (dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG) +
 226                 (vq * VIRTIO_VQCONFIG_LEN) +
 227                 VIRTIO_VQCONFIG_OFFS_TOKEN;
 228
 229     return ldq_be_phys(token_off);
 230 }
 231
 232 static ram_addr_t s390_virtio_device_num_vq(VirtIOS390Device *dev)
 233 {
 234     VirtIODevice *vdev = dev->vdev;
 235     int num_vq;
 236
 237     for (num_vq = 0; num_vq < VIRTIO_PCI_QUEUE_MAX; num_vq++) {
 238         if (!virtio_queue_get_num(vdev, num_vq)) {
 239             break;
 240         }
 241     }
 242
 243     return num_vq;
 244 }
 245
 246 static ram_addr_t s390_virtio_next_ring(VirtIOS390Bus *bus)
 247 {
 248     ram_addr_t r = bus->next_ring;
 249
 250     bus->next_ring += VIRTIO_RING_LEN;
 251     return r;
 252 }
 253
 254 void s390_virtio_device_sync(VirtIOS390Device *dev)
 255 {
 256     VirtIOS390Bus *bus = DO_UPCAST(VirtIOS390Bus, bus, dev->qdev.parent_bus);
 257     ram_addr_t cur_offs;
 258     uint8_t num_vq;
 259     int i;
 260
 261     virtio_reset(dev->vdev);
 262
 263     /* Sync dev space */
 264     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_TYPE, dev->vdev->device_id);
 265
 266     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_NUM_VQ, s390_virtio_device_num_vq(dev));
 267     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_FEATURE_LEN, dev->feat_len);
 268
 269     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG_LEN, dev->vdev->config_len);
 270
 271     num_vq = s390_virtio_device_num_vq(dev);
 272     stb_phys(dev->dev_offs + VIRTIO_DEV_OFFS_NUM_VQ, num_vq);
 273
 274     /* Sync virtqueues */
 275     for (i = 0; i < num_vq; i++) {
 276         ram_addr_t vq = (dev->dev_offs + VIRTIO_DEV_OFFS_CONFIG) +
 277                         (i * VIRTIO_VQCONFIG_LEN);
 278         ram_addr_t vring;
 279
 280         vring = s390_virtio_next_ring(bus);
 281         virtio_queue_set_addr(dev->vdev, i, vring);
 282         virtio_queue_set_vector(dev->vdev, i, i);
 283         stq_be_phys(vq + VIRTIO_VQCONFIG_OFFS_ADDRESS, vring);
 284         stw_be_phys(vq + VIRTIO_VQCONFIG_OFFS_NUM, virtio_queue_get_num(dev->vdev, i));
 285     }
 286
 287     cur_offs = dev->dev_offs;
 288     cur_offs += VIRTIO_DEV_OFFS_CONFIG;
 289     cur_offs += num_vq * VIRTIO_VQCONFIG_LEN;
 290
 291     /* Sync feature bitmap */
 292     stl_le_phys(cur_offs, dev->host_features);
 293
 294     dev->feat_offs = cur_offs + dev->feat_len;
 295     cur_offs += dev->feat_len * 2;
 296
 297     /* Sync config space */
 298     if (dev->vdev->get_config) {
 299         dev->vdev->get_config(dev->vdev, dev->vdev->config);
 300     }
 301
 302     cpu_physical_memory_write(cur_offs,
 303                               dev->vdev->config, dev->vdev->config_len);
 304     cur_offs += dev->vdev->config_len;
 305 }
 306
 307 void s390_virtio_device_update_status(VirtIOS390Device *dev)
 308 {
 309     VirtIODevice *vdev = dev->vdev;
 310     uint32_t features;
 311
 312     virtio_set_status(vdev, ldub_phys(dev->dev_offs + VIRTIO_DEV_OFFS_STATUS));
 313
 314     /* Update guest supported feature bitmap */
 315
 316     features = bswap32(ldl_be_phys(dev->feat_offs));
 317     virtio_set_features(vdev, features);
 318 }
 319
 320 VirtIOS390Device *s390_virtio_bus_console(VirtIOS390Bus *bus)
 321 {
 322     return bus->console;
 323 }
 324
 325 /* Find a device by vring address */
 326 VirtIOS390Device *s390_virtio_bus_find_vring(VirtIOS390Bus *bus,
 327                                              ram_addr_t mem,
 328                                              int *vq_num)
 329 {
 330     BusChild *kid;
 331     int i;
 332
 333     QTAILQ_FOREACH(kid, &bus->bus.children, sibling) {
 334         VirtIOS390Device *dev = (VirtIOS390Device *)kid->child;
 335
 336         for(i = 0; i < VIRTIO_PCI_QUEUE_MAX; i++) {
 337             if (!virtio_queue_get_addr(dev->vdev, i))
 338                 break;
 339             if (virtio_queue_get_addr(dev->vdev, i) == mem) {
 340                 if (vq_num) {
 341                     *vq_num = i;
 342                 }
 343                 return dev;
 344             }
 345         }
 346     }
 347
 348     return NULL;
 349 }
 350
 351 /* Find a device by device descriptor location */
 352 VirtIOS390Device *s390_virtio_bus_find_mem(VirtIOS390Bus *bus, ram_addr_t mem)
 353 {
 354     BusChild *kid;
 355
 356     QTAILQ_FOREACH(kid, &bus->bus.children, sibling) {
 357         VirtIOS390Device *dev = (VirtIOS390Device *)kid->child;
 358         if (dev->dev_offs == mem) {
 359             return dev;
 360         }
 361     }
 362
 363     return NULL;
 364 }
 365
 366 /* DeviceState to VirtIOS390Device. Note: used on datapath,
 367  * be careful and test performance if you change this.
 368  */
 369 static inline VirtIOS390Device *to_virtio_s390_device_fast(DeviceState *d)
 370 {
 371     return container_of(d, VirtIOS390Device, qdev);
 372 }
 373
 374 /* DeviceState to VirtIOS390Device. TODO: use QOM. */
 375 static inline VirtIOS390Device *to_virtio_s390_device(DeviceState *d)
 376 {
 377     return container_of(d, VirtIOS390Device, qdev);
 378 }
 379
 380 static void virtio_s390_notify(DeviceState *d, uint16_t vector)
 381 {
 382     VirtIOS390Device *dev = to_virtio_s390_device_fast(d);
 383     uint64_t token = s390_virtio_device_vq_token(dev, vector);
 384     S390CPU *cpu = s390_cpu_addr2state(0);
 385     CPUS390XState *env = &cpu->env;
 386
 387     s390_virtio_irq(env, 0, token);
 388 }
 389
 390 static unsigned virtio_s390_get_features(DeviceState *d)
 391 {
 392     VirtIOS390Device *dev = to_virtio_s390_device(d);
 393     return dev->host_features;
 394 }
 395
 396 /**************** S390 Virtio Bus Device Descriptions *******************/
 397
 398 static const VirtIOBindings virtio_s390_bindings = {
 399     .notify = virtio_s390_notify,
 400     .get_features = virtio_s390_get_features,
 401 };
 402
 403 static Property s390_virtio_net_properties[] = {
 404     DEFINE_NIC_PROPERTIES(VirtIOS390Device, nic),
 405     DEFINE_PROP_UINT32("x-txtimer", VirtIOS390Device,
 406                        net.txtimer, TX_TIMER_INTERVAL),
 407     DEFINE_PROP_INT32("x-txburst", VirtIOS390Device,
 408                       net.txburst, TX_BURST),
 409     DEFINE_PROP_STRING("tx", VirtIOS390Device, net.tx),
 410     DEFINE_PROP_END_OF_LIST(),
 411 };
 412
 413 static void s390_virtio_net_class_init(ObjectClass *klass, void *data)
 414 {
 415     DeviceClass *dc = DEVICE_CLASS(klass);
 416     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 417
 418     k->init = s390_virtio_net_init;
 419     dc->props = s390_virtio_net_properties;
 420 }
 421
 422 static TypeInfo s390_virtio_net = {
 423     .name          = "virtio-net-s390",
 424     .parent        = TYPE_VIRTIO_S390_DEVICE,
 425     .instance_size = sizeof(VirtIOS390Device),
 426     .class_init    = s390_virtio_net_class_init,
 427 };
 428
 429 static Property s390_virtio_blk_properties[] = {
 430     DEFINE_BLOCK_PROPERTIES(VirtIOS390Device, blk.conf),
 431     DEFINE_BLOCK_CHS_PROPERTIES(VirtIOS390Device, blk.conf),
 432     DEFINE_PROP_STRING("serial", VirtIOS390Device, blk.serial),
 433 #ifdef __linux__
 434     DEFINE_PROP_BIT("scsi", VirtIOS390Device, blk.scsi, 0, true),
 435 #endif
 436     DEFINE_PROP_END_OF_LIST(),
 437 };
 438
 439 static void s390_virtio_blk_class_init(ObjectClass *klass, void *data)
 440 {
 441     DeviceClass *dc = DEVICE_CLASS(klass);
 442     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 443
 444     k->init = s390_virtio_blk_init;
 445     dc->props = s390_virtio_blk_properties;
 446 }
 447
 448 static TypeInfo s390_virtio_blk = {
 449     .name          = "virtio-blk-s390",
 450     .parent        = TYPE_VIRTIO_S390_DEVICE,
 451     .instance_size = sizeof(VirtIOS390Device),
 452     .class_init    = s390_virtio_blk_class_init,
 453 };
 454
 455 static Property s390_virtio_serial_properties[] = {
 456     DEFINE_PROP_UINT32("max_ports", VirtIOS390Device,
 457                        serial.max_virtserial_ports, 31),
 458     DEFINE_PROP_END_OF_LIST(),
 459 };
 460
 461 static void s390_virtio_serial_class_init(ObjectClass *klass, void *data)
 462 {
 463     DeviceClass *dc = DEVICE_CLASS(klass);
 464     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 465
 466     k->init = s390_virtio_serial_init;
 467     dc->props = s390_virtio_serial_properties;
 468 }
 469
 470 static TypeInfo s390_virtio_serial = {
 471     .name          = "virtio-serial-s390",
 472     .parent        = TYPE_VIRTIO_S390_DEVICE,
 473     .instance_size = sizeof(VirtIOS390Device),
 474     .class_init    = s390_virtio_serial_class_init,
 475 };
 476
 477 static void s390_virtio_rng_initfn(Object *obj)
 478 {
 479     VirtIOS390Device *dev = VIRTIO_S390_DEVICE(obj);
 480
 481     object_property_add_link(obj, "rng", TYPE_RNG_BACKEND,
 482                              (Object **)&dev->rng.rng, NULL);
 483 }
 484
 485 static void s390_virtio_rng_class_init(ObjectClass *klass, void *data)
 486 {
 487     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 488
 489     k->init = s390_virtio_rng_init;
 490 }
 491
 492 static TypeInfo s390_virtio_rng = {
 493     .name          = "virtio-rng-s390",
 494     .parent        = TYPE_VIRTIO_S390_DEVICE,
 495     .instance_size = sizeof(VirtIOS390Device),
 496     .instance_init = s390_virtio_rng_initfn,
 497     .class_init    = s390_virtio_rng_class_init,
 498 };
 499
 500 static int s390_virtio_busdev_init(DeviceState *dev)
 501 {
 502     VirtIOS390Device *_dev = (VirtIOS390Device *)dev;
 503     VirtIOS390DeviceClass *_info = VIRTIO_S390_DEVICE_GET_CLASS(dev);
 504
 505     return _info->init(_dev);
 506 }
 507
 508 static void virtio_s390_device_class_init(ObjectClass *klass, void *data)
 509 {
 510     DeviceClass *dc = DEVICE_CLASS(klass);
 511
 512     dc->init = s390_virtio_busdev_init;
 513     dc->bus_type = TYPE_S390_VIRTIO_BUS;
 514     dc->unplug = qdev_simple_unplug_cb;
 515 }
 516
 517 static TypeInfo virtio_s390_device_info = {
 518     .name = TYPE_VIRTIO_S390_DEVICE,
 519     .parent = TYPE_DEVICE,
 520     .instance_size = sizeof(VirtIOS390Device),
 521     .class_init = virtio_s390_device_class_init,
 522     .class_size = sizeof(VirtIOS390DeviceClass),
 523     .abstract = true,
 524 };
 525
 526 static Property s390_virtio_scsi_properties[] = {
 527     DEFINE_VIRTIO_SCSI_PROPERTIES(VirtIOS390Device, host_features, scsi),
 528     DEFINE_PROP_END_OF_LIST(),
 529 };
 530
 531 static void s390_virtio_scsi_class_init(ObjectClass *klass, void *data)
 532 {
 533     DeviceClass *dc = DEVICE_CLASS(klass);
 534     VirtIOS390DeviceClass *k = VIRTIO_S390_DEVICE_CLASS(klass);
 535
 536     k->init = s390_virtio_scsi_init;
 537     dc->props = s390_virtio_scsi_properties;
 538 }
 539
 540 static TypeInfo s390_virtio_scsi = {
 541     .name          = "virtio-scsi-s390",
 542     .parent        = TYPE_VIRTIO_S390_DEVICE,
 543     .instance_size = sizeof(VirtIOS390Device),
 544     .class_init    = s390_virtio_scsi_class_init,
 545 };
 546
 547 /***************** S390 Virtio Bus Bridge Device *******************/
 548 /* Only required to have the virtio bus as child in the system bus */
 549
 550 static int s390_virtio_bridge_init(SysBusDevice *dev)
 551 {
 552     /* nothing */
 553     return 0;
 554 }
 555
 556 static void s390_virtio_bridge_class_init(ObjectClass *klass, void *data)
 557 {
 558     DeviceClass *dc = DEVICE_CLASS(klass);
 559     SysBusDeviceClass *k = SYS_BUS_DEVICE_CLASS(klass);
 560
 561     k->init = s390_virtio_bridge_init;
 562     dc->no_user = 1;
 563 }
 564
 565 static TypeInfo s390_virtio_bridge_info = {
 566     .name          = "s390-virtio-bridge",
 567     .parent        = TYPE_SYS_BUS_DEVICE,
 568     .instance_size = sizeof(SysBusDevice),
 569     .class_init    = s390_virtio_bridge_class_init,
 570 };
 571
 572 static void s390_virtio_register_types(void)
 573 {
 574     type_register_static(&s390_virtio_bus_info);
 575     type_register_static(&virtio_s390_device_info);
 576     type_register_static(&s390_virtio_serial);
 577     type_register_static(&s390_virtio_blk);
 578     type_register_static(&s390_virtio_net);
 579     type_register_static(&s390_virtio_scsi);
 580     type_register_static(&s390_virtio_rng);
 581     type_register_static(&s390_virtio_bridge_info);
 582 }
 583
 584 type_init(s390_virtio_register_types)