Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Mediated virtual PCI display host device driver
4 *
5 * Emulate enough of qemu stdvga to make bochs-drm.ko happy. That is
6 * basically the vram memory bar and the bochs dispi interface vbe
7 * registers in the mmio register bar. Specifically it does *not*
8 * include any legacy vga stuff. Device looks a lot like "qemu -device
9 * secondary-vga".
10 *
11 * (c) Gerd Hoffmann <kraxel@redhat.com>
12 *
13 * based on mtty driver which is:
14 * Copyright (c) 2016, NVIDIA CORPORATION. All rights reserved.
15 * Author: Neo Jia <cjia@nvidia.com>
16 * Kirti Wankhede <kwankhede@nvidia.com>
17 *
18 * This program is free software; you can redistribute it and/or modify
19 * it under the terms of the GNU General Public License version 2 as
20 * published by the Free Software Foundation.
21 */
22#include <linux/init.h>
23#include <linux/module.h>
24#include <linux/kernel.h>
25#include <linux/slab.h>
26#include <linux/vmalloc.h>
27#include <linux/cdev.h>
28#include <linux/vfio.h>
29#include <linux/iommu.h>
30#include <linux/sysfs.h>
31#include <linux/mdev.h>
32#include <linux/pci.h>
33#include <linux/dma-buf.h>
34#include <linux/highmem.h>
35#include <drm/drm_fourcc.h>
36#include <drm/drm_rect.h>
37#include <drm/drm_modeset_lock.h>
38#include <drm/drm_property.h>
39#include <drm/drm_plane.h>
40
41
42#define VBE_DISPI_INDEX_ID 0x0
43#define VBE_DISPI_INDEX_XRES 0x1
44#define VBE_DISPI_INDEX_YRES 0x2
45#define VBE_DISPI_INDEX_BPP 0x3
46#define VBE_DISPI_INDEX_ENABLE 0x4
47#define VBE_DISPI_INDEX_BANK 0x5
48#define VBE_DISPI_INDEX_VIRT_WIDTH 0x6
49#define VBE_DISPI_INDEX_VIRT_HEIGHT 0x7
50#define VBE_DISPI_INDEX_X_OFFSET 0x8
51#define VBE_DISPI_INDEX_Y_OFFSET 0x9
52#define VBE_DISPI_INDEX_VIDEO_MEMORY_64K 0xa
53#define VBE_DISPI_INDEX_COUNT 0xb
54
55#define VBE_DISPI_ID0 0xB0C0
56#define VBE_DISPI_ID1 0xB0C1
57#define VBE_DISPI_ID2 0xB0C2
58#define VBE_DISPI_ID3 0xB0C3
59#define VBE_DISPI_ID4 0xB0C4
60#define VBE_DISPI_ID5 0xB0C5
61
62#define VBE_DISPI_DISABLED 0x00
63#define VBE_DISPI_ENABLED 0x01
64#define VBE_DISPI_GETCAPS 0x02
65#define VBE_DISPI_8BIT_DAC 0x20
66#define VBE_DISPI_LFB_ENABLED 0x40
67#define VBE_DISPI_NOCLEARMEM 0x80
68
69
70#define MBOCHS_NAME "mbochs"
71#define MBOCHS_CLASS_NAME "mbochs"
72
73#define MBOCHS_EDID_REGION_INDEX VFIO_PCI_NUM_REGIONS
74#define MBOCHS_NUM_REGIONS (MBOCHS_EDID_REGION_INDEX+1)
75
76#define MBOCHS_CONFIG_SPACE_SIZE 0xff
77#define MBOCHS_MMIO_BAR_OFFSET PAGE_SIZE
78#define MBOCHS_MMIO_BAR_SIZE PAGE_SIZE
79#define MBOCHS_EDID_OFFSET (MBOCHS_MMIO_BAR_OFFSET + \
80 MBOCHS_MMIO_BAR_SIZE)
81#define MBOCHS_EDID_SIZE PAGE_SIZE
82#define MBOCHS_MEMORY_BAR_OFFSET (MBOCHS_EDID_OFFSET + \
83 MBOCHS_EDID_SIZE)
84
85#define MBOCHS_EDID_BLOB_OFFSET (MBOCHS_EDID_SIZE/2)
86
87#define STORE_LE16(addr, val) (*(u16 *)addr = val)
88#define STORE_LE32(addr, val) (*(u32 *)addr = val)
89
90
91MODULE_LICENSE("GPL v2");
92
93static int max_mbytes = 256;
94module_param_named(count, max_mbytes, int, 0444);
95MODULE_PARM_DESC(mem, "megabytes available to " MBOCHS_NAME " devices");
96
97
98#define MBOCHS_TYPE_1 "small"
99#define MBOCHS_TYPE_2 "medium"
100#define MBOCHS_TYPE_3 "large"
101
102static struct mbochs_type {
103 struct mdev_type type;
104 u32 mbytes;
105 u32 max_x;
106 u32 max_y;
107} mbochs_types[] = {
108 {
109 .type.sysfs_name = MBOCHS_TYPE_1,
110 .type.pretty_name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_1,
111 .mbytes = 4,
112 .max_x = 800,
113 .max_y = 600,
114 }, {
115 .type.sysfs_name = MBOCHS_TYPE_2,
116 .type.pretty_name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_2,
117 .mbytes = 16,
118 .max_x = 1920,
119 .max_y = 1440,
120 }, {
121 .type.sysfs_name = MBOCHS_TYPE_3,
122 .type.pretty_name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_3,
123 .mbytes = 64,
124 .max_x = 0,
125 .max_y = 0,
126 },
127};
128
129static struct mdev_type *mbochs_mdev_types[] = {
130 &mbochs_types[0].type,
131 &mbochs_types[1].type,
132 &mbochs_types[2].type,
133};
134
135static dev_t mbochs_devt;
136static struct class *mbochs_class;
137static struct cdev mbochs_cdev;
138static struct device mbochs_dev;
139static struct mdev_parent mbochs_parent;
140static atomic_t mbochs_avail_mbytes;
141static const struct vfio_device_ops mbochs_dev_ops;
142
143struct vfio_region_info_ext {
144 struct vfio_region_info base;
145 struct vfio_region_info_cap_type type;
146};
147
148struct mbochs_mode {
149 u32 drm_format;
150 u32 bytepp;
151 u32 width;
152 u32 height;
153 u32 stride;
154 u32 __pad;
155 u64 offset;
156 u64 size;
157};
158
159struct mbochs_dmabuf {
160 struct mbochs_mode mode;
161 u32 id;
162 struct page **pages;
163 pgoff_t pagecount;
164 struct dma_buf *buf;
165 struct mdev_state *mdev_state;
166 struct list_head next;
167 bool unlinked;
168};
169
170/* State of each mdev device */
171struct mdev_state {
172 struct vfio_device vdev;
173 u8 *vconfig;
174 u64 bar_mask[3];
175 u32 memory_bar_mask;
176 struct mutex ops_lock;
177 struct mdev_device *mdev;
178
179 const struct mbochs_type *type;
180 u16 vbe[VBE_DISPI_INDEX_COUNT];
181 u64 memsize;
182 struct page **pages;
183 pgoff_t pagecount;
184 struct vfio_region_gfx_edid edid_regs;
185 u8 edid_blob[0x400];
186
187 struct list_head dmabufs;
188 u32 active_id;
189 u32 next_id;
190};
191
192static const char *vbe_name_list[VBE_DISPI_INDEX_COUNT] = {
193 [VBE_DISPI_INDEX_ID] = "id",
194 [VBE_DISPI_INDEX_XRES] = "xres",
195 [VBE_DISPI_INDEX_YRES] = "yres",
196 [VBE_DISPI_INDEX_BPP] = "bpp",
197 [VBE_DISPI_INDEX_ENABLE] = "enable",
198 [VBE_DISPI_INDEX_BANK] = "bank",
199 [VBE_DISPI_INDEX_VIRT_WIDTH] = "virt-width",
200 [VBE_DISPI_INDEX_VIRT_HEIGHT] = "virt-height",
201 [VBE_DISPI_INDEX_X_OFFSET] = "x-offset",
202 [VBE_DISPI_INDEX_Y_OFFSET] = "y-offset",
203 [VBE_DISPI_INDEX_VIDEO_MEMORY_64K] = "video-mem",
204};
205
206static const char *vbe_name(u32 index)
207{
208 if (index < ARRAY_SIZE(vbe_name_list))
209 return vbe_name_list[index];
210 return "(invalid)";
211}
212
213static struct page *__mbochs_get_page(struct mdev_state *mdev_state,
214 pgoff_t pgoff);
215static struct page *mbochs_get_page(struct mdev_state *mdev_state,
216 pgoff_t pgoff);
217
218static void mbochs_create_config_space(struct mdev_state *mdev_state)
219{
220 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_VENDOR_ID],
221 0x1234);
222 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_DEVICE_ID],
223 0x1111);
224 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_SUBSYSTEM_VENDOR_ID],
225 PCI_SUBVENDOR_ID_REDHAT_QUMRANET);
226 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_SUBSYSTEM_ID],
227 PCI_SUBDEVICE_ID_QEMU);
228
229 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_COMMAND],
230 PCI_COMMAND_IO | PCI_COMMAND_MEMORY);
231 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_CLASS_DEVICE],
232 PCI_CLASS_DISPLAY_OTHER);
233 mdev_state->vconfig[PCI_CLASS_REVISION] = 0x01;
234
235 STORE_LE32((u32 *) &mdev_state->vconfig[PCI_BASE_ADDRESS_0],
236 PCI_BASE_ADDRESS_SPACE_MEMORY |
237 PCI_BASE_ADDRESS_MEM_TYPE_32 |
238 PCI_BASE_ADDRESS_MEM_PREFETCH);
239 mdev_state->bar_mask[0] = ~(mdev_state->memsize) + 1;
240
241 STORE_LE32((u32 *) &mdev_state->vconfig[PCI_BASE_ADDRESS_2],
242 PCI_BASE_ADDRESS_SPACE_MEMORY |
243 PCI_BASE_ADDRESS_MEM_TYPE_32);
244 mdev_state->bar_mask[2] = ~(MBOCHS_MMIO_BAR_SIZE) + 1;
245}
246
247static int mbochs_check_framebuffer(struct mdev_state *mdev_state,
248 struct mbochs_mode *mode)
249{
250 struct device *dev = mdev_dev(mdev_state->mdev);
251 u16 *vbe = mdev_state->vbe;
252 u32 virt_width;
253
254 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
255
256 if (!(vbe[VBE_DISPI_INDEX_ENABLE] & VBE_DISPI_ENABLED))
257 goto nofb;
258
259 memset(mode, 0, sizeof(*mode));
260 switch (vbe[VBE_DISPI_INDEX_BPP]) {
261 case 32:
262 mode->drm_format = DRM_FORMAT_XRGB8888;
263 mode->bytepp = 4;
264 break;
265 default:
266 dev_info_ratelimited(dev, "%s: bpp %d not supported\n",
267 __func__, vbe[VBE_DISPI_INDEX_BPP]);
268 goto nofb;
269 }
270
271 mode->width = vbe[VBE_DISPI_INDEX_XRES];
272 mode->height = vbe[VBE_DISPI_INDEX_YRES];
273 virt_width = vbe[VBE_DISPI_INDEX_VIRT_WIDTH];
274 if (virt_width < mode->width)
275 virt_width = mode->width;
276 mode->stride = virt_width * mode->bytepp;
277 mode->size = (u64)mode->stride * mode->height;
278 mode->offset = ((u64)vbe[VBE_DISPI_INDEX_X_OFFSET] * mode->bytepp +
279 (u64)vbe[VBE_DISPI_INDEX_Y_OFFSET] * mode->stride);
280
281 if (mode->width < 64 || mode->height < 64) {
282 dev_info_ratelimited(dev, "%s: invalid resolution %dx%d\n",
283 __func__, mode->width, mode->height);
284 goto nofb;
285 }
286 if (mode->offset + mode->size > mdev_state->memsize) {
287 dev_info_ratelimited(dev, "%s: framebuffer memory overflow\n",
288 __func__);
289 goto nofb;
290 }
291
292 return 0;
293
294nofb:
295 memset(mode, 0, sizeof(*mode));
296 return -EINVAL;
297}
298
299static bool mbochs_modes_equal(struct mbochs_mode *mode1,
300 struct mbochs_mode *mode2)
301{
302 return memcmp(mode1, mode2, sizeof(struct mbochs_mode)) == 0;
303}
304
305static void handle_pci_cfg_write(struct mdev_state *mdev_state, u16 offset,
306 char *buf, u32 count)
307{
308 struct device *dev = mdev_dev(mdev_state->mdev);
309 int index = (offset - PCI_BASE_ADDRESS_0) / 0x04;
310 u32 cfg_addr;
311
312 switch (offset) {
313 case PCI_BASE_ADDRESS_0:
314 case PCI_BASE_ADDRESS_2:
315 cfg_addr = *(u32 *)buf;
316
317 if (cfg_addr == 0xffffffff) {
318 cfg_addr = (cfg_addr & mdev_state->bar_mask[index]);
319 } else {
320 cfg_addr &= PCI_BASE_ADDRESS_MEM_MASK;
321 if (cfg_addr)
322 dev_info(dev, "BAR #%d @ 0x%x\n",
323 index, cfg_addr);
324 }
325
326 cfg_addr |= (mdev_state->vconfig[offset] &
327 ~PCI_BASE_ADDRESS_MEM_MASK);
328 STORE_LE32(&mdev_state->vconfig[offset], cfg_addr);
329 break;
330 }
331}
332
333static void handle_mmio_write(struct mdev_state *mdev_state, u16 offset,
334 char *buf, u32 count)
335{
336 struct device *dev = mdev_dev(mdev_state->mdev);
337 int index;
338 u16 reg16;
339
340 switch (offset) {
341 case 0x400 ... 0x41f: /* vga ioports remapped */
342 goto unhandled;
343 case 0x500 ... 0x515: /* bochs dispi interface */
344 if (count != 2)
345 goto unhandled;
346 index = (offset - 0x500) / 2;
347 reg16 = *(u16 *)buf;
348 if (index < ARRAY_SIZE(mdev_state->vbe))
349 mdev_state->vbe[index] = reg16;
350 dev_dbg(dev, "%s: vbe write %d = %d (%s)\n",
351 __func__, index, reg16, vbe_name(index));
352 break;
353 case 0x600 ... 0x607: /* qemu extended regs */
354 goto unhandled;
355 default:
356unhandled:
357 dev_dbg(dev, "%s: @0x%03x, count %d (unhandled)\n",
358 __func__, offset, count);
359 break;
360 }
361}
362
363static void handle_mmio_read(struct mdev_state *mdev_state, u16 offset,
364 char *buf, u32 count)
365{
366 struct device *dev = mdev_dev(mdev_state->mdev);
367 struct vfio_region_gfx_edid *edid;
368 u16 reg16 = 0;
369 int index;
370
371 switch (offset) {
372 case 0x000 ... 0x3ff: /* edid block */
373 edid = &mdev_state->edid_regs;
374 if (edid->link_state != VFIO_DEVICE_GFX_LINK_STATE_UP ||
375 offset >= edid->edid_size) {
376 memset(buf, 0, count);
377 break;
378 }
379 memcpy(buf, mdev_state->edid_blob + offset, count);
380 break;
381 case 0x500 ... 0x515: /* bochs dispi interface */
382 if (count != 2)
383 goto unhandled;
384 index = (offset - 0x500) / 2;
385 if (index < ARRAY_SIZE(mdev_state->vbe))
386 reg16 = mdev_state->vbe[index];
387 dev_dbg(dev, "%s: vbe read %d = %d (%s)\n",
388 __func__, index, reg16, vbe_name(index));
389 *(u16 *)buf = reg16;
390 break;
391 default:
392unhandled:
393 dev_dbg(dev, "%s: @0x%03x, count %d (unhandled)\n",
394 __func__, offset, count);
395 memset(buf, 0, count);
396 break;
397 }
398}
399
400static void handle_edid_regs(struct mdev_state *mdev_state, u16 offset,
401 char *buf, u32 count, bool is_write)
402{
403 char *regs = (void *)&mdev_state->edid_regs;
404
405 if (offset + count > sizeof(mdev_state->edid_regs))
406 return;
407 if (count != 4)
408 return;
409 if (offset % 4)
410 return;
411
412 if (is_write) {
413 switch (offset) {
414 case offsetof(struct vfio_region_gfx_edid, link_state):
415 case offsetof(struct vfio_region_gfx_edid, edid_size):
416 memcpy(regs + offset, buf, count);
417 break;
418 default:
419 /* read-only regs */
420 break;
421 }
422 } else {
423 memcpy(buf, regs + offset, count);
424 }
425}
426
427static void handle_edid_blob(struct mdev_state *mdev_state, u16 offset,
428 char *buf, u32 count, bool is_write)
429{
430 if (offset + count > mdev_state->edid_regs.edid_max_size)
431 return;
432 if (is_write)
433 memcpy(mdev_state->edid_blob + offset, buf, count);
434 else
435 memcpy(buf, mdev_state->edid_blob + offset, count);
436}
437
438static ssize_t mdev_access(struct mdev_state *mdev_state, char *buf,
439 size_t count, loff_t pos, bool is_write)
440{
441 struct page *pg;
442 loff_t poff;
443 char *map;
444 int ret = 0;
445
446 mutex_lock(&mdev_state->ops_lock);
447
448 if (pos < MBOCHS_CONFIG_SPACE_SIZE) {
449 if (is_write)
450 handle_pci_cfg_write(mdev_state, pos, buf, count);
451 else
452 memcpy(buf, (mdev_state->vconfig + pos), count);
453
454 } else if (pos >= MBOCHS_MMIO_BAR_OFFSET &&
455 pos + count <= (MBOCHS_MMIO_BAR_OFFSET +
456 MBOCHS_MMIO_BAR_SIZE)) {
457 pos -= MBOCHS_MMIO_BAR_OFFSET;
458 if (is_write)
459 handle_mmio_write(mdev_state, pos, buf, count);
460 else
461 handle_mmio_read(mdev_state, pos, buf, count);
462
463 } else if (pos >= MBOCHS_EDID_OFFSET &&
464 pos + count <= (MBOCHS_EDID_OFFSET +
465 MBOCHS_EDID_SIZE)) {
466 pos -= MBOCHS_EDID_OFFSET;
467 if (pos < MBOCHS_EDID_BLOB_OFFSET) {
468 handle_edid_regs(mdev_state, pos, buf, count, is_write);
469 } else {
470 pos -= MBOCHS_EDID_BLOB_OFFSET;
471 handle_edid_blob(mdev_state, pos, buf, count, is_write);
472 }
473
474 } else if (pos >= MBOCHS_MEMORY_BAR_OFFSET &&
475 pos + count <=
476 MBOCHS_MEMORY_BAR_OFFSET + mdev_state->memsize) {
477 pos -= MBOCHS_MMIO_BAR_OFFSET;
478 poff = pos & ~PAGE_MASK;
479 pg = __mbochs_get_page(mdev_state, pos >> PAGE_SHIFT);
480 map = kmap(pg);
481 if (is_write)
482 memcpy(map + poff, buf, count);
483 else
484 memcpy(buf, map + poff, count);
485 kunmap(pg);
486 put_page(pg);
487
488 } else {
489 dev_dbg(mdev_state->vdev.dev, "%s: %s @0x%llx (unhandled)\n",
490 __func__, is_write ? "WR" : "RD", pos);
491 ret = -1;
492 goto accessfailed;
493 }
494
495 ret = count;
496
497
498accessfailed:
499 mutex_unlock(&mdev_state->ops_lock);
500
501 return ret;
502}
503
504static int mbochs_reset(struct mdev_state *mdev_state)
505{
506 u32 size64k = mdev_state->memsize / (64 * 1024);
507 int i;
508
509 for (i = 0; i < ARRAY_SIZE(mdev_state->vbe); i++)
510 mdev_state->vbe[i] = 0;
511 mdev_state->vbe[VBE_DISPI_INDEX_ID] = VBE_DISPI_ID5;
512 mdev_state->vbe[VBE_DISPI_INDEX_VIDEO_MEMORY_64K] = size64k;
513 return 0;
514}
515
516static int mbochs_init_dev(struct vfio_device *vdev)
517{
518 struct mdev_state *mdev_state =
519 container_of(vdev, struct mdev_state, vdev);
520 struct mdev_device *mdev = to_mdev_device(vdev->dev);
521 struct mbochs_type *type =
522 container_of(mdev->type, struct mbochs_type, type);
523 int avail_mbytes = atomic_read(&mbochs_avail_mbytes);
524 int ret = -ENOMEM;
525
526 do {
527 if (avail_mbytes < type->mbytes)
528 return -ENOSPC;
529 } while (!atomic_try_cmpxchg(&mbochs_avail_mbytes, &avail_mbytes,
530 avail_mbytes - type->mbytes));
531
532 mdev_state->vconfig = kzalloc(MBOCHS_CONFIG_SPACE_SIZE, GFP_KERNEL);
533 if (!mdev_state->vconfig)
534 goto err_avail;
535
536 mdev_state->memsize = type->mbytes * 1024 * 1024;
537 mdev_state->pagecount = mdev_state->memsize >> PAGE_SHIFT;
538 mdev_state->pages = kcalloc(mdev_state->pagecount,
539 sizeof(struct page *),
540 GFP_KERNEL);
541 if (!mdev_state->pages)
542 goto err_vconfig;
543
544 mutex_init(&mdev_state->ops_lock);
545 mdev_state->mdev = mdev;
546 INIT_LIST_HEAD(&mdev_state->dmabufs);
547 mdev_state->next_id = 1;
548
549 mdev_state->type = type;
550 mdev_state->edid_regs.max_xres = type->max_x;
551 mdev_state->edid_regs.max_yres = type->max_y;
552 mdev_state->edid_regs.edid_offset = MBOCHS_EDID_BLOB_OFFSET;
553 mdev_state->edid_regs.edid_max_size = sizeof(mdev_state->edid_blob);
554 mbochs_create_config_space(mdev_state);
555 mbochs_reset(mdev_state);
556
557 dev_info(vdev->dev, "%s: %s, %d MB, %ld pages\n", __func__,
558 type->type.pretty_name, type->mbytes, mdev_state->pagecount);
559 return 0;
560
561err_vconfig:
562 kfree(mdev_state->vconfig);
563err_avail:
564 atomic_add(type->mbytes, &mbochs_avail_mbytes);
565 return ret;
566}
567
568static int mbochs_probe(struct mdev_device *mdev)
569{
570 struct mdev_state *mdev_state;
571 int ret = -ENOMEM;
572
573 mdev_state = vfio_alloc_device(mdev_state, vdev, &mdev->dev,
574 &mbochs_dev_ops);
575 if (IS_ERR(mdev_state))
576 return PTR_ERR(mdev_state);
577
578 ret = vfio_register_emulated_iommu_dev(&mdev_state->vdev);
579 if (ret)
580 goto err_put_vdev;
581 dev_set_drvdata(&mdev->dev, mdev_state);
582 return 0;
583
584err_put_vdev:
585 vfio_put_device(&mdev_state->vdev);
586 return ret;
587}
588
589static void mbochs_release_dev(struct vfio_device *vdev)
590{
591 struct mdev_state *mdev_state =
592 container_of(vdev, struct mdev_state, vdev);
593
594 atomic_add(mdev_state->type->mbytes, &mbochs_avail_mbytes);
595 kfree(mdev_state->pages);
596 kfree(mdev_state->vconfig);
597}
598
599static void mbochs_remove(struct mdev_device *mdev)
600{
601 struct mdev_state *mdev_state = dev_get_drvdata(&mdev->dev);
602
603 vfio_unregister_group_dev(&mdev_state->vdev);
604 vfio_put_device(&mdev_state->vdev);
605}
606
607static ssize_t mbochs_read(struct vfio_device *vdev, char __user *buf,
608 size_t count, loff_t *ppos)
609{
610 struct mdev_state *mdev_state =
611 container_of(vdev, struct mdev_state, vdev);
612 unsigned int done = 0;
613 int ret;
614
615 while (count) {
616 size_t filled;
617
618 if (count >= 4 && !(*ppos % 4)) {
619 u32 val;
620
621 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
622 *ppos, false);
623 if (ret <= 0)
624 goto read_err;
625
626 if (copy_to_user(buf, &val, sizeof(val)))
627 goto read_err;
628
629 filled = 4;
630 } else if (count >= 2 && !(*ppos % 2)) {
631 u16 val;
632
633 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
634 *ppos, false);
635 if (ret <= 0)
636 goto read_err;
637
638 if (copy_to_user(buf, &val, sizeof(val)))
639 goto read_err;
640
641 filled = 2;
642 } else {
643 u8 val;
644
645 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
646 *ppos, false);
647 if (ret <= 0)
648 goto read_err;
649
650 if (copy_to_user(buf, &val, sizeof(val)))
651 goto read_err;
652
653 filled = 1;
654 }
655
656 count -= filled;
657 done += filled;
658 *ppos += filled;
659 buf += filled;
660 }
661
662 return done;
663
664read_err:
665 return -EFAULT;
666}
667
668static ssize_t mbochs_write(struct vfio_device *vdev, const char __user *buf,
669 size_t count, loff_t *ppos)
670{
671 struct mdev_state *mdev_state =
672 container_of(vdev, struct mdev_state, vdev);
673 unsigned int done = 0;
674 int ret;
675
676 while (count) {
677 size_t filled;
678
679 if (count >= 4 && !(*ppos % 4)) {
680 u32 val;
681
682 if (copy_from_user(&val, buf, sizeof(val)))
683 goto write_err;
684
685 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
686 *ppos, true);
687 if (ret <= 0)
688 goto write_err;
689
690 filled = 4;
691 } else if (count >= 2 && !(*ppos % 2)) {
692 u16 val;
693
694 if (copy_from_user(&val, buf, sizeof(val)))
695 goto write_err;
696
697 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
698 *ppos, true);
699 if (ret <= 0)
700 goto write_err;
701
702 filled = 2;
703 } else {
704 u8 val;
705
706 if (copy_from_user(&val, buf, sizeof(val)))
707 goto write_err;
708
709 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
710 *ppos, true);
711 if (ret <= 0)
712 goto write_err;
713
714 filled = 1;
715 }
716 count -= filled;
717 done += filled;
718 *ppos += filled;
719 buf += filled;
720 }
721
722 return done;
723write_err:
724 return -EFAULT;
725}
726
727static struct page *__mbochs_get_page(struct mdev_state *mdev_state,
728 pgoff_t pgoff)
729{
730 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
731
732 if (!mdev_state->pages[pgoff]) {
733 mdev_state->pages[pgoff] =
734 alloc_pages(GFP_HIGHUSER | __GFP_ZERO, 0);
735 if (!mdev_state->pages[pgoff])
736 return NULL;
737 }
738
739 get_page(mdev_state->pages[pgoff]);
740 return mdev_state->pages[pgoff];
741}
742
743static struct page *mbochs_get_page(struct mdev_state *mdev_state,
744 pgoff_t pgoff)
745{
746 struct page *page;
747
748 if (WARN_ON(pgoff >= mdev_state->pagecount))
749 return NULL;
750
751 mutex_lock(&mdev_state->ops_lock);
752 page = __mbochs_get_page(mdev_state, pgoff);
753 mutex_unlock(&mdev_state->ops_lock);
754
755 return page;
756}
757
758static void mbochs_put_pages(struct mdev_state *mdev_state)
759{
760 struct device *dev = mdev_dev(mdev_state->mdev);
761 int i, count = 0;
762
763 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
764
765 for (i = 0; i < mdev_state->pagecount; i++) {
766 if (!mdev_state->pages[i])
767 continue;
768 put_page(mdev_state->pages[i]);
769 mdev_state->pages[i] = NULL;
770 count++;
771 }
772 dev_dbg(dev, "%s: %d pages released\n", __func__, count);
773}
774
775static vm_fault_t mbochs_region_vm_fault(struct vm_fault *vmf)
776{
777 struct vm_area_struct *vma = vmf->vma;
778 struct mdev_state *mdev_state = vma->vm_private_data;
779 pgoff_t page_offset = (vmf->address - vma->vm_start) >> PAGE_SHIFT;
780
781 if (page_offset >= mdev_state->pagecount)
782 return VM_FAULT_SIGBUS;
783
784 vmf->page = mbochs_get_page(mdev_state, page_offset);
785 if (!vmf->page)
786 return VM_FAULT_SIGBUS;
787
788 return 0;
789}
790
791static const struct vm_operations_struct mbochs_region_vm_ops = {
792 .fault = mbochs_region_vm_fault,
793};
794
795static int mbochs_mmap(struct vfio_device *vdev, struct vm_area_struct *vma)
796{
797 struct mdev_state *mdev_state =
798 container_of(vdev, struct mdev_state, vdev);
799
800 if (vma->vm_pgoff != MBOCHS_MEMORY_BAR_OFFSET >> PAGE_SHIFT)
801 return -EINVAL;
802 if (vma->vm_end < vma->vm_start)
803 return -EINVAL;
804 if (vma->vm_end - vma->vm_start > mdev_state->memsize)
805 return -EINVAL;
806 if ((vma->vm_flags & VM_SHARED) == 0)
807 return -EINVAL;
808
809 vma->vm_ops = &mbochs_region_vm_ops;
810 vma->vm_private_data = mdev_state;
811 return 0;
812}
813
814static vm_fault_t mbochs_dmabuf_vm_fault(struct vm_fault *vmf)
815{
816 struct vm_area_struct *vma = vmf->vma;
817 struct mbochs_dmabuf *dmabuf = vma->vm_private_data;
818
819 if (WARN_ON(vmf->pgoff >= dmabuf->pagecount))
820 return VM_FAULT_SIGBUS;
821
822 vmf->page = dmabuf->pages[vmf->pgoff];
823 get_page(vmf->page);
824 return 0;
825}
826
827static const struct vm_operations_struct mbochs_dmabuf_vm_ops = {
828 .fault = mbochs_dmabuf_vm_fault,
829};
830
831static int mbochs_mmap_dmabuf(struct dma_buf *buf, struct vm_area_struct *vma)
832{
833 struct mbochs_dmabuf *dmabuf = buf->priv;
834 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
835
836 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
837
838 if ((vma->vm_flags & VM_SHARED) == 0)
839 return -EINVAL;
840
841 vma->vm_ops = &mbochs_dmabuf_vm_ops;
842 vma->vm_private_data = dmabuf;
843 return 0;
844}
845
846static void mbochs_print_dmabuf(struct mbochs_dmabuf *dmabuf,
847 const char *prefix)
848{
849 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
850 u32 fourcc = dmabuf->mode.drm_format;
851
852 dev_dbg(dev, "%s/%d: %c%c%c%c, %dx%d, stride %d, off 0x%llx, size 0x%llx, pages %ld\n",
853 prefix, dmabuf->id,
854 fourcc ? ((fourcc >> 0) & 0xff) : '-',
855 fourcc ? ((fourcc >> 8) & 0xff) : '-',
856 fourcc ? ((fourcc >> 16) & 0xff) : '-',
857 fourcc ? ((fourcc >> 24) & 0xff) : '-',
858 dmabuf->mode.width, dmabuf->mode.height, dmabuf->mode.stride,
859 dmabuf->mode.offset, dmabuf->mode.size, dmabuf->pagecount);
860}
861
862static struct sg_table *mbochs_map_dmabuf(struct dma_buf_attachment *at,
863 enum dma_data_direction direction)
864{
865 struct mbochs_dmabuf *dmabuf = at->dmabuf->priv;
866 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
867 struct sg_table *sg;
868
869 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
870
871 sg = kzalloc(sizeof(*sg), GFP_KERNEL);
872 if (!sg)
873 goto err1;
874 if (sg_alloc_table_from_pages(sg, dmabuf->pages, dmabuf->pagecount,
875 0, dmabuf->mode.size, GFP_KERNEL) < 0)
876 goto err2;
877 if (dma_map_sgtable(at->dev, sg, direction, 0))
878 goto err3;
879
880 return sg;
881
882err3:
883 sg_free_table(sg);
884err2:
885 kfree(sg);
886err1:
887 return ERR_PTR(-ENOMEM);
888}
889
890static void mbochs_unmap_dmabuf(struct dma_buf_attachment *at,
891 struct sg_table *sg,
892 enum dma_data_direction direction)
893{
894 struct mbochs_dmabuf *dmabuf = at->dmabuf->priv;
895 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
896
897 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
898
899 dma_unmap_sgtable(at->dev, sg, direction, 0);
900 sg_free_table(sg);
901 kfree(sg);
902}
903
904static void mbochs_release_dmabuf(struct dma_buf *buf)
905{
906 struct mbochs_dmabuf *dmabuf = buf->priv;
907 struct mdev_state *mdev_state = dmabuf->mdev_state;
908 struct device *dev = mdev_dev(mdev_state->mdev);
909 pgoff_t pg;
910
911 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
912
913 for (pg = 0; pg < dmabuf->pagecount; pg++)
914 put_page(dmabuf->pages[pg]);
915
916 mutex_lock(&mdev_state->ops_lock);
917 dmabuf->buf = NULL;
918 if (dmabuf->unlinked)
919 kfree(dmabuf);
920 mutex_unlock(&mdev_state->ops_lock);
921}
922
923static struct dma_buf_ops mbochs_dmabuf_ops = {
924 .map_dma_buf = mbochs_map_dmabuf,
925 .unmap_dma_buf = mbochs_unmap_dmabuf,
926 .release = mbochs_release_dmabuf,
927 .mmap = mbochs_mmap_dmabuf,
928};
929
930static struct mbochs_dmabuf *mbochs_dmabuf_alloc(struct mdev_state *mdev_state,
931 struct mbochs_mode *mode)
932{
933 struct mbochs_dmabuf *dmabuf;
934 pgoff_t page_offset, pg;
935
936 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
937
938 dmabuf = kzalloc(sizeof(struct mbochs_dmabuf), GFP_KERNEL);
939 if (!dmabuf)
940 return NULL;
941
942 dmabuf->mode = *mode;
943 dmabuf->id = mdev_state->next_id++;
944 dmabuf->pagecount = DIV_ROUND_UP(mode->size, PAGE_SIZE);
945 dmabuf->pages = kcalloc(dmabuf->pagecount, sizeof(struct page *),
946 GFP_KERNEL);
947 if (!dmabuf->pages)
948 goto err_free_dmabuf;
949
950 page_offset = dmabuf->mode.offset >> PAGE_SHIFT;
951 for (pg = 0; pg < dmabuf->pagecount; pg++) {
952 dmabuf->pages[pg] = __mbochs_get_page(mdev_state,
953 page_offset + pg);
954 if (!dmabuf->pages[pg])
955 goto err_free_pages;
956 }
957
958 dmabuf->mdev_state = mdev_state;
959 list_add(&dmabuf->next, &mdev_state->dmabufs);
960
961 mbochs_print_dmabuf(dmabuf, __func__);
962 return dmabuf;
963
964err_free_pages:
965 while (pg > 0)
966 put_page(dmabuf->pages[--pg]);
967 kfree(dmabuf->pages);
968err_free_dmabuf:
969 kfree(dmabuf);
970 return NULL;
971}
972
973static struct mbochs_dmabuf *
974mbochs_dmabuf_find_by_mode(struct mdev_state *mdev_state,
975 struct mbochs_mode *mode)
976{
977 struct mbochs_dmabuf *dmabuf;
978
979 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
980
981 list_for_each_entry(dmabuf, &mdev_state->dmabufs, next)
982 if (mbochs_modes_equal(&dmabuf->mode, mode))
983 return dmabuf;
984
985 return NULL;
986}
987
988static struct mbochs_dmabuf *
989mbochs_dmabuf_find_by_id(struct mdev_state *mdev_state, u32 id)
990{
991 struct mbochs_dmabuf *dmabuf;
992
993 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
994
995 list_for_each_entry(dmabuf, &mdev_state->dmabufs, next)
996 if (dmabuf->id == id)
997 return dmabuf;
998
999 return NULL;
1000}
1001
1002static int mbochs_dmabuf_export(struct mbochs_dmabuf *dmabuf)
1003{
1004 struct mdev_state *mdev_state = dmabuf->mdev_state;
1005 struct device *dev = mdev_state->vdev.dev;
1006 DEFINE_DMA_BUF_EXPORT_INFO(exp_info);
1007 struct dma_buf *buf;
1008
1009 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
1010
1011 if (!IS_ALIGNED(dmabuf->mode.offset, PAGE_SIZE)) {
1012 dev_info_ratelimited(dev, "%s: framebuffer not page-aligned\n",
1013 __func__);
1014 return -EINVAL;
1015 }
1016
1017 exp_info.ops = &mbochs_dmabuf_ops;
1018 exp_info.size = dmabuf->mode.size;
1019 exp_info.priv = dmabuf;
1020
1021 buf = dma_buf_export(&exp_info);
1022 if (IS_ERR(buf)) {
1023 dev_info_ratelimited(dev, "%s: dma_buf_export failed: %ld\n",
1024 __func__, PTR_ERR(buf));
1025 return PTR_ERR(buf);
1026 }
1027
1028 dmabuf->buf = buf;
1029 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
1030 return 0;
1031}
1032
1033static int mbochs_get_region_info(struct mdev_state *mdev_state,
1034 struct vfio_region_info_ext *ext)
1035{
1036 struct vfio_region_info *region_info = &ext->base;
1037
1038 if (region_info->index >= MBOCHS_NUM_REGIONS)
1039 return -EINVAL;
1040
1041 switch (region_info->index) {
1042 case VFIO_PCI_CONFIG_REGION_INDEX:
1043 region_info->offset = 0;
1044 region_info->size = MBOCHS_CONFIG_SPACE_SIZE;
1045 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1046 VFIO_REGION_INFO_FLAG_WRITE);
1047 break;
1048 case VFIO_PCI_BAR0_REGION_INDEX:
1049 region_info->offset = MBOCHS_MEMORY_BAR_OFFSET;
1050 region_info->size = mdev_state->memsize;
1051 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1052 VFIO_REGION_INFO_FLAG_WRITE |
1053 VFIO_REGION_INFO_FLAG_MMAP);
1054 break;
1055 case VFIO_PCI_BAR2_REGION_INDEX:
1056 region_info->offset = MBOCHS_MMIO_BAR_OFFSET;
1057 region_info->size = MBOCHS_MMIO_BAR_SIZE;
1058 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1059 VFIO_REGION_INFO_FLAG_WRITE);
1060 break;
1061 case MBOCHS_EDID_REGION_INDEX:
1062 ext->base.argsz = sizeof(*ext);
1063 ext->base.offset = MBOCHS_EDID_OFFSET;
1064 ext->base.size = MBOCHS_EDID_SIZE;
1065 ext->base.flags = (VFIO_REGION_INFO_FLAG_READ |
1066 VFIO_REGION_INFO_FLAG_WRITE |
1067 VFIO_REGION_INFO_FLAG_CAPS);
1068 ext->base.cap_offset = offsetof(typeof(*ext), type);
1069 ext->type.header.id = VFIO_REGION_INFO_CAP_TYPE;
1070 ext->type.header.version = 1;
1071 ext->type.header.next = 0;
1072 ext->type.type = VFIO_REGION_TYPE_GFX;
1073 ext->type.subtype = VFIO_REGION_SUBTYPE_GFX_EDID;
1074 break;
1075 default:
1076 region_info->size = 0;
1077 region_info->offset = 0;
1078 region_info->flags = 0;
1079 }
1080
1081 return 0;
1082}
1083
1084static int mbochs_get_irq_info(struct vfio_irq_info *irq_info)
1085{
1086 irq_info->count = 0;
1087 return 0;
1088}
1089
1090static int mbochs_get_device_info(struct vfio_device_info *dev_info)
1091{
1092 dev_info->flags = VFIO_DEVICE_FLAGS_PCI;
1093 dev_info->num_regions = MBOCHS_NUM_REGIONS;
1094 dev_info->num_irqs = VFIO_PCI_NUM_IRQS;
1095 return 0;
1096}
1097
1098static int mbochs_query_gfx_plane(struct mdev_state *mdev_state,
1099 struct vfio_device_gfx_plane_info *plane)
1100{
1101 struct mbochs_dmabuf *dmabuf;
1102 struct mbochs_mode mode;
1103 int ret;
1104
1105 if (plane->flags & VFIO_GFX_PLANE_TYPE_PROBE) {
1106 if (plane->flags == (VFIO_GFX_PLANE_TYPE_PROBE |
1107 VFIO_GFX_PLANE_TYPE_DMABUF))
1108 return 0;
1109 return -EINVAL;
1110 }
1111
1112 if (plane->flags != VFIO_GFX_PLANE_TYPE_DMABUF)
1113 return -EINVAL;
1114
1115 plane->drm_format_mod = 0;
1116 plane->x_pos = 0;
1117 plane->y_pos = 0;
1118 plane->x_hot = 0;
1119 plane->y_hot = 0;
1120
1121 mutex_lock(&mdev_state->ops_lock);
1122
1123 ret = -EINVAL;
1124 if (plane->drm_plane_type == DRM_PLANE_TYPE_PRIMARY)
1125 ret = mbochs_check_framebuffer(mdev_state, &mode);
1126 if (ret < 0) {
1127 plane->drm_format = 0;
1128 plane->width = 0;
1129 plane->height = 0;
1130 plane->stride = 0;
1131 plane->size = 0;
1132 plane->dmabuf_id = 0;
1133 goto done;
1134 }
1135
1136 dmabuf = mbochs_dmabuf_find_by_mode(mdev_state, &mode);
1137 if (!dmabuf)
1138 mbochs_dmabuf_alloc(mdev_state, &mode);
1139 if (!dmabuf) {
1140 mutex_unlock(&mdev_state->ops_lock);
1141 return -ENOMEM;
1142 }
1143
1144 plane->drm_format = dmabuf->mode.drm_format;
1145 plane->width = dmabuf->mode.width;
1146 plane->height = dmabuf->mode.height;
1147 plane->stride = dmabuf->mode.stride;
1148 plane->size = dmabuf->mode.size;
1149 plane->dmabuf_id = dmabuf->id;
1150
1151done:
1152 if (plane->drm_plane_type == DRM_PLANE_TYPE_PRIMARY &&
1153 mdev_state->active_id != plane->dmabuf_id) {
1154 dev_dbg(mdev_state->vdev.dev, "%s: primary: %d => %d\n",
1155 __func__, mdev_state->active_id, plane->dmabuf_id);
1156 mdev_state->active_id = plane->dmabuf_id;
1157 }
1158 mutex_unlock(&mdev_state->ops_lock);
1159 return 0;
1160}
1161
1162static int mbochs_get_gfx_dmabuf(struct mdev_state *mdev_state, u32 id)
1163{
1164 struct mbochs_dmabuf *dmabuf;
1165
1166 mutex_lock(&mdev_state->ops_lock);
1167
1168 dmabuf = mbochs_dmabuf_find_by_id(mdev_state, id);
1169 if (!dmabuf) {
1170 mutex_unlock(&mdev_state->ops_lock);
1171 return -ENOENT;
1172 }
1173
1174 if (!dmabuf->buf)
1175 mbochs_dmabuf_export(dmabuf);
1176
1177 mutex_unlock(&mdev_state->ops_lock);
1178
1179 if (!dmabuf->buf)
1180 return -EINVAL;
1181
1182 return dma_buf_fd(dmabuf->buf, 0);
1183}
1184
1185static long mbochs_ioctl(struct vfio_device *vdev, unsigned int cmd,
1186 unsigned long arg)
1187{
1188 struct mdev_state *mdev_state =
1189 container_of(vdev, struct mdev_state, vdev);
1190 int ret = 0;
1191 unsigned long minsz, outsz;
1192
1193 switch (cmd) {
1194 case VFIO_DEVICE_GET_INFO:
1195 {
1196 struct vfio_device_info info;
1197
1198 minsz = offsetofend(struct vfio_device_info, num_irqs);
1199
1200 if (copy_from_user(&info, (void __user *)arg, minsz))
1201 return -EFAULT;
1202
1203 if (info.argsz < minsz)
1204 return -EINVAL;
1205
1206 ret = mbochs_get_device_info(&info);
1207 if (ret)
1208 return ret;
1209
1210 if (copy_to_user((void __user *)arg, &info, minsz))
1211 return -EFAULT;
1212
1213 return 0;
1214 }
1215 case VFIO_DEVICE_GET_REGION_INFO:
1216 {
1217 struct vfio_region_info_ext info;
1218
1219 minsz = offsetofend(typeof(info), base.offset);
1220
1221 if (copy_from_user(&info, (void __user *)arg, minsz))
1222 return -EFAULT;
1223
1224 outsz = info.base.argsz;
1225 if (outsz < minsz)
1226 return -EINVAL;
1227 if (outsz > sizeof(info))
1228 return -EINVAL;
1229
1230 ret = mbochs_get_region_info(mdev_state, &info);
1231 if (ret)
1232 return ret;
1233
1234 if (copy_to_user((void __user *)arg, &info, outsz))
1235 return -EFAULT;
1236
1237 return 0;
1238 }
1239
1240 case VFIO_DEVICE_GET_IRQ_INFO:
1241 {
1242 struct vfio_irq_info info;
1243
1244 minsz = offsetofend(struct vfio_irq_info, count);
1245
1246 if (copy_from_user(&info, (void __user *)arg, minsz))
1247 return -EFAULT;
1248
1249 if ((info.argsz < minsz) ||
1250 (info.index >= VFIO_PCI_NUM_IRQS))
1251 return -EINVAL;
1252
1253 ret = mbochs_get_irq_info(&info);
1254 if (ret)
1255 return ret;
1256
1257 if (copy_to_user((void __user *)arg, &info, minsz))
1258 return -EFAULT;
1259
1260 return 0;
1261 }
1262
1263 case VFIO_DEVICE_QUERY_GFX_PLANE:
1264 {
1265 struct vfio_device_gfx_plane_info plane = {};
1266
1267 minsz = offsetofend(struct vfio_device_gfx_plane_info,
1268 region_index);
1269
1270 if (copy_from_user(&plane, (void __user *)arg, minsz))
1271 return -EFAULT;
1272
1273 if (plane.argsz < minsz)
1274 return -EINVAL;
1275
1276 ret = mbochs_query_gfx_plane(mdev_state, &plane);
1277 if (ret)
1278 return ret;
1279
1280 if (copy_to_user((void __user *)arg, &plane, minsz))
1281 return -EFAULT;
1282
1283 return 0;
1284 }
1285
1286 case VFIO_DEVICE_GET_GFX_DMABUF:
1287 {
1288 u32 dmabuf_id;
1289
1290 if (get_user(dmabuf_id, (__u32 __user *)arg))
1291 return -EFAULT;
1292
1293 return mbochs_get_gfx_dmabuf(mdev_state, dmabuf_id);
1294 }
1295
1296 case VFIO_DEVICE_SET_IRQS:
1297 return -EINVAL;
1298
1299 case VFIO_DEVICE_RESET:
1300 return mbochs_reset(mdev_state);
1301 }
1302 return -ENOTTY;
1303}
1304
1305static void mbochs_close_device(struct vfio_device *vdev)
1306{
1307 struct mdev_state *mdev_state =
1308 container_of(vdev, struct mdev_state, vdev);
1309 struct mbochs_dmabuf *dmabuf, *tmp;
1310
1311 mutex_lock(&mdev_state->ops_lock);
1312
1313 list_for_each_entry_safe(dmabuf, tmp, &mdev_state->dmabufs, next) {
1314 list_del(&dmabuf->next);
1315 if (dmabuf->buf) {
1316 /* free in mbochs_release_dmabuf() */
1317 dmabuf->unlinked = true;
1318 } else {
1319 kfree(dmabuf);
1320 }
1321 }
1322 mbochs_put_pages(mdev_state);
1323
1324 mutex_unlock(&mdev_state->ops_lock);
1325}
1326
1327static ssize_t
1328memory_show(struct device *dev, struct device_attribute *attr,
1329 char *buf)
1330{
1331 struct mdev_state *mdev_state = dev_get_drvdata(dev);
1332
1333 return sprintf(buf, "%d MB\n", mdev_state->type->mbytes);
1334}
1335static DEVICE_ATTR_RO(memory);
1336
1337static struct attribute *mdev_dev_attrs[] = {
1338 &dev_attr_memory.attr,
1339 NULL,
1340};
1341
1342static const struct attribute_group mdev_dev_group = {
1343 .name = "vendor",
1344 .attrs = mdev_dev_attrs,
1345};
1346
1347static const struct attribute_group *mdev_dev_groups[] = {
1348 &mdev_dev_group,
1349 NULL,
1350};
1351
1352static ssize_t mbochs_show_description(struct mdev_type *mtype, char *buf)
1353{
1354 struct mbochs_type *type =
1355 container_of(mtype, struct mbochs_type, type);
1356
1357 return sprintf(buf, "virtual display, %d MB video memory\n",
1358 type ? type->mbytes : 0);
1359}
1360
1361static unsigned int mbochs_get_available(struct mdev_type *mtype)
1362{
1363 struct mbochs_type *type =
1364 container_of(mtype, struct mbochs_type, type);
1365
1366 return atomic_read(&mbochs_avail_mbytes) / type->mbytes;
1367}
1368
1369static const struct vfio_device_ops mbochs_dev_ops = {
1370 .close_device = mbochs_close_device,
1371 .init = mbochs_init_dev,
1372 .release = mbochs_release_dev,
1373 .read = mbochs_read,
1374 .write = mbochs_write,
1375 .ioctl = mbochs_ioctl,
1376 .mmap = mbochs_mmap,
1377 .bind_iommufd = vfio_iommufd_emulated_bind,
1378 .unbind_iommufd = vfio_iommufd_emulated_unbind,
1379 .attach_ioas = vfio_iommufd_emulated_attach_ioas,
1380 .detach_ioas = vfio_iommufd_emulated_detach_ioas,
1381};
1382
1383static struct mdev_driver mbochs_driver = {
1384 .device_api = VFIO_DEVICE_API_PCI_STRING,
1385 .driver = {
1386 .name = "mbochs",
1387 .owner = THIS_MODULE,
1388 .mod_name = KBUILD_MODNAME,
1389 .dev_groups = mdev_dev_groups,
1390 },
1391 .probe = mbochs_probe,
1392 .remove = mbochs_remove,
1393 .get_available = mbochs_get_available,
1394 .show_description = mbochs_show_description,
1395};
1396
1397static const struct file_operations vd_fops = {
1398 .owner = THIS_MODULE,
1399};
1400
1401static void mbochs_device_release(struct device *dev)
1402{
1403 /* nothing */
1404}
1405
1406static int __init mbochs_dev_init(void)
1407{
1408 int ret = 0;
1409
1410 atomic_set(&mbochs_avail_mbytes, max_mbytes);
1411
1412 ret = alloc_chrdev_region(&mbochs_devt, 0, MINORMASK + 1, MBOCHS_NAME);
1413 if (ret < 0) {
1414 pr_err("Error: failed to register mbochs_dev, err: %d\n", ret);
1415 return ret;
1416 }
1417 cdev_init(&mbochs_cdev, &vd_fops);
1418 cdev_add(&mbochs_cdev, mbochs_devt, MINORMASK + 1);
1419 pr_info("%s: major %d\n", __func__, MAJOR(mbochs_devt));
1420
1421 ret = mdev_register_driver(&mbochs_driver);
1422 if (ret)
1423 goto err_cdev;
1424
1425 mbochs_class = class_create(MBOCHS_CLASS_NAME);
1426 if (IS_ERR(mbochs_class)) {
1427 pr_err("Error: failed to register mbochs_dev class\n");
1428 ret = PTR_ERR(mbochs_class);
1429 goto err_driver;
1430 }
1431 mbochs_dev.class = mbochs_class;
1432 mbochs_dev.release = mbochs_device_release;
1433 dev_set_name(&mbochs_dev, "%s", MBOCHS_NAME);
1434
1435 ret = device_register(&mbochs_dev);
1436 if (ret)
1437 goto err_put;
1438
1439 ret = mdev_register_parent(&mbochs_parent, &mbochs_dev, &mbochs_driver,
1440 mbochs_mdev_types,
1441 ARRAY_SIZE(mbochs_mdev_types));
1442 if (ret)
1443 goto err_device;
1444
1445 return 0;
1446
1447err_device:
1448 device_del(&mbochs_dev);
1449err_put:
1450 put_device(&mbochs_dev);
1451 class_destroy(mbochs_class);
1452err_driver:
1453 mdev_unregister_driver(&mbochs_driver);
1454err_cdev:
1455 cdev_del(&mbochs_cdev);
1456 unregister_chrdev_region(mbochs_devt, MINORMASK + 1);
1457 return ret;
1458}
1459
1460static void __exit mbochs_dev_exit(void)
1461{
1462 mbochs_dev.bus = NULL;
1463 mdev_unregister_parent(&mbochs_parent);
1464
1465 device_unregister(&mbochs_dev);
1466 mdev_unregister_driver(&mbochs_driver);
1467 cdev_del(&mbochs_cdev);
1468 unregister_chrdev_region(mbochs_devt, MINORMASK + 1);
1469 class_destroy(mbochs_class);
1470 mbochs_class = NULL;
1471}
1472
1473MODULE_IMPORT_NS(DMA_BUF);
1474module_init(mbochs_dev_init)
1475module_exit(mbochs_dev_exit)
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Mediated virtual PCI display host device driver
4 *
5 * Emulate enough of qemu stdvga to make bochs-drm.ko happy. That is
6 * basically the vram memory bar and the bochs dispi interface vbe
7 * registers in the mmio register bar. Specifically it does *not*
8 * include any legacy vga stuff. Device looks a lot like "qemu -device
9 * secondary-vga".
10 *
11 * (c) Gerd Hoffmann <kraxel@redhat.com>
12 *
13 * based on mtty driver which is:
14 * Copyright (c) 2016, NVIDIA CORPORATION. All rights reserved.
15 * Author: Neo Jia <cjia@nvidia.com>
16 * Kirti Wankhede <kwankhede@nvidia.com>
17 *
18 * This program is free software; you can redistribute it and/or modify
19 * it under the terms of the GNU General Public License version 2 as
20 * published by the Free Software Foundation.
21 */
22#include <linux/init.h>
23#include <linux/module.h>
24#include <linux/device.h>
25#include <linux/kernel.h>
26#include <linux/slab.h>
27#include <linux/vmalloc.h>
28#include <linux/cdev.h>
29#include <linux/vfio.h>
30#include <linux/iommu.h>
31#include <linux/sysfs.h>
32#include <linux/mdev.h>
33#include <linux/pci.h>
34#include <linux/dma-buf.h>
35#include <linux/highmem.h>
36#include <drm/drm_fourcc.h>
37#include <drm/drm_rect.h>
38#include <drm/drm_modeset_lock.h>
39#include <drm/drm_property.h>
40#include <drm/drm_plane.h>
41
42
43#define VBE_DISPI_INDEX_ID 0x0
44#define VBE_DISPI_INDEX_XRES 0x1
45#define VBE_DISPI_INDEX_YRES 0x2
46#define VBE_DISPI_INDEX_BPP 0x3
47#define VBE_DISPI_INDEX_ENABLE 0x4
48#define VBE_DISPI_INDEX_BANK 0x5
49#define VBE_DISPI_INDEX_VIRT_WIDTH 0x6
50#define VBE_DISPI_INDEX_VIRT_HEIGHT 0x7
51#define VBE_DISPI_INDEX_X_OFFSET 0x8
52#define VBE_DISPI_INDEX_Y_OFFSET 0x9
53#define VBE_DISPI_INDEX_VIDEO_MEMORY_64K 0xa
54#define VBE_DISPI_INDEX_COUNT 0xb
55
56#define VBE_DISPI_ID0 0xB0C0
57#define VBE_DISPI_ID1 0xB0C1
58#define VBE_DISPI_ID2 0xB0C2
59#define VBE_DISPI_ID3 0xB0C3
60#define VBE_DISPI_ID4 0xB0C4
61#define VBE_DISPI_ID5 0xB0C5
62
63#define VBE_DISPI_DISABLED 0x00
64#define VBE_DISPI_ENABLED 0x01
65#define VBE_DISPI_GETCAPS 0x02
66#define VBE_DISPI_8BIT_DAC 0x20
67#define VBE_DISPI_LFB_ENABLED 0x40
68#define VBE_DISPI_NOCLEARMEM 0x80
69
70
71#define MBOCHS_NAME "mbochs"
72#define MBOCHS_CLASS_NAME "mbochs"
73
74#define MBOCHS_EDID_REGION_INDEX VFIO_PCI_NUM_REGIONS
75#define MBOCHS_NUM_REGIONS (MBOCHS_EDID_REGION_INDEX+1)
76
77#define MBOCHS_CONFIG_SPACE_SIZE 0xff
78#define MBOCHS_MMIO_BAR_OFFSET PAGE_SIZE
79#define MBOCHS_MMIO_BAR_SIZE PAGE_SIZE
80#define MBOCHS_EDID_OFFSET (MBOCHS_MMIO_BAR_OFFSET + \
81 MBOCHS_MMIO_BAR_SIZE)
82#define MBOCHS_EDID_SIZE PAGE_SIZE
83#define MBOCHS_MEMORY_BAR_OFFSET (MBOCHS_EDID_OFFSET + \
84 MBOCHS_EDID_SIZE)
85
86#define MBOCHS_EDID_BLOB_OFFSET (MBOCHS_EDID_SIZE/2)
87
88#define STORE_LE16(addr, val) (*(u16 *)addr = val)
89#define STORE_LE32(addr, val) (*(u32 *)addr = val)
90
91
92MODULE_LICENSE("GPL v2");
93
94static int max_mbytes = 256;
95module_param_named(count, max_mbytes, int, 0444);
96MODULE_PARM_DESC(mem, "megabytes available to " MBOCHS_NAME " devices");
97
98
99#define MBOCHS_TYPE_1 "small"
100#define MBOCHS_TYPE_2 "medium"
101#define MBOCHS_TYPE_3 "large"
102
103static const struct mbochs_type {
104 const char *name;
105 u32 mbytes;
106 u32 max_x;
107 u32 max_y;
108} mbochs_types[] = {
109 {
110 .name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_1,
111 .mbytes = 4,
112 .max_x = 800,
113 .max_y = 600,
114 }, {
115 .name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_2,
116 .mbytes = 16,
117 .max_x = 1920,
118 .max_y = 1440,
119 }, {
120 .name = MBOCHS_CLASS_NAME "-" MBOCHS_TYPE_3,
121 .mbytes = 64,
122 .max_x = 0,
123 .max_y = 0,
124 },
125};
126
127
128static dev_t mbochs_devt;
129static struct class *mbochs_class;
130static struct cdev mbochs_cdev;
131static struct device mbochs_dev;
132static atomic_t mbochs_avail_mbytes;
133static const struct vfio_device_ops mbochs_dev_ops;
134
135struct vfio_region_info_ext {
136 struct vfio_region_info base;
137 struct vfio_region_info_cap_type type;
138};
139
140struct mbochs_mode {
141 u32 drm_format;
142 u32 bytepp;
143 u32 width;
144 u32 height;
145 u32 stride;
146 u32 __pad;
147 u64 offset;
148 u64 size;
149};
150
151struct mbochs_dmabuf {
152 struct mbochs_mode mode;
153 u32 id;
154 struct page **pages;
155 pgoff_t pagecount;
156 struct dma_buf *buf;
157 struct mdev_state *mdev_state;
158 struct list_head next;
159 bool unlinked;
160};
161
162/* State of each mdev device */
163struct mdev_state {
164 struct vfio_device vdev;
165 u8 *vconfig;
166 u64 bar_mask[3];
167 u32 memory_bar_mask;
168 struct mutex ops_lock;
169 struct mdev_device *mdev;
170
171 const struct mbochs_type *type;
172 u16 vbe[VBE_DISPI_INDEX_COUNT];
173 u64 memsize;
174 struct page **pages;
175 pgoff_t pagecount;
176 struct vfio_region_gfx_edid edid_regs;
177 u8 edid_blob[0x400];
178
179 struct list_head dmabufs;
180 u32 active_id;
181 u32 next_id;
182};
183
184static const char *vbe_name_list[VBE_DISPI_INDEX_COUNT] = {
185 [VBE_DISPI_INDEX_ID] = "id",
186 [VBE_DISPI_INDEX_XRES] = "xres",
187 [VBE_DISPI_INDEX_YRES] = "yres",
188 [VBE_DISPI_INDEX_BPP] = "bpp",
189 [VBE_DISPI_INDEX_ENABLE] = "enable",
190 [VBE_DISPI_INDEX_BANK] = "bank",
191 [VBE_DISPI_INDEX_VIRT_WIDTH] = "virt-width",
192 [VBE_DISPI_INDEX_VIRT_HEIGHT] = "virt-height",
193 [VBE_DISPI_INDEX_X_OFFSET] = "x-offset",
194 [VBE_DISPI_INDEX_Y_OFFSET] = "y-offset",
195 [VBE_DISPI_INDEX_VIDEO_MEMORY_64K] = "video-mem",
196};
197
198static const char *vbe_name(u32 index)
199{
200 if (index < ARRAY_SIZE(vbe_name_list))
201 return vbe_name_list[index];
202 return "(invalid)";
203}
204
205static struct page *__mbochs_get_page(struct mdev_state *mdev_state,
206 pgoff_t pgoff);
207static struct page *mbochs_get_page(struct mdev_state *mdev_state,
208 pgoff_t pgoff);
209
210static void mbochs_create_config_space(struct mdev_state *mdev_state)
211{
212 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_VENDOR_ID],
213 0x1234);
214 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_DEVICE_ID],
215 0x1111);
216 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_SUBSYSTEM_VENDOR_ID],
217 PCI_SUBVENDOR_ID_REDHAT_QUMRANET);
218 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_SUBSYSTEM_ID],
219 PCI_SUBDEVICE_ID_QEMU);
220
221 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_COMMAND],
222 PCI_COMMAND_IO | PCI_COMMAND_MEMORY);
223 STORE_LE16((u16 *) &mdev_state->vconfig[PCI_CLASS_DEVICE],
224 PCI_CLASS_DISPLAY_OTHER);
225 mdev_state->vconfig[PCI_CLASS_REVISION] = 0x01;
226
227 STORE_LE32((u32 *) &mdev_state->vconfig[PCI_BASE_ADDRESS_0],
228 PCI_BASE_ADDRESS_SPACE_MEMORY |
229 PCI_BASE_ADDRESS_MEM_TYPE_32 |
230 PCI_BASE_ADDRESS_MEM_PREFETCH);
231 mdev_state->bar_mask[0] = ~(mdev_state->memsize) + 1;
232
233 STORE_LE32((u32 *) &mdev_state->vconfig[PCI_BASE_ADDRESS_2],
234 PCI_BASE_ADDRESS_SPACE_MEMORY |
235 PCI_BASE_ADDRESS_MEM_TYPE_32);
236 mdev_state->bar_mask[2] = ~(MBOCHS_MMIO_BAR_SIZE) + 1;
237}
238
239static int mbochs_check_framebuffer(struct mdev_state *mdev_state,
240 struct mbochs_mode *mode)
241{
242 struct device *dev = mdev_dev(mdev_state->mdev);
243 u16 *vbe = mdev_state->vbe;
244 u32 virt_width;
245
246 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
247
248 if (!(vbe[VBE_DISPI_INDEX_ENABLE] & VBE_DISPI_ENABLED))
249 goto nofb;
250
251 memset(mode, 0, sizeof(*mode));
252 switch (vbe[VBE_DISPI_INDEX_BPP]) {
253 case 32:
254 mode->drm_format = DRM_FORMAT_XRGB8888;
255 mode->bytepp = 4;
256 break;
257 default:
258 dev_info_ratelimited(dev, "%s: bpp %d not supported\n",
259 __func__, vbe[VBE_DISPI_INDEX_BPP]);
260 goto nofb;
261 }
262
263 mode->width = vbe[VBE_DISPI_INDEX_XRES];
264 mode->height = vbe[VBE_DISPI_INDEX_YRES];
265 virt_width = vbe[VBE_DISPI_INDEX_VIRT_WIDTH];
266 if (virt_width < mode->width)
267 virt_width = mode->width;
268 mode->stride = virt_width * mode->bytepp;
269 mode->size = (u64)mode->stride * mode->height;
270 mode->offset = ((u64)vbe[VBE_DISPI_INDEX_X_OFFSET] * mode->bytepp +
271 (u64)vbe[VBE_DISPI_INDEX_Y_OFFSET] * mode->stride);
272
273 if (mode->width < 64 || mode->height < 64) {
274 dev_info_ratelimited(dev, "%s: invalid resolution %dx%d\n",
275 __func__, mode->width, mode->height);
276 goto nofb;
277 }
278 if (mode->offset + mode->size > mdev_state->memsize) {
279 dev_info_ratelimited(dev, "%s: framebuffer memory overflow\n",
280 __func__);
281 goto nofb;
282 }
283
284 return 0;
285
286nofb:
287 memset(mode, 0, sizeof(*mode));
288 return -EINVAL;
289}
290
291static bool mbochs_modes_equal(struct mbochs_mode *mode1,
292 struct mbochs_mode *mode2)
293{
294 return memcmp(mode1, mode2, sizeof(struct mbochs_mode)) == 0;
295}
296
297static void handle_pci_cfg_write(struct mdev_state *mdev_state, u16 offset,
298 char *buf, u32 count)
299{
300 struct device *dev = mdev_dev(mdev_state->mdev);
301 int index = (offset - PCI_BASE_ADDRESS_0) / 0x04;
302 u32 cfg_addr;
303
304 switch (offset) {
305 case PCI_BASE_ADDRESS_0:
306 case PCI_BASE_ADDRESS_2:
307 cfg_addr = *(u32 *)buf;
308
309 if (cfg_addr == 0xffffffff) {
310 cfg_addr = (cfg_addr & mdev_state->bar_mask[index]);
311 } else {
312 cfg_addr &= PCI_BASE_ADDRESS_MEM_MASK;
313 if (cfg_addr)
314 dev_info(dev, "BAR #%d @ 0x%x\n",
315 index, cfg_addr);
316 }
317
318 cfg_addr |= (mdev_state->vconfig[offset] &
319 ~PCI_BASE_ADDRESS_MEM_MASK);
320 STORE_LE32(&mdev_state->vconfig[offset], cfg_addr);
321 break;
322 }
323}
324
325static void handle_mmio_write(struct mdev_state *mdev_state, u16 offset,
326 char *buf, u32 count)
327{
328 struct device *dev = mdev_dev(mdev_state->mdev);
329 int index;
330 u16 reg16;
331
332 switch (offset) {
333 case 0x400 ... 0x41f: /* vga ioports remapped */
334 goto unhandled;
335 case 0x500 ... 0x515: /* bochs dispi interface */
336 if (count != 2)
337 goto unhandled;
338 index = (offset - 0x500) / 2;
339 reg16 = *(u16 *)buf;
340 if (index < ARRAY_SIZE(mdev_state->vbe))
341 mdev_state->vbe[index] = reg16;
342 dev_dbg(dev, "%s: vbe write %d = %d (%s)\n",
343 __func__, index, reg16, vbe_name(index));
344 break;
345 case 0x600 ... 0x607: /* qemu extended regs */
346 goto unhandled;
347 default:
348unhandled:
349 dev_dbg(dev, "%s: @0x%03x, count %d (unhandled)\n",
350 __func__, offset, count);
351 break;
352 }
353}
354
355static void handle_mmio_read(struct mdev_state *mdev_state, u16 offset,
356 char *buf, u32 count)
357{
358 struct device *dev = mdev_dev(mdev_state->mdev);
359 struct vfio_region_gfx_edid *edid;
360 u16 reg16 = 0;
361 int index;
362
363 switch (offset) {
364 case 0x000 ... 0x3ff: /* edid block */
365 edid = &mdev_state->edid_regs;
366 if (edid->link_state != VFIO_DEVICE_GFX_LINK_STATE_UP ||
367 offset >= edid->edid_size) {
368 memset(buf, 0, count);
369 break;
370 }
371 memcpy(buf, mdev_state->edid_blob + offset, count);
372 break;
373 case 0x500 ... 0x515: /* bochs dispi interface */
374 if (count != 2)
375 goto unhandled;
376 index = (offset - 0x500) / 2;
377 if (index < ARRAY_SIZE(mdev_state->vbe))
378 reg16 = mdev_state->vbe[index];
379 dev_dbg(dev, "%s: vbe read %d = %d (%s)\n",
380 __func__, index, reg16, vbe_name(index));
381 *(u16 *)buf = reg16;
382 break;
383 default:
384unhandled:
385 dev_dbg(dev, "%s: @0x%03x, count %d (unhandled)\n",
386 __func__, offset, count);
387 memset(buf, 0, count);
388 break;
389 }
390}
391
392static void handle_edid_regs(struct mdev_state *mdev_state, u16 offset,
393 char *buf, u32 count, bool is_write)
394{
395 char *regs = (void *)&mdev_state->edid_regs;
396
397 if (offset + count > sizeof(mdev_state->edid_regs))
398 return;
399 if (count != 4)
400 return;
401 if (offset % 4)
402 return;
403
404 if (is_write) {
405 switch (offset) {
406 case offsetof(struct vfio_region_gfx_edid, link_state):
407 case offsetof(struct vfio_region_gfx_edid, edid_size):
408 memcpy(regs + offset, buf, count);
409 break;
410 default:
411 /* read-only regs */
412 break;
413 }
414 } else {
415 memcpy(buf, regs + offset, count);
416 }
417}
418
419static void handle_edid_blob(struct mdev_state *mdev_state, u16 offset,
420 char *buf, u32 count, bool is_write)
421{
422 if (offset + count > mdev_state->edid_regs.edid_max_size)
423 return;
424 if (is_write)
425 memcpy(mdev_state->edid_blob + offset, buf, count);
426 else
427 memcpy(buf, mdev_state->edid_blob + offset, count);
428}
429
430static ssize_t mdev_access(struct mdev_state *mdev_state, char *buf,
431 size_t count, loff_t pos, bool is_write)
432{
433 struct page *pg;
434 loff_t poff;
435 char *map;
436 int ret = 0;
437
438 mutex_lock(&mdev_state->ops_lock);
439
440 if (pos < MBOCHS_CONFIG_SPACE_SIZE) {
441 if (is_write)
442 handle_pci_cfg_write(mdev_state, pos, buf, count);
443 else
444 memcpy(buf, (mdev_state->vconfig + pos), count);
445
446 } else if (pos >= MBOCHS_MMIO_BAR_OFFSET &&
447 pos + count <= (MBOCHS_MMIO_BAR_OFFSET +
448 MBOCHS_MMIO_BAR_SIZE)) {
449 pos -= MBOCHS_MMIO_BAR_OFFSET;
450 if (is_write)
451 handle_mmio_write(mdev_state, pos, buf, count);
452 else
453 handle_mmio_read(mdev_state, pos, buf, count);
454
455 } else if (pos >= MBOCHS_EDID_OFFSET &&
456 pos + count <= (MBOCHS_EDID_OFFSET +
457 MBOCHS_EDID_SIZE)) {
458 pos -= MBOCHS_EDID_OFFSET;
459 if (pos < MBOCHS_EDID_BLOB_OFFSET) {
460 handle_edid_regs(mdev_state, pos, buf, count, is_write);
461 } else {
462 pos -= MBOCHS_EDID_BLOB_OFFSET;
463 handle_edid_blob(mdev_state, pos, buf, count, is_write);
464 }
465
466 } else if (pos >= MBOCHS_MEMORY_BAR_OFFSET &&
467 pos + count <=
468 MBOCHS_MEMORY_BAR_OFFSET + mdev_state->memsize) {
469 pos -= MBOCHS_MMIO_BAR_OFFSET;
470 poff = pos & ~PAGE_MASK;
471 pg = __mbochs_get_page(mdev_state, pos >> PAGE_SHIFT);
472 map = kmap(pg);
473 if (is_write)
474 memcpy(map + poff, buf, count);
475 else
476 memcpy(buf, map + poff, count);
477 kunmap(pg);
478 put_page(pg);
479
480 } else {
481 dev_dbg(mdev_state->vdev.dev, "%s: %s @0x%llx (unhandled)\n",
482 __func__, is_write ? "WR" : "RD", pos);
483 ret = -1;
484 goto accessfailed;
485 }
486
487 ret = count;
488
489
490accessfailed:
491 mutex_unlock(&mdev_state->ops_lock);
492
493 return ret;
494}
495
496static int mbochs_reset(struct mdev_state *mdev_state)
497{
498 u32 size64k = mdev_state->memsize / (64 * 1024);
499 int i;
500
501 for (i = 0; i < ARRAY_SIZE(mdev_state->vbe); i++)
502 mdev_state->vbe[i] = 0;
503 mdev_state->vbe[VBE_DISPI_INDEX_ID] = VBE_DISPI_ID5;
504 mdev_state->vbe[VBE_DISPI_INDEX_VIDEO_MEMORY_64K] = size64k;
505 return 0;
506}
507
508static int mbochs_probe(struct mdev_device *mdev)
509{
510 int avail_mbytes = atomic_read(&mbochs_avail_mbytes);
511 const struct mbochs_type *type =
512 &mbochs_types[mdev_get_type_group_id(mdev)];
513 struct device *dev = mdev_dev(mdev);
514 struct mdev_state *mdev_state;
515 int ret = -ENOMEM;
516
517 do {
518 if (avail_mbytes < type->mbytes)
519 return -ENOSPC;
520 } while (!atomic_try_cmpxchg(&mbochs_avail_mbytes, &avail_mbytes,
521 avail_mbytes - type->mbytes));
522
523 mdev_state = kzalloc(sizeof(struct mdev_state), GFP_KERNEL);
524 if (mdev_state == NULL)
525 goto err_avail;
526 vfio_init_group_dev(&mdev_state->vdev, &mdev->dev, &mbochs_dev_ops);
527
528 mdev_state->vconfig = kzalloc(MBOCHS_CONFIG_SPACE_SIZE, GFP_KERNEL);
529 if (mdev_state->vconfig == NULL)
530 goto err_mem;
531
532 mdev_state->memsize = type->mbytes * 1024 * 1024;
533 mdev_state->pagecount = mdev_state->memsize >> PAGE_SHIFT;
534 mdev_state->pages = kcalloc(mdev_state->pagecount,
535 sizeof(struct page *),
536 GFP_KERNEL);
537 if (!mdev_state->pages)
538 goto err_mem;
539
540 dev_info(dev, "%s: %s, %d MB, %ld pages\n", __func__,
541 type->name, type->mbytes, mdev_state->pagecount);
542
543 mutex_init(&mdev_state->ops_lock);
544 mdev_state->mdev = mdev;
545 INIT_LIST_HEAD(&mdev_state->dmabufs);
546 mdev_state->next_id = 1;
547
548 mdev_state->type = type;
549 mdev_state->edid_regs.max_xres = type->max_x;
550 mdev_state->edid_regs.max_yres = type->max_y;
551 mdev_state->edid_regs.edid_offset = MBOCHS_EDID_BLOB_OFFSET;
552 mdev_state->edid_regs.edid_max_size = sizeof(mdev_state->edid_blob);
553 mbochs_create_config_space(mdev_state);
554 mbochs_reset(mdev_state);
555
556 ret = vfio_register_group_dev(&mdev_state->vdev);
557 if (ret)
558 goto err_mem;
559 dev_set_drvdata(&mdev->dev, mdev_state);
560 return 0;
561err_mem:
562 kfree(mdev_state->pages);
563 kfree(mdev_state->vconfig);
564 kfree(mdev_state);
565err_avail:
566 atomic_add(type->mbytes, &mbochs_avail_mbytes);
567 return ret;
568}
569
570static void mbochs_remove(struct mdev_device *mdev)
571{
572 struct mdev_state *mdev_state = dev_get_drvdata(&mdev->dev);
573
574 vfio_unregister_group_dev(&mdev_state->vdev);
575 atomic_add(mdev_state->type->mbytes, &mbochs_avail_mbytes);
576 kfree(mdev_state->pages);
577 kfree(mdev_state->vconfig);
578 kfree(mdev_state);
579}
580
581static ssize_t mbochs_read(struct vfio_device *vdev, char __user *buf,
582 size_t count, loff_t *ppos)
583{
584 struct mdev_state *mdev_state =
585 container_of(vdev, struct mdev_state, vdev);
586 unsigned int done = 0;
587 int ret;
588
589 while (count) {
590 size_t filled;
591
592 if (count >= 4 && !(*ppos % 4)) {
593 u32 val;
594
595 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
596 *ppos, false);
597 if (ret <= 0)
598 goto read_err;
599
600 if (copy_to_user(buf, &val, sizeof(val)))
601 goto read_err;
602
603 filled = 4;
604 } else if (count >= 2 && !(*ppos % 2)) {
605 u16 val;
606
607 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
608 *ppos, false);
609 if (ret <= 0)
610 goto read_err;
611
612 if (copy_to_user(buf, &val, sizeof(val)))
613 goto read_err;
614
615 filled = 2;
616 } else {
617 u8 val;
618
619 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
620 *ppos, false);
621 if (ret <= 0)
622 goto read_err;
623
624 if (copy_to_user(buf, &val, sizeof(val)))
625 goto read_err;
626
627 filled = 1;
628 }
629
630 count -= filled;
631 done += filled;
632 *ppos += filled;
633 buf += filled;
634 }
635
636 return done;
637
638read_err:
639 return -EFAULT;
640}
641
642static ssize_t mbochs_write(struct vfio_device *vdev, const char __user *buf,
643 size_t count, loff_t *ppos)
644{
645 struct mdev_state *mdev_state =
646 container_of(vdev, struct mdev_state, vdev);
647 unsigned int done = 0;
648 int ret;
649
650 while (count) {
651 size_t filled;
652
653 if (count >= 4 && !(*ppos % 4)) {
654 u32 val;
655
656 if (copy_from_user(&val, buf, sizeof(val)))
657 goto write_err;
658
659 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
660 *ppos, true);
661 if (ret <= 0)
662 goto write_err;
663
664 filled = 4;
665 } else if (count >= 2 && !(*ppos % 2)) {
666 u16 val;
667
668 if (copy_from_user(&val, buf, sizeof(val)))
669 goto write_err;
670
671 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
672 *ppos, true);
673 if (ret <= 0)
674 goto write_err;
675
676 filled = 2;
677 } else {
678 u8 val;
679
680 if (copy_from_user(&val, buf, sizeof(val)))
681 goto write_err;
682
683 ret = mdev_access(mdev_state, (char *)&val, sizeof(val),
684 *ppos, true);
685 if (ret <= 0)
686 goto write_err;
687
688 filled = 1;
689 }
690 count -= filled;
691 done += filled;
692 *ppos += filled;
693 buf += filled;
694 }
695
696 return done;
697write_err:
698 return -EFAULT;
699}
700
701static struct page *__mbochs_get_page(struct mdev_state *mdev_state,
702 pgoff_t pgoff)
703{
704 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
705
706 if (!mdev_state->pages[pgoff]) {
707 mdev_state->pages[pgoff] =
708 alloc_pages(GFP_HIGHUSER | __GFP_ZERO, 0);
709 if (!mdev_state->pages[pgoff])
710 return NULL;
711 }
712
713 get_page(mdev_state->pages[pgoff]);
714 return mdev_state->pages[pgoff];
715}
716
717static struct page *mbochs_get_page(struct mdev_state *mdev_state,
718 pgoff_t pgoff)
719{
720 struct page *page;
721
722 if (WARN_ON(pgoff >= mdev_state->pagecount))
723 return NULL;
724
725 mutex_lock(&mdev_state->ops_lock);
726 page = __mbochs_get_page(mdev_state, pgoff);
727 mutex_unlock(&mdev_state->ops_lock);
728
729 return page;
730}
731
732static void mbochs_put_pages(struct mdev_state *mdev_state)
733{
734 struct device *dev = mdev_dev(mdev_state->mdev);
735 int i, count = 0;
736
737 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
738
739 for (i = 0; i < mdev_state->pagecount; i++) {
740 if (!mdev_state->pages[i])
741 continue;
742 put_page(mdev_state->pages[i]);
743 mdev_state->pages[i] = NULL;
744 count++;
745 }
746 dev_dbg(dev, "%s: %d pages released\n", __func__, count);
747}
748
749static vm_fault_t mbochs_region_vm_fault(struct vm_fault *vmf)
750{
751 struct vm_area_struct *vma = vmf->vma;
752 struct mdev_state *mdev_state = vma->vm_private_data;
753 pgoff_t page_offset = (vmf->address - vma->vm_start) >> PAGE_SHIFT;
754
755 if (page_offset >= mdev_state->pagecount)
756 return VM_FAULT_SIGBUS;
757
758 vmf->page = mbochs_get_page(mdev_state, page_offset);
759 if (!vmf->page)
760 return VM_FAULT_SIGBUS;
761
762 return 0;
763}
764
765static const struct vm_operations_struct mbochs_region_vm_ops = {
766 .fault = mbochs_region_vm_fault,
767};
768
769static int mbochs_mmap(struct vfio_device *vdev, struct vm_area_struct *vma)
770{
771 struct mdev_state *mdev_state =
772 container_of(vdev, struct mdev_state, vdev);
773
774 if (vma->vm_pgoff != MBOCHS_MEMORY_BAR_OFFSET >> PAGE_SHIFT)
775 return -EINVAL;
776 if (vma->vm_end < vma->vm_start)
777 return -EINVAL;
778 if (vma->vm_end - vma->vm_start > mdev_state->memsize)
779 return -EINVAL;
780 if ((vma->vm_flags & VM_SHARED) == 0)
781 return -EINVAL;
782
783 vma->vm_ops = &mbochs_region_vm_ops;
784 vma->vm_private_data = mdev_state;
785 return 0;
786}
787
788static vm_fault_t mbochs_dmabuf_vm_fault(struct vm_fault *vmf)
789{
790 struct vm_area_struct *vma = vmf->vma;
791 struct mbochs_dmabuf *dmabuf = vma->vm_private_data;
792
793 if (WARN_ON(vmf->pgoff >= dmabuf->pagecount))
794 return VM_FAULT_SIGBUS;
795
796 vmf->page = dmabuf->pages[vmf->pgoff];
797 get_page(vmf->page);
798 return 0;
799}
800
801static const struct vm_operations_struct mbochs_dmabuf_vm_ops = {
802 .fault = mbochs_dmabuf_vm_fault,
803};
804
805static int mbochs_mmap_dmabuf(struct dma_buf *buf, struct vm_area_struct *vma)
806{
807 struct mbochs_dmabuf *dmabuf = buf->priv;
808 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
809
810 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
811
812 if ((vma->vm_flags & VM_SHARED) == 0)
813 return -EINVAL;
814
815 vma->vm_ops = &mbochs_dmabuf_vm_ops;
816 vma->vm_private_data = dmabuf;
817 return 0;
818}
819
820static void mbochs_print_dmabuf(struct mbochs_dmabuf *dmabuf,
821 const char *prefix)
822{
823 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
824 u32 fourcc = dmabuf->mode.drm_format;
825
826 dev_dbg(dev, "%s/%d: %c%c%c%c, %dx%d, stride %d, off 0x%llx, size 0x%llx, pages %ld\n",
827 prefix, dmabuf->id,
828 fourcc ? ((fourcc >> 0) & 0xff) : '-',
829 fourcc ? ((fourcc >> 8) & 0xff) : '-',
830 fourcc ? ((fourcc >> 16) & 0xff) : '-',
831 fourcc ? ((fourcc >> 24) & 0xff) : '-',
832 dmabuf->mode.width, dmabuf->mode.height, dmabuf->mode.stride,
833 dmabuf->mode.offset, dmabuf->mode.size, dmabuf->pagecount);
834}
835
836static struct sg_table *mbochs_map_dmabuf(struct dma_buf_attachment *at,
837 enum dma_data_direction direction)
838{
839 struct mbochs_dmabuf *dmabuf = at->dmabuf->priv;
840 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
841 struct sg_table *sg;
842
843 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
844
845 sg = kzalloc(sizeof(*sg), GFP_KERNEL);
846 if (!sg)
847 goto err1;
848 if (sg_alloc_table_from_pages(sg, dmabuf->pages, dmabuf->pagecount,
849 0, dmabuf->mode.size, GFP_KERNEL) < 0)
850 goto err2;
851 if (dma_map_sgtable(at->dev, sg, direction, 0))
852 goto err3;
853
854 return sg;
855
856err3:
857 sg_free_table(sg);
858err2:
859 kfree(sg);
860err1:
861 return ERR_PTR(-ENOMEM);
862}
863
864static void mbochs_unmap_dmabuf(struct dma_buf_attachment *at,
865 struct sg_table *sg,
866 enum dma_data_direction direction)
867{
868 struct mbochs_dmabuf *dmabuf = at->dmabuf->priv;
869 struct device *dev = mdev_dev(dmabuf->mdev_state->mdev);
870
871 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
872
873 dma_unmap_sgtable(at->dev, sg, direction, 0);
874 sg_free_table(sg);
875 kfree(sg);
876}
877
878static void mbochs_release_dmabuf(struct dma_buf *buf)
879{
880 struct mbochs_dmabuf *dmabuf = buf->priv;
881 struct mdev_state *mdev_state = dmabuf->mdev_state;
882 struct device *dev = mdev_dev(mdev_state->mdev);
883 pgoff_t pg;
884
885 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
886
887 for (pg = 0; pg < dmabuf->pagecount; pg++)
888 put_page(dmabuf->pages[pg]);
889
890 mutex_lock(&mdev_state->ops_lock);
891 dmabuf->buf = NULL;
892 if (dmabuf->unlinked)
893 kfree(dmabuf);
894 mutex_unlock(&mdev_state->ops_lock);
895}
896
897static struct dma_buf_ops mbochs_dmabuf_ops = {
898 .map_dma_buf = mbochs_map_dmabuf,
899 .unmap_dma_buf = mbochs_unmap_dmabuf,
900 .release = mbochs_release_dmabuf,
901 .mmap = mbochs_mmap_dmabuf,
902};
903
904static struct mbochs_dmabuf *mbochs_dmabuf_alloc(struct mdev_state *mdev_state,
905 struct mbochs_mode *mode)
906{
907 struct mbochs_dmabuf *dmabuf;
908 pgoff_t page_offset, pg;
909
910 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
911
912 dmabuf = kzalloc(sizeof(struct mbochs_dmabuf), GFP_KERNEL);
913 if (!dmabuf)
914 return NULL;
915
916 dmabuf->mode = *mode;
917 dmabuf->id = mdev_state->next_id++;
918 dmabuf->pagecount = DIV_ROUND_UP(mode->size, PAGE_SIZE);
919 dmabuf->pages = kcalloc(dmabuf->pagecount, sizeof(struct page *),
920 GFP_KERNEL);
921 if (!dmabuf->pages)
922 goto err_free_dmabuf;
923
924 page_offset = dmabuf->mode.offset >> PAGE_SHIFT;
925 for (pg = 0; pg < dmabuf->pagecount; pg++) {
926 dmabuf->pages[pg] = __mbochs_get_page(mdev_state,
927 page_offset + pg);
928 if (!dmabuf->pages[pg])
929 goto err_free_pages;
930 }
931
932 dmabuf->mdev_state = mdev_state;
933 list_add(&dmabuf->next, &mdev_state->dmabufs);
934
935 mbochs_print_dmabuf(dmabuf, __func__);
936 return dmabuf;
937
938err_free_pages:
939 while (pg > 0)
940 put_page(dmabuf->pages[--pg]);
941 kfree(dmabuf->pages);
942err_free_dmabuf:
943 kfree(dmabuf);
944 return NULL;
945}
946
947static struct mbochs_dmabuf *
948mbochs_dmabuf_find_by_mode(struct mdev_state *mdev_state,
949 struct mbochs_mode *mode)
950{
951 struct mbochs_dmabuf *dmabuf;
952
953 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
954
955 list_for_each_entry(dmabuf, &mdev_state->dmabufs, next)
956 if (mbochs_modes_equal(&dmabuf->mode, mode))
957 return dmabuf;
958
959 return NULL;
960}
961
962static struct mbochs_dmabuf *
963mbochs_dmabuf_find_by_id(struct mdev_state *mdev_state, u32 id)
964{
965 struct mbochs_dmabuf *dmabuf;
966
967 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
968
969 list_for_each_entry(dmabuf, &mdev_state->dmabufs, next)
970 if (dmabuf->id == id)
971 return dmabuf;
972
973 return NULL;
974}
975
976static int mbochs_dmabuf_export(struct mbochs_dmabuf *dmabuf)
977{
978 struct mdev_state *mdev_state = dmabuf->mdev_state;
979 struct device *dev = mdev_state->vdev.dev;
980 DEFINE_DMA_BUF_EXPORT_INFO(exp_info);
981 struct dma_buf *buf;
982
983 WARN_ON(!mutex_is_locked(&mdev_state->ops_lock));
984
985 if (!IS_ALIGNED(dmabuf->mode.offset, PAGE_SIZE)) {
986 dev_info_ratelimited(dev, "%s: framebuffer not page-aligned\n",
987 __func__);
988 return -EINVAL;
989 }
990
991 exp_info.ops = &mbochs_dmabuf_ops;
992 exp_info.size = dmabuf->mode.size;
993 exp_info.priv = dmabuf;
994
995 buf = dma_buf_export(&exp_info);
996 if (IS_ERR(buf)) {
997 dev_info_ratelimited(dev, "%s: dma_buf_export failed: %ld\n",
998 __func__, PTR_ERR(buf));
999 return PTR_ERR(buf);
1000 }
1001
1002 dmabuf->buf = buf;
1003 dev_dbg(dev, "%s: %d\n", __func__, dmabuf->id);
1004 return 0;
1005}
1006
1007static int mbochs_get_region_info(struct mdev_state *mdev_state,
1008 struct vfio_region_info_ext *ext)
1009{
1010 struct vfio_region_info *region_info = &ext->base;
1011
1012 if (region_info->index >= MBOCHS_NUM_REGIONS)
1013 return -EINVAL;
1014
1015 switch (region_info->index) {
1016 case VFIO_PCI_CONFIG_REGION_INDEX:
1017 region_info->offset = 0;
1018 region_info->size = MBOCHS_CONFIG_SPACE_SIZE;
1019 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1020 VFIO_REGION_INFO_FLAG_WRITE);
1021 break;
1022 case VFIO_PCI_BAR0_REGION_INDEX:
1023 region_info->offset = MBOCHS_MEMORY_BAR_OFFSET;
1024 region_info->size = mdev_state->memsize;
1025 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1026 VFIO_REGION_INFO_FLAG_WRITE |
1027 VFIO_REGION_INFO_FLAG_MMAP);
1028 break;
1029 case VFIO_PCI_BAR2_REGION_INDEX:
1030 region_info->offset = MBOCHS_MMIO_BAR_OFFSET;
1031 region_info->size = MBOCHS_MMIO_BAR_SIZE;
1032 region_info->flags = (VFIO_REGION_INFO_FLAG_READ |
1033 VFIO_REGION_INFO_FLAG_WRITE);
1034 break;
1035 case MBOCHS_EDID_REGION_INDEX:
1036 ext->base.argsz = sizeof(*ext);
1037 ext->base.offset = MBOCHS_EDID_OFFSET;
1038 ext->base.size = MBOCHS_EDID_SIZE;
1039 ext->base.flags = (VFIO_REGION_INFO_FLAG_READ |
1040 VFIO_REGION_INFO_FLAG_WRITE |
1041 VFIO_REGION_INFO_FLAG_CAPS);
1042 ext->base.cap_offset = offsetof(typeof(*ext), type);
1043 ext->type.header.id = VFIO_REGION_INFO_CAP_TYPE;
1044 ext->type.header.version = 1;
1045 ext->type.header.next = 0;
1046 ext->type.type = VFIO_REGION_TYPE_GFX;
1047 ext->type.subtype = VFIO_REGION_SUBTYPE_GFX_EDID;
1048 break;
1049 default:
1050 region_info->size = 0;
1051 region_info->offset = 0;
1052 region_info->flags = 0;
1053 }
1054
1055 return 0;
1056}
1057
1058static int mbochs_get_irq_info(struct vfio_irq_info *irq_info)
1059{
1060 irq_info->count = 0;
1061 return 0;
1062}
1063
1064static int mbochs_get_device_info(struct vfio_device_info *dev_info)
1065{
1066 dev_info->flags = VFIO_DEVICE_FLAGS_PCI;
1067 dev_info->num_regions = MBOCHS_NUM_REGIONS;
1068 dev_info->num_irqs = VFIO_PCI_NUM_IRQS;
1069 return 0;
1070}
1071
1072static int mbochs_query_gfx_plane(struct mdev_state *mdev_state,
1073 struct vfio_device_gfx_plane_info *plane)
1074{
1075 struct mbochs_dmabuf *dmabuf;
1076 struct mbochs_mode mode;
1077 int ret;
1078
1079 if (plane->flags & VFIO_GFX_PLANE_TYPE_PROBE) {
1080 if (plane->flags == (VFIO_GFX_PLANE_TYPE_PROBE |
1081 VFIO_GFX_PLANE_TYPE_DMABUF))
1082 return 0;
1083 return -EINVAL;
1084 }
1085
1086 if (plane->flags != VFIO_GFX_PLANE_TYPE_DMABUF)
1087 return -EINVAL;
1088
1089 plane->drm_format_mod = 0;
1090 plane->x_pos = 0;
1091 plane->y_pos = 0;
1092 plane->x_hot = 0;
1093 plane->y_hot = 0;
1094
1095 mutex_lock(&mdev_state->ops_lock);
1096
1097 ret = -EINVAL;
1098 if (plane->drm_plane_type == DRM_PLANE_TYPE_PRIMARY)
1099 ret = mbochs_check_framebuffer(mdev_state, &mode);
1100 if (ret < 0) {
1101 plane->drm_format = 0;
1102 plane->width = 0;
1103 plane->height = 0;
1104 plane->stride = 0;
1105 plane->size = 0;
1106 plane->dmabuf_id = 0;
1107 goto done;
1108 }
1109
1110 dmabuf = mbochs_dmabuf_find_by_mode(mdev_state, &mode);
1111 if (!dmabuf)
1112 mbochs_dmabuf_alloc(mdev_state, &mode);
1113 if (!dmabuf) {
1114 mutex_unlock(&mdev_state->ops_lock);
1115 return -ENOMEM;
1116 }
1117
1118 plane->drm_format = dmabuf->mode.drm_format;
1119 plane->width = dmabuf->mode.width;
1120 plane->height = dmabuf->mode.height;
1121 plane->stride = dmabuf->mode.stride;
1122 plane->size = dmabuf->mode.size;
1123 plane->dmabuf_id = dmabuf->id;
1124
1125done:
1126 if (plane->drm_plane_type == DRM_PLANE_TYPE_PRIMARY &&
1127 mdev_state->active_id != plane->dmabuf_id) {
1128 dev_dbg(mdev_state->vdev.dev, "%s: primary: %d => %d\n",
1129 __func__, mdev_state->active_id, plane->dmabuf_id);
1130 mdev_state->active_id = plane->dmabuf_id;
1131 }
1132 mutex_unlock(&mdev_state->ops_lock);
1133 return 0;
1134}
1135
1136static int mbochs_get_gfx_dmabuf(struct mdev_state *mdev_state, u32 id)
1137{
1138 struct mbochs_dmabuf *dmabuf;
1139
1140 mutex_lock(&mdev_state->ops_lock);
1141
1142 dmabuf = mbochs_dmabuf_find_by_id(mdev_state, id);
1143 if (!dmabuf) {
1144 mutex_unlock(&mdev_state->ops_lock);
1145 return -ENOENT;
1146 }
1147
1148 if (!dmabuf->buf)
1149 mbochs_dmabuf_export(dmabuf);
1150
1151 mutex_unlock(&mdev_state->ops_lock);
1152
1153 if (!dmabuf->buf)
1154 return -EINVAL;
1155
1156 return dma_buf_fd(dmabuf->buf, 0);
1157}
1158
1159static long mbochs_ioctl(struct vfio_device *vdev, unsigned int cmd,
1160 unsigned long arg)
1161{
1162 struct mdev_state *mdev_state =
1163 container_of(vdev, struct mdev_state, vdev);
1164 int ret = 0;
1165 unsigned long minsz, outsz;
1166
1167 switch (cmd) {
1168 case VFIO_DEVICE_GET_INFO:
1169 {
1170 struct vfio_device_info info;
1171
1172 minsz = offsetofend(struct vfio_device_info, num_irqs);
1173
1174 if (copy_from_user(&info, (void __user *)arg, minsz))
1175 return -EFAULT;
1176
1177 if (info.argsz < minsz)
1178 return -EINVAL;
1179
1180 ret = mbochs_get_device_info(&info);
1181 if (ret)
1182 return ret;
1183
1184 if (copy_to_user((void __user *)arg, &info, minsz))
1185 return -EFAULT;
1186
1187 return 0;
1188 }
1189 case VFIO_DEVICE_GET_REGION_INFO:
1190 {
1191 struct vfio_region_info_ext info;
1192
1193 minsz = offsetofend(typeof(info), base.offset);
1194
1195 if (copy_from_user(&info, (void __user *)arg, minsz))
1196 return -EFAULT;
1197
1198 outsz = info.base.argsz;
1199 if (outsz < minsz)
1200 return -EINVAL;
1201 if (outsz > sizeof(info))
1202 return -EINVAL;
1203
1204 ret = mbochs_get_region_info(mdev_state, &info);
1205 if (ret)
1206 return ret;
1207
1208 if (copy_to_user((void __user *)arg, &info, outsz))
1209 return -EFAULT;
1210
1211 return 0;
1212 }
1213
1214 case VFIO_DEVICE_GET_IRQ_INFO:
1215 {
1216 struct vfio_irq_info info;
1217
1218 minsz = offsetofend(struct vfio_irq_info, count);
1219
1220 if (copy_from_user(&info, (void __user *)arg, minsz))
1221 return -EFAULT;
1222
1223 if ((info.argsz < minsz) ||
1224 (info.index >= VFIO_PCI_NUM_IRQS))
1225 return -EINVAL;
1226
1227 ret = mbochs_get_irq_info(&info);
1228 if (ret)
1229 return ret;
1230
1231 if (copy_to_user((void __user *)arg, &info, minsz))
1232 return -EFAULT;
1233
1234 return 0;
1235 }
1236
1237 case VFIO_DEVICE_QUERY_GFX_PLANE:
1238 {
1239 struct vfio_device_gfx_plane_info plane;
1240
1241 minsz = offsetofend(struct vfio_device_gfx_plane_info,
1242 region_index);
1243
1244 if (copy_from_user(&plane, (void __user *)arg, minsz))
1245 return -EFAULT;
1246
1247 if (plane.argsz < minsz)
1248 return -EINVAL;
1249
1250 ret = mbochs_query_gfx_plane(mdev_state, &plane);
1251 if (ret)
1252 return ret;
1253
1254 if (copy_to_user((void __user *)arg, &plane, minsz))
1255 return -EFAULT;
1256
1257 return 0;
1258 }
1259
1260 case VFIO_DEVICE_GET_GFX_DMABUF:
1261 {
1262 u32 dmabuf_id;
1263
1264 if (get_user(dmabuf_id, (__u32 __user *)arg))
1265 return -EFAULT;
1266
1267 return mbochs_get_gfx_dmabuf(mdev_state, dmabuf_id);
1268 }
1269
1270 case VFIO_DEVICE_SET_IRQS:
1271 return -EINVAL;
1272
1273 case VFIO_DEVICE_RESET:
1274 return mbochs_reset(mdev_state);
1275 }
1276 return -ENOTTY;
1277}
1278
1279static int mbochs_open(struct vfio_device *vdev)
1280{
1281 if (!try_module_get(THIS_MODULE))
1282 return -ENODEV;
1283
1284 return 0;
1285}
1286
1287static void mbochs_close(struct vfio_device *vdev)
1288{
1289 struct mdev_state *mdev_state =
1290 container_of(vdev, struct mdev_state, vdev);
1291 struct mbochs_dmabuf *dmabuf, *tmp;
1292
1293 mutex_lock(&mdev_state->ops_lock);
1294
1295 list_for_each_entry_safe(dmabuf, tmp, &mdev_state->dmabufs, next) {
1296 list_del(&dmabuf->next);
1297 if (dmabuf->buf) {
1298 /* free in mbochs_release_dmabuf() */
1299 dmabuf->unlinked = true;
1300 } else {
1301 kfree(dmabuf);
1302 }
1303 }
1304 mbochs_put_pages(mdev_state);
1305
1306 mutex_unlock(&mdev_state->ops_lock);
1307 module_put(THIS_MODULE);
1308}
1309
1310static ssize_t
1311memory_show(struct device *dev, struct device_attribute *attr,
1312 char *buf)
1313{
1314 struct mdev_state *mdev_state = dev_get_drvdata(dev);
1315
1316 return sprintf(buf, "%d MB\n", mdev_state->type->mbytes);
1317}
1318static DEVICE_ATTR_RO(memory);
1319
1320static struct attribute *mdev_dev_attrs[] = {
1321 &dev_attr_memory.attr,
1322 NULL,
1323};
1324
1325static const struct attribute_group mdev_dev_group = {
1326 .name = "vendor",
1327 .attrs = mdev_dev_attrs,
1328};
1329
1330static const struct attribute_group *mdev_dev_groups[] = {
1331 &mdev_dev_group,
1332 NULL,
1333};
1334
1335static ssize_t name_show(struct mdev_type *mtype,
1336 struct mdev_type_attribute *attr, char *buf)
1337{
1338 const struct mbochs_type *type =
1339 &mbochs_types[mtype_get_type_group_id(mtype)];
1340
1341 return sprintf(buf, "%s\n", type->name);
1342}
1343static MDEV_TYPE_ATTR_RO(name);
1344
1345static ssize_t description_show(struct mdev_type *mtype,
1346 struct mdev_type_attribute *attr, char *buf)
1347{
1348 const struct mbochs_type *type =
1349 &mbochs_types[mtype_get_type_group_id(mtype)];
1350
1351 return sprintf(buf, "virtual display, %d MB video memory\n",
1352 type ? type->mbytes : 0);
1353}
1354static MDEV_TYPE_ATTR_RO(description);
1355
1356static ssize_t available_instances_show(struct mdev_type *mtype,
1357 struct mdev_type_attribute *attr,
1358 char *buf)
1359{
1360 const struct mbochs_type *type =
1361 &mbochs_types[mtype_get_type_group_id(mtype)];
1362 int count = atomic_read(&mbochs_avail_mbytes) / type->mbytes;
1363
1364 return sprintf(buf, "%d\n", count);
1365}
1366static MDEV_TYPE_ATTR_RO(available_instances);
1367
1368static ssize_t device_api_show(struct mdev_type *mtype,
1369 struct mdev_type_attribute *attr, char *buf)
1370{
1371 return sprintf(buf, "%s\n", VFIO_DEVICE_API_PCI_STRING);
1372}
1373static MDEV_TYPE_ATTR_RO(device_api);
1374
1375static struct attribute *mdev_types_attrs[] = {
1376 &mdev_type_attr_name.attr,
1377 &mdev_type_attr_description.attr,
1378 &mdev_type_attr_device_api.attr,
1379 &mdev_type_attr_available_instances.attr,
1380 NULL,
1381};
1382
1383static struct attribute_group mdev_type_group1 = {
1384 .name = MBOCHS_TYPE_1,
1385 .attrs = mdev_types_attrs,
1386};
1387
1388static struct attribute_group mdev_type_group2 = {
1389 .name = MBOCHS_TYPE_2,
1390 .attrs = mdev_types_attrs,
1391};
1392
1393static struct attribute_group mdev_type_group3 = {
1394 .name = MBOCHS_TYPE_3,
1395 .attrs = mdev_types_attrs,
1396};
1397
1398static struct attribute_group *mdev_type_groups[] = {
1399 &mdev_type_group1,
1400 &mdev_type_group2,
1401 &mdev_type_group3,
1402 NULL,
1403};
1404
1405static const struct vfio_device_ops mbochs_dev_ops = {
1406 .open = mbochs_open,
1407 .release = mbochs_close,
1408 .read = mbochs_read,
1409 .write = mbochs_write,
1410 .ioctl = mbochs_ioctl,
1411 .mmap = mbochs_mmap,
1412};
1413
1414static struct mdev_driver mbochs_driver = {
1415 .driver = {
1416 .name = "mbochs",
1417 .owner = THIS_MODULE,
1418 .mod_name = KBUILD_MODNAME,
1419 .dev_groups = mdev_dev_groups,
1420 },
1421 .probe = mbochs_probe,
1422 .remove = mbochs_remove,
1423};
1424
1425static const struct mdev_parent_ops mdev_fops = {
1426 .owner = THIS_MODULE,
1427 .device_driver = &mbochs_driver,
1428 .supported_type_groups = mdev_type_groups,
1429};
1430
1431static const struct file_operations vd_fops = {
1432 .owner = THIS_MODULE,
1433};
1434
1435static void mbochs_device_release(struct device *dev)
1436{
1437 /* nothing */
1438}
1439
1440static int __init mbochs_dev_init(void)
1441{
1442 int ret = 0;
1443
1444 atomic_set(&mbochs_avail_mbytes, max_mbytes);
1445
1446 ret = alloc_chrdev_region(&mbochs_devt, 0, MINORMASK + 1, MBOCHS_NAME);
1447 if (ret < 0) {
1448 pr_err("Error: failed to register mbochs_dev, err: %d\n", ret);
1449 return ret;
1450 }
1451 cdev_init(&mbochs_cdev, &vd_fops);
1452 cdev_add(&mbochs_cdev, mbochs_devt, MINORMASK + 1);
1453 pr_info("%s: major %d\n", __func__, MAJOR(mbochs_devt));
1454
1455 ret = mdev_register_driver(&mbochs_driver);
1456 if (ret)
1457 goto err_cdev;
1458
1459 mbochs_class = class_create(THIS_MODULE, MBOCHS_CLASS_NAME);
1460 if (IS_ERR(mbochs_class)) {
1461 pr_err("Error: failed to register mbochs_dev class\n");
1462 ret = PTR_ERR(mbochs_class);
1463 goto err_driver;
1464 }
1465 mbochs_dev.class = mbochs_class;
1466 mbochs_dev.release = mbochs_device_release;
1467 dev_set_name(&mbochs_dev, "%s", MBOCHS_NAME);
1468
1469 ret = device_register(&mbochs_dev);
1470 if (ret)
1471 goto err_class;
1472
1473 ret = mdev_register_device(&mbochs_dev, &mdev_fops);
1474 if (ret)
1475 goto err_device;
1476
1477 return 0;
1478
1479err_device:
1480 device_unregister(&mbochs_dev);
1481err_class:
1482 class_destroy(mbochs_class);
1483err_driver:
1484 mdev_unregister_driver(&mbochs_driver);
1485err_cdev:
1486 cdev_del(&mbochs_cdev);
1487 unregister_chrdev_region(mbochs_devt, MINORMASK + 1);
1488 return ret;
1489}
1490
1491static void __exit mbochs_dev_exit(void)
1492{
1493 mbochs_dev.bus = NULL;
1494 mdev_unregister_device(&mbochs_dev);
1495
1496 device_unregister(&mbochs_dev);
1497 mdev_unregister_driver(&mbochs_driver);
1498 cdev_del(&mbochs_cdev);
1499 unregister_chrdev_region(mbochs_devt, MINORMASK + 1);
1500 class_destroy(mbochs_class);
1501 mbochs_class = NULL;
1502}
1503
1504module_init(mbochs_dev_init)
1505module_exit(mbochs_dev_exit)