Linux-libre 5.3.12-gnu
[librecmc/linux-libre.git] / drivers / mmc / host / sunxi-mmc.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * Driver for sunxi SD/MMC host controllers
4  * (C) Copyright 2007-2011 Reuuimlla Technology Co., Ltd.
5  * (C) Copyright 2007-2011 Aaron Maoye <leafy.myeh@reuuimllatech.com>
6  * (C) Copyright 2013-2014 O2S GmbH <www.o2s.ch>
7  * (C) Copyright 2013-2014 David Lanzendörfer <david.lanzendoerfer@o2s.ch>
8  * (C) Copyright 2013-2014 Hans de Goede <hdegoede@redhat.com>
9  * (C) Copyright 2017 Sootech SA
10  */
11
12 #include <linux/clk.h>
13 #include <linux/clk/sunxi-ng.h>
14 #include <linux/delay.h>
15 #include <linux/device.h>
16 #include <linux/dma-mapping.h>
17 #include <linux/err.h>
18 #include <linux/interrupt.h>
19 #include <linux/io.h>
20 #include <linux/kernel.h>
21 #include <linux/mmc/card.h>
22 #include <linux/mmc/core.h>
23 #include <linux/mmc/host.h>
24 #include <linux/mmc/mmc.h>
25 #include <linux/mmc/sd.h>
26 #include <linux/mmc/sdio.h>
27 #include <linux/mmc/slot-gpio.h>
28 #include <linux/module.h>
29 #include <linux/of_address.h>
30 #include <linux/of_platform.h>
31 #include <linux/platform_device.h>
32 #include <linux/pm_runtime.h>
33 #include <linux/regulator/consumer.h>
34 #include <linux/reset.h>
35 #include <linux/scatterlist.h>
36 #include <linux/slab.h>
37 #include <linux/spinlock.h>
38
39 /* register offset definitions */
40 #define SDXC_REG_GCTRL  (0x00) /* SMC Global Control Register */
41 #define SDXC_REG_CLKCR  (0x04) /* SMC Clock Control Register */
42 #define SDXC_REG_TMOUT  (0x08) /* SMC Time Out Register */
43 #define SDXC_REG_WIDTH  (0x0C) /* SMC Bus Width Register */
44 #define SDXC_REG_BLKSZ  (0x10) /* SMC Block Size Register */
45 #define SDXC_REG_BCNTR  (0x14) /* SMC Byte Count Register */
46 #define SDXC_REG_CMDR   (0x18) /* SMC Command Register */
47 #define SDXC_REG_CARG   (0x1C) /* SMC Argument Register */
48 #define SDXC_REG_RESP0  (0x20) /* SMC Response Register 0 */
49 #define SDXC_REG_RESP1  (0x24) /* SMC Response Register 1 */
50 #define SDXC_REG_RESP2  (0x28) /* SMC Response Register 2 */
51 #define SDXC_REG_RESP3  (0x2C) /* SMC Response Register 3 */
52 #define SDXC_REG_IMASK  (0x30) /* SMC Interrupt Mask Register */
53 #define SDXC_REG_MISTA  (0x34) /* SMC Masked Interrupt Status Register */
54 #define SDXC_REG_RINTR  (0x38) /* SMC Raw Interrupt Status Register */
55 #define SDXC_REG_STAS   (0x3C) /* SMC Status Register */
56 #define SDXC_REG_FTRGL  (0x40) /* SMC FIFO Threshold Watermark Registe */
57 #define SDXC_REG_FUNS   (0x44) /* SMC Function Select Register */
58 #define SDXC_REG_CBCR   (0x48) /* SMC CIU Byte Count Register */
59 #define SDXC_REG_BBCR   (0x4C) /* SMC BIU Byte Count Register */
60 #define SDXC_REG_DBGC   (0x50) /* SMC Debug Enable Register */
61 #define SDXC_REG_HWRST  (0x78) /* SMC Card Hardware Reset for Register */
62 #define SDXC_REG_DMAC   (0x80) /* SMC IDMAC Control Register */
63 #define SDXC_REG_DLBA   (0x84) /* SMC IDMAC Descriptor List Base Addre */
64 #define SDXC_REG_IDST   (0x88) /* SMC IDMAC Status Register */
65 #define SDXC_REG_IDIE   (0x8C) /* SMC IDMAC Interrupt Enable Register */
66 #define SDXC_REG_CHDA   (0x90)
67 #define SDXC_REG_CBDA   (0x94)
68
69 /* New registers introduced in A64 */
70 #define SDXC_REG_A12A           0x058 /* SMC Auto Command 12 Register */
71 #define SDXC_REG_SD_NTSR        0x05C /* SMC New Timing Set Register */
72 #define SDXC_REG_DRV_DL         0x140 /* Drive Delay Control Register */
73 #define SDXC_REG_SAMP_DL_REG    0x144 /* SMC sample delay control */
74 #define SDXC_REG_DS_DL_REG      0x148 /* SMC data strobe delay control */
75
76 #define mmc_readl(host, reg) \
77         readl((host)->reg_base + SDXC_##reg)
78 #define mmc_writel(host, reg, value) \
79         writel((value), (host)->reg_base + SDXC_##reg)
80
81 /* global control register bits */
82 #define SDXC_SOFT_RESET                 BIT(0)
83 #define SDXC_FIFO_RESET                 BIT(1)
84 #define SDXC_DMA_RESET                  BIT(2)
85 #define SDXC_INTERRUPT_ENABLE_BIT       BIT(4)
86 #define SDXC_DMA_ENABLE_BIT             BIT(5)
87 #define SDXC_DEBOUNCE_ENABLE_BIT        BIT(8)
88 #define SDXC_POSEDGE_LATCH_DATA         BIT(9)
89 #define SDXC_DDR_MODE                   BIT(10)
90 #define SDXC_MEMORY_ACCESS_DONE         BIT(29)
91 #define SDXC_ACCESS_DONE_DIRECT         BIT(30)
92 #define SDXC_ACCESS_BY_AHB              BIT(31)
93 #define SDXC_ACCESS_BY_DMA              (0 << 31)
94 #define SDXC_HARDWARE_RESET \
95         (SDXC_SOFT_RESET | SDXC_FIFO_RESET | SDXC_DMA_RESET)
96
97 /* clock control bits */
98 #define SDXC_MASK_DATA0                 BIT(31)
99 #define SDXC_CARD_CLOCK_ON              BIT(16)
100 #define SDXC_LOW_POWER_ON               BIT(17)
101
102 /* bus width */
103 #define SDXC_WIDTH1                     0
104 #define SDXC_WIDTH4                     1
105 #define SDXC_WIDTH8                     2
106
107 /* smc command bits */
108 #define SDXC_RESP_EXPIRE                BIT(6)
109 #define SDXC_LONG_RESPONSE              BIT(7)
110 #define SDXC_CHECK_RESPONSE_CRC         BIT(8)
111 #define SDXC_DATA_EXPIRE                BIT(9)
112 #define SDXC_WRITE                      BIT(10)
113 #define SDXC_SEQUENCE_MODE              BIT(11)
114 #define SDXC_SEND_AUTO_STOP             BIT(12)
115 #define SDXC_WAIT_PRE_OVER              BIT(13)
116 #define SDXC_STOP_ABORT_CMD             BIT(14)
117 #define SDXC_SEND_INIT_SEQUENCE         BIT(15)
118 #define SDXC_UPCLK_ONLY                 BIT(21)
119 #define SDXC_READ_CEATA_DEV             BIT(22)
120 #define SDXC_CCS_EXPIRE                 BIT(23)
121 #define SDXC_ENABLE_BIT_BOOT            BIT(24)
122 #define SDXC_ALT_BOOT_OPTIONS           BIT(25)
123 #define SDXC_BOOT_ACK_EXPIRE            BIT(26)
124 #define SDXC_BOOT_ABORT                 BIT(27)
125 #define SDXC_VOLTAGE_SWITCH             BIT(28)
126 #define SDXC_USE_HOLD_REGISTER          BIT(29)
127 #define SDXC_START                      BIT(31)
128
129 /* interrupt bits */
130 #define SDXC_RESP_ERROR                 BIT(1)
131 #define SDXC_COMMAND_DONE               BIT(2)
132 #define SDXC_DATA_OVER                  BIT(3)
133 #define SDXC_TX_DATA_REQUEST            BIT(4)
134 #define SDXC_RX_DATA_REQUEST            BIT(5)
135 #define SDXC_RESP_CRC_ERROR             BIT(6)
136 #define SDXC_DATA_CRC_ERROR             BIT(7)
137 #define SDXC_RESP_TIMEOUT               BIT(8)
138 #define SDXC_DATA_TIMEOUT               BIT(9)
139 #define SDXC_VOLTAGE_CHANGE_DONE        BIT(10)
140 #define SDXC_FIFO_RUN_ERROR             BIT(11)
141 #define SDXC_HARD_WARE_LOCKED           BIT(12)
142 #define SDXC_START_BIT_ERROR            BIT(13)
143 #define SDXC_AUTO_COMMAND_DONE          BIT(14)
144 #define SDXC_END_BIT_ERROR              BIT(15)
145 #define SDXC_SDIO_INTERRUPT             BIT(16)
146 #define SDXC_CARD_INSERT                BIT(30)
147 #define SDXC_CARD_REMOVE                BIT(31)
148 #define SDXC_INTERRUPT_ERROR_BIT \
149         (SDXC_RESP_ERROR | SDXC_RESP_CRC_ERROR | SDXC_DATA_CRC_ERROR | \
150          SDXC_RESP_TIMEOUT | SDXC_DATA_TIMEOUT | SDXC_FIFO_RUN_ERROR | \
151          SDXC_HARD_WARE_LOCKED | SDXC_START_BIT_ERROR | SDXC_END_BIT_ERROR)
152 #define SDXC_INTERRUPT_DONE_BIT \
153         (SDXC_AUTO_COMMAND_DONE | SDXC_DATA_OVER | \
154          SDXC_COMMAND_DONE | SDXC_VOLTAGE_CHANGE_DONE)
155
156 /* status */
157 #define SDXC_RXWL_FLAG                  BIT(0)
158 #define SDXC_TXWL_FLAG                  BIT(1)
159 #define SDXC_FIFO_EMPTY                 BIT(2)
160 #define SDXC_FIFO_FULL                  BIT(3)
161 #define SDXC_CARD_PRESENT               BIT(8)
162 #define SDXC_CARD_DATA_BUSY             BIT(9)
163 #define SDXC_DATA_FSM_BUSY              BIT(10)
164 #define SDXC_DMA_REQUEST                BIT(31)
165 #define SDXC_FIFO_SIZE                  16
166
167 /* Function select */
168 #define SDXC_CEATA_ON                   (0xceaa << 16)
169 #define SDXC_SEND_IRQ_RESPONSE          BIT(0)
170 #define SDXC_SDIO_READ_WAIT             BIT(1)
171 #define SDXC_ABORT_READ_DATA            BIT(2)
172 #define SDXC_SEND_CCSD                  BIT(8)
173 #define SDXC_SEND_AUTO_STOPCCSD         BIT(9)
174 #define SDXC_CEATA_DEV_IRQ_ENABLE       BIT(10)
175
176 /* IDMA controller bus mod bit field */
177 #define SDXC_IDMAC_SOFT_RESET           BIT(0)
178 #define SDXC_IDMAC_FIX_BURST            BIT(1)
179 #define SDXC_IDMAC_IDMA_ON              BIT(7)
180 #define SDXC_IDMAC_REFETCH_DES          BIT(31)
181
182 /* IDMA status bit field */
183 #define SDXC_IDMAC_TRANSMIT_INTERRUPT           BIT(0)
184 #define SDXC_IDMAC_RECEIVE_INTERRUPT            BIT(1)
185 #define SDXC_IDMAC_FATAL_BUS_ERROR              BIT(2)
186 #define SDXC_IDMAC_DESTINATION_INVALID          BIT(4)
187 #define SDXC_IDMAC_CARD_ERROR_SUM               BIT(5)
188 #define SDXC_IDMAC_NORMAL_INTERRUPT_SUM         BIT(8)
189 #define SDXC_IDMAC_ABNORMAL_INTERRUPT_SUM       BIT(9)
190 #define SDXC_IDMAC_HOST_ABORT_INTERRUPT         BIT(10)
191 #define SDXC_IDMAC_IDLE                         (0 << 13)
192 #define SDXC_IDMAC_SUSPEND                      (1 << 13)
193 #define SDXC_IDMAC_DESC_READ                    (2 << 13)
194 #define SDXC_IDMAC_DESC_CHECK                   (3 << 13)
195 #define SDXC_IDMAC_READ_REQUEST_WAIT            (4 << 13)
196 #define SDXC_IDMAC_WRITE_REQUEST_WAIT           (5 << 13)
197 #define SDXC_IDMAC_READ                         (6 << 13)
198 #define SDXC_IDMAC_WRITE                        (7 << 13)
199 #define SDXC_IDMAC_DESC_CLOSE                   (8 << 13)
200
201 /*
202 * If the idma-des-size-bits of property is ie 13, bufsize bits are:
203 *  Bits  0-12: buf1 size
204 *  Bits 13-25: buf2 size
205 *  Bits 26-31: not used
206 * Since we only ever set buf1 size, we can simply store it directly.
207 */
208 #define SDXC_IDMAC_DES0_DIC     BIT(1)  /* disable interrupt on completion */
209 #define SDXC_IDMAC_DES0_LD      BIT(2)  /* last descriptor */
210 #define SDXC_IDMAC_DES0_FD      BIT(3)  /* first descriptor */
211 #define SDXC_IDMAC_DES0_CH      BIT(4)  /* chain mode */
212 #define SDXC_IDMAC_DES0_ER      BIT(5)  /* end of ring */
213 #define SDXC_IDMAC_DES0_CES     BIT(30) /* card error summary */
214 #define SDXC_IDMAC_DES0_OWN     BIT(31) /* 1-idma owns it, 0-host owns it */
215
216 #define SDXC_CLK_400K           0
217 #define SDXC_CLK_25M            1
218 #define SDXC_CLK_50M            2
219 #define SDXC_CLK_50M_DDR        3
220 #define SDXC_CLK_50M_DDR_8BIT   4
221
222 #define SDXC_2X_TIMING_MODE     BIT(31)
223
224 #define SDXC_CAL_START          BIT(15)
225 #define SDXC_CAL_DONE           BIT(14)
226 #define SDXC_CAL_DL_SHIFT       8
227 #define SDXC_CAL_DL_SW_EN       BIT(7)
228 #define SDXC_CAL_DL_SW_SHIFT    0
229 #define SDXC_CAL_DL_MASK        0x3f
230
231 #define SDXC_CAL_TIMEOUT        3       /* in seconds, 3s is enough*/
232
233 struct sunxi_mmc_clk_delay {
234         u32 output;
235         u32 sample;
236 };
237
238 struct sunxi_idma_des {
239         __le32 config;
240         __le32 buf_size;
241         __le32 buf_addr_ptr1;
242         __le32 buf_addr_ptr2;
243 };
244
245 struct sunxi_mmc_cfg {
246         u32 idma_des_size_bits;
247         const struct sunxi_mmc_clk_delay *clk_delays;
248
249         /* does the IP block support autocalibration? */
250         bool can_calibrate;
251
252         /* Does DATA0 needs to be masked while the clock is updated */
253         bool mask_data0;
254
255         /*
256          * hardware only supports new timing mode, either due to lack of
257          * a mode switch in the clock controller, or the mmc controller
258          * is permanently configured in the new timing mode, without the
259          * NTSR mode switch.
260          */
261         bool needs_new_timings;
262
263         /* clock hardware can switch between old and new timing modes */
264         bool ccu_has_timings_switch;
265 };
266
267 struct sunxi_mmc_host {
268         struct device *dev;
269         struct mmc_host *mmc;
270         struct reset_control *reset;
271         const struct sunxi_mmc_cfg *cfg;
272
273         /* IO mapping base */
274         void __iomem    *reg_base;
275
276         /* clock management */
277         struct clk      *clk_ahb;
278         struct clk      *clk_mmc;
279         struct clk      *clk_sample;
280         struct clk      *clk_output;
281
282         /* irq */
283         spinlock_t      lock;
284         int             irq;
285         u32             int_sum;
286         u32             sdio_imask;
287
288         /* dma */
289         dma_addr_t      sg_dma;
290         void            *sg_cpu;
291         bool            wait_dma;
292
293         struct mmc_request *mrq;
294         struct mmc_request *manual_stop_mrq;
295         int             ferror;
296
297         /* vqmmc */
298         bool            vqmmc_enabled;
299
300         /* timings */
301         bool            use_new_timings;
302 };
303
304 static int sunxi_mmc_reset_host(struct sunxi_mmc_host *host)
305 {
306         unsigned long expire = jiffies + msecs_to_jiffies(250);
307         u32 rval;
308
309         mmc_writel(host, REG_GCTRL, SDXC_HARDWARE_RESET);
310         do {
311                 rval = mmc_readl(host, REG_GCTRL);
312         } while (time_before(jiffies, expire) && (rval & SDXC_HARDWARE_RESET));
313
314         if (rval & SDXC_HARDWARE_RESET) {
315                 dev_err(mmc_dev(host->mmc), "fatal err reset timeout\n");
316                 return -EIO;
317         }
318
319         return 0;
320 }
321
322 static int sunxi_mmc_init_host(struct sunxi_mmc_host *host)
323 {
324         u32 rval;
325
326         if (sunxi_mmc_reset_host(host))
327                 return -EIO;
328
329         /*
330          * Burst 8 transfers, RX trigger level: 7, TX trigger level: 8
331          *
332          * TODO: sun9i has a larger FIFO and supports higher trigger values
333          */
334         mmc_writel(host, REG_FTRGL, 0x20070008);
335         /* Maximum timeout value */
336         mmc_writel(host, REG_TMOUT, 0xffffffff);
337         /* Unmask SDIO interrupt if needed */
338         mmc_writel(host, REG_IMASK, host->sdio_imask);
339         /* Clear all pending interrupts */
340         mmc_writel(host, REG_RINTR, 0xffffffff);
341         /* Debug register? undocumented */
342         mmc_writel(host, REG_DBGC, 0xdeb);
343         /* Enable CEATA support */
344         mmc_writel(host, REG_FUNS, SDXC_CEATA_ON);
345         /* Set DMA descriptor list base address */
346         mmc_writel(host, REG_DLBA, host->sg_dma);
347
348         rval = mmc_readl(host, REG_GCTRL);
349         rval |= SDXC_INTERRUPT_ENABLE_BIT;
350         /* Undocumented, but found in Allwinner code */
351         rval &= ~SDXC_ACCESS_DONE_DIRECT;
352         mmc_writel(host, REG_GCTRL, rval);
353
354         return 0;
355 }
356
357 static void sunxi_mmc_init_idma_des(struct sunxi_mmc_host *host,
358                                     struct mmc_data *data)
359 {
360         struct sunxi_idma_des *pdes = (struct sunxi_idma_des *)host->sg_cpu;
361         dma_addr_t next_desc = host->sg_dma;
362         int i, max_len = (1 << host->cfg->idma_des_size_bits);
363
364         for (i = 0; i < data->sg_len; i++) {
365                 pdes[i].config = cpu_to_le32(SDXC_IDMAC_DES0_CH |
366                                              SDXC_IDMAC_DES0_OWN |
367                                              SDXC_IDMAC_DES0_DIC);
368
369                 if (data->sg[i].length == max_len)
370                         pdes[i].buf_size = 0; /* 0 == max_len */
371                 else
372                         pdes[i].buf_size = cpu_to_le32(data->sg[i].length);
373
374                 next_desc += sizeof(struct sunxi_idma_des);
375                 pdes[i].buf_addr_ptr1 =
376                         cpu_to_le32(sg_dma_address(&data->sg[i]));
377                 pdes[i].buf_addr_ptr2 = cpu_to_le32((u32)next_desc);
378         }
379
380         pdes[0].config |= cpu_to_le32(SDXC_IDMAC_DES0_FD);
381         pdes[i - 1].config |= cpu_to_le32(SDXC_IDMAC_DES0_LD |
382                                           SDXC_IDMAC_DES0_ER);
383         pdes[i - 1].config &= cpu_to_le32(~SDXC_IDMAC_DES0_DIC);
384         pdes[i - 1].buf_addr_ptr2 = 0;
385
386         /*
387          * Avoid the io-store starting the idmac hitting io-mem before the
388          * descriptors hit the main-mem.
389          */
390         wmb();
391 }
392
393 static int sunxi_mmc_map_dma(struct sunxi_mmc_host *host,
394                              struct mmc_data *data)
395 {
396         u32 i, dma_len;
397         struct scatterlist *sg;
398
399         dma_len = dma_map_sg(mmc_dev(host->mmc), data->sg, data->sg_len,
400                              mmc_get_dma_dir(data));
401         if (dma_len == 0) {
402                 dev_err(mmc_dev(host->mmc), "dma_map_sg failed\n");
403                 return -ENOMEM;
404         }
405
406         for_each_sg(data->sg, sg, data->sg_len, i) {
407                 if (sg->offset & 3 || sg->length & 3) {
408                         dev_err(mmc_dev(host->mmc),
409                                 "unaligned scatterlist: os %x length %d\n",
410                                 sg->offset, sg->length);
411                         return -EINVAL;
412                 }
413         }
414
415         return 0;
416 }
417
418 static void sunxi_mmc_start_dma(struct sunxi_mmc_host *host,
419                                 struct mmc_data *data)
420 {
421         u32 rval;
422
423         sunxi_mmc_init_idma_des(host, data);
424
425         rval = mmc_readl(host, REG_GCTRL);
426         rval |= SDXC_DMA_ENABLE_BIT;
427         mmc_writel(host, REG_GCTRL, rval);
428         rval |= SDXC_DMA_RESET;
429         mmc_writel(host, REG_GCTRL, rval);
430
431         mmc_writel(host, REG_DMAC, SDXC_IDMAC_SOFT_RESET);
432
433         if (!(data->flags & MMC_DATA_WRITE))
434                 mmc_writel(host, REG_IDIE, SDXC_IDMAC_RECEIVE_INTERRUPT);
435
436         mmc_writel(host, REG_DMAC,
437                    SDXC_IDMAC_FIX_BURST | SDXC_IDMAC_IDMA_ON);
438 }
439
440 static void sunxi_mmc_send_manual_stop(struct sunxi_mmc_host *host,
441                                        struct mmc_request *req)
442 {
443         u32 arg, cmd_val, ri;
444         unsigned long expire = jiffies + msecs_to_jiffies(1000);
445
446         cmd_val = SDXC_START | SDXC_RESP_EXPIRE |
447                   SDXC_STOP_ABORT_CMD | SDXC_CHECK_RESPONSE_CRC;
448
449         if (req->cmd->opcode == SD_IO_RW_EXTENDED) {
450                 cmd_val |= SD_IO_RW_DIRECT;
451                 arg = (1 << 31) | (0 << 28) | (SDIO_CCCR_ABORT << 9) |
452                       ((req->cmd->arg >> 28) & 0x7);
453         } else {
454                 cmd_val |= MMC_STOP_TRANSMISSION;
455                 arg = 0;
456         }
457
458         mmc_writel(host, REG_CARG, arg);
459         mmc_writel(host, REG_CMDR, cmd_val);
460
461         do {
462                 ri = mmc_readl(host, REG_RINTR);
463         } while (!(ri & (SDXC_COMMAND_DONE | SDXC_INTERRUPT_ERROR_BIT)) &&
464                  time_before(jiffies, expire));
465
466         if (!(ri & SDXC_COMMAND_DONE) || (ri & SDXC_INTERRUPT_ERROR_BIT)) {
467                 dev_err(mmc_dev(host->mmc), "send stop command failed\n");
468                 if (req->stop)
469                         req->stop->resp[0] = -ETIMEDOUT;
470         } else {
471                 if (req->stop)
472                         req->stop->resp[0] = mmc_readl(host, REG_RESP0);
473         }
474
475         mmc_writel(host, REG_RINTR, 0xffff);
476 }
477
478 static void sunxi_mmc_dump_errinfo(struct sunxi_mmc_host *host)
479 {
480         struct mmc_command *cmd = host->mrq->cmd;
481         struct mmc_data *data = host->mrq->data;
482
483         /* For some cmds timeout is normal with sd/mmc cards */
484         if ((host->int_sum & SDXC_INTERRUPT_ERROR_BIT) ==
485                 SDXC_RESP_TIMEOUT && (cmd->opcode == SD_IO_SEND_OP_COND ||
486                                       cmd->opcode == SD_IO_RW_DIRECT))
487                 return;
488
489         dev_dbg(mmc_dev(host->mmc),
490                 "smc %d err, cmd %d,%s%s%s%s%s%s%s%s%s%s !!\n",
491                 host->mmc->index, cmd->opcode,
492                 data ? (data->flags & MMC_DATA_WRITE ? " WR" : " RD") : "",
493                 host->int_sum & SDXC_RESP_ERROR     ? " RE"     : "",
494                 host->int_sum & SDXC_RESP_CRC_ERROR  ? " RCE"    : "",
495                 host->int_sum & SDXC_DATA_CRC_ERROR  ? " DCE"    : "",
496                 host->int_sum & SDXC_RESP_TIMEOUT ? " RTO"    : "",
497                 host->int_sum & SDXC_DATA_TIMEOUT ? " DTO"    : "",
498                 host->int_sum & SDXC_FIFO_RUN_ERROR  ? " FE"     : "",
499                 host->int_sum & SDXC_HARD_WARE_LOCKED ? " HL"     : "",
500                 host->int_sum & SDXC_START_BIT_ERROR ? " SBE"    : "",
501                 host->int_sum & SDXC_END_BIT_ERROR   ? " EBE"    : ""
502                 );
503 }
504
505 /* Called in interrupt context! */
506 static irqreturn_t sunxi_mmc_finalize_request(struct sunxi_mmc_host *host)
507 {
508         struct mmc_request *mrq = host->mrq;
509         struct mmc_data *data = mrq->data;
510         u32 rval;
511
512         mmc_writel(host, REG_IMASK, host->sdio_imask);
513         mmc_writel(host, REG_IDIE, 0);
514
515         if (host->int_sum & SDXC_INTERRUPT_ERROR_BIT) {
516                 sunxi_mmc_dump_errinfo(host);
517                 mrq->cmd->error = -ETIMEDOUT;
518
519                 if (data) {
520                         data->error = -ETIMEDOUT;
521                         host->manual_stop_mrq = mrq;
522                 }
523
524                 if (mrq->stop)
525                         mrq->stop->error = -ETIMEDOUT;
526         } else {
527                 if (mrq->cmd->flags & MMC_RSP_136) {
528                         mrq->cmd->resp[0] = mmc_readl(host, REG_RESP3);
529                         mrq->cmd->resp[1] = mmc_readl(host, REG_RESP2);
530                         mrq->cmd->resp[2] = mmc_readl(host, REG_RESP1);
531                         mrq->cmd->resp[3] = mmc_readl(host, REG_RESP0);
532                 } else {
533                         mrq->cmd->resp[0] = mmc_readl(host, REG_RESP0);
534                 }
535
536                 if (data)
537                         data->bytes_xfered = data->blocks * data->blksz;
538         }
539
540         if (data) {
541                 mmc_writel(host, REG_IDST, 0x337);
542                 mmc_writel(host, REG_DMAC, 0);
543                 rval = mmc_readl(host, REG_GCTRL);
544                 rval |= SDXC_DMA_RESET;
545                 mmc_writel(host, REG_GCTRL, rval);
546                 rval &= ~SDXC_DMA_ENABLE_BIT;
547                 mmc_writel(host, REG_GCTRL, rval);
548                 rval |= SDXC_FIFO_RESET;
549                 mmc_writel(host, REG_GCTRL, rval);
550                 dma_unmap_sg(mmc_dev(host->mmc), data->sg, data->sg_len,
551                              mmc_get_dma_dir(data));
552         }
553
554         mmc_writel(host, REG_RINTR, 0xffff);
555
556         host->mrq = NULL;
557         host->int_sum = 0;
558         host->wait_dma = false;
559
560         return host->manual_stop_mrq ? IRQ_WAKE_THREAD : IRQ_HANDLED;
561 }
562
563 static irqreturn_t sunxi_mmc_irq(int irq, void *dev_id)
564 {
565         struct sunxi_mmc_host *host = dev_id;
566         struct mmc_request *mrq;
567         u32 msk_int, idma_int;
568         bool finalize = false;
569         bool sdio_int = false;
570         irqreturn_t ret = IRQ_HANDLED;
571
572         spin_lock(&host->lock);
573
574         idma_int  = mmc_readl(host, REG_IDST);
575         msk_int   = mmc_readl(host, REG_MISTA);
576
577         dev_dbg(mmc_dev(host->mmc), "irq: rq %p mi %08x idi %08x\n",
578                 host->mrq, msk_int, idma_int);
579
580         mrq = host->mrq;
581         if (mrq) {
582                 if (idma_int & SDXC_IDMAC_RECEIVE_INTERRUPT)
583                         host->wait_dma = false;
584
585                 host->int_sum |= msk_int;
586
587                 /* Wait for COMMAND_DONE on RESPONSE_TIMEOUT before finalize */
588                 if ((host->int_sum & SDXC_RESP_TIMEOUT) &&
589                                 !(host->int_sum & SDXC_COMMAND_DONE))
590                         mmc_writel(host, REG_IMASK,
591                                    host->sdio_imask | SDXC_COMMAND_DONE);
592                 /* Don't wait for dma on error */
593                 else if (host->int_sum & SDXC_INTERRUPT_ERROR_BIT)
594                         finalize = true;
595                 else if ((host->int_sum & SDXC_INTERRUPT_DONE_BIT) &&
596                                 !host->wait_dma)
597                         finalize = true;
598         }
599
600         if (msk_int & SDXC_SDIO_INTERRUPT)
601                 sdio_int = true;
602
603         mmc_writel(host, REG_RINTR, msk_int);
604         mmc_writel(host, REG_IDST, idma_int);
605
606         if (finalize)
607                 ret = sunxi_mmc_finalize_request(host);
608
609         spin_unlock(&host->lock);
610
611         if (finalize && ret == IRQ_HANDLED)
612                 mmc_request_done(host->mmc, mrq);
613
614         if (sdio_int)
615                 mmc_signal_sdio_irq(host->mmc);
616
617         return ret;
618 }
619
620 static irqreturn_t sunxi_mmc_handle_manual_stop(int irq, void *dev_id)
621 {
622         struct sunxi_mmc_host *host = dev_id;
623         struct mmc_request *mrq;
624         unsigned long iflags;
625
626         spin_lock_irqsave(&host->lock, iflags);
627         mrq = host->manual_stop_mrq;
628         spin_unlock_irqrestore(&host->lock, iflags);
629
630         if (!mrq) {
631                 dev_err(mmc_dev(host->mmc), "no request for manual stop\n");
632                 return IRQ_HANDLED;
633         }
634
635         dev_err(mmc_dev(host->mmc), "data error, sending stop command\n");
636
637         /*
638          * We will never have more than one outstanding request,
639          * and we do not complete the request until after
640          * we've cleared host->manual_stop_mrq so we do not need to
641          * spin lock this function.
642          * Additionally we have wait states within this function
643          * so having it in a lock is a very bad idea.
644          */
645         sunxi_mmc_send_manual_stop(host, mrq);
646
647         spin_lock_irqsave(&host->lock, iflags);
648         host->manual_stop_mrq = NULL;
649         spin_unlock_irqrestore(&host->lock, iflags);
650
651         mmc_request_done(host->mmc, mrq);
652
653         return IRQ_HANDLED;
654 }
655
656 static int sunxi_mmc_oclk_onoff(struct sunxi_mmc_host *host, u32 oclk_en)
657 {
658         unsigned long expire = jiffies + msecs_to_jiffies(750);
659         u32 rval;
660
661         dev_dbg(mmc_dev(host->mmc), "%sabling the clock\n",
662                 oclk_en ? "en" : "dis");
663
664         rval = mmc_readl(host, REG_CLKCR);
665         rval &= ~(SDXC_CARD_CLOCK_ON | SDXC_LOW_POWER_ON | SDXC_MASK_DATA0);
666
667         if (oclk_en)
668                 rval |= SDXC_CARD_CLOCK_ON;
669         if (host->cfg->mask_data0)
670                 rval |= SDXC_MASK_DATA0;
671
672         mmc_writel(host, REG_CLKCR, rval);
673
674         rval = SDXC_START | SDXC_UPCLK_ONLY | SDXC_WAIT_PRE_OVER;
675         mmc_writel(host, REG_CMDR, rval);
676
677         do {
678                 rval = mmc_readl(host, REG_CMDR);
679         } while (time_before(jiffies, expire) && (rval & SDXC_START));
680
681         /* clear irq status bits set by the command */
682         mmc_writel(host, REG_RINTR,
683                    mmc_readl(host, REG_RINTR) & ~SDXC_SDIO_INTERRUPT);
684
685         if (rval & SDXC_START) {
686                 dev_err(mmc_dev(host->mmc), "fatal err update clk timeout\n");
687                 return -EIO;
688         }
689
690         if (host->cfg->mask_data0) {
691                 rval = mmc_readl(host, REG_CLKCR);
692                 mmc_writel(host, REG_CLKCR, rval & ~SDXC_MASK_DATA0);
693         }
694
695         return 0;
696 }
697
698 static int sunxi_mmc_calibrate(struct sunxi_mmc_host *host, int reg_off)
699 {
700         if (!host->cfg->can_calibrate)
701                 return 0;
702
703         /*
704          * FIXME:
705          * This is not clear how the calibration is supposed to work
706          * yet. The best rate have been obtained by simply setting the
707          * delay to 0, as Allwinner does in its BSP.
708          *
709          * The only mode that doesn't have such a delay is HS400, that
710          * is in itself a TODO.
711          */
712         writel(SDXC_CAL_DL_SW_EN, host->reg_base + reg_off);
713
714         return 0;
715 }
716
717 static int sunxi_mmc_clk_set_phase(struct sunxi_mmc_host *host,
718                                    struct mmc_ios *ios, u32 rate)
719 {
720         int index;
721
722         /* clk controller delays not used under new timings mode */
723         if (host->use_new_timings)
724                 return 0;
725
726         /* some old controllers don't support delays */
727         if (!host->cfg->clk_delays)
728                 return 0;
729
730         /* determine delays */
731         if (rate <= 400000) {
732                 index = SDXC_CLK_400K;
733         } else if (rate <= 25000000) {
734                 index = SDXC_CLK_25M;
735         } else if (rate <= 52000000) {
736                 if (ios->timing != MMC_TIMING_UHS_DDR50 &&
737                     ios->timing != MMC_TIMING_MMC_DDR52) {
738                         index = SDXC_CLK_50M;
739                 } else if (ios->bus_width == MMC_BUS_WIDTH_8) {
740                         index = SDXC_CLK_50M_DDR_8BIT;
741                 } else {
742                         index = SDXC_CLK_50M_DDR;
743                 }
744         } else {
745                 dev_dbg(mmc_dev(host->mmc), "Invalid clock... returning\n");
746                 return -EINVAL;
747         }
748
749         clk_set_phase(host->clk_sample, host->cfg->clk_delays[index].sample);
750         clk_set_phase(host->clk_output, host->cfg->clk_delays[index].output);
751
752         return 0;
753 }
754
755 static int sunxi_mmc_clk_set_rate(struct sunxi_mmc_host *host,
756                                   struct mmc_ios *ios)
757 {
758         struct mmc_host *mmc = host->mmc;
759         long rate;
760         u32 rval, clock = ios->clock, div = 1;
761         int ret;
762
763         ret = sunxi_mmc_oclk_onoff(host, 0);
764         if (ret)
765                 return ret;
766
767         /* Our clock is gated now */
768         mmc->actual_clock = 0;
769
770         if (!ios->clock)
771                 return 0;
772
773         /*
774          * Under the old timing mode, 8 bit DDR requires the module
775          * clock to be double the card clock. Under the new timing
776          * mode, all DDR modes require a doubled module clock.
777          *
778          * We currently only support the standard MMC DDR52 mode.
779          * This block should be updated once support for other DDR
780          * modes is added.
781          */
782         if (ios->timing == MMC_TIMING_MMC_DDR52 &&
783             (host->use_new_timings ||
784              ios->bus_width == MMC_BUS_WIDTH_8)) {
785                 div = 2;
786                 clock <<= 1;
787         }
788
789         if (host->use_new_timings && host->cfg->ccu_has_timings_switch) {
790                 ret = sunxi_ccu_set_mmc_timing_mode(host->clk_mmc, true);
791                 if (ret) {
792                         dev_err(mmc_dev(mmc),
793                                 "error setting new timing mode\n");
794                         return ret;
795                 }
796         }
797
798         rate = clk_round_rate(host->clk_mmc, clock);
799         if (rate < 0) {
800                 dev_err(mmc_dev(mmc), "error rounding clk to %d: %ld\n",
801                         clock, rate);
802                 return rate;
803         }
804         dev_dbg(mmc_dev(mmc), "setting clk to %d, rounded %ld\n",
805                 clock, rate);
806
807         /* setting clock rate */
808         ret = clk_set_rate(host->clk_mmc, rate);
809         if (ret) {
810                 dev_err(mmc_dev(mmc), "error setting clk to %ld: %d\n",
811                         rate, ret);
812                 return ret;
813         }
814
815         /* set internal divider */
816         rval = mmc_readl(host, REG_CLKCR);
817         rval &= ~0xff;
818         rval |= div - 1;
819         mmc_writel(host, REG_CLKCR, rval);
820
821         /* update card clock rate to account for internal divider */
822         rate /= div;
823
824         /*
825          * Configure the controller to use the new timing mode if needed.
826          * On controllers that only support the new timing mode, such as
827          * the eMMC controller on the A64, this register does not exist,
828          * and any writes to it are ignored.
829          */
830         if (host->use_new_timings) {
831                 /* Don't touch the delay bits */
832                 rval = mmc_readl(host, REG_SD_NTSR);
833                 rval |= SDXC_2X_TIMING_MODE;
834                 mmc_writel(host, REG_SD_NTSR, rval);
835         }
836
837         /* sunxi_mmc_clk_set_phase expects the actual card clock rate */
838         ret = sunxi_mmc_clk_set_phase(host, ios, rate);
839         if (ret)
840                 return ret;
841
842         ret = sunxi_mmc_calibrate(host, SDXC_REG_SAMP_DL_REG);
843         if (ret)
844                 return ret;
845
846         /*
847          * FIXME:
848          *
849          * In HS400 we'll also need to calibrate the data strobe
850          * signal. This should only happen on the MMC2 controller (at
851          * least on the A64).
852          */
853
854         ret = sunxi_mmc_oclk_onoff(host, 1);
855         if (ret)
856                 return ret;
857
858         /* And we just enabled our clock back */
859         mmc->actual_clock = rate;
860
861         return 0;
862 }
863
864 static void sunxi_mmc_set_bus_width(struct sunxi_mmc_host *host,
865                                    unsigned char width)
866 {
867         switch (width) {
868         case MMC_BUS_WIDTH_1:
869                 mmc_writel(host, REG_WIDTH, SDXC_WIDTH1);
870                 break;
871         case MMC_BUS_WIDTH_4:
872                 mmc_writel(host, REG_WIDTH, SDXC_WIDTH4);
873                 break;
874         case MMC_BUS_WIDTH_8:
875                 mmc_writel(host, REG_WIDTH, SDXC_WIDTH8);
876                 break;
877         }
878 }
879
880 static void sunxi_mmc_set_clk(struct sunxi_mmc_host *host, struct mmc_ios *ios)
881 {
882         u32 rval;
883
884         /* set ddr mode */
885         rval = mmc_readl(host, REG_GCTRL);
886         if (ios->timing == MMC_TIMING_UHS_DDR50 ||
887             ios->timing == MMC_TIMING_MMC_DDR52)
888                 rval |= SDXC_DDR_MODE;
889         else
890                 rval &= ~SDXC_DDR_MODE;
891         mmc_writel(host, REG_GCTRL, rval);
892
893         host->ferror = sunxi_mmc_clk_set_rate(host, ios);
894         /* Android code had a usleep_range(50000, 55000); here */
895 }
896
897 static void sunxi_mmc_card_power(struct sunxi_mmc_host *host,
898                                  struct mmc_ios *ios)
899 {
900         struct mmc_host *mmc = host->mmc;
901
902         switch (ios->power_mode) {
903         case MMC_POWER_UP:
904                 dev_dbg(mmc_dev(mmc), "Powering card up\n");
905
906                 if (!IS_ERR(mmc->supply.vmmc)) {
907                         host->ferror = mmc_regulator_set_ocr(mmc,
908                                                              mmc->supply.vmmc,
909                                                              ios->vdd);
910                         if (host->ferror)
911                                 return;
912                 }
913
914                 if (!IS_ERR(mmc->supply.vqmmc)) {
915                         host->ferror = regulator_enable(mmc->supply.vqmmc);
916                         if (host->ferror) {
917                                 dev_err(mmc_dev(mmc),
918                                         "failed to enable vqmmc\n");
919                                 return;
920                         }
921                         host->vqmmc_enabled = true;
922                 }
923                 break;
924
925         case MMC_POWER_OFF:
926                 dev_dbg(mmc_dev(mmc), "Powering card off\n");
927
928                 if (!IS_ERR(mmc->supply.vmmc))
929                         mmc_regulator_set_ocr(mmc, mmc->supply.vmmc, 0);
930
931                 if (!IS_ERR(mmc->supply.vqmmc) && host->vqmmc_enabled)
932                         regulator_disable(mmc->supply.vqmmc);
933
934                 host->vqmmc_enabled = false;
935                 break;
936
937         default:
938                 dev_dbg(mmc_dev(mmc), "Ignoring unknown card power state\n");
939                 break;
940         }
941 }
942
943 static void sunxi_mmc_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
944 {
945         struct sunxi_mmc_host *host = mmc_priv(mmc);
946
947         sunxi_mmc_card_power(host, ios);
948         sunxi_mmc_set_bus_width(host, ios->bus_width);
949         sunxi_mmc_set_clk(host, ios);
950 }
951
952 static int sunxi_mmc_volt_switch(struct mmc_host *mmc, struct mmc_ios *ios)
953 {
954         /* vqmmc regulator is available */
955         if (!IS_ERR(mmc->supply.vqmmc))
956                 return mmc_regulator_set_vqmmc(mmc, ios);
957
958         /* no vqmmc regulator, assume fixed regulator at 3/3.3V */
959         if (mmc->ios.signal_voltage == MMC_SIGNAL_VOLTAGE_330)
960                 return 0;
961
962         return -EINVAL;
963 }
964
965 static void sunxi_mmc_enable_sdio_irq(struct mmc_host *mmc, int enable)
966 {
967         struct sunxi_mmc_host *host = mmc_priv(mmc);
968         unsigned long flags;
969         u32 imask;
970
971         if (enable)
972                 pm_runtime_get_noresume(host->dev);
973
974         spin_lock_irqsave(&host->lock, flags);
975
976         imask = mmc_readl(host, REG_IMASK);
977         if (enable) {
978                 host->sdio_imask = SDXC_SDIO_INTERRUPT;
979                 imask |= SDXC_SDIO_INTERRUPT;
980         } else {
981                 host->sdio_imask = 0;
982                 imask &= ~SDXC_SDIO_INTERRUPT;
983         }
984         mmc_writel(host, REG_IMASK, imask);
985         spin_unlock_irqrestore(&host->lock, flags);
986
987         if (!enable)
988                 pm_runtime_put_noidle(host->mmc->parent);
989 }
990
991 static void sunxi_mmc_hw_reset(struct mmc_host *mmc)
992 {
993         struct sunxi_mmc_host *host = mmc_priv(mmc);
994         mmc_writel(host, REG_HWRST, 0);
995         udelay(10);
996         mmc_writel(host, REG_HWRST, 1);
997         udelay(300);
998 }
999
1000 static void sunxi_mmc_request(struct mmc_host *mmc, struct mmc_request *mrq)
1001 {
1002         struct sunxi_mmc_host *host = mmc_priv(mmc);
1003         struct mmc_command *cmd = mrq->cmd;
1004         struct mmc_data *data = mrq->data;
1005         unsigned long iflags;
1006         u32 imask = SDXC_INTERRUPT_ERROR_BIT;
1007         u32 cmd_val = SDXC_START | (cmd->opcode & 0x3f);
1008         bool wait_dma = host->wait_dma;
1009         int ret;
1010
1011         /* Check for set_ios errors (should never happen) */
1012         if (host->ferror) {
1013                 mrq->cmd->error = host->ferror;
1014                 mmc_request_done(mmc, mrq);
1015                 return;
1016         }
1017
1018         if (data) {
1019                 ret = sunxi_mmc_map_dma(host, data);
1020                 if (ret < 0) {
1021                         dev_err(mmc_dev(mmc), "map DMA failed\n");
1022                         cmd->error = ret;
1023                         data->error = ret;
1024                         mmc_request_done(mmc, mrq);
1025                         return;
1026                 }
1027         }
1028
1029         if (cmd->opcode == MMC_GO_IDLE_STATE) {
1030                 cmd_val |= SDXC_SEND_INIT_SEQUENCE;
1031                 imask |= SDXC_COMMAND_DONE;
1032         }
1033
1034         if (cmd->flags & MMC_RSP_PRESENT) {
1035                 cmd_val |= SDXC_RESP_EXPIRE;
1036                 if (cmd->flags & MMC_RSP_136)
1037                         cmd_val |= SDXC_LONG_RESPONSE;
1038                 if (cmd->flags & MMC_RSP_CRC)
1039                         cmd_val |= SDXC_CHECK_RESPONSE_CRC;
1040
1041                 if ((cmd->flags & MMC_CMD_MASK) == MMC_CMD_ADTC) {
1042                         cmd_val |= SDXC_DATA_EXPIRE | SDXC_WAIT_PRE_OVER;
1043
1044                         if (cmd->data->stop) {
1045                                 imask |= SDXC_AUTO_COMMAND_DONE;
1046                                 cmd_val |= SDXC_SEND_AUTO_STOP;
1047                         } else {
1048                                 imask |= SDXC_DATA_OVER;
1049                         }
1050
1051                         if (cmd->data->flags & MMC_DATA_WRITE)
1052                                 cmd_val |= SDXC_WRITE;
1053                         else
1054                                 wait_dma = true;
1055                 } else {
1056                         imask |= SDXC_COMMAND_DONE;
1057                 }
1058         } else {
1059                 imask |= SDXC_COMMAND_DONE;
1060         }
1061
1062         dev_dbg(mmc_dev(mmc), "cmd %d(%08x) arg %x ie 0x%08x len %d\n",
1063                 cmd_val & 0x3f, cmd_val, cmd->arg, imask,
1064                 mrq->data ? mrq->data->blksz * mrq->data->blocks : 0);
1065
1066         spin_lock_irqsave(&host->lock, iflags);
1067
1068         if (host->mrq || host->manual_stop_mrq) {
1069                 spin_unlock_irqrestore(&host->lock, iflags);
1070
1071                 if (data)
1072                         dma_unmap_sg(mmc_dev(mmc), data->sg, data->sg_len,
1073                                      mmc_get_dma_dir(data));
1074
1075                 dev_err(mmc_dev(mmc), "request already pending\n");
1076                 mrq->cmd->error = -EBUSY;
1077                 mmc_request_done(mmc, mrq);
1078                 return;
1079         }
1080
1081         if (data) {
1082                 mmc_writel(host, REG_BLKSZ, data->blksz);
1083                 mmc_writel(host, REG_BCNTR, data->blksz * data->blocks);
1084                 sunxi_mmc_start_dma(host, data);
1085         }
1086
1087         host->mrq = mrq;
1088         host->wait_dma = wait_dma;
1089         mmc_writel(host, REG_IMASK, host->sdio_imask | imask);
1090         mmc_writel(host, REG_CARG, cmd->arg);
1091         mmc_writel(host, REG_CMDR, cmd_val);
1092
1093         spin_unlock_irqrestore(&host->lock, iflags);
1094 }
1095
1096 static int sunxi_mmc_card_busy(struct mmc_host *mmc)
1097 {
1098         struct sunxi_mmc_host *host = mmc_priv(mmc);
1099
1100         return !!(mmc_readl(host, REG_STAS) & SDXC_CARD_DATA_BUSY);
1101 }
1102
1103 static const struct mmc_host_ops sunxi_mmc_ops = {
1104         .request         = sunxi_mmc_request,
1105         .set_ios         = sunxi_mmc_set_ios,
1106         .get_ro          = mmc_gpio_get_ro,
1107         .get_cd          = mmc_gpio_get_cd,
1108         .enable_sdio_irq = sunxi_mmc_enable_sdio_irq,
1109         .start_signal_voltage_switch = sunxi_mmc_volt_switch,
1110         .hw_reset        = sunxi_mmc_hw_reset,
1111         .card_busy       = sunxi_mmc_card_busy,
1112 };
1113
1114 static const struct sunxi_mmc_clk_delay sunxi_mmc_clk_delays[] = {
1115         [SDXC_CLK_400K]         = { .output = 180, .sample = 180 },
1116         [SDXC_CLK_25M]          = { .output = 180, .sample =  75 },
1117         [SDXC_CLK_50M]          = { .output =  90, .sample = 120 },
1118         [SDXC_CLK_50M_DDR]      = { .output =  60, .sample = 120 },
1119         /* Value from A83T "new timing mode". Works but might not be right. */
1120         [SDXC_CLK_50M_DDR_8BIT] = { .output =  90, .sample = 180 },
1121 };
1122
1123 static const struct sunxi_mmc_clk_delay sun9i_mmc_clk_delays[] = {
1124         [SDXC_CLK_400K]         = { .output = 180, .sample = 180 },
1125         [SDXC_CLK_25M]          = { .output = 180, .sample =  75 },
1126         [SDXC_CLK_50M]          = { .output = 150, .sample = 120 },
1127         [SDXC_CLK_50M_DDR]      = { .output =  54, .sample =  36 },
1128         [SDXC_CLK_50M_DDR_8BIT] = { .output =  72, .sample =  72 },
1129 };
1130
1131 static const struct sunxi_mmc_cfg sun4i_a10_cfg = {
1132         .idma_des_size_bits = 13,
1133         .clk_delays = NULL,
1134         .can_calibrate = false,
1135 };
1136
1137 static const struct sunxi_mmc_cfg sun5i_a13_cfg = {
1138         .idma_des_size_bits = 16,
1139         .clk_delays = NULL,
1140         .can_calibrate = false,
1141 };
1142
1143 static const struct sunxi_mmc_cfg sun7i_a20_cfg = {
1144         .idma_des_size_bits = 16,
1145         .clk_delays = sunxi_mmc_clk_delays,
1146         .can_calibrate = false,
1147 };
1148
1149 static const struct sunxi_mmc_cfg sun8i_a83t_emmc_cfg = {
1150         .idma_des_size_bits = 16,
1151         .clk_delays = sunxi_mmc_clk_delays,
1152         .can_calibrate = false,
1153         .ccu_has_timings_switch = true,
1154 };
1155
1156 static const struct sunxi_mmc_cfg sun9i_a80_cfg = {
1157         .idma_des_size_bits = 16,
1158         .clk_delays = sun9i_mmc_clk_delays,
1159         .can_calibrate = false,
1160 };
1161
1162 static const struct sunxi_mmc_cfg sun50i_a64_cfg = {
1163         .idma_des_size_bits = 16,
1164         .clk_delays = NULL,
1165         .can_calibrate = true,
1166         .mask_data0 = true,
1167         .needs_new_timings = true,
1168 };
1169
1170 static const struct sunxi_mmc_cfg sun50i_a64_emmc_cfg = {
1171         .idma_des_size_bits = 13,
1172         .clk_delays = NULL,
1173         .can_calibrate = true,
1174         .needs_new_timings = true,
1175 };
1176
1177 static const struct of_device_id sunxi_mmc_of_match[] = {
1178         { .compatible = "allwinner,sun4i-a10-mmc", .data = &sun4i_a10_cfg },
1179         { .compatible = "allwinner,sun5i-a13-mmc", .data = &sun5i_a13_cfg },
1180         { .compatible = "allwinner,sun7i-a20-mmc", .data = &sun7i_a20_cfg },
1181         { .compatible = "allwinner,sun8i-a83t-emmc", .data = &sun8i_a83t_emmc_cfg },
1182         { .compatible = "allwinner,sun9i-a80-mmc", .data = &sun9i_a80_cfg },
1183         { .compatible = "allwinner,sun50i-a64-mmc", .data = &sun50i_a64_cfg },
1184         { .compatible = "allwinner,sun50i-a64-emmc", .data = &sun50i_a64_emmc_cfg },
1185         { /* sentinel */ }
1186 };
1187 MODULE_DEVICE_TABLE(of, sunxi_mmc_of_match);
1188
1189 static int sunxi_mmc_enable(struct sunxi_mmc_host *host)
1190 {
1191         int ret;
1192
1193         if (!IS_ERR(host->reset)) {
1194                 ret = reset_control_reset(host->reset);
1195                 if (ret) {
1196                         dev_err(host->dev, "Couldn't reset the MMC controller (%d)\n",
1197                                 ret);
1198                         return ret;
1199                 }
1200         }
1201
1202         ret = clk_prepare_enable(host->clk_ahb);
1203         if (ret) {
1204                 dev_err(host->dev, "Couldn't enable the bus clocks (%d)\n", ret);
1205                 goto error_assert_reset;
1206         }
1207
1208         ret = clk_prepare_enable(host->clk_mmc);
1209         if (ret) {
1210                 dev_err(host->dev, "Enable mmc clk err %d\n", ret);
1211                 goto error_disable_clk_ahb;
1212         }
1213
1214         ret = clk_prepare_enable(host->clk_output);
1215         if (ret) {
1216                 dev_err(host->dev, "Enable output clk err %d\n", ret);
1217                 goto error_disable_clk_mmc;
1218         }
1219
1220         ret = clk_prepare_enable(host->clk_sample);
1221         if (ret) {
1222                 dev_err(host->dev, "Enable sample clk err %d\n", ret);
1223                 goto error_disable_clk_output;
1224         }
1225
1226         /*
1227          * Sometimes the controller asserts the irq on boot for some reason,
1228          * make sure the controller is in a sane state before enabling irqs.
1229          */
1230         ret = sunxi_mmc_reset_host(host);
1231         if (ret)
1232                 goto error_disable_clk_sample;
1233
1234         return 0;
1235
1236 error_disable_clk_sample:
1237         clk_disable_unprepare(host->clk_sample);
1238 error_disable_clk_output:
1239         clk_disable_unprepare(host->clk_output);
1240 error_disable_clk_mmc:
1241         clk_disable_unprepare(host->clk_mmc);
1242 error_disable_clk_ahb:
1243         clk_disable_unprepare(host->clk_ahb);
1244 error_assert_reset:
1245         if (!IS_ERR(host->reset))
1246                 reset_control_assert(host->reset);
1247         return ret;
1248 }
1249
1250 static void sunxi_mmc_disable(struct sunxi_mmc_host *host)
1251 {
1252         sunxi_mmc_reset_host(host);
1253
1254         clk_disable_unprepare(host->clk_sample);
1255         clk_disable_unprepare(host->clk_output);
1256         clk_disable_unprepare(host->clk_mmc);
1257         clk_disable_unprepare(host->clk_ahb);
1258
1259         if (!IS_ERR(host->reset))
1260                 reset_control_assert(host->reset);
1261 }
1262
1263 static int sunxi_mmc_resource_request(struct sunxi_mmc_host *host,
1264                                       struct platform_device *pdev)
1265 {
1266         int ret;
1267
1268         host->cfg = of_device_get_match_data(&pdev->dev);
1269         if (!host->cfg)
1270                 return -EINVAL;
1271
1272         ret = mmc_regulator_get_supply(host->mmc);
1273         if (ret)
1274                 return ret;
1275
1276         host->reg_base = devm_ioremap_resource(&pdev->dev,
1277                               platform_get_resource(pdev, IORESOURCE_MEM, 0));
1278         if (IS_ERR(host->reg_base))
1279                 return PTR_ERR(host->reg_base);
1280
1281         host->clk_ahb = devm_clk_get(&pdev->dev, "ahb");
1282         if (IS_ERR(host->clk_ahb)) {
1283                 dev_err(&pdev->dev, "Could not get ahb clock\n");
1284                 return PTR_ERR(host->clk_ahb);
1285         }
1286
1287         host->clk_mmc = devm_clk_get(&pdev->dev, "mmc");
1288         if (IS_ERR(host->clk_mmc)) {
1289                 dev_err(&pdev->dev, "Could not get mmc clock\n");
1290                 return PTR_ERR(host->clk_mmc);
1291         }
1292
1293         if (host->cfg->clk_delays) {
1294                 host->clk_output = devm_clk_get(&pdev->dev, "output");
1295                 if (IS_ERR(host->clk_output)) {
1296                         dev_err(&pdev->dev, "Could not get output clock\n");
1297                         return PTR_ERR(host->clk_output);
1298                 }
1299
1300                 host->clk_sample = devm_clk_get(&pdev->dev, "sample");
1301                 if (IS_ERR(host->clk_sample)) {
1302                         dev_err(&pdev->dev, "Could not get sample clock\n");
1303                         return PTR_ERR(host->clk_sample);
1304                 }
1305         }
1306
1307         host->reset = devm_reset_control_get_optional_exclusive(&pdev->dev,
1308                                                                 "ahb");
1309         if (PTR_ERR(host->reset) == -EPROBE_DEFER)
1310                 return PTR_ERR(host->reset);
1311
1312         ret = sunxi_mmc_enable(host);
1313         if (ret)
1314                 return ret;
1315
1316         host->irq = platform_get_irq(pdev, 0);
1317         if (host->irq <= 0) {
1318                 ret = -EINVAL;
1319                 goto error_disable_mmc;
1320         }
1321
1322         return devm_request_threaded_irq(&pdev->dev, host->irq, sunxi_mmc_irq,
1323                         sunxi_mmc_handle_manual_stop, 0, "sunxi-mmc", host);
1324
1325 error_disable_mmc:
1326         sunxi_mmc_disable(host);
1327         return ret;
1328 }
1329
1330 static int sunxi_mmc_probe(struct platform_device *pdev)
1331 {
1332         struct sunxi_mmc_host *host;
1333         struct mmc_host *mmc;
1334         int ret;
1335
1336         mmc = mmc_alloc_host(sizeof(struct sunxi_mmc_host), &pdev->dev);
1337         if (!mmc) {
1338                 dev_err(&pdev->dev, "mmc alloc host failed\n");
1339                 return -ENOMEM;
1340         }
1341         platform_set_drvdata(pdev, mmc);
1342
1343         host = mmc_priv(mmc);
1344         host->dev = &pdev->dev;
1345         host->mmc = mmc;
1346         spin_lock_init(&host->lock);
1347
1348         ret = sunxi_mmc_resource_request(host, pdev);
1349         if (ret)
1350                 goto error_free_host;
1351
1352         host->sg_cpu = dma_alloc_coherent(&pdev->dev, PAGE_SIZE,
1353                                           &host->sg_dma, GFP_KERNEL);
1354         if (!host->sg_cpu) {
1355                 dev_err(&pdev->dev, "Failed to allocate DMA descriptor mem\n");
1356                 ret = -ENOMEM;
1357                 goto error_free_host;
1358         }
1359
1360         if (host->cfg->ccu_has_timings_switch) {
1361                 /*
1362                  * Supports both old and new timing modes.
1363                  * Try setting the clk to new timing mode.
1364                  */
1365                 sunxi_ccu_set_mmc_timing_mode(host->clk_mmc, true);
1366
1367                 /* And check the result */
1368                 ret = sunxi_ccu_get_mmc_timing_mode(host->clk_mmc);
1369                 if (ret < 0) {
1370                         /*
1371                          * For whatever reason we were not able to get
1372                          * the current active mode. Default to old mode.
1373                          */
1374                         dev_warn(&pdev->dev, "MMC clk timing mode unknown\n");
1375                         host->use_new_timings = false;
1376                 } else {
1377                         host->use_new_timings = !!ret;
1378                 }
1379         } else if (host->cfg->needs_new_timings) {
1380                 /* Supports new timing mode only */
1381                 host->use_new_timings = true;
1382         }
1383
1384         mmc->ops                = &sunxi_mmc_ops;
1385         mmc->max_blk_count      = 8192;
1386         mmc->max_blk_size       = 4096;
1387         mmc->max_segs           = PAGE_SIZE / sizeof(struct sunxi_idma_des);
1388         mmc->max_seg_size       = (1 << host->cfg->idma_des_size_bits);
1389         mmc->max_req_size       = mmc->max_seg_size * mmc->max_segs;
1390         /* 400kHz ~ 52MHz */
1391         mmc->f_min              =   400000;
1392         mmc->f_max              = 52000000;
1393         mmc->caps              |= MMC_CAP_MMC_HIGHSPEED | MMC_CAP_SD_HIGHSPEED |
1394                                   MMC_CAP_ERASE | MMC_CAP_SDIO_IRQ;
1395
1396         /*
1397          * Some H5 devices do not have signal traces precise enough to
1398          * use HS DDR mode for their eMMC chips.
1399          *
1400          * We still enable HS DDR modes for all the other controller
1401          * variants that support them.
1402          */
1403         if ((host->cfg->clk_delays || host->use_new_timings) &&
1404             !of_device_is_compatible(pdev->dev.of_node,
1405                                      "allwinner,sun50i-h5-emmc"))
1406                 mmc->caps      |= MMC_CAP_1_8V_DDR | MMC_CAP_3_3V_DDR;
1407
1408         ret = mmc_of_parse(mmc);
1409         if (ret)
1410                 goto error_free_dma;
1411
1412         /*
1413          * If we don't support delay chains in the SoC, we can't use any
1414          * of the higher speed modes. Mask them out in case the device
1415          * tree specifies the properties for them, which gets added to
1416          * the caps by mmc_of_parse() above.
1417          */
1418         if (!(host->cfg->clk_delays || host->use_new_timings)) {
1419                 mmc->caps &= ~(MMC_CAP_3_3V_DDR | MMC_CAP_1_8V_DDR |
1420                                MMC_CAP_1_2V_DDR | MMC_CAP_UHS);
1421                 mmc->caps2 &= ~MMC_CAP2_HS200;
1422         }
1423
1424         /* TODO: This driver doesn't support HS400 mode yet */
1425         mmc->caps2 &= ~MMC_CAP2_HS400;
1426
1427         ret = sunxi_mmc_init_host(host);
1428         if (ret)
1429                 goto error_free_dma;
1430
1431         pm_runtime_set_active(&pdev->dev);
1432         pm_runtime_set_autosuspend_delay(&pdev->dev, 50);
1433         pm_runtime_use_autosuspend(&pdev->dev);
1434         pm_runtime_enable(&pdev->dev);
1435
1436         ret = mmc_add_host(mmc);
1437         if (ret)
1438                 goto error_free_dma;
1439
1440         dev_info(&pdev->dev, "initialized, max. request size: %u KB%s\n",
1441                  mmc->max_req_size >> 10,
1442                  host->use_new_timings ? ", uses new timings mode" : "");
1443
1444         return 0;
1445
1446 error_free_dma:
1447         dma_free_coherent(&pdev->dev, PAGE_SIZE, host->sg_cpu, host->sg_dma);
1448 error_free_host:
1449         mmc_free_host(mmc);
1450         return ret;
1451 }
1452
1453 static int sunxi_mmc_remove(struct platform_device *pdev)
1454 {
1455         struct mmc_host *mmc = platform_get_drvdata(pdev);
1456         struct sunxi_mmc_host *host = mmc_priv(mmc);
1457
1458         mmc_remove_host(mmc);
1459         pm_runtime_force_suspend(&pdev->dev);
1460         disable_irq(host->irq);
1461         sunxi_mmc_disable(host);
1462         dma_free_coherent(&pdev->dev, PAGE_SIZE, host->sg_cpu, host->sg_dma);
1463         mmc_free_host(mmc);
1464
1465         return 0;
1466 }
1467
1468 #ifdef CONFIG_PM
1469 static int sunxi_mmc_runtime_resume(struct device *dev)
1470 {
1471         struct mmc_host *mmc = dev_get_drvdata(dev);
1472         struct sunxi_mmc_host *host = mmc_priv(mmc);
1473         int ret;
1474
1475         ret = sunxi_mmc_enable(host);
1476         if (ret)
1477                 return ret;
1478
1479         sunxi_mmc_init_host(host);
1480         sunxi_mmc_set_bus_width(host, mmc->ios.bus_width);
1481         sunxi_mmc_set_clk(host, &mmc->ios);
1482         enable_irq(host->irq);
1483
1484         return 0;
1485 }
1486
1487 static int sunxi_mmc_runtime_suspend(struct device *dev)
1488 {
1489         struct mmc_host *mmc = dev_get_drvdata(dev);
1490         struct sunxi_mmc_host *host = mmc_priv(mmc);
1491
1492         /*
1493          * When clocks are off, it's possible receiving
1494          * fake interrupts, which will stall the system.
1495          * Disabling the irq  will prevent this.
1496          */
1497         disable_irq(host->irq);
1498         sunxi_mmc_reset_host(host);
1499         sunxi_mmc_disable(host);
1500
1501         return 0;
1502 }
1503 #endif
1504
1505 static const struct dev_pm_ops sunxi_mmc_pm_ops = {
1506         SET_RUNTIME_PM_OPS(sunxi_mmc_runtime_suspend,
1507                            sunxi_mmc_runtime_resume,
1508                            NULL)
1509 };
1510
1511 static struct platform_driver sunxi_mmc_driver = {
1512         .driver = {
1513                 .name   = "sunxi-mmc",
1514                 .of_match_table = of_match_ptr(sunxi_mmc_of_match),
1515                 .pm = &sunxi_mmc_pm_ops,
1516         },
1517         .probe          = sunxi_mmc_probe,
1518         .remove         = sunxi_mmc_remove,
1519 };
1520 module_platform_driver(sunxi_mmc_driver);
1521
1522 MODULE_DESCRIPTION("Allwinner's SD/MMC Card Controller Driver");
1523 MODULE_LICENSE("GPL v2");
1524 MODULE_AUTHOR("David Lanzendörfer <david.lanzendoerfer@o2s.ch>");
1525 MODULE_ALIAS("platform:sunxi-mmc");