d585787aabc0cdd2014d31412924540bc0fbc5d6
[platform/kernel/linux-stable.git] / drivers / dma / dw / core.c
1 /*
2  * Core driver for the Synopsys DesignWare DMA Controller
3  *
4  * Copyright (C) 2007-2008 Atmel Corporation
5  * Copyright (C) 2010-2011 ST Microelectronics
6  * Copyright (C) 2013 Intel Corporation
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 as
10  * published by the Free Software Foundation.
11  */
12
13 #include <linux/bitops.h>
14 #include <linux/clk.h>
15 #include <linux/delay.h>
16 #include <linux/dmaengine.h>
17 #include <linux/dma-mapping.h>
18 #include <linux/dmapool.h>
19 #include <linux/err.h>
20 #include <linux/init.h>
21 #include <linux/interrupt.h>
22 #include <linux/io.h>
23 #include <linux/mm.h>
24 #include <linux/module.h>
25 #include <linux/slab.h>
26
27 #include "../dmaengine.h"
28 #include "internal.h"
29
30 /*
31  * This supports the Synopsys "DesignWare AHB Central DMA Controller",
32  * (DW_ahb_dmac) which is used with various AMBA 2.0 systems (not all
33  * of which use ARM any more).  See the "Databook" from Synopsys for
34  * information beyond what licensees probably provide.
35  *
36  * The driver has currently been tested only with the Atmel AT32AP7000,
37  * which does not support descriptor writeback.
38  */
39
40 static inline bool is_request_line_unset(struct dw_dma_chan *dwc)
41 {
42         return dwc->request_line == (typeof(dwc->request_line))~0;
43 }
44
45 static inline void dwc_set_masters(struct dw_dma_chan *dwc)
46 {
47         struct dw_dma *dw = to_dw_dma(dwc->chan.device);
48         struct dw_dma_slave *dws = dwc->chan.private;
49         unsigned char mmax = dw->nr_masters - 1;
50
51         if (!is_request_line_unset(dwc))
52                 return;
53
54         dwc->src_master = min_t(unsigned char, mmax, dwc_get_sms(dws));
55         dwc->dst_master = min_t(unsigned char, mmax, dwc_get_dms(dws));
56 }
57
58 #define DWC_DEFAULT_CTLLO(_chan) ({                             \
59                 struct dw_dma_chan *_dwc = to_dw_dma_chan(_chan);       \
60                 struct dma_slave_config *_sconfig = &_dwc->dma_sconfig; \
61                 bool _is_slave = is_slave_direction(_dwc->direction);   \
62                 u8 _smsize = _is_slave ? _sconfig->src_maxburst :       \
63                         DW_DMA_MSIZE_16;                        \
64                 u8 _dmsize = _is_slave ? _sconfig->dst_maxburst :       \
65                         DW_DMA_MSIZE_16;                        \
66                                                                 \
67                 (DWC_CTLL_DST_MSIZE(_dmsize)                    \
68                  | DWC_CTLL_SRC_MSIZE(_smsize)                  \
69                  | DWC_CTLL_LLP_D_EN                            \
70                  | DWC_CTLL_LLP_S_EN                            \
71                  | DWC_CTLL_DMS(_dwc->dst_master)               \
72                  | DWC_CTLL_SMS(_dwc->src_master));             \
73         })
74
75 /*
76  * Number of descriptors to allocate for each channel. This should be
77  * made configurable somehow; preferably, the clients (at least the
78  * ones using slave transfers) should be able to give us a hint.
79  */
80 #define NR_DESCS_PER_CHANNEL    64
81
82 /*----------------------------------------------------------------------*/
83
84 static struct device *chan2dev(struct dma_chan *chan)
85 {
86         return &chan->dev->device;
87 }
88
89 static struct dw_desc *dwc_first_active(struct dw_dma_chan *dwc)
90 {
91         return to_dw_desc(dwc->active_list.next);
92 }
93
94 static struct dw_desc *dwc_desc_get(struct dw_dma_chan *dwc)
95 {
96         struct dw_desc *desc, *_desc;
97         struct dw_desc *ret = NULL;
98         unsigned int i = 0;
99         unsigned long flags;
100
101         spin_lock_irqsave(&dwc->lock, flags);
102         list_for_each_entry_safe(desc, _desc, &dwc->free_list, desc_node) {
103                 i++;
104                 if (async_tx_test_ack(&desc->txd)) {
105                         list_del(&desc->desc_node);
106                         ret = desc;
107                         break;
108                 }
109                 dev_dbg(chan2dev(&dwc->chan), "desc %p not ACKed\n", desc);
110         }
111         spin_unlock_irqrestore(&dwc->lock, flags);
112
113         dev_vdbg(chan2dev(&dwc->chan), "scanned %u descriptors on freelist\n", i);
114
115         return ret;
116 }
117
118 /*
119  * Move a descriptor, including any children, to the free list.
120  * `desc' must not be on any lists.
121  */
122 static void dwc_desc_put(struct dw_dma_chan *dwc, struct dw_desc *desc)
123 {
124         unsigned long flags;
125
126         if (desc) {
127                 struct dw_desc *child;
128
129                 spin_lock_irqsave(&dwc->lock, flags);
130                 list_for_each_entry(child, &desc->tx_list, desc_node)
131                         dev_vdbg(chan2dev(&dwc->chan),
132                                         "moving child desc %p to freelist\n",
133                                         child);
134                 list_splice_init(&desc->tx_list, &dwc->free_list);
135                 dev_vdbg(chan2dev(&dwc->chan), "moving desc %p to freelist\n", desc);
136                 list_add(&desc->desc_node, &dwc->free_list);
137                 spin_unlock_irqrestore(&dwc->lock, flags);
138         }
139 }
140
141 static void dwc_initialize(struct dw_dma_chan *dwc)
142 {
143         struct dw_dma *dw = to_dw_dma(dwc->chan.device);
144         struct dw_dma_slave *dws = dwc->chan.private;
145         u32 cfghi = DWC_CFGH_FIFO_MODE;
146         u32 cfglo = DWC_CFGL_CH_PRIOR(dwc->priority);
147
148         if (dwc->initialized == true)
149                 return;
150
151         if (dws) {
152                 /*
153                  * We need controller-specific data to set up slave
154                  * transfers.
155                  */
156                 BUG_ON(!dws->dma_dev || dws->dma_dev != dw->dma.dev);
157
158                 cfghi = dws->cfg_hi;
159                 cfglo |= dws->cfg_lo & ~DWC_CFGL_CH_PRIOR_MASK;
160         } else {
161                 if (dwc->direction == DMA_MEM_TO_DEV)
162                         cfghi = DWC_CFGH_DST_PER(dwc->request_line);
163                 else if (dwc->direction == DMA_DEV_TO_MEM)
164                         cfghi = DWC_CFGH_SRC_PER(dwc->request_line);
165         }
166
167         channel_writel(dwc, CFG_LO, cfglo);
168         channel_writel(dwc, CFG_HI, cfghi);
169
170         /* Enable interrupts */
171         channel_set_bit(dw, MASK.XFER, dwc->mask);
172         channel_set_bit(dw, MASK.ERROR, dwc->mask);
173
174         dwc->initialized = true;
175 }
176
177 /*----------------------------------------------------------------------*/
178
179 static inline unsigned int dwc_fast_fls(unsigned long long v)
180 {
181         /*
182          * We can be a lot more clever here, but this should take care
183          * of the most common optimization.
184          */
185         if (!(v & 7))
186                 return 3;
187         else if (!(v & 3))
188                 return 2;
189         else if (!(v & 1))
190                 return 1;
191         return 0;
192 }
193
194 static inline void dwc_dump_chan_regs(struct dw_dma_chan *dwc)
195 {
196         dev_err(chan2dev(&dwc->chan),
197                 "  SAR: 0x%x DAR: 0x%x LLP: 0x%x CTL: 0x%x:%08x\n",
198                 channel_readl(dwc, SAR),
199                 channel_readl(dwc, DAR),
200                 channel_readl(dwc, LLP),
201                 channel_readl(dwc, CTL_HI),
202                 channel_readl(dwc, CTL_LO));
203 }
204
205 static inline void dwc_chan_disable(struct dw_dma *dw, struct dw_dma_chan *dwc)
206 {
207         channel_clear_bit(dw, CH_EN, dwc->mask);
208         while (dma_readl(dw, CH_EN) & dwc->mask)
209                 cpu_relax();
210 }
211
212 /*----------------------------------------------------------------------*/
213
214 /* Perform single block transfer */
215 static inline void dwc_do_single_block(struct dw_dma_chan *dwc,
216                                        struct dw_desc *desc)
217 {
218         struct dw_dma   *dw = to_dw_dma(dwc->chan.device);
219         u32             ctllo;
220
221         /*
222          * Software emulation of LLP mode relies on interrupts to continue
223          * multi block transfer.
224          */
225         ctllo = desc->lli.ctllo | DWC_CTLL_INT_EN;
226
227         channel_writel(dwc, SAR, desc->lli.sar);
228         channel_writel(dwc, DAR, desc->lli.dar);
229         channel_writel(dwc, CTL_LO, ctllo);
230         channel_writel(dwc, CTL_HI, desc->lli.ctlhi);
231         channel_set_bit(dw, CH_EN, dwc->mask);
232
233         /* Move pointer to next descriptor */
234         dwc->tx_node_active = dwc->tx_node_active->next;
235 }
236
237 /* Called with dwc->lock held and bh disabled */
238 static void dwc_dostart(struct dw_dma_chan *dwc, struct dw_desc *first)
239 {
240         struct dw_dma   *dw = to_dw_dma(dwc->chan.device);
241         unsigned long   was_soft_llp;
242
243         /* ASSERT:  channel is idle */
244         if (dma_readl(dw, CH_EN) & dwc->mask) {
245                 dev_err(chan2dev(&dwc->chan),
246                         "BUG: Attempted to start non-idle channel\n");
247                 dwc_dump_chan_regs(dwc);
248
249                 /* The tasklet will hopefully advance the queue... */
250                 return;
251         }
252
253         if (dwc->nollp) {
254                 was_soft_llp = test_and_set_bit(DW_DMA_IS_SOFT_LLP,
255                                                 &dwc->flags);
256                 if (was_soft_llp) {
257                         dev_err(chan2dev(&dwc->chan),
258                                 "BUG: Attempted to start new LLP transfer inside ongoing one\n");
259                         return;
260                 }
261
262                 dwc_initialize(dwc);
263
264                 dwc->residue = first->total_len;
265                 dwc->tx_node_active = &first->tx_list;
266
267                 /* Submit first block */
268                 dwc_do_single_block(dwc, first);
269
270                 return;
271         }
272
273         dwc_initialize(dwc);
274
275         channel_writel(dwc, LLP, first->txd.phys);
276         channel_writel(dwc, CTL_LO,
277                         DWC_CTLL_LLP_D_EN | DWC_CTLL_LLP_S_EN);
278         channel_writel(dwc, CTL_HI, 0);
279         channel_set_bit(dw, CH_EN, dwc->mask);
280 }
281
282 static void dwc_dostart_first_queued(struct dw_dma_chan *dwc)
283 {
284         if (list_empty(&dwc->queue))
285                 return;
286
287         list_move(dwc->queue.next, &dwc->active_list);
288         dwc_dostart(dwc, dwc_first_active(dwc));
289 }
290
291 /*----------------------------------------------------------------------*/
292
293 static void
294 dwc_descriptor_complete(struct dw_dma_chan *dwc, struct dw_desc *desc,
295                 bool callback_required)
296 {
297         dma_async_tx_callback           callback = NULL;
298         void                            *param = NULL;
299         struct dma_async_tx_descriptor  *txd = &desc->txd;
300         struct dw_desc                  *child;
301         unsigned long                   flags;
302
303         dev_vdbg(chan2dev(&dwc->chan), "descriptor %u complete\n", txd->cookie);
304
305         spin_lock_irqsave(&dwc->lock, flags);
306         dma_cookie_complete(txd);
307         if (callback_required) {
308                 callback = txd->callback;
309                 param = txd->callback_param;
310         }
311
312         /* async_tx_ack */
313         list_for_each_entry(child, &desc->tx_list, desc_node)
314                 async_tx_ack(&child->txd);
315         async_tx_ack(&desc->txd);
316
317         list_splice_init(&desc->tx_list, &dwc->free_list);
318         list_move(&desc->desc_node, &dwc->free_list);
319
320         dma_descriptor_unmap(txd);
321         spin_unlock_irqrestore(&dwc->lock, flags);
322
323         if (callback)
324                 callback(param);
325 }
326
327 static void dwc_complete_all(struct dw_dma *dw, struct dw_dma_chan *dwc)
328 {
329         struct dw_desc *desc, *_desc;
330         LIST_HEAD(list);
331         unsigned long flags;
332
333         spin_lock_irqsave(&dwc->lock, flags);
334         if (dma_readl(dw, CH_EN) & dwc->mask) {
335                 dev_err(chan2dev(&dwc->chan),
336                         "BUG: XFER bit set, but channel not idle!\n");
337
338                 /* Try to continue after resetting the channel... */
339                 dwc_chan_disable(dw, dwc);
340         }
341
342         /*
343          * Submit queued descriptors ASAP, i.e. before we go through
344          * the completed ones.
345          */
346         list_splice_init(&dwc->active_list, &list);
347         dwc_dostart_first_queued(dwc);
348
349         spin_unlock_irqrestore(&dwc->lock, flags);
350
351         list_for_each_entry_safe(desc, _desc, &list, desc_node)
352                 dwc_descriptor_complete(dwc, desc, true);
353 }
354
355 /* Returns how many bytes were already received from source */
356 static inline u32 dwc_get_sent(struct dw_dma_chan *dwc)
357 {
358         u32 ctlhi = channel_readl(dwc, CTL_HI);
359         u32 ctllo = channel_readl(dwc, CTL_LO);
360
361         return (ctlhi & DWC_CTLH_BLOCK_TS_MASK) * (1 << (ctllo >> 4 & 7));
362 }
363
364 static void dwc_scan_descriptors(struct dw_dma *dw, struct dw_dma_chan *dwc)
365 {
366         dma_addr_t llp;
367         struct dw_desc *desc, *_desc;
368         struct dw_desc *child;
369         u32 status_xfer;
370         unsigned long flags;
371
372         spin_lock_irqsave(&dwc->lock, flags);
373         llp = channel_readl(dwc, LLP);
374         status_xfer = dma_readl(dw, RAW.XFER);
375
376         if (status_xfer & dwc->mask) {
377                 /* Everything we've submitted is done */
378                 dma_writel(dw, CLEAR.XFER, dwc->mask);
379
380                 if (test_bit(DW_DMA_IS_SOFT_LLP, &dwc->flags)) {
381                         struct list_head *head, *active = dwc->tx_node_active;
382
383                         /*
384                          * We are inside first active descriptor.
385                          * Otherwise something is really wrong.
386                          */
387                         desc = dwc_first_active(dwc);
388
389                         head = &desc->tx_list;
390                         if (active != head) {
391                                 /* Update desc to reflect last sent one */
392                                 if (active != head->next)
393                                         desc = to_dw_desc(active->prev);
394
395                                 dwc->residue -= desc->len;
396
397                                 child = to_dw_desc(active);
398
399                                 /* Submit next block */
400                                 dwc_do_single_block(dwc, child);
401
402                                 spin_unlock_irqrestore(&dwc->lock, flags);
403                                 return;
404                         }
405
406                         /* We are done here */
407                         clear_bit(DW_DMA_IS_SOFT_LLP, &dwc->flags);
408                 }
409
410                 dwc->residue = 0;
411
412                 spin_unlock_irqrestore(&dwc->lock, flags);
413
414                 dwc_complete_all(dw, dwc);
415                 return;
416         }
417
418         if (list_empty(&dwc->active_list)) {
419                 dwc->residue = 0;
420                 spin_unlock_irqrestore(&dwc->lock, flags);
421                 return;
422         }
423
424         if (test_bit(DW_DMA_IS_SOFT_LLP, &dwc->flags)) {
425                 dev_vdbg(chan2dev(&dwc->chan), "%s: soft LLP mode\n", __func__);
426                 spin_unlock_irqrestore(&dwc->lock, flags);
427                 return;
428         }
429
430         dev_vdbg(chan2dev(&dwc->chan), "%s: llp=%pad\n", __func__, &llp);
431
432         list_for_each_entry_safe(desc, _desc, &dwc->active_list, desc_node) {
433                 /* Initial residue value */
434                 dwc->residue = desc->total_len;
435
436                 /* Check first descriptors addr */
437                 if (desc->txd.phys == llp) {
438                         spin_unlock_irqrestore(&dwc->lock, flags);
439                         return;
440                 }
441
442                 /* Check first descriptors llp */
443                 if (desc->lli.llp == llp) {
444                         /* This one is currently in progress */
445                         dwc->residue -= dwc_get_sent(dwc);
446                         spin_unlock_irqrestore(&dwc->lock, flags);
447                         return;
448                 }
449
450                 dwc->residue -= desc->len;
451                 list_for_each_entry(child, &desc->tx_list, desc_node) {
452                         if (child->lli.llp == llp) {
453                                 /* Currently in progress */
454                                 dwc->residue -= dwc_get_sent(dwc);
455                                 spin_unlock_irqrestore(&dwc->lock, flags);
456                                 return;
457                         }
458                         dwc->residue -= child->len;
459                 }
460
461                 /*
462                  * No descriptors so far seem to be in progress, i.e.
463                  * this one must be done.
464                  */
465                 spin_unlock_irqrestore(&dwc->lock, flags);
466                 dwc_descriptor_complete(dwc, desc, true);
467                 spin_lock_irqsave(&dwc->lock, flags);
468         }
469
470         dev_err(chan2dev(&dwc->chan),
471                 "BUG: All descriptors done, but channel not idle!\n");
472
473         /* Try to continue after resetting the channel... */
474         dwc_chan_disable(dw, dwc);
475
476         dwc_dostart_first_queued(dwc);
477         spin_unlock_irqrestore(&dwc->lock, flags);
478 }
479
480 static inline void dwc_dump_lli(struct dw_dma_chan *dwc, struct dw_lli *lli)
481 {
482         dev_crit(chan2dev(&dwc->chan), "  desc: s0x%x d0x%x l0x%x c0x%x:%x\n",
483                  lli->sar, lli->dar, lli->llp, lli->ctlhi, lli->ctllo);
484 }
485
486 static void dwc_handle_error(struct dw_dma *dw, struct dw_dma_chan *dwc)
487 {
488         struct dw_desc *bad_desc;
489         struct dw_desc *child;
490         unsigned long flags;
491
492         dwc_scan_descriptors(dw, dwc);
493
494         spin_lock_irqsave(&dwc->lock, flags);
495
496         /*
497          * The descriptor currently at the head of the active list is
498          * borked. Since we don't have any way to report errors, we'll
499          * just have to scream loudly and try to carry on.
500          */
501         bad_desc = dwc_first_active(dwc);
502         list_del_init(&bad_desc->desc_node);
503         list_move(dwc->queue.next, dwc->active_list.prev);
504
505         /* Clear the error flag and try to restart the controller */
506         dma_writel(dw, CLEAR.ERROR, dwc->mask);
507         if (!list_empty(&dwc->active_list))
508                 dwc_dostart(dwc, dwc_first_active(dwc));
509
510         /*
511          * WARN may seem harsh, but since this only happens
512          * when someone submits a bad physical address in a
513          * descriptor, we should consider ourselves lucky that the
514          * controller flagged an error instead of scribbling over
515          * random memory locations.
516          */
517         dev_WARN(chan2dev(&dwc->chan), "Bad descriptor submitted for DMA!\n"
518                                        "  cookie: %d\n", bad_desc->txd.cookie);
519         dwc_dump_lli(dwc, &bad_desc->lli);
520         list_for_each_entry(child, &bad_desc->tx_list, desc_node)
521                 dwc_dump_lli(dwc, &child->lli);
522
523         spin_unlock_irqrestore(&dwc->lock, flags);
524
525         /* Pretend the descriptor completed successfully */
526         dwc_descriptor_complete(dwc, bad_desc, true);
527 }
528
529 /* --------------------- Cyclic DMA API extensions -------------------- */
530
531 dma_addr_t dw_dma_get_src_addr(struct dma_chan *chan)
532 {
533         struct dw_dma_chan *dwc = to_dw_dma_chan(chan);
534         return channel_readl(dwc, SAR);
535 }
536 EXPORT_SYMBOL(dw_dma_get_src_addr);
537
538 dma_addr_t dw_dma_get_dst_addr(struct dma_chan *chan)
539 {
540         struct dw_dma_chan *dwc = to_dw_dma_chan(chan);
541         return channel_readl(dwc, DAR);
542 }
543 EXPORT_SYMBOL(dw_dma_get_dst_addr);
544
545 /* Called with dwc->lock held and all DMAC interrupts disabled */
546 static void dwc_handle_cyclic(struct dw_dma *dw, struct dw_dma_chan *dwc,
547                 u32 status_err, u32 status_xfer)
548 {
549         unsigned long flags;
550
551         if (dwc->mask) {
552                 void (*callback)(void *param);
553                 void *callback_param;
554
555                 dev_vdbg(chan2dev(&dwc->chan), "new cyclic period llp 0x%08x\n",
556                                 channel_readl(dwc, LLP));
557
558                 callback = dwc->cdesc->period_callback;
559                 callback_param = dwc->cdesc->period_callback_param;
560
561                 if (callback)
562                         callback(callback_param);
563         }
564
565         /*
566          * Error and transfer complete are highly unlikely, and will most
567          * likely be due to a configuration error by the user.
568          */
569         if (unlikely(status_err & dwc->mask) ||
570                         unlikely(status_xfer & dwc->mask)) {
571                 int i;
572
573                 dev_err(chan2dev(&dwc->chan),
574                         "cyclic DMA unexpected %s interrupt, stopping DMA transfer\n",
575                         status_xfer ? "xfer" : "error");
576
577                 spin_lock_irqsave(&dwc->lock, flags);
578
579                 dwc_dump_chan_regs(dwc);
580
581                 dwc_chan_disable(dw, dwc);
582
583                 /* Make sure DMA does not restart by loading a new list */
584                 channel_writel(dwc, LLP, 0);
585                 channel_writel(dwc, CTL_LO, 0);
586                 channel_writel(dwc, CTL_HI, 0);
587
588                 dma_writel(dw, CLEAR.ERROR, dwc->mask);
589                 dma_writel(dw, CLEAR.XFER, dwc->mask);
590
591                 for (i = 0; i < dwc->cdesc->periods; i++)
592                         dwc_dump_lli(dwc, &dwc->cdesc->desc[i]->lli);
593
594                 spin_unlock_irqrestore(&dwc->lock, flags);
595         }
596 }
597
598 /* ------------------------------------------------------------------------- */
599
600 static void dw_dma_tasklet(unsigned long data)
601 {
602         struct dw_dma *dw = (struct dw_dma *)data;
603         struct dw_dma_chan *dwc;
604         u32 status_xfer;
605         u32 status_err;
606         int i;
607
608         status_xfer = dma_readl(dw, RAW.XFER);
609         status_err = dma_readl(dw, RAW.ERROR);
610
611         dev_vdbg(dw->dma.dev, "%s: status_err=%x\n", __func__, status_err);
612
613         for (i = 0; i < dw->dma.chancnt; i++) {
614                 dwc = &dw->chan[i];
615                 if (test_bit(DW_DMA_IS_CYCLIC, &dwc->flags))
616                         dwc_handle_cyclic(dw, dwc, status_err, status_xfer);
617                 else if (status_err & (1 << i))
618                         dwc_handle_error(dw, dwc);
619                 else if (status_xfer & (1 << i))
620                         dwc_scan_descriptors(dw, dwc);
621         }
622
623         /*
624          * Re-enable interrupts.
625          */
626         channel_set_bit(dw, MASK.XFER, dw->all_chan_mask);
627         channel_set_bit(dw, MASK.ERROR, dw->all_chan_mask);
628 }
629
630 static irqreturn_t dw_dma_interrupt(int irq, void *dev_id)
631 {
632         struct dw_dma *dw = dev_id;
633         u32 status = dma_readl(dw, STATUS_INT);
634
635         dev_vdbg(dw->dma.dev, "%s: status=0x%x\n", __func__, status);
636
637         /* Check if we have any interrupt from the DMAC */
638         if (!status)
639                 return IRQ_NONE;
640
641         /*
642          * Just disable the interrupts. We'll turn them back on in the
643          * softirq handler.
644          */
645         channel_clear_bit(dw, MASK.XFER, dw->all_chan_mask);
646         channel_clear_bit(dw, MASK.ERROR, dw->all_chan_mask);
647
648         status = dma_readl(dw, STATUS_INT);
649         if (status) {
650                 dev_err(dw->dma.dev,
651                         "BUG: Unexpected interrupts pending: 0x%x\n",
652                         status);
653
654                 /* Try to recover */
655                 channel_clear_bit(dw, MASK.XFER, (1 << 8) - 1);
656                 channel_clear_bit(dw, MASK.SRC_TRAN, (1 << 8) - 1);
657                 channel_clear_bit(dw, MASK.DST_TRAN, (1 << 8) - 1);
658                 channel_clear_bit(dw, MASK.ERROR, (1 << 8) - 1);
659         }
660
661         tasklet_schedule(&dw->tasklet);
662
663         return IRQ_HANDLED;
664 }
665
666 /*----------------------------------------------------------------------*/
667
668 static dma_cookie_t dwc_tx_submit(struct dma_async_tx_descriptor *tx)
669 {
670         struct dw_desc          *desc = txd_to_dw_desc(tx);
671         struct dw_dma_chan      *dwc = to_dw_dma_chan(tx->chan);
672         dma_cookie_t            cookie;
673         unsigned long           flags;
674
675         spin_lock_irqsave(&dwc->lock, flags);
676         cookie = dma_cookie_assign(tx);
677
678         /*
679          * REVISIT: We should attempt to chain as many descriptors as
680          * possible, perhaps even appending to those already submitted
681          * for DMA. But this is hard to do in a race-free manner.
682          */
683         if (list_empty(&dwc->active_list)) {
684                 dev_vdbg(chan2dev(tx->chan), "%s: started %u\n", __func__,
685                                 desc->txd.cookie);
686                 list_add_tail(&desc->desc_node, &dwc->active_list);
687                 dwc_dostart(dwc, dwc_first_active(dwc));
688         } else {
689                 dev_vdbg(chan2dev(tx->chan), "%s: queued %u\n", __func__,
690                                 desc->txd.cookie);
691
692                 list_add_tail(&desc->desc_node, &dwc->queue);
693         }
694
695         spin_unlock_irqrestore(&dwc->lock, flags);
696
697         return cookie;
698 }
699
700 static struct dma_async_tx_descriptor *
701 dwc_prep_dma_memcpy(struct dma_chan *chan, dma_addr_t dest, dma_addr_t src,
702                 size_t len, unsigned long flags)
703 {
704         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
705         struct dw_dma           *dw = to_dw_dma(chan->device);
706         struct dw_desc          *desc;
707         struct dw_desc          *first;
708         struct dw_desc          *prev;
709         size_t                  xfer_count;
710         size_t                  offset;
711         unsigned int            src_width;
712         unsigned int            dst_width;
713         unsigned int            data_width;
714         u32                     ctllo;
715
716         dev_vdbg(chan2dev(chan),
717                         "%s: d%pad s%pad l0x%zx f0x%lx\n", __func__,
718                         &dest, &src, len, flags);
719
720         if (unlikely(!len)) {
721                 dev_dbg(chan2dev(chan), "%s: length is zero!\n", __func__);
722                 return NULL;
723         }
724
725         dwc->direction = DMA_MEM_TO_MEM;
726
727         data_width = min_t(unsigned int, dw->data_width[dwc->src_master],
728                            dw->data_width[dwc->dst_master]);
729
730         src_width = dst_width = min_t(unsigned int, data_width,
731                                       dwc_fast_fls(src | dest | len));
732
733         ctllo = DWC_DEFAULT_CTLLO(chan)
734                         | DWC_CTLL_DST_WIDTH(dst_width)
735                         | DWC_CTLL_SRC_WIDTH(src_width)
736                         | DWC_CTLL_DST_INC
737                         | DWC_CTLL_SRC_INC
738                         | DWC_CTLL_FC_M2M;
739         prev = first = NULL;
740
741         for (offset = 0; offset < len; offset += xfer_count << src_width) {
742                 xfer_count = min_t(size_t, (len - offset) >> src_width,
743                                            dwc->block_size);
744
745                 desc = dwc_desc_get(dwc);
746                 if (!desc)
747                         goto err_desc_get;
748
749                 desc->lli.sar = src + offset;
750                 desc->lli.dar = dest + offset;
751                 desc->lli.ctllo = ctllo;
752                 desc->lli.ctlhi = xfer_count;
753                 desc->len = xfer_count << src_width;
754
755                 if (!first) {
756                         first = desc;
757                 } else {
758                         prev->lli.llp = desc->txd.phys;
759                         list_add_tail(&desc->desc_node,
760                                         &first->tx_list);
761                 }
762                 prev = desc;
763         }
764
765         if (flags & DMA_PREP_INTERRUPT)
766                 /* Trigger interrupt after last block */
767                 prev->lli.ctllo |= DWC_CTLL_INT_EN;
768
769         prev->lli.llp = 0;
770         first->txd.flags = flags;
771         first->total_len = len;
772
773         return &first->txd;
774
775 err_desc_get:
776         dwc_desc_put(dwc, first);
777         return NULL;
778 }
779
780 static struct dma_async_tx_descriptor *
781 dwc_prep_slave_sg(struct dma_chan *chan, struct scatterlist *sgl,
782                 unsigned int sg_len, enum dma_transfer_direction direction,
783                 unsigned long flags, void *context)
784 {
785         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
786         struct dw_dma           *dw = to_dw_dma(chan->device);
787         struct dma_slave_config *sconfig = &dwc->dma_sconfig;
788         struct dw_desc          *prev;
789         struct dw_desc          *first;
790         u32                     ctllo;
791         dma_addr_t              reg;
792         unsigned int            reg_width;
793         unsigned int            mem_width;
794         unsigned int            data_width;
795         unsigned int            i;
796         struct scatterlist      *sg;
797         size_t                  total_len = 0;
798
799         dev_vdbg(chan2dev(chan), "%s\n", __func__);
800
801         if (unlikely(!is_slave_direction(direction) || !sg_len))
802                 return NULL;
803
804         dwc->direction = direction;
805
806         prev = first = NULL;
807
808         switch (direction) {
809         case DMA_MEM_TO_DEV:
810                 reg_width = __fls(sconfig->dst_addr_width);
811                 reg = sconfig->dst_addr;
812                 ctllo = (DWC_DEFAULT_CTLLO(chan)
813                                 | DWC_CTLL_DST_WIDTH(reg_width)
814                                 | DWC_CTLL_DST_FIX
815                                 | DWC_CTLL_SRC_INC);
816
817                 ctllo |= sconfig->device_fc ? DWC_CTLL_FC(DW_DMA_FC_P_M2P) :
818                         DWC_CTLL_FC(DW_DMA_FC_D_M2P);
819
820                 data_width = dw->data_width[dwc->src_master];
821
822                 for_each_sg(sgl, sg, sg_len, i) {
823                         struct dw_desc  *desc;
824                         u32             len, dlen, mem;
825
826                         mem = sg_dma_address(sg);
827                         len = sg_dma_len(sg);
828
829                         mem_width = min_t(unsigned int,
830                                           data_width, dwc_fast_fls(mem | len));
831
832 slave_sg_todev_fill_desc:
833                         desc = dwc_desc_get(dwc);
834                         if (!desc) {
835                                 dev_err(chan2dev(chan),
836                                         "not enough descriptors available\n");
837                                 goto err_desc_get;
838                         }
839
840                         desc->lli.sar = mem;
841                         desc->lli.dar = reg;
842                         desc->lli.ctllo = ctllo | DWC_CTLL_SRC_WIDTH(mem_width);
843                         if ((len >> mem_width) > dwc->block_size) {
844                                 dlen = dwc->block_size << mem_width;
845                                 mem += dlen;
846                                 len -= dlen;
847                         } else {
848                                 dlen = len;
849                                 len = 0;
850                         }
851
852                         desc->lli.ctlhi = dlen >> mem_width;
853                         desc->len = dlen;
854
855                         if (!first) {
856                                 first = desc;
857                         } else {
858                                 prev->lli.llp = desc->txd.phys;
859                                 list_add_tail(&desc->desc_node,
860                                                 &first->tx_list);
861                         }
862                         prev = desc;
863                         total_len += dlen;
864
865                         if (len)
866                                 goto slave_sg_todev_fill_desc;
867                 }
868                 break;
869         case DMA_DEV_TO_MEM:
870                 reg_width = __fls(sconfig->src_addr_width);
871                 reg = sconfig->src_addr;
872                 ctllo = (DWC_DEFAULT_CTLLO(chan)
873                                 | DWC_CTLL_SRC_WIDTH(reg_width)
874                                 | DWC_CTLL_DST_INC
875                                 | DWC_CTLL_SRC_FIX);
876
877                 ctllo |= sconfig->device_fc ? DWC_CTLL_FC(DW_DMA_FC_P_P2M) :
878                         DWC_CTLL_FC(DW_DMA_FC_D_P2M);
879
880                 data_width = dw->data_width[dwc->dst_master];
881
882                 for_each_sg(sgl, sg, sg_len, i) {
883                         struct dw_desc  *desc;
884                         u32             len, dlen, mem;
885
886                         mem = sg_dma_address(sg);
887                         len = sg_dma_len(sg);
888
889                         mem_width = min_t(unsigned int,
890                                           data_width, dwc_fast_fls(mem | len));
891
892 slave_sg_fromdev_fill_desc:
893                         desc = dwc_desc_get(dwc);
894                         if (!desc) {
895                                 dev_err(chan2dev(chan),
896                                                 "not enough descriptors available\n");
897                                 goto err_desc_get;
898                         }
899
900                         desc->lli.sar = reg;
901                         desc->lli.dar = mem;
902                         desc->lli.ctllo = ctllo | DWC_CTLL_DST_WIDTH(mem_width);
903                         if ((len >> reg_width) > dwc->block_size) {
904                                 dlen = dwc->block_size << reg_width;
905                                 mem += dlen;
906                                 len -= dlen;
907                         } else {
908                                 dlen = len;
909                                 len = 0;
910                         }
911                         desc->lli.ctlhi = dlen >> reg_width;
912                         desc->len = dlen;
913
914                         if (!first) {
915                                 first = desc;
916                         } else {
917                                 prev->lli.llp = desc->txd.phys;
918                                 list_add_tail(&desc->desc_node,
919                                                 &first->tx_list);
920                         }
921                         prev = desc;
922                         total_len += dlen;
923
924                         if (len)
925                                 goto slave_sg_fromdev_fill_desc;
926                 }
927                 break;
928         default:
929                 return NULL;
930         }
931
932         if (flags & DMA_PREP_INTERRUPT)
933                 /* Trigger interrupt after last block */
934                 prev->lli.ctllo |= DWC_CTLL_INT_EN;
935
936         prev->lli.llp = 0;
937         first->total_len = total_len;
938
939         return &first->txd;
940
941 err_desc_get:
942         dwc_desc_put(dwc, first);
943         return NULL;
944 }
945
946 /*
947  * Fix sconfig's burst size according to dw_dmac. We need to convert them as:
948  * 1 -> 0, 4 -> 1, 8 -> 2, 16 -> 3.
949  *
950  * NOTE: burst size 2 is not supported by controller.
951  *
952  * This can be done by finding least significant bit set: n & (n - 1)
953  */
954 static inline void convert_burst(u32 *maxburst)
955 {
956         if (*maxburst > 1)
957                 *maxburst = fls(*maxburst) - 2;
958         else
959                 *maxburst = 0;
960 }
961
962 static int
963 set_runtime_config(struct dma_chan *chan, struct dma_slave_config *sconfig)
964 {
965         struct dw_dma_chan *dwc = to_dw_dma_chan(chan);
966
967         /* Check if chan will be configured for slave transfers */
968         if (!is_slave_direction(sconfig->direction))
969                 return -EINVAL;
970
971         memcpy(&dwc->dma_sconfig, sconfig, sizeof(*sconfig));
972         dwc->direction = sconfig->direction;
973
974         /* Take the request line from slave_id member */
975         if (is_request_line_unset(dwc))
976                 dwc->request_line = sconfig->slave_id;
977
978         convert_burst(&dwc->dma_sconfig.src_maxburst);
979         convert_burst(&dwc->dma_sconfig.dst_maxburst);
980
981         return 0;
982 }
983
984 static inline void dwc_chan_pause(struct dw_dma_chan *dwc)
985 {
986         u32 cfglo = channel_readl(dwc, CFG_LO);
987         unsigned int count = 20;        /* timeout iterations */
988
989         channel_writel(dwc, CFG_LO, cfglo | DWC_CFGL_CH_SUSP);
990         while (!(channel_readl(dwc, CFG_LO) & DWC_CFGL_FIFO_EMPTY) && count--)
991                 udelay(2);
992
993         dwc->paused = true;
994 }
995
996 static inline void dwc_chan_resume(struct dw_dma_chan *dwc)
997 {
998         u32 cfglo = channel_readl(dwc, CFG_LO);
999
1000         channel_writel(dwc, CFG_LO, cfglo & ~DWC_CFGL_CH_SUSP);
1001
1002         dwc->paused = false;
1003 }
1004
1005 static int dwc_control(struct dma_chan *chan, enum dma_ctrl_cmd cmd,
1006                        unsigned long arg)
1007 {
1008         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1009         struct dw_dma           *dw = to_dw_dma(chan->device);
1010         struct dw_desc          *desc, *_desc;
1011         unsigned long           flags;
1012         LIST_HEAD(list);
1013
1014         if (cmd == DMA_PAUSE) {
1015                 spin_lock_irqsave(&dwc->lock, flags);
1016
1017                 dwc_chan_pause(dwc);
1018
1019                 spin_unlock_irqrestore(&dwc->lock, flags);
1020         } else if (cmd == DMA_RESUME) {
1021                 if (!dwc->paused)
1022                         return 0;
1023
1024                 spin_lock_irqsave(&dwc->lock, flags);
1025
1026                 dwc_chan_resume(dwc);
1027
1028                 spin_unlock_irqrestore(&dwc->lock, flags);
1029         } else if (cmd == DMA_TERMINATE_ALL) {
1030                 spin_lock_irqsave(&dwc->lock, flags);
1031
1032                 clear_bit(DW_DMA_IS_SOFT_LLP, &dwc->flags);
1033
1034                 dwc_chan_disable(dw, dwc);
1035
1036                 dwc_chan_resume(dwc);
1037
1038                 /* active_list entries will end up before queued entries */
1039                 list_splice_init(&dwc->queue, &list);
1040                 list_splice_init(&dwc->active_list, &list);
1041
1042                 spin_unlock_irqrestore(&dwc->lock, flags);
1043
1044                 /* Flush all pending and queued descriptors */
1045                 list_for_each_entry_safe(desc, _desc, &list, desc_node)
1046                         dwc_descriptor_complete(dwc, desc, false);
1047         } else if (cmd == DMA_SLAVE_CONFIG) {
1048                 return set_runtime_config(chan, (struct dma_slave_config *)arg);
1049         } else {
1050                 return -ENXIO;
1051         }
1052
1053         return 0;
1054 }
1055
1056 static inline u32 dwc_get_residue(struct dw_dma_chan *dwc)
1057 {
1058         unsigned long flags;
1059         u32 residue;
1060
1061         spin_lock_irqsave(&dwc->lock, flags);
1062
1063         residue = dwc->residue;
1064         if (test_bit(DW_DMA_IS_SOFT_LLP, &dwc->flags) && residue)
1065                 residue -= dwc_get_sent(dwc);
1066
1067         spin_unlock_irqrestore(&dwc->lock, flags);
1068         return residue;
1069 }
1070
1071 static enum dma_status
1072 dwc_tx_status(struct dma_chan *chan,
1073               dma_cookie_t cookie,
1074               struct dma_tx_state *txstate)
1075 {
1076         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1077         enum dma_status         ret;
1078
1079         ret = dma_cookie_status(chan, cookie, txstate);
1080         if (ret == DMA_COMPLETE)
1081                 return ret;
1082
1083         dwc_scan_descriptors(to_dw_dma(chan->device), dwc);
1084
1085         ret = dma_cookie_status(chan, cookie, txstate);
1086         if (ret != DMA_COMPLETE)
1087                 dma_set_residue(txstate, dwc_get_residue(dwc));
1088
1089         if (dwc->paused && ret == DMA_IN_PROGRESS)
1090                 return DMA_PAUSED;
1091
1092         return ret;
1093 }
1094
1095 static void dwc_issue_pending(struct dma_chan *chan)
1096 {
1097         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1098
1099         if (!list_empty(&dwc->queue))
1100                 dwc_scan_descriptors(to_dw_dma(chan->device), dwc);
1101 }
1102
1103 static int dwc_alloc_chan_resources(struct dma_chan *chan)
1104 {
1105         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1106         struct dw_dma           *dw = to_dw_dma(chan->device);
1107         struct dw_desc          *desc;
1108         int                     i;
1109         unsigned long           flags;
1110
1111         dev_vdbg(chan2dev(chan), "%s\n", __func__);
1112
1113         /* ASSERT:  channel is idle */
1114         if (dma_readl(dw, CH_EN) & dwc->mask) {
1115                 dev_dbg(chan2dev(chan), "DMA channel not idle?\n");
1116                 return -EIO;
1117         }
1118
1119         dma_cookie_init(chan);
1120
1121         /*
1122          * NOTE: some controllers may have additional features that we
1123          * need to initialize here, like "scatter-gather" (which
1124          * doesn't mean what you think it means), and status writeback.
1125          */
1126
1127         dwc_set_masters(dwc);
1128
1129         spin_lock_irqsave(&dwc->lock, flags);
1130         i = dwc->descs_allocated;
1131         while (dwc->descs_allocated < NR_DESCS_PER_CHANNEL) {
1132                 dma_addr_t phys;
1133
1134                 spin_unlock_irqrestore(&dwc->lock, flags);
1135
1136                 desc = dma_pool_alloc(dw->desc_pool, GFP_ATOMIC, &phys);
1137                 if (!desc)
1138                         goto err_desc_alloc;
1139
1140                 memset(desc, 0, sizeof(struct dw_desc));
1141
1142                 INIT_LIST_HEAD(&desc->tx_list);
1143                 dma_async_tx_descriptor_init(&desc->txd, chan);
1144                 desc->txd.tx_submit = dwc_tx_submit;
1145                 desc->txd.flags = DMA_CTRL_ACK;
1146                 desc->txd.phys = phys;
1147
1148                 dwc_desc_put(dwc, desc);
1149
1150                 spin_lock_irqsave(&dwc->lock, flags);
1151                 i = ++dwc->descs_allocated;
1152         }
1153
1154         spin_unlock_irqrestore(&dwc->lock, flags);
1155
1156         dev_dbg(chan2dev(chan), "%s: allocated %d descriptors\n", __func__, i);
1157
1158         return i;
1159
1160 err_desc_alloc:
1161         dev_info(chan2dev(chan), "only allocated %d descriptors\n", i);
1162
1163         return i;
1164 }
1165
1166 static void dwc_free_chan_resources(struct dma_chan *chan)
1167 {
1168         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1169         struct dw_dma           *dw = to_dw_dma(chan->device);
1170         struct dw_desc          *desc, *_desc;
1171         unsigned long           flags;
1172         LIST_HEAD(list);
1173
1174         dev_dbg(chan2dev(chan), "%s: descs allocated=%u\n", __func__,
1175                         dwc->descs_allocated);
1176
1177         /* ASSERT:  channel is idle */
1178         BUG_ON(!list_empty(&dwc->active_list));
1179         BUG_ON(!list_empty(&dwc->queue));
1180         BUG_ON(dma_readl(to_dw_dma(chan->device), CH_EN) & dwc->mask);
1181
1182         spin_lock_irqsave(&dwc->lock, flags);
1183         list_splice_init(&dwc->free_list, &list);
1184         dwc->descs_allocated = 0;
1185         dwc->initialized = false;
1186         dwc->request_line = ~0;
1187
1188         /* Disable interrupts */
1189         channel_clear_bit(dw, MASK.XFER, dwc->mask);
1190         channel_clear_bit(dw, MASK.ERROR, dwc->mask);
1191
1192         spin_unlock_irqrestore(&dwc->lock, flags);
1193
1194         list_for_each_entry_safe(desc, _desc, &list, desc_node) {
1195                 dev_vdbg(chan2dev(chan), "  freeing descriptor %p\n", desc);
1196                 dma_pool_free(dw->desc_pool, desc, desc->txd.phys);
1197         }
1198
1199         dev_vdbg(chan2dev(chan), "%s: done\n", __func__);
1200 }
1201
1202 /* --------------------- Cyclic DMA API extensions -------------------- */
1203
1204 /**
1205  * dw_dma_cyclic_start - start the cyclic DMA transfer
1206  * @chan: the DMA channel to start
1207  *
1208  * Must be called with soft interrupts disabled. Returns zero on success or
1209  * -errno on failure.
1210  */
1211 int dw_dma_cyclic_start(struct dma_chan *chan)
1212 {
1213         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1214         struct dw_dma           *dw = to_dw_dma(dwc->chan.device);
1215         unsigned long           flags;
1216
1217         if (!test_bit(DW_DMA_IS_CYCLIC, &dwc->flags)) {
1218                 dev_err(chan2dev(&dwc->chan), "missing prep for cyclic DMA\n");
1219                 return -ENODEV;
1220         }
1221
1222         spin_lock_irqsave(&dwc->lock, flags);
1223
1224         /* Assert channel is idle */
1225         if (dma_readl(dw, CH_EN) & dwc->mask) {
1226                 dev_err(chan2dev(&dwc->chan),
1227                         "BUG: Attempted to start non-idle channel\n");
1228                 dwc_dump_chan_regs(dwc);
1229                 spin_unlock_irqrestore(&dwc->lock, flags);
1230                 return -EBUSY;
1231         }
1232
1233         dma_writel(dw, CLEAR.ERROR, dwc->mask);
1234         dma_writel(dw, CLEAR.XFER, dwc->mask);
1235
1236         /* Setup DMAC channel registers */
1237         channel_writel(dwc, LLP, dwc->cdesc->desc[0]->txd.phys);
1238         channel_writel(dwc, CTL_LO, DWC_CTLL_LLP_D_EN | DWC_CTLL_LLP_S_EN);
1239         channel_writel(dwc, CTL_HI, 0);
1240
1241         channel_set_bit(dw, CH_EN, dwc->mask);
1242
1243         spin_unlock_irqrestore(&dwc->lock, flags);
1244
1245         return 0;
1246 }
1247 EXPORT_SYMBOL(dw_dma_cyclic_start);
1248
1249 /**
1250  * dw_dma_cyclic_stop - stop the cyclic DMA transfer
1251  * @chan: the DMA channel to stop
1252  *
1253  * Must be called with soft interrupts disabled.
1254  */
1255 void dw_dma_cyclic_stop(struct dma_chan *chan)
1256 {
1257         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1258         struct dw_dma           *dw = to_dw_dma(dwc->chan.device);
1259         unsigned long           flags;
1260
1261         spin_lock_irqsave(&dwc->lock, flags);
1262
1263         dwc_chan_disable(dw, dwc);
1264
1265         spin_unlock_irqrestore(&dwc->lock, flags);
1266 }
1267 EXPORT_SYMBOL(dw_dma_cyclic_stop);
1268
1269 /**
1270  * dw_dma_cyclic_prep - prepare the cyclic DMA transfer
1271  * @chan: the DMA channel to prepare
1272  * @buf_addr: physical DMA address where the buffer starts
1273  * @buf_len: total number of bytes for the entire buffer
1274  * @period_len: number of bytes for each period
1275  * @direction: transfer direction, to or from device
1276  *
1277  * Must be called before trying to start the transfer. Returns a valid struct
1278  * dw_cyclic_desc if successful or an ERR_PTR(-errno) if not successful.
1279  */
1280 struct dw_cyclic_desc *dw_dma_cyclic_prep(struct dma_chan *chan,
1281                 dma_addr_t buf_addr, size_t buf_len, size_t period_len,
1282                 enum dma_transfer_direction direction)
1283 {
1284         struct dw_dma_chan              *dwc = to_dw_dma_chan(chan);
1285         struct dma_slave_config         *sconfig = &dwc->dma_sconfig;
1286         struct dw_cyclic_desc           *cdesc;
1287         struct dw_cyclic_desc           *retval = NULL;
1288         struct dw_desc                  *desc;
1289         struct dw_desc                  *last = NULL;
1290         unsigned long                   was_cyclic;
1291         unsigned int                    reg_width;
1292         unsigned int                    periods;
1293         unsigned int                    i;
1294         unsigned long                   flags;
1295
1296         spin_lock_irqsave(&dwc->lock, flags);
1297         if (dwc->nollp) {
1298                 spin_unlock_irqrestore(&dwc->lock, flags);
1299                 dev_dbg(chan2dev(&dwc->chan),
1300                                 "channel doesn't support LLP transfers\n");
1301                 return ERR_PTR(-EINVAL);
1302         }
1303
1304         if (!list_empty(&dwc->queue) || !list_empty(&dwc->active_list)) {
1305                 spin_unlock_irqrestore(&dwc->lock, flags);
1306                 dev_dbg(chan2dev(&dwc->chan),
1307                                 "queue and/or active list are not empty\n");
1308                 return ERR_PTR(-EBUSY);
1309         }
1310
1311         was_cyclic = test_and_set_bit(DW_DMA_IS_CYCLIC, &dwc->flags);
1312         spin_unlock_irqrestore(&dwc->lock, flags);
1313         if (was_cyclic) {
1314                 dev_dbg(chan2dev(&dwc->chan),
1315                                 "channel already prepared for cyclic DMA\n");
1316                 return ERR_PTR(-EBUSY);
1317         }
1318
1319         retval = ERR_PTR(-EINVAL);
1320
1321         if (unlikely(!is_slave_direction(direction)))
1322                 goto out_err;
1323
1324         dwc->direction = direction;
1325
1326         if (direction == DMA_MEM_TO_DEV)
1327                 reg_width = __ffs(sconfig->dst_addr_width);
1328         else
1329                 reg_width = __ffs(sconfig->src_addr_width);
1330
1331         periods = buf_len / period_len;
1332
1333         /* Check for too big/unaligned periods and unaligned DMA buffer. */
1334         if (period_len > (dwc->block_size << reg_width))
1335                 goto out_err;
1336         if (unlikely(period_len & ((1 << reg_width) - 1)))
1337                 goto out_err;
1338         if (unlikely(buf_addr & ((1 << reg_width) - 1)))
1339                 goto out_err;
1340
1341         retval = ERR_PTR(-ENOMEM);
1342
1343         if (periods > NR_DESCS_PER_CHANNEL)
1344                 goto out_err;
1345
1346         cdesc = kzalloc(sizeof(struct dw_cyclic_desc), GFP_KERNEL);
1347         if (!cdesc)
1348                 goto out_err;
1349
1350         cdesc->desc = kzalloc(sizeof(struct dw_desc *) * periods, GFP_KERNEL);
1351         if (!cdesc->desc)
1352                 goto out_err_alloc;
1353
1354         for (i = 0; i < periods; i++) {
1355                 desc = dwc_desc_get(dwc);
1356                 if (!desc)
1357                         goto out_err_desc_get;
1358
1359                 switch (direction) {
1360                 case DMA_MEM_TO_DEV:
1361                         desc->lli.dar = sconfig->dst_addr;
1362                         desc->lli.sar = buf_addr + (period_len * i);
1363                         desc->lli.ctllo = (DWC_DEFAULT_CTLLO(chan)
1364                                         | DWC_CTLL_DST_WIDTH(reg_width)
1365                                         | DWC_CTLL_SRC_WIDTH(reg_width)
1366                                         | DWC_CTLL_DST_FIX
1367                                         | DWC_CTLL_SRC_INC
1368                                         | DWC_CTLL_INT_EN);
1369
1370                         desc->lli.ctllo |= sconfig->device_fc ?
1371                                 DWC_CTLL_FC(DW_DMA_FC_P_M2P) :
1372                                 DWC_CTLL_FC(DW_DMA_FC_D_M2P);
1373
1374                         break;
1375                 case DMA_DEV_TO_MEM:
1376                         desc->lli.dar = buf_addr + (period_len * i);
1377                         desc->lli.sar = sconfig->src_addr;
1378                         desc->lli.ctllo = (DWC_DEFAULT_CTLLO(chan)
1379                                         | DWC_CTLL_SRC_WIDTH(reg_width)
1380                                         | DWC_CTLL_DST_WIDTH(reg_width)
1381                                         | DWC_CTLL_DST_INC
1382                                         | DWC_CTLL_SRC_FIX
1383                                         | DWC_CTLL_INT_EN);
1384
1385                         desc->lli.ctllo |= sconfig->device_fc ?
1386                                 DWC_CTLL_FC(DW_DMA_FC_P_P2M) :
1387                                 DWC_CTLL_FC(DW_DMA_FC_D_P2M);
1388
1389                         break;
1390                 default:
1391                         break;
1392                 }
1393
1394                 desc->lli.ctlhi = (period_len >> reg_width);
1395                 cdesc->desc[i] = desc;
1396
1397                 if (last)
1398                         last->lli.llp = desc->txd.phys;
1399
1400                 last = desc;
1401         }
1402
1403         /* Let's make a cyclic list */
1404         last->lli.llp = cdesc->desc[0]->txd.phys;
1405
1406         dev_dbg(chan2dev(&dwc->chan),
1407                         "cyclic prepared buf %pad len %zu period %zu periods %d\n",
1408                         &buf_addr, buf_len, period_len, periods);
1409
1410         cdesc->periods = periods;
1411         dwc->cdesc = cdesc;
1412
1413         return cdesc;
1414
1415 out_err_desc_get:
1416         while (i--)
1417                 dwc_desc_put(dwc, cdesc->desc[i]);
1418 out_err_alloc:
1419         kfree(cdesc);
1420 out_err:
1421         clear_bit(DW_DMA_IS_CYCLIC, &dwc->flags);
1422         return (struct dw_cyclic_desc *)retval;
1423 }
1424 EXPORT_SYMBOL(dw_dma_cyclic_prep);
1425
1426 /**
1427  * dw_dma_cyclic_free - free a prepared cyclic DMA transfer
1428  * @chan: the DMA channel to free
1429  */
1430 void dw_dma_cyclic_free(struct dma_chan *chan)
1431 {
1432         struct dw_dma_chan      *dwc = to_dw_dma_chan(chan);
1433         struct dw_dma           *dw = to_dw_dma(dwc->chan.device);
1434         struct dw_cyclic_desc   *cdesc = dwc->cdesc;
1435         int                     i;
1436         unsigned long           flags;
1437
1438         dev_dbg(chan2dev(&dwc->chan), "%s\n", __func__);
1439
1440         if (!cdesc)
1441                 return;
1442
1443         spin_lock_irqsave(&dwc->lock, flags);
1444
1445         dwc_chan_disable(dw, dwc);
1446
1447         dma_writel(dw, CLEAR.ERROR, dwc->mask);
1448         dma_writel(dw, CLEAR.XFER, dwc->mask);
1449
1450         spin_unlock_irqrestore(&dwc->lock, flags);
1451
1452         for (i = 0; i < cdesc->periods; i++)
1453                 dwc_desc_put(dwc, cdesc->desc[i]);
1454
1455         kfree(cdesc->desc);
1456         kfree(cdesc);
1457
1458         clear_bit(DW_DMA_IS_CYCLIC, &dwc->flags);
1459 }
1460 EXPORT_SYMBOL(dw_dma_cyclic_free);
1461
1462 /*----------------------------------------------------------------------*/
1463
1464 static void dw_dma_off(struct dw_dma *dw)
1465 {
1466         int i;
1467
1468         dma_writel(dw, CFG, 0);
1469
1470         channel_clear_bit(dw, MASK.XFER, dw->all_chan_mask);
1471         channel_clear_bit(dw, MASK.SRC_TRAN, dw->all_chan_mask);
1472         channel_clear_bit(dw, MASK.DST_TRAN, dw->all_chan_mask);
1473         channel_clear_bit(dw, MASK.ERROR, dw->all_chan_mask);
1474
1475         while (dma_readl(dw, CFG) & DW_CFG_DMA_EN)
1476                 cpu_relax();
1477
1478         for (i = 0; i < dw->dma.chancnt; i++)
1479                 dw->chan[i].initialized = false;
1480 }
1481
1482 int dw_dma_probe(struct dw_dma_chip *chip, struct dw_dma_platform_data *pdata)
1483 {
1484         struct dw_dma           *dw;
1485         size_t                  size;
1486         bool                    autocfg;
1487         unsigned int            dw_params;
1488         unsigned int            nr_channels;
1489         unsigned int            max_blk_size = 0;
1490         int                     err;
1491         int                     i;
1492
1493         dw_params = dma_read_byaddr(chip->regs, DW_PARAMS);
1494         autocfg = dw_params >> DW_PARAMS_EN & 0x1;
1495
1496         dev_dbg(chip->dev, "DW_PARAMS: 0x%08x\n", dw_params);
1497
1498         if (!pdata && autocfg) {
1499                 pdata = devm_kzalloc(chip->dev, sizeof(*pdata), GFP_KERNEL);
1500                 if (!pdata)
1501                         return -ENOMEM;
1502
1503                 /* Fill platform data with the default values */
1504                 pdata->is_private = true;
1505                 pdata->chan_allocation_order = CHAN_ALLOCATION_ASCENDING;
1506                 pdata->chan_priority = CHAN_PRIORITY_ASCENDING;
1507         } else if (!pdata || pdata->nr_channels > DW_DMA_MAX_NR_CHANNELS)
1508                 return -EINVAL;
1509
1510         if (autocfg)
1511                 nr_channels = (dw_params >> DW_PARAMS_NR_CHAN & 0x7) + 1;
1512         else
1513                 nr_channels = pdata->nr_channels;
1514
1515         size = sizeof(struct dw_dma) + nr_channels * sizeof(struct dw_dma_chan);
1516         dw = devm_kzalloc(chip->dev, size, GFP_KERNEL);
1517         if (!dw)
1518                 return -ENOMEM;
1519
1520         dw->clk = devm_clk_get(chip->dev, "hclk");
1521         if (IS_ERR(dw->clk))
1522                 return PTR_ERR(dw->clk);
1523         clk_prepare_enable(dw->clk);
1524
1525         dw->regs = chip->regs;
1526         chip->dw = dw;
1527
1528         /* Get hardware configuration parameters */
1529         if (autocfg) {
1530                 max_blk_size = dma_readl(dw, MAX_BLK_SIZE);
1531
1532                 dw->nr_masters = (dw_params >> DW_PARAMS_NR_MASTER & 3) + 1;
1533                 for (i = 0; i < dw->nr_masters; i++) {
1534                         dw->data_width[i] =
1535                                 (dw_params >> DW_PARAMS_DATA_WIDTH(i) & 3) + 2;
1536                 }
1537         } else {
1538                 dw->nr_masters = pdata->nr_masters;
1539                 memcpy(dw->data_width, pdata->data_width, 4);
1540         }
1541
1542         /* Calculate all channel mask before DMA setup */
1543         dw->all_chan_mask = (1 << nr_channels) - 1;
1544
1545         /* Force dma off, just in case */
1546         dw_dma_off(dw);
1547
1548         /* Disable BLOCK interrupts as well */
1549         channel_clear_bit(dw, MASK.BLOCK, dw->all_chan_mask);
1550
1551         /* Create a pool of consistent memory blocks for hardware descriptors */
1552         dw->desc_pool = dmam_pool_create("dw_dmac_desc_pool", chip->dev,
1553                                          sizeof(struct dw_desc), 4, 0);
1554         if (!dw->desc_pool) {
1555                 dev_err(chip->dev, "No memory for descriptors dma pool\n");
1556                 return -ENOMEM;
1557         }
1558
1559         tasklet_init(&dw->tasklet, dw_dma_tasklet, (unsigned long)dw);
1560
1561         err = request_irq(chip->irq, dw_dma_interrupt, IRQF_SHARED,
1562                           "dw_dmac", dw);
1563         if (err)
1564                 return err;
1565
1566         INIT_LIST_HEAD(&dw->dma.channels);
1567         for (i = 0; i < nr_channels; i++) {
1568                 struct dw_dma_chan      *dwc = &dw->chan[i];
1569                 int                     r = nr_channels - i - 1;
1570
1571                 dwc->chan.device = &dw->dma;
1572                 dma_cookie_init(&dwc->chan);
1573                 if (pdata->chan_allocation_order == CHAN_ALLOCATION_ASCENDING)
1574                         list_add_tail(&dwc->chan.device_node,
1575                                         &dw->dma.channels);
1576                 else
1577                         list_add(&dwc->chan.device_node, &dw->dma.channels);
1578
1579                 /* 7 is highest priority & 0 is lowest. */
1580                 if (pdata->chan_priority == CHAN_PRIORITY_ASCENDING)
1581                         dwc->priority = r;
1582                 else
1583                         dwc->priority = i;
1584
1585                 dwc->ch_regs = &__dw_regs(dw)->CHAN[i];
1586                 spin_lock_init(&dwc->lock);
1587                 dwc->mask = 1 << i;
1588
1589                 INIT_LIST_HEAD(&dwc->active_list);
1590                 INIT_LIST_HEAD(&dwc->queue);
1591                 INIT_LIST_HEAD(&dwc->free_list);
1592
1593                 channel_clear_bit(dw, CH_EN, dwc->mask);
1594
1595                 dwc->direction = DMA_TRANS_NONE;
1596                 dwc->request_line = ~0;
1597
1598                 /* Hardware configuration */
1599                 if (autocfg) {
1600                         unsigned int dwc_params;
1601                         void __iomem *addr = chip->regs + r * sizeof(u32);
1602
1603                         dwc_params = dma_read_byaddr(addr, DWC_PARAMS);
1604
1605                         dev_dbg(chip->dev, "DWC_PARAMS[%d]: 0x%08x\n", i,
1606                                            dwc_params);
1607
1608                         /*
1609                          * Decode maximum block size for given channel. The
1610                          * stored 4 bit value represents blocks from 0x00 for 3
1611                          * up to 0x0a for 4095.
1612                          */
1613                         dwc->block_size =
1614                                 (4 << ((max_blk_size >> 4 * i) & 0xf)) - 1;
1615                         dwc->nollp =
1616                                 (dwc_params >> DWC_PARAMS_MBLK_EN & 0x1) == 0;
1617                 } else {
1618                         dwc->block_size = pdata->block_size;
1619
1620                         /* Check if channel supports multi block transfer */
1621                         channel_writel(dwc, LLP, 0xfffffffc);
1622                         dwc->nollp =
1623                                 (channel_readl(dwc, LLP) & 0xfffffffc) == 0;
1624                         channel_writel(dwc, LLP, 0);
1625                 }
1626         }
1627
1628         /* Clear all interrupts on all channels. */
1629         dma_writel(dw, CLEAR.XFER, dw->all_chan_mask);
1630         dma_writel(dw, CLEAR.BLOCK, dw->all_chan_mask);
1631         dma_writel(dw, CLEAR.SRC_TRAN, dw->all_chan_mask);
1632         dma_writel(dw, CLEAR.DST_TRAN, dw->all_chan_mask);
1633         dma_writel(dw, CLEAR.ERROR, dw->all_chan_mask);
1634
1635         dma_cap_set(DMA_MEMCPY, dw->dma.cap_mask);
1636         dma_cap_set(DMA_SLAVE, dw->dma.cap_mask);
1637         if (pdata->is_private)
1638                 dma_cap_set(DMA_PRIVATE, dw->dma.cap_mask);
1639         dw->dma.dev = chip->dev;
1640         dw->dma.device_alloc_chan_resources = dwc_alloc_chan_resources;
1641         dw->dma.device_free_chan_resources = dwc_free_chan_resources;
1642
1643         dw->dma.device_prep_dma_memcpy = dwc_prep_dma_memcpy;
1644
1645         dw->dma.device_prep_slave_sg = dwc_prep_slave_sg;
1646         dw->dma.device_control = dwc_control;
1647
1648         dw->dma.device_tx_status = dwc_tx_status;
1649         dw->dma.device_issue_pending = dwc_issue_pending;
1650
1651         dma_writel(dw, CFG, DW_CFG_DMA_EN);
1652
1653         dev_info(chip->dev, "DesignWare DMA Controller, %d channels\n",
1654                  nr_channels);
1655
1656         dma_async_device_register(&dw->dma);
1657
1658         return 0;
1659 }
1660 EXPORT_SYMBOL_GPL(dw_dma_probe);
1661
1662 int dw_dma_remove(struct dw_dma_chip *chip)
1663 {
1664         struct dw_dma           *dw = chip->dw;
1665         struct dw_dma_chan      *dwc, *_dwc;
1666
1667         dw_dma_off(dw);
1668         dma_async_device_unregister(&dw->dma);
1669
1670         free_irq(chip->irq, dw);
1671         tasklet_kill(&dw->tasklet);
1672
1673         list_for_each_entry_safe(dwc, _dwc, &dw->dma.channels,
1674                         chan.device_node) {
1675                 list_del(&dwc->chan.device_node);
1676                 channel_clear_bit(dw, CH_EN, dwc->mask);
1677         }
1678
1679         return 0;
1680 }
1681 EXPORT_SYMBOL_GPL(dw_dma_remove);
1682
1683 void dw_dma_shutdown(struct dw_dma_chip *chip)
1684 {
1685         struct dw_dma *dw = chip->dw;
1686
1687         dw_dma_off(dw);
1688         clk_disable_unprepare(dw->clk);
1689 }
1690 EXPORT_SYMBOL_GPL(dw_dma_shutdown);
1691
1692 #ifdef CONFIG_PM_SLEEP
1693
1694 int dw_dma_suspend(struct dw_dma_chip *chip)
1695 {
1696         struct dw_dma *dw = chip->dw;
1697
1698         dw_dma_off(dw);
1699         clk_disable_unprepare(dw->clk);
1700
1701         return 0;
1702 }
1703 EXPORT_SYMBOL_GPL(dw_dma_suspend);
1704
1705 int dw_dma_resume(struct dw_dma_chip *chip)
1706 {
1707         struct dw_dma *dw = chip->dw;
1708
1709         clk_prepare_enable(dw->clk);
1710         dma_writel(dw, CFG, DW_CFG_DMA_EN);
1711
1712         return 0;
1713 }
1714 EXPORT_SYMBOL_GPL(dw_dma_resume);
1715
1716 #endif /* CONFIG_PM_SLEEP */
1717
1718 MODULE_LICENSE("GPL v2");
1719 MODULE_DESCRIPTION("Synopsys DesignWare DMA Controller core driver");
1720 MODULE_AUTHOR("Haavard Skinnemoen (Atmel)");
1721 MODULE_AUTHOR("Viresh Kumar <viresh.linux@gmail.com>");