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