Merge tag 's390-5.15-2' of git://git.kernel.org/pub/scm/linux/kernel/git/s390/linux
[linux-2.6-microblaze.git] / drivers / rapidio / devices / rio_mport_cdev.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * RapidIO mport character device
4  *
5  * Copyright 2014-2015 Integrated Device Technology, Inc.
6  *    Alexandre Bounine <alexandre.bounine@idt.com>
7  * Copyright 2014-2015 Prodrive Technologies
8  *    Andre van Herk <andre.van.herk@prodrive-technologies.com>
9  *    Jerry Jacobs <jerry.jacobs@prodrive-technologies.com>
10  * Copyright (C) 2014 Texas Instruments Incorporated
11  *    Aurelien Jacquiot <a-jacquiot@ti.com>
12  */
13 #include <linux/module.h>
14 #include <linux/kernel.h>
15 #include <linux/cdev.h>
16 #include <linux/ioctl.h>
17 #include <linux/uaccess.h>
18 #include <linux/list.h>
19 #include <linux/fs.h>
20 #include <linux/err.h>
21 #include <linux/net.h>
22 #include <linux/poll.h>
23 #include <linux/spinlock.h>
24 #include <linux/sched.h>
25 #include <linux/kfifo.h>
26
27 #include <linux/mm.h>
28 #include <linux/slab.h>
29 #include <linux/vmalloc.h>
30 #include <linux/mman.h>
31
32 #include <linux/dma-mapping.h>
33 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
34 #include <linux/dmaengine.h>
35 #endif
36
37 #include <linux/rio.h>
38 #include <linux/rio_ids.h>
39 #include <linux/rio_drv.h>
40 #include <linux/rio_mport_cdev.h>
41
42 #include "../rio.h"
43
44 #define DRV_NAME        "rio_mport"
45 #define DRV_PREFIX      DRV_NAME ": "
46 #define DEV_NAME        "rio_mport"
47 #define DRV_VERSION     "1.0.0"
48
49 /* Debug output filtering masks */
50 enum {
51         DBG_NONE        = 0,
52         DBG_INIT        = BIT(0), /* driver init */
53         DBG_EXIT        = BIT(1), /* driver exit */
54         DBG_MPORT       = BIT(2), /* mport add/remove */
55         DBG_RDEV        = BIT(3), /* RapidIO device add/remove */
56         DBG_DMA         = BIT(4), /* DMA transfer messages */
57         DBG_MMAP        = BIT(5), /* mapping messages */
58         DBG_IBW         = BIT(6), /* inbound window */
59         DBG_EVENT       = BIT(7), /* event handling messages */
60         DBG_OBW         = BIT(8), /* outbound window messages */
61         DBG_DBELL       = BIT(9), /* doorbell messages */
62         DBG_ALL         = ~0,
63 };
64
65 #ifdef DEBUG
66 #define rmcd_debug(level, fmt, arg...)          \
67         do {                                    \
68                 if (DBG_##level & dbg_level)    \
69                         pr_debug(DRV_PREFIX "%s: " fmt "\n", __func__, ##arg); \
70         } while (0)
71 #else
72 #define rmcd_debug(level, fmt, arg...) \
73                 no_printk(KERN_DEBUG pr_fmt(DRV_PREFIX fmt "\n"), ##arg)
74 #endif
75
76 #define rmcd_warn(fmt, arg...) \
77         pr_warn(DRV_PREFIX "%s WARNING " fmt "\n", __func__, ##arg)
78
79 #define rmcd_error(fmt, arg...) \
80         pr_err(DRV_PREFIX "%s ERROR " fmt "\n", __func__, ##arg)
81
82 MODULE_AUTHOR("Jerry Jacobs <jerry.jacobs@prodrive-technologies.com>");
83 MODULE_AUTHOR("Aurelien Jacquiot <a-jacquiot@ti.com>");
84 MODULE_AUTHOR("Alexandre Bounine <alexandre.bounine@idt.com>");
85 MODULE_AUTHOR("Andre van Herk <andre.van.herk@prodrive-technologies.com>");
86 MODULE_DESCRIPTION("RapidIO mport character device driver");
87 MODULE_LICENSE("GPL");
88 MODULE_VERSION(DRV_VERSION);
89
90 static int dma_timeout = 3000; /* DMA transfer timeout in msec */
91 module_param(dma_timeout, int, S_IRUGO);
92 MODULE_PARM_DESC(dma_timeout, "DMA Transfer Timeout in msec (default: 3000)");
93
94 #ifdef DEBUG
95 static u32 dbg_level = DBG_NONE;
96 module_param(dbg_level, uint, S_IWUSR | S_IWGRP | S_IRUGO);
97 MODULE_PARM_DESC(dbg_level, "Debugging output level (default 0 = none)");
98 #endif
99
100 /*
101  * An internal DMA coherent buffer
102  */
103 struct mport_dma_buf {
104         void            *ib_base;
105         dma_addr_t      ib_phys;
106         u32             ib_size;
107         u64             ib_rio_base;
108         bool            ib_map;
109         struct file     *filp;
110 };
111
112 /*
113  * Internal memory mapping structure
114  */
115 enum rio_mport_map_dir {
116         MAP_INBOUND,
117         MAP_OUTBOUND,
118         MAP_DMA,
119 };
120
121 struct rio_mport_mapping {
122         struct list_head node;
123         struct mport_dev *md;
124         enum rio_mport_map_dir dir;
125         u16 rioid;
126         u64 rio_addr;
127         dma_addr_t phys_addr; /* for mmap */
128         void *virt_addr; /* kernel address, for dma_free_coherent */
129         u64 size;
130         struct kref ref; /* refcount of vmas sharing the mapping */
131         struct file *filp;
132 };
133
134 struct rio_mport_dma_map {
135         int valid;
136         u64 length;
137         void *vaddr;
138         dma_addr_t paddr;
139 };
140
141 #define MPORT_MAX_DMA_BUFS      16
142 #define MPORT_EVENT_DEPTH       10
143
144 /*
145  * mport_dev  driver-specific structure that represents mport device
146  * @active    mport device status flag
147  * @node      list node to maintain list of registered mports
148  * @cdev      character device
149  * @dev       associated device object
150  * @mport     associated subsystem's master port device object
151  * @buf_mutex lock for buffer handling
152  * @file_mutex - lock for open files list
153  * @file_list  - list of open files on given mport
154  * @properties properties of this mport
155  * @portwrites queue of inbound portwrites
156  * @pw_lock    lock for port write queue
157  * @mappings   queue for memory mappings
158  * @dma_chan   DMA channels associated with this device
159  * @dma_ref:
160  * @comp:
161  */
162 struct mport_dev {
163         atomic_t                active;
164         struct list_head        node;
165         struct cdev             cdev;
166         struct device           dev;
167         struct rio_mport        *mport;
168         struct mutex            buf_mutex;
169         struct mutex            file_mutex;
170         struct list_head        file_list;
171         struct rio_mport_properties     properties;
172         struct list_head                doorbells;
173         spinlock_t                      db_lock;
174         struct list_head                portwrites;
175         spinlock_t                      pw_lock;
176         struct list_head        mappings;
177 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
178         struct dma_chan *dma_chan;
179         struct kref     dma_ref;
180         struct completion comp;
181 #endif
182 };
183
184 /*
185  * mport_cdev_priv - data structure specific to individual file object
186  *                   associated with an open device
187  * @md    master port character device object
188  * @async_queue - asynchronous notification queue
189  * @list - file objects tracking list
190  * @db_filters    inbound doorbell filters for this descriptor
191  * @pw_filters    portwrite filters for this descriptor
192  * @event_fifo    event fifo for this descriptor
193  * @event_rx_wait wait queue for this descriptor
194  * @fifo_lock     lock for event_fifo
195  * @event_mask    event mask for this descriptor
196  * @dmach DMA engine channel allocated for specific file object
197  */
198 struct mport_cdev_priv {
199         struct mport_dev        *md;
200         struct fasync_struct    *async_queue;
201         struct list_head        list;
202         struct list_head        db_filters;
203         struct list_head        pw_filters;
204         struct kfifo            event_fifo;
205         wait_queue_head_t       event_rx_wait;
206         spinlock_t              fifo_lock;
207         u32                     event_mask; /* RIO_DOORBELL, RIO_PORTWRITE */
208 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
209         struct dma_chan         *dmach;
210         struct list_head        async_list;
211         spinlock_t              req_lock;
212         struct mutex            dma_lock;
213         struct kref             dma_ref;
214         struct completion       comp;
215 #endif
216 };
217
218 /*
219  * rio_mport_pw_filter - structure to describe a portwrite filter
220  * md_node   node in mport device's list
221  * priv_node node in private file object's list
222  * priv      reference to private data
223  * filter    actual portwrite filter
224  */
225 struct rio_mport_pw_filter {
226         struct list_head md_node;
227         struct list_head priv_node;
228         struct mport_cdev_priv *priv;
229         struct rio_pw_filter filter;
230 };
231
232 /*
233  * rio_mport_db_filter - structure to describe a doorbell filter
234  * @data_node reference to device node
235  * @priv_node node in private data
236  * @priv      reference to private data
237  * @filter    actual doorbell filter
238  */
239 struct rio_mport_db_filter {
240         struct list_head data_node;
241         struct list_head priv_node;
242         struct mport_cdev_priv *priv;
243         struct rio_doorbell_filter filter;
244 };
245
246 static LIST_HEAD(mport_devs);
247 static DEFINE_MUTEX(mport_devs_lock);
248
249 #if (0) /* used by commented out portion of poll function : FIXME */
250 static DECLARE_WAIT_QUEUE_HEAD(mport_cdev_wait);
251 #endif
252
253 static struct class *dev_class;
254 static dev_t dev_number;
255
256 static void mport_release_mapping(struct kref *ref);
257
258 static int rio_mport_maint_rd(struct mport_cdev_priv *priv, void __user *arg,
259                               int local)
260 {
261         struct rio_mport *mport = priv->md->mport;
262         struct rio_mport_maint_io maint_io;
263         u32 *buffer;
264         u32 offset;
265         size_t length;
266         int ret, i;
267
268         if (unlikely(copy_from_user(&maint_io, arg, sizeof(maint_io))))
269                 return -EFAULT;
270
271         if ((maint_io.offset % 4) ||
272             (maint_io.length == 0) || (maint_io.length % 4) ||
273             (maint_io.length + maint_io.offset) > RIO_MAINT_SPACE_SZ)
274                 return -EINVAL;
275
276         buffer = vmalloc(maint_io.length);
277         if (buffer == NULL)
278                 return -ENOMEM;
279         length = maint_io.length/sizeof(u32);
280         offset = maint_io.offset;
281
282         for (i = 0; i < length; i++) {
283                 if (local)
284                         ret = __rio_local_read_config_32(mport,
285                                 offset, &buffer[i]);
286                 else
287                         ret = rio_mport_read_config_32(mport, maint_io.rioid,
288                                 maint_io.hopcount, offset, &buffer[i]);
289                 if (ret)
290                         goto out;
291
292                 offset += 4;
293         }
294
295         if (unlikely(copy_to_user((void __user *)(uintptr_t)maint_io.buffer,
296                                    buffer, maint_io.length)))
297                 ret = -EFAULT;
298 out:
299         vfree(buffer);
300         return ret;
301 }
302
303 static int rio_mport_maint_wr(struct mport_cdev_priv *priv, void __user *arg,
304                               int local)
305 {
306         struct rio_mport *mport = priv->md->mport;
307         struct rio_mport_maint_io maint_io;
308         u32 *buffer;
309         u32 offset;
310         size_t length;
311         int ret = -EINVAL, i;
312
313         if (unlikely(copy_from_user(&maint_io, arg, sizeof(maint_io))))
314                 return -EFAULT;
315
316         if ((maint_io.offset % 4) ||
317             (maint_io.length == 0) || (maint_io.length % 4) ||
318             (maint_io.length + maint_io.offset) > RIO_MAINT_SPACE_SZ)
319                 return -EINVAL;
320
321         buffer = vmalloc(maint_io.length);
322         if (buffer == NULL)
323                 return -ENOMEM;
324         length = maint_io.length;
325
326         if (unlikely(copy_from_user(buffer,
327                         (void __user *)(uintptr_t)maint_io.buffer, length))) {
328                 ret = -EFAULT;
329                 goto out;
330         }
331
332         offset = maint_io.offset;
333         length /= sizeof(u32);
334
335         for (i = 0; i < length; i++) {
336                 if (local)
337                         ret = __rio_local_write_config_32(mport,
338                                                           offset, buffer[i]);
339                 else
340                         ret = rio_mport_write_config_32(mport, maint_io.rioid,
341                                                         maint_io.hopcount,
342                                                         offset, buffer[i]);
343                 if (ret)
344                         goto out;
345
346                 offset += 4;
347         }
348
349 out:
350         vfree(buffer);
351         return ret;
352 }
353
354
355 /*
356  * Inbound/outbound memory mapping functions
357  */
358 static int
359 rio_mport_create_outbound_mapping(struct mport_dev *md, struct file *filp,
360                                   u16 rioid, u64 raddr, u32 size,
361                                   dma_addr_t *paddr)
362 {
363         struct rio_mport *mport = md->mport;
364         struct rio_mport_mapping *map;
365         int ret;
366
367         rmcd_debug(OBW, "did=%d ra=0x%llx sz=0x%x", rioid, raddr, size);
368
369         map = kzalloc(sizeof(*map), GFP_KERNEL);
370         if (map == NULL)
371                 return -ENOMEM;
372
373         ret = rio_map_outb_region(mport, rioid, raddr, size, 0, paddr);
374         if (ret < 0)
375                 goto err_map_outb;
376
377         map->dir = MAP_OUTBOUND;
378         map->rioid = rioid;
379         map->rio_addr = raddr;
380         map->size = size;
381         map->phys_addr = *paddr;
382         map->filp = filp;
383         map->md = md;
384         kref_init(&map->ref);
385         list_add_tail(&map->node, &md->mappings);
386         return 0;
387 err_map_outb:
388         kfree(map);
389         return ret;
390 }
391
392 static int
393 rio_mport_get_outbound_mapping(struct mport_dev *md, struct file *filp,
394                                u16 rioid, u64 raddr, u32 size,
395                                dma_addr_t *paddr)
396 {
397         struct rio_mport_mapping *map;
398         int err = -ENOMEM;
399
400         mutex_lock(&md->buf_mutex);
401         list_for_each_entry(map, &md->mappings, node) {
402                 if (map->dir != MAP_OUTBOUND)
403                         continue;
404                 if (rioid == map->rioid &&
405                     raddr == map->rio_addr && size == map->size) {
406                         *paddr = map->phys_addr;
407                         err = 0;
408                         break;
409                 } else if (rioid == map->rioid &&
410                            raddr < (map->rio_addr + map->size - 1) &&
411                            (raddr + size) > map->rio_addr) {
412                         err = -EBUSY;
413                         break;
414                 }
415         }
416
417         /* If not found, create new */
418         if (err == -ENOMEM)
419                 err = rio_mport_create_outbound_mapping(md, filp, rioid, raddr,
420                                                 size, paddr);
421         mutex_unlock(&md->buf_mutex);
422         return err;
423 }
424
425 static int rio_mport_obw_map(struct file *filp, void __user *arg)
426 {
427         struct mport_cdev_priv *priv = filp->private_data;
428         struct mport_dev *data = priv->md;
429         struct rio_mmap map;
430         dma_addr_t paddr;
431         int ret;
432
433         if (unlikely(copy_from_user(&map, arg, sizeof(map))))
434                 return -EFAULT;
435
436         rmcd_debug(OBW, "did=%d ra=0x%llx sz=0x%llx",
437                    map.rioid, map.rio_addr, map.length);
438
439         ret = rio_mport_get_outbound_mapping(data, filp, map.rioid,
440                                              map.rio_addr, map.length, &paddr);
441         if (ret < 0) {
442                 rmcd_error("Failed to set OBW err= %d", ret);
443                 return ret;
444         }
445
446         map.handle = paddr;
447
448         if (unlikely(copy_to_user(arg, &map, sizeof(map))))
449                 return -EFAULT;
450         return 0;
451 }
452
453 /*
454  * rio_mport_obw_free() - unmap an OutBound Window from RapidIO address space
455  *
456  * @priv: driver private data
457  * @arg:  buffer handle returned by allocation routine
458  */
459 static int rio_mport_obw_free(struct file *filp, void __user *arg)
460 {
461         struct mport_cdev_priv *priv = filp->private_data;
462         struct mport_dev *md = priv->md;
463         u64 handle;
464         struct rio_mport_mapping *map, *_map;
465
466         if (!md->mport->ops->unmap_outb)
467                 return -EPROTONOSUPPORT;
468
469         if (copy_from_user(&handle, arg, sizeof(handle)))
470                 return -EFAULT;
471
472         rmcd_debug(OBW, "h=0x%llx", handle);
473
474         mutex_lock(&md->buf_mutex);
475         list_for_each_entry_safe(map, _map, &md->mappings, node) {
476                 if (map->dir == MAP_OUTBOUND && map->phys_addr == handle) {
477                         if (map->filp == filp) {
478                                 rmcd_debug(OBW, "kref_put h=0x%llx", handle);
479                                 map->filp = NULL;
480                                 kref_put(&map->ref, mport_release_mapping);
481                         }
482                         break;
483                 }
484         }
485         mutex_unlock(&md->buf_mutex);
486
487         return 0;
488 }
489
490 /*
491  * maint_hdid_set() - Set the host Device ID
492  * @priv: driver private data
493  * @arg:        Device Id
494  */
495 static int maint_hdid_set(struct mport_cdev_priv *priv, void __user *arg)
496 {
497         struct mport_dev *md = priv->md;
498         u16 hdid;
499
500         if (copy_from_user(&hdid, arg, sizeof(hdid)))
501                 return -EFAULT;
502
503         md->mport->host_deviceid = hdid;
504         md->properties.hdid = hdid;
505         rio_local_set_device_id(md->mport, hdid);
506
507         rmcd_debug(MPORT, "Set host device Id to %d", hdid);
508
509         return 0;
510 }
511
512 /*
513  * maint_comptag_set() - Set the host Component Tag
514  * @priv: driver private data
515  * @arg:        Component Tag
516  */
517 static int maint_comptag_set(struct mport_cdev_priv *priv, void __user *arg)
518 {
519         struct mport_dev *md = priv->md;
520         u32 comptag;
521
522         if (copy_from_user(&comptag, arg, sizeof(comptag)))
523                 return -EFAULT;
524
525         rio_local_write_config_32(md->mport, RIO_COMPONENT_TAG_CSR, comptag);
526
527         rmcd_debug(MPORT, "Set host Component Tag to %d", comptag);
528
529         return 0;
530 }
531
532 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
533
534 struct mport_dma_req {
535         struct kref refcount;
536         struct list_head node;
537         struct file *filp;
538         struct mport_cdev_priv *priv;
539         enum rio_transfer_sync sync;
540         struct sg_table sgt;
541         struct page **page_list;
542         unsigned int nr_pages;
543         struct rio_mport_mapping *map;
544         struct dma_chan *dmach;
545         enum dma_data_direction dir;
546         dma_cookie_t cookie;
547         enum dma_status status;
548         struct completion req_comp;
549 };
550
551 static void mport_release_def_dma(struct kref *dma_ref)
552 {
553         struct mport_dev *md =
554                         container_of(dma_ref, struct mport_dev, dma_ref);
555
556         rmcd_debug(EXIT, "DMA_%d", md->dma_chan->chan_id);
557         rio_release_dma(md->dma_chan);
558         md->dma_chan = NULL;
559 }
560
561 static void mport_release_dma(struct kref *dma_ref)
562 {
563         struct mport_cdev_priv *priv =
564                         container_of(dma_ref, struct mport_cdev_priv, dma_ref);
565
566         rmcd_debug(EXIT, "DMA_%d", priv->dmach->chan_id);
567         complete(&priv->comp);
568 }
569
570 static void dma_req_free(struct kref *ref)
571 {
572         struct mport_dma_req *req = container_of(ref, struct mport_dma_req,
573                         refcount);
574         struct mport_cdev_priv *priv = req->priv;
575
576         dma_unmap_sg(req->dmach->device->dev,
577                      req->sgt.sgl, req->sgt.nents, req->dir);
578         sg_free_table(&req->sgt);
579         if (req->page_list) {
580                 unpin_user_pages(req->page_list, req->nr_pages);
581                 kfree(req->page_list);
582         }
583
584         if (req->map) {
585                 mutex_lock(&req->map->md->buf_mutex);
586                 kref_put(&req->map->ref, mport_release_mapping);
587                 mutex_unlock(&req->map->md->buf_mutex);
588         }
589
590         kref_put(&priv->dma_ref, mport_release_dma);
591
592         kfree(req);
593 }
594
595 static void dma_xfer_callback(void *param)
596 {
597         struct mport_dma_req *req = (struct mport_dma_req *)param;
598         struct mport_cdev_priv *priv = req->priv;
599
600         req->status = dma_async_is_tx_complete(priv->dmach, req->cookie,
601                                                NULL, NULL);
602         complete(&req->req_comp);
603         kref_put(&req->refcount, dma_req_free);
604 }
605
606 /*
607  * prep_dma_xfer() - Configure and send request to DMAengine to prepare DMA
608  *                   transfer object.
609  * Returns pointer to DMA transaction descriptor allocated by DMA driver on
610  * success or ERR_PTR (and/or NULL) if failed. Caller must check returned
611  * non-NULL pointer using IS_ERR macro.
612  */
613 static struct dma_async_tx_descriptor
614 *prep_dma_xfer(struct dma_chan *chan, struct rio_transfer_io *transfer,
615         struct sg_table *sgt, int nents, enum dma_transfer_direction dir,
616         enum dma_ctrl_flags flags)
617 {
618         struct rio_dma_data tx_data;
619
620         tx_data.sg = sgt->sgl;
621         tx_data.sg_len = nents;
622         tx_data.rio_addr_u = 0;
623         tx_data.rio_addr = transfer->rio_addr;
624         if (dir == DMA_MEM_TO_DEV) {
625                 switch (transfer->method) {
626                 case RIO_EXCHANGE_NWRITE:
627                         tx_data.wr_type = RDW_ALL_NWRITE;
628                         break;
629                 case RIO_EXCHANGE_NWRITE_R_ALL:
630                         tx_data.wr_type = RDW_ALL_NWRITE_R;
631                         break;
632                 case RIO_EXCHANGE_NWRITE_R:
633                         tx_data.wr_type = RDW_LAST_NWRITE_R;
634                         break;
635                 case RIO_EXCHANGE_DEFAULT:
636                         tx_data.wr_type = RDW_DEFAULT;
637                         break;
638                 default:
639                         return ERR_PTR(-EINVAL);
640                 }
641         }
642
643         return rio_dma_prep_xfer(chan, transfer->rioid, &tx_data, dir, flags);
644 }
645
646 /* Request DMA channel associated with this mport device.
647  * Try to request DMA channel for every new process that opened given
648  * mport. If a new DMA channel is not available use default channel
649  * which is the first DMA channel opened on mport device.
650  */
651 static int get_dma_channel(struct mport_cdev_priv *priv)
652 {
653         mutex_lock(&priv->dma_lock);
654         if (!priv->dmach) {
655                 priv->dmach = rio_request_mport_dma(priv->md->mport);
656                 if (!priv->dmach) {
657                         /* Use default DMA channel if available */
658                         if (priv->md->dma_chan) {
659                                 priv->dmach = priv->md->dma_chan;
660                                 kref_get(&priv->md->dma_ref);
661                         } else {
662                                 rmcd_error("Failed to get DMA channel");
663                                 mutex_unlock(&priv->dma_lock);
664                                 return -ENODEV;
665                         }
666                 } else if (!priv->md->dma_chan) {
667                         /* Register default DMA channel if we do not have one */
668                         priv->md->dma_chan = priv->dmach;
669                         kref_init(&priv->md->dma_ref);
670                         rmcd_debug(DMA, "Register DMA_chan %d as default",
671                                    priv->dmach->chan_id);
672                 }
673
674                 kref_init(&priv->dma_ref);
675                 init_completion(&priv->comp);
676         }
677
678         kref_get(&priv->dma_ref);
679         mutex_unlock(&priv->dma_lock);
680         return 0;
681 }
682
683 static void put_dma_channel(struct mport_cdev_priv *priv)
684 {
685         kref_put(&priv->dma_ref, mport_release_dma);
686 }
687
688 /*
689  * DMA transfer functions
690  */
691 static int do_dma_request(struct mport_dma_req *req,
692                           struct rio_transfer_io *xfer,
693                           enum rio_transfer_sync sync, int nents)
694 {
695         struct mport_cdev_priv *priv;
696         struct sg_table *sgt;
697         struct dma_chan *chan;
698         struct dma_async_tx_descriptor *tx;
699         dma_cookie_t cookie;
700         unsigned long tmo = msecs_to_jiffies(dma_timeout);
701         enum dma_transfer_direction dir;
702         long wret;
703         int ret = 0;
704
705         priv = req->priv;
706         sgt = &req->sgt;
707
708         chan = priv->dmach;
709         dir = (req->dir == DMA_FROM_DEVICE) ? DMA_DEV_TO_MEM : DMA_MEM_TO_DEV;
710
711         rmcd_debug(DMA, "%s(%d) uses %s for DMA_%s",
712                    current->comm, task_pid_nr(current),
713                    dev_name(&chan->dev->device),
714                    (dir == DMA_DEV_TO_MEM)?"READ":"WRITE");
715
716         /* Initialize DMA transaction request */
717         tx = prep_dma_xfer(chan, xfer, sgt, nents, dir,
718                            DMA_CTRL_ACK | DMA_PREP_INTERRUPT);
719
720         if (!tx) {
721                 rmcd_debug(DMA, "prep error for %s A:0x%llx L:0x%llx",
722                         (dir == DMA_DEV_TO_MEM)?"READ":"WRITE",
723                         xfer->rio_addr, xfer->length);
724                 ret = -EIO;
725                 goto err_out;
726         } else if (IS_ERR(tx)) {
727                 ret = PTR_ERR(tx);
728                 rmcd_debug(DMA, "prep error %d for %s A:0x%llx L:0x%llx", ret,
729                         (dir == DMA_DEV_TO_MEM)?"READ":"WRITE",
730                         xfer->rio_addr, xfer->length);
731                 goto err_out;
732         }
733
734         tx->callback = dma_xfer_callback;
735         tx->callback_param = req;
736
737         req->status = DMA_IN_PROGRESS;
738         kref_get(&req->refcount);
739
740         cookie = dmaengine_submit(tx);
741         req->cookie = cookie;
742
743         rmcd_debug(DMA, "pid=%d DMA_%s tx_cookie = %d", task_pid_nr(current),
744                    (dir == DMA_DEV_TO_MEM)?"READ":"WRITE", cookie);
745
746         if (dma_submit_error(cookie)) {
747                 rmcd_error("submit err=%d (addr:0x%llx len:0x%llx)",
748                            cookie, xfer->rio_addr, xfer->length);
749                 kref_put(&req->refcount, dma_req_free);
750                 ret = -EIO;
751                 goto err_out;
752         }
753
754         dma_async_issue_pending(chan);
755
756         if (sync == RIO_TRANSFER_ASYNC) {
757                 spin_lock(&priv->req_lock);
758                 list_add_tail(&req->node, &priv->async_list);
759                 spin_unlock(&priv->req_lock);
760                 return cookie;
761         } else if (sync == RIO_TRANSFER_FAF)
762                 return 0;
763
764         wret = wait_for_completion_interruptible_timeout(&req->req_comp, tmo);
765
766         if (wret == 0) {
767                 /* Timeout on wait occurred */
768                 rmcd_error("%s(%d) timed out waiting for DMA_%s %d",
769                        current->comm, task_pid_nr(current),
770                        (dir == DMA_DEV_TO_MEM)?"READ":"WRITE", cookie);
771                 return -ETIMEDOUT;
772         } else if (wret == -ERESTARTSYS) {
773                 /* Wait_for_completion was interrupted by a signal but DMA may
774                  * be in progress
775                  */
776                 rmcd_error("%s(%d) wait for DMA_%s %d was interrupted",
777                         current->comm, task_pid_nr(current),
778                         (dir == DMA_DEV_TO_MEM)?"READ":"WRITE", cookie);
779                 return -EINTR;
780         }
781
782         if (req->status != DMA_COMPLETE) {
783                 /* DMA transaction completion was signaled with error */
784                 rmcd_error("%s(%d) DMA_%s %d completed with status %d (ret=%d)",
785                         current->comm, task_pid_nr(current),
786                         (dir == DMA_DEV_TO_MEM)?"READ":"WRITE",
787                         cookie, req->status, ret);
788                 ret = -EIO;
789         }
790
791 err_out:
792         return ret;
793 }
794
795 /*
796  * rio_dma_transfer() - Perform RapidIO DMA data transfer to/from
797  *                      the remote RapidIO device
798  * @filp: file pointer associated with the call
799  * @transfer_mode: DMA transfer mode
800  * @sync: synchronization mode
801  * @dir: DMA transfer direction (DMA_MEM_TO_DEV = write OR
802  *                               DMA_DEV_TO_MEM = read)
803  * @xfer: data transfer descriptor structure
804  */
805 static int
806 rio_dma_transfer(struct file *filp, u32 transfer_mode,
807                  enum rio_transfer_sync sync, enum dma_data_direction dir,
808                  struct rio_transfer_io *xfer)
809 {
810         struct mport_cdev_priv *priv = filp->private_data;
811         unsigned long nr_pages = 0;
812         struct page **page_list = NULL;
813         struct mport_dma_req *req;
814         struct mport_dev *md = priv->md;
815         struct dma_chan *chan;
816         int ret;
817         int nents;
818
819         if (xfer->length == 0)
820                 return -EINVAL;
821         req = kzalloc(sizeof(*req), GFP_KERNEL);
822         if (!req)
823                 return -ENOMEM;
824
825         ret = get_dma_channel(priv);
826         if (ret) {
827                 kfree(req);
828                 return ret;
829         }
830         chan = priv->dmach;
831
832         kref_init(&req->refcount);
833         init_completion(&req->req_comp);
834         req->dir = dir;
835         req->filp = filp;
836         req->priv = priv;
837         req->dmach = chan;
838         req->sync = sync;
839
840         /*
841          * If parameter loc_addr != NULL, we are transferring data from/to
842          * data buffer allocated in user-space: lock in memory user-space
843          * buffer pages and build an SG table for DMA transfer request
844          *
845          * Otherwise (loc_addr == NULL) contiguous kernel-space buffer is
846          * used for DMA data transfers: build single entry SG table using
847          * offset within the internal buffer specified by handle parameter.
848          */
849         if (xfer->loc_addr) {
850                 unsigned int offset;
851                 long pinned;
852
853                 offset = lower_32_bits(offset_in_page(xfer->loc_addr));
854                 nr_pages = PAGE_ALIGN(xfer->length + offset) >> PAGE_SHIFT;
855
856                 page_list = kmalloc_array(nr_pages,
857                                           sizeof(*page_list), GFP_KERNEL);
858                 if (page_list == NULL) {
859                         ret = -ENOMEM;
860                         goto err_req;
861                 }
862
863                 pinned = pin_user_pages_fast(
864                                 (unsigned long)xfer->loc_addr & PAGE_MASK,
865                                 nr_pages,
866                                 dir == DMA_FROM_DEVICE ? FOLL_WRITE : 0,
867                                 page_list);
868
869                 if (pinned != nr_pages) {
870                         if (pinned < 0) {
871                                 rmcd_error("pin_user_pages_fast err=%ld",
872                                            pinned);
873                                 nr_pages = 0;
874                         } else {
875                                 rmcd_error("pinned %ld out of %ld pages",
876                                            pinned, nr_pages);
877                                 /*
878                                  * Set nr_pages up to mean "how many pages to unpin, in
879                                  * the error handler:
880                                  */
881                                 nr_pages = pinned;
882                         }
883                         ret = -EFAULT;
884                         goto err_pg;
885                 }
886
887                 ret = sg_alloc_table_from_pages(&req->sgt, page_list, nr_pages,
888                                         offset, xfer->length, GFP_KERNEL);
889                 if (ret) {
890                         rmcd_error("sg_alloc_table failed with err=%d", ret);
891                         goto err_pg;
892                 }
893
894                 req->page_list = page_list;
895                 req->nr_pages = nr_pages;
896         } else {
897                 dma_addr_t baddr;
898                 struct rio_mport_mapping *map;
899
900                 baddr = (dma_addr_t)xfer->handle;
901
902                 mutex_lock(&md->buf_mutex);
903                 list_for_each_entry(map, &md->mappings, node) {
904                         if (baddr >= map->phys_addr &&
905                             baddr < (map->phys_addr + map->size)) {
906                                 kref_get(&map->ref);
907                                 req->map = map;
908                                 break;
909                         }
910                 }
911                 mutex_unlock(&md->buf_mutex);
912
913                 if (req->map == NULL) {
914                         ret = -ENOMEM;
915                         goto err_req;
916                 }
917
918                 if (xfer->length + xfer->offset > map->size) {
919                         ret = -EINVAL;
920                         goto err_req;
921                 }
922
923                 ret = sg_alloc_table(&req->sgt, 1, GFP_KERNEL);
924                 if (unlikely(ret)) {
925                         rmcd_error("sg_alloc_table failed for internal buf");
926                         goto err_req;
927                 }
928
929                 sg_set_buf(req->sgt.sgl,
930                            map->virt_addr + (baddr - map->phys_addr) +
931                                 xfer->offset, xfer->length);
932         }
933
934         nents = dma_map_sg(chan->device->dev,
935                            req->sgt.sgl, req->sgt.nents, dir);
936         if (nents == 0) {
937                 rmcd_error("Failed to map SG list");
938                 ret = -EFAULT;
939                 goto err_pg;
940         }
941
942         ret = do_dma_request(req, xfer, sync, nents);
943
944         if (ret >= 0) {
945                 if (sync == RIO_TRANSFER_ASYNC)
946                         return ret; /* return ASYNC cookie */
947         } else {
948                 rmcd_debug(DMA, "do_dma_request failed with err=%d", ret);
949         }
950
951 err_pg:
952         if (!req->page_list) {
953                 unpin_user_pages(page_list, nr_pages);
954                 kfree(page_list);
955         }
956 err_req:
957         kref_put(&req->refcount, dma_req_free);
958         return ret;
959 }
960
961 static int rio_mport_transfer_ioctl(struct file *filp, void __user *arg)
962 {
963         struct mport_cdev_priv *priv = filp->private_data;
964         struct rio_transaction transaction;
965         struct rio_transfer_io *transfer;
966         enum dma_data_direction dir;
967         int i, ret = 0;
968
969         if (unlikely(copy_from_user(&transaction, arg, sizeof(transaction))))
970                 return -EFAULT;
971
972         if (transaction.count != 1) /* only single transfer for now */
973                 return -EINVAL;
974
975         if ((transaction.transfer_mode &
976              priv->md->properties.transfer_mode) == 0)
977                 return -ENODEV;
978
979         transfer = vmalloc(array_size(sizeof(*transfer), transaction.count));
980         if (!transfer)
981                 return -ENOMEM;
982
983         if (unlikely(copy_from_user(transfer,
984                                     (void __user *)(uintptr_t)transaction.block,
985                                     array_size(sizeof(*transfer), transaction.count)))) {
986                 ret = -EFAULT;
987                 goto out_free;
988         }
989
990         dir = (transaction.dir == RIO_TRANSFER_DIR_READ) ?
991                                         DMA_FROM_DEVICE : DMA_TO_DEVICE;
992         for (i = 0; i < transaction.count && ret == 0; i++)
993                 ret = rio_dma_transfer(filp, transaction.transfer_mode,
994                         transaction.sync, dir, &transfer[i]);
995
996         if (unlikely(copy_to_user((void __user *)(uintptr_t)transaction.block,
997                                   transfer,
998                                   array_size(sizeof(*transfer), transaction.count))))
999                 ret = -EFAULT;
1000
1001 out_free:
1002         vfree(transfer);
1003
1004         return ret;
1005 }
1006
1007 static int rio_mport_wait_for_async_dma(struct file *filp, void __user *arg)
1008 {
1009         struct mport_cdev_priv *priv;
1010         struct rio_async_tx_wait w_param;
1011         struct mport_dma_req *req;
1012         dma_cookie_t cookie;
1013         unsigned long tmo;
1014         long wret;
1015         int found = 0;
1016         int ret;
1017
1018         priv = (struct mport_cdev_priv *)filp->private_data;
1019
1020         if (unlikely(copy_from_user(&w_param, arg, sizeof(w_param))))
1021                 return -EFAULT;
1022
1023         cookie = w_param.token;
1024         if (w_param.timeout)
1025                 tmo = msecs_to_jiffies(w_param.timeout);
1026         else /* Use default DMA timeout */
1027                 tmo = msecs_to_jiffies(dma_timeout);
1028
1029         spin_lock(&priv->req_lock);
1030         list_for_each_entry(req, &priv->async_list, node) {
1031                 if (req->cookie == cookie) {
1032                         list_del(&req->node);
1033                         found = 1;
1034                         break;
1035                 }
1036         }
1037         spin_unlock(&priv->req_lock);
1038
1039         if (!found)
1040                 return -EAGAIN;
1041
1042         wret = wait_for_completion_interruptible_timeout(&req->req_comp, tmo);
1043
1044         if (wret == 0) {
1045                 /* Timeout on wait occurred */
1046                 rmcd_error("%s(%d) timed out waiting for ASYNC DMA_%s",
1047                        current->comm, task_pid_nr(current),
1048                        (req->dir == DMA_FROM_DEVICE)?"READ":"WRITE");
1049                 ret = -ETIMEDOUT;
1050                 goto err_tmo;
1051         } else if (wret == -ERESTARTSYS) {
1052                 /* Wait_for_completion was interrupted by a signal but DMA may
1053                  * be still in progress
1054                  */
1055                 rmcd_error("%s(%d) wait for ASYNC DMA_%s was interrupted",
1056                         current->comm, task_pid_nr(current),
1057                         (req->dir == DMA_FROM_DEVICE)?"READ":"WRITE");
1058                 ret = -EINTR;
1059                 goto err_tmo;
1060         }
1061
1062         if (req->status != DMA_COMPLETE) {
1063                 /* DMA transaction completion signaled with transfer error */
1064                 rmcd_error("%s(%d) ASYNC DMA_%s completion with status %d",
1065                         current->comm, task_pid_nr(current),
1066                         (req->dir == DMA_FROM_DEVICE)?"READ":"WRITE",
1067                         req->status);
1068                 ret = -EIO;
1069         } else
1070                 ret = 0;
1071
1072         if (req->status != DMA_IN_PROGRESS && req->status != DMA_PAUSED)
1073                 kref_put(&req->refcount, dma_req_free);
1074
1075         return ret;
1076
1077 err_tmo:
1078         /* Return request back into async queue */
1079         spin_lock(&priv->req_lock);
1080         list_add_tail(&req->node, &priv->async_list);
1081         spin_unlock(&priv->req_lock);
1082         return ret;
1083 }
1084
1085 static int rio_mport_create_dma_mapping(struct mport_dev *md, struct file *filp,
1086                         u64 size, struct rio_mport_mapping **mapping)
1087 {
1088         struct rio_mport_mapping *map;
1089
1090         map = kzalloc(sizeof(*map), GFP_KERNEL);
1091         if (map == NULL)
1092                 return -ENOMEM;
1093
1094         map->virt_addr = dma_alloc_coherent(md->mport->dev.parent, size,
1095                                             &map->phys_addr, GFP_KERNEL);
1096         if (map->virt_addr == NULL) {
1097                 kfree(map);
1098                 return -ENOMEM;
1099         }
1100
1101         map->dir = MAP_DMA;
1102         map->size = size;
1103         map->filp = filp;
1104         map->md = md;
1105         kref_init(&map->ref);
1106         mutex_lock(&md->buf_mutex);
1107         list_add_tail(&map->node, &md->mappings);
1108         mutex_unlock(&md->buf_mutex);
1109         *mapping = map;
1110
1111         return 0;
1112 }
1113
1114 static int rio_mport_alloc_dma(struct file *filp, void __user *arg)
1115 {
1116         struct mport_cdev_priv *priv = filp->private_data;
1117         struct mport_dev *md = priv->md;
1118         struct rio_dma_mem map;
1119         struct rio_mport_mapping *mapping = NULL;
1120         int ret;
1121
1122         if (unlikely(copy_from_user(&map, arg, sizeof(map))))
1123                 return -EFAULT;
1124
1125         ret = rio_mport_create_dma_mapping(md, filp, map.length, &mapping);
1126         if (ret)
1127                 return ret;
1128
1129         map.dma_handle = mapping->phys_addr;
1130
1131         if (unlikely(copy_to_user(arg, &map, sizeof(map)))) {
1132                 mutex_lock(&md->buf_mutex);
1133                 kref_put(&mapping->ref, mport_release_mapping);
1134                 mutex_unlock(&md->buf_mutex);
1135                 return -EFAULT;
1136         }
1137
1138         return 0;
1139 }
1140
1141 static int rio_mport_free_dma(struct file *filp, void __user *arg)
1142 {
1143         struct mport_cdev_priv *priv = filp->private_data;
1144         struct mport_dev *md = priv->md;
1145         u64 handle;
1146         int ret = -EFAULT;
1147         struct rio_mport_mapping *map, *_map;
1148
1149         if (copy_from_user(&handle, arg, sizeof(handle)))
1150                 return -EFAULT;
1151         rmcd_debug(EXIT, "filp=%p", filp);
1152
1153         mutex_lock(&md->buf_mutex);
1154         list_for_each_entry_safe(map, _map, &md->mappings, node) {
1155                 if (map->dir == MAP_DMA && map->phys_addr == handle &&
1156                     map->filp == filp) {
1157                         kref_put(&map->ref, mport_release_mapping);
1158                         ret = 0;
1159                         break;
1160                 }
1161         }
1162         mutex_unlock(&md->buf_mutex);
1163
1164         if (ret == -EFAULT) {
1165                 rmcd_debug(DMA, "ERR no matching mapping");
1166                 return ret;
1167         }
1168
1169         return 0;
1170 }
1171 #else
1172 static int rio_mport_transfer_ioctl(struct file *filp, void *arg)
1173 {
1174         return -ENODEV;
1175 }
1176
1177 static int rio_mport_wait_for_async_dma(struct file *filp, void __user *arg)
1178 {
1179         return -ENODEV;
1180 }
1181
1182 static int rio_mport_alloc_dma(struct file *filp, void __user *arg)
1183 {
1184         return -ENODEV;
1185 }
1186
1187 static int rio_mport_free_dma(struct file *filp, void __user *arg)
1188 {
1189         return -ENODEV;
1190 }
1191 #endif /* CONFIG_RAPIDIO_DMA_ENGINE */
1192
1193 /*
1194  * Inbound/outbound memory mapping functions
1195  */
1196
1197 static int
1198 rio_mport_create_inbound_mapping(struct mport_dev *md, struct file *filp,
1199                                 u64 raddr, u64 size,
1200                                 struct rio_mport_mapping **mapping)
1201 {
1202         struct rio_mport *mport = md->mport;
1203         struct rio_mport_mapping *map;
1204         int ret;
1205
1206         /* rio_map_inb_region() accepts u32 size */
1207         if (size > 0xffffffff)
1208                 return -EINVAL;
1209
1210         map = kzalloc(sizeof(*map), GFP_KERNEL);
1211         if (map == NULL)
1212                 return -ENOMEM;
1213
1214         map->virt_addr = dma_alloc_coherent(mport->dev.parent, size,
1215                                             &map->phys_addr, GFP_KERNEL);
1216         if (map->virt_addr == NULL) {
1217                 ret = -ENOMEM;
1218                 goto err_dma_alloc;
1219         }
1220
1221         if (raddr == RIO_MAP_ANY_ADDR)
1222                 raddr = map->phys_addr;
1223         ret = rio_map_inb_region(mport, map->phys_addr, raddr, (u32)size, 0);
1224         if (ret < 0)
1225                 goto err_map_inb;
1226
1227         map->dir = MAP_INBOUND;
1228         map->rio_addr = raddr;
1229         map->size = size;
1230         map->filp = filp;
1231         map->md = md;
1232         kref_init(&map->ref);
1233         mutex_lock(&md->buf_mutex);
1234         list_add_tail(&map->node, &md->mappings);
1235         mutex_unlock(&md->buf_mutex);
1236         *mapping = map;
1237         return 0;
1238
1239 err_map_inb:
1240         dma_free_coherent(mport->dev.parent, size,
1241                           map->virt_addr, map->phys_addr);
1242 err_dma_alloc:
1243         kfree(map);
1244         return ret;
1245 }
1246
1247 static int
1248 rio_mport_get_inbound_mapping(struct mport_dev *md, struct file *filp,
1249                               u64 raddr, u64 size,
1250                               struct rio_mport_mapping **mapping)
1251 {
1252         struct rio_mport_mapping *map;
1253         int err = -ENOMEM;
1254
1255         if (raddr == RIO_MAP_ANY_ADDR)
1256                 goto get_new;
1257
1258         mutex_lock(&md->buf_mutex);
1259         list_for_each_entry(map, &md->mappings, node) {
1260                 if (map->dir != MAP_INBOUND)
1261                         continue;
1262                 if (raddr == map->rio_addr && size == map->size) {
1263                         /* allow exact match only */
1264                         *mapping = map;
1265                         err = 0;
1266                         break;
1267                 } else if (raddr < (map->rio_addr + map->size - 1) &&
1268                            (raddr + size) > map->rio_addr) {
1269                         err = -EBUSY;
1270                         break;
1271                 }
1272         }
1273         mutex_unlock(&md->buf_mutex);
1274
1275         if (err != -ENOMEM)
1276                 return err;
1277 get_new:
1278         /* not found, create new */
1279         return rio_mport_create_inbound_mapping(md, filp, raddr, size, mapping);
1280 }
1281
1282 static int rio_mport_map_inbound(struct file *filp, void __user *arg)
1283 {
1284         struct mport_cdev_priv *priv = filp->private_data;
1285         struct mport_dev *md = priv->md;
1286         struct rio_mmap map;
1287         struct rio_mport_mapping *mapping = NULL;
1288         int ret;
1289
1290         if (!md->mport->ops->map_inb)
1291                 return -EPROTONOSUPPORT;
1292         if (unlikely(copy_from_user(&map, arg, sizeof(map))))
1293                 return -EFAULT;
1294
1295         rmcd_debug(IBW, "%s filp=%p", dev_name(&priv->md->dev), filp);
1296
1297         ret = rio_mport_get_inbound_mapping(md, filp, map.rio_addr,
1298                                             map.length, &mapping);
1299         if (ret)
1300                 return ret;
1301
1302         map.handle = mapping->phys_addr;
1303         map.rio_addr = mapping->rio_addr;
1304
1305         if (unlikely(copy_to_user(arg, &map, sizeof(map)))) {
1306                 /* Delete mapping if it was created by this request */
1307                 if (ret == 0 && mapping->filp == filp) {
1308                         mutex_lock(&md->buf_mutex);
1309                         kref_put(&mapping->ref, mport_release_mapping);
1310                         mutex_unlock(&md->buf_mutex);
1311                 }
1312                 return -EFAULT;
1313         }
1314
1315         return 0;
1316 }
1317
1318 /*
1319  * rio_mport_inbound_free() - unmap from RapidIO address space and free
1320  *                    previously allocated inbound DMA coherent buffer
1321  * @priv: driver private data
1322  * @arg:  buffer handle returned by allocation routine
1323  */
1324 static int rio_mport_inbound_free(struct file *filp, void __user *arg)
1325 {
1326         struct mport_cdev_priv *priv = filp->private_data;
1327         struct mport_dev *md = priv->md;
1328         u64 handle;
1329         struct rio_mport_mapping *map, *_map;
1330
1331         rmcd_debug(IBW, "%s filp=%p", dev_name(&priv->md->dev), filp);
1332
1333         if (!md->mport->ops->unmap_inb)
1334                 return -EPROTONOSUPPORT;
1335
1336         if (copy_from_user(&handle, arg, sizeof(handle)))
1337                 return -EFAULT;
1338
1339         mutex_lock(&md->buf_mutex);
1340         list_for_each_entry_safe(map, _map, &md->mappings, node) {
1341                 if (map->dir == MAP_INBOUND && map->phys_addr == handle) {
1342                         if (map->filp == filp) {
1343                                 map->filp = NULL;
1344                                 kref_put(&map->ref, mport_release_mapping);
1345                         }
1346                         break;
1347                 }
1348         }
1349         mutex_unlock(&md->buf_mutex);
1350
1351         return 0;
1352 }
1353
1354 /*
1355  * maint_port_idx_get() - Get the port index of the mport instance
1356  * @priv: driver private data
1357  * @arg:  port index
1358  */
1359 static int maint_port_idx_get(struct mport_cdev_priv *priv, void __user *arg)
1360 {
1361         struct mport_dev *md = priv->md;
1362         u32 port_idx = md->mport->index;
1363
1364         rmcd_debug(MPORT, "port_index=%d", port_idx);
1365
1366         if (copy_to_user(arg, &port_idx, sizeof(port_idx)))
1367                 return -EFAULT;
1368
1369         return 0;
1370 }
1371
1372 static int rio_mport_add_event(struct mport_cdev_priv *priv,
1373                                struct rio_event *event)
1374 {
1375         int overflow;
1376
1377         if (!(priv->event_mask & event->header))
1378                 return -EACCES;
1379
1380         spin_lock(&priv->fifo_lock);
1381         overflow = kfifo_avail(&priv->event_fifo) < sizeof(*event)
1382                 || kfifo_in(&priv->event_fifo, (unsigned char *)event,
1383                         sizeof(*event)) != sizeof(*event);
1384         spin_unlock(&priv->fifo_lock);
1385
1386         wake_up_interruptible(&priv->event_rx_wait);
1387
1388         if (overflow) {
1389                 dev_warn(&priv->md->dev, DRV_NAME ": event fifo overflow\n");
1390                 return -EBUSY;
1391         }
1392
1393         return 0;
1394 }
1395
1396 static void rio_mport_doorbell_handler(struct rio_mport *mport, void *dev_id,
1397                                        u16 src, u16 dst, u16 info)
1398 {
1399         struct mport_dev *data = dev_id;
1400         struct mport_cdev_priv *priv;
1401         struct rio_mport_db_filter *db_filter;
1402         struct rio_event event;
1403         int handled;
1404
1405         event.header = RIO_DOORBELL;
1406         event.u.doorbell.rioid = src;
1407         event.u.doorbell.payload = info;
1408
1409         handled = 0;
1410         spin_lock(&data->db_lock);
1411         list_for_each_entry(db_filter, &data->doorbells, data_node) {
1412                 if (((db_filter->filter.rioid == RIO_INVALID_DESTID ||
1413                       db_filter->filter.rioid == src)) &&
1414                       info >= db_filter->filter.low &&
1415                       info <= db_filter->filter.high) {
1416                         priv = db_filter->priv;
1417                         rio_mport_add_event(priv, &event);
1418                         handled = 1;
1419                 }
1420         }
1421         spin_unlock(&data->db_lock);
1422
1423         if (!handled)
1424                 dev_warn(&data->dev,
1425                         "%s: spurious DB received from 0x%x, info=0x%04x\n",
1426                         __func__, src, info);
1427 }
1428
1429 static int rio_mport_add_db_filter(struct mport_cdev_priv *priv,
1430                                    void __user *arg)
1431 {
1432         struct mport_dev *md = priv->md;
1433         struct rio_mport_db_filter *db_filter;
1434         struct rio_doorbell_filter filter;
1435         unsigned long flags;
1436         int ret;
1437
1438         if (copy_from_user(&filter, arg, sizeof(filter)))
1439                 return -EFAULT;
1440
1441         if (filter.low > filter.high)
1442                 return -EINVAL;
1443
1444         ret = rio_request_inb_dbell(md->mport, md, filter.low, filter.high,
1445                                     rio_mport_doorbell_handler);
1446         if (ret) {
1447                 rmcd_error("%s failed to register IBDB, err=%d",
1448                            dev_name(&md->dev), ret);
1449                 return ret;
1450         }
1451
1452         db_filter = kzalloc(sizeof(*db_filter), GFP_KERNEL);
1453         if (db_filter == NULL) {
1454                 rio_release_inb_dbell(md->mport, filter.low, filter.high);
1455                 return -ENOMEM;
1456         }
1457
1458         db_filter->filter = filter;
1459         db_filter->priv = priv;
1460         spin_lock_irqsave(&md->db_lock, flags);
1461         list_add_tail(&db_filter->priv_node, &priv->db_filters);
1462         list_add_tail(&db_filter->data_node, &md->doorbells);
1463         spin_unlock_irqrestore(&md->db_lock, flags);
1464
1465         return 0;
1466 }
1467
1468 static void rio_mport_delete_db_filter(struct rio_mport_db_filter *db_filter)
1469 {
1470         list_del(&db_filter->data_node);
1471         list_del(&db_filter->priv_node);
1472         kfree(db_filter);
1473 }
1474
1475 static int rio_mport_remove_db_filter(struct mport_cdev_priv *priv,
1476                                       void __user *arg)
1477 {
1478         struct rio_mport_db_filter *db_filter;
1479         struct rio_doorbell_filter filter;
1480         unsigned long flags;
1481         int ret = -EINVAL;
1482
1483         if (copy_from_user(&filter, arg, sizeof(filter)))
1484                 return -EFAULT;
1485
1486         if (filter.low > filter.high)
1487                 return -EINVAL;
1488
1489         spin_lock_irqsave(&priv->md->db_lock, flags);
1490         list_for_each_entry(db_filter, &priv->db_filters, priv_node) {
1491                 if (db_filter->filter.rioid == filter.rioid &&
1492                     db_filter->filter.low == filter.low &&
1493                     db_filter->filter.high == filter.high) {
1494                         rio_mport_delete_db_filter(db_filter);
1495                         ret = 0;
1496                         break;
1497                 }
1498         }
1499         spin_unlock_irqrestore(&priv->md->db_lock, flags);
1500
1501         if (!ret)
1502                 rio_release_inb_dbell(priv->md->mport, filter.low, filter.high);
1503
1504         return ret;
1505 }
1506
1507 static int rio_mport_match_pw(union rio_pw_msg *msg,
1508                               struct rio_pw_filter *filter)
1509 {
1510         if ((msg->em.comptag & filter->mask) < filter->low ||
1511                 (msg->em.comptag & filter->mask) > filter->high)
1512                 return 0;
1513         return 1;
1514 }
1515
1516 static int rio_mport_pw_handler(struct rio_mport *mport, void *context,
1517                                 union rio_pw_msg *msg, int step)
1518 {
1519         struct mport_dev *md = context;
1520         struct mport_cdev_priv *priv;
1521         struct rio_mport_pw_filter *pw_filter;
1522         struct rio_event event;
1523         int handled;
1524
1525         event.header = RIO_PORTWRITE;
1526         memcpy(event.u.portwrite.payload, msg->raw, RIO_PW_MSG_SIZE);
1527
1528         handled = 0;
1529         spin_lock(&md->pw_lock);
1530         list_for_each_entry(pw_filter, &md->portwrites, md_node) {
1531                 if (rio_mport_match_pw(msg, &pw_filter->filter)) {
1532                         priv = pw_filter->priv;
1533                         rio_mport_add_event(priv, &event);
1534                         handled = 1;
1535                 }
1536         }
1537         spin_unlock(&md->pw_lock);
1538
1539         if (!handled) {
1540                 printk_ratelimited(KERN_WARNING DRV_NAME
1541                         ": mport%d received spurious PW from 0x%08x\n",
1542                         mport->id, msg->em.comptag);
1543         }
1544
1545         return 0;
1546 }
1547
1548 static int rio_mport_add_pw_filter(struct mport_cdev_priv *priv,
1549                                    void __user *arg)
1550 {
1551         struct mport_dev *md = priv->md;
1552         struct rio_mport_pw_filter *pw_filter;
1553         struct rio_pw_filter filter;
1554         unsigned long flags;
1555         int hadd = 0;
1556
1557         if (copy_from_user(&filter, arg, sizeof(filter)))
1558                 return -EFAULT;
1559
1560         pw_filter = kzalloc(sizeof(*pw_filter), GFP_KERNEL);
1561         if (pw_filter == NULL)
1562                 return -ENOMEM;
1563
1564         pw_filter->filter = filter;
1565         pw_filter->priv = priv;
1566         spin_lock_irqsave(&md->pw_lock, flags);
1567         if (list_empty(&md->portwrites))
1568                 hadd = 1;
1569         list_add_tail(&pw_filter->priv_node, &priv->pw_filters);
1570         list_add_tail(&pw_filter->md_node, &md->portwrites);
1571         spin_unlock_irqrestore(&md->pw_lock, flags);
1572
1573         if (hadd) {
1574                 int ret;
1575
1576                 ret = rio_add_mport_pw_handler(md->mport, md,
1577                                                rio_mport_pw_handler);
1578                 if (ret) {
1579                         dev_err(&md->dev,
1580                                 "%s: failed to add IB_PW handler, err=%d\n",
1581                                 __func__, ret);
1582                         return ret;
1583                 }
1584                 rio_pw_enable(md->mport, 1);
1585         }
1586
1587         return 0;
1588 }
1589
1590 static void rio_mport_delete_pw_filter(struct rio_mport_pw_filter *pw_filter)
1591 {
1592         list_del(&pw_filter->md_node);
1593         list_del(&pw_filter->priv_node);
1594         kfree(pw_filter);
1595 }
1596
1597 static int rio_mport_match_pw_filter(struct rio_pw_filter *a,
1598                                      struct rio_pw_filter *b)
1599 {
1600         if ((a->mask == b->mask) && (a->low == b->low) && (a->high == b->high))
1601                 return 1;
1602         return 0;
1603 }
1604
1605 static int rio_mport_remove_pw_filter(struct mport_cdev_priv *priv,
1606                                       void __user *arg)
1607 {
1608         struct mport_dev *md = priv->md;
1609         struct rio_mport_pw_filter *pw_filter;
1610         struct rio_pw_filter filter;
1611         unsigned long flags;
1612         int ret = -EINVAL;
1613         int hdel = 0;
1614
1615         if (copy_from_user(&filter, arg, sizeof(filter)))
1616                 return -EFAULT;
1617
1618         spin_lock_irqsave(&md->pw_lock, flags);
1619         list_for_each_entry(pw_filter, &priv->pw_filters, priv_node) {
1620                 if (rio_mport_match_pw_filter(&pw_filter->filter, &filter)) {
1621                         rio_mport_delete_pw_filter(pw_filter);
1622                         ret = 0;
1623                         break;
1624                 }
1625         }
1626
1627         if (list_empty(&md->portwrites))
1628                 hdel = 1;
1629         spin_unlock_irqrestore(&md->pw_lock, flags);
1630
1631         if (hdel) {
1632                 rio_del_mport_pw_handler(md->mport, priv->md,
1633                                          rio_mport_pw_handler);
1634                 rio_pw_enable(md->mport, 0);
1635         }
1636
1637         return ret;
1638 }
1639
1640 /*
1641  * rio_release_dev - release routine for kernel RIO device object
1642  * @dev: kernel device object associated with a RIO device structure
1643  *
1644  * Frees a RIO device struct associated a RIO device struct.
1645  * The RIO device struct is freed.
1646  */
1647 static void rio_release_dev(struct device *dev)
1648 {
1649         struct rio_dev *rdev;
1650
1651         rdev = to_rio_dev(dev);
1652         pr_info(DRV_PREFIX "%s: %s\n", __func__, rio_name(rdev));
1653         kfree(rdev);
1654 }
1655
1656
1657 static void rio_release_net(struct device *dev)
1658 {
1659         struct rio_net *net;
1660
1661         net = to_rio_net(dev);
1662         rmcd_debug(RDEV, "net_%d", net->id);
1663         kfree(net);
1664 }
1665
1666
1667 /*
1668  * rio_mport_add_riodev - creates a kernel RIO device object
1669  *
1670  * Allocates a RIO device data structure and initializes required fields based
1671  * on device's configuration space contents.
1672  * If the device has switch capabilities, then a switch specific portion is
1673  * allocated and configured.
1674  */
1675 static int rio_mport_add_riodev(struct mport_cdev_priv *priv,
1676                                    void __user *arg)
1677 {
1678         struct mport_dev *md = priv->md;
1679         struct rio_rdev_info dev_info;
1680         struct rio_dev *rdev;
1681         struct rio_switch *rswitch = NULL;
1682         struct rio_mport *mport;
1683         struct device *dev;
1684         size_t size;
1685         u32 rval;
1686         u32 swpinfo = 0;
1687         u16 destid;
1688         u8 hopcount;
1689         int err;
1690
1691         if (copy_from_user(&dev_info, arg, sizeof(dev_info)))
1692                 return -EFAULT;
1693         dev_info.name[sizeof(dev_info.name) - 1] = '\0';
1694
1695         rmcd_debug(RDEV, "name:%s ct:0x%x did:0x%x hc:0x%x", dev_info.name,
1696                    dev_info.comptag, dev_info.destid, dev_info.hopcount);
1697
1698         dev = bus_find_device_by_name(&rio_bus_type, NULL, dev_info.name);
1699         if (dev) {
1700                 rmcd_debug(RDEV, "device %s already exists", dev_info.name);
1701                 put_device(dev);
1702                 return -EEXIST;
1703         }
1704
1705         size = sizeof(*rdev);
1706         mport = md->mport;
1707         destid = dev_info.destid;
1708         hopcount = dev_info.hopcount;
1709
1710         if (rio_mport_read_config_32(mport, destid, hopcount,
1711                                      RIO_PEF_CAR, &rval))
1712                 return -EIO;
1713
1714         if (rval & RIO_PEF_SWITCH) {
1715                 rio_mport_read_config_32(mport, destid, hopcount,
1716                                          RIO_SWP_INFO_CAR, &swpinfo);
1717                 size += struct_size(rswitch, nextdev, RIO_GET_TOTAL_PORTS(swpinfo));
1718         }
1719
1720         rdev = kzalloc(size, GFP_KERNEL);
1721         if (rdev == NULL)
1722                 return -ENOMEM;
1723
1724         if (mport->net == NULL) {
1725                 struct rio_net *net;
1726
1727                 net = rio_alloc_net(mport);
1728                 if (!net) {
1729                         err = -ENOMEM;
1730                         rmcd_debug(RDEV, "failed to allocate net object");
1731                         goto cleanup;
1732                 }
1733
1734                 net->id = mport->id;
1735                 net->hport = mport;
1736                 dev_set_name(&net->dev, "rnet_%d", net->id);
1737                 net->dev.parent = &mport->dev;
1738                 net->dev.release = rio_release_net;
1739                 err = rio_add_net(net);
1740                 if (err) {
1741                         rmcd_debug(RDEV, "failed to register net, err=%d", err);
1742                         kfree(net);
1743                         goto cleanup;
1744                 }
1745         }
1746
1747         rdev->net = mport->net;
1748         rdev->pef = rval;
1749         rdev->swpinfo = swpinfo;
1750         rio_mport_read_config_32(mport, destid, hopcount,
1751                                  RIO_DEV_ID_CAR, &rval);
1752         rdev->did = rval >> 16;
1753         rdev->vid = rval & 0xffff;
1754         rio_mport_read_config_32(mport, destid, hopcount, RIO_DEV_INFO_CAR,
1755                                  &rdev->device_rev);
1756         rio_mport_read_config_32(mport, destid, hopcount, RIO_ASM_ID_CAR,
1757                                  &rval);
1758         rdev->asm_did = rval >> 16;
1759         rdev->asm_vid = rval & 0xffff;
1760         rio_mport_read_config_32(mport, destid, hopcount, RIO_ASM_INFO_CAR,
1761                                  &rval);
1762         rdev->asm_rev = rval >> 16;
1763
1764         if (rdev->pef & RIO_PEF_EXT_FEATURES) {
1765                 rdev->efptr = rval & 0xffff;
1766                 rdev->phys_efptr = rio_mport_get_physefb(mport, 0, destid,
1767                                                 hopcount, &rdev->phys_rmap);
1768
1769                 rdev->em_efptr = rio_mport_get_feature(mport, 0, destid,
1770                                                 hopcount, RIO_EFB_ERR_MGMNT);
1771         }
1772
1773         rio_mport_read_config_32(mport, destid, hopcount, RIO_SRC_OPS_CAR,
1774                                  &rdev->src_ops);
1775         rio_mport_read_config_32(mport, destid, hopcount, RIO_DST_OPS_CAR,
1776                                  &rdev->dst_ops);
1777
1778         rdev->comp_tag = dev_info.comptag;
1779         rdev->destid = destid;
1780         /* hopcount is stored as specified by a caller, regardles of EP or SW */
1781         rdev->hopcount = hopcount;
1782
1783         if (rdev->pef & RIO_PEF_SWITCH) {
1784                 rswitch = rdev->rswitch;
1785                 rswitch->route_table = NULL;
1786         }
1787
1788         if (strlen(dev_info.name))
1789                 dev_set_name(&rdev->dev, "%s", dev_info.name);
1790         else if (rdev->pef & RIO_PEF_SWITCH)
1791                 dev_set_name(&rdev->dev, "%02x:s:%04x", mport->id,
1792                              rdev->comp_tag & RIO_CTAG_UDEVID);
1793         else
1794                 dev_set_name(&rdev->dev, "%02x:e:%04x", mport->id,
1795                              rdev->comp_tag & RIO_CTAG_UDEVID);
1796
1797         INIT_LIST_HEAD(&rdev->net_list);
1798         rdev->dev.parent = &mport->net->dev;
1799         rio_attach_device(rdev);
1800         rdev->dev.release = rio_release_dev;
1801
1802         if (rdev->dst_ops & RIO_DST_OPS_DOORBELL)
1803                 rio_init_dbell_res(&rdev->riores[RIO_DOORBELL_RESOURCE],
1804                                    0, 0xffff);
1805         err = rio_add_device(rdev);
1806         if (err)
1807                 goto cleanup;
1808         rio_dev_get(rdev);
1809
1810         return 0;
1811 cleanup:
1812         kfree(rdev);
1813         return err;
1814 }
1815
1816 static int rio_mport_del_riodev(struct mport_cdev_priv *priv, void __user *arg)
1817 {
1818         struct rio_rdev_info dev_info;
1819         struct rio_dev *rdev = NULL;
1820         struct device  *dev;
1821         struct rio_mport *mport;
1822         struct rio_net *net;
1823
1824         if (copy_from_user(&dev_info, arg, sizeof(dev_info)))
1825                 return -EFAULT;
1826         dev_info.name[sizeof(dev_info.name) - 1] = '\0';
1827
1828         mport = priv->md->mport;
1829
1830         /* If device name is specified, removal by name has priority */
1831         if (strlen(dev_info.name)) {
1832                 dev = bus_find_device_by_name(&rio_bus_type, NULL,
1833                                               dev_info.name);
1834                 if (dev)
1835                         rdev = to_rio_dev(dev);
1836         } else {
1837                 do {
1838                         rdev = rio_get_comptag(dev_info.comptag, rdev);
1839                         if (rdev && rdev->dev.parent == &mport->net->dev &&
1840                             rdev->destid == dev_info.destid &&
1841                             rdev->hopcount == dev_info.hopcount)
1842                                 break;
1843                 } while (rdev);
1844         }
1845
1846         if (!rdev) {
1847                 rmcd_debug(RDEV,
1848                         "device name:%s ct:0x%x did:0x%x hc:0x%x not found",
1849                         dev_info.name, dev_info.comptag, dev_info.destid,
1850                         dev_info.hopcount);
1851                 return -ENODEV;
1852         }
1853
1854         net = rdev->net;
1855         rio_dev_put(rdev);
1856         rio_del_device(rdev, RIO_DEVICE_SHUTDOWN);
1857
1858         if (list_empty(&net->devices)) {
1859                 rio_free_net(net);
1860                 mport->net = NULL;
1861         }
1862
1863         return 0;
1864 }
1865
1866 /*
1867  * Mport cdev management
1868  */
1869
1870 /*
1871  * mport_cdev_open() - Open character device (mport)
1872  */
1873 static int mport_cdev_open(struct inode *inode, struct file *filp)
1874 {
1875         int ret;
1876         int minor = iminor(inode);
1877         struct mport_dev *chdev;
1878         struct mport_cdev_priv *priv;
1879
1880         /* Test for valid device */
1881         if (minor >= RIO_MAX_MPORTS) {
1882                 rmcd_error("Invalid minor device number");
1883                 return -EINVAL;
1884         }
1885
1886         chdev = container_of(inode->i_cdev, struct mport_dev, cdev);
1887
1888         rmcd_debug(INIT, "%s filp=%p", dev_name(&chdev->dev), filp);
1889
1890         if (atomic_read(&chdev->active) == 0)
1891                 return -ENODEV;
1892
1893         get_device(&chdev->dev);
1894
1895         priv = kzalloc(sizeof(*priv), GFP_KERNEL);
1896         if (!priv) {
1897                 put_device(&chdev->dev);
1898                 return -ENOMEM;
1899         }
1900
1901         priv->md = chdev;
1902
1903         mutex_lock(&chdev->file_mutex);
1904         list_add_tail(&priv->list, &chdev->file_list);
1905         mutex_unlock(&chdev->file_mutex);
1906
1907         INIT_LIST_HEAD(&priv->db_filters);
1908         INIT_LIST_HEAD(&priv->pw_filters);
1909         spin_lock_init(&priv->fifo_lock);
1910         init_waitqueue_head(&priv->event_rx_wait);
1911         ret = kfifo_alloc(&priv->event_fifo,
1912                           sizeof(struct rio_event) * MPORT_EVENT_DEPTH,
1913                           GFP_KERNEL);
1914         if (ret < 0) {
1915                 dev_err(&chdev->dev, DRV_NAME ": kfifo_alloc failed\n");
1916                 ret = -ENOMEM;
1917                 goto err_fifo;
1918         }
1919
1920 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
1921         INIT_LIST_HEAD(&priv->async_list);
1922         spin_lock_init(&priv->req_lock);
1923         mutex_init(&priv->dma_lock);
1924 #endif
1925
1926         filp->private_data = priv;
1927         goto out;
1928 err_fifo:
1929         kfree(priv);
1930 out:
1931         return ret;
1932 }
1933
1934 static int mport_cdev_fasync(int fd, struct file *filp, int mode)
1935 {
1936         struct mport_cdev_priv *priv = filp->private_data;
1937
1938         return fasync_helper(fd, filp, mode, &priv->async_queue);
1939 }
1940
1941 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
1942 static void mport_cdev_release_dma(struct file *filp)
1943 {
1944         struct mport_cdev_priv *priv = filp->private_data;
1945         struct mport_dev *md;
1946         struct mport_dma_req *req, *req_next;
1947         unsigned long tmo = msecs_to_jiffies(dma_timeout);
1948         long wret;
1949         LIST_HEAD(list);
1950
1951         rmcd_debug(EXIT, "from filp=%p %s(%d)",
1952                    filp, current->comm, task_pid_nr(current));
1953
1954         if (!priv->dmach) {
1955                 rmcd_debug(EXIT, "No DMA channel for filp=%p", filp);
1956                 return;
1957         }
1958
1959         md = priv->md;
1960
1961         spin_lock(&priv->req_lock);
1962         if (!list_empty(&priv->async_list)) {
1963                 rmcd_debug(EXIT, "async list not empty filp=%p %s(%d)",
1964                            filp, current->comm, task_pid_nr(current));
1965                 list_splice_init(&priv->async_list, &list);
1966         }
1967         spin_unlock(&priv->req_lock);
1968
1969         if (!list_empty(&list)) {
1970                 rmcd_debug(EXIT, "temp list not empty");
1971                 list_for_each_entry_safe(req, req_next, &list, node) {
1972                         rmcd_debug(EXIT, "free req->filp=%p cookie=%d compl=%s",
1973                                    req->filp, req->cookie,
1974                                    completion_done(&req->req_comp)?"yes":"no");
1975                         list_del(&req->node);
1976                         kref_put(&req->refcount, dma_req_free);
1977                 }
1978         }
1979
1980         put_dma_channel(priv);
1981         wret = wait_for_completion_interruptible_timeout(&priv->comp, tmo);
1982
1983         if (wret <= 0) {
1984                 rmcd_error("%s(%d) failed waiting for DMA release err=%ld",
1985                         current->comm, task_pid_nr(current), wret);
1986         }
1987
1988         if (priv->dmach != priv->md->dma_chan) {
1989                 rmcd_debug(EXIT, "Release DMA channel for filp=%p %s(%d)",
1990                            filp, current->comm, task_pid_nr(current));
1991                 rio_release_dma(priv->dmach);
1992         } else {
1993                 rmcd_debug(EXIT, "Adjust default DMA channel refcount");
1994                 kref_put(&md->dma_ref, mport_release_def_dma);
1995         }
1996
1997         priv->dmach = NULL;
1998 }
1999 #else
2000 #define mport_cdev_release_dma(priv) do {} while (0)
2001 #endif
2002
2003 /*
2004  * mport_cdev_release() - Release character device
2005  */
2006 static int mport_cdev_release(struct inode *inode, struct file *filp)
2007 {
2008         struct mport_cdev_priv *priv = filp->private_data;
2009         struct mport_dev *chdev;
2010         struct rio_mport_pw_filter *pw_filter, *pw_filter_next;
2011         struct rio_mport_db_filter *db_filter, *db_filter_next;
2012         struct rio_mport_mapping *map, *_map;
2013         unsigned long flags;
2014
2015         rmcd_debug(EXIT, "%s filp=%p", dev_name(&priv->md->dev), filp);
2016
2017         chdev = priv->md;
2018         mport_cdev_release_dma(filp);
2019
2020         priv->event_mask = 0;
2021
2022         spin_lock_irqsave(&chdev->pw_lock, flags);
2023         if (!list_empty(&priv->pw_filters)) {
2024                 list_for_each_entry_safe(pw_filter, pw_filter_next,
2025                                          &priv->pw_filters, priv_node)
2026                         rio_mport_delete_pw_filter(pw_filter);
2027         }
2028         spin_unlock_irqrestore(&chdev->pw_lock, flags);
2029
2030         spin_lock_irqsave(&chdev->db_lock, flags);
2031         list_for_each_entry_safe(db_filter, db_filter_next,
2032                                  &priv->db_filters, priv_node) {
2033                 rio_mport_delete_db_filter(db_filter);
2034         }
2035         spin_unlock_irqrestore(&chdev->db_lock, flags);
2036
2037         kfifo_free(&priv->event_fifo);
2038
2039         mutex_lock(&chdev->buf_mutex);
2040         list_for_each_entry_safe(map, _map, &chdev->mappings, node) {
2041                 if (map->filp == filp) {
2042                         rmcd_debug(EXIT, "release mapping %p filp=%p",
2043                                    map->virt_addr, filp);
2044                         kref_put(&map->ref, mport_release_mapping);
2045                 }
2046         }
2047         mutex_unlock(&chdev->buf_mutex);
2048
2049         mport_cdev_fasync(-1, filp, 0);
2050         filp->private_data = NULL;
2051         mutex_lock(&chdev->file_mutex);
2052         list_del(&priv->list);
2053         mutex_unlock(&chdev->file_mutex);
2054         put_device(&chdev->dev);
2055         kfree(priv);
2056         return 0;
2057 }
2058
2059 /*
2060  * mport_cdev_ioctl() - IOCTLs for character device
2061  */
2062 static long mport_cdev_ioctl(struct file *filp,
2063                 unsigned int cmd, unsigned long arg)
2064 {
2065         int err = -EINVAL;
2066         struct mport_cdev_priv *data = filp->private_data;
2067         struct mport_dev *md = data->md;
2068
2069         if (atomic_read(&md->active) == 0)
2070                 return -ENODEV;
2071
2072         switch (cmd) {
2073         case RIO_MPORT_MAINT_READ_LOCAL:
2074                 return rio_mport_maint_rd(data, (void __user *)arg, 1);
2075         case RIO_MPORT_MAINT_WRITE_LOCAL:
2076                 return rio_mport_maint_wr(data, (void __user *)arg, 1);
2077         case RIO_MPORT_MAINT_READ_REMOTE:
2078                 return rio_mport_maint_rd(data, (void __user *)arg, 0);
2079         case RIO_MPORT_MAINT_WRITE_REMOTE:
2080                 return rio_mport_maint_wr(data, (void __user *)arg, 0);
2081         case RIO_MPORT_MAINT_HDID_SET:
2082                 return maint_hdid_set(data, (void __user *)arg);
2083         case RIO_MPORT_MAINT_COMPTAG_SET:
2084                 return maint_comptag_set(data, (void __user *)arg);
2085         case RIO_MPORT_MAINT_PORT_IDX_GET:
2086                 return maint_port_idx_get(data, (void __user *)arg);
2087         case RIO_MPORT_GET_PROPERTIES:
2088                 md->properties.hdid = md->mport->host_deviceid;
2089                 if (copy_to_user((void __user *)arg, &(md->properties),
2090                                  sizeof(md->properties)))
2091                         return -EFAULT;
2092                 return 0;
2093         case RIO_ENABLE_DOORBELL_RANGE:
2094                 return rio_mport_add_db_filter(data, (void __user *)arg);
2095         case RIO_DISABLE_DOORBELL_RANGE:
2096                 return rio_mport_remove_db_filter(data, (void __user *)arg);
2097         case RIO_ENABLE_PORTWRITE_RANGE:
2098                 return rio_mport_add_pw_filter(data, (void __user *)arg);
2099         case RIO_DISABLE_PORTWRITE_RANGE:
2100                 return rio_mport_remove_pw_filter(data, (void __user *)arg);
2101         case RIO_SET_EVENT_MASK:
2102                 data->event_mask = (u32)arg;
2103                 return 0;
2104         case RIO_GET_EVENT_MASK:
2105                 if (copy_to_user((void __user *)arg, &data->event_mask,
2106                                     sizeof(u32)))
2107                         return -EFAULT;
2108                 return 0;
2109         case RIO_MAP_OUTBOUND:
2110                 return rio_mport_obw_map(filp, (void __user *)arg);
2111         case RIO_MAP_INBOUND:
2112                 return rio_mport_map_inbound(filp, (void __user *)arg);
2113         case RIO_UNMAP_OUTBOUND:
2114                 return rio_mport_obw_free(filp, (void __user *)arg);
2115         case RIO_UNMAP_INBOUND:
2116                 return rio_mport_inbound_free(filp, (void __user *)arg);
2117         case RIO_ALLOC_DMA:
2118                 return rio_mport_alloc_dma(filp, (void __user *)arg);
2119         case RIO_FREE_DMA:
2120                 return rio_mport_free_dma(filp, (void __user *)arg);
2121         case RIO_WAIT_FOR_ASYNC:
2122                 return rio_mport_wait_for_async_dma(filp, (void __user *)arg);
2123         case RIO_TRANSFER:
2124                 return rio_mport_transfer_ioctl(filp, (void __user *)arg);
2125         case RIO_DEV_ADD:
2126                 return rio_mport_add_riodev(data, (void __user *)arg);
2127         case RIO_DEV_DEL:
2128                 return rio_mport_del_riodev(data, (void __user *)arg);
2129         default:
2130                 break;
2131         }
2132
2133         return err;
2134 }
2135
2136 /*
2137  * mport_release_mapping - free mapping resources and info structure
2138  * @ref: a pointer to the kref within struct rio_mport_mapping
2139  *
2140  * NOTE: Shall be called while holding buf_mutex.
2141  */
2142 static void mport_release_mapping(struct kref *ref)
2143 {
2144         struct rio_mport_mapping *map =
2145                         container_of(ref, struct rio_mport_mapping, ref);
2146         struct rio_mport *mport = map->md->mport;
2147
2148         rmcd_debug(MMAP, "type %d mapping @ %p (phys = %pad) for %s",
2149                    map->dir, map->virt_addr,
2150                    &map->phys_addr, mport->name);
2151
2152         list_del(&map->node);
2153
2154         switch (map->dir) {
2155         case MAP_INBOUND:
2156                 rio_unmap_inb_region(mport, map->phys_addr);
2157                 fallthrough;
2158         case MAP_DMA:
2159                 dma_free_coherent(mport->dev.parent, map->size,
2160                                   map->virt_addr, map->phys_addr);
2161                 break;
2162         case MAP_OUTBOUND:
2163                 rio_unmap_outb_region(mport, map->rioid, map->rio_addr);
2164                 break;
2165         }
2166         kfree(map);
2167 }
2168
2169 static void mport_mm_open(struct vm_area_struct *vma)
2170 {
2171         struct rio_mport_mapping *map = vma->vm_private_data;
2172
2173         rmcd_debug(MMAP, "%pad", &map->phys_addr);
2174         kref_get(&map->ref);
2175 }
2176
2177 static void mport_mm_close(struct vm_area_struct *vma)
2178 {
2179         struct rio_mport_mapping *map = vma->vm_private_data;
2180
2181         rmcd_debug(MMAP, "%pad", &map->phys_addr);
2182         mutex_lock(&map->md->buf_mutex);
2183         kref_put(&map->ref, mport_release_mapping);
2184         mutex_unlock(&map->md->buf_mutex);
2185 }
2186
2187 static const struct vm_operations_struct vm_ops = {
2188         .open = mport_mm_open,
2189         .close = mport_mm_close,
2190 };
2191
2192 static int mport_cdev_mmap(struct file *filp, struct vm_area_struct *vma)
2193 {
2194         struct mport_cdev_priv *priv = filp->private_data;
2195         struct mport_dev *md;
2196         size_t size = vma->vm_end - vma->vm_start;
2197         dma_addr_t baddr;
2198         unsigned long offset;
2199         int found = 0, ret;
2200         struct rio_mport_mapping *map;
2201
2202         rmcd_debug(MMAP, "0x%x bytes at offset 0x%lx",
2203                    (unsigned int)size, vma->vm_pgoff);
2204
2205         md = priv->md;
2206         baddr = ((dma_addr_t)vma->vm_pgoff << PAGE_SHIFT);
2207
2208         mutex_lock(&md->buf_mutex);
2209         list_for_each_entry(map, &md->mappings, node) {
2210                 if (baddr >= map->phys_addr &&
2211                     baddr < (map->phys_addr + map->size)) {
2212                         found = 1;
2213                         break;
2214                 }
2215         }
2216         mutex_unlock(&md->buf_mutex);
2217
2218         if (!found)
2219                 return -ENOMEM;
2220
2221         offset = baddr - map->phys_addr;
2222
2223         if (size + offset > map->size)
2224                 return -EINVAL;
2225
2226         vma->vm_pgoff = offset >> PAGE_SHIFT;
2227         rmcd_debug(MMAP, "MMAP adjusted offset = 0x%lx", vma->vm_pgoff);
2228
2229         if (map->dir == MAP_INBOUND || map->dir == MAP_DMA)
2230                 ret = dma_mmap_coherent(md->mport->dev.parent, vma,
2231                                 map->virt_addr, map->phys_addr, map->size);
2232         else if (map->dir == MAP_OUTBOUND) {
2233                 vma->vm_page_prot = pgprot_noncached(vma->vm_page_prot);
2234                 ret = vm_iomap_memory(vma, map->phys_addr, map->size);
2235         } else {
2236                 rmcd_error("Attempt to mmap unsupported mapping type");
2237                 ret = -EIO;
2238         }
2239
2240         if (!ret) {
2241                 vma->vm_private_data = map;
2242                 vma->vm_ops = &vm_ops;
2243                 mport_mm_open(vma);
2244         } else {
2245                 rmcd_error("MMAP exit with err=%d", ret);
2246         }
2247
2248         return ret;
2249 }
2250
2251 static __poll_t mport_cdev_poll(struct file *filp, poll_table *wait)
2252 {
2253         struct mport_cdev_priv *priv = filp->private_data;
2254
2255         poll_wait(filp, &priv->event_rx_wait, wait);
2256         if (kfifo_len(&priv->event_fifo))
2257                 return EPOLLIN | EPOLLRDNORM;
2258
2259         return 0;
2260 }
2261
2262 static ssize_t mport_read(struct file *filp, char __user *buf, size_t count,
2263                         loff_t *ppos)
2264 {
2265         struct mport_cdev_priv *priv = filp->private_data;
2266         int copied;
2267         ssize_t ret;
2268
2269         if (!count)
2270                 return 0;
2271
2272         if (kfifo_is_empty(&priv->event_fifo) &&
2273             (filp->f_flags & O_NONBLOCK))
2274                 return -EAGAIN;
2275
2276         if (count % sizeof(struct rio_event))
2277                 return -EINVAL;
2278
2279         ret = wait_event_interruptible(priv->event_rx_wait,
2280                                         kfifo_len(&priv->event_fifo) != 0);
2281         if (ret)
2282                 return ret;
2283
2284         while (ret < count) {
2285                 if (kfifo_to_user(&priv->event_fifo, buf,
2286                       sizeof(struct rio_event), &copied))
2287                         return -EFAULT;
2288                 ret += copied;
2289                 buf += copied;
2290         }
2291
2292         return ret;
2293 }
2294
2295 static ssize_t mport_write(struct file *filp, const char __user *buf,
2296                          size_t count, loff_t *ppos)
2297 {
2298         struct mport_cdev_priv *priv = filp->private_data;
2299         struct rio_mport *mport = priv->md->mport;
2300         struct rio_event event;
2301         int len, ret;
2302
2303         if (!count)
2304                 return 0;
2305
2306         if (count % sizeof(event))
2307                 return -EINVAL;
2308
2309         len = 0;
2310         while ((count - len) >= (int)sizeof(event)) {
2311                 if (copy_from_user(&event, buf, sizeof(event)))
2312                         return -EFAULT;
2313
2314                 if (event.header != RIO_DOORBELL)
2315                         return -EINVAL;
2316
2317                 ret = rio_mport_send_doorbell(mport,
2318                                               event.u.doorbell.rioid,
2319                                               event.u.doorbell.payload);
2320                 if (ret < 0)
2321                         return ret;
2322
2323                 len += sizeof(event);
2324                 buf += sizeof(event);
2325         }
2326
2327         return len;
2328 }
2329
2330 static const struct file_operations mport_fops = {
2331         .owner          = THIS_MODULE,
2332         .open           = mport_cdev_open,
2333         .release        = mport_cdev_release,
2334         .poll           = mport_cdev_poll,
2335         .read           = mport_read,
2336         .write          = mport_write,
2337         .mmap           = mport_cdev_mmap,
2338         .fasync         = mport_cdev_fasync,
2339         .unlocked_ioctl = mport_cdev_ioctl
2340 };
2341
2342 /*
2343  * Character device management
2344  */
2345
2346 static void mport_device_release(struct device *dev)
2347 {
2348         struct mport_dev *md;
2349
2350         rmcd_debug(EXIT, "%s", dev_name(dev));
2351         md = container_of(dev, struct mport_dev, dev);
2352         kfree(md);
2353 }
2354
2355 /*
2356  * mport_cdev_add() - Create mport_dev from rio_mport
2357  * @mport:      RapidIO master port
2358  */
2359 static struct mport_dev *mport_cdev_add(struct rio_mport *mport)
2360 {
2361         int ret = 0;
2362         struct mport_dev *md;
2363         struct rio_mport_attr attr;
2364
2365         md = kzalloc(sizeof(*md), GFP_KERNEL);
2366         if (!md) {
2367                 rmcd_error("Unable allocate a device object");
2368                 return NULL;
2369         }
2370
2371         md->mport = mport;
2372         mutex_init(&md->buf_mutex);
2373         mutex_init(&md->file_mutex);
2374         INIT_LIST_HEAD(&md->file_list);
2375
2376         device_initialize(&md->dev);
2377         md->dev.devt = MKDEV(MAJOR(dev_number), mport->id);
2378         md->dev.class = dev_class;
2379         md->dev.parent = &mport->dev;
2380         md->dev.release = mport_device_release;
2381         dev_set_name(&md->dev, DEV_NAME "%d", mport->id);
2382         atomic_set(&md->active, 1);
2383
2384         cdev_init(&md->cdev, &mport_fops);
2385         md->cdev.owner = THIS_MODULE;
2386
2387         INIT_LIST_HEAD(&md->doorbells);
2388         spin_lock_init(&md->db_lock);
2389         INIT_LIST_HEAD(&md->portwrites);
2390         spin_lock_init(&md->pw_lock);
2391         INIT_LIST_HEAD(&md->mappings);
2392
2393         md->properties.id = mport->id;
2394         md->properties.sys_size = mport->sys_size;
2395         md->properties.hdid = mport->host_deviceid;
2396         md->properties.index = mport->index;
2397
2398         /* The transfer_mode property will be returned through mport query
2399          * interface
2400          */
2401 #ifdef CONFIG_FSL_RIO /* for now: only on Freescale's SoCs */
2402         md->properties.transfer_mode |= RIO_TRANSFER_MODE_MAPPED;
2403 #else
2404         md->properties.transfer_mode |= RIO_TRANSFER_MODE_TRANSFER;
2405 #endif
2406
2407         ret = cdev_device_add(&md->cdev, &md->dev);
2408         if (ret) {
2409                 rmcd_error("Failed to register mport %d (err=%d)",
2410                        mport->id, ret);
2411                 goto err_cdev;
2412         }
2413         ret = rio_query_mport(mport, &attr);
2414         if (!ret) {
2415                 md->properties.flags = attr.flags;
2416                 md->properties.link_speed = attr.link_speed;
2417                 md->properties.link_width = attr.link_width;
2418                 md->properties.dma_max_sge = attr.dma_max_sge;
2419                 md->properties.dma_max_size = attr.dma_max_size;
2420                 md->properties.dma_align = attr.dma_align;
2421                 md->properties.cap_sys_size = 0;
2422                 md->properties.cap_transfer_mode = 0;
2423                 md->properties.cap_addr_size = 0;
2424         } else
2425                 pr_info(DRV_PREFIX "Failed to obtain info for %s cdev(%d:%d)\n",
2426                         mport->name, MAJOR(dev_number), mport->id);
2427
2428         mutex_lock(&mport_devs_lock);
2429         list_add_tail(&md->node, &mport_devs);
2430         mutex_unlock(&mport_devs_lock);
2431
2432         pr_info(DRV_PREFIX "Added %s cdev(%d:%d)\n",
2433                 mport->name, MAJOR(dev_number), mport->id);
2434
2435         return md;
2436
2437 err_cdev:
2438         put_device(&md->dev);
2439         return NULL;
2440 }
2441
2442 /*
2443  * mport_cdev_terminate_dma() - Stop all active DMA data transfers and release
2444  *                              associated DMA channels.
2445  */
2446 static void mport_cdev_terminate_dma(struct mport_dev *md)
2447 {
2448 #ifdef CONFIG_RAPIDIO_DMA_ENGINE
2449         struct mport_cdev_priv *client;
2450
2451         rmcd_debug(DMA, "%s", dev_name(&md->dev));
2452
2453         mutex_lock(&md->file_mutex);
2454         list_for_each_entry(client, &md->file_list, list) {
2455                 if (client->dmach) {
2456                         dmaengine_terminate_all(client->dmach);
2457                         rio_release_dma(client->dmach);
2458                 }
2459         }
2460         mutex_unlock(&md->file_mutex);
2461
2462         if (md->dma_chan) {
2463                 dmaengine_terminate_all(md->dma_chan);
2464                 rio_release_dma(md->dma_chan);
2465                 md->dma_chan = NULL;
2466         }
2467 #endif
2468 }
2469
2470
2471 /*
2472  * mport_cdev_kill_fasync() - Send SIGIO signal to all processes with open
2473  *                            mport_cdev files.
2474  */
2475 static int mport_cdev_kill_fasync(struct mport_dev *md)
2476 {
2477         unsigned int files = 0;
2478         struct mport_cdev_priv *client;
2479
2480         mutex_lock(&md->file_mutex);
2481         list_for_each_entry(client, &md->file_list, list) {
2482                 if (client->async_queue)
2483                         kill_fasync(&client->async_queue, SIGIO, POLL_HUP);
2484                 files++;
2485         }
2486         mutex_unlock(&md->file_mutex);
2487         return files;
2488 }
2489
2490 /*
2491  * mport_cdev_remove() - Remove mport character device
2492  * @dev:        Mport device to remove
2493  */
2494 static void mport_cdev_remove(struct mport_dev *md)
2495 {
2496         struct rio_mport_mapping *map, *_map;
2497
2498         rmcd_debug(EXIT, "Remove %s cdev", md->mport->name);
2499         atomic_set(&md->active, 0);
2500         mport_cdev_terminate_dma(md);
2501         rio_del_mport_pw_handler(md->mport, md, rio_mport_pw_handler);
2502         cdev_device_del(&md->cdev, &md->dev);
2503         mport_cdev_kill_fasync(md);
2504
2505         /* TODO: do we need to give clients some time to close file
2506          * descriptors? Simple wait for XX, or kref?
2507          */
2508
2509         /*
2510          * Release DMA buffers allocated for the mport device.
2511          * Disable associated inbound Rapidio requests mapping if applicable.
2512          */
2513         mutex_lock(&md->buf_mutex);
2514         list_for_each_entry_safe(map, _map, &md->mappings, node) {
2515                 kref_put(&map->ref, mport_release_mapping);
2516         }
2517         mutex_unlock(&md->buf_mutex);
2518
2519         if (!list_empty(&md->mappings))
2520                 rmcd_warn("WARNING: %s pending mappings on removal",
2521                           md->mport->name);
2522
2523         rio_release_inb_dbell(md->mport, 0, 0x0fff);
2524
2525         put_device(&md->dev);
2526 }
2527
2528 /*
2529  * RIO rio_mport_interface driver
2530  */
2531
2532 /*
2533  * mport_add_mport() - Add rio_mport from LDM device struct
2534  * @dev:                Linux device model struct
2535  * @class_intf: Linux class_interface
2536  */
2537 static int mport_add_mport(struct device *dev,
2538                 struct class_interface *class_intf)
2539 {
2540         struct rio_mport *mport = NULL;
2541         struct mport_dev *chdev = NULL;
2542
2543         mport = to_rio_mport(dev);
2544         if (!mport)
2545                 return -ENODEV;
2546
2547         chdev = mport_cdev_add(mport);
2548         if (!chdev)
2549                 return -ENODEV;
2550
2551         return 0;
2552 }
2553
2554 /*
2555  * mport_remove_mport() - Remove rio_mport from global list
2556  * TODO remove device from global mport_dev list
2557  */
2558 static void mport_remove_mport(struct device *dev,
2559                 struct class_interface *class_intf)
2560 {
2561         struct rio_mport *mport = NULL;
2562         struct mport_dev *chdev;
2563         int found = 0;
2564
2565         mport = to_rio_mport(dev);
2566         rmcd_debug(EXIT, "Remove %s", mport->name);
2567
2568         mutex_lock(&mport_devs_lock);
2569         list_for_each_entry(chdev, &mport_devs, node) {
2570                 if (chdev->mport->id == mport->id) {
2571                         atomic_set(&chdev->active, 0);
2572                         list_del(&chdev->node);
2573                         found = 1;
2574                         break;
2575                 }
2576         }
2577         mutex_unlock(&mport_devs_lock);
2578
2579         if (found)
2580                 mport_cdev_remove(chdev);
2581 }
2582
2583 /* the rio_mport_interface is used to handle local mport devices */
2584 static struct class_interface rio_mport_interface __refdata = {
2585         .class          = &rio_mport_class,
2586         .add_dev        = mport_add_mport,
2587         .remove_dev     = mport_remove_mport,
2588 };
2589
2590 /*
2591  * Linux kernel module
2592  */
2593
2594 /*
2595  * mport_init - Driver module loading
2596  */
2597 static int __init mport_init(void)
2598 {
2599         int ret;
2600
2601         /* Create device class needed by udev */
2602         dev_class = class_create(THIS_MODULE, DRV_NAME);
2603         if (IS_ERR(dev_class)) {
2604                 rmcd_error("Unable to create " DRV_NAME " class");
2605                 return PTR_ERR(dev_class);
2606         }
2607
2608         ret = alloc_chrdev_region(&dev_number, 0, RIO_MAX_MPORTS, DRV_NAME);
2609         if (ret < 0)
2610                 goto err_chr;
2611
2612         rmcd_debug(INIT, "Registered class with major=%d", MAJOR(dev_number));
2613
2614         /* Register to rio_mport_interface */
2615         ret = class_interface_register(&rio_mport_interface);
2616         if (ret) {
2617                 rmcd_error("class_interface_register() failed, err=%d", ret);
2618                 goto err_cli;
2619         }
2620
2621         return 0;
2622
2623 err_cli:
2624         unregister_chrdev_region(dev_number, RIO_MAX_MPORTS);
2625 err_chr:
2626         class_destroy(dev_class);
2627         return ret;
2628 }
2629
2630 /**
2631  * mport_exit - Driver module unloading
2632  */
2633 static void __exit mport_exit(void)
2634 {
2635         class_interface_unregister(&rio_mport_interface);
2636         class_destroy(dev_class);
2637         unregister_chrdev_region(dev_number, RIO_MAX_MPORTS);
2638 }
2639
2640 module_init(mport_init);
2641 module_exit(mport_exit);