Merge branch 'master' of git://git.denx.de/u-boot-sunxi
[oweals/u-boot.git] / drivers / mmc / fsl_esdhc.c
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * Copyright 2007, 2010-2011 Freescale Semiconductor, Inc
4  * Andy Fleming
5  *
6  * Based vaguely on the pxa mmc code:
7  * (C) Copyright 2003
8  * Kyle Harris, Nexus Technologies, Inc. kharris@nexus-tech.net
9  */
10
11 #include <config.h>
12 #include <common.h>
13 #include <command.h>
14 #include <clk.h>
15 #include <errno.h>
16 #include <hwconfig.h>
17 #include <mmc.h>
18 #include <part.h>
19 #include <power/regulator.h>
20 #include <malloc.h>
21 #include <fsl_esdhc.h>
22 #include <fdt_support.h>
23 #include <asm/io.h>
24 #include <dm.h>
25 #include <asm-generic/gpio.h>
26 #include <dm/pinctrl.h>
27
28 DECLARE_GLOBAL_DATA_PTR;
29
30 #define SDHCI_IRQ_EN_BITS               (IRQSTATEN_CC | IRQSTATEN_TC | \
31                                 IRQSTATEN_CINT | \
32                                 IRQSTATEN_CTOE | IRQSTATEN_CCE | IRQSTATEN_CEBE | \
33                                 IRQSTATEN_CIE | IRQSTATEN_DTOE | IRQSTATEN_DCE | \
34                                 IRQSTATEN_DEBE | IRQSTATEN_BRR | IRQSTATEN_BWR | \
35                                 IRQSTATEN_DINT)
36 #define MAX_TUNING_LOOP 40
37
38 struct fsl_esdhc {
39         uint    dsaddr;         /* SDMA system address register */
40         uint    blkattr;        /* Block attributes register */
41         uint    cmdarg;         /* Command argument register */
42         uint    xfertyp;        /* Transfer type register */
43         uint    cmdrsp0;        /* Command response 0 register */
44         uint    cmdrsp1;        /* Command response 1 register */
45         uint    cmdrsp2;        /* Command response 2 register */
46         uint    cmdrsp3;        /* Command response 3 register */
47         uint    datport;        /* Buffer data port register */
48         uint    prsstat;        /* Present state register */
49         uint    proctl;         /* Protocol control register */
50         uint    sysctl;         /* System Control Register */
51         uint    irqstat;        /* Interrupt status register */
52         uint    irqstaten;      /* Interrupt status enable register */
53         uint    irqsigen;       /* Interrupt signal enable register */
54         uint    autoc12err;     /* Auto CMD error status register */
55         uint    hostcapblt;     /* Host controller capabilities register */
56         uint    wml;            /* Watermark level register */
57         uint    mixctrl;        /* For USDHC */
58         char    reserved1[4];   /* reserved */
59         uint    fevt;           /* Force event register */
60         uint    admaes;         /* ADMA error status register */
61         uint    adsaddr;        /* ADMA system address register */
62         char    reserved2[4];
63         uint    dllctrl;
64         uint    dllstat;
65         uint    clktunectrlstatus;
66         char    reserved3[4];
67         uint    strobe_dllctrl;
68         uint    strobe_dllstat;
69         char    reserved4[72];
70         uint    vendorspec;
71         uint    mmcboot;
72         uint    vendorspec2;
73         uint    tuning_ctrl;    /* on i.MX6/7/8 */
74         char    reserved5[44];
75         uint    hostver;        /* Host controller version register */
76         char    reserved6[4];   /* reserved */
77         uint    dmaerraddr;     /* DMA error address register */
78         char    reserved7[4];   /* reserved */
79         uint    dmaerrattr;     /* DMA error attribute register */
80         char    reserved8[4];   /* reserved */
81         uint    hostcapblt2;    /* Host controller capabilities register 2 */
82         char    reserved9[8];   /* reserved */
83         uint    tcr;            /* Tuning control register */
84         char    reserved10[28]; /* reserved */
85         uint    sddirctl;       /* SD direction control register */
86         char    reserved11[712];/* reserved */
87         uint    scr;            /* eSDHC control register */
88 };
89
90 struct fsl_esdhc_plat {
91         struct mmc_config cfg;
92         struct mmc mmc;
93 };
94
95 struct esdhc_soc_data {
96         u32 flags;
97         u32 caps;
98 };
99
100 /**
101  * struct fsl_esdhc_priv
102  *
103  * @esdhc_regs: registers of the sdhc controller
104  * @sdhc_clk: Current clk of the sdhc controller
105  * @bus_width: bus width, 1bit, 4bit or 8bit
106  * @cfg: mmc config
107  * @mmc: mmc
108  * Following is used when Driver Model is enabled for MMC
109  * @dev: pointer for the device
110  * @non_removable: 0: removable; 1: non-removable
111  * @wp_enable: 1: enable checking wp; 0: no check
112  * @vs18_enable: 1: use 1.8V voltage; 0: use 3.3V
113  * @flags: ESDHC_FLAG_xx in include/fsl_esdhc.h
114  * @caps: controller capabilities
115  * @tuning_step: tuning step setting in tuning_ctrl register
116  * @start_tuning_tap: the start point for tuning in tuning_ctrl register
117  * @strobe_dll_delay_target: settings in strobe_dllctrl
118  * @signal_voltage: indicating the current voltage
119  * @cd_gpio: gpio for card detection
120  * @wp_gpio: gpio for write protection
121  */
122 struct fsl_esdhc_priv {
123         struct fsl_esdhc *esdhc_regs;
124         unsigned int sdhc_clk;
125         struct clk per_clk;
126         unsigned int clock;
127         unsigned int mode;
128         unsigned int bus_width;
129 #if !CONFIG_IS_ENABLED(BLK)
130         struct mmc *mmc;
131 #endif
132         struct udevice *dev;
133         int non_removable;
134         int wp_enable;
135         int vs18_enable;
136         u32 flags;
137         u32 caps;
138         u32 tuning_step;
139         u32 tuning_start_tap;
140         u32 strobe_dll_delay_target;
141         u32 signal_voltage;
142 #if IS_ENABLED(CONFIG_DM_REGULATOR)
143         struct udevice *vqmmc_dev;
144         struct udevice *vmmc_dev;
145 #endif
146 #ifdef CONFIG_DM_GPIO
147         struct gpio_desc cd_gpio;
148         struct gpio_desc wp_gpio;
149 #endif
150 };
151
152 /* Return the XFERTYP flags for a given command and data packet */
153 static uint esdhc_xfertyp(struct mmc_cmd *cmd, struct mmc_data *data)
154 {
155         uint xfertyp = 0;
156
157         if (data) {
158                 xfertyp |= XFERTYP_DPSEL;
159 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
160                 xfertyp |= XFERTYP_DMAEN;
161 #endif
162                 if (data->blocks > 1) {
163                         xfertyp |= XFERTYP_MSBSEL;
164                         xfertyp |= XFERTYP_BCEN;
165 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC111
166                         xfertyp |= XFERTYP_AC12EN;
167 #endif
168                 }
169
170                 if (data->flags & MMC_DATA_READ)
171                         xfertyp |= XFERTYP_DTDSEL;
172         }
173
174         if (cmd->resp_type & MMC_RSP_CRC)
175                 xfertyp |= XFERTYP_CCCEN;
176         if (cmd->resp_type & MMC_RSP_OPCODE)
177                 xfertyp |= XFERTYP_CICEN;
178         if (cmd->resp_type & MMC_RSP_136)
179                 xfertyp |= XFERTYP_RSPTYP_136;
180         else if (cmd->resp_type & MMC_RSP_BUSY)
181                 xfertyp |= XFERTYP_RSPTYP_48_BUSY;
182         else if (cmd->resp_type & MMC_RSP_PRESENT)
183                 xfertyp |= XFERTYP_RSPTYP_48;
184
185         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
186                 xfertyp |= XFERTYP_CMDTYP_ABORT;
187
188         return XFERTYP_CMD(cmd->cmdidx) | xfertyp;
189 }
190
191 #ifdef CONFIG_SYS_FSL_ESDHC_USE_PIO
192 /*
193  * PIO Read/Write Mode reduce the performace as DMA is not used in this mode.
194  */
195 static void esdhc_pio_read_write(struct fsl_esdhc_priv *priv,
196                                  struct mmc_data *data)
197 {
198         struct fsl_esdhc *regs = priv->esdhc_regs;
199         uint blocks;
200         char *buffer;
201         uint databuf;
202         uint size;
203         uint irqstat;
204         ulong start;
205
206         if (data->flags & MMC_DATA_READ) {
207                 blocks = data->blocks;
208                 buffer = data->dest;
209                 while (blocks) {
210                         start = get_timer(0);
211                         size = data->blocksize;
212                         irqstat = esdhc_read32(&regs->irqstat);
213                         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_BREN)) {
214                                 if (get_timer(start) > PIO_TIMEOUT) {
215                                         printf("\nData Read Failed in PIO Mode.");
216                                         return;
217                                 }
218                         }
219                         while (size && (!(irqstat & IRQSTAT_TC))) {
220                                 udelay(100); /* Wait before last byte transfer complete */
221                                 irqstat = esdhc_read32(&regs->irqstat);
222                                 databuf = in_le32(&regs->datport);
223                                 *((uint *)buffer) = databuf;
224                                 buffer += 4;
225                                 size -= 4;
226                         }
227                         blocks--;
228                 }
229         } else {
230                 blocks = data->blocks;
231                 buffer = (char *)data->src;
232                 while (blocks) {
233                         start = get_timer(0);
234                         size = data->blocksize;
235                         irqstat = esdhc_read32(&regs->irqstat);
236                         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_BWEN)) {
237                                 if (get_timer(start) > PIO_TIMEOUT) {
238                                         printf("\nData Write Failed in PIO Mode.");
239                                         return;
240                                 }
241                         }
242                         while (size && (!(irqstat & IRQSTAT_TC))) {
243                                 udelay(100); /* Wait before last byte transfer complete */
244                                 databuf = *((uint *)buffer);
245                                 buffer += 4;
246                                 size -= 4;
247                                 irqstat = esdhc_read32(&regs->irqstat);
248                                 out_le32(&regs->datport, databuf);
249                         }
250                         blocks--;
251                 }
252         }
253 }
254 #endif
255
256 static int esdhc_setup_data(struct fsl_esdhc_priv *priv, struct mmc *mmc,
257                             struct mmc_data *data)
258 {
259         int timeout;
260         struct fsl_esdhc *regs = priv->esdhc_regs;
261 #if defined(CONFIG_FSL_LAYERSCAPE) || defined(CONFIG_S32V234) || \
262         defined(CONFIG_IMX8) || defined(CONFIG_IMX8M)
263         dma_addr_t addr;
264 #endif
265         uint wml_value;
266
267         wml_value = data->blocksize/4;
268
269         if (data->flags & MMC_DATA_READ) {
270                 if (wml_value > WML_RD_WML_MAX)
271                         wml_value = WML_RD_WML_MAX_VAL;
272
273                 esdhc_clrsetbits32(&regs->wml, WML_RD_WML_MASK, wml_value);
274 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
275 #if defined(CONFIG_FSL_LAYERSCAPE) || defined(CONFIG_S32V234) || \
276         defined(CONFIG_IMX8) || defined(CONFIG_IMX8M)
277                 addr = virt_to_phys((void *)(data->dest));
278                 if (upper_32_bits(addr))
279                         printf("Error found for upper 32 bits\n");
280                 else
281                         esdhc_write32(&regs->dsaddr, lower_32_bits(addr));
282 #else
283                 esdhc_write32(&regs->dsaddr, (u32)data->dest);
284 #endif
285 #endif
286         } else {
287 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
288                 flush_dcache_range((ulong)data->src,
289                                    (ulong)data->src+data->blocks
290                                          *data->blocksize);
291 #endif
292                 if (wml_value > WML_WR_WML_MAX)
293                         wml_value = WML_WR_WML_MAX_VAL;
294                 if (priv->wp_enable) {
295                         if ((esdhc_read32(&regs->prsstat) &
296                             PRSSTAT_WPSPL) == 0) {
297                                 printf("\nThe SD card is locked. Can not write to a locked card.\n\n");
298                                 return -ETIMEDOUT;
299                         }
300                 } else {
301 #ifdef CONFIG_DM_GPIO
302                         if (dm_gpio_is_valid(&priv->wp_gpio) && dm_gpio_get_value(&priv->wp_gpio)) {
303                                 printf("\nThe SD card is locked. Can not write to a locked card.\n\n");
304                                 return -ETIMEDOUT;
305                         }
306 #endif
307                 }
308
309                 esdhc_clrsetbits32(&regs->wml, WML_WR_WML_MASK,
310                                         wml_value << 16);
311 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
312 #if defined(CONFIG_FSL_LAYERSCAPE) || defined(CONFIG_S32V234) || \
313         defined(CONFIG_IMX8) || defined(CONFIG_IMX8M)
314                 addr = virt_to_phys((void *)(data->src));
315                 if (upper_32_bits(addr))
316                         printf("Error found for upper 32 bits\n");
317                 else
318                         esdhc_write32(&regs->dsaddr, lower_32_bits(addr));
319 #else
320                 esdhc_write32(&regs->dsaddr, (u32)data->src);
321 #endif
322 #endif
323         }
324
325         esdhc_write32(&regs->blkattr, data->blocks << 16 | data->blocksize);
326
327         /* Calculate the timeout period for data transactions */
328         /*
329          * 1)Timeout period = (2^(timeout+13)) SD Clock cycles
330          * 2)Timeout period should be minimum 0.250sec as per SD Card spec
331          *  So, Number of SD Clock cycles for 0.25sec should be minimum
332          *              (SD Clock/sec * 0.25 sec) SD Clock cycles
333          *              = (mmc->clock * 1/4) SD Clock cycles
334          * As 1) >=  2)
335          * => (2^(timeout+13)) >= mmc->clock * 1/4
336          * Taking log2 both the sides
337          * => timeout + 13 >= log2(mmc->clock/4)
338          * Rounding up to next power of 2
339          * => timeout + 13 = log2(mmc->clock/4) + 1
340          * => timeout + 13 = fls(mmc->clock/4)
341          *
342          * However, the MMC spec "It is strongly recommended for hosts to
343          * implement more than 500ms timeout value even if the card
344          * indicates the 250ms maximum busy length."  Even the previous
345          * value of 300ms is known to be insufficient for some cards.
346          * So, we use
347          * => timeout + 13 = fls(mmc->clock/2)
348          */
349         timeout = fls(mmc->clock/2);
350         timeout -= 13;
351
352         if (timeout > 14)
353                 timeout = 14;
354
355         if (timeout < 0)
356                 timeout = 0;
357
358 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC_A001
359         if ((timeout == 4) || (timeout == 8) || (timeout == 12))
360                 timeout++;
361 #endif
362
363 #ifdef ESDHCI_QUIRK_BROKEN_TIMEOUT_VALUE
364         timeout = 0xE;
365 #endif
366         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_TIMEOUT_MASK, timeout << 16);
367
368         return 0;
369 }
370
371 static void check_and_invalidate_dcache_range
372         (struct mmc_cmd *cmd,
373          struct mmc_data *data) {
374         unsigned start = 0;
375         unsigned end = 0;
376         unsigned size = roundup(ARCH_DMA_MINALIGN,
377                                 data->blocks*data->blocksize);
378 #if defined(CONFIG_FSL_LAYERSCAPE) || defined(CONFIG_S32V234) || \
379         defined(CONFIG_IMX8) || defined(CONFIG_IMX8M)
380         dma_addr_t addr;
381
382         addr = virt_to_phys((void *)(data->dest));
383         if (upper_32_bits(addr))
384                 printf("Error found for upper 32 bits\n");
385         else
386                 start = lower_32_bits(addr);
387 #else
388         start = (unsigned)data->dest;
389 #endif
390         end = start + size;
391         invalidate_dcache_range(start, end);
392 }
393
394 #ifdef CONFIG_MCF5441x
395 /*
396  * Swaps 32-bit words to little-endian byte order.
397  */
398 static inline void sd_swap_dma_buff(struct mmc_data *data)
399 {
400         int i, size = data->blocksize >> 2;
401         u32 *buffer = (u32 *)data->dest;
402         u32 sw;
403
404         while (data->blocks--) {
405                 for (i = 0; i < size; i++) {
406                         sw = __sw32(*buffer);
407                         *buffer++ = sw;
408                 }
409         }
410 }
411 #endif
412
413 /*
414  * Sends a command out on the bus.  Takes the mmc pointer,
415  * a command pointer, and an optional data pointer.
416  */
417 static int esdhc_send_cmd_common(struct fsl_esdhc_priv *priv, struct mmc *mmc,
418                                  struct mmc_cmd *cmd, struct mmc_data *data)
419 {
420         int     err = 0;
421         uint    xfertyp;
422         uint    irqstat;
423         u32     flags = IRQSTAT_CC | IRQSTAT_CTOE;
424         struct fsl_esdhc *regs = priv->esdhc_regs;
425         unsigned long start;
426
427 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC111
428         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
429                 return 0;
430 #endif
431
432         esdhc_write32(&regs->irqstat, -1);
433
434         sync();
435
436         /* Wait for the bus to be idle */
437         while ((esdhc_read32(&regs->prsstat) & PRSSTAT_CICHB) ||
438                         (esdhc_read32(&regs->prsstat) & PRSSTAT_CIDHB))
439                 ;
440
441         while (esdhc_read32(&regs->prsstat) & PRSSTAT_DLA)
442                 ;
443
444         /* Wait at least 8 SD clock cycles before the next command */
445         /*
446          * Note: This is way more than 8 cycles, but 1ms seems to
447          * resolve timing issues with some cards
448          */
449         udelay(1000);
450
451         /* Set up for a data transfer if we have one */
452         if (data) {
453                 err = esdhc_setup_data(priv, mmc, data);
454                 if(err)
455                         return err;
456
457                 if (data->flags & MMC_DATA_READ)
458                         check_and_invalidate_dcache_range(cmd, data);
459         }
460
461         /* Figure out the transfer arguments */
462         xfertyp = esdhc_xfertyp(cmd, data);
463
464         /* Mask all irqs */
465         esdhc_write32(&regs->irqsigen, 0);
466
467         /* Send the command */
468         esdhc_write32(&regs->cmdarg, cmd->cmdarg);
469 #if defined(CONFIG_FSL_USDHC)
470         esdhc_write32(&regs->mixctrl,
471         (esdhc_read32(&regs->mixctrl) & 0xFFFFFF80) | (xfertyp & 0x7F)
472                         | (mmc->ddr_mode ? XFERTYP_DDREN : 0));
473         esdhc_write32(&regs->xfertyp, xfertyp & 0xFFFF0000);
474 #else
475         esdhc_write32(&regs->xfertyp, xfertyp);
476 #endif
477
478         if ((cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK) ||
479             (cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK_HS200))
480                 flags = IRQSTAT_BRR;
481
482         /* Wait for the command to complete */
483         start = get_timer(0);
484         while (!(esdhc_read32(&regs->irqstat) & flags)) {
485                 if (get_timer(start) > 1000) {
486                         err = -ETIMEDOUT;
487                         goto out;
488                 }
489         }
490
491         irqstat = esdhc_read32(&regs->irqstat);
492
493         if (irqstat & CMD_ERR) {
494                 err = -ECOMM;
495                 goto out;
496         }
497
498         if (irqstat & IRQSTAT_CTOE) {
499                 err = -ETIMEDOUT;
500                 goto out;
501         }
502
503         /* Switch voltage to 1.8V if CMD11 succeeded */
504         if (cmd->cmdidx == SD_CMD_SWITCH_UHS18V) {
505                 esdhc_setbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
506
507                 printf("Run CMD11 1.8V switch\n");
508                 /* Sleep for 5 ms - max time for card to switch to 1.8V */
509                 udelay(5000);
510         }
511
512         /* Workaround for ESDHC errata ENGcm03648 */
513         if (!data && (cmd->resp_type & MMC_RSP_BUSY)) {
514                 int timeout = 6000;
515
516                 /* Poll on DATA0 line for cmd with busy signal for 600 ms */
517                 while (timeout > 0 && !(esdhc_read32(&regs->prsstat) &
518                                         PRSSTAT_DAT0)) {
519                         udelay(100);
520                         timeout--;
521                 }
522
523                 if (timeout <= 0) {
524                         printf("Timeout waiting for DAT0 to go high!\n");
525                         err = -ETIMEDOUT;
526                         goto out;
527                 }
528         }
529
530         /* Copy the response to the response buffer */
531         if (cmd->resp_type & MMC_RSP_136) {
532                 u32 cmdrsp3, cmdrsp2, cmdrsp1, cmdrsp0;
533
534                 cmdrsp3 = esdhc_read32(&regs->cmdrsp3);
535                 cmdrsp2 = esdhc_read32(&regs->cmdrsp2);
536                 cmdrsp1 = esdhc_read32(&regs->cmdrsp1);
537                 cmdrsp0 = esdhc_read32(&regs->cmdrsp0);
538                 cmd->response[0] = (cmdrsp3 << 8) | (cmdrsp2 >> 24);
539                 cmd->response[1] = (cmdrsp2 << 8) | (cmdrsp1 >> 24);
540                 cmd->response[2] = (cmdrsp1 << 8) | (cmdrsp0 >> 24);
541                 cmd->response[3] = (cmdrsp0 << 8);
542         } else
543                 cmd->response[0] = esdhc_read32(&regs->cmdrsp0);
544
545         /* Wait until all of the blocks are transferred */
546         if (data) {
547 #ifdef CONFIG_SYS_FSL_ESDHC_USE_PIO
548                 esdhc_pio_read_write(priv, data);
549 #else
550                 flags = DATA_COMPLETE;
551                 if ((cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK) ||
552                     (cmd->cmdidx == MMC_CMD_SEND_TUNING_BLOCK_HS200)) {
553                         flags = IRQSTAT_BRR;
554                 }
555
556                 do {
557                         irqstat = esdhc_read32(&regs->irqstat);
558
559                         if (irqstat & IRQSTAT_DTOE) {
560                                 err = -ETIMEDOUT;
561                                 goto out;
562                         }
563
564                         if (irqstat & DATA_ERR) {
565                                 err = -ECOMM;
566                                 goto out;
567                         }
568                 } while ((irqstat & flags) != flags);
569
570                 /*
571                  * Need invalidate the dcache here again to avoid any
572                  * cache-fill during the DMA operations such as the
573                  * speculative pre-fetching etc.
574                  */
575                 if (data->flags & MMC_DATA_READ) {
576                         check_and_invalidate_dcache_range(cmd, data);
577 #ifdef CONFIG_MCF5441x
578                         sd_swap_dma_buff(data);
579 #endif
580                 }
581 #endif
582         }
583
584 out:
585         /* Reset CMD and DATA portions on error */
586         if (err) {
587                 esdhc_write32(&regs->sysctl, esdhc_read32(&regs->sysctl) |
588                               SYSCTL_RSTC);
589                 while (esdhc_read32(&regs->sysctl) & SYSCTL_RSTC)
590                         ;
591
592                 if (data) {
593                         esdhc_write32(&regs->sysctl,
594                                       esdhc_read32(&regs->sysctl) |
595                                       SYSCTL_RSTD);
596                         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTD))
597                                 ;
598                 }
599
600                 /* If this was CMD11, then notify that power cycle is needed */
601                 if (cmd->cmdidx == SD_CMD_SWITCH_UHS18V)
602                         printf("CMD11 to switch to 1.8V mode failed, card requires power cycle.\n");
603         }
604
605         esdhc_write32(&regs->irqstat, -1);
606
607         return err;
608 }
609
610 static void set_sysctl(struct fsl_esdhc_priv *priv, struct mmc *mmc, uint clock)
611 {
612         struct fsl_esdhc *regs = priv->esdhc_regs;
613         int div = 1;
614 #ifdef ARCH_MXC
615 #ifdef CONFIG_MX53
616         /* For i.MX53 eSDHCv3, SYSCTL.SDCLKFS may not be set to 0. */
617         int pre_div = (regs == (struct fsl_esdhc *)MMC_SDHC3_BASE_ADDR) ? 2 : 1;
618 #else
619         int pre_div = 1;
620 #endif
621 #else
622         int pre_div = 2;
623 #endif
624         int sdhc_clk = priv->sdhc_clk;
625         uint clk;
626
627         /*
628          * For ddr mode, usdhc need to enable DDR mode first, after select
629          * this DDR mode, usdhc will automatically divide the usdhc clock
630          */
631         if (mmc->ddr_mode) {
632                 writel(readl(&regs->mixctrl) | MIX_CTRL_DDREN, &regs->mixctrl);
633                 sdhc_clk >>= 1;
634         }
635
636         if (clock < mmc->cfg->f_min)
637                 clock = mmc->cfg->f_min;
638
639         if (sdhc_clk / 16 > clock) {
640                 for (; pre_div < 256; pre_div *= 2)
641                         if ((sdhc_clk / pre_div) <= (clock * 16))
642                                 break;
643         } else
644                 pre_div = 1;
645
646         for (div = 1; div <= 16; div++)
647                 if ((sdhc_clk / (div * pre_div)) <= clock)
648                         break;
649
650         pre_div >>= 1;
651         div -= 1;
652
653         clk = (pre_div << 8) | (div << 4);
654
655 #ifdef CONFIG_FSL_USDHC
656         esdhc_clrbits32(&regs->vendorspec, VENDORSPEC_CKEN);
657 #else
658         esdhc_clrbits32(&regs->sysctl, SYSCTL_CKEN);
659 #endif
660
661         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_CLOCK_MASK, clk);
662
663         udelay(10000);
664
665 #ifdef CONFIG_FSL_USDHC
666         esdhc_setbits32(&regs->vendorspec, VENDORSPEC_PEREN | VENDORSPEC_CKEN);
667 #else
668         esdhc_setbits32(&regs->sysctl, SYSCTL_PEREN | SYSCTL_CKEN);
669 #endif
670
671         priv->clock = clock;
672 }
673
674 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
675 static void esdhc_clock_control(struct fsl_esdhc_priv *priv, bool enable)
676 {
677         struct fsl_esdhc *regs = priv->esdhc_regs;
678         u32 value;
679         u32 time_out;
680
681         value = esdhc_read32(&regs->sysctl);
682
683         if (enable)
684                 value |= SYSCTL_CKEN;
685         else
686                 value &= ~SYSCTL_CKEN;
687
688         esdhc_write32(&regs->sysctl, value);
689
690         time_out = 20;
691         value = PRSSTAT_SDSTB;
692         while (!(esdhc_read32(&regs->prsstat) & value)) {
693                 if (time_out == 0) {
694                         printf("fsl_esdhc: Internal clock never stabilised.\n");
695                         break;
696                 }
697                 time_out--;
698                 mdelay(1);
699         }
700 }
701 #endif
702
703 #ifdef MMC_SUPPORTS_TUNING
704 static int esdhc_change_pinstate(struct udevice *dev)
705 {
706         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
707         int ret;
708
709         switch (priv->mode) {
710         case UHS_SDR50:
711         case UHS_DDR50:
712                 ret = pinctrl_select_state(dev, "state_100mhz");
713                 break;
714         case UHS_SDR104:
715         case MMC_HS_200:
716         case MMC_HS_400:
717                 ret = pinctrl_select_state(dev, "state_200mhz");
718                 break;
719         default:
720                 ret = pinctrl_select_state(dev, "default");
721                 break;
722         }
723
724         if (ret)
725                 printf("%s %d error\n", __func__, priv->mode);
726
727         return ret;
728 }
729
730 static void esdhc_reset_tuning(struct mmc *mmc)
731 {
732         struct fsl_esdhc_priv *priv = dev_get_priv(mmc->dev);
733         struct fsl_esdhc *regs = priv->esdhc_regs;
734
735         if (priv->flags & ESDHC_FLAG_USDHC) {
736                 if (priv->flags & ESDHC_FLAG_STD_TUNING) {
737                         esdhc_clrbits32(&regs->autoc12err,
738                                         MIX_CTRL_SMPCLK_SEL |
739                                         MIX_CTRL_EXE_TUNE);
740                 }
741         }
742 }
743
744 static void esdhc_set_strobe_dll(struct mmc *mmc)
745 {
746         struct fsl_esdhc_priv *priv = dev_get_priv(mmc->dev);
747         struct fsl_esdhc *regs = priv->esdhc_regs;
748         u32 val;
749
750         if (priv->clock > ESDHC_STROBE_DLL_CLK_FREQ) {
751                 writel(ESDHC_STROBE_DLL_CTRL_RESET, &regs->strobe_dllctrl);
752
753                 /*
754                  * enable strobe dll ctrl and adjust the delay target
755                  * for the uSDHC loopback read clock
756                  */
757                 val = ESDHC_STROBE_DLL_CTRL_ENABLE |
758                         (priv->strobe_dll_delay_target <<
759                          ESDHC_STROBE_DLL_CTRL_SLV_DLY_TARGET_SHIFT);
760                 writel(val, &regs->strobe_dllctrl);
761                 /* wait 1us to make sure strobe dll status register stable */
762                 mdelay(1);
763                 val = readl(&regs->strobe_dllstat);
764                 if (!(val & ESDHC_STROBE_DLL_STS_REF_LOCK))
765                         pr_warn("HS400 strobe DLL status REF not lock!\n");
766                 if (!(val & ESDHC_STROBE_DLL_STS_SLV_LOCK))
767                         pr_warn("HS400 strobe DLL status SLV not lock!\n");
768         }
769 }
770
771 static int esdhc_set_timing(struct mmc *mmc)
772 {
773         struct fsl_esdhc_priv *priv = dev_get_priv(mmc->dev);
774         struct fsl_esdhc *regs = priv->esdhc_regs;
775         u32 mixctrl;
776
777         mixctrl = readl(&regs->mixctrl);
778         mixctrl &= ~(MIX_CTRL_DDREN | MIX_CTRL_HS400_EN);
779
780         switch (mmc->selected_mode) {
781         case MMC_LEGACY:
782         case SD_LEGACY:
783                 esdhc_reset_tuning(mmc);
784                 writel(mixctrl, &regs->mixctrl);
785                 break;
786         case MMC_HS_400:
787                 mixctrl |= MIX_CTRL_DDREN | MIX_CTRL_HS400_EN;
788                 writel(mixctrl, &regs->mixctrl);
789                 esdhc_set_strobe_dll(mmc);
790                 break;
791         case MMC_HS:
792         case MMC_HS_52:
793         case MMC_HS_200:
794         case SD_HS:
795         case UHS_SDR12:
796         case UHS_SDR25:
797         case UHS_SDR50:
798         case UHS_SDR104:
799                 writel(mixctrl, &regs->mixctrl);
800                 break;
801         case UHS_DDR50:
802         case MMC_DDR_52:
803                 mixctrl |= MIX_CTRL_DDREN;
804                 writel(mixctrl, &regs->mixctrl);
805                 break;
806         default:
807                 printf("Not supported %d\n", mmc->selected_mode);
808                 return -EINVAL;
809         }
810
811         priv->mode = mmc->selected_mode;
812
813         return esdhc_change_pinstate(mmc->dev);
814 }
815
816 static int esdhc_set_voltage(struct mmc *mmc)
817 {
818         struct fsl_esdhc_priv *priv = dev_get_priv(mmc->dev);
819         struct fsl_esdhc *regs = priv->esdhc_regs;
820         int ret;
821
822         priv->signal_voltage = mmc->signal_voltage;
823         switch (mmc->signal_voltage) {
824         case MMC_SIGNAL_VOLTAGE_330:
825                 if (priv->vs18_enable)
826                         return -EIO;
827 #if CONFIG_IS_ENABLED(DM_REGULATOR)
828                 if (!IS_ERR_OR_NULL(priv->vqmmc_dev)) {
829                         ret = regulator_set_value(priv->vqmmc_dev, 3300000);
830                         if (ret) {
831                                 printf("Setting to 3.3V error");
832                                 return -EIO;
833                         }
834                         /* Wait for 5ms */
835                         mdelay(5);
836                 }
837 #endif
838
839                 esdhc_clrbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
840                 if (!(esdhc_read32(&regs->vendorspec) &
841                     ESDHC_VENDORSPEC_VSELECT))
842                         return 0;
843
844                 return -EAGAIN;
845         case MMC_SIGNAL_VOLTAGE_180:
846 #if CONFIG_IS_ENABLED(DM_REGULATOR)
847                 if (!IS_ERR_OR_NULL(priv->vqmmc_dev)) {
848                         ret = regulator_set_value(priv->vqmmc_dev, 1800000);
849                         if (ret) {
850                                 printf("Setting to 1.8V error");
851                                 return -EIO;
852                         }
853                 }
854 #endif
855                 esdhc_setbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
856                 if (esdhc_read32(&regs->vendorspec) & ESDHC_VENDORSPEC_VSELECT)
857                         return 0;
858
859                 return -EAGAIN;
860         case MMC_SIGNAL_VOLTAGE_120:
861                 return -ENOTSUPP;
862         default:
863                 return 0;
864         }
865 }
866
867 static void esdhc_stop_tuning(struct mmc *mmc)
868 {
869         struct mmc_cmd cmd;
870
871         cmd.cmdidx = MMC_CMD_STOP_TRANSMISSION;
872         cmd.cmdarg = 0;
873         cmd.resp_type = MMC_RSP_R1b;
874
875         dm_mmc_send_cmd(mmc->dev, &cmd, NULL);
876 }
877
878 static int fsl_esdhc_execute_tuning(struct udevice *dev, uint32_t opcode)
879 {
880         struct fsl_esdhc_plat *plat = dev_get_platdata(dev);
881         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
882         struct fsl_esdhc *regs = priv->esdhc_regs;
883         struct mmc *mmc = &plat->mmc;
884         u32 irqstaten = readl(&regs->irqstaten);
885         u32 irqsigen = readl(&regs->irqsigen);
886         int i, ret = -ETIMEDOUT;
887         u32 val, mixctrl;
888
889         /* clock tuning is not needed for upto 52MHz */
890         if (mmc->clock <= 52000000)
891                 return 0;
892
893         /* This is readw/writew SDHCI_HOST_CONTROL2 when tuning */
894         if (priv->flags & ESDHC_FLAG_STD_TUNING) {
895                 val = readl(&regs->autoc12err);
896                 mixctrl = readl(&regs->mixctrl);
897                 val &= ~MIX_CTRL_SMPCLK_SEL;
898                 mixctrl &= ~(MIX_CTRL_FBCLK_SEL | MIX_CTRL_AUTO_TUNE_EN);
899
900                 val |= MIX_CTRL_EXE_TUNE;
901                 mixctrl |= MIX_CTRL_FBCLK_SEL | MIX_CTRL_AUTO_TUNE_EN;
902
903                 writel(val, &regs->autoc12err);
904                 writel(mixctrl, &regs->mixctrl);
905         }
906
907         /* sdhci_writew(host, SDHCI_TRNS_READ, SDHCI_TRANSFER_MODE); */
908         mixctrl = readl(&regs->mixctrl);
909         mixctrl = MIX_CTRL_DTDSEL_READ | (mixctrl & ~MIX_CTRL_SDHCI_MASK);
910         writel(mixctrl, &regs->mixctrl);
911
912         writel(IRQSTATEN_BRR, &regs->irqstaten);
913         writel(IRQSTATEN_BRR, &regs->irqsigen);
914
915         /*
916          * Issue opcode repeatedly till Execute Tuning is set to 0 or the number
917          * of loops reaches 40 times.
918          */
919         for (i = 0; i < MAX_TUNING_LOOP; i++) {
920                 u32 ctrl;
921
922                 if (opcode == MMC_CMD_SEND_TUNING_BLOCK_HS200) {
923                         if (mmc->bus_width == 8)
924                                 writel(0x7080, &regs->blkattr);
925                         else if (mmc->bus_width == 4)
926                                 writel(0x7040, &regs->blkattr);
927                 } else {
928                         writel(0x7040, &regs->blkattr);
929                 }
930
931                 /* sdhci_writew(host, SDHCI_TRNS_READ, SDHCI_TRANSFER_MODE) */
932                 val = readl(&regs->mixctrl);
933                 val = MIX_CTRL_DTDSEL_READ | (val & ~MIX_CTRL_SDHCI_MASK);
934                 writel(val, &regs->mixctrl);
935
936                 /* We are using STD tuning, no need to check return value */
937                 mmc_send_tuning(mmc, opcode, NULL);
938
939                 ctrl = readl(&regs->autoc12err);
940                 if ((!(ctrl & MIX_CTRL_EXE_TUNE)) &&
941                     (ctrl & MIX_CTRL_SMPCLK_SEL)) {
942                         /*
943                          * need to wait some time, make sure sd/mmc fininsh
944                          * send out tuning data, otherwise, the sd/mmc can't
945                          * response to any command when the card still out
946                          * put the tuning data.
947                          */
948                         mdelay(1);
949                         ret = 0;
950                         break;
951                 }
952
953                 /* Add 1ms delay for SD and eMMC */
954                 mdelay(1);
955         }
956
957         writel(irqstaten, &regs->irqstaten);
958         writel(irqsigen, &regs->irqsigen);
959
960         esdhc_stop_tuning(mmc);
961
962         return ret;
963 }
964 #endif
965
966 static int esdhc_set_ios_common(struct fsl_esdhc_priv *priv, struct mmc *mmc)
967 {
968         struct fsl_esdhc *regs = priv->esdhc_regs;
969         int ret __maybe_unused;
970
971 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
972         /* Select to use peripheral clock */
973         esdhc_clock_control(priv, false);
974         esdhc_setbits32(&regs->scr, ESDHCCTL_PCS);
975         esdhc_clock_control(priv, true);
976 #endif
977         /* Set the clock speed */
978         if (priv->clock != mmc->clock)
979                 set_sysctl(priv, mmc, mmc->clock);
980
981 #ifdef MMC_SUPPORTS_TUNING
982         if (mmc->clk_disable) {
983 #ifdef CONFIG_FSL_USDHC
984                 esdhc_clrbits32(&regs->vendorspec, VENDORSPEC_CKEN);
985 #else
986                 esdhc_clrbits32(&regs->sysctl, SYSCTL_CKEN);
987 #endif
988         } else {
989 #ifdef CONFIG_FSL_USDHC
990                 esdhc_setbits32(&regs->vendorspec, VENDORSPEC_PEREN |
991                                 VENDORSPEC_CKEN);
992 #else
993                 esdhc_setbits32(&regs->sysctl, SYSCTL_PEREN | SYSCTL_CKEN);
994 #endif
995         }
996
997         if (priv->mode != mmc->selected_mode) {
998                 ret = esdhc_set_timing(mmc);
999                 if (ret) {
1000                         printf("esdhc_set_timing error %d\n", ret);
1001                         return ret;
1002                 }
1003         }
1004
1005         if (priv->signal_voltage != mmc->signal_voltage) {
1006                 ret = esdhc_set_voltage(mmc);
1007                 if (ret) {
1008                         printf("esdhc_set_voltage error %d\n", ret);
1009                         return ret;
1010                 }
1011         }
1012 #endif
1013
1014         /* Set the bus width */
1015         esdhc_clrbits32(&regs->proctl, PROCTL_DTW_4 | PROCTL_DTW_8);
1016
1017         if (mmc->bus_width == 4)
1018                 esdhc_setbits32(&regs->proctl, PROCTL_DTW_4);
1019         else if (mmc->bus_width == 8)
1020                 esdhc_setbits32(&regs->proctl, PROCTL_DTW_8);
1021
1022         return 0;
1023 }
1024
1025 static int esdhc_init_common(struct fsl_esdhc_priv *priv, struct mmc *mmc)
1026 {
1027         struct fsl_esdhc *regs = priv->esdhc_regs;
1028         ulong start;
1029
1030         /* Reset the entire host controller */
1031         esdhc_setbits32(&regs->sysctl, SYSCTL_RSTA);
1032
1033         /* Wait until the controller is available */
1034         start = get_timer(0);
1035         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTA)) {
1036                 if (get_timer(start) > 1000)
1037                         return -ETIMEDOUT;
1038         }
1039
1040 #if defined(CONFIG_FSL_USDHC)
1041         /* RSTA doesn't reset MMC_BOOT register, so manually reset it */
1042         esdhc_write32(&regs->mmcboot, 0x0);
1043         /* Reset MIX_CTRL and CLK_TUNE_CTRL_STATUS regs to 0 */
1044         esdhc_write32(&regs->mixctrl, 0x0);
1045         esdhc_write32(&regs->clktunectrlstatus, 0x0);
1046
1047         /* Put VEND_SPEC to default value */
1048         if (priv->vs18_enable)
1049                 esdhc_write32(&regs->vendorspec, (VENDORSPEC_INIT |
1050                               ESDHC_VENDORSPEC_VSELECT));
1051         else
1052                 esdhc_write32(&regs->vendorspec, VENDORSPEC_INIT);
1053
1054         /* Disable DLL_CTRL delay line */
1055         esdhc_write32(&regs->dllctrl, 0x0);
1056 #endif
1057
1058 #ifndef ARCH_MXC
1059         /* Enable cache snooping */
1060         esdhc_write32(&regs->scr, 0x00000040);
1061 #endif
1062
1063 #ifndef CONFIG_FSL_USDHC
1064         esdhc_setbits32(&regs->sysctl, SYSCTL_HCKEN | SYSCTL_IPGEN);
1065 #else
1066         esdhc_setbits32(&regs->vendorspec, VENDORSPEC_HCKEN | VENDORSPEC_IPGEN);
1067 #endif
1068
1069         /* Set the initial clock speed */
1070         mmc_set_clock(mmc, 400000, MMC_CLK_ENABLE);
1071
1072         /* Disable the BRR and BWR bits in IRQSTAT */
1073         esdhc_clrbits32(&regs->irqstaten, IRQSTATEN_BRR | IRQSTATEN_BWR);
1074
1075 #ifdef CONFIG_MCF5441x
1076         esdhc_write32(&regs->proctl, PROCTL_INIT | PROCTL_D3CD);
1077 #else
1078         /* Put the PROCTL reg back to the default */
1079         esdhc_write32(&regs->proctl, PROCTL_INIT);
1080 #endif
1081
1082         /* Set timout to the maximum value */
1083         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_TIMEOUT_MASK, 14 << 16);
1084
1085         return 0;
1086 }
1087
1088 static int esdhc_getcd_common(struct fsl_esdhc_priv *priv)
1089 {
1090         struct fsl_esdhc *regs = priv->esdhc_regs;
1091         int timeout = 1000;
1092
1093 #ifdef CONFIG_ESDHC_DETECT_QUIRK
1094         if (CONFIG_ESDHC_DETECT_QUIRK)
1095                 return 1;
1096 #endif
1097
1098 #if CONFIG_IS_ENABLED(DM_MMC)
1099         if (priv->non_removable)
1100                 return 1;
1101 #ifdef CONFIG_DM_GPIO
1102         if (dm_gpio_is_valid(&priv->cd_gpio))
1103                 return dm_gpio_get_value(&priv->cd_gpio);
1104 #endif
1105 #endif
1106
1107         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_CINS) && --timeout)
1108                 udelay(1000);
1109
1110         return timeout > 0;
1111 }
1112
1113 static int esdhc_reset(struct fsl_esdhc *regs)
1114 {
1115         ulong start;
1116
1117         /* reset the controller */
1118         esdhc_setbits32(&regs->sysctl, SYSCTL_RSTA);
1119
1120         /* hardware clears the bit when it is done */
1121         start = get_timer(0);
1122         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTA)) {
1123                 if (get_timer(start) > 100) {
1124                         printf("MMC/SD: Reset never completed.\n");
1125                         return -ETIMEDOUT;
1126                 }
1127         }
1128
1129         return 0;
1130 }
1131
1132 #if !CONFIG_IS_ENABLED(DM_MMC)
1133 static int esdhc_getcd(struct mmc *mmc)
1134 {
1135         struct fsl_esdhc_priv *priv = mmc->priv;
1136
1137         return esdhc_getcd_common(priv);
1138 }
1139
1140 static int esdhc_init(struct mmc *mmc)
1141 {
1142         struct fsl_esdhc_priv *priv = mmc->priv;
1143
1144         return esdhc_init_common(priv, mmc);
1145 }
1146
1147 static int esdhc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
1148                           struct mmc_data *data)
1149 {
1150         struct fsl_esdhc_priv *priv = mmc->priv;
1151
1152         return esdhc_send_cmd_common(priv, mmc, cmd, data);
1153 }
1154
1155 static int esdhc_set_ios(struct mmc *mmc)
1156 {
1157         struct fsl_esdhc_priv *priv = mmc->priv;
1158
1159         return esdhc_set_ios_common(priv, mmc);
1160 }
1161
1162 static const struct mmc_ops esdhc_ops = {
1163         .getcd          = esdhc_getcd,
1164         .init           = esdhc_init,
1165         .send_cmd       = esdhc_send_cmd,
1166         .set_ios        = esdhc_set_ios,
1167 };
1168 #endif
1169
1170 static int fsl_esdhc_init(struct fsl_esdhc_priv *priv,
1171                           struct fsl_esdhc_plat *plat)
1172 {
1173         struct mmc_config *cfg;
1174         struct fsl_esdhc *regs;
1175         u32 caps, voltage_caps;
1176         int ret;
1177
1178         if (!priv)
1179                 return -EINVAL;
1180
1181         regs = priv->esdhc_regs;
1182
1183         /* First reset the eSDHC controller */
1184         ret = esdhc_reset(regs);
1185         if (ret)
1186                 return ret;
1187
1188 #ifdef CONFIG_MCF5441x
1189         /* ColdFire, using SDHC_DATA[3] for card detection */
1190         esdhc_write32(&regs->proctl, PROCTL_INIT | PROCTL_D3CD);
1191 #endif
1192
1193 #ifndef CONFIG_FSL_USDHC
1194         esdhc_setbits32(&regs->sysctl, SYSCTL_PEREN | SYSCTL_HCKEN
1195                                 | SYSCTL_IPGEN | SYSCTL_CKEN);
1196         /* Clearing tuning bits in case ROM has set it already */
1197         esdhc_write32(&regs->mixctrl, 0);
1198         esdhc_write32(&regs->autoc12err, 0);
1199         esdhc_write32(&regs->clktunectrlstatus, 0);
1200 #else
1201         esdhc_setbits32(&regs->vendorspec, VENDORSPEC_PEREN |
1202                         VENDORSPEC_HCKEN | VENDORSPEC_IPGEN | VENDORSPEC_CKEN);
1203 #endif
1204
1205         if (priv->vs18_enable)
1206                 esdhc_setbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
1207
1208         writel(SDHCI_IRQ_EN_BITS, &regs->irqstaten);
1209         cfg = &plat->cfg;
1210 #ifndef CONFIG_DM_MMC
1211         memset(cfg, '\0', sizeof(*cfg));
1212 #endif
1213
1214         voltage_caps = 0;
1215         caps = esdhc_read32(&regs->hostcapblt);
1216
1217 #ifdef CONFIG_MCF5441x
1218         /*
1219          * MCF5441x RM declares in more points that sdhc clock speed must
1220          * never exceed 25 Mhz. From this, the HS bit needs to be disabled
1221          * from host capabilities.
1222          */
1223         caps &= ~ESDHC_HOSTCAPBLT_HSS;
1224 #endif
1225
1226 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC135
1227         caps = caps & ~(ESDHC_HOSTCAPBLT_SRS |
1228                         ESDHC_HOSTCAPBLT_VS18 | ESDHC_HOSTCAPBLT_VS30);
1229 #endif
1230
1231 /* T4240 host controller capabilities register should have VS33 bit */
1232 #ifdef CONFIG_SYS_FSL_MMC_HAS_CAPBLT_VS33
1233         caps = caps | ESDHC_HOSTCAPBLT_VS33;
1234 #endif
1235
1236         if (caps & ESDHC_HOSTCAPBLT_VS18)
1237                 voltage_caps |= MMC_VDD_165_195;
1238         if (caps & ESDHC_HOSTCAPBLT_VS30)
1239                 voltage_caps |= MMC_VDD_29_30 | MMC_VDD_30_31;
1240         if (caps & ESDHC_HOSTCAPBLT_VS33)
1241                 voltage_caps |= MMC_VDD_32_33 | MMC_VDD_33_34;
1242
1243         cfg->name = "FSL_SDHC";
1244 #if !CONFIG_IS_ENABLED(DM_MMC)
1245         cfg->ops = &esdhc_ops;
1246 #endif
1247 #ifdef CONFIG_SYS_SD_VOLTAGE
1248         cfg->voltages = CONFIG_SYS_SD_VOLTAGE;
1249 #else
1250         cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34;
1251 #endif
1252         if ((cfg->voltages & voltage_caps) == 0) {
1253                 printf("voltage not supported by controller\n");
1254                 return -1;
1255         }
1256
1257         if (priv->bus_width == 8)
1258                 cfg->host_caps = MMC_MODE_4BIT | MMC_MODE_8BIT;
1259         else if (priv->bus_width == 4)
1260                 cfg->host_caps = MMC_MODE_4BIT;
1261
1262         cfg->host_caps = MMC_MODE_4BIT | MMC_MODE_8BIT;
1263 #ifdef CONFIG_SYS_FSL_ESDHC_HAS_DDR_MODE
1264         cfg->host_caps |= MMC_MODE_DDR_52MHz;
1265 #endif
1266
1267         if (priv->bus_width > 0) {
1268                 if (priv->bus_width < 8)
1269                         cfg->host_caps &= ~MMC_MODE_8BIT;
1270                 if (priv->bus_width < 4)
1271                         cfg->host_caps &= ~MMC_MODE_4BIT;
1272         }
1273
1274         if (caps & ESDHC_HOSTCAPBLT_HSS)
1275                 cfg->host_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS;
1276
1277 #ifdef CONFIG_ESDHC_DETECT_8_BIT_QUIRK
1278         if (CONFIG_ESDHC_DETECT_8_BIT_QUIRK)
1279                 cfg->host_caps &= ~MMC_MODE_8BIT;
1280 #endif
1281
1282         cfg->host_caps |= priv->caps;
1283
1284         cfg->f_min = 400000;
1285         cfg->f_max = min(priv->sdhc_clk, (u32)200000000);
1286
1287         cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
1288
1289         writel(0, &regs->dllctrl);
1290         if (priv->flags & ESDHC_FLAG_USDHC) {
1291                 if (priv->flags & ESDHC_FLAG_STD_TUNING) {
1292                         u32 val = readl(&regs->tuning_ctrl);
1293
1294                         val |= ESDHC_STD_TUNING_EN;
1295                         val &= ~ESDHC_TUNING_START_TAP_MASK;
1296                         val |= priv->tuning_start_tap;
1297                         val &= ~ESDHC_TUNING_STEP_MASK;
1298                         val |= (priv->tuning_step) << ESDHC_TUNING_STEP_SHIFT;
1299                         writel(val, &regs->tuning_ctrl);
1300                 }
1301         }
1302
1303         return 0;
1304 }
1305
1306 #if !CONFIG_IS_ENABLED(DM_MMC)
1307 static int fsl_esdhc_cfg_to_priv(struct fsl_esdhc_cfg *cfg,
1308                                  struct fsl_esdhc_priv *priv)
1309 {
1310         if (!cfg || !priv)
1311                 return -EINVAL;
1312
1313         priv->esdhc_regs = (struct fsl_esdhc *)(unsigned long)(cfg->esdhc_base);
1314         priv->bus_width = cfg->max_bus_width;
1315         priv->sdhc_clk = cfg->sdhc_clk;
1316         priv->wp_enable  = cfg->wp_enable;
1317         priv->vs18_enable  = cfg->vs18_enable;
1318
1319         return 0;
1320 };
1321
1322 int fsl_esdhc_initialize(bd_t *bis, struct fsl_esdhc_cfg *cfg)
1323 {
1324         struct fsl_esdhc_plat *plat;
1325         struct fsl_esdhc_priv *priv;
1326         struct mmc *mmc;
1327         int ret;
1328
1329         if (!cfg)
1330                 return -EINVAL;
1331
1332         priv = calloc(sizeof(struct fsl_esdhc_priv), 1);
1333         if (!priv)
1334                 return -ENOMEM;
1335         plat = calloc(sizeof(struct fsl_esdhc_plat), 1);
1336         if (!plat) {
1337                 free(priv);
1338                 return -ENOMEM;
1339         }
1340
1341         ret = fsl_esdhc_cfg_to_priv(cfg, priv);
1342         if (ret) {
1343                 debug("%s xlate failure\n", __func__);
1344                 free(plat);
1345                 free(priv);
1346                 return ret;
1347         }
1348
1349         ret = fsl_esdhc_init(priv, plat);
1350         if (ret) {
1351                 debug("%s init failure\n", __func__);
1352                 free(plat);
1353                 free(priv);
1354                 return ret;
1355         }
1356
1357         mmc = mmc_create(&plat->cfg, priv);
1358         if (!mmc)
1359                 return -EIO;
1360
1361         priv->mmc = mmc;
1362
1363         return 0;
1364 }
1365
1366 int fsl_esdhc_mmc_init(bd_t *bis)
1367 {
1368         struct fsl_esdhc_cfg *cfg;
1369
1370         cfg = calloc(sizeof(struct fsl_esdhc_cfg), 1);
1371         cfg->esdhc_base = CONFIG_SYS_FSL_ESDHC_ADDR;
1372         cfg->sdhc_clk = gd->arch.sdhc_clk;
1373         return fsl_esdhc_initialize(bis, cfg);
1374 }
1375 #endif
1376
1377 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
1378 void mmc_adapter_card_type_ident(void)
1379 {
1380         u8 card_id;
1381         u8 value;
1382
1383         card_id = QIXIS_READ(present) & QIXIS_SDID_MASK;
1384         gd->arch.sdhc_adapter = card_id;
1385
1386         switch (card_id) {
1387         case QIXIS_ESDHC_ADAPTER_TYPE_EMMC45:
1388                 value = QIXIS_READ(brdcfg[5]);
1389                 value |= (QIXIS_DAT4 | QIXIS_DAT5_6_7);
1390                 QIXIS_WRITE(brdcfg[5], value);
1391                 break;
1392         case QIXIS_ESDHC_ADAPTER_TYPE_SDMMC_LEGACY:
1393                 value = QIXIS_READ(pwr_ctl[1]);
1394                 value |= QIXIS_EVDD_BY_SDHC_VS;
1395                 QIXIS_WRITE(pwr_ctl[1], value);
1396                 break;
1397         case QIXIS_ESDHC_ADAPTER_TYPE_EMMC44:
1398                 value = QIXIS_READ(brdcfg[5]);
1399                 value |= (QIXIS_SDCLKIN | QIXIS_SDCLKOUT);
1400                 QIXIS_WRITE(brdcfg[5], value);
1401                 break;
1402         case QIXIS_ESDHC_ADAPTER_TYPE_RSV:
1403                 break;
1404         case QIXIS_ESDHC_ADAPTER_TYPE_MMC:
1405                 break;
1406         case QIXIS_ESDHC_ADAPTER_TYPE_SD:
1407                 break;
1408         case QIXIS_ESDHC_NO_ADAPTER:
1409                 break;
1410         default:
1411                 break;
1412         }
1413 }
1414 #endif
1415
1416 #ifdef CONFIG_OF_LIBFDT
1417 __weak int esdhc_status_fixup(void *blob, const char *compat)
1418 {
1419 #ifdef CONFIG_FSL_ESDHC_PIN_MUX
1420         if (!hwconfig("esdhc")) {
1421                 do_fixup_by_compat(blob, compat, "status", "disabled",
1422                                 sizeof("disabled"), 1);
1423                 return 1;
1424         }
1425 #endif
1426         return 0;
1427 }
1428
1429 void fdt_fixup_esdhc(void *blob, bd_t *bd)
1430 {
1431         const char *compat = "fsl,esdhc";
1432
1433         if (esdhc_status_fixup(blob, compat))
1434                 return;
1435
1436 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
1437         do_fixup_by_compat_u32(blob, compat, "peripheral-frequency",
1438                                gd->arch.sdhc_clk, 1);
1439 #else
1440         do_fixup_by_compat_u32(blob, compat, "clock-frequency",
1441                                gd->arch.sdhc_clk, 1);
1442 #endif
1443 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
1444         do_fixup_by_compat_u32(blob, compat, "adapter-type",
1445                                (u32)(gd->arch.sdhc_adapter), 1);
1446 #endif
1447 }
1448 #endif
1449
1450 #if CONFIG_IS_ENABLED(DM_MMC)
1451 #include <asm/arch/clock.h>
1452 __weak void init_clk_usdhc(u32 index)
1453 {
1454 }
1455
1456 static int fsl_esdhc_probe(struct udevice *dev)
1457 {
1458         struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
1459         struct fsl_esdhc_plat *plat = dev_get_platdata(dev);
1460         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
1461         const void *fdt = gd->fdt_blob;
1462         int node = dev_of_offset(dev);
1463         struct esdhc_soc_data *data =
1464                 (struct esdhc_soc_data *)dev_get_driver_data(dev);
1465 #if CONFIG_IS_ENABLED(DM_REGULATOR)
1466         struct udevice *vqmmc_dev;
1467 #endif
1468         fdt_addr_t addr;
1469         unsigned int val;
1470         struct mmc *mmc;
1471         int ret;
1472
1473         addr = dev_read_addr(dev);
1474         if (addr == FDT_ADDR_T_NONE)
1475                 return -EINVAL;
1476
1477         priv->esdhc_regs = (struct fsl_esdhc *)addr;
1478         priv->dev = dev;
1479         priv->mode = -1;
1480         if (data) {
1481                 priv->flags = data->flags;
1482                 priv->caps = data->caps;
1483         }
1484
1485         val = dev_read_u32_default(dev, "bus-width", -1);
1486         if (val == 8)
1487                 priv->bus_width = 8;
1488         else if (val == 4)
1489                 priv->bus_width = 4;
1490         else
1491                 priv->bus_width = 1;
1492
1493         val = fdtdec_get_int(fdt, node, "fsl,tuning-step", 1);
1494         priv->tuning_step = val;
1495         val = fdtdec_get_int(fdt, node, "fsl,tuning-start-tap",
1496                              ESDHC_TUNING_START_TAP_DEFAULT);
1497         priv->tuning_start_tap = val;
1498         val = fdtdec_get_int(fdt, node, "fsl,strobe-dll-delay-target",
1499                              ESDHC_STROBE_DLL_CTRL_SLV_DLY_TARGET_DEFAULT);
1500         priv->strobe_dll_delay_target = val;
1501
1502         if (dev_read_bool(dev, "non-removable")) {
1503                 priv->non_removable = 1;
1504          } else {
1505                 priv->non_removable = 0;
1506 #ifdef CONFIG_DM_GPIO
1507                 gpio_request_by_name(dev, "cd-gpios", 0, &priv->cd_gpio,
1508                                      GPIOD_IS_IN);
1509 #endif
1510         }
1511
1512         if (dev_read_prop(dev, "fsl,wp-controller", NULL)) {
1513                 priv->wp_enable = 1;
1514         } else {
1515                 priv->wp_enable = 0;
1516 #ifdef CONFIG_DM_GPIO
1517                 gpio_request_by_name(dev, "wp-gpios", 0, &priv->wp_gpio,
1518                                    GPIOD_IS_IN);
1519 #endif
1520         }
1521
1522         priv->vs18_enable = 0;
1523
1524 #if CONFIG_IS_ENABLED(DM_REGULATOR)
1525         /*
1526          * If emmc I/O has a fixed voltage at 1.8V, this must be provided,
1527          * otherwise, emmc will work abnormally.
1528          */
1529         ret = device_get_supply_regulator(dev, "vqmmc-supply", &vqmmc_dev);
1530         if (ret) {
1531                 dev_dbg(dev, "no vqmmc-supply\n");
1532         } else {
1533                 ret = regulator_set_enable(vqmmc_dev, true);
1534                 if (ret) {
1535                         dev_err(dev, "fail to enable vqmmc-supply\n");
1536                         return ret;
1537                 }
1538
1539                 if (regulator_get_value(vqmmc_dev) == 1800000)
1540                         priv->vs18_enable = 1;
1541         }
1542 #endif
1543
1544         if (fdt_get_property(fdt, node, "no-1-8-v", NULL))
1545                 priv->caps &= ~(UHS_CAPS | MMC_MODE_HS200 | MMC_MODE_HS400);
1546
1547         /*
1548          * TODO:
1549          * Because lack of clk driver, if SDHC clk is not enabled,
1550          * need to enable it first before this driver is invoked.
1551          *
1552          * we use MXC_ESDHC_CLK to get clk freq.
1553          * If one would like to make this function work,
1554          * the aliases should be provided in dts as this:
1555          *
1556          *  aliases {
1557          *      mmc0 = &usdhc1;
1558          *      mmc1 = &usdhc2;
1559          *      mmc2 = &usdhc3;
1560          *      mmc3 = &usdhc4;
1561          *      };
1562          * Then if your board only supports mmc2 and mmc3, but we can
1563          * correctly get the seq as 2 and 3, then let mxc_get_clock
1564          * work as expected.
1565          */
1566
1567         init_clk_usdhc(dev->seq);
1568
1569         if (IS_ENABLED(CONFIG_CLK)) {
1570                 /* Assigned clock already set clock */
1571                 ret = clk_get_by_name(dev, "per", &priv->per_clk);
1572                 if (ret) {
1573                         printf("Failed to get per_clk\n");
1574                         return ret;
1575                 }
1576                 ret = clk_enable(&priv->per_clk);
1577                 if (ret) {
1578                         printf("Failed to enable per_clk\n");
1579                         return ret;
1580                 }
1581
1582                 priv->sdhc_clk = clk_get_rate(&priv->per_clk);
1583         } else {
1584                 priv->sdhc_clk = mxc_get_clock(MXC_ESDHC_CLK + dev->seq);
1585                 if (priv->sdhc_clk <= 0) {
1586                         dev_err(dev, "Unable to get clk for %s\n", dev->name);
1587                         return -EINVAL;
1588                 }
1589         }
1590
1591         ret = fsl_esdhc_init(priv, plat);
1592         if (ret) {
1593                 dev_err(dev, "fsl_esdhc_init failure\n");
1594                 return ret;
1595         }
1596
1597         mmc = &plat->mmc;
1598         mmc->cfg = &plat->cfg;
1599         mmc->dev = dev;
1600         upriv->mmc = mmc;
1601
1602         return esdhc_init_common(priv, mmc);
1603 }
1604
1605 #if CONFIG_IS_ENABLED(DM_MMC)
1606 static int fsl_esdhc_get_cd(struct udevice *dev)
1607 {
1608         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
1609
1610         return esdhc_getcd_common(priv);
1611 }
1612
1613 static int fsl_esdhc_send_cmd(struct udevice *dev, struct mmc_cmd *cmd,
1614                               struct mmc_data *data)
1615 {
1616         struct fsl_esdhc_plat *plat = dev_get_platdata(dev);
1617         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
1618
1619         return esdhc_send_cmd_common(priv, &plat->mmc, cmd, data);
1620 }
1621
1622 static int fsl_esdhc_set_ios(struct udevice *dev)
1623 {
1624         struct fsl_esdhc_plat *plat = dev_get_platdata(dev);
1625         struct fsl_esdhc_priv *priv = dev_get_priv(dev);
1626
1627         return esdhc_set_ios_common(priv, &plat->mmc);
1628 }
1629
1630 static const struct dm_mmc_ops fsl_esdhc_ops = {
1631         .get_cd         = fsl_esdhc_get_cd,
1632         .send_cmd       = fsl_esdhc_send_cmd,
1633         .set_ios        = fsl_esdhc_set_ios,
1634 #ifdef MMC_SUPPORTS_TUNING
1635         .execute_tuning = fsl_esdhc_execute_tuning,
1636 #endif
1637 };
1638 #endif
1639
1640 static struct esdhc_soc_data usdhc_imx7d_data = {
1641         .flags = ESDHC_FLAG_USDHC | ESDHC_FLAG_STD_TUNING
1642                         | ESDHC_FLAG_HAVE_CAP1 | ESDHC_FLAG_HS200
1643                         | ESDHC_FLAG_HS400,
1644         .caps = UHS_CAPS | MMC_MODE_HS200 | MMC_MODE_DDR_52MHz |
1645                 MMC_MODE_HS_52MHz | MMC_MODE_HS,
1646 };
1647
1648 static const struct udevice_id fsl_esdhc_ids[] = {
1649         { .compatible = "fsl,imx53-esdhc", },
1650         { .compatible = "fsl,imx6ul-usdhc", },
1651         { .compatible = "fsl,imx6sx-usdhc", },
1652         { .compatible = "fsl,imx6sl-usdhc", },
1653         { .compatible = "fsl,imx6q-usdhc", },
1654         { .compatible = "fsl,imx7d-usdhc", .data = (ulong)&usdhc_imx7d_data,},
1655         { .compatible = "fsl,imx7ulp-usdhc", },
1656         { .compatible = "fsl,esdhc", },
1657         { /* sentinel */ }
1658 };
1659
1660 #if CONFIG_IS_ENABLED(BLK)
1661 static int fsl_esdhc_bind(struct udevice *dev)
1662 {
1663         struct fsl_esdhc_plat *plat = dev_get_platdata(dev);
1664
1665         return mmc_bind(dev, &plat->mmc, &plat->cfg);
1666 }
1667 #endif
1668
1669 U_BOOT_DRIVER(fsl_esdhc) = {
1670         .name   = "fsl-esdhc-mmc",
1671         .id     = UCLASS_MMC,
1672         .of_match = fsl_esdhc_ids,
1673         .ops    = &fsl_esdhc_ops,
1674 #if CONFIG_IS_ENABLED(BLK)
1675         .bind   = fsl_esdhc_bind,
1676 #endif
1677         .probe  = fsl_esdhc_probe,
1678         .platdata_auto_alloc_size = sizeof(struct fsl_esdhc_plat),
1679         .priv_auto_alloc_size = sizeof(struct fsl_esdhc_priv),
1680 };
1681 #endif