GNU Linux-libre 5.10.215-gnu1
[releases.git] / drivers / misc / fastrpc.c
1 // SPDX-License-Identifier: GPL-2.0
2 // Copyright (c) 2011-2018, The Linux Foundation. All rights reserved.
3 // Copyright (c) 2018, Linaro Limited
4
5 #include <linux/completion.h>
6 #include <linux/device.h>
7 #include <linux/dma-buf.h>
8 #include <linux/dma-mapping.h>
9 #include <linux/idr.h>
10 #include <linux/list.h>
11 #include <linux/miscdevice.h>
12 #include <linux/module.h>
13 #include <linux/of_address.h>
14 #include <linux/of.h>
15 #include <linux/sort.h>
16 #include <linux/of_platform.h>
17 #include <linux/rpmsg.h>
18 #include <linux/scatterlist.h>
19 #include <linux/slab.h>
20 #include <uapi/misc/fastrpc.h>
21
22 #define ADSP_DOMAIN_ID (0)
23 #define MDSP_DOMAIN_ID (1)
24 #define SDSP_DOMAIN_ID (2)
25 #define CDSP_DOMAIN_ID (3)
26 #define FASTRPC_DEV_MAX         4 /* adsp, mdsp, slpi, cdsp*/
27 #define FASTRPC_MAX_SESSIONS    9 /*8 compute, 1 cpz*/
28 #define FASTRPC_ALIGN           128
29 #define FASTRPC_MAX_FDLIST      16
30 #define FASTRPC_MAX_CRCLIST     64
31 #define FASTRPC_PHYS(p) ((p) & 0xffffffff)
32 #define FASTRPC_CTX_MAX (256)
33 #define FASTRPC_INIT_HANDLE     1
34 #define FASTRPC_CTXID_MASK (0xFF0)
35 #define INIT_FILELEN_MAX (2 * 1024 * 1024)
36 #define FASTRPC_DEVICE_NAME     "fastrpc"
37 #define ADSP_MMAP_ADD_PAGES 0x1000
38
39 /* Retrives number of input buffers from the scalars parameter */
40 #define REMOTE_SCALARS_INBUFS(sc)       (((sc) >> 16) & 0x0ff)
41
42 /* Retrives number of output buffers from the scalars parameter */
43 #define REMOTE_SCALARS_OUTBUFS(sc)      (((sc) >> 8) & 0x0ff)
44
45 /* Retrives number of input handles from the scalars parameter */
46 #define REMOTE_SCALARS_INHANDLES(sc)    (((sc) >> 4) & 0x0f)
47
48 /* Retrives number of output handles from the scalars parameter */
49 #define REMOTE_SCALARS_OUTHANDLES(sc)   ((sc) & 0x0f)
50
51 #define REMOTE_SCALARS_LENGTH(sc)       (REMOTE_SCALARS_INBUFS(sc) +   \
52                                          REMOTE_SCALARS_OUTBUFS(sc) +  \
53                                          REMOTE_SCALARS_INHANDLES(sc)+ \
54                                          REMOTE_SCALARS_OUTHANDLES(sc))
55 #define FASTRPC_BUILD_SCALARS(attr, method, in, out, oin, oout)  \
56                                 (((attr & 0x07) << 29) |                \
57                                 ((method & 0x1f) << 24) |       \
58                                 ((in & 0xff) << 16) |           \
59                                 ((out & 0xff) <<  8) |          \
60                                 ((oin & 0x0f) <<  4) |          \
61                                 (oout & 0x0f))
62
63 #define FASTRPC_SCALARS(method, in, out) \
64                 FASTRPC_BUILD_SCALARS(0, method, in, out, 0, 0)
65
66 #define FASTRPC_CREATE_PROCESS_NARGS    6
67 /* Remote Method id table */
68 #define FASTRPC_RMID_INIT_ATTACH        0
69 #define FASTRPC_RMID_INIT_RELEASE       1
70 #define FASTRPC_RMID_INIT_MMAP          4
71 #define FASTRPC_RMID_INIT_MUNMAP        5
72 #define FASTRPC_RMID_INIT_CREATE        6
73 #define FASTRPC_RMID_INIT_CREATE_ATTR   7
74 #define FASTRPC_RMID_INIT_CREATE_STATIC 8
75
76 /* Protection Domain(PD) ids */
77 #define AUDIO_PD        (0) /* also GUEST_OS PD? */
78 #define USER_PD         (1)
79 #define SENSORS_PD      (2)
80
81 #define miscdev_to_cctx(d) container_of(d, struct fastrpc_channel_ctx, miscdev)
82
83 static const char *domains[FASTRPC_DEV_MAX] = { "adsp", "mdsp",
84                                                 "sdsp", "cdsp"};
85 struct fastrpc_phy_page {
86         u64 addr;               /* physical address */
87         u64 size;               /* size of contiguous region */
88 };
89
90 struct fastrpc_invoke_buf {
91         u32 num;                /* number of contiguous regions */
92         u32 pgidx;              /* index to start of contiguous region */
93 };
94
95 struct fastrpc_remote_arg {
96         u64 pv;
97         u64 len;
98 };
99
100 struct fastrpc_mmap_rsp_msg {
101         u64 vaddr;
102 };
103
104 struct fastrpc_mmap_req_msg {
105         s32 pgid;
106         u32 flags;
107         u64 vaddr;
108         s32 num;
109 };
110
111 struct fastrpc_munmap_req_msg {
112         s32 pgid;
113         u64 vaddr;
114         u64 size;
115 };
116
117 struct fastrpc_msg {
118         int pid;                /* process group id */
119         int tid;                /* thread id */
120         u64 ctx;                /* invoke caller context */
121         u32 handle;     /* handle to invoke */
122         u32 sc;         /* scalars structure describing the data */
123         u64 addr;               /* physical address */
124         u64 size;               /* size of contiguous region */
125 };
126
127 struct fastrpc_invoke_rsp {
128         u64 ctx;                /* invoke caller context */
129         int retval;             /* invoke return value */
130 };
131
132 struct fastrpc_buf_overlap {
133         u64 start;
134         u64 end;
135         int raix;
136         u64 mstart;
137         u64 mend;
138         u64 offset;
139 };
140
141 struct fastrpc_buf {
142         struct fastrpc_user *fl;
143         struct dma_buf *dmabuf;
144         struct device *dev;
145         void *virt;
146         u64 phys;
147         u64 size;
148         /* Lock for dma buf attachments */
149         struct mutex lock;
150         struct list_head attachments;
151         /* mmap support */
152         struct list_head node; /* list of user requested mmaps */
153         uintptr_t raddr;
154 };
155
156 struct fastrpc_dma_buf_attachment {
157         struct device *dev;
158         struct sg_table sgt;
159         struct list_head node;
160 };
161
162 struct fastrpc_map {
163         struct list_head node;
164         struct fastrpc_user *fl;
165         int fd;
166         struct dma_buf *buf;
167         struct sg_table *table;
168         struct dma_buf_attachment *attach;
169         u64 phys;
170         u64 size;
171         void *va;
172         u64 len;
173         struct kref refcount;
174 };
175
176 struct fastrpc_invoke_ctx {
177         int nscalars;
178         int nbufs;
179         int retval;
180         int pid;
181         int tgid;
182         u32 sc;
183         u32 *crc;
184         u64 ctxid;
185         u64 msg_sz;
186         struct kref refcount;
187         struct list_head node; /* list of ctxs */
188         struct completion work;
189         struct work_struct put_work;
190         struct fastrpc_msg msg;
191         struct fastrpc_user *fl;
192         struct fastrpc_remote_arg *rpra;
193         struct fastrpc_map **maps;
194         struct fastrpc_buf *buf;
195         struct fastrpc_invoke_args *args;
196         struct fastrpc_buf_overlap *olaps;
197         struct fastrpc_channel_ctx *cctx;
198 };
199
200 struct fastrpc_session_ctx {
201         struct device *dev;
202         int sid;
203         bool used;
204         bool valid;
205 };
206
207 struct fastrpc_channel_ctx {
208         int domain_id;
209         int sesscount;
210         struct rpmsg_device *rpdev;
211         struct fastrpc_session_ctx session[FASTRPC_MAX_SESSIONS];
212         spinlock_t lock;
213         struct idr ctx_idr;
214         struct list_head users;
215         struct miscdevice miscdev;
216         struct kref refcount;
217 };
218
219 struct fastrpc_user {
220         struct list_head user;
221         struct list_head maps;
222         struct list_head pending;
223         struct list_head mmaps;
224
225         struct fastrpc_channel_ctx *cctx;
226         struct fastrpc_session_ctx *sctx;
227         struct fastrpc_buf *init_mem;
228
229         int tgid;
230         int pd;
231         /* Lock for lists */
232         spinlock_t lock;
233         /* lock for allocations */
234         struct mutex mutex;
235 };
236
237 static void fastrpc_free_map(struct kref *ref)
238 {
239         struct fastrpc_map *map;
240
241         map = container_of(ref, struct fastrpc_map, refcount);
242
243         if (map->table) {
244                 dma_buf_unmap_attachment(map->attach, map->table,
245                                          DMA_BIDIRECTIONAL);
246                 dma_buf_detach(map->buf, map->attach);
247                 dma_buf_put(map->buf);
248         }
249
250         if (map->fl) {
251                 spin_lock(&map->fl->lock);
252                 list_del(&map->node);
253                 spin_unlock(&map->fl->lock);
254                 map->fl = NULL;
255         }
256
257         kfree(map);
258 }
259
260 static void fastrpc_map_put(struct fastrpc_map *map)
261 {
262         if (map)
263                 kref_put(&map->refcount, fastrpc_free_map);
264 }
265
266 static int fastrpc_map_get(struct fastrpc_map *map)
267 {
268         if (!map)
269                 return -ENOENT;
270
271         return kref_get_unless_zero(&map->refcount) ? 0 : -ENOENT;
272 }
273
274 static int fastrpc_map_find(struct fastrpc_user *fl, int fd,
275                             struct fastrpc_map **ppmap)
276 {
277         struct fastrpc_map *map = NULL;
278
279         mutex_lock(&fl->mutex);
280         list_for_each_entry(map, &fl->maps, node) {
281                 if (map->fd == fd) {
282                         fastrpc_map_get(map);
283                         *ppmap = map;
284                         mutex_unlock(&fl->mutex);
285                         return 0;
286                 }
287         }
288         mutex_unlock(&fl->mutex);
289
290         return -ENOENT;
291 }
292
293 static void fastrpc_buf_free(struct fastrpc_buf *buf)
294 {
295         dma_free_coherent(buf->dev, buf->size, buf->virt,
296                           FASTRPC_PHYS(buf->phys));
297         kfree(buf);
298 }
299
300 static int fastrpc_buf_alloc(struct fastrpc_user *fl, struct device *dev,
301                              u64 size, struct fastrpc_buf **obuf)
302 {
303         struct fastrpc_buf *buf;
304
305         buf = kzalloc(sizeof(*buf), GFP_KERNEL);
306         if (!buf)
307                 return -ENOMEM;
308
309         INIT_LIST_HEAD(&buf->attachments);
310         INIT_LIST_HEAD(&buf->node);
311         mutex_init(&buf->lock);
312
313         buf->fl = fl;
314         buf->virt = NULL;
315         buf->phys = 0;
316         buf->size = size;
317         buf->dev = dev;
318         buf->raddr = 0;
319
320         buf->virt = dma_alloc_coherent(dev, buf->size, (dma_addr_t *)&buf->phys,
321                                        GFP_KERNEL);
322         if (!buf->virt) {
323                 mutex_destroy(&buf->lock);
324                 kfree(buf);
325                 return -ENOMEM;
326         }
327
328         if (fl->sctx && fl->sctx->sid)
329                 buf->phys += ((u64)fl->sctx->sid << 32);
330
331         *obuf = buf;
332
333         return 0;
334 }
335
336 static void fastrpc_channel_ctx_free(struct kref *ref)
337 {
338         struct fastrpc_channel_ctx *cctx;
339
340         cctx = container_of(ref, struct fastrpc_channel_ctx, refcount);
341
342         kfree(cctx);
343 }
344
345 static void fastrpc_channel_ctx_get(struct fastrpc_channel_ctx *cctx)
346 {
347         kref_get(&cctx->refcount);
348 }
349
350 static void fastrpc_channel_ctx_put(struct fastrpc_channel_ctx *cctx)
351 {
352         kref_put(&cctx->refcount, fastrpc_channel_ctx_free);
353 }
354
355 static void fastrpc_context_free(struct kref *ref)
356 {
357         struct fastrpc_invoke_ctx *ctx;
358         struct fastrpc_channel_ctx *cctx;
359         unsigned long flags;
360         int i;
361
362         ctx = container_of(ref, struct fastrpc_invoke_ctx, refcount);
363         cctx = ctx->cctx;
364
365         for (i = 0; i < ctx->nscalars; i++)
366                 fastrpc_map_put(ctx->maps[i]);
367
368         if (ctx->buf)
369                 fastrpc_buf_free(ctx->buf);
370
371         spin_lock_irqsave(&cctx->lock, flags);
372         idr_remove(&cctx->ctx_idr, ctx->ctxid >> 4);
373         spin_unlock_irqrestore(&cctx->lock, flags);
374
375         kfree(ctx->maps);
376         kfree(ctx->olaps);
377         kfree(ctx);
378
379         fastrpc_channel_ctx_put(cctx);
380 }
381
382 static void fastrpc_context_get(struct fastrpc_invoke_ctx *ctx)
383 {
384         kref_get(&ctx->refcount);
385 }
386
387 static void fastrpc_context_put(struct fastrpc_invoke_ctx *ctx)
388 {
389         kref_put(&ctx->refcount, fastrpc_context_free);
390 }
391
392 static void fastrpc_context_put_wq(struct work_struct *work)
393 {
394         struct fastrpc_invoke_ctx *ctx =
395                         container_of(work, struct fastrpc_invoke_ctx, put_work);
396
397         fastrpc_context_put(ctx);
398 }
399
400 #define CMP(aa, bb) ((aa) == (bb) ? 0 : (aa) < (bb) ? -1 : 1)
401 static int olaps_cmp(const void *a, const void *b)
402 {
403         struct fastrpc_buf_overlap *pa = (struct fastrpc_buf_overlap *)a;
404         struct fastrpc_buf_overlap *pb = (struct fastrpc_buf_overlap *)b;
405         /* sort with lowest starting buffer first */
406         int st = CMP(pa->start, pb->start);
407         /* sort with highest ending buffer first */
408         int ed = CMP(pb->end, pa->end);
409
410         return st == 0 ? ed : st;
411 }
412
413 static void fastrpc_get_buff_overlaps(struct fastrpc_invoke_ctx *ctx)
414 {
415         u64 max_end = 0;
416         int i;
417
418         for (i = 0; i < ctx->nbufs; ++i) {
419                 ctx->olaps[i].start = ctx->args[i].ptr;
420                 ctx->olaps[i].end = ctx->olaps[i].start + ctx->args[i].length;
421                 ctx->olaps[i].raix = i;
422         }
423
424         sort(ctx->olaps, ctx->nbufs, sizeof(*ctx->olaps), olaps_cmp, NULL);
425
426         for (i = 0; i < ctx->nbufs; ++i) {
427                 /* Falling inside previous range */
428                 if (ctx->olaps[i].start < max_end) {
429                         ctx->olaps[i].mstart = max_end;
430                         ctx->olaps[i].mend = ctx->olaps[i].end;
431                         ctx->olaps[i].offset = max_end - ctx->olaps[i].start;
432
433                         if (ctx->olaps[i].end > max_end) {
434                                 max_end = ctx->olaps[i].end;
435                         } else {
436                                 ctx->olaps[i].mend = 0;
437                                 ctx->olaps[i].mstart = 0;
438                         }
439
440                 } else  {
441                         ctx->olaps[i].mend = ctx->olaps[i].end;
442                         ctx->olaps[i].mstart = ctx->olaps[i].start;
443                         ctx->olaps[i].offset = 0;
444                         max_end = ctx->olaps[i].end;
445                 }
446         }
447 }
448
449 static struct fastrpc_invoke_ctx *fastrpc_context_alloc(
450                         struct fastrpc_user *user, u32 kernel, u32 sc,
451                         struct fastrpc_invoke_args *args)
452 {
453         struct fastrpc_channel_ctx *cctx = user->cctx;
454         struct fastrpc_invoke_ctx *ctx = NULL;
455         unsigned long flags;
456         int ret;
457
458         ctx = kzalloc(sizeof(*ctx), GFP_KERNEL);
459         if (!ctx)
460                 return ERR_PTR(-ENOMEM);
461
462         INIT_LIST_HEAD(&ctx->node);
463         ctx->fl = user;
464         ctx->nscalars = REMOTE_SCALARS_LENGTH(sc);
465         ctx->nbufs = REMOTE_SCALARS_INBUFS(sc) +
466                      REMOTE_SCALARS_OUTBUFS(sc);
467
468         if (ctx->nscalars) {
469                 ctx->maps = kcalloc(ctx->nscalars,
470                                     sizeof(*ctx->maps), GFP_KERNEL);
471                 if (!ctx->maps) {
472                         kfree(ctx);
473                         return ERR_PTR(-ENOMEM);
474                 }
475                 ctx->olaps = kcalloc(ctx->nscalars,
476                                     sizeof(*ctx->olaps), GFP_KERNEL);
477                 if (!ctx->olaps) {
478                         kfree(ctx->maps);
479                         kfree(ctx);
480                         return ERR_PTR(-ENOMEM);
481                 }
482                 ctx->args = args;
483                 fastrpc_get_buff_overlaps(ctx);
484         }
485
486         /* Released in fastrpc_context_put() */
487         fastrpc_channel_ctx_get(cctx);
488
489         ctx->sc = sc;
490         ctx->retval = -1;
491         ctx->pid = current->pid;
492         ctx->tgid = user->tgid;
493         ctx->cctx = cctx;
494         init_completion(&ctx->work);
495         INIT_WORK(&ctx->put_work, fastrpc_context_put_wq);
496
497         spin_lock(&user->lock);
498         list_add_tail(&ctx->node, &user->pending);
499         spin_unlock(&user->lock);
500
501         spin_lock_irqsave(&cctx->lock, flags);
502         ret = idr_alloc_cyclic(&cctx->ctx_idr, ctx, 1,
503                                FASTRPC_CTX_MAX, GFP_ATOMIC);
504         if (ret < 0) {
505                 spin_unlock_irqrestore(&cctx->lock, flags);
506                 goto err_idr;
507         }
508         ctx->ctxid = ret << 4;
509         spin_unlock_irqrestore(&cctx->lock, flags);
510
511         kref_init(&ctx->refcount);
512
513         return ctx;
514 err_idr:
515         spin_lock(&user->lock);
516         list_del(&ctx->node);
517         spin_unlock(&user->lock);
518         fastrpc_channel_ctx_put(cctx);
519         kfree(ctx->maps);
520         kfree(ctx->olaps);
521         kfree(ctx);
522
523         return ERR_PTR(ret);
524 }
525
526 static struct sg_table *
527 fastrpc_map_dma_buf(struct dma_buf_attachment *attachment,
528                     enum dma_data_direction dir)
529 {
530         struct fastrpc_dma_buf_attachment *a = attachment->priv;
531         struct sg_table *table;
532         int ret;
533
534         table = &a->sgt;
535
536         ret = dma_map_sgtable(attachment->dev, table, dir, 0);
537         if (ret)
538                 table = ERR_PTR(ret);
539         return table;
540 }
541
542 static void fastrpc_unmap_dma_buf(struct dma_buf_attachment *attach,
543                                   struct sg_table *table,
544                                   enum dma_data_direction dir)
545 {
546         dma_unmap_sgtable(attach->dev, table, dir, 0);
547 }
548
549 static void fastrpc_release(struct dma_buf *dmabuf)
550 {
551         struct fastrpc_buf *buffer = dmabuf->priv;
552
553         fastrpc_buf_free(buffer);
554 }
555
556 static int fastrpc_dma_buf_attach(struct dma_buf *dmabuf,
557                                   struct dma_buf_attachment *attachment)
558 {
559         struct fastrpc_dma_buf_attachment *a;
560         struct fastrpc_buf *buffer = dmabuf->priv;
561         int ret;
562
563         a = kzalloc(sizeof(*a), GFP_KERNEL);
564         if (!a)
565                 return -ENOMEM;
566
567         ret = dma_get_sgtable(buffer->dev, &a->sgt, buffer->virt,
568                               FASTRPC_PHYS(buffer->phys), buffer->size);
569         if (ret < 0) {
570                 dev_err(buffer->dev, "failed to get scatterlist from DMA API\n");
571                 kfree(a);
572                 return -EINVAL;
573         }
574
575         a->dev = attachment->dev;
576         INIT_LIST_HEAD(&a->node);
577         attachment->priv = a;
578
579         mutex_lock(&buffer->lock);
580         list_add(&a->node, &buffer->attachments);
581         mutex_unlock(&buffer->lock);
582
583         return 0;
584 }
585
586 static void fastrpc_dma_buf_detatch(struct dma_buf *dmabuf,
587                                     struct dma_buf_attachment *attachment)
588 {
589         struct fastrpc_dma_buf_attachment *a = attachment->priv;
590         struct fastrpc_buf *buffer = dmabuf->priv;
591
592         mutex_lock(&buffer->lock);
593         list_del(&a->node);
594         mutex_unlock(&buffer->lock);
595         sg_free_table(&a->sgt);
596         kfree(a);
597 }
598
599 static void *fastrpc_vmap(struct dma_buf *dmabuf)
600 {
601         struct fastrpc_buf *buf = dmabuf->priv;
602
603         return buf->virt;
604 }
605
606 static int fastrpc_mmap(struct dma_buf *dmabuf,
607                         struct vm_area_struct *vma)
608 {
609         struct fastrpc_buf *buf = dmabuf->priv;
610         size_t size = vma->vm_end - vma->vm_start;
611
612         return dma_mmap_coherent(buf->dev, vma, buf->virt,
613                                  FASTRPC_PHYS(buf->phys), size);
614 }
615
616 static const struct dma_buf_ops fastrpc_dma_buf_ops = {
617         .attach = fastrpc_dma_buf_attach,
618         .detach = fastrpc_dma_buf_detatch,
619         .map_dma_buf = fastrpc_map_dma_buf,
620         .unmap_dma_buf = fastrpc_unmap_dma_buf,
621         .mmap = fastrpc_mmap,
622         .vmap = fastrpc_vmap,
623         .release = fastrpc_release,
624 };
625
626 static int fastrpc_map_create(struct fastrpc_user *fl, int fd,
627                               u64 len, struct fastrpc_map **ppmap)
628 {
629         struct fastrpc_session_ctx *sess = fl->sctx;
630         struct fastrpc_map *map = NULL;
631         int err = 0;
632
633         if (!fastrpc_map_find(fl, fd, ppmap))
634                 return 0;
635
636         map = kzalloc(sizeof(*map), GFP_KERNEL);
637         if (!map)
638                 return -ENOMEM;
639
640         INIT_LIST_HEAD(&map->node);
641         map->fl = fl;
642         map->fd = fd;
643         map->buf = dma_buf_get(fd);
644         if (IS_ERR(map->buf)) {
645                 err = PTR_ERR(map->buf);
646                 goto get_err;
647         }
648
649         map->attach = dma_buf_attach(map->buf, sess->dev);
650         if (IS_ERR(map->attach)) {
651                 dev_err(sess->dev, "Failed to attach dmabuf\n");
652                 err = PTR_ERR(map->attach);
653                 goto attach_err;
654         }
655
656         map->table = dma_buf_map_attachment(map->attach, DMA_BIDIRECTIONAL);
657         if (IS_ERR(map->table)) {
658                 err = PTR_ERR(map->table);
659                 goto map_err;
660         }
661
662         map->phys = sg_dma_address(map->table->sgl);
663         map->phys += ((u64)fl->sctx->sid << 32);
664         map->size = len;
665         map->va = sg_virt(map->table->sgl);
666         map->len = len;
667         kref_init(&map->refcount);
668
669         spin_lock(&fl->lock);
670         list_add_tail(&map->node, &fl->maps);
671         spin_unlock(&fl->lock);
672         *ppmap = map;
673
674         return 0;
675
676 map_err:
677         dma_buf_detach(map->buf, map->attach);
678 attach_err:
679         dma_buf_put(map->buf);
680 get_err:
681         kfree(map);
682
683         return err;
684 }
685
686 /*
687  * Fastrpc payload buffer with metadata looks like:
688  *
689  * >>>>>>  START of METADATA <<<<<<<<<
690  * +---------------------------------+
691  * |           Arguments             |
692  * | type:(struct fastrpc_remote_arg)|
693  * |             (0 - N)             |
694  * +---------------------------------+
695  * |         Invoke Buffer list      |
696  * | type:(struct fastrpc_invoke_buf)|
697  * |           (0 - N)               |
698  * +---------------------------------+
699  * |         Page info list          |
700  * | type:(struct fastrpc_phy_page)  |
701  * |             (0 - N)             |
702  * +---------------------------------+
703  * |         Optional info           |
704  * |(can be specific to SoC/Firmware)|
705  * +---------------------------------+
706  * >>>>>>>>  END of METADATA <<<<<<<<<
707  * +---------------------------------+
708  * |         Inline ARGS             |
709  * |            (0-N)                |
710  * +---------------------------------+
711  */
712
713 static int fastrpc_get_meta_size(struct fastrpc_invoke_ctx *ctx)
714 {
715         int size = 0;
716
717         size = (sizeof(struct fastrpc_remote_arg) +
718                 sizeof(struct fastrpc_invoke_buf) +
719                 sizeof(struct fastrpc_phy_page)) * ctx->nscalars +
720                 sizeof(u64) * FASTRPC_MAX_FDLIST +
721                 sizeof(u32) * FASTRPC_MAX_CRCLIST;
722
723         return size;
724 }
725
726 static u64 fastrpc_get_payload_size(struct fastrpc_invoke_ctx *ctx, int metalen)
727 {
728         u64 size = 0;
729         int oix;
730
731         size = ALIGN(metalen, FASTRPC_ALIGN);
732         for (oix = 0; oix < ctx->nbufs; oix++) {
733                 int i = ctx->olaps[oix].raix;
734
735                 if (ctx->args[i].fd == 0 || ctx->args[i].fd == -1) {
736
737                         if (ctx->olaps[oix].offset == 0)
738                                 size = ALIGN(size, FASTRPC_ALIGN);
739
740                         size += (ctx->olaps[oix].mend - ctx->olaps[oix].mstart);
741                 }
742         }
743
744         return size;
745 }
746
747 static int fastrpc_create_maps(struct fastrpc_invoke_ctx *ctx)
748 {
749         struct device *dev = ctx->fl->sctx->dev;
750         int i, err;
751
752         for (i = 0; i < ctx->nscalars; ++i) {
753                 /* Make sure reserved field is set to 0 */
754                 if (ctx->args[i].reserved)
755                         return -EINVAL;
756
757                 if (ctx->args[i].fd == 0 || ctx->args[i].fd == -1 ||
758                     ctx->args[i].length == 0)
759                         continue;
760
761                 err = fastrpc_map_create(ctx->fl, ctx->args[i].fd,
762                                          ctx->args[i].length, &ctx->maps[i]);
763                 if (err) {
764                         dev_err(dev, "Error Creating map %d\n", err);
765                         return -EINVAL;
766                 }
767
768         }
769         return 0;
770 }
771
772 static int fastrpc_get_args(u32 kernel, struct fastrpc_invoke_ctx *ctx)
773 {
774         struct device *dev = ctx->fl->sctx->dev;
775         struct fastrpc_remote_arg *rpra;
776         struct fastrpc_invoke_buf *list;
777         struct fastrpc_phy_page *pages;
778         int inbufs, i, oix, err = 0;
779         u64 len, rlen, pkt_size;
780         u64 pg_start, pg_end;
781         uintptr_t args;
782         int metalen;
783
784         inbufs = REMOTE_SCALARS_INBUFS(ctx->sc);
785         metalen = fastrpc_get_meta_size(ctx);
786         pkt_size = fastrpc_get_payload_size(ctx, metalen);
787
788         err = fastrpc_create_maps(ctx);
789         if (err)
790                 return err;
791
792         ctx->msg_sz = pkt_size;
793
794         err = fastrpc_buf_alloc(ctx->fl, dev, pkt_size, &ctx->buf);
795         if (err)
796                 return err;
797
798         rpra = ctx->buf->virt;
799         list = ctx->buf->virt + ctx->nscalars * sizeof(*rpra);
800         pages = ctx->buf->virt + ctx->nscalars * (sizeof(*list) +
801                 sizeof(*rpra));
802         args = (uintptr_t)ctx->buf->virt + metalen;
803         rlen = pkt_size - metalen;
804         ctx->rpra = rpra;
805
806         for (oix = 0; oix < ctx->nbufs; ++oix) {
807                 int mlen;
808
809                 i = ctx->olaps[oix].raix;
810                 len = ctx->args[i].length;
811
812                 rpra[i].pv = 0;
813                 rpra[i].len = len;
814                 list[i].num = len ? 1 : 0;
815                 list[i].pgidx = i;
816
817                 if (!len)
818                         continue;
819
820                 if (ctx->maps[i]) {
821                         struct vm_area_struct *vma = NULL;
822
823                         rpra[i].pv = (u64) ctx->args[i].ptr;
824                         pages[i].addr = ctx->maps[i]->phys;
825
826                         mmap_read_lock(current->mm);
827                         vma = find_vma(current->mm, ctx->args[i].ptr);
828                         if (vma)
829                                 pages[i].addr += ctx->args[i].ptr -
830                                                  vma->vm_start;
831                         mmap_read_unlock(current->mm);
832
833                         pg_start = (ctx->args[i].ptr & PAGE_MASK) >> PAGE_SHIFT;
834                         pg_end = ((ctx->args[i].ptr + len - 1) & PAGE_MASK) >>
835                                   PAGE_SHIFT;
836                         pages[i].size = (pg_end - pg_start + 1) * PAGE_SIZE;
837
838                 } else {
839
840                         if (ctx->olaps[oix].offset == 0) {
841                                 rlen -= ALIGN(args, FASTRPC_ALIGN) - args;
842                                 args = ALIGN(args, FASTRPC_ALIGN);
843                         }
844
845                         mlen = ctx->olaps[oix].mend - ctx->olaps[oix].mstart;
846
847                         if (rlen < mlen)
848                                 goto bail;
849
850                         rpra[i].pv = args - ctx->olaps[oix].offset;
851                         pages[i].addr = ctx->buf->phys -
852                                         ctx->olaps[oix].offset +
853                                         (pkt_size - rlen);
854                         pages[i].addr = pages[i].addr & PAGE_MASK;
855
856                         pg_start = (args & PAGE_MASK) >> PAGE_SHIFT;
857                         pg_end = ((args + len - 1) & PAGE_MASK) >> PAGE_SHIFT;
858                         pages[i].size = (pg_end - pg_start + 1) * PAGE_SIZE;
859                         args = args + mlen;
860                         rlen -= mlen;
861                 }
862
863                 if (i < inbufs && !ctx->maps[i]) {
864                         void *dst = (void *)(uintptr_t)rpra[i].pv;
865                         void *src = (void *)(uintptr_t)ctx->args[i].ptr;
866
867                         if (!kernel) {
868                                 if (copy_from_user(dst, (void __user *)src,
869                                                    len)) {
870                                         err = -EFAULT;
871                                         goto bail;
872                                 }
873                         } else {
874                                 memcpy(dst, src, len);
875                         }
876                 }
877         }
878
879         for (i = ctx->nbufs; i < ctx->nscalars; ++i) {
880                 rpra[i].pv = (u64) ctx->args[i].ptr;
881                 rpra[i].len = ctx->args[i].length;
882                 list[i].num = ctx->args[i].length ? 1 : 0;
883                 list[i].pgidx = i;
884                 pages[i].addr = ctx->maps[i]->phys;
885                 pages[i].size = ctx->maps[i]->size;
886         }
887
888 bail:
889         if (err)
890                 dev_err(dev, "Error: get invoke args failed:%d\n", err);
891
892         return err;
893 }
894
895 static int fastrpc_put_args(struct fastrpc_invoke_ctx *ctx,
896                             u32 kernel)
897 {
898         struct fastrpc_remote_arg *rpra = ctx->rpra;
899         int i, inbufs;
900
901         inbufs = REMOTE_SCALARS_INBUFS(ctx->sc);
902
903         for (i = inbufs; i < ctx->nbufs; ++i) {
904                 void *src = (void *)(uintptr_t)rpra[i].pv;
905                 void *dst = (void *)(uintptr_t)ctx->args[i].ptr;
906                 u64 len = rpra[i].len;
907
908                 if (!kernel) {
909                         if (copy_to_user((void __user *)dst, src, len))
910                                 return -EFAULT;
911                 } else {
912                         memcpy(dst, src, len);
913                 }
914         }
915
916         return 0;
917 }
918
919 static int fastrpc_invoke_send(struct fastrpc_session_ctx *sctx,
920                                struct fastrpc_invoke_ctx *ctx,
921                                u32 kernel, uint32_t handle)
922 {
923         struct fastrpc_channel_ctx *cctx;
924         struct fastrpc_user *fl = ctx->fl;
925         struct fastrpc_msg *msg = &ctx->msg;
926         int ret;
927
928         cctx = fl->cctx;
929         msg->pid = fl->tgid;
930         msg->tid = current->pid;
931
932         if (kernel)
933                 msg->pid = 0;
934
935         msg->ctx = ctx->ctxid | fl->pd;
936         msg->handle = handle;
937         msg->sc = ctx->sc;
938         msg->addr = ctx->buf ? ctx->buf->phys : 0;
939         msg->size = roundup(ctx->msg_sz, PAGE_SIZE);
940         fastrpc_context_get(ctx);
941
942         ret = rpmsg_send(cctx->rpdev->ept, (void *)msg, sizeof(*msg));
943
944         if (ret)
945                 fastrpc_context_put(ctx);
946
947         return ret;
948
949 }
950
951 static int fastrpc_internal_invoke(struct fastrpc_user *fl,  u32 kernel,
952                                    u32 handle, u32 sc,
953                                    struct fastrpc_invoke_args *args)
954 {
955         struct fastrpc_invoke_ctx *ctx = NULL;
956         int err = 0;
957
958         if (!fl->sctx)
959                 return -EINVAL;
960
961         if (!fl->cctx->rpdev)
962                 return -EPIPE;
963
964         if (handle == FASTRPC_INIT_HANDLE && !kernel) {
965                 dev_warn_ratelimited(fl->sctx->dev, "user app trying to send a kernel RPC message (%d)\n",  handle);
966                 return -EPERM;
967         }
968
969         ctx = fastrpc_context_alloc(fl, kernel, sc, args);
970         if (IS_ERR(ctx))
971                 return PTR_ERR(ctx);
972
973         if (ctx->nscalars) {
974                 err = fastrpc_get_args(kernel, ctx);
975                 if (err)
976                         goto bail;
977         }
978
979         /* make sure that all CPU memory writes are seen by DSP */
980         dma_wmb();
981         /* Send invoke buffer to remote dsp */
982         err = fastrpc_invoke_send(fl->sctx, ctx, kernel, handle);
983         if (err)
984                 goto bail;
985
986         if (kernel) {
987                 if (!wait_for_completion_timeout(&ctx->work, 10 * HZ))
988                         err = -ETIMEDOUT;
989         } else {
990                 err = wait_for_completion_interruptible(&ctx->work);
991         }
992
993         if (err)
994                 goto bail;
995
996         if (ctx->nscalars) {
997                 /* make sure that all memory writes by DSP are seen by CPU */
998                 dma_rmb();
999                 /* populate all the output buffers with results */
1000                 err = fastrpc_put_args(ctx, kernel);
1001                 if (err)
1002                         goto bail;
1003         }
1004
1005         /* Check the response from remote dsp */
1006         err = ctx->retval;
1007         if (err)
1008                 goto bail;
1009
1010 bail:
1011         if (err != -ERESTARTSYS && err != -ETIMEDOUT) {
1012                 /* We are done with this compute context */
1013                 spin_lock(&fl->lock);
1014                 list_del(&ctx->node);
1015                 spin_unlock(&fl->lock);
1016                 fastrpc_context_put(ctx);
1017         }
1018         if (err)
1019                 dev_dbg(fl->sctx->dev, "Error: Invoke Failed %d\n", err);
1020
1021         return err;
1022 }
1023
1024 static int fastrpc_init_create_process(struct fastrpc_user *fl,
1025                                         char __user *argp)
1026 {
1027         struct fastrpc_init_create init;
1028         struct fastrpc_invoke_args *args;
1029         struct fastrpc_phy_page pages[1];
1030         struct fastrpc_map *map = NULL;
1031         struct fastrpc_buf *imem = NULL;
1032         int memlen;
1033         int err;
1034         struct {
1035                 int pgid;
1036                 u32 namelen;
1037                 u32 filelen;
1038                 u32 pageslen;
1039                 u32 attrs;
1040                 u32 siglen;
1041         } inbuf;
1042         u32 sc;
1043
1044         args = kcalloc(FASTRPC_CREATE_PROCESS_NARGS, sizeof(*args), GFP_KERNEL);
1045         if (!args)
1046                 return -ENOMEM;
1047
1048         if (copy_from_user(&init, argp, sizeof(init))) {
1049                 err = -EFAULT;
1050                 goto err;
1051         }
1052
1053         if (init.filelen > INIT_FILELEN_MAX) {
1054                 err = -EINVAL;
1055                 goto err;
1056         }
1057
1058         inbuf.pgid = fl->tgid;
1059         inbuf.namelen = strlen(current->comm) + 1;
1060         inbuf.filelen = init.filelen;
1061         inbuf.pageslen = 1;
1062         inbuf.attrs = init.attrs;
1063         inbuf.siglen = init.siglen;
1064         fl->pd = USER_PD;
1065
1066         if (init.filelen && init.filefd) {
1067                 err = fastrpc_map_create(fl, init.filefd, init.filelen, &map);
1068                 if (err)
1069                         goto err;
1070         }
1071
1072         memlen = ALIGN(max(INIT_FILELEN_MAX, (int)init.filelen * 4),
1073                        1024 * 1024);
1074         err = fastrpc_buf_alloc(fl, fl->sctx->dev, memlen,
1075                                 &imem);
1076         if (err)
1077                 goto err_alloc;
1078
1079         fl->init_mem = imem;
1080         args[0].ptr = (u64)(uintptr_t)&inbuf;
1081         args[0].length = sizeof(inbuf);
1082         args[0].fd = -1;
1083
1084         args[1].ptr = (u64)(uintptr_t)current->comm;
1085         args[1].length = inbuf.namelen;
1086         args[1].fd = -1;
1087
1088         args[2].ptr = (u64) init.file;
1089         args[2].length = inbuf.filelen;
1090         args[2].fd = init.filefd;
1091
1092         pages[0].addr = imem->phys;
1093         pages[0].size = imem->size;
1094
1095         args[3].ptr = (u64)(uintptr_t) pages;
1096         args[3].length = 1 * sizeof(*pages);
1097         args[3].fd = -1;
1098
1099         args[4].ptr = (u64)(uintptr_t)&inbuf.attrs;
1100         args[4].length = sizeof(inbuf.attrs);
1101         args[4].fd = -1;
1102
1103         args[5].ptr = (u64)(uintptr_t) &inbuf.siglen;
1104         args[5].length = sizeof(inbuf.siglen);
1105         args[5].fd = -1;
1106
1107         sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_CREATE, 4, 0);
1108         if (init.attrs)
1109                 sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_CREATE_ATTR, 4, 0);
1110
1111         err = fastrpc_internal_invoke(fl, true, FASTRPC_INIT_HANDLE,
1112                                       sc, args);
1113         if (err)
1114                 goto err_invoke;
1115
1116         kfree(args);
1117
1118         return 0;
1119
1120 err_invoke:
1121         fl->init_mem = NULL;
1122         fastrpc_buf_free(imem);
1123 err_alloc:
1124         fastrpc_map_put(map);
1125 err:
1126         kfree(args);
1127
1128         return err;
1129 }
1130
1131 static struct fastrpc_session_ctx *fastrpc_session_alloc(
1132                                         struct fastrpc_channel_ctx *cctx)
1133 {
1134         struct fastrpc_session_ctx *session = NULL;
1135         unsigned long flags;
1136         int i;
1137
1138         spin_lock_irqsave(&cctx->lock, flags);
1139         for (i = 0; i < cctx->sesscount; i++) {
1140                 if (!cctx->session[i].used && cctx->session[i].valid) {
1141                         cctx->session[i].used = true;
1142                         session = &cctx->session[i];
1143                         break;
1144                 }
1145         }
1146         spin_unlock_irqrestore(&cctx->lock, flags);
1147
1148         return session;
1149 }
1150
1151 static void fastrpc_session_free(struct fastrpc_channel_ctx *cctx,
1152                                  struct fastrpc_session_ctx *session)
1153 {
1154         unsigned long flags;
1155
1156         spin_lock_irqsave(&cctx->lock, flags);
1157         session->used = false;
1158         spin_unlock_irqrestore(&cctx->lock, flags);
1159 }
1160
1161 static int fastrpc_release_current_dsp_process(struct fastrpc_user *fl)
1162 {
1163         struct fastrpc_invoke_args args[1];
1164         int tgid = 0;
1165         u32 sc;
1166
1167         tgid = fl->tgid;
1168         args[0].ptr = (u64)(uintptr_t) &tgid;
1169         args[0].length = sizeof(tgid);
1170         args[0].fd = -1;
1171         args[0].reserved = 0;
1172         sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_RELEASE, 1, 0);
1173
1174         return fastrpc_internal_invoke(fl, true, FASTRPC_INIT_HANDLE,
1175                                        sc, &args[0]);
1176 }
1177
1178 static int fastrpc_device_release(struct inode *inode, struct file *file)
1179 {
1180         struct fastrpc_user *fl = (struct fastrpc_user *)file->private_data;
1181         struct fastrpc_channel_ctx *cctx = fl->cctx;
1182         struct fastrpc_invoke_ctx *ctx, *n;
1183         struct fastrpc_map *map, *m;
1184         struct fastrpc_buf *buf, *b;
1185         unsigned long flags;
1186
1187         fastrpc_release_current_dsp_process(fl);
1188
1189         spin_lock_irqsave(&cctx->lock, flags);
1190         list_del(&fl->user);
1191         spin_unlock_irqrestore(&cctx->lock, flags);
1192
1193         if (fl->init_mem)
1194                 fastrpc_buf_free(fl->init_mem);
1195
1196         list_for_each_entry_safe(ctx, n, &fl->pending, node) {
1197                 list_del(&ctx->node);
1198                 fastrpc_context_put(ctx);
1199         }
1200
1201         list_for_each_entry_safe(map, m, &fl->maps, node)
1202                 fastrpc_map_put(map);
1203
1204         list_for_each_entry_safe(buf, b, &fl->mmaps, node) {
1205                 list_del(&buf->node);
1206                 fastrpc_buf_free(buf);
1207         }
1208
1209         fastrpc_session_free(cctx, fl->sctx);
1210         fastrpc_channel_ctx_put(cctx);
1211
1212         mutex_destroy(&fl->mutex);
1213         kfree(fl);
1214         file->private_data = NULL;
1215
1216         return 0;
1217 }
1218
1219 static int fastrpc_device_open(struct inode *inode, struct file *filp)
1220 {
1221         struct fastrpc_channel_ctx *cctx = miscdev_to_cctx(filp->private_data);
1222         struct fastrpc_user *fl = NULL;
1223         unsigned long flags;
1224
1225         fl = kzalloc(sizeof(*fl), GFP_KERNEL);
1226         if (!fl)
1227                 return -ENOMEM;
1228
1229         /* Released in fastrpc_device_release() */
1230         fastrpc_channel_ctx_get(cctx);
1231
1232         filp->private_data = fl;
1233         spin_lock_init(&fl->lock);
1234         mutex_init(&fl->mutex);
1235         INIT_LIST_HEAD(&fl->pending);
1236         INIT_LIST_HEAD(&fl->maps);
1237         INIT_LIST_HEAD(&fl->mmaps);
1238         INIT_LIST_HEAD(&fl->user);
1239         fl->tgid = current->tgid;
1240         fl->cctx = cctx;
1241
1242         fl->sctx = fastrpc_session_alloc(cctx);
1243         if (!fl->sctx) {
1244                 dev_err(&cctx->rpdev->dev, "No session available\n");
1245                 mutex_destroy(&fl->mutex);
1246                 kfree(fl);
1247
1248                 return -EBUSY;
1249         }
1250
1251         spin_lock_irqsave(&cctx->lock, flags);
1252         list_add_tail(&fl->user, &cctx->users);
1253         spin_unlock_irqrestore(&cctx->lock, flags);
1254
1255         return 0;
1256 }
1257
1258 static int fastrpc_dmabuf_alloc(struct fastrpc_user *fl, char __user *argp)
1259 {
1260         struct fastrpc_alloc_dma_buf bp;
1261         DEFINE_DMA_BUF_EXPORT_INFO(exp_info);
1262         struct fastrpc_buf *buf = NULL;
1263         int err;
1264
1265         if (copy_from_user(&bp, argp, sizeof(bp)))
1266                 return -EFAULT;
1267
1268         err = fastrpc_buf_alloc(fl, fl->sctx->dev, bp.size, &buf);
1269         if (err)
1270                 return err;
1271         exp_info.ops = &fastrpc_dma_buf_ops;
1272         exp_info.size = bp.size;
1273         exp_info.flags = O_RDWR;
1274         exp_info.priv = buf;
1275         buf->dmabuf = dma_buf_export(&exp_info);
1276         if (IS_ERR(buf->dmabuf)) {
1277                 err = PTR_ERR(buf->dmabuf);
1278                 fastrpc_buf_free(buf);
1279                 return err;
1280         }
1281
1282         bp.fd = dma_buf_fd(buf->dmabuf, O_ACCMODE);
1283         if (bp.fd < 0) {
1284                 dma_buf_put(buf->dmabuf);
1285                 return -EINVAL;
1286         }
1287
1288         if (copy_to_user(argp, &bp, sizeof(bp))) {
1289                 /*
1290                  * The usercopy failed, but we can't do much about it, as
1291                  * dma_buf_fd() already called fd_install() and made the
1292                  * file descriptor accessible for the current process. It
1293                  * might already be closed and dmabuf no longer valid when
1294                  * we reach this point. Therefore "leak" the fd and rely on
1295                  * the process exit path to do any required cleanup.
1296                  */
1297                 return -EFAULT;
1298         }
1299
1300         return 0;
1301 }
1302
1303 static int fastrpc_init_attach(struct fastrpc_user *fl, int pd)
1304 {
1305         struct fastrpc_invoke_args args[1];
1306         int tgid = fl->tgid;
1307         u32 sc;
1308
1309         args[0].ptr = (u64)(uintptr_t) &tgid;
1310         args[0].length = sizeof(tgid);
1311         args[0].fd = -1;
1312         args[0].reserved = 0;
1313         sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_ATTACH, 1, 0);
1314         fl->pd = pd;
1315
1316         return fastrpc_internal_invoke(fl, true, FASTRPC_INIT_HANDLE,
1317                                        sc, &args[0]);
1318 }
1319
1320 static int fastrpc_invoke(struct fastrpc_user *fl, char __user *argp)
1321 {
1322         struct fastrpc_invoke_args *args = NULL;
1323         struct fastrpc_invoke inv;
1324         u32 nscalars;
1325         int err;
1326
1327         if (copy_from_user(&inv, argp, sizeof(inv)))
1328                 return -EFAULT;
1329
1330         /* nscalars is truncated here to max supported value */
1331         nscalars = REMOTE_SCALARS_LENGTH(inv.sc);
1332         if (nscalars) {
1333                 args = kcalloc(nscalars, sizeof(*args), GFP_KERNEL);
1334                 if (!args)
1335                         return -ENOMEM;
1336
1337                 if (copy_from_user(args, (void __user *)(uintptr_t)inv.args,
1338                                    nscalars * sizeof(*args))) {
1339                         kfree(args);
1340                         return -EFAULT;
1341                 }
1342         }
1343
1344         err = fastrpc_internal_invoke(fl, false, inv.handle, inv.sc, args);
1345         kfree(args);
1346
1347         return err;
1348 }
1349
1350 static int fastrpc_req_munmap_impl(struct fastrpc_user *fl,
1351                                    struct fastrpc_req_munmap *req)
1352 {
1353         struct fastrpc_invoke_args args[1] = { [0] = { 0 } };
1354         struct fastrpc_buf *buf = NULL, *iter, *b;
1355         struct fastrpc_munmap_req_msg req_msg;
1356         struct device *dev = fl->sctx->dev;
1357         int err;
1358         u32 sc;
1359
1360         spin_lock(&fl->lock);
1361         list_for_each_entry_safe(iter, b, &fl->mmaps, node) {
1362                 if ((iter->raddr == req->vaddrout) && (iter->size == req->size)) {
1363                         buf = iter;
1364                         break;
1365                 }
1366         }
1367         spin_unlock(&fl->lock);
1368
1369         if (!buf) {
1370                 dev_err(dev, "mmap not in list\n");
1371                 return -EINVAL;
1372         }
1373
1374         req_msg.pgid = fl->tgid;
1375         req_msg.size = buf->size;
1376         req_msg.vaddr = buf->raddr;
1377
1378         args[0].ptr = (u64) (uintptr_t) &req_msg;
1379         args[0].length = sizeof(req_msg);
1380
1381         sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_MUNMAP, 1, 0);
1382         err = fastrpc_internal_invoke(fl, true, FASTRPC_INIT_HANDLE, sc,
1383                                       &args[0]);
1384         if (!err) {
1385                 dev_dbg(dev, "unmmap\tpt 0x%09lx OK\n", buf->raddr);
1386                 spin_lock(&fl->lock);
1387                 list_del(&buf->node);
1388                 spin_unlock(&fl->lock);
1389                 fastrpc_buf_free(buf);
1390         } else {
1391                 dev_err(dev, "unmmap\tpt 0x%09lx ERROR\n", buf->raddr);
1392         }
1393
1394         return err;
1395 }
1396
1397 static int fastrpc_req_munmap(struct fastrpc_user *fl, char __user *argp)
1398 {
1399         struct fastrpc_req_munmap req;
1400
1401         if (copy_from_user(&req, argp, sizeof(req)))
1402                 return -EFAULT;
1403
1404         return fastrpc_req_munmap_impl(fl, &req);
1405 }
1406
1407 static int fastrpc_req_mmap(struct fastrpc_user *fl, char __user *argp)
1408 {
1409         struct fastrpc_invoke_args args[3] = { [0 ... 2] = { 0 } };
1410         struct fastrpc_buf *buf = NULL;
1411         struct fastrpc_mmap_req_msg req_msg;
1412         struct fastrpc_mmap_rsp_msg rsp_msg;
1413         struct fastrpc_req_munmap req_unmap;
1414         struct fastrpc_phy_page pages;
1415         struct fastrpc_req_mmap req;
1416         struct device *dev = fl->sctx->dev;
1417         int err;
1418         u32 sc;
1419
1420         if (copy_from_user(&req, argp, sizeof(req)))
1421                 return -EFAULT;
1422
1423         if (req.flags != ADSP_MMAP_ADD_PAGES) {
1424                 dev_err(dev, "flag not supported 0x%x\n", req.flags);
1425                 return -EINVAL;
1426         }
1427
1428         if (req.vaddrin) {
1429                 dev_err(dev, "adding user allocated pages is not supported\n");
1430                 return -EINVAL;
1431         }
1432
1433         err = fastrpc_buf_alloc(fl, fl->sctx->dev, req.size, &buf);
1434         if (err) {
1435                 dev_err(dev, "failed to allocate buffer\n");
1436                 return err;
1437         }
1438
1439         req_msg.pgid = fl->tgid;
1440         req_msg.flags = req.flags;
1441         req_msg.vaddr = req.vaddrin;
1442         req_msg.num = sizeof(pages);
1443
1444         args[0].ptr = (u64) (uintptr_t) &req_msg;
1445         args[0].length = sizeof(req_msg);
1446
1447         pages.addr = buf->phys;
1448         pages.size = buf->size;
1449
1450         args[1].ptr = (u64) (uintptr_t) &pages;
1451         args[1].length = sizeof(pages);
1452
1453         args[2].ptr = (u64) (uintptr_t) &rsp_msg;
1454         args[2].length = sizeof(rsp_msg);
1455
1456         sc = FASTRPC_SCALARS(FASTRPC_RMID_INIT_MMAP, 2, 1);
1457         err = fastrpc_internal_invoke(fl, true, FASTRPC_INIT_HANDLE, sc,
1458                                       &args[0]);
1459         if (err) {
1460                 dev_err(dev, "mmap error (len 0x%08llx)\n", buf->size);
1461                 goto err_invoke;
1462         }
1463
1464         /* update the buffer to be able to deallocate the memory on the DSP */
1465         buf->raddr = (uintptr_t) rsp_msg.vaddr;
1466
1467         /* let the client know the address to use */
1468         req.vaddrout = rsp_msg.vaddr;
1469
1470         spin_lock(&fl->lock);
1471         list_add_tail(&buf->node, &fl->mmaps);
1472         spin_unlock(&fl->lock);
1473
1474         if (copy_to_user((void __user *)argp, &req, sizeof(req))) {
1475                 /* unmap the memory and release the buffer */
1476                 req_unmap.vaddrout = buf->raddr;
1477                 req_unmap.size = buf->size;
1478                 fastrpc_req_munmap_impl(fl, &req_unmap);
1479                 return -EFAULT;
1480         }
1481
1482         dev_dbg(dev, "mmap\t\tpt 0x%09lx OK [len 0x%08llx]\n",
1483                 buf->raddr, buf->size);
1484
1485         return 0;
1486
1487 err_invoke:
1488         fastrpc_buf_free(buf);
1489
1490         return err;
1491 }
1492
1493 static long fastrpc_device_ioctl(struct file *file, unsigned int cmd,
1494                                  unsigned long arg)
1495 {
1496         struct fastrpc_user *fl = (struct fastrpc_user *)file->private_data;
1497         char __user *argp = (char __user *)arg;
1498         int err;
1499
1500         switch (cmd) {
1501         case FASTRPC_IOCTL_INVOKE:
1502                 err = fastrpc_invoke(fl, argp);
1503                 break;
1504         case FASTRPC_IOCTL_INIT_ATTACH:
1505                 err = fastrpc_init_attach(fl, AUDIO_PD);
1506                 break;
1507         case FASTRPC_IOCTL_INIT_ATTACH_SNS:
1508                 err = fastrpc_init_attach(fl, SENSORS_PD);
1509                 break;
1510         case FASTRPC_IOCTL_INIT_CREATE:
1511                 err = fastrpc_init_create_process(fl, argp);
1512                 break;
1513         case FASTRPC_IOCTL_ALLOC_DMA_BUFF:
1514                 err = fastrpc_dmabuf_alloc(fl, argp);
1515                 break;
1516         case FASTRPC_IOCTL_MMAP:
1517                 err = fastrpc_req_mmap(fl, argp);
1518                 break;
1519         case FASTRPC_IOCTL_MUNMAP:
1520                 err = fastrpc_req_munmap(fl, argp);
1521                 break;
1522         default:
1523                 err = -ENOTTY;
1524                 break;
1525         }
1526
1527         return err;
1528 }
1529
1530 static const struct file_operations fastrpc_fops = {
1531         .open = fastrpc_device_open,
1532         .release = fastrpc_device_release,
1533         .unlocked_ioctl = fastrpc_device_ioctl,
1534         .compat_ioctl = fastrpc_device_ioctl,
1535 };
1536
1537 static int fastrpc_cb_probe(struct platform_device *pdev)
1538 {
1539         struct fastrpc_channel_ctx *cctx;
1540         struct fastrpc_session_ctx *sess;
1541         struct device *dev = &pdev->dev;
1542         int i, sessions = 0;
1543         unsigned long flags;
1544         int rc;
1545
1546         cctx = dev_get_drvdata(dev->parent);
1547         if (!cctx)
1548                 return -EINVAL;
1549
1550         of_property_read_u32(dev->of_node, "qcom,nsessions", &sessions);
1551
1552         spin_lock_irqsave(&cctx->lock, flags);
1553         if (cctx->sesscount >= FASTRPC_MAX_SESSIONS) {
1554                 dev_err(&pdev->dev, "too many sessions\n");
1555                 spin_unlock_irqrestore(&cctx->lock, flags);
1556                 return -ENOSPC;
1557         }
1558         sess = &cctx->session[cctx->sesscount++];
1559         sess->used = false;
1560         sess->valid = true;
1561         sess->dev = dev;
1562         dev_set_drvdata(dev, sess);
1563
1564         if (of_property_read_u32(dev->of_node, "reg", &sess->sid))
1565                 dev_info(dev, "FastRPC Session ID not specified in DT\n");
1566
1567         if (sessions > 0) {
1568                 struct fastrpc_session_ctx *dup_sess;
1569
1570                 for (i = 1; i < sessions; i++) {
1571                         if (cctx->sesscount >= FASTRPC_MAX_SESSIONS)
1572                                 break;
1573                         dup_sess = &cctx->session[cctx->sesscount++];
1574                         memcpy(dup_sess, sess, sizeof(*dup_sess));
1575                 }
1576         }
1577         spin_unlock_irqrestore(&cctx->lock, flags);
1578         rc = dma_set_mask(dev, DMA_BIT_MASK(32));
1579         if (rc) {
1580                 dev_err(dev, "32-bit DMA enable failed\n");
1581                 return rc;
1582         }
1583
1584         return 0;
1585 }
1586
1587 static int fastrpc_cb_remove(struct platform_device *pdev)
1588 {
1589         struct fastrpc_channel_ctx *cctx = dev_get_drvdata(pdev->dev.parent);
1590         struct fastrpc_session_ctx *sess = dev_get_drvdata(&pdev->dev);
1591         unsigned long flags;
1592         int i;
1593
1594         spin_lock_irqsave(&cctx->lock, flags);
1595         for (i = 0; i < FASTRPC_MAX_SESSIONS; i++) {
1596                 if (cctx->session[i].sid == sess->sid) {
1597                         cctx->session[i].valid = false;
1598                         cctx->sesscount--;
1599                 }
1600         }
1601         spin_unlock_irqrestore(&cctx->lock, flags);
1602
1603         return 0;
1604 }
1605
1606 static const struct of_device_id fastrpc_match_table[] = {
1607         { .compatible = "qcom,fastrpc-compute-cb", },
1608         {}
1609 };
1610
1611 static struct platform_driver fastrpc_cb_driver = {
1612         .probe = fastrpc_cb_probe,
1613         .remove = fastrpc_cb_remove,
1614         .driver = {
1615                 .name = "qcom,fastrpc-cb",
1616                 .of_match_table = fastrpc_match_table,
1617                 .suppress_bind_attrs = true,
1618         },
1619 };
1620
1621 static int fastrpc_rpmsg_probe(struct rpmsg_device *rpdev)
1622 {
1623         struct device *rdev = &rpdev->dev;
1624         struct fastrpc_channel_ctx *data;
1625         int i, err, domain_id = -1;
1626         const char *domain;
1627
1628         err = of_property_read_string(rdev->of_node, "label", &domain);
1629         if (err) {
1630                 dev_info(rdev, "FastRPC Domain not specified in DT\n");
1631                 return err;
1632         }
1633
1634         for (i = 0; i <= CDSP_DOMAIN_ID; i++) {
1635                 if (!strcmp(domains[i], domain)) {
1636                         domain_id = i;
1637                         break;
1638                 }
1639         }
1640
1641         if (domain_id < 0) {
1642                 dev_info(rdev, "FastRPC Invalid Domain ID %d\n", domain_id);
1643                 return -EINVAL;
1644         }
1645
1646         data = kzalloc(sizeof(*data), GFP_KERNEL);
1647         if (!data)
1648                 return -ENOMEM;
1649
1650         data->miscdev.minor = MISC_DYNAMIC_MINOR;
1651         data->miscdev.name = devm_kasprintf(rdev, GFP_KERNEL, "fastrpc-%s",
1652                                             domains[domain_id]);
1653         data->miscdev.fops = &fastrpc_fops;
1654         err = misc_register(&data->miscdev);
1655         if (err) {
1656                 kfree(data);
1657                 return err;
1658         }
1659
1660         kref_init(&data->refcount);
1661
1662         dev_set_drvdata(&rpdev->dev, data);
1663         dma_set_mask_and_coherent(rdev, DMA_BIT_MASK(32));
1664         INIT_LIST_HEAD(&data->users);
1665         spin_lock_init(&data->lock);
1666         idr_init(&data->ctx_idr);
1667         data->domain_id = domain_id;
1668         data->rpdev = rpdev;
1669
1670         return of_platform_populate(rdev->of_node, NULL, NULL, rdev);
1671 }
1672
1673 static void fastrpc_notify_users(struct fastrpc_user *user)
1674 {
1675         struct fastrpc_invoke_ctx *ctx;
1676
1677         spin_lock(&user->lock);
1678         list_for_each_entry(ctx, &user->pending, node) {
1679                 ctx->retval = -EPIPE;
1680                 complete(&ctx->work);
1681         }
1682         spin_unlock(&user->lock);
1683 }
1684
1685 static void fastrpc_rpmsg_remove(struct rpmsg_device *rpdev)
1686 {
1687         struct fastrpc_channel_ctx *cctx = dev_get_drvdata(&rpdev->dev);
1688         struct fastrpc_user *user;
1689         unsigned long flags;
1690
1691         /* No invocations past this point */
1692         spin_lock_irqsave(&cctx->lock, flags);
1693         cctx->rpdev = NULL;
1694         list_for_each_entry(user, &cctx->users, user)
1695                 fastrpc_notify_users(user);
1696         spin_unlock_irqrestore(&cctx->lock, flags);
1697
1698         misc_deregister(&cctx->miscdev);
1699         of_platform_depopulate(&rpdev->dev);
1700
1701         fastrpc_channel_ctx_put(cctx);
1702 }
1703
1704 static int fastrpc_rpmsg_callback(struct rpmsg_device *rpdev, void *data,
1705                                   int len, void *priv, u32 addr)
1706 {
1707         struct fastrpc_channel_ctx *cctx = dev_get_drvdata(&rpdev->dev);
1708         struct fastrpc_invoke_rsp *rsp = data;
1709         struct fastrpc_invoke_ctx *ctx;
1710         unsigned long flags;
1711         unsigned long ctxid;
1712
1713         if (len < sizeof(*rsp))
1714                 return -EINVAL;
1715
1716         ctxid = ((rsp->ctx & FASTRPC_CTXID_MASK) >> 4);
1717
1718         spin_lock_irqsave(&cctx->lock, flags);
1719         ctx = idr_find(&cctx->ctx_idr, ctxid);
1720         spin_unlock_irqrestore(&cctx->lock, flags);
1721
1722         if (!ctx) {
1723                 dev_err(&rpdev->dev, "No context ID matches response\n");
1724                 return -ENOENT;
1725         }
1726
1727         ctx->retval = rsp->retval;
1728         complete(&ctx->work);
1729
1730         /*
1731          * The DMA buffer associated with the context cannot be freed in
1732          * interrupt context so schedule it through a worker thread to
1733          * avoid a kernel BUG.
1734          */
1735         schedule_work(&ctx->put_work);
1736
1737         return 0;
1738 }
1739
1740 static const struct of_device_id fastrpc_rpmsg_of_match[] = {
1741         { .compatible = "qcom,fastrpc" },
1742         { },
1743 };
1744 MODULE_DEVICE_TABLE(of, fastrpc_rpmsg_of_match);
1745
1746 static struct rpmsg_driver fastrpc_driver = {
1747         .probe = fastrpc_rpmsg_probe,
1748         .remove = fastrpc_rpmsg_remove,
1749         .callback = fastrpc_rpmsg_callback,
1750         .drv = {
1751                 .name = "qcom,fastrpc",
1752                 .of_match_table = fastrpc_rpmsg_of_match,
1753         },
1754 };
1755
1756 static int fastrpc_init(void)
1757 {
1758         int ret;
1759
1760         ret = platform_driver_register(&fastrpc_cb_driver);
1761         if (ret < 0) {
1762                 pr_err("fastrpc: failed to register cb driver\n");
1763                 return ret;
1764         }
1765
1766         ret = register_rpmsg_driver(&fastrpc_driver);
1767         if (ret < 0) {
1768                 pr_err("fastrpc: failed to register rpmsg driver\n");
1769                 platform_driver_unregister(&fastrpc_cb_driver);
1770                 return ret;
1771         }
1772
1773         return 0;
1774 }
1775 module_init(fastrpc_init);
1776
1777 static void fastrpc_exit(void)
1778 {
1779         platform_driver_unregister(&fastrpc_cb_driver);
1780         unregister_rpmsg_driver(&fastrpc_driver);
1781 }
1782 module_exit(fastrpc_exit);
1783
1784 MODULE_LICENSE("GPL v2");