drivers/mmc/fsl_esdhc.c

   1 /*
   2  * Copyright 2007, 2010-2011 Freescale Semiconductor, Inc
   3  * Andy Fleming
   4  *
   5  * Based vaguely on the pxa mmc code:
   6  * (C) Copyright 2003
   7  * Kyle Harris, Nexus Technologies, Inc. kharris@nexus-tech.net
   8  *
   9  * SPDX-License-Identifier:     GPL-2.0+
  10  */
  11
  12 #include <config.h>
  13 #include <common.h>
  14 #include <command.h>
  15 #include <hwconfig.h>
  16 #include <mmc.h>
  17 #include <part.h>
  18 #include <malloc.h>
  19 #include <mmc.h>
  20 #include <fsl_esdhc.h>
  21 #include <fdt_support.h>
  22 #include <asm/io.h>
  23
  24 DECLARE_GLOBAL_DATA_PTR;
  25
  26 #define SDHCI_IRQ_EN_BITS               (IRQSTATEN_CC | IRQSTATEN_TC | \
  27                                 IRQSTATEN_CINT | \
  28                                 IRQSTATEN_CTOE | IRQSTATEN_CCE | IRQSTATEN_CEBE | \
  29                                 IRQSTATEN_CIE | IRQSTATEN_DTOE | IRQSTATEN_DCE | \
  30                                 IRQSTATEN_DEBE | IRQSTATEN_BRR | IRQSTATEN_BWR | \
  31                                 IRQSTATEN_DINT)
  32
  33 struct fsl_esdhc {
  34         uint    dsaddr;         /* SDMA system address register */
  35         uint    blkattr;        /* Block attributes register */
  36         uint    cmdarg;         /* Command argument register */
  37         uint    xfertyp;        /* Transfer type register */
  38         uint    cmdrsp0;        /* Command response 0 register */
  39         uint    cmdrsp1;        /* Command response 1 register */
  40         uint    cmdrsp2;        /* Command response 2 register */
  41         uint    cmdrsp3;        /* Command response 3 register */
  42         uint    datport;        /* Buffer data port register */
  43         uint    prsstat;        /* Present state register */
  44         uint    proctl;         /* Protocol control register */
  45         uint    sysctl;         /* System Control Register */
  46         uint    irqstat;        /* Interrupt status register */
  47         uint    irqstaten;      /* Interrupt status enable register */
  48         uint    irqsigen;       /* Interrupt signal enable register */
  49         uint    autoc12err;     /* Auto CMD error status register */
  50         uint    hostcapblt;     /* Host controller capabilities register */
  51         uint    wml;            /* Watermark level register */
  52         uint    mixctrl;        /* For USDHC */
  53         char    reserved1[4];   /* reserved */
  54         uint    fevt;           /* Force event register */
  55         uint    admaes;         /* ADMA error status register */
  56         uint    adsaddr;        /* ADMA system address register */
  57         char    reserved2[100]; /* reserved */
  58         uint    vendorspec;     /* Vendor Specific register */
  59         char    reserved3[56];  /* reserved */
  60         uint    hostver;        /* Host controller version register */
  61         char    reserved4[4];   /* reserved */
  62         uint    dmaerraddr;     /* DMA error address register */
  63         char    reserved5[4];   /* reserved */
  64         uint    dmaerrattr;     /* DMA error attribute register */
  65         char    reserved6[4];   /* reserved */
  66         uint    hostcapblt2;    /* Host controller capabilities register 2 */
  67         char    reserved7[8];   /* reserved */
  68         uint    tcr;            /* Tuning control register */
  69         char    reserved8[28];  /* reserved */
  70         uint    sddirctl;       /* SD direction control register */
  71         char    reserved9[712]; /* reserved */
  72         uint    scr;            /* eSDHC control register */
  73 };
  74
  75 /* Return the XFERTYP flags for a given command and data packet */
  76 static uint esdhc_xfertyp(struct mmc_cmd *cmd, struct mmc_data *data)
  77 {
  78         uint xfertyp = 0;
  79
  80         if (data) {
  81                 xfertyp |= XFERTYP_DPSEL;
  82 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
  83                 xfertyp |= XFERTYP_DMAEN;
  84 #endif
  85                 if (data->blocks > 1) {
  86                         xfertyp |= XFERTYP_MSBSEL;
  87                         xfertyp |= XFERTYP_BCEN;
  88 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC111
  89                         xfertyp |= XFERTYP_AC12EN;
  90 #endif
  91                 }
  92
  93                 if (data->flags & MMC_DATA_READ)
  94                         xfertyp |= XFERTYP_DTDSEL;
  95         }
  96
  97         if (cmd->resp_type & MMC_RSP_CRC)
  98                 xfertyp |= XFERTYP_CCCEN;
  99         if (cmd->resp_type & MMC_RSP_OPCODE)
 100                 xfertyp |= XFERTYP_CICEN;
 101         if (cmd->resp_type & MMC_RSP_136)
 102                 xfertyp |= XFERTYP_RSPTYP_136;
 103         else if (cmd->resp_type & MMC_RSP_BUSY)
 104                 xfertyp |= XFERTYP_RSPTYP_48_BUSY;
 105         else if (cmd->resp_type & MMC_RSP_PRESENT)
 106                 xfertyp |= XFERTYP_RSPTYP_48;
 107
 108 #if defined(CONFIG_MX53) || defined(CONFIG_PPC_T4240) || \
 109         defined(CONFIG_LS102XA) || defined(CONFIG_FSL_LAYERSCAPE) || \
 110         defined(CONFIG_PPC_T4160)
 111         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
 112                 xfertyp |= XFERTYP_CMDTYP_ABORT;
 113 #endif
 114         return XFERTYP_CMD(cmd->cmdidx) | xfertyp;
 115 }
 116
 117 #ifdef CONFIG_SYS_FSL_ESDHC_USE_PIO
 118 /*
 119  * PIO Read/Write Mode reduce the performace as DMA is not used in this mode.
 120  */
 121 static void
 122 esdhc_pio_read_write(struct mmc *mmc, struct mmc_data *data)
 123 {
 124         struct fsl_esdhc_cfg *cfg = mmc->priv;
 125         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 126         uint blocks;
 127         char *buffer;
 128         uint databuf;
 129         uint size;
 130         uint irqstat;
 131         uint timeout;
 132
 133         if (data->flags & MMC_DATA_READ) {
 134                 blocks = data->blocks;
 135                 buffer = data->dest;
 136                 while (blocks) {
 137                         timeout = PIO_TIMEOUT;
 138                         size = data->blocksize;
 139                         irqstat = esdhc_read32(&regs->irqstat);
 140                         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_BREN)
 141                                 && --timeout);
 142                         if (timeout <= 0) {
 143                                 printf("\nData Read Failed in PIO Mode.");
 144                                 return;
 145                         }
 146                         while (size && (!(irqstat & IRQSTAT_TC))) {
 147                                 udelay(100); /* Wait before last byte transfer complete */
 148                                 irqstat = esdhc_read32(&regs->irqstat);
 149                                 databuf = in_le32(&regs->datport);
 150                                 *((uint *)buffer) = databuf;
 151                                 buffer += 4;
 152                                 size -= 4;
 153                         }
 154                         blocks--;
 155                 }
 156         } else {
 157                 blocks = data->blocks;
 158                 buffer = (char *)data->src;
 159                 while (blocks) {
 160                         timeout = PIO_TIMEOUT;
 161                         size = data->blocksize;
 162                         irqstat = esdhc_read32(&regs->irqstat);
 163                         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_BWEN)
 164                                 && --timeout);
 165                         if (timeout <= 0) {
 166                                 printf("\nData Write Failed in PIO Mode.");
 167                                 return;
 168                         }
 169                         while (size && (!(irqstat & IRQSTAT_TC))) {
 170                                 udelay(100); /* Wait before last byte transfer complete */
 171                                 databuf = *((uint *)buffer);
 172                                 buffer += 4;
 173                                 size -= 4;
 174                                 irqstat = esdhc_read32(&regs->irqstat);
 175                                 out_le32(&regs->datport, databuf);
 176                         }
 177                         blocks--;
 178                 }
 179         }
 180 }
 181 #endif
 182
 183 static int esdhc_setup_data(struct mmc *mmc, struct mmc_data *data)
 184 {
 185         int timeout;
 186         struct fsl_esdhc_cfg *cfg = mmc->priv;
 187         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 188 #ifdef CONFIG_FSL_LAYERSCAPE
 189         dma_addr_t addr;
 190 #endif
 191         uint wml_value;
 192
 193         wml_value = data->blocksize/4;
 194
 195         if (data->flags & MMC_DATA_READ) {
 196                 if (wml_value > WML_RD_WML_MAX)
 197                         wml_value = WML_RD_WML_MAX_VAL;
 198
 199                 esdhc_clrsetbits32(&regs->wml, WML_RD_WML_MASK, wml_value);
 200 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
 201 #ifdef CONFIG_FSL_LAYERSCAPE
 202                 addr = virt_to_phys((void *)(data->dest));
 203                 if (upper_32_bits(addr))
 204                         printf("Error found for upper 32 bits\n");
 205                 else
 206                         esdhc_write32(&regs->dsaddr, lower_32_bits(addr));
 207 #else
 208                 esdhc_write32(&regs->dsaddr, (u32)data->dest);
 209 #endif
 210 #endif
 211         } else {
 212 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
 213                 flush_dcache_range((ulong)data->src,
 214                                    (ulong)data->src+data->blocks
 215                                          *data->blocksize);
 216 #endif
 217                 if (wml_value > WML_WR_WML_MAX)
 218                         wml_value = WML_WR_WML_MAX_VAL;
 219                 if ((esdhc_read32(&regs->prsstat) & PRSSTAT_WPSPL) == 0) {
 220                         printf("\nThe SD card is locked. Can not write to a locked card.\n\n");
 221                         return TIMEOUT;
 222                 }
 223
 224                 esdhc_clrsetbits32(&regs->wml, WML_WR_WML_MASK,
 225                                         wml_value << 16);
 226 #ifndef CONFIG_SYS_FSL_ESDHC_USE_PIO
 227 #ifdef CONFIG_FSL_LAYERSCAPE
 228                 addr = virt_to_phys((void *)(data->src));
 229                 if (upper_32_bits(addr))
 230                         printf("Error found for upper 32 bits\n");
 231                 else
 232                         esdhc_write32(&regs->dsaddr, lower_32_bits(addr));
 233 #else
 234                 esdhc_write32(&regs->dsaddr, (u32)data->src);
 235 #endif
 236 #endif
 237         }
 238
 239         esdhc_write32(&regs->blkattr, data->blocks << 16 | data->blocksize);
 240
 241         /* Calculate the timeout period for data transactions */
 242         /*
 243          * 1)Timeout period = (2^(timeout+13)) SD Clock cycles
 244          * 2)Timeout period should be minimum 0.250sec as per SD Card spec
 245          *  So, Number of SD Clock cycles for 0.25sec should be minimum
 246          *              (SD Clock/sec * 0.25 sec) SD Clock cycles
 247          *              = (mmc->clock * 1/4) SD Clock cycles
 248          * As 1) >=  2)
 249          * => (2^(timeout+13)) >= mmc->clock * 1/4
 250          * Taking log2 both the sides
 251          * => timeout + 13 >= log2(mmc->clock/4)
 252          * Rounding up to next power of 2
 253          * => timeout + 13 = log2(mmc->clock/4) + 1
 254          * => timeout + 13 = fls(mmc->clock/4)
 255          *
 256          * However, the MMC spec "It is strongly recommended for hosts to
 257          * implement more than 500ms timeout value even if the card
 258          * indicates the 250ms maximum busy length."  Even the previous
 259          * value of 300ms is known to be insufficient for some cards.
 260          * So, we use
 261          * => timeout + 13 = fls(mmc->clock/2)
 262          */
 263         timeout = fls(mmc->clock/2);
 264         timeout -= 13;
 265
 266         if (timeout > 14)
 267                 timeout = 14;
 268
 269         if (timeout < 0)
 270                 timeout = 0;
 271
 272 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC_A001
 273         if ((timeout == 4) || (timeout == 8) || (timeout == 12))
 274                 timeout++;
 275 #endif
 276
 277 #ifdef ESDHCI_QUIRK_BROKEN_TIMEOUT_VALUE
 278         timeout = 0xE;
 279 #endif
 280         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_TIMEOUT_MASK, timeout << 16);
 281
 282         return 0;
 283 }
 284
 285 static void check_and_invalidate_dcache_range
 286         (struct mmc_cmd *cmd,
 287          struct mmc_data *data) {
 288 #ifdef CONFIG_FSL_LAYERSCAPE
 289         unsigned start = 0;
 290 #else
 291         unsigned start = (unsigned)data->dest ;
 292 #endif
 293         unsigned size = roundup(ARCH_DMA_MINALIGN,
 294                                 data->blocks*data->blocksize);
 295         unsigned end = start+size ;
 296 #ifdef CONFIG_FSL_LAYERSCAPE
 297         dma_addr_t addr;
 298
 299         addr = virt_to_phys((void *)(data->dest));
 300         if (upper_32_bits(addr))
 301                 printf("Error found for upper 32 bits\n");
 302         else
 303                 start = lower_32_bits(addr);
 304 #endif
 305         invalidate_dcache_range(start, end);
 306 }
 307
 308 /*
 309  * Sends a command out on the bus.  Takes the mmc pointer,
 310  * a command pointer, and an optional data pointer.
 311  */
 312 static int
 313 esdhc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data)
 314 {
 315         int     err = 0;
 316         uint    xfertyp;
 317         uint    irqstat;
 318         struct fsl_esdhc_cfg *cfg = mmc->priv;
 319         volatile struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 320
 321 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC111
 322         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
 323                 return 0;
 324 #endif
 325
 326         esdhc_write32(&regs->irqstat, -1);
 327
 328         sync();
 329
 330         /* Wait for the bus to be idle */
 331         while ((esdhc_read32(&regs->prsstat) & PRSSTAT_CICHB) ||
 332                         (esdhc_read32(&regs->prsstat) & PRSSTAT_CIDHB))
 333                 ;
 334
 335         while (esdhc_read32(&regs->prsstat) & PRSSTAT_DLA)
 336                 ;
 337
 338         /* Wait at least 8 SD clock cycles before the next command */
 339         /*
 340          * Note: This is way more than 8 cycles, but 1ms seems to
 341          * resolve timing issues with some cards
 342          */
 343         udelay(1000);
 344
 345         /* Set up for a data transfer if we have one */
 346         if (data) {
 347                 err = esdhc_setup_data(mmc, data);
 348                 if(err)
 349                         return err;
 350
 351                 if (data->flags & MMC_DATA_READ)
 352                         check_and_invalidate_dcache_range(cmd, data);
 353         }
 354
 355         /* Figure out the transfer arguments */
 356         xfertyp = esdhc_xfertyp(cmd, data);
 357
 358         /* Mask all irqs */
 359         esdhc_write32(&regs->irqsigen, 0);
 360
 361         /* Send the command */
 362         esdhc_write32(&regs->cmdarg, cmd->cmdarg);
 363 #if defined(CONFIG_FSL_USDHC)
 364         esdhc_write32(&regs->mixctrl,
 365         (esdhc_read32(&regs->mixctrl) & 0xFFFFFF80) | (xfertyp & 0x7F)
 366                         | (mmc->ddr_mode ? XFERTYP_DDREN : 0));
 367         esdhc_write32(&regs->xfertyp, xfertyp & 0xFFFF0000);
 368 #else
 369         esdhc_write32(&regs->xfertyp, xfertyp);
 370 #endif
 371
 372         /* Wait for the command to complete */
 373         while (!(esdhc_read32(&regs->irqstat) & (IRQSTAT_CC | IRQSTAT_CTOE)))
 374                 ;
 375
 376         irqstat = esdhc_read32(&regs->irqstat);
 377
 378         if (irqstat & CMD_ERR) {
 379                 err = COMM_ERR;
 380                 goto out;
 381         }
 382
 383         if (irqstat & IRQSTAT_CTOE) {
 384                 err = TIMEOUT;
 385                 goto out;
 386         }
 387
 388         /* Switch voltage to 1.8V if CMD11 succeeded */
 389         if (cmd->cmdidx == SD_CMD_SWITCH_UHS18V) {
 390                 esdhc_setbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
 391
 392                 printf("Run CMD11 1.8V switch\n");
 393                 /* Sleep for 5 ms - max time for card to switch to 1.8V */
 394                 udelay(5000);
 395         }
 396
 397         /* Workaround for ESDHC errata ENGcm03648 */
 398         if (!data && (cmd->resp_type & MMC_RSP_BUSY)) {
 399                 int timeout = 6000;
 400
 401                 /* Poll on DATA0 line for cmd with busy signal for 600 ms */
 402                 while (timeout > 0 && !(esdhc_read32(&regs->prsstat) &
 403                                         PRSSTAT_DAT0)) {
 404                         udelay(100);
 405                         timeout--;
 406                 }
 407
 408                 if (timeout <= 0) {
 409                         printf("Timeout waiting for DAT0 to go high!\n");
 410                         err = TIMEOUT;
 411                         goto out;
 412                 }
 413         }
 414
 415         /* Copy the response to the response buffer */
 416         if (cmd->resp_type & MMC_RSP_136) {
 417                 u32 cmdrsp3, cmdrsp2, cmdrsp1, cmdrsp0;
 418
 419                 cmdrsp3 = esdhc_read32(&regs->cmdrsp3);
 420                 cmdrsp2 = esdhc_read32(&regs->cmdrsp2);
 421                 cmdrsp1 = esdhc_read32(&regs->cmdrsp1);
 422                 cmdrsp0 = esdhc_read32(&regs->cmdrsp0);
 423                 cmd->response[0] = (cmdrsp3 << 8) | (cmdrsp2 >> 24);
 424                 cmd->response[1] = (cmdrsp2 << 8) | (cmdrsp1 >> 24);
 425                 cmd->response[2] = (cmdrsp1 << 8) | (cmdrsp0 >> 24);
 426                 cmd->response[3] = (cmdrsp0 << 8);
 427         } else
 428                 cmd->response[0] = esdhc_read32(&regs->cmdrsp0);
 429
 430         /* Wait until all of the blocks are transferred */
 431         if (data) {
 432 #ifdef CONFIG_SYS_FSL_ESDHC_USE_PIO
 433                 esdhc_pio_read_write(mmc, data);
 434 #else
 435                 do {
 436                         irqstat = esdhc_read32(&regs->irqstat);
 437
 438                         if (irqstat & IRQSTAT_DTOE) {
 439                                 err = TIMEOUT;
 440                                 goto out;
 441                         }
 442
 443                         if (irqstat & DATA_ERR) {
 444                                 err = COMM_ERR;
 445                                 goto out;
 446                         }
 447                 } while ((irqstat & DATA_COMPLETE) != DATA_COMPLETE);
 448
 449                 /*
 450                  * Need invalidate the dcache here again to avoid any
 451                  * cache-fill during the DMA operations such as the
 452                  * speculative pre-fetching etc.
 453                  */
 454                 if (data->flags & MMC_DATA_READ)
 455                         check_and_invalidate_dcache_range(cmd, data);
 456 #endif
 457         }
 458
 459 out:
 460         /* Reset CMD and DATA portions on error */
 461         if (err) {
 462                 esdhc_write32(&regs->sysctl, esdhc_read32(&regs->sysctl) |
 463                               SYSCTL_RSTC);
 464                 while (esdhc_read32(&regs->sysctl) & SYSCTL_RSTC)
 465                         ;
 466
 467                 if (data) {
 468                         esdhc_write32(&regs->sysctl,
 469                                       esdhc_read32(&regs->sysctl) |
 470                                       SYSCTL_RSTD);
 471                         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTD))
 472                                 ;
 473                 }
 474
 475                 /* If this was CMD11, then notify that power cycle is needed */
 476                 if (cmd->cmdidx == SD_CMD_SWITCH_UHS18V)
 477                         printf("CMD11 to switch to 1.8V mode failed, card requires power cycle.\n");
 478         }
 479
 480         esdhc_write32(&regs->irqstat, -1);
 481
 482         return err;
 483 }
 484
 485 static void set_sysctl(struct mmc *mmc, uint clock)
 486 {
 487         int div, pre_div;
 488         struct fsl_esdhc_cfg *cfg = mmc->priv;
 489         volatile struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 490         int sdhc_clk = cfg->sdhc_clk;
 491         uint clk;
 492
 493         if (clock < mmc->cfg->f_min)
 494                 clock = mmc->cfg->f_min;
 495
 496         if (sdhc_clk / 16 > clock) {
 497                 for (pre_div = 2; pre_div < 256; pre_div *= 2)
 498                         if ((sdhc_clk / pre_div) <= (clock * 16))
 499                                 break;
 500         } else
 501                 pre_div = 2;
 502
 503         for (div = 1; div <= 16; div++)
 504                 if ((sdhc_clk / (div * pre_div)) <= clock)
 505                         break;
 506
 507         pre_div >>= mmc->ddr_mode ? 2 : 1;
 508         div -= 1;
 509
 510         clk = (pre_div << 8) | (div << 4);
 511
 512 #ifdef CONFIG_FSL_USDHC
 513         esdhc_setbits32(&regs->sysctl, SYSCTL_RSTA);
 514 #else
 515         esdhc_clrbits32(&regs->sysctl, SYSCTL_CKEN);
 516 #endif
 517
 518         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_CLOCK_MASK, clk);
 519
 520         udelay(10000);
 521
 522 #ifdef CONFIG_FSL_USDHC
 523         esdhc_clrbits32(&regs->sysctl, SYSCTL_RSTA);
 524 #else
 525         esdhc_setbits32(&regs->sysctl, SYSCTL_PEREN | SYSCTL_CKEN);
 526 #endif
 527
 528 }
 529
 530 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
 531 static void esdhc_clock_control(struct mmc *mmc, bool enable)
 532 {
 533         struct fsl_esdhc_cfg *cfg = mmc->priv;
 534         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 535         u32 value;
 536         u32 time_out;
 537
 538         value = esdhc_read32(&regs->sysctl);
 539
 540         if (enable)
 541                 value |= SYSCTL_CKEN;
 542         else
 543                 value &= ~SYSCTL_CKEN;
 544
 545         esdhc_write32(&regs->sysctl, value);
 546
 547         time_out = 20;
 548         value = PRSSTAT_SDSTB;
 549         while (!(esdhc_read32(&regs->prsstat) & value)) {
 550                 if (time_out == 0) {
 551                         printf("fsl_esdhc: Internal clock never stabilised.\n");
 552                         break;
 553                 }
 554                 time_out--;
 555                 mdelay(1);
 556         }
 557 }
 558 #endif
 559
 560 static void esdhc_set_ios(struct mmc *mmc)
 561 {
 562         struct fsl_esdhc_cfg *cfg = mmc->priv;
 563         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 564
 565 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
 566         /* Select to use peripheral clock */
 567         esdhc_clock_control(mmc, false);
 568         esdhc_setbits32(&regs->scr, ESDHCCTL_PCS);
 569         esdhc_clock_control(mmc, true);
 570 #endif
 571         /* Set the clock speed */
 572         set_sysctl(mmc, mmc->clock);
 573
 574         /* Set the bus width */
 575         esdhc_clrbits32(&regs->proctl, PROCTL_DTW_4 | PROCTL_DTW_8);
 576
 577         if (mmc->bus_width == 4)
 578                 esdhc_setbits32(&regs->proctl, PROCTL_DTW_4);
 579         else if (mmc->bus_width == 8)
 580                 esdhc_setbits32(&regs->proctl, PROCTL_DTW_8);
 581
 582 }
 583
 584 static int esdhc_init(struct mmc *mmc)
 585 {
 586         struct fsl_esdhc_cfg *cfg = mmc->priv;
 587         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 588         int timeout = 1000;
 589
 590         /* Reset the entire host controller */
 591         esdhc_setbits32(&regs->sysctl, SYSCTL_RSTA);
 592
 593         /* Wait until the controller is available */
 594         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTA) && --timeout)
 595                 udelay(1000);
 596
 597 #ifndef ARCH_MXC
 598         /* Enable cache snooping */
 599         esdhc_write32(&regs->scr, 0x00000040);
 600 #endif
 601
 602 #ifndef CONFIG_FSL_USDHC
 603         esdhc_setbits32(&regs->sysctl, SYSCTL_HCKEN | SYSCTL_IPGEN);
 604 #endif
 605
 606         /* Set the initial clock speed */
 607         mmc_set_clock(mmc, 400000);
 608
 609         /* Disable the BRR and BWR bits in IRQSTAT */
 610         esdhc_clrbits32(&regs->irqstaten, IRQSTATEN_BRR | IRQSTATEN_BWR);
 611
 612         /* Put the PROCTL reg back to the default */
 613         esdhc_write32(&regs->proctl, PROCTL_INIT);
 614
 615         /* Set timout to the maximum value */
 616         esdhc_clrsetbits32(&regs->sysctl, SYSCTL_TIMEOUT_MASK, 14 << 16);
 617
 618 #ifdef CONFIG_SYS_FSL_ESDHC_FORCE_VSELECT
 619         esdhc_setbits32(&regs->vendorspec, ESDHC_VENDORSPEC_VSELECT);
 620 #endif
 621
 622         return 0;
 623 }
 624
 625 static int esdhc_getcd(struct mmc *mmc)
 626 {
 627         struct fsl_esdhc_cfg *cfg = mmc->priv;
 628         struct fsl_esdhc *regs = (struct fsl_esdhc *)cfg->esdhc_base;
 629         int timeout = 1000;
 630
 631 #ifdef CONFIG_ESDHC_DETECT_QUIRK
 632         if (CONFIG_ESDHC_DETECT_QUIRK)
 633                 return 1;
 634 #endif
 635         while (!(esdhc_read32(&regs->prsstat) & PRSSTAT_CINS) && --timeout)
 636                 udelay(1000);
 637
 638         return timeout > 0;
 639 }
 640
 641 static void esdhc_reset(struct fsl_esdhc *regs)
 642 {
 643         unsigned long timeout = 100; /* wait max 100 ms */
 644
 645         /* reset the controller */
 646         esdhc_setbits32(&regs->sysctl, SYSCTL_RSTA);
 647
 648         /* hardware clears the bit when it is done */
 649         while ((esdhc_read32(&regs->sysctl) & SYSCTL_RSTA) && --timeout)
 650                 udelay(1000);
 651         if (!timeout)
 652                 printf("MMC/SD: Reset never completed.\n");
 653 }
 654
 655 static const struct mmc_ops esdhc_ops = {
 656         .send_cmd       = esdhc_send_cmd,
 657         .set_ios        = esdhc_set_ios,
 658         .init           = esdhc_init,
 659         .getcd          = esdhc_getcd,
 660 };
 661
 662 int fsl_esdhc_initialize(bd_t *bis, struct fsl_esdhc_cfg *cfg)
 663 {
 664         struct fsl_esdhc *regs;
 665         struct mmc *mmc;
 666         u32 caps, voltage_caps;
 667
 668         if (!cfg)
 669                 return -1;
 670
 671         regs = (struct fsl_esdhc *)cfg->esdhc_base;
 672
 673         /* First reset the eSDHC controller */
 674         esdhc_reset(regs);
 675
 676 #ifndef CONFIG_FSL_USDHC
 677         esdhc_setbits32(&regs->sysctl, SYSCTL_PEREN | SYSCTL_HCKEN
 678                                 | SYSCTL_IPGEN | SYSCTL_CKEN);
 679 #endif
 680
 681         writel(SDHCI_IRQ_EN_BITS, &regs->irqstaten);
 682         memset(&cfg->cfg, 0, sizeof(cfg->cfg));
 683
 684         voltage_caps = 0;
 685         caps = esdhc_read32(&regs->hostcapblt);
 686
 687 #ifdef CONFIG_SYS_FSL_ERRATUM_ESDHC135
 688         caps = caps & ~(ESDHC_HOSTCAPBLT_SRS |
 689                         ESDHC_HOSTCAPBLT_VS18 | ESDHC_HOSTCAPBLT_VS30);
 690 #endif
 691
 692 /* T4240 host controller capabilities register should have VS33 bit */
 693 #ifdef CONFIG_SYS_FSL_MMC_HAS_CAPBLT_VS33
 694         caps = caps | ESDHC_HOSTCAPBLT_VS33;
 695 #endif
 696
 697         if (caps & ESDHC_HOSTCAPBLT_VS18)
 698                 voltage_caps |= MMC_VDD_165_195;
 699         if (caps & ESDHC_HOSTCAPBLT_VS30)
 700                 voltage_caps |= MMC_VDD_29_30 | MMC_VDD_30_31;
 701         if (caps & ESDHC_HOSTCAPBLT_VS33)
 702                 voltage_caps |= MMC_VDD_32_33 | MMC_VDD_33_34;
 703
 704         cfg->cfg.name = "FSL_SDHC";
 705         cfg->cfg.ops = &esdhc_ops;
 706 #ifdef CONFIG_SYS_SD_VOLTAGE
 707         cfg->cfg.voltages = CONFIG_SYS_SD_VOLTAGE;
 708 #else
 709         cfg->cfg.voltages = MMC_VDD_32_33 | MMC_VDD_33_34;
 710 #endif
 711         if ((cfg->cfg.voltages & voltage_caps) == 0) {
 712                 printf("voltage not supported by controller\n");
 713                 return -1;
 714         }
 715
 716         cfg->cfg.host_caps = MMC_MODE_4BIT | MMC_MODE_8BIT;
 717 #ifdef CONFIG_SYS_FSL_ESDHC_HAS_DDR_MODE
 718         cfg->cfg.host_caps |= MMC_MODE_DDR_52MHz;
 719 #endif
 720
 721         if (cfg->max_bus_width > 0) {
 722                 if (cfg->max_bus_width < 8)
 723                         cfg->cfg.host_caps &= ~MMC_MODE_8BIT;
 724                 if (cfg->max_bus_width < 4)
 725                         cfg->cfg.host_caps &= ~MMC_MODE_4BIT;
 726         }
 727
 728         if (caps & ESDHC_HOSTCAPBLT_HSS)
 729                 cfg->cfg.host_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS;
 730
 731 #ifdef CONFIG_ESDHC_DETECT_8_BIT_QUIRK
 732         if (CONFIG_ESDHC_DETECT_8_BIT_QUIRK)
 733                 cfg->cfg.host_caps &= ~MMC_MODE_8BIT;
 734 #endif
 735
 736         cfg->cfg.f_min = 400000;
 737         cfg->cfg.f_max = min(cfg->sdhc_clk, (u32)52000000);
 738
 739         cfg->cfg.b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
 740
 741         mmc = mmc_create(&cfg->cfg, cfg);
 742         if (mmc == NULL)
 743                 return -1;
 744
 745         return 0;
 746 }
 747
 748 int fsl_esdhc_mmc_init(bd_t *bis)
 749 {
 750         struct fsl_esdhc_cfg *cfg;
 751
 752         cfg = calloc(sizeof(struct fsl_esdhc_cfg), 1);
 753         cfg->esdhc_base = CONFIG_SYS_FSL_ESDHC_ADDR;
 754         cfg->sdhc_clk = gd->arch.sdhc_clk;
 755         return fsl_esdhc_initialize(bis, cfg);
 756 }
 757
 758 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
 759 void mmc_adapter_card_type_ident(void)
 760 {
 761         u8 card_id;
 762         u8 value;
 763
 764         card_id = QIXIS_READ(present) & QIXIS_SDID_MASK;
 765         gd->arch.sdhc_adapter = card_id;
 766
 767         switch (card_id) {
 768         case QIXIS_ESDHC_ADAPTER_TYPE_EMMC45:
 769                 value = QIXIS_READ(brdcfg[5]);
 770                 value |= (QIXIS_DAT4 | QIXIS_DAT5_6_7);
 771                 QIXIS_WRITE(brdcfg[5], value);
 772                 break;
 773         case QIXIS_ESDHC_ADAPTER_TYPE_SDMMC_LEGACY:
 774                 value = QIXIS_READ(pwr_ctl[1]);
 775                 value |= QIXIS_EVDD_BY_SDHC_VS;
 776                 QIXIS_WRITE(pwr_ctl[1], value);
 777                 break;
 778         case QIXIS_ESDHC_ADAPTER_TYPE_EMMC44:
 779                 value = QIXIS_READ(brdcfg[5]);
 780                 value |= (QIXIS_SDCLKIN | QIXIS_SDCLKOUT);
 781                 QIXIS_WRITE(brdcfg[5], value);
 782                 break;
 783         case QIXIS_ESDHC_ADAPTER_TYPE_RSV:
 784                 break;
 785         case QIXIS_ESDHC_ADAPTER_TYPE_MMC:
 786                 break;
 787         case QIXIS_ESDHC_ADAPTER_TYPE_SD:
 788                 break;
 789         case QIXIS_ESDHC_NO_ADAPTER:
 790                 break;
 791         default:
 792                 break;
 793         }
 794 }
 795 #endif
 796
 797 #ifdef CONFIG_OF_LIBFDT
 798 void fdt_fixup_esdhc(void *blob, bd_t *bd)
 799 {
 800         const char *compat = "fsl,esdhc";
 801
 802 #ifdef CONFIG_FSL_ESDHC_PIN_MUX
 803         if (!hwconfig("esdhc")) {
 804                 do_fixup_by_compat(blob, compat, "status", "disabled",
 805                                 8 + 1, 1);
 806                 return;
 807         }
 808 #endif
 809
 810 #ifdef CONFIG_FSL_ESDHC_USE_PERIPHERAL_CLK
 811         do_fixup_by_compat_u32(blob, compat, "peripheral-frequency",
 812                                gd->arch.sdhc_clk, 1);
 813 #else
 814         do_fixup_by_compat_u32(blob, compat, "clock-frequency",
 815                                gd->arch.sdhc_clk, 1);
 816 #endif
 817 #ifdef CONFIG_FSL_ESDHC_ADAPTER_IDENT
 818         do_fixup_by_compat_u32(blob, compat, "adapter-type",
 819                                (u32)(gd->arch.sdhc_adapter), 1);
 820 #endif
 821         do_fixup_by_compat(blob, compat, "status", "okay",
 822                            4 + 1, 1);
 823 }
 824 #endif