2 * Intel MIC Platform Software Stack (MPSS)
4 * Copyright(c) 2013 Intel Corporation.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License, version 2, as
8 * published by the Free Software Foundation.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License for more details.
15 * The full GNU General Public License is included in this distribution in
16 * the file called "COPYING".
18 * Disclaimer: The codes contained in these modules may be specific to
19 * the Intel Software Development Platform codenamed: Knights Ferry, and
20 * the Intel product codenamed: Knights Corner, and are not backward
21 * compatible with other Intel products. Additionally, Intel will NOT
22 * support the codes or instruction set in future products.
26 * virtio for kvm on s390
28 * Copyright IBM Corp. 2008
30 * This program is free software; you can redistribute it and/or modify
31 * it under the terms of the GNU General Public License (version 2 only)
32 * as published by the Free Software Foundation.
34 * Author(s): Christian Borntraeger <borntraeger@de.ibm.com>
36 * Intel MIC Card driver.
39 #include <linux/delay.h>
40 #include <linux/slab.h>
41 #include <linux/virtio_config.h>
43 #include "../common/mic_dev.h"
44 #include "mic_virtio.h"
46 #define VIRTIO_SUBCODE_64 0x0D00
48 #define MIC_MAX_VRINGS 4
50 struct virtio_device vdev;
51 struct mic_device_desc __iomem *desc;
52 struct mic_device_ctrl __iomem *dc;
53 struct mic_device *mdev;
54 void __iomem *vr[MIC_MAX_VRINGS];
55 int used_size[MIC_MAX_VRINGS];
56 struct completion reset_done;
57 struct mic_irq *virtio_cookie;
61 static struct mic_irq *virtio_config_cookie;
62 #define to_micvdev(vd) container_of(vd, struct mic_vdev, vdev)
64 /* Helper API to obtain the parent of the virtio device */
65 static inline struct device *mic_dev(struct mic_vdev *mvdev)
67 return mvdev->vdev.dev.parent;
70 /* This gets the device's feature bits. */
71 static u32 mic_get_features(struct virtio_device *vdev)
75 struct mic_device_desc __iomem *desc = to_micvdev(vdev)->desc;
76 u8 __iomem *in_features = mic_vq_features(desc);
77 int feature_len = ioread8(&desc->feature_len);
79 bits = min_t(unsigned, feature_len, sizeof(features)) * 8;
80 for (i = 0; i < bits; i++)
81 if (ioread8(&in_features[i / 8]) & (BIT(i % 8)))
87 static void mic_finalize_features(struct virtio_device *vdev)
90 struct mic_device_desc __iomem *desc = to_micvdev(vdev)->desc;
91 u8 feature_len = ioread8(&desc->feature_len);
92 /* Second half of bitmap is features we accept. */
93 u8 __iomem *out_features =
94 mic_vq_features(desc) + feature_len;
96 /* Give virtio_ring a chance to accept features. */
97 vring_transport_features(vdev);
99 memset_io(out_features, 0, feature_len);
100 bits = min_t(unsigned, feature_len,
101 sizeof(vdev->features)) * 8;
102 for (i = 0; i < bits; i++) {
103 if (__virtio_test_bit(vdev, i))
104 iowrite8(ioread8(&out_features[i / 8]) | (1 << (i % 8)),
105 &out_features[i / 8]);
110 * Reading and writing elements in config space
112 static void mic_get(struct virtio_device *vdev, unsigned int offset,
113 void *buf, unsigned len)
115 struct mic_device_desc __iomem *desc = to_micvdev(vdev)->desc;
117 if (offset + len > ioread8(&desc->config_len))
119 memcpy_fromio(buf, mic_vq_configspace(desc) + offset, len);
122 static void mic_set(struct virtio_device *vdev, unsigned int offset,
123 const void *buf, unsigned len)
125 struct mic_device_desc __iomem *desc = to_micvdev(vdev)->desc;
127 if (offset + len > ioread8(&desc->config_len))
129 memcpy_toio(mic_vq_configspace(desc) + offset, buf, len);
133 * The operations to get and set the status word just access the status
134 * field of the device descriptor. set_status also interrupts the host
135 * to tell about status changes.
137 static u8 mic_get_status(struct virtio_device *vdev)
139 return ioread8(&to_micvdev(vdev)->desc->status);
142 static void mic_set_status(struct virtio_device *vdev, u8 status)
144 struct mic_vdev *mvdev = to_micvdev(vdev);
147 iowrite8(status, &mvdev->desc->status);
148 mic_send_intr(mvdev->mdev, mvdev->c2h_vdev_db);
151 /* Inform host on a virtio device reset and wait for ack from host */
152 static void mic_reset_inform_host(struct virtio_device *vdev)
154 struct mic_vdev *mvdev = to_micvdev(vdev);
155 struct mic_device_ctrl __iomem *dc = mvdev->dc;
158 iowrite8(0, &dc->host_ack);
159 iowrite8(1, &dc->vdev_reset);
160 mic_send_intr(mvdev->mdev, mvdev->c2h_vdev_db);
162 /* Wait till host completes all card accesses and acks the reset */
163 for (retry = 100; retry--;) {
164 if (ioread8(&dc->host_ack))
169 dev_dbg(mic_dev(mvdev), "%s: retry: %d\n", __func__, retry);
171 /* Reset status to 0 in case we timed out */
172 iowrite8(0, &mvdev->desc->status);
175 static void mic_reset(struct virtio_device *vdev)
177 struct mic_vdev *mvdev = to_micvdev(vdev);
179 dev_dbg(mic_dev(mvdev), "%s: virtio id %d\n",
180 __func__, vdev->id.device);
182 mic_reset_inform_host(vdev);
183 complete_all(&mvdev->reset_done);
187 * The virtio_ring code calls this API when it wants to notify the Host.
189 static bool mic_notify(struct virtqueue *vq)
191 struct mic_vdev *mvdev = vq->priv;
193 mic_send_intr(mvdev->mdev, mvdev->c2h_vdev_db);
197 static void mic_del_vq(struct virtqueue *vq, int n)
199 struct mic_vdev *mvdev = to_micvdev(vq->vdev);
200 struct vring *vr = (struct vring *)(vq + 1);
202 free_pages((unsigned long) vr->used, get_order(mvdev->used_size[n]));
203 vring_del_virtqueue(vq);
204 mic_card_unmap(mvdev->mdev, mvdev->vr[n]);
208 static void mic_del_vqs(struct virtio_device *vdev)
210 struct mic_vdev *mvdev = to_micvdev(vdev);
211 struct virtqueue *vq, *n;
214 dev_dbg(mic_dev(mvdev), "%s\n", __func__);
216 list_for_each_entry_safe(vq, n, &vdev->vqs, list)
217 mic_del_vq(vq, idx++);
221 * This routine will assign vring's allocated in host/io memory. Code in
222 * virtio_ring.c however continues to access this io memory as if it were local
223 * memory without io accessors.
225 static struct virtqueue *mic_find_vq(struct virtio_device *vdev,
227 void (*callback)(struct virtqueue *vq),
230 struct mic_vdev *mvdev = to_micvdev(vdev);
231 struct mic_vqconfig __iomem *vqconfig;
232 struct mic_vqconfig config;
233 struct virtqueue *vq;
235 struct _mic_vring_info __iomem *info;
237 int vr_size, _vr_size, err, magic;
239 u8 type = ioread8(&mvdev->desc->type);
241 if (index >= ioread8(&mvdev->desc->num_vq))
242 return ERR_PTR(-ENOENT);
245 return ERR_PTR(-ENOENT);
247 /* First assign the vring's allocated in host memory */
248 vqconfig = mic_vq_config(mvdev->desc) + index;
249 memcpy_fromio(&config, vqconfig, sizeof(config));
250 _vr_size = vring_size(le16_to_cpu(config.num), MIC_VIRTIO_RING_ALIGN);
251 vr_size = PAGE_ALIGN(_vr_size + sizeof(struct _mic_vring_info));
252 va = mic_card_map(mvdev->mdev, le64_to_cpu(config.address), vr_size);
254 return ERR_PTR(-ENOMEM);
255 mvdev->vr[index] = va;
256 memset_io(va, 0x0, _vr_size);
257 vq = vring_new_virtqueue(index, le16_to_cpu(config.num),
258 MIC_VIRTIO_RING_ALIGN, vdev, false,
259 (void __force *)va, mic_notify, callback,
265 info = va + _vr_size;
266 magic = ioread32(&info->magic);
268 if (WARN(magic != MIC_MAGIC + type + index, "magic mismatch")) {
273 /* Allocate and reassign used ring now */
274 mvdev->used_size[index] = PAGE_ALIGN(sizeof(__u16) * 3 +
275 sizeof(struct vring_used_elem) *
276 le16_to_cpu(config.num));
277 used = (void *)__get_free_pages(GFP_KERNEL | __GFP_ZERO,
278 get_order(mvdev->used_size[index]));
281 dev_err(mic_dev(mvdev), "%s %d err %d\n",
282 __func__, __LINE__, err);
285 iowrite64(virt_to_phys(used), &vqconfig->used_address);
288 * To reassign the used ring here we are directly accessing
289 * struct vring_virtqueue which is a private data structure
290 * in virtio_ring.c. At the minimum, a BUILD_BUG_ON() in
291 * vring_new_virtqueue() would ensure that
292 * (&vq->vring == (struct vring *) (&vq->vq + 1));
294 vr = (struct vring *)(vq + 1);
300 vring_del_virtqueue(vq);
302 mic_card_unmap(mvdev->mdev, mvdev->vr[index]);
306 static int mic_find_vqs(struct virtio_device *vdev, unsigned nvqs,
307 struct virtqueue *vqs[],
308 vq_callback_t *callbacks[],
311 struct mic_vdev *mvdev = to_micvdev(vdev);
312 struct mic_device_ctrl __iomem *dc = mvdev->dc;
315 /* We must have this many virtqueues. */
316 if (nvqs > ioread8(&mvdev->desc->num_vq))
319 for (i = 0; i < nvqs; ++i) {
320 dev_dbg(mic_dev(mvdev), "%s: %d: %s\n",
321 __func__, i, names[i]);
322 vqs[i] = mic_find_vq(vdev, i, callbacks[i], names[i]);
323 if (IS_ERR(vqs[i])) {
324 err = PTR_ERR(vqs[i]);
329 iowrite8(1, &dc->used_address_updated);
331 * Send an interrupt to the host to inform it that used
332 * rings have been re-assigned.
334 mic_send_intr(mvdev->mdev, mvdev->c2h_vdev_db);
335 for (retry = 100; retry--;) {
336 if (!ioread8(&dc->used_address_updated))
341 dev_dbg(mic_dev(mvdev), "%s: retry: %d\n", __func__, retry);
354 * The config ops structure as defined by virtio config
356 static struct virtio_config_ops mic_vq_config_ops = {
357 .get_features = mic_get_features,
358 .finalize_features = mic_finalize_features,
361 .get_status = mic_get_status,
362 .set_status = mic_set_status,
364 .find_vqs = mic_find_vqs,
365 .del_vqs = mic_del_vqs,
369 mic_virtio_intr_handler(int irq, void *data)
371 struct mic_vdev *mvdev = data;
372 struct virtqueue *vq;
374 mic_ack_interrupt(mvdev->mdev);
375 list_for_each_entry(vq, &mvdev->vdev.vqs, list)
376 vring_interrupt(0, vq);
381 static void mic_virtio_release_dev(struct device *_d)
384 * No need for a release method similar to virtio PCI.
385 * Provide an empty one to avoid getting a warning from core.
390 * adds a new device and register it with virtio
391 * appropriate drivers are loaded by the device model
393 static int mic_add_device(struct mic_device_desc __iomem *d,
394 unsigned int offset, struct mic_driver *mdrv)
396 struct mic_vdev *mvdev;
399 u8 type = ioread8(&d->type);
401 mvdev = kzalloc(sizeof(*mvdev), GFP_KERNEL);
403 dev_err(mdrv->dev, "Cannot allocate mic dev %u type %u\n",
408 mvdev->mdev = &mdrv->mdev;
409 mvdev->vdev.dev.parent = mdrv->dev;
410 mvdev->vdev.dev.release = mic_virtio_release_dev;
411 mvdev->vdev.id.device = type;
412 mvdev->vdev.config = &mic_vq_config_ops;
414 mvdev->dc = (void __iomem *)d + mic_aligned_desc_size(d);
415 init_completion(&mvdev->reset_done);
417 virtio_db = mic_next_card_db();
418 mvdev->virtio_cookie = mic_request_card_irq(mic_virtio_intr_handler,
419 NULL, "virtio intr", mvdev, virtio_db);
420 if (IS_ERR(mvdev->virtio_cookie)) {
421 ret = PTR_ERR(mvdev->virtio_cookie);
424 iowrite8((u8)virtio_db, &mvdev->dc->h2c_vdev_db);
425 mvdev->c2h_vdev_db = ioread8(&mvdev->dc->c2h_vdev_db);
427 ret = register_virtio_device(&mvdev->vdev);
429 dev_err(mic_dev(mvdev),
430 "Failed to register mic device %u type %u\n",
434 iowrite64((u64)mvdev, &mvdev->dc->vdev);
435 dev_dbg(mic_dev(mvdev), "%s: registered mic device %u type %u mvdev %p\n",
436 __func__, offset, type, mvdev);
441 mic_free_card_irq(mvdev->virtio_cookie, mvdev);
448 * match for a mic device with a specific desc pointer
450 static int mic_match_desc(struct device *dev, void *data)
452 struct virtio_device *vdev = dev_to_virtio(dev);
453 struct mic_vdev *mvdev = to_micvdev(vdev);
455 return mvdev->desc == (void __iomem *)data;
458 static void mic_handle_config_change(struct mic_device_desc __iomem *d,
459 unsigned int offset, struct mic_driver *mdrv)
461 struct mic_device_ctrl __iomem *dc
462 = (void __iomem *)d + mic_aligned_desc_size(d);
463 struct mic_vdev *mvdev = (struct mic_vdev *)ioread64(&dc->vdev);
465 if (ioread8(&dc->config_change) != MIC_VIRTIO_PARAM_CONFIG_CHANGED)
468 dev_dbg(mdrv->dev, "%s %d\n", __func__, __LINE__);
469 virtio_config_changed(&mvdev->vdev);
470 iowrite8(1, &dc->guest_ack);
474 * removes a virtio device if a hot remove event has been
475 * requested by the host.
477 static int mic_remove_device(struct mic_device_desc __iomem *d,
478 unsigned int offset, struct mic_driver *mdrv)
480 struct mic_device_ctrl __iomem *dc
481 = (void __iomem *)d + mic_aligned_desc_size(d);
482 struct mic_vdev *mvdev = (struct mic_vdev *)ioread64(&dc->vdev);
486 if (ioread8(&dc->config_change) == MIC_VIRTIO_PARAM_DEV_REMOVE) {
488 "%s %d config_change %d type %d mvdev %p\n",
490 ioread8(&dc->config_change), ioread8(&d->type), mvdev);
492 status = ioread8(&d->status);
493 reinit_completion(&mvdev->reset_done);
494 unregister_virtio_device(&mvdev->vdev);
495 mic_free_card_irq(mvdev->virtio_cookie, mvdev);
496 if (status & VIRTIO_CONFIG_S_DRIVER_OK)
497 wait_for_completion(&mvdev->reset_done);
499 iowrite8(1, &dc->guest_ack);
500 dev_dbg(mdrv->dev, "%s %d guest_ack %d\n",
501 __func__, __LINE__, ioread8(&dc->guest_ack));
508 #define REMOVE_DEVICES true
510 static void mic_scan_devices(struct mic_driver *mdrv, bool remove)
514 struct mic_device_desc __iomem *d;
515 struct mic_device_ctrl __iomem *dc;
519 for (i = sizeof(struct mic_bootparam); i < MIC_DP_SIZE;
520 i += mic_total_desc_size(d)) {
522 dc = (void __iomem *)d + mic_aligned_desc_size(d);
524 * This read barrier is paired with the corresponding write
525 * barrier on the host which is inserted before adding or
526 * removing a virtio device descriptor, by updating the type.
529 type = ioread8(&d->type);
538 /* device already exists */
539 dev = device_find_child(mdrv->dev, (void __force *)d,
543 iowrite8(MIC_VIRTIO_PARAM_DEV_REMOVE,
546 mic_handle_config_change(d, i, mdrv);
547 ret = mic_remove_device(d, i, mdrv);
549 iowrite8(-1, &d->type);
551 iowrite8(0, &dc->config_change);
552 iowrite8(0, &dc->guest_ack);
558 dev_dbg(mdrv->dev, "%s %d Adding new virtio device %p\n",
559 __func__, __LINE__, d);
561 mic_add_device(d, i, mdrv);
566 * mic_hotplug_device tries to find changes in the device page.
568 static void mic_hotplug_devices(struct work_struct *work)
570 struct mic_driver *mdrv = container_of(work,
571 struct mic_driver, hotplug_work);
573 mic_scan_devices(mdrv, !REMOVE_DEVICES);
577 * Interrupt handler for hot plug/config changes etc.
580 mic_extint_handler(int irq, void *data)
582 struct mic_driver *mdrv = (struct mic_driver *)data;
584 dev_dbg(mdrv->dev, "%s %d hotplug work\n",
586 mic_ack_interrupt(&mdrv->mdev);
587 schedule_work(&mdrv->hotplug_work);
592 * Init function for virtio
594 int mic_devices_init(struct mic_driver *mdrv)
597 struct mic_bootparam __iomem *bootparam;
600 INIT_WORK(&mdrv->hotplug_work, mic_hotplug_devices);
601 mic_scan_devices(mdrv, !REMOVE_DEVICES);
603 config_db = mic_next_card_db();
604 virtio_config_cookie = mic_request_card_irq(mic_extint_handler, NULL,
605 "virtio_config_intr", mdrv,
607 if (IS_ERR(virtio_config_cookie)) {
608 rc = PTR_ERR(virtio_config_cookie);
612 bootparam = mdrv->dp;
613 iowrite8(config_db, &bootparam->h2c_config_db);
620 * Uninit function for virtio
622 void mic_devices_uninit(struct mic_driver *mdrv)
624 struct mic_bootparam __iomem *bootparam = mdrv->dp;
625 iowrite8(-1, &bootparam->h2c_config_db);
626 mic_free_card_irq(virtio_config_cookie, mdrv);
627 flush_work(&mdrv->hotplug_work);
628 mic_scan_devices(mdrv, REMOVE_DEVICES);