Loading...
1// SPDX-License-Identifier: GPL-2.0
2
3/*
4 * Xen dma-buf functionality for gntdev.
5 *
6 * DMA buffer implementation is based on drivers/gpu/drm/drm_prime.c.
7 *
8 * Copyright (c) 2018 Oleksandr Andrushchenko, EPAM Systems Inc.
9 */
10
11#include <linux/kernel.h>
12#include <linux/errno.h>
13#include <linux/dma-buf.h>
14#include <linux/slab.h>
15#include <linux/types.h>
16#include <linux/uaccess.h>
17#include <linux/module.h>
18
19#include <xen/xen.h>
20#include <xen/grant_table.h>
21
22#include "gntdev-common.h"
23#include "gntdev-dmabuf.h"
24
25MODULE_IMPORT_NS(DMA_BUF);
26
27struct gntdev_dmabuf {
28 struct gntdev_dmabuf_priv *priv;
29 struct dma_buf *dmabuf;
30 struct list_head next;
31 int fd;
32
33 union {
34 struct {
35 /* Exported buffers are reference counted. */
36 struct kref refcount;
37
38 struct gntdev_priv *priv;
39 struct gntdev_grant_map *map;
40 } exp;
41 struct {
42 /* Granted references of the imported buffer. */
43 grant_ref_t *refs;
44 /* Scatter-gather table of the imported buffer. */
45 struct sg_table *sgt;
46 /* dma-buf attachment of the imported buffer. */
47 struct dma_buf_attachment *attach;
48 } imp;
49 } u;
50
51 /* Number of pages this buffer has. */
52 int nr_pages;
53 /* Pages of this buffer. */
54 struct page **pages;
55};
56
57struct gntdev_dmabuf_wait_obj {
58 struct list_head next;
59 struct gntdev_dmabuf *gntdev_dmabuf;
60 struct completion completion;
61};
62
63struct gntdev_dmabuf_attachment {
64 struct sg_table *sgt;
65 enum dma_data_direction dir;
66};
67
68struct gntdev_dmabuf_priv {
69 /* List of exported DMA buffers. */
70 struct list_head exp_list;
71 /* List of wait objects. */
72 struct list_head exp_wait_list;
73 /* List of imported DMA buffers. */
74 struct list_head imp_list;
75 /* This is the lock which protects dma_buf_xxx lists. */
76 struct mutex lock;
77 /*
78 * We reference this file while exporting dma-bufs, so
79 * the grant device context is not destroyed while there are
80 * external users alive.
81 */
82 struct file *filp;
83};
84
85/* DMA buffer export support. */
86
87/* Implementation of wait for exported DMA buffer to be released. */
88
89static void dmabuf_exp_release(struct kref *kref);
90
91static struct gntdev_dmabuf_wait_obj *
92dmabuf_exp_wait_obj_new(struct gntdev_dmabuf_priv *priv,
93 struct gntdev_dmabuf *gntdev_dmabuf)
94{
95 struct gntdev_dmabuf_wait_obj *obj;
96
97 obj = kzalloc(sizeof(*obj), GFP_KERNEL);
98 if (!obj)
99 return ERR_PTR(-ENOMEM);
100
101 init_completion(&obj->completion);
102 obj->gntdev_dmabuf = gntdev_dmabuf;
103
104 mutex_lock(&priv->lock);
105 list_add(&obj->next, &priv->exp_wait_list);
106 /* Put our reference and wait for gntdev_dmabuf's release to fire. */
107 kref_put(&gntdev_dmabuf->u.exp.refcount, dmabuf_exp_release);
108 mutex_unlock(&priv->lock);
109 return obj;
110}
111
112static void dmabuf_exp_wait_obj_free(struct gntdev_dmabuf_priv *priv,
113 struct gntdev_dmabuf_wait_obj *obj)
114{
115 mutex_lock(&priv->lock);
116 list_del(&obj->next);
117 mutex_unlock(&priv->lock);
118 kfree(obj);
119}
120
121static int dmabuf_exp_wait_obj_wait(struct gntdev_dmabuf_wait_obj *obj,
122 u32 wait_to_ms)
123{
124 if (wait_for_completion_timeout(&obj->completion,
125 msecs_to_jiffies(wait_to_ms)) <= 0)
126 return -ETIMEDOUT;
127
128 return 0;
129}
130
131static void dmabuf_exp_wait_obj_signal(struct gntdev_dmabuf_priv *priv,
132 struct gntdev_dmabuf *gntdev_dmabuf)
133{
134 struct gntdev_dmabuf_wait_obj *obj;
135
136 list_for_each_entry(obj, &priv->exp_wait_list, next)
137 if (obj->gntdev_dmabuf == gntdev_dmabuf) {
138 pr_debug("Found gntdev_dmabuf in the wait list, wake\n");
139 complete_all(&obj->completion);
140 break;
141 }
142}
143
144static struct gntdev_dmabuf *
145dmabuf_exp_wait_obj_get_dmabuf(struct gntdev_dmabuf_priv *priv, int fd)
146{
147 struct gntdev_dmabuf *gntdev_dmabuf, *ret = ERR_PTR(-ENOENT);
148
149 mutex_lock(&priv->lock);
150 list_for_each_entry(gntdev_dmabuf, &priv->exp_list, next)
151 if (gntdev_dmabuf->fd == fd) {
152 pr_debug("Found gntdev_dmabuf in the wait list\n");
153 kref_get(&gntdev_dmabuf->u.exp.refcount);
154 ret = gntdev_dmabuf;
155 break;
156 }
157 mutex_unlock(&priv->lock);
158 return ret;
159}
160
161static int dmabuf_exp_wait_released(struct gntdev_dmabuf_priv *priv, int fd,
162 int wait_to_ms)
163{
164 struct gntdev_dmabuf *gntdev_dmabuf;
165 struct gntdev_dmabuf_wait_obj *obj;
166 int ret;
167
168 pr_debug("Will wait for dma-buf with fd %d\n", fd);
169 /*
170 * Try to find the DMA buffer: if not found means that
171 * either the buffer has already been released or file descriptor
172 * provided is wrong.
173 */
174 gntdev_dmabuf = dmabuf_exp_wait_obj_get_dmabuf(priv, fd);
175 if (IS_ERR(gntdev_dmabuf))
176 return PTR_ERR(gntdev_dmabuf);
177
178 /*
179 * gntdev_dmabuf still exists and is reference count locked by us now,
180 * so prepare to wait: allocate wait object and add it to the wait list,
181 * so we can find it on release.
182 */
183 obj = dmabuf_exp_wait_obj_new(priv, gntdev_dmabuf);
184 if (IS_ERR(obj))
185 return PTR_ERR(obj);
186
187 ret = dmabuf_exp_wait_obj_wait(obj, wait_to_ms);
188 dmabuf_exp_wait_obj_free(priv, obj);
189 return ret;
190}
191
192/* DMA buffer export support. */
193
194static struct sg_table *
195dmabuf_pages_to_sgt(struct page **pages, unsigned int nr_pages)
196{
197 struct sg_table *sgt;
198 int ret;
199
200 sgt = kmalloc(sizeof(*sgt), GFP_KERNEL);
201 if (!sgt) {
202 ret = -ENOMEM;
203 goto out;
204 }
205
206 ret = sg_alloc_table_from_pages(sgt, pages, nr_pages, 0,
207 nr_pages << PAGE_SHIFT,
208 GFP_KERNEL);
209 if (ret)
210 goto out;
211
212 return sgt;
213
214out:
215 kfree(sgt);
216 return ERR_PTR(ret);
217}
218
219static int dmabuf_exp_ops_attach(struct dma_buf *dma_buf,
220 struct dma_buf_attachment *attach)
221{
222 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach;
223
224 gntdev_dmabuf_attach = kzalloc(sizeof(*gntdev_dmabuf_attach),
225 GFP_KERNEL);
226 if (!gntdev_dmabuf_attach)
227 return -ENOMEM;
228
229 gntdev_dmabuf_attach->dir = DMA_NONE;
230 attach->priv = gntdev_dmabuf_attach;
231 return 0;
232}
233
234static void dmabuf_exp_ops_detach(struct dma_buf *dma_buf,
235 struct dma_buf_attachment *attach)
236{
237 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach = attach->priv;
238
239 if (gntdev_dmabuf_attach) {
240 struct sg_table *sgt = gntdev_dmabuf_attach->sgt;
241
242 if (sgt) {
243 if (gntdev_dmabuf_attach->dir != DMA_NONE)
244 dma_unmap_sgtable(attach->dev, sgt,
245 gntdev_dmabuf_attach->dir,
246 DMA_ATTR_SKIP_CPU_SYNC);
247 sg_free_table(sgt);
248 }
249
250 kfree(sgt);
251 kfree(gntdev_dmabuf_attach);
252 attach->priv = NULL;
253 }
254}
255
256static struct sg_table *
257dmabuf_exp_ops_map_dma_buf(struct dma_buf_attachment *attach,
258 enum dma_data_direction dir)
259{
260 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach = attach->priv;
261 struct gntdev_dmabuf *gntdev_dmabuf = attach->dmabuf->priv;
262 struct sg_table *sgt;
263
264 pr_debug("Mapping %d pages for dev %p\n", gntdev_dmabuf->nr_pages,
265 attach->dev);
266
267 if (dir == DMA_NONE || !gntdev_dmabuf_attach)
268 return ERR_PTR(-EINVAL);
269
270 /* Return the cached mapping when possible. */
271 if (gntdev_dmabuf_attach->dir == dir)
272 return gntdev_dmabuf_attach->sgt;
273
274 /*
275 * Two mappings with different directions for the same attachment are
276 * not allowed.
277 */
278 if (gntdev_dmabuf_attach->dir != DMA_NONE)
279 return ERR_PTR(-EBUSY);
280
281 sgt = dmabuf_pages_to_sgt(gntdev_dmabuf->pages,
282 gntdev_dmabuf->nr_pages);
283 if (!IS_ERR(sgt)) {
284 if (dma_map_sgtable(attach->dev, sgt, dir,
285 DMA_ATTR_SKIP_CPU_SYNC)) {
286 sg_free_table(sgt);
287 kfree(sgt);
288 sgt = ERR_PTR(-ENOMEM);
289 } else {
290 gntdev_dmabuf_attach->sgt = sgt;
291 gntdev_dmabuf_attach->dir = dir;
292 }
293 }
294 if (IS_ERR(sgt))
295 pr_debug("Failed to map sg table for dev %p\n", attach->dev);
296 return sgt;
297}
298
299static void dmabuf_exp_ops_unmap_dma_buf(struct dma_buf_attachment *attach,
300 struct sg_table *sgt,
301 enum dma_data_direction dir)
302{
303 /* Not implemented. The unmap is done at dmabuf_exp_ops_detach(). */
304}
305
306static void dmabuf_exp_release(struct kref *kref)
307{
308 struct gntdev_dmabuf *gntdev_dmabuf =
309 container_of(kref, struct gntdev_dmabuf, u.exp.refcount);
310
311 dmabuf_exp_wait_obj_signal(gntdev_dmabuf->priv, gntdev_dmabuf);
312 list_del(&gntdev_dmabuf->next);
313 fput(gntdev_dmabuf->priv->filp);
314 kfree(gntdev_dmabuf);
315}
316
317static void dmabuf_exp_remove_map(struct gntdev_priv *priv,
318 struct gntdev_grant_map *map)
319{
320 mutex_lock(&priv->lock);
321 list_del(&map->next);
322 gntdev_put_map(NULL /* already removed */, map);
323 mutex_unlock(&priv->lock);
324}
325
326static void dmabuf_exp_ops_release(struct dma_buf *dma_buf)
327{
328 struct gntdev_dmabuf *gntdev_dmabuf = dma_buf->priv;
329 struct gntdev_dmabuf_priv *priv = gntdev_dmabuf->priv;
330
331 dmabuf_exp_remove_map(gntdev_dmabuf->u.exp.priv,
332 gntdev_dmabuf->u.exp.map);
333 mutex_lock(&priv->lock);
334 kref_put(&gntdev_dmabuf->u.exp.refcount, dmabuf_exp_release);
335 mutex_unlock(&priv->lock);
336}
337
338static const struct dma_buf_ops dmabuf_exp_ops = {
339 .attach = dmabuf_exp_ops_attach,
340 .detach = dmabuf_exp_ops_detach,
341 .map_dma_buf = dmabuf_exp_ops_map_dma_buf,
342 .unmap_dma_buf = dmabuf_exp_ops_unmap_dma_buf,
343 .release = dmabuf_exp_ops_release,
344};
345
346struct gntdev_dmabuf_export_args {
347 struct gntdev_priv *priv;
348 struct gntdev_grant_map *map;
349 struct gntdev_dmabuf_priv *dmabuf_priv;
350 struct device *dev;
351 int count;
352 struct page **pages;
353 u32 fd;
354};
355
356static int dmabuf_exp_from_pages(struct gntdev_dmabuf_export_args *args)
357{
358 DEFINE_DMA_BUF_EXPORT_INFO(exp_info);
359 struct gntdev_dmabuf *gntdev_dmabuf;
360 int ret;
361
362 gntdev_dmabuf = kzalloc(sizeof(*gntdev_dmabuf), GFP_KERNEL);
363 if (!gntdev_dmabuf)
364 return -ENOMEM;
365
366 kref_init(&gntdev_dmabuf->u.exp.refcount);
367
368 gntdev_dmabuf->priv = args->dmabuf_priv;
369 gntdev_dmabuf->nr_pages = args->count;
370 gntdev_dmabuf->pages = args->pages;
371 gntdev_dmabuf->u.exp.priv = args->priv;
372 gntdev_dmabuf->u.exp.map = args->map;
373
374 exp_info.exp_name = KBUILD_MODNAME;
375 if (args->dev->driver && args->dev->driver->owner)
376 exp_info.owner = args->dev->driver->owner;
377 else
378 exp_info.owner = THIS_MODULE;
379 exp_info.ops = &dmabuf_exp_ops;
380 exp_info.size = args->count << PAGE_SHIFT;
381 exp_info.flags = O_RDWR;
382 exp_info.priv = gntdev_dmabuf;
383
384 gntdev_dmabuf->dmabuf = dma_buf_export(&exp_info);
385 if (IS_ERR(gntdev_dmabuf->dmabuf)) {
386 ret = PTR_ERR(gntdev_dmabuf->dmabuf);
387 gntdev_dmabuf->dmabuf = NULL;
388 goto fail;
389 }
390
391 ret = dma_buf_fd(gntdev_dmabuf->dmabuf, O_CLOEXEC);
392 if (ret < 0)
393 goto fail;
394
395 gntdev_dmabuf->fd = ret;
396 args->fd = ret;
397
398 pr_debug("Exporting DMA buffer with fd %d\n", ret);
399
400 mutex_lock(&args->dmabuf_priv->lock);
401 list_add(&gntdev_dmabuf->next, &args->dmabuf_priv->exp_list);
402 mutex_unlock(&args->dmabuf_priv->lock);
403 get_file(gntdev_dmabuf->priv->filp);
404 return 0;
405
406fail:
407 if (gntdev_dmabuf->dmabuf)
408 dma_buf_put(gntdev_dmabuf->dmabuf);
409 kfree(gntdev_dmabuf);
410 return ret;
411}
412
413static struct gntdev_grant_map *
414dmabuf_exp_alloc_backing_storage(struct gntdev_priv *priv, int dmabuf_flags,
415 int count)
416{
417 struct gntdev_grant_map *map;
418
419 if (unlikely(gntdev_test_page_count(count)))
420 return ERR_PTR(-EINVAL);
421
422 if ((dmabuf_flags & GNTDEV_DMA_FLAG_WC) &&
423 (dmabuf_flags & GNTDEV_DMA_FLAG_COHERENT)) {
424 pr_debug("Wrong dma-buf flags: 0x%x\n", dmabuf_flags);
425 return ERR_PTR(-EINVAL);
426 }
427
428 map = gntdev_alloc_map(priv, count, dmabuf_flags);
429 if (!map)
430 return ERR_PTR(-ENOMEM);
431
432 return map;
433}
434
435static int dmabuf_exp_from_refs(struct gntdev_priv *priv, int flags,
436 int count, u32 domid, u32 *refs, u32 *fd)
437{
438 struct gntdev_grant_map *map;
439 struct gntdev_dmabuf_export_args args;
440 int i, ret;
441
442 map = dmabuf_exp_alloc_backing_storage(priv, flags, count);
443 if (IS_ERR(map))
444 return PTR_ERR(map);
445
446 for (i = 0; i < count; i++) {
447 map->grants[i].domid = domid;
448 map->grants[i].ref = refs[i];
449 }
450
451 mutex_lock(&priv->lock);
452 gntdev_add_map(priv, map);
453 mutex_unlock(&priv->lock);
454
455 map->flags |= GNTMAP_host_map;
456#if defined(CONFIG_X86)
457 map->flags |= GNTMAP_device_map;
458#endif
459
460 ret = gntdev_map_grant_pages(map);
461 if (ret < 0)
462 goto out;
463
464 args.priv = priv;
465 args.map = map;
466 args.dev = priv->dma_dev;
467 args.dmabuf_priv = priv->dmabuf_priv;
468 args.count = map->count;
469 args.pages = map->pages;
470 args.fd = -1; /* Shut up unnecessary gcc warning for i386 */
471
472 ret = dmabuf_exp_from_pages(&args);
473 if (ret < 0)
474 goto out;
475
476 *fd = args.fd;
477 return 0;
478
479out:
480 dmabuf_exp_remove_map(priv, map);
481 return ret;
482}
483
484/* DMA buffer import support. */
485
486static int
487dmabuf_imp_grant_foreign_access(struct page **pages, u32 *refs,
488 int count, int domid)
489{
490 grant_ref_t priv_gref_head;
491 int i, ret;
492
493 ret = gnttab_alloc_grant_references(count, &priv_gref_head);
494 if (ret < 0) {
495 pr_debug("Cannot allocate grant references, ret %d\n", ret);
496 return ret;
497 }
498
499 for (i = 0; i < count; i++) {
500 int cur_ref;
501
502 cur_ref = gnttab_claim_grant_reference(&priv_gref_head);
503 if (cur_ref < 0) {
504 ret = cur_ref;
505 pr_debug("Cannot claim grant reference, ret %d\n", ret);
506 goto out;
507 }
508
509 gnttab_grant_foreign_access_ref(cur_ref, domid,
510 xen_page_to_gfn(pages[i]), 0);
511 refs[i] = cur_ref;
512 }
513
514 return 0;
515
516out:
517 gnttab_free_grant_references(priv_gref_head);
518 return ret;
519}
520
521static void dmabuf_imp_end_foreign_access(u32 *refs, int count)
522{
523 int i;
524
525 for (i = 0; i < count; i++)
526 if (refs[i] != INVALID_GRANT_REF)
527 gnttab_end_foreign_access(refs[i], NULL);
528}
529
530static void dmabuf_imp_free_storage(struct gntdev_dmabuf *gntdev_dmabuf)
531{
532 kfree(gntdev_dmabuf->pages);
533 kfree(gntdev_dmabuf->u.imp.refs);
534 kfree(gntdev_dmabuf);
535}
536
537static struct gntdev_dmabuf *dmabuf_imp_alloc_storage(int count)
538{
539 struct gntdev_dmabuf *gntdev_dmabuf;
540 int i;
541
542 gntdev_dmabuf = kzalloc(sizeof(*gntdev_dmabuf), GFP_KERNEL);
543 if (!gntdev_dmabuf)
544 goto fail_no_free;
545
546 gntdev_dmabuf->u.imp.refs = kcalloc(count,
547 sizeof(gntdev_dmabuf->u.imp.refs[0]),
548 GFP_KERNEL);
549 if (!gntdev_dmabuf->u.imp.refs)
550 goto fail;
551
552 gntdev_dmabuf->pages = kcalloc(count,
553 sizeof(gntdev_dmabuf->pages[0]),
554 GFP_KERNEL);
555 if (!gntdev_dmabuf->pages)
556 goto fail;
557
558 gntdev_dmabuf->nr_pages = count;
559
560 for (i = 0; i < count; i++)
561 gntdev_dmabuf->u.imp.refs[i] = INVALID_GRANT_REF;
562
563 return gntdev_dmabuf;
564
565fail:
566 dmabuf_imp_free_storage(gntdev_dmabuf);
567fail_no_free:
568 return ERR_PTR(-ENOMEM);
569}
570
571static struct gntdev_dmabuf *
572dmabuf_imp_to_refs(struct gntdev_dmabuf_priv *priv, struct device *dev,
573 int fd, int count, int domid)
574{
575 struct gntdev_dmabuf *gntdev_dmabuf, *ret;
576 struct dma_buf *dma_buf;
577 struct dma_buf_attachment *attach;
578 struct sg_table *sgt;
579 struct sg_page_iter sg_iter;
580 int i;
581
582 dma_buf = dma_buf_get(fd);
583 if (IS_ERR(dma_buf))
584 return ERR_CAST(dma_buf);
585
586 gntdev_dmabuf = dmabuf_imp_alloc_storage(count);
587 if (IS_ERR(gntdev_dmabuf)) {
588 ret = gntdev_dmabuf;
589 goto fail_put;
590 }
591
592 gntdev_dmabuf->priv = priv;
593 gntdev_dmabuf->fd = fd;
594
595 attach = dma_buf_attach(dma_buf, dev);
596 if (IS_ERR(attach)) {
597 ret = ERR_CAST(attach);
598 goto fail_free_obj;
599 }
600
601 gntdev_dmabuf->u.imp.attach = attach;
602
603 sgt = dma_buf_map_attachment_unlocked(attach, DMA_BIDIRECTIONAL);
604 if (IS_ERR(sgt)) {
605 ret = ERR_CAST(sgt);
606 goto fail_detach;
607 }
608
609 /* Check that we have zero offset. */
610 if (sgt->sgl->offset) {
611 ret = ERR_PTR(-EINVAL);
612 pr_debug("DMA buffer has %d bytes offset, user-space expects 0\n",
613 sgt->sgl->offset);
614 goto fail_unmap;
615 }
616
617 /* Check number of pages that imported buffer has. */
618 if (attach->dmabuf->size != gntdev_dmabuf->nr_pages << PAGE_SHIFT) {
619 ret = ERR_PTR(-EINVAL);
620 pr_debug("DMA buffer has %zu pages, user-space expects %d\n",
621 attach->dmabuf->size, gntdev_dmabuf->nr_pages);
622 goto fail_unmap;
623 }
624
625 gntdev_dmabuf->u.imp.sgt = sgt;
626
627 /* Now convert sgt to array of pages and check for page validity. */
628 i = 0;
629 for_each_sgtable_page(sgt, &sg_iter, 0) {
630 struct page *page = sg_page_iter_page(&sg_iter);
631 /*
632 * Check if page is valid: this can happen if we are given
633 * a page from VRAM or other resources which are not backed
634 * by a struct page.
635 */
636 if (!pfn_valid(page_to_pfn(page))) {
637 ret = ERR_PTR(-EINVAL);
638 goto fail_unmap;
639 }
640
641 gntdev_dmabuf->pages[i++] = page;
642 }
643
644 ret = ERR_PTR(dmabuf_imp_grant_foreign_access(gntdev_dmabuf->pages,
645 gntdev_dmabuf->u.imp.refs,
646 count, domid));
647 if (IS_ERR(ret))
648 goto fail_end_access;
649
650 pr_debug("Imported DMA buffer with fd %d\n", fd);
651
652 mutex_lock(&priv->lock);
653 list_add(&gntdev_dmabuf->next, &priv->imp_list);
654 mutex_unlock(&priv->lock);
655
656 return gntdev_dmabuf;
657
658fail_end_access:
659 dmabuf_imp_end_foreign_access(gntdev_dmabuf->u.imp.refs, count);
660fail_unmap:
661 dma_buf_unmap_attachment_unlocked(attach, sgt, DMA_BIDIRECTIONAL);
662fail_detach:
663 dma_buf_detach(dma_buf, attach);
664fail_free_obj:
665 dmabuf_imp_free_storage(gntdev_dmabuf);
666fail_put:
667 dma_buf_put(dma_buf);
668 return ret;
669}
670
671/*
672 * Find the hyper dma-buf by its file descriptor and remove
673 * it from the buffer's list.
674 */
675static struct gntdev_dmabuf *
676dmabuf_imp_find_unlink(struct gntdev_dmabuf_priv *priv, int fd)
677{
678 struct gntdev_dmabuf *q, *gntdev_dmabuf, *ret = ERR_PTR(-ENOENT);
679
680 mutex_lock(&priv->lock);
681 list_for_each_entry_safe(gntdev_dmabuf, q, &priv->imp_list, next) {
682 if (gntdev_dmabuf->fd == fd) {
683 pr_debug("Found gntdev_dmabuf in the import list\n");
684 ret = gntdev_dmabuf;
685 list_del(&gntdev_dmabuf->next);
686 break;
687 }
688 }
689 mutex_unlock(&priv->lock);
690 return ret;
691}
692
693static int dmabuf_imp_release(struct gntdev_dmabuf_priv *priv, u32 fd)
694{
695 struct gntdev_dmabuf *gntdev_dmabuf;
696 struct dma_buf_attachment *attach;
697 struct dma_buf *dma_buf;
698
699 gntdev_dmabuf = dmabuf_imp_find_unlink(priv, fd);
700 if (IS_ERR(gntdev_dmabuf))
701 return PTR_ERR(gntdev_dmabuf);
702
703 pr_debug("Releasing DMA buffer with fd %d\n", fd);
704
705 dmabuf_imp_end_foreign_access(gntdev_dmabuf->u.imp.refs,
706 gntdev_dmabuf->nr_pages);
707
708 attach = gntdev_dmabuf->u.imp.attach;
709
710 if (gntdev_dmabuf->u.imp.sgt)
711 dma_buf_unmap_attachment_unlocked(attach, gntdev_dmabuf->u.imp.sgt,
712 DMA_BIDIRECTIONAL);
713 dma_buf = attach->dmabuf;
714 dma_buf_detach(attach->dmabuf, attach);
715 dma_buf_put(dma_buf);
716
717 dmabuf_imp_free_storage(gntdev_dmabuf);
718 return 0;
719}
720
721static void dmabuf_imp_release_all(struct gntdev_dmabuf_priv *priv)
722{
723 struct gntdev_dmabuf *q, *gntdev_dmabuf;
724
725 list_for_each_entry_safe(gntdev_dmabuf, q, &priv->imp_list, next)
726 dmabuf_imp_release(priv, gntdev_dmabuf->fd);
727}
728
729/* DMA buffer IOCTL support. */
730
731long gntdev_ioctl_dmabuf_exp_from_refs(struct gntdev_priv *priv, int use_ptemod,
732 struct ioctl_gntdev_dmabuf_exp_from_refs __user *u)
733{
734 struct ioctl_gntdev_dmabuf_exp_from_refs op;
735 u32 *refs;
736 long ret;
737
738 if (use_ptemod) {
739 pr_debug("Cannot provide dma-buf: use_ptemode %d\n",
740 use_ptemod);
741 return -EINVAL;
742 }
743
744 if (copy_from_user(&op, u, sizeof(op)) != 0)
745 return -EFAULT;
746
747 if (unlikely(gntdev_test_page_count(op.count)))
748 return -EINVAL;
749
750 refs = kcalloc(op.count, sizeof(*refs), GFP_KERNEL);
751 if (!refs)
752 return -ENOMEM;
753
754 if (copy_from_user(refs, u->refs, sizeof(*refs) * op.count) != 0) {
755 ret = -EFAULT;
756 goto out;
757 }
758
759 ret = dmabuf_exp_from_refs(priv, op.flags, op.count,
760 op.domid, refs, &op.fd);
761 if (ret)
762 goto out;
763
764 if (copy_to_user(u, &op, sizeof(op)) != 0)
765 ret = -EFAULT;
766
767out:
768 kfree(refs);
769 return ret;
770}
771
772long gntdev_ioctl_dmabuf_exp_wait_released(struct gntdev_priv *priv,
773 struct ioctl_gntdev_dmabuf_exp_wait_released __user *u)
774{
775 struct ioctl_gntdev_dmabuf_exp_wait_released op;
776
777 if (copy_from_user(&op, u, sizeof(op)) != 0)
778 return -EFAULT;
779
780 return dmabuf_exp_wait_released(priv->dmabuf_priv, op.fd,
781 op.wait_to_ms);
782}
783
784long gntdev_ioctl_dmabuf_imp_to_refs(struct gntdev_priv *priv,
785 struct ioctl_gntdev_dmabuf_imp_to_refs __user *u)
786{
787 struct ioctl_gntdev_dmabuf_imp_to_refs op;
788 struct gntdev_dmabuf *gntdev_dmabuf;
789 long ret;
790
791 if (copy_from_user(&op, u, sizeof(op)) != 0)
792 return -EFAULT;
793
794 if (unlikely(gntdev_test_page_count(op.count)))
795 return -EINVAL;
796
797 gntdev_dmabuf = dmabuf_imp_to_refs(priv->dmabuf_priv,
798 priv->dma_dev, op.fd,
799 op.count, op.domid);
800 if (IS_ERR(gntdev_dmabuf))
801 return PTR_ERR(gntdev_dmabuf);
802
803 if (copy_to_user(u->refs, gntdev_dmabuf->u.imp.refs,
804 sizeof(*u->refs) * op.count) != 0) {
805 ret = -EFAULT;
806 goto out_release;
807 }
808 return 0;
809
810out_release:
811 dmabuf_imp_release(priv->dmabuf_priv, op.fd);
812 return ret;
813}
814
815long gntdev_ioctl_dmabuf_imp_release(struct gntdev_priv *priv,
816 struct ioctl_gntdev_dmabuf_imp_release __user *u)
817{
818 struct ioctl_gntdev_dmabuf_imp_release op;
819
820 if (copy_from_user(&op, u, sizeof(op)) != 0)
821 return -EFAULT;
822
823 return dmabuf_imp_release(priv->dmabuf_priv, op.fd);
824}
825
826struct gntdev_dmabuf_priv *gntdev_dmabuf_init(struct file *filp)
827{
828 struct gntdev_dmabuf_priv *priv;
829
830 priv = kzalloc(sizeof(*priv), GFP_KERNEL);
831 if (!priv)
832 return ERR_PTR(-ENOMEM);
833
834 mutex_init(&priv->lock);
835 INIT_LIST_HEAD(&priv->exp_list);
836 INIT_LIST_HEAD(&priv->exp_wait_list);
837 INIT_LIST_HEAD(&priv->imp_list);
838
839 priv->filp = filp;
840
841 return priv;
842}
843
844void gntdev_dmabuf_fini(struct gntdev_dmabuf_priv *priv)
845{
846 dmabuf_imp_release_all(priv);
847 kfree(priv);
848}
1// SPDX-License-Identifier: GPL-2.0
2
3/*
4 * Xen dma-buf functionality for gntdev.
5 *
6 * DMA buffer implementation is based on drivers/gpu/drm/drm_prime.c.
7 *
8 * Copyright (c) 2018 Oleksandr Andrushchenko, EPAM Systems Inc.
9 */
10
11#include <linux/kernel.h>
12#include <linux/errno.h>
13#include <linux/dma-buf.h>
14#include <linux/slab.h>
15#include <linux/types.h>
16#include <linux/uaccess.h>
17
18#include <xen/xen.h>
19#include <xen/grant_table.h>
20
21#include "gntdev-common.h"
22#include "gntdev-dmabuf.h"
23
24#ifndef GRANT_INVALID_REF
25/*
26 * Note on usage of grant reference 0 as invalid grant reference:
27 * grant reference 0 is valid, but never exposed to a driver,
28 * because of the fact it is already in use/reserved by the PV console.
29 */
30#define GRANT_INVALID_REF 0
31#endif
32
33struct gntdev_dmabuf {
34 struct gntdev_dmabuf_priv *priv;
35 struct dma_buf *dmabuf;
36 struct list_head next;
37 int fd;
38
39 union {
40 struct {
41 /* Exported buffers are reference counted. */
42 struct kref refcount;
43
44 struct gntdev_priv *priv;
45 struct gntdev_grant_map *map;
46 } exp;
47 struct {
48 /* Granted references of the imported buffer. */
49 grant_ref_t *refs;
50 /* Scatter-gather table of the imported buffer. */
51 struct sg_table *sgt;
52 /* dma-buf attachment of the imported buffer. */
53 struct dma_buf_attachment *attach;
54 } imp;
55 } u;
56
57 /* Number of pages this buffer has. */
58 int nr_pages;
59 /* Pages of this buffer. */
60 struct page **pages;
61};
62
63struct gntdev_dmabuf_wait_obj {
64 struct list_head next;
65 struct gntdev_dmabuf *gntdev_dmabuf;
66 struct completion completion;
67};
68
69struct gntdev_dmabuf_attachment {
70 struct sg_table *sgt;
71 enum dma_data_direction dir;
72};
73
74struct gntdev_dmabuf_priv {
75 /* List of exported DMA buffers. */
76 struct list_head exp_list;
77 /* List of wait objects. */
78 struct list_head exp_wait_list;
79 /* List of imported DMA buffers. */
80 struct list_head imp_list;
81 /* This is the lock which protects dma_buf_xxx lists. */
82 struct mutex lock;
83 /*
84 * We reference this file while exporting dma-bufs, so
85 * the grant device context is not destroyed while there are
86 * external users alive.
87 */
88 struct file *filp;
89};
90
91/* DMA buffer export support. */
92
93/* Implementation of wait for exported DMA buffer to be released. */
94
95static void dmabuf_exp_release(struct kref *kref);
96
97static struct gntdev_dmabuf_wait_obj *
98dmabuf_exp_wait_obj_new(struct gntdev_dmabuf_priv *priv,
99 struct gntdev_dmabuf *gntdev_dmabuf)
100{
101 struct gntdev_dmabuf_wait_obj *obj;
102
103 obj = kzalloc(sizeof(*obj), GFP_KERNEL);
104 if (!obj)
105 return ERR_PTR(-ENOMEM);
106
107 init_completion(&obj->completion);
108 obj->gntdev_dmabuf = gntdev_dmabuf;
109
110 mutex_lock(&priv->lock);
111 list_add(&obj->next, &priv->exp_wait_list);
112 /* Put our reference and wait for gntdev_dmabuf's release to fire. */
113 kref_put(&gntdev_dmabuf->u.exp.refcount, dmabuf_exp_release);
114 mutex_unlock(&priv->lock);
115 return obj;
116}
117
118static void dmabuf_exp_wait_obj_free(struct gntdev_dmabuf_priv *priv,
119 struct gntdev_dmabuf_wait_obj *obj)
120{
121 mutex_lock(&priv->lock);
122 list_del(&obj->next);
123 mutex_unlock(&priv->lock);
124 kfree(obj);
125}
126
127static int dmabuf_exp_wait_obj_wait(struct gntdev_dmabuf_wait_obj *obj,
128 u32 wait_to_ms)
129{
130 if (wait_for_completion_timeout(&obj->completion,
131 msecs_to_jiffies(wait_to_ms)) <= 0)
132 return -ETIMEDOUT;
133
134 return 0;
135}
136
137static void dmabuf_exp_wait_obj_signal(struct gntdev_dmabuf_priv *priv,
138 struct gntdev_dmabuf *gntdev_dmabuf)
139{
140 struct gntdev_dmabuf_wait_obj *obj;
141
142 list_for_each_entry(obj, &priv->exp_wait_list, next)
143 if (obj->gntdev_dmabuf == gntdev_dmabuf) {
144 pr_debug("Found gntdev_dmabuf in the wait list, wake\n");
145 complete_all(&obj->completion);
146 break;
147 }
148}
149
150static struct gntdev_dmabuf *
151dmabuf_exp_wait_obj_get_dmabuf(struct gntdev_dmabuf_priv *priv, int fd)
152{
153 struct gntdev_dmabuf *gntdev_dmabuf, *ret = ERR_PTR(-ENOENT);
154
155 mutex_lock(&priv->lock);
156 list_for_each_entry(gntdev_dmabuf, &priv->exp_list, next)
157 if (gntdev_dmabuf->fd == fd) {
158 pr_debug("Found gntdev_dmabuf in the wait list\n");
159 kref_get(&gntdev_dmabuf->u.exp.refcount);
160 ret = gntdev_dmabuf;
161 break;
162 }
163 mutex_unlock(&priv->lock);
164 return ret;
165}
166
167static int dmabuf_exp_wait_released(struct gntdev_dmabuf_priv *priv, int fd,
168 int wait_to_ms)
169{
170 struct gntdev_dmabuf *gntdev_dmabuf;
171 struct gntdev_dmabuf_wait_obj *obj;
172 int ret;
173
174 pr_debug("Will wait for dma-buf with fd %d\n", fd);
175 /*
176 * Try to find the DMA buffer: if not found means that
177 * either the buffer has already been released or file descriptor
178 * provided is wrong.
179 */
180 gntdev_dmabuf = dmabuf_exp_wait_obj_get_dmabuf(priv, fd);
181 if (IS_ERR(gntdev_dmabuf))
182 return PTR_ERR(gntdev_dmabuf);
183
184 /*
185 * gntdev_dmabuf still exists and is reference count locked by us now,
186 * so prepare to wait: allocate wait object and add it to the wait list,
187 * so we can find it on release.
188 */
189 obj = dmabuf_exp_wait_obj_new(priv, gntdev_dmabuf);
190 if (IS_ERR(obj))
191 return PTR_ERR(obj);
192
193 ret = dmabuf_exp_wait_obj_wait(obj, wait_to_ms);
194 dmabuf_exp_wait_obj_free(priv, obj);
195 return ret;
196}
197
198/* DMA buffer export support. */
199
200static struct sg_table *
201dmabuf_pages_to_sgt(struct page **pages, unsigned int nr_pages)
202{
203 struct sg_table *sgt;
204 int ret;
205
206 sgt = kmalloc(sizeof(*sgt), GFP_KERNEL);
207 if (!sgt) {
208 ret = -ENOMEM;
209 goto out;
210 }
211
212 ret = sg_alloc_table_from_pages(sgt, pages, nr_pages, 0,
213 nr_pages << PAGE_SHIFT,
214 GFP_KERNEL);
215 if (ret)
216 goto out;
217
218 return sgt;
219
220out:
221 kfree(sgt);
222 return ERR_PTR(ret);
223}
224
225static int dmabuf_exp_ops_attach(struct dma_buf *dma_buf,
226 struct dma_buf_attachment *attach)
227{
228 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach;
229
230 gntdev_dmabuf_attach = kzalloc(sizeof(*gntdev_dmabuf_attach),
231 GFP_KERNEL);
232 if (!gntdev_dmabuf_attach)
233 return -ENOMEM;
234
235 gntdev_dmabuf_attach->dir = DMA_NONE;
236 attach->priv = gntdev_dmabuf_attach;
237 return 0;
238}
239
240static void dmabuf_exp_ops_detach(struct dma_buf *dma_buf,
241 struct dma_buf_attachment *attach)
242{
243 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach = attach->priv;
244
245 if (gntdev_dmabuf_attach) {
246 struct sg_table *sgt = gntdev_dmabuf_attach->sgt;
247
248 if (sgt) {
249 if (gntdev_dmabuf_attach->dir != DMA_NONE)
250 dma_unmap_sgtable(attach->dev, sgt,
251 gntdev_dmabuf_attach->dir,
252 DMA_ATTR_SKIP_CPU_SYNC);
253 sg_free_table(sgt);
254 }
255
256 kfree(sgt);
257 kfree(gntdev_dmabuf_attach);
258 attach->priv = NULL;
259 }
260}
261
262static struct sg_table *
263dmabuf_exp_ops_map_dma_buf(struct dma_buf_attachment *attach,
264 enum dma_data_direction dir)
265{
266 struct gntdev_dmabuf_attachment *gntdev_dmabuf_attach = attach->priv;
267 struct gntdev_dmabuf *gntdev_dmabuf = attach->dmabuf->priv;
268 struct sg_table *sgt;
269
270 pr_debug("Mapping %d pages for dev %p\n", gntdev_dmabuf->nr_pages,
271 attach->dev);
272
273 if (dir == DMA_NONE || !gntdev_dmabuf_attach)
274 return ERR_PTR(-EINVAL);
275
276 /* Return the cached mapping when possible. */
277 if (gntdev_dmabuf_attach->dir == dir)
278 return gntdev_dmabuf_attach->sgt;
279
280 /*
281 * Two mappings with different directions for the same attachment are
282 * not allowed.
283 */
284 if (gntdev_dmabuf_attach->dir != DMA_NONE)
285 return ERR_PTR(-EBUSY);
286
287 sgt = dmabuf_pages_to_sgt(gntdev_dmabuf->pages,
288 gntdev_dmabuf->nr_pages);
289 if (!IS_ERR(sgt)) {
290 if (dma_map_sgtable(attach->dev, sgt, dir,
291 DMA_ATTR_SKIP_CPU_SYNC)) {
292 sg_free_table(sgt);
293 kfree(sgt);
294 sgt = ERR_PTR(-ENOMEM);
295 } else {
296 gntdev_dmabuf_attach->sgt = sgt;
297 gntdev_dmabuf_attach->dir = dir;
298 }
299 }
300 if (IS_ERR(sgt))
301 pr_debug("Failed to map sg table for dev %p\n", attach->dev);
302 return sgt;
303}
304
305static void dmabuf_exp_ops_unmap_dma_buf(struct dma_buf_attachment *attach,
306 struct sg_table *sgt,
307 enum dma_data_direction dir)
308{
309 /* Not implemented. The unmap is done at dmabuf_exp_ops_detach(). */
310}
311
312static void dmabuf_exp_release(struct kref *kref)
313{
314 struct gntdev_dmabuf *gntdev_dmabuf =
315 container_of(kref, struct gntdev_dmabuf, u.exp.refcount);
316
317 dmabuf_exp_wait_obj_signal(gntdev_dmabuf->priv, gntdev_dmabuf);
318 list_del(&gntdev_dmabuf->next);
319 fput(gntdev_dmabuf->priv->filp);
320 kfree(gntdev_dmabuf);
321}
322
323static void dmabuf_exp_remove_map(struct gntdev_priv *priv,
324 struct gntdev_grant_map *map)
325{
326 mutex_lock(&priv->lock);
327 list_del(&map->next);
328 gntdev_put_map(NULL /* already removed */, map);
329 mutex_unlock(&priv->lock);
330}
331
332static void dmabuf_exp_ops_release(struct dma_buf *dma_buf)
333{
334 struct gntdev_dmabuf *gntdev_dmabuf = dma_buf->priv;
335 struct gntdev_dmabuf_priv *priv = gntdev_dmabuf->priv;
336
337 dmabuf_exp_remove_map(gntdev_dmabuf->u.exp.priv,
338 gntdev_dmabuf->u.exp.map);
339 mutex_lock(&priv->lock);
340 kref_put(&gntdev_dmabuf->u.exp.refcount, dmabuf_exp_release);
341 mutex_unlock(&priv->lock);
342}
343
344static const struct dma_buf_ops dmabuf_exp_ops = {
345 .attach = dmabuf_exp_ops_attach,
346 .detach = dmabuf_exp_ops_detach,
347 .map_dma_buf = dmabuf_exp_ops_map_dma_buf,
348 .unmap_dma_buf = dmabuf_exp_ops_unmap_dma_buf,
349 .release = dmabuf_exp_ops_release,
350};
351
352struct gntdev_dmabuf_export_args {
353 struct gntdev_priv *priv;
354 struct gntdev_grant_map *map;
355 struct gntdev_dmabuf_priv *dmabuf_priv;
356 struct device *dev;
357 int count;
358 struct page **pages;
359 u32 fd;
360};
361
362static int dmabuf_exp_from_pages(struct gntdev_dmabuf_export_args *args)
363{
364 DEFINE_DMA_BUF_EXPORT_INFO(exp_info);
365 struct gntdev_dmabuf *gntdev_dmabuf;
366 int ret;
367
368 gntdev_dmabuf = kzalloc(sizeof(*gntdev_dmabuf), GFP_KERNEL);
369 if (!gntdev_dmabuf)
370 return -ENOMEM;
371
372 kref_init(&gntdev_dmabuf->u.exp.refcount);
373
374 gntdev_dmabuf->priv = args->dmabuf_priv;
375 gntdev_dmabuf->nr_pages = args->count;
376 gntdev_dmabuf->pages = args->pages;
377 gntdev_dmabuf->u.exp.priv = args->priv;
378 gntdev_dmabuf->u.exp.map = args->map;
379
380 exp_info.exp_name = KBUILD_MODNAME;
381 if (args->dev->driver && args->dev->driver->owner)
382 exp_info.owner = args->dev->driver->owner;
383 else
384 exp_info.owner = THIS_MODULE;
385 exp_info.ops = &dmabuf_exp_ops;
386 exp_info.size = args->count << PAGE_SHIFT;
387 exp_info.flags = O_RDWR;
388 exp_info.priv = gntdev_dmabuf;
389
390 gntdev_dmabuf->dmabuf = dma_buf_export(&exp_info);
391 if (IS_ERR(gntdev_dmabuf->dmabuf)) {
392 ret = PTR_ERR(gntdev_dmabuf->dmabuf);
393 gntdev_dmabuf->dmabuf = NULL;
394 goto fail;
395 }
396
397 ret = dma_buf_fd(gntdev_dmabuf->dmabuf, O_CLOEXEC);
398 if (ret < 0)
399 goto fail;
400
401 gntdev_dmabuf->fd = ret;
402 args->fd = ret;
403
404 pr_debug("Exporting DMA buffer with fd %d\n", ret);
405
406 mutex_lock(&args->dmabuf_priv->lock);
407 list_add(&gntdev_dmabuf->next, &args->dmabuf_priv->exp_list);
408 mutex_unlock(&args->dmabuf_priv->lock);
409 get_file(gntdev_dmabuf->priv->filp);
410 return 0;
411
412fail:
413 if (gntdev_dmabuf->dmabuf)
414 dma_buf_put(gntdev_dmabuf->dmabuf);
415 kfree(gntdev_dmabuf);
416 return ret;
417}
418
419static struct gntdev_grant_map *
420dmabuf_exp_alloc_backing_storage(struct gntdev_priv *priv, int dmabuf_flags,
421 int count)
422{
423 struct gntdev_grant_map *map;
424
425 if (unlikely(gntdev_test_page_count(count)))
426 return ERR_PTR(-EINVAL);
427
428 if ((dmabuf_flags & GNTDEV_DMA_FLAG_WC) &&
429 (dmabuf_flags & GNTDEV_DMA_FLAG_COHERENT)) {
430 pr_debug("Wrong dma-buf flags: 0x%x\n", dmabuf_flags);
431 return ERR_PTR(-EINVAL);
432 }
433
434 map = gntdev_alloc_map(priv, count, dmabuf_flags);
435 if (!map)
436 return ERR_PTR(-ENOMEM);
437
438 return map;
439}
440
441static int dmabuf_exp_from_refs(struct gntdev_priv *priv, int flags,
442 int count, u32 domid, u32 *refs, u32 *fd)
443{
444 struct gntdev_grant_map *map;
445 struct gntdev_dmabuf_export_args args;
446 int i, ret;
447
448 map = dmabuf_exp_alloc_backing_storage(priv, flags, count);
449 if (IS_ERR(map))
450 return PTR_ERR(map);
451
452 for (i = 0; i < count; i++) {
453 map->grants[i].domid = domid;
454 map->grants[i].ref = refs[i];
455 }
456
457 mutex_lock(&priv->lock);
458 gntdev_add_map(priv, map);
459 mutex_unlock(&priv->lock);
460
461 map->flags |= GNTMAP_host_map;
462#if defined(CONFIG_X86)
463 map->flags |= GNTMAP_device_map;
464#endif
465
466 ret = gntdev_map_grant_pages(map);
467 if (ret < 0)
468 goto out;
469
470 args.priv = priv;
471 args.map = map;
472 args.dev = priv->dma_dev;
473 args.dmabuf_priv = priv->dmabuf_priv;
474 args.count = map->count;
475 args.pages = map->pages;
476 args.fd = -1; /* Shut up unnecessary gcc warning for i386 */
477
478 ret = dmabuf_exp_from_pages(&args);
479 if (ret < 0)
480 goto out;
481
482 *fd = args.fd;
483 return 0;
484
485out:
486 dmabuf_exp_remove_map(priv, map);
487 return ret;
488}
489
490/* DMA buffer import support. */
491
492static int
493dmabuf_imp_grant_foreign_access(struct page **pages, u32 *refs,
494 int count, int domid)
495{
496 grant_ref_t priv_gref_head;
497 int i, ret;
498
499 ret = gnttab_alloc_grant_references(count, &priv_gref_head);
500 if (ret < 0) {
501 pr_debug("Cannot allocate grant references, ret %d\n", ret);
502 return ret;
503 }
504
505 for (i = 0; i < count; i++) {
506 int cur_ref;
507
508 cur_ref = gnttab_claim_grant_reference(&priv_gref_head);
509 if (cur_ref < 0) {
510 ret = cur_ref;
511 pr_debug("Cannot claim grant reference, ret %d\n", ret);
512 goto out;
513 }
514
515 gnttab_grant_foreign_access_ref(cur_ref, domid,
516 xen_page_to_gfn(pages[i]), 0);
517 refs[i] = cur_ref;
518 }
519
520 return 0;
521
522out:
523 gnttab_free_grant_references(priv_gref_head);
524 return ret;
525}
526
527static void dmabuf_imp_end_foreign_access(u32 *refs, int count)
528{
529 int i;
530
531 for (i = 0; i < count; i++)
532 if (refs[i] != GRANT_INVALID_REF)
533 gnttab_end_foreign_access(refs[i], 0, 0UL);
534}
535
536static void dmabuf_imp_free_storage(struct gntdev_dmabuf *gntdev_dmabuf)
537{
538 kfree(gntdev_dmabuf->pages);
539 kfree(gntdev_dmabuf->u.imp.refs);
540 kfree(gntdev_dmabuf);
541}
542
543static struct gntdev_dmabuf *dmabuf_imp_alloc_storage(int count)
544{
545 struct gntdev_dmabuf *gntdev_dmabuf;
546 int i;
547
548 gntdev_dmabuf = kzalloc(sizeof(*gntdev_dmabuf), GFP_KERNEL);
549 if (!gntdev_dmabuf)
550 goto fail_no_free;
551
552 gntdev_dmabuf->u.imp.refs = kcalloc(count,
553 sizeof(gntdev_dmabuf->u.imp.refs[0]),
554 GFP_KERNEL);
555 if (!gntdev_dmabuf->u.imp.refs)
556 goto fail;
557
558 gntdev_dmabuf->pages = kcalloc(count,
559 sizeof(gntdev_dmabuf->pages[0]),
560 GFP_KERNEL);
561 if (!gntdev_dmabuf->pages)
562 goto fail;
563
564 gntdev_dmabuf->nr_pages = count;
565
566 for (i = 0; i < count; i++)
567 gntdev_dmabuf->u.imp.refs[i] = GRANT_INVALID_REF;
568
569 return gntdev_dmabuf;
570
571fail:
572 dmabuf_imp_free_storage(gntdev_dmabuf);
573fail_no_free:
574 return ERR_PTR(-ENOMEM);
575}
576
577static struct gntdev_dmabuf *
578dmabuf_imp_to_refs(struct gntdev_dmabuf_priv *priv, struct device *dev,
579 int fd, int count, int domid)
580{
581 struct gntdev_dmabuf *gntdev_dmabuf, *ret;
582 struct dma_buf *dma_buf;
583 struct dma_buf_attachment *attach;
584 struct sg_table *sgt;
585 struct sg_page_iter sg_iter;
586 int i;
587
588 dma_buf = dma_buf_get(fd);
589 if (IS_ERR(dma_buf))
590 return ERR_CAST(dma_buf);
591
592 gntdev_dmabuf = dmabuf_imp_alloc_storage(count);
593 if (IS_ERR(gntdev_dmabuf)) {
594 ret = gntdev_dmabuf;
595 goto fail_put;
596 }
597
598 gntdev_dmabuf->priv = priv;
599 gntdev_dmabuf->fd = fd;
600
601 attach = dma_buf_attach(dma_buf, dev);
602 if (IS_ERR(attach)) {
603 ret = ERR_CAST(attach);
604 goto fail_free_obj;
605 }
606
607 gntdev_dmabuf->u.imp.attach = attach;
608
609 sgt = dma_buf_map_attachment(attach, DMA_BIDIRECTIONAL);
610 if (IS_ERR(sgt)) {
611 ret = ERR_CAST(sgt);
612 goto fail_detach;
613 }
614
615 /* Check that we have zero offset. */
616 if (sgt->sgl->offset) {
617 ret = ERR_PTR(-EINVAL);
618 pr_debug("DMA buffer has %d bytes offset, user-space expects 0\n",
619 sgt->sgl->offset);
620 goto fail_unmap;
621 }
622
623 /* Check number of pages that imported buffer has. */
624 if (attach->dmabuf->size != gntdev_dmabuf->nr_pages << PAGE_SHIFT) {
625 ret = ERR_PTR(-EINVAL);
626 pr_debug("DMA buffer has %zu pages, user-space expects %d\n",
627 attach->dmabuf->size, gntdev_dmabuf->nr_pages);
628 goto fail_unmap;
629 }
630
631 gntdev_dmabuf->u.imp.sgt = sgt;
632
633 /* Now convert sgt to array of pages and check for page validity. */
634 i = 0;
635 for_each_sgtable_page(sgt, &sg_iter, 0) {
636 struct page *page = sg_page_iter_page(&sg_iter);
637 /*
638 * Check if page is valid: this can happen if we are given
639 * a page from VRAM or other resources which are not backed
640 * by a struct page.
641 */
642 if (!pfn_valid(page_to_pfn(page))) {
643 ret = ERR_PTR(-EINVAL);
644 goto fail_unmap;
645 }
646
647 gntdev_dmabuf->pages[i++] = page;
648 }
649
650 ret = ERR_PTR(dmabuf_imp_grant_foreign_access(gntdev_dmabuf->pages,
651 gntdev_dmabuf->u.imp.refs,
652 count, domid));
653 if (IS_ERR(ret))
654 goto fail_end_access;
655
656 pr_debug("Imported DMA buffer with fd %d\n", fd);
657
658 mutex_lock(&priv->lock);
659 list_add(&gntdev_dmabuf->next, &priv->imp_list);
660 mutex_unlock(&priv->lock);
661
662 return gntdev_dmabuf;
663
664fail_end_access:
665 dmabuf_imp_end_foreign_access(gntdev_dmabuf->u.imp.refs, count);
666fail_unmap:
667 dma_buf_unmap_attachment(attach, sgt, DMA_BIDIRECTIONAL);
668fail_detach:
669 dma_buf_detach(dma_buf, attach);
670fail_free_obj:
671 dmabuf_imp_free_storage(gntdev_dmabuf);
672fail_put:
673 dma_buf_put(dma_buf);
674 return ret;
675}
676
677/*
678 * Find the hyper dma-buf by its file descriptor and remove
679 * it from the buffer's list.
680 */
681static struct gntdev_dmabuf *
682dmabuf_imp_find_unlink(struct gntdev_dmabuf_priv *priv, int fd)
683{
684 struct gntdev_dmabuf *q, *gntdev_dmabuf, *ret = ERR_PTR(-ENOENT);
685
686 mutex_lock(&priv->lock);
687 list_for_each_entry_safe(gntdev_dmabuf, q, &priv->imp_list, next) {
688 if (gntdev_dmabuf->fd == fd) {
689 pr_debug("Found gntdev_dmabuf in the import list\n");
690 ret = gntdev_dmabuf;
691 list_del(&gntdev_dmabuf->next);
692 break;
693 }
694 }
695 mutex_unlock(&priv->lock);
696 return ret;
697}
698
699static int dmabuf_imp_release(struct gntdev_dmabuf_priv *priv, u32 fd)
700{
701 struct gntdev_dmabuf *gntdev_dmabuf;
702 struct dma_buf_attachment *attach;
703 struct dma_buf *dma_buf;
704
705 gntdev_dmabuf = dmabuf_imp_find_unlink(priv, fd);
706 if (IS_ERR(gntdev_dmabuf))
707 return PTR_ERR(gntdev_dmabuf);
708
709 pr_debug("Releasing DMA buffer with fd %d\n", fd);
710
711 dmabuf_imp_end_foreign_access(gntdev_dmabuf->u.imp.refs,
712 gntdev_dmabuf->nr_pages);
713
714 attach = gntdev_dmabuf->u.imp.attach;
715
716 if (gntdev_dmabuf->u.imp.sgt)
717 dma_buf_unmap_attachment(attach, gntdev_dmabuf->u.imp.sgt,
718 DMA_BIDIRECTIONAL);
719 dma_buf = attach->dmabuf;
720 dma_buf_detach(attach->dmabuf, attach);
721 dma_buf_put(dma_buf);
722
723 dmabuf_imp_free_storage(gntdev_dmabuf);
724 return 0;
725}
726
727static void dmabuf_imp_release_all(struct gntdev_dmabuf_priv *priv)
728{
729 struct gntdev_dmabuf *q, *gntdev_dmabuf;
730
731 list_for_each_entry_safe(gntdev_dmabuf, q, &priv->imp_list, next)
732 dmabuf_imp_release(priv, gntdev_dmabuf->fd);
733}
734
735/* DMA buffer IOCTL support. */
736
737long gntdev_ioctl_dmabuf_exp_from_refs(struct gntdev_priv *priv, int use_ptemod,
738 struct ioctl_gntdev_dmabuf_exp_from_refs __user *u)
739{
740 struct ioctl_gntdev_dmabuf_exp_from_refs op;
741 u32 *refs;
742 long ret;
743
744 if (use_ptemod) {
745 pr_debug("Cannot provide dma-buf: use_ptemode %d\n",
746 use_ptemod);
747 return -EINVAL;
748 }
749
750 if (copy_from_user(&op, u, sizeof(op)) != 0)
751 return -EFAULT;
752
753 if (unlikely(gntdev_test_page_count(op.count)))
754 return -EINVAL;
755
756 refs = kcalloc(op.count, sizeof(*refs), GFP_KERNEL);
757 if (!refs)
758 return -ENOMEM;
759
760 if (copy_from_user(refs, u->refs, sizeof(*refs) * op.count) != 0) {
761 ret = -EFAULT;
762 goto out;
763 }
764
765 ret = dmabuf_exp_from_refs(priv, op.flags, op.count,
766 op.domid, refs, &op.fd);
767 if (ret)
768 goto out;
769
770 if (copy_to_user(u, &op, sizeof(op)) != 0)
771 ret = -EFAULT;
772
773out:
774 kfree(refs);
775 return ret;
776}
777
778long gntdev_ioctl_dmabuf_exp_wait_released(struct gntdev_priv *priv,
779 struct ioctl_gntdev_dmabuf_exp_wait_released __user *u)
780{
781 struct ioctl_gntdev_dmabuf_exp_wait_released op;
782
783 if (copy_from_user(&op, u, sizeof(op)) != 0)
784 return -EFAULT;
785
786 return dmabuf_exp_wait_released(priv->dmabuf_priv, op.fd,
787 op.wait_to_ms);
788}
789
790long gntdev_ioctl_dmabuf_imp_to_refs(struct gntdev_priv *priv,
791 struct ioctl_gntdev_dmabuf_imp_to_refs __user *u)
792{
793 struct ioctl_gntdev_dmabuf_imp_to_refs op;
794 struct gntdev_dmabuf *gntdev_dmabuf;
795 long ret;
796
797 if (copy_from_user(&op, u, sizeof(op)) != 0)
798 return -EFAULT;
799
800 if (unlikely(gntdev_test_page_count(op.count)))
801 return -EINVAL;
802
803 gntdev_dmabuf = dmabuf_imp_to_refs(priv->dmabuf_priv,
804 priv->dma_dev, op.fd,
805 op.count, op.domid);
806 if (IS_ERR(gntdev_dmabuf))
807 return PTR_ERR(gntdev_dmabuf);
808
809 if (copy_to_user(u->refs, gntdev_dmabuf->u.imp.refs,
810 sizeof(*u->refs) * op.count) != 0) {
811 ret = -EFAULT;
812 goto out_release;
813 }
814 return 0;
815
816out_release:
817 dmabuf_imp_release(priv->dmabuf_priv, op.fd);
818 return ret;
819}
820
821long gntdev_ioctl_dmabuf_imp_release(struct gntdev_priv *priv,
822 struct ioctl_gntdev_dmabuf_imp_release __user *u)
823{
824 struct ioctl_gntdev_dmabuf_imp_release op;
825
826 if (copy_from_user(&op, u, sizeof(op)) != 0)
827 return -EFAULT;
828
829 return dmabuf_imp_release(priv->dmabuf_priv, op.fd);
830}
831
832struct gntdev_dmabuf_priv *gntdev_dmabuf_init(struct file *filp)
833{
834 struct gntdev_dmabuf_priv *priv;
835
836 priv = kzalloc(sizeof(*priv), GFP_KERNEL);
837 if (!priv)
838 return ERR_PTR(-ENOMEM);
839
840 mutex_init(&priv->lock);
841 INIT_LIST_HEAD(&priv->exp_list);
842 INIT_LIST_HEAD(&priv->exp_wait_list);
843 INIT_LIST_HEAD(&priv->imp_list);
844
845 priv->filp = filp;
846
847 return priv;
848}
849
850void gntdev_dmabuf_fini(struct gntdev_dmabuf_priv *priv)
851{
852 dmabuf_imp_release_all(priv);
853 kfree(priv);
854}