2 * QEMU S390 virtio target
4 * Copyright (c) 2009 Alexander Graf <agraf@suse.de>
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.
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.
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/>.
21 #include "block/block.h"
22 #include "sysemu/sysemu.h"
23 #include "hw/boards.h"
24 #include "monitor/monitor.h"
25 #include "hw/loader.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"
34 #include "hw/s390x/s390-virtio-bus.h"
35 #include "hw/virtio-bus.h"
37 /* #define DEBUG_S390 */
40 #define dprintf(fmt, ...) \
41 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
43 #define dprintf(fmt, ...) \
47 #define VIRTIO_EXT_CODE 0x2603
49 static const TypeInfo s390_virtio_bus_info
= {
50 .name
= TYPE_S390_VIRTIO_BUS
,
52 .instance_size
= sizeof(VirtIOS390Bus
),
55 static const VirtIOBindings virtio_s390_bindings
;
57 static ram_addr_t
s390_virtio_device_num_vq(VirtIOS390Device
*dev
);
59 /* length of VirtIO device pages */
60 const hwaddr virtio_size
= S390_DEVICE_PAGES
* TARGET_PAGE_SIZE
;
62 static void s390_virtio_bus_reset(void *opaque
)
64 VirtIOS390Bus
*bus
= opaque
;
65 bus
->next_ring
= bus
->dev_page
+ TARGET_PAGE_SIZE
;
68 void s390_virtio_reset_idx(VirtIOS390Device
*dev
)
74 num_vq
= s390_virtio_device_num_vq(dev
);
75 for (i
= 0; i
< num_vq
; i
++) {
76 idx_addr
= virtio_queue_get_avail_addr(dev
->vdev
, i
) +
77 VIRTIO_VRING_AVAIL_IDX_OFFS
;
78 stw_phys(idx_addr
, 0);
79 idx_addr
= virtio_queue_get_used_addr(dev
->vdev
, i
) +
80 VIRTIO_VRING_USED_IDX_OFFS
;
81 stw_phys(idx_addr
, 0);
85 VirtIOS390Bus
*s390_virtio_bus_init(ram_addr_t
*ram_size
)
91 /* Create bridge device */
92 dev
= qdev_create(NULL
, "s390-virtio-bridge");
93 qdev_init_nofail(dev
);
95 /* Create bus on bridge device */
97 _bus
= qbus_create(TYPE_S390_VIRTIO_BUS
, dev
, "s390-virtio");
98 bus
= DO_UPCAST(VirtIOS390Bus
, bus
, _bus
);
100 bus
->dev_page
= *ram_size
;
101 bus
->dev_offs
= bus
->dev_page
;
102 bus
->next_ring
= bus
->dev_page
+ TARGET_PAGE_SIZE
;
104 /* Enable hotplugging */
105 _bus
->allow_hotplug
= 1;
107 /* Allocate RAM for VirtIO device pages (descriptors, queues, rings) */
108 *ram_size
+= S390_DEVICE_PAGES
* TARGET_PAGE_SIZE
;
110 qemu_register_reset(s390_virtio_bus_reset
, bus
);
114 static void s390_virtio_irq(S390CPU
*cpu
, int config_change
, uint64_t token
)
117 kvm_s390_virtio_irq(cpu
, config_change
, token
);
119 cpu_inject_ext(cpu
, VIRTIO_EXT_CODE
, config_change
, token
);
123 static int s390_virtio_device_init(VirtIOS390Device
*dev
, VirtIODevice
*vdev
)
128 bus
= DO_UPCAST(VirtIOS390Bus
, bus
, dev
->qdev
.parent_bus
);
130 dev
->dev_offs
= bus
->dev_offs
;
131 dev
->feat_len
= sizeof(uint32_t); /* always keep 32 bits features */
133 dev_len
= VIRTIO_DEV_OFFS_CONFIG
;
134 dev_len
+= s390_virtio_device_num_vq(dev
) * VIRTIO_VQCONFIG_LEN
;
135 dev_len
+= dev
->feat_len
* 2;
136 dev_len
+= vdev
->config_len
;
138 bus
->dev_offs
+= dev_len
;
140 virtio_bind_device(vdev
, &virtio_s390_bindings
, DEVICE(dev
));
141 dev
->host_features
= vdev
->get_features(vdev
, dev
->host_features
);
142 s390_virtio_device_sync(dev
);
143 s390_virtio_reset_idx(dev
);
144 if (dev
->qdev
.hotplugged
) {
145 S390CPU
*cpu
= s390_cpu_addr2state(0);
146 s390_virtio_irq(cpu
, VIRTIO_PARAM_DEV_ADD
, dev
->dev_offs
);
152 static int s390_virtio_net_init(VirtIOS390Device
*dev
)
156 vdev
= virtio_net_init((DeviceState
*)dev
, &dev
->nic
, &dev
->net
,
162 return s390_virtio_device_init(dev
, vdev
);
165 static int s390_virtio_blk_init(VirtIOS390Device
*s390_dev
)
167 VirtIOBlkS390
*dev
= VIRTIO_BLK_S390(s390_dev
);
168 DeviceState
*vdev
= DEVICE(&dev
->vdev
);
169 virtio_blk_set_conf(vdev
, &(dev
->blk
));
170 qdev_set_parent_bus(vdev
, BUS(&s390_dev
->bus
));
171 if (qdev_init(vdev
) < 0) {
174 return s390_virtio_device_init(s390_dev
, VIRTIO_DEVICE(vdev
));
177 static void s390_virtio_blk_instance_init(Object
*obj
)
179 VirtIOBlkS390
*dev
= VIRTIO_BLK_S390(obj
);
180 object_initialize(OBJECT(&dev
->vdev
), TYPE_VIRTIO_BLK
);
181 object_property_add_child(obj
, "virtio-backend", OBJECT(&dev
->vdev
), NULL
);
184 static int s390_virtio_serial_init(VirtIOS390Device
*dev
)
190 bus
= DO_UPCAST(VirtIOS390Bus
, bus
, dev
->qdev
.parent_bus
);
192 vdev
= virtio_serial_init((DeviceState
*)dev
, &dev
->serial
);
197 r
= s390_virtio_device_init(dev
, vdev
);
205 static int s390_virtio_scsi_init(VirtIOS390Device
*dev
)
209 vdev
= virtio_scsi_init((DeviceState
*)dev
, &dev
->scsi
);
214 return s390_virtio_device_init(dev
, vdev
);
217 static int s390_virtio_rng_init(VirtIOS390Device
*dev
)
221 vdev
= virtio_rng_init((DeviceState
*)dev
, &dev
->rng
);
226 return s390_virtio_device_init(dev
, vdev
);
229 static uint64_t s390_virtio_device_vq_token(VirtIOS390Device
*dev
, int vq
)
231 ram_addr_t token_off
;
233 token_off
= (dev
->dev_offs
+ VIRTIO_DEV_OFFS_CONFIG
) +
234 (vq
* VIRTIO_VQCONFIG_LEN
) +
235 VIRTIO_VQCONFIG_OFFS_TOKEN
;
237 return ldq_be_phys(token_off
);
240 static ram_addr_t
s390_virtio_device_num_vq(VirtIOS390Device
*dev
)
242 VirtIODevice
*vdev
= dev
->vdev
;
245 for (num_vq
= 0; num_vq
< VIRTIO_PCI_QUEUE_MAX
; num_vq
++) {
246 if (!virtio_queue_get_num(vdev
, num_vq
)) {
254 static ram_addr_t
s390_virtio_next_ring(VirtIOS390Bus
*bus
)
256 ram_addr_t r
= bus
->next_ring
;
258 bus
->next_ring
+= VIRTIO_RING_LEN
;
262 void s390_virtio_device_sync(VirtIOS390Device
*dev
)
264 VirtIOS390Bus
*bus
= DO_UPCAST(VirtIOS390Bus
, bus
, dev
->qdev
.parent_bus
);
269 virtio_reset(dev
->vdev
);
272 stb_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_TYPE
, dev
->vdev
->device_id
);
274 stb_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_NUM_VQ
, s390_virtio_device_num_vq(dev
));
275 stb_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_FEATURE_LEN
, dev
->feat_len
);
277 stb_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_CONFIG_LEN
, dev
->vdev
->config_len
);
279 num_vq
= s390_virtio_device_num_vq(dev
);
280 stb_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_NUM_VQ
, num_vq
);
282 /* Sync virtqueues */
283 for (i
= 0; i
< num_vq
; i
++) {
284 ram_addr_t vq
= (dev
->dev_offs
+ VIRTIO_DEV_OFFS_CONFIG
) +
285 (i
* VIRTIO_VQCONFIG_LEN
);
288 vring
= s390_virtio_next_ring(bus
);
289 virtio_queue_set_addr(dev
->vdev
, i
, vring
);
290 virtio_queue_set_vector(dev
->vdev
, i
, i
);
291 stq_be_phys(vq
+ VIRTIO_VQCONFIG_OFFS_ADDRESS
, vring
);
292 stw_be_phys(vq
+ VIRTIO_VQCONFIG_OFFS_NUM
, virtio_queue_get_num(dev
->vdev
, i
));
295 cur_offs
= dev
->dev_offs
;
296 cur_offs
+= VIRTIO_DEV_OFFS_CONFIG
;
297 cur_offs
+= num_vq
* VIRTIO_VQCONFIG_LEN
;
299 /* Sync feature bitmap */
300 stl_le_phys(cur_offs
, dev
->host_features
);
302 dev
->feat_offs
= cur_offs
+ dev
->feat_len
;
303 cur_offs
+= dev
->feat_len
* 2;
305 /* Sync config space */
306 if (dev
->vdev
->get_config
) {
307 dev
->vdev
->get_config(dev
->vdev
, dev
->vdev
->config
);
310 cpu_physical_memory_write(cur_offs
,
311 dev
->vdev
->config
, dev
->vdev
->config_len
);
312 cur_offs
+= dev
->vdev
->config_len
;
315 void s390_virtio_device_update_status(VirtIOS390Device
*dev
)
317 VirtIODevice
*vdev
= dev
->vdev
;
320 virtio_set_status(vdev
, ldub_phys(dev
->dev_offs
+ VIRTIO_DEV_OFFS_STATUS
));
322 /* Update guest supported feature bitmap */
324 features
= bswap32(ldl_be_phys(dev
->feat_offs
));
325 virtio_set_features(vdev
, features
);
328 VirtIOS390Device
*s390_virtio_bus_console(VirtIOS390Bus
*bus
)
333 /* Find a device by vring address */
334 VirtIOS390Device
*s390_virtio_bus_find_vring(VirtIOS390Bus
*bus
,
341 QTAILQ_FOREACH(kid
, &bus
->bus
.children
, sibling
) {
342 VirtIOS390Device
*dev
= (VirtIOS390Device
*)kid
->child
;
344 for(i
= 0; i
< VIRTIO_PCI_QUEUE_MAX
; i
++) {
345 if (!virtio_queue_get_addr(dev
->vdev
, i
))
347 if (virtio_queue_get_addr(dev
->vdev
, i
) == mem
) {
359 /* Find a device by device descriptor location */
360 VirtIOS390Device
*s390_virtio_bus_find_mem(VirtIOS390Bus
*bus
, ram_addr_t mem
)
364 QTAILQ_FOREACH(kid
, &bus
->bus
.children
, sibling
) {
365 VirtIOS390Device
*dev
= (VirtIOS390Device
*)kid
->child
;
366 if (dev
->dev_offs
== mem
) {
374 /* DeviceState to VirtIOS390Device. Note: used on datapath,
375 * be careful and test performance if you change this.
377 static inline VirtIOS390Device
*to_virtio_s390_device_fast(DeviceState
*d
)
379 return container_of(d
, VirtIOS390Device
, qdev
);
382 /* DeviceState to VirtIOS390Device. TODO: use QOM. */
383 static inline VirtIOS390Device
*to_virtio_s390_device(DeviceState
*d
)
385 return container_of(d
, VirtIOS390Device
, qdev
);
388 static void virtio_s390_notify(DeviceState
*d
, uint16_t vector
)
390 VirtIOS390Device
*dev
= to_virtio_s390_device_fast(d
);
391 uint64_t token
= s390_virtio_device_vq_token(dev
, vector
);
392 S390CPU
*cpu
= s390_cpu_addr2state(0);
394 s390_virtio_irq(cpu
, 0, token
);
397 static unsigned virtio_s390_get_features(DeviceState
*d
)
399 VirtIOS390Device
*dev
= to_virtio_s390_device(d
);
400 return dev
->host_features
;
403 /**************** S390 Virtio Bus Device Descriptions *******************/
405 static const VirtIOBindings virtio_s390_bindings
= {
406 .notify
= virtio_s390_notify
,
407 .get_features
= virtio_s390_get_features
,
410 static Property s390_virtio_net_properties
[] = {
411 DEFINE_NIC_PROPERTIES(VirtIOS390Device
, nic
),
412 DEFINE_VIRTIO_NET_FEATURES(VirtIOS390Device
, host_features
),
413 DEFINE_PROP_UINT32("x-txtimer", VirtIOS390Device
,
414 net
.txtimer
, TX_TIMER_INTERVAL
),
415 DEFINE_PROP_INT32("x-txburst", VirtIOS390Device
,
416 net
.txburst
, TX_BURST
),
417 DEFINE_PROP_STRING("tx", VirtIOS390Device
, net
.tx
),
418 DEFINE_PROP_END_OF_LIST(),
421 static void s390_virtio_net_class_init(ObjectClass
*klass
, void *data
)
423 DeviceClass
*dc
= DEVICE_CLASS(klass
);
424 VirtIOS390DeviceClass
*k
= VIRTIO_S390_DEVICE_CLASS(klass
);
426 k
->init
= s390_virtio_net_init
;
427 dc
->props
= s390_virtio_net_properties
;
430 static const TypeInfo s390_virtio_net
= {
431 .name
= "virtio-net-s390",
432 .parent
= TYPE_VIRTIO_S390_DEVICE
,
433 .instance_size
= sizeof(VirtIOS390Device
),
434 .class_init
= s390_virtio_net_class_init
,
437 static Property s390_virtio_blk_properties
[] = {
438 DEFINE_BLOCK_PROPERTIES(VirtIOBlkS390
, blk
.conf
),
439 DEFINE_BLOCK_CHS_PROPERTIES(VirtIOBlkS390
, blk
.conf
),
440 DEFINE_PROP_STRING("serial", VirtIOBlkS390
, blk
.serial
),
442 DEFINE_PROP_BIT("scsi", VirtIOBlkS390
, blk
.scsi
, 0, true),
444 DEFINE_PROP_END_OF_LIST(),
447 static void s390_virtio_blk_class_init(ObjectClass
*klass
, void *data
)
449 DeviceClass
*dc
= DEVICE_CLASS(klass
);
450 VirtIOS390DeviceClass
*k
= VIRTIO_S390_DEVICE_CLASS(klass
);
452 k
->init
= s390_virtio_blk_init
;
453 dc
->props
= s390_virtio_blk_properties
;
456 static const TypeInfo s390_virtio_blk
= {
457 .name
= "virtio-blk-s390",
458 .parent
= TYPE_VIRTIO_S390_DEVICE
,
459 .instance_size
= sizeof(VirtIOBlkS390
),
460 .instance_init
= s390_virtio_blk_instance_init
,
461 .class_init
= s390_virtio_blk_class_init
,
464 static Property s390_virtio_serial_properties
[] = {
465 DEFINE_PROP_UINT32("max_ports", VirtIOS390Device
,
466 serial
.max_virtserial_ports
, 31),
467 DEFINE_PROP_END_OF_LIST(),
470 static void s390_virtio_serial_class_init(ObjectClass
*klass
, void *data
)
472 DeviceClass
*dc
= DEVICE_CLASS(klass
);
473 VirtIOS390DeviceClass
*k
= VIRTIO_S390_DEVICE_CLASS(klass
);
475 k
->init
= s390_virtio_serial_init
;
476 dc
->props
= s390_virtio_serial_properties
;
479 static const TypeInfo s390_virtio_serial
= {
480 .name
= "virtio-serial-s390",
481 .parent
= TYPE_VIRTIO_S390_DEVICE
,
482 .instance_size
= sizeof(VirtIOS390Device
),
483 .class_init
= s390_virtio_serial_class_init
,
486 static void s390_virtio_rng_initfn(Object
*obj
)
488 VirtIOS390Device
*dev
= VIRTIO_S390_DEVICE(obj
);
490 object_property_add_link(obj
, "rng", TYPE_RNG_BACKEND
,
491 (Object
**)&dev
->rng
.rng
, NULL
);
494 static void s390_virtio_rng_class_init(ObjectClass
*klass
, void *data
)
496 VirtIOS390DeviceClass
*k
= VIRTIO_S390_DEVICE_CLASS(klass
);
498 k
->init
= s390_virtio_rng_init
;
501 static const TypeInfo s390_virtio_rng
= {
502 .name
= "virtio-rng-s390",
503 .parent
= TYPE_VIRTIO_S390_DEVICE
,
504 .instance_size
= sizeof(VirtIOS390Device
),
505 .instance_init
= s390_virtio_rng_initfn
,
506 .class_init
= s390_virtio_rng_class_init
,
509 static int s390_virtio_busdev_init(DeviceState
*dev
)
511 VirtIOS390Device
*_dev
= (VirtIOS390Device
*)dev
;
512 VirtIOS390DeviceClass
*_info
= VIRTIO_S390_DEVICE_GET_CLASS(dev
);
514 virtio_s390_bus_new(&_dev
->bus
, _dev
);
516 return _info
->init(_dev
);
519 static void s390_virtio_busdev_reset(DeviceState
*dev
)
521 VirtIOS390Device
*_dev
= (VirtIOS390Device
*)dev
;
523 virtio_reset(_dev
->vdev
);
526 static void virtio_s390_device_class_init(ObjectClass
*klass
, void *data
)
528 DeviceClass
*dc
= DEVICE_CLASS(klass
);
530 dc
->init
= s390_virtio_busdev_init
;
531 dc
->bus_type
= TYPE_S390_VIRTIO_BUS
;
532 dc
->unplug
= qdev_simple_unplug_cb
;
533 dc
->reset
= s390_virtio_busdev_reset
;
536 static const TypeInfo virtio_s390_device_info
= {
537 .name
= TYPE_VIRTIO_S390_DEVICE
,
538 .parent
= TYPE_DEVICE
,
539 .instance_size
= sizeof(VirtIOS390Device
),
540 .class_init
= virtio_s390_device_class_init
,
541 .class_size
= sizeof(VirtIOS390DeviceClass
),
545 static Property s390_virtio_scsi_properties
[] = {
546 DEFINE_VIRTIO_SCSI_PROPERTIES(VirtIOS390Device
, host_features
, scsi
),
547 DEFINE_PROP_END_OF_LIST(),
550 static void s390_virtio_scsi_class_init(ObjectClass
*klass
, void *data
)
552 DeviceClass
*dc
= DEVICE_CLASS(klass
);
553 VirtIOS390DeviceClass
*k
= VIRTIO_S390_DEVICE_CLASS(klass
);
555 k
->init
= s390_virtio_scsi_init
;
556 dc
->props
= s390_virtio_scsi_properties
;
559 static const TypeInfo s390_virtio_scsi
= {
560 .name
= "virtio-scsi-s390",
561 .parent
= TYPE_VIRTIO_S390_DEVICE
,
562 .instance_size
= sizeof(VirtIOS390Device
),
563 .class_init
= s390_virtio_scsi_class_init
,
566 /***************** S390 Virtio Bus Bridge Device *******************/
567 /* Only required to have the virtio bus as child in the system bus */
569 static int s390_virtio_bridge_init(SysBusDevice
*dev
)
575 static void s390_virtio_bridge_class_init(ObjectClass
*klass
, void *data
)
577 DeviceClass
*dc
= DEVICE_CLASS(klass
);
578 SysBusDeviceClass
*k
= SYS_BUS_DEVICE_CLASS(klass
);
580 k
->init
= s390_virtio_bridge_init
;
584 static const TypeInfo s390_virtio_bridge_info
= {
585 .name
= "s390-virtio-bridge",
586 .parent
= TYPE_SYS_BUS_DEVICE
,
587 .instance_size
= sizeof(SysBusDevice
),
588 .class_init
= s390_virtio_bridge_class_init
,
591 /* virtio-s390-bus */
593 void virtio_s390_bus_new(VirtioBusState
*bus
, VirtIOS390Device
*dev
)
595 DeviceState
*qdev
= DEVICE(dev
);
597 qbus_create_inplace((BusState
*)bus
, TYPE_VIRTIO_S390_BUS
, qdev
, NULL
);
599 qbus
->allow_hotplug
= 1;
602 static void virtio_s390_bus_class_init(ObjectClass
*klass
, void *data
)
604 VirtioBusClass
*k
= VIRTIO_BUS_CLASS(klass
);
605 BusClass
*bus_class
= BUS_CLASS(klass
);
606 bus_class
->max_dev
= 1;
607 k
->notify
= virtio_s390_notify
;
608 k
->get_features
= virtio_s390_get_features
;
611 static const TypeInfo virtio_s390_bus_info
= {
612 .name
= TYPE_VIRTIO_S390_BUS
,
613 .parent
= TYPE_VIRTIO_BUS
,
614 .instance_size
= sizeof(VirtioS390BusState
),
615 .class_init
= virtio_s390_bus_class_init
,
618 static void s390_virtio_register_types(void)
620 type_register_static(&virtio_s390_bus_info
);
621 type_register_static(&s390_virtio_bus_info
);
622 type_register_static(&virtio_s390_device_info
);
623 type_register_static(&s390_virtio_serial
);
624 type_register_static(&s390_virtio_blk
);
625 type_register_static(&s390_virtio_net
);
626 type_register_static(&s390_virtio_scsi
);
627 type_register_static(&s390_virtio_rng
);
628 type_register_static(&s390_virtio_bridge_info
);
631 type_init(s390_virtio_register_types
)