git.sur5r.net Git - u-boot/blob - drivers/mmc/omap_hsmmc.c

   1 /*
   2  * (C) Copyright 2008
   3  * Texas Instruments, <www.ti.com>
   4  * Sukumar Ghorai <s-ghorai@ti.com>
   5  *
   6  * See file CREDITS for list of people who contributed to this
   7  * project.
   8  *
   9  * This program is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU General Public License as
  11  * published by the Free Software Foundation's version 2 of
  12  * the License.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  22  * MA 02111-1307 USA
  23  */
  24
  25 #include <config.h>
  26 #include <common.h>
  27 #include <malloc.h>
  28 #include <memalign.h>
  29 #include <mmc.h>
  30 #include <part.h>
  31 #include <i2c.h>
  32 #if defined(CONFIG_OMAP54XX) || defined(CONFIG_OMAP44XX)
  33 #include <palmas.h>
  34 #endif
  35 #include <asm/io.h>
  36 #include <asm/arch/mmc_host_def.h>
  37 #if !defined(CONFIG_SOC_KEYSTONE)
  38 #include <asm/gpio.h>
  39 #include <asm/arch/sys_proto.h>
  40 #endif
  41 #ifdef CONFIG_MMC_OMAP36XX_PINS
  42 #include <asm/arch/mux.h>
  43 #endif
  44 #include <dm.h>
  45
  46 DECLARE_GLOBAL_DATA_PTR;
  47
  48 /* simplify defines to OMAP_HSMMC_USE_GPIO */
  49 #if (defined(CONFIG_OMAP_GPIO) && !defined(CONFIG_SPL_BUILD)) || \
  50         (defined(CONFIG_SPL_BUILD) && defined(CONFIG_SPL_GPIO_SUPPORT))
  51 #define OMAP_HSMMC_USE_GPIO
  52 #else
  53 #undef OMAP_HSMMC_USE_GPIO
  54 #endif
  55
  56 /* common definitions for all OMAPs */
  57 #define SYSCTL_SRC      (1 << 25)
  58 #define SYSCTL_SRD      (1 << 26)
  59
  60 struct omap_hsmmc_data {
  61         struct hsmmc *base_addr;
  62 #if !CONFIG_IS_ENABLED(DM_MMC)
  63         struct mmc_config cfg;
  64 #endif
  65 #ifdef OMAP_HSMMC_USE_GPIO
  66 #if CONFIG_IS_ENABLED(DM_MMC)
  67         struct gpio_desc cd_gpio;       /* Change Detect GPIO */
  68         struct gpio_desc wp_gpio;       /* Write Protect GPIO */
  69         bool cd_inverted;
  70 #else
  71         int cd_gpio;
  72         int wp_gpio;
  73 #endif
  74 #endif
  75         u8 controller_flags;
  76 #ifndef CONFIG_OMAP34XX
  77         struct omap_hsmmc_adma_desc *adma_desc_table;
  78         uint desc_slot;
  79 #endif
  80 };
  81
  82 #ifndef CONFIG_OMAP34XX
  83 struct omap_hsmmc_adma_desc {
  84         u8 attr;
  85         u8 reserved;
  86         u16 len;
  87         u32 addr;
  88 };
  89
  90 #define ADMA_MAX_LEN    63488
  91
  92 /* Decriptor table defines */
  93 #define ADMA_DESC_ATTR_VALID            BIT(0)
  94 #define ADMA_DESC_ATTR_END              BIT(1)
  95 #define ADMA_DESC_ATTR_INT              BIT(2)
  96 #define ADMA_DESC_ATTR_ACT1             BIT(4)
  97 #define ADMA_DESC_ATTR_ACT2             BIT(5)
  98
  99 #define ADMA_DESC_TRANSFER_DATA         ADMA_DESC_ATTR_ACT2
 100 #define ADMA_DESC_LINK_DESC     (ADMA_DESC_ATTR_ACT1 | ADMA_DESC_ATTR_ACT2)
 101 #endif
 102
 103 /* If we fail after 1 second wait, something is really bad */
 104 #define MAX_RETRY_MS    1000
 105
 106 /* DMA transfers can take a long time if a lot a data is transferred.
 107  * The timeout must take in account the amount of data. Let's assume
 108  * that the time will never exceed 333 ms per MB (in other word we assume
 109  * that the bandwidth is always above 3MB/s).
 110  */
 111 #define DMA_TIMEOUT_PER_MB      333
 112 #define OMAP_HSMMC_USE_ADMA                     BIT(2)
 113
 114 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size);
 115 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
 116                         unsigned int siz);
 117
 118 static inline struct omap_hsmmc_data *omap_hsmmc_get_data(struct mmc *mmc)
 119 {
 120 #if CONFIG_IS_ENABLED(DM_MMC)
 121         return dev_get_priv(mmc->dev);
 122 #else
 123         return (struct omap_hsmmc_data *)mmc->priv;
 124 #endif
 125 }
 126 static inline struct mmc_config *omap_hsmmc_get_cfg(struct mmc *mmc)
 127 {
 128 #if CONFIG_IS_ENABLED(DM_MMC)
 129         struct omap_hsmmc_plat *plat = dev_get_platdata(mmc->dev);
 130         return &plat->cfg;
 131 #else
 132         return &((struct omap_hsmmc_data *)mmc->priv)->cfg;
 133 #endif
 134 }
 135
 136 #if defined(OMAP_HSMMC_USE_GPIO) && !CONFIG_IS_ENABLED(DM_MMC)
 137 static int omap_mmc_setup_gpio_in(int gpio, const char *label)
 138 {
 139         int ret;
 140
 141 #ifndef CONFIG_DM_GPIO
 142         if (!gpio_is_valid(gpio))
 143                 return -1;
 144 #endif
 145         ret = gpio_request(gpio, label);
 146         if (ret)
 147                 return ret;
 148
 149         ret = gpio_direction_input(gpio);
 150         if (ret)
 151                 return ret;
 152
 153         return gpio;
 154 }
 155 #endif
 156
 157 static unsigned char mmc_board_init(struct mmc *mmc)
 158 {
 159 #if defined(CONFIG_OMAP34XX)
 160         struct mmc_config *cfg = omap_hsmmc_get_cfg(mmc);
 161         t2_t *t2_base = (t2_t *)T2_BASE;
 162         struct prcm *prcm_base = (struct prcm *)PRCM_BASE;
 163         u32 pbias_lite;
 164 #ifdef CONFIG_MMC_OMAP36XX_PINS
 165         u32 wkup_ctrl = readl(OMAP34XX_CTRL_WKUP_CTRL);
 166 #endif
 167
 168         pbias_lite = readl(&t2_base->pbias_lite);
 169         pbias_lite &= ~(PBIASLITEPWRDNZ1 | PBIASLITEPWRDNZ0);
 170 #ifdef CONFIG_TARGET_OMAP3_CAIRO
 171         /* for cairo board, we need to set up 1.8 Volt bias level on MMC1 */
 172         pbias_lite &= ~PBIASLITEVMODE0;
 173 #endif
 174 #ifdef CONFIG_MMC_OMAP36XX_PINS
 175         if (get_cpu_family() == CPU_OMAP36XX) {
 176                 /* Disable extended drain IO before changing PBIAS */
 177                 wkup_ctrl &= ~OMAP34XX_CTRL_WKUP_CTRL_GPIO_IO_PWRDNZ;
 178                 writel(wkup_ctrl, OMAP34XX_CTRL_WKUP_CTRL);
 179         }
 180 #endif
 181         writel(pbias_lite, &t2_base->pbias_lite);
 182
 183         writel(pbias_lite | PBIASLITEPWRDNZ1 |
 184                 PBIASSPEEDCTRL0 | PBIASLITEPWRDNZ0,
 185                 &t2_base->pbias_lite);
 186
 187 #ifdef CONFIG_MMC_OMAP36XX_PINS
 188         if (get_cpu_family() == CPU_OMAP36XX)
 189                 /* Enable extended drain IO after changing PBIAS */
 190                 writel(wkup_ctrl |
 191                                 OMAP34XX_CTRL_WKUP_CTRL_GPIO_IO_PWRDNZ,
 192                                 OMAP34XX_CTRL_WKUP_CTRL);
 193 #endif
 194         writel(readl(&t2_base->devconf0) | MMCSDIO1ADPCLKISEL,
 195                 &t2_base->devconf0);
 196
 197         writel(readl(&t2_base->devconf1) | MMCSDIO2ADPCLKISEL,
 198                 &t2_base->devconf1);
 199
 200         /* Change from default of 52MHz to 26MHz if necessary */
 201         if (!(cfg->host_caps & MMC_MODE_HS_52MHz))
 202                 writel(readl(&t2_base->ctl_prog_io1) & ~CTLPROGIO1SPEEDCTRL,
 203                         &t2_base->ctl_prog_io1);
 204
 205         writel(readl(&prcm_base->fclken1_core) |
 206                 EN_MMC1 | EN_MMC2 | EN_MMC3,
 207                 &prcm_base->fclken1_core);
 208
 209         writel(readl(&prcm_base->iclken1_core) |
 210                 EN_MMC1 | EN_MMC2 | EN_MMC3,
 211                 &prcm_base->iclken1_core);
 212 #endif
 213
 214 #if defined(CONFIG_OMAP54XX) || defined(CONFIG_OMAP44XX)
 215         /* PBIAS config needed for MMC1 only */
 216         if (mmc_get_blk_desc(mmc)->devnum == 0)
 217                 vmmc_pbias_config(LDO_VOLT_3V0);
 218 #endif
 219
 220         return 0;
 221 }
 222
 223 void mmc_init_stream(struct hsmmc *mmc_base)
 224 {
 225         ulong start;
 226
 227         writel(readl(&mmc_base->con) | INIT_INITSTREAM, &mmc_base->con);
 228
 229         writel(MMC_CMD0, &mmc_base->cmd);
 230         start = get_timer(0);
 231         while (!(readl(&mmc_base->stat) & CC_MASK)) {
 232                 if (get_timer(0) - start > MAX_RETRY_MS) {
 233                         printf("%s: timedout waiting for cc!\n", __func__);
 234                         return;
 235                 }
 236         }
 237         writel(CC_MASK, &mmc_base->stat)
 238                 ;
 239         writel(MMC_CMD0, &mmc_base->cmd)
 240                 ;
 241         start = get_timer(0);
 242         while (!(readl(&mmc_base->stat) & CC_MASK)) {
 243                 if (get_timer(0) - start > MAX_RETRY_MS) {
 244                         printf("%s: timedout waiting for cc2!\n", __func__);
 245                         return;
 246                 }
 247         }
 248         writel(readl(&mmc_base->con) & ~INIT_INITSTREAM, &mmc_base->con);
 249 }
 250
 251 static int omap_hsmmc_init_setup(struct mmc *mmc)
 252 {
 253         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 254         struct hsmmc *mmc_base;
 255         unsigned int reg_val;
 256         unsigned int dsor;
 257         ulong start;
 258
 259         mmc_base = priv->base_addr;
 260         mmc_board_init(mmc);
 261
 262         writel(readl(&mmc_base->sysconfig) | MMC_SOFTRESET,
 263                 &mmc_base->sysconfig);
 264         start = get_timer(0);
 265         while ((readl(&mmc_base->sysstatus) & RESETDONE) == 0) {
 266                 if (get_timer(0) - start > MAX_RETRY_MS) {
 267                         printf("%s: timedout waiting for cc2!\n", __func__);
 268                         return -ETIMEDOUT;
 269                 }
 270         }
 271         writel(readl(&mmc_base->sysctl) | SOFTRESETALL, &mmc_base->sysctl);
 272         start = get_timer(0);
 273         while ((readl(&mmc_base->sysctl) & SOFTRESETALL) != 0x0) {
 274                 if (get_timer(0) - start > MAX_RETRY_MS) {
 275                         printf("%s: timedout waiting for softresetall!\n",
 276                                 __func__);
 277                         return -ETIMEDOUT;
 278                 }
 279         }
 280 #ifndef CONFIG_OMAP34XX
 281         reg_val = readl(&mmc_base->hl_hwinfo);
 282         if (reg_val & MADMA_EN)
 283                 priv->controller_flags |= OMAP_HSMMC_USE_ADMA;
 284 #endif
 285         writel(DTW_1_BITMODE | SDBP_PWROFF | SDVS_3V0, &mmc_base->hctl);
 286         writel(readl(&mmc_base->capa) | VS30_3V0SUP | VS18_1V8SUP,
 287                 &mmc_base->capa);
 288
 289         reg_val = readl(&mmc_base->con) & RESERVED_MASK;
 290
 291         writel(CTPL_MMC_SD | reg_val | WPP_ACTIVEHIGH | CDP_ACTIVEHIGH |
 292                 MIT_CTO | DW8_1_4BITMODE | MODE_FUNC | STR_BLOCK |
 293                 HR_NOHOSTRESP | INIT_NOINIT | NOOPENDRAIN, &mmc_base->con);
 294
 295         dsor = 240;
 296         mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
 297                 (ICE_STOP | DTO_15THDTO | CEN_DISABLE));
 298         mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
 299                 (dsor << CLKD_OFFSET) | ICE_OSCILLATE);
 300         start = get_timer(0);
 301         while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
 302                 if (get_timer(0) - start > MAX_RETRY_MS) {
 303                         printf("%s: timedout waiting for ics!\n", __func__);
 304                         return -ETIMEDOUT;
 305                 }
 306         }
 307         writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
 308
 309         writel(readl(&mmc_base->hctl) | SDBP_PWRON, &mmc_base->hctl);
 310
 311         writel(IE_BADA | IE_CERR | IE_DEB | IE_DCRC | IE_DTO | IE_CIE |
 312                 IE_CEB | IE_CCRC | IE_ADMAE | IE_CTO | IE_BRR | IE_BWR | IE_TC |
 313                 IE_CC, &mmc_base->ie);
 314
 315         mmc_init_stream(mmc_base);
 316
 317         return 0;
 318 }
 319
 320 /*
 321  * MMC controller internal finite state machine reset
 322  *
 323  * Used to reset command or data internal state machines, using respectively
 324  * SRC or SRD bit of SYSCTL register
 325  */
 326 static void mmc_reset_controller_fsm(struct hsmmc *mmc_base, u32 bit)
 327 {
 328         ulong start;
 329
 330         mmc_reg_out(&mmc_base->sysctl, bit, bit);
 331
 332         /*
 333          * CMD(DAT) lines reset procedures are slightly different
 334          * for OMAP3 and OMAP4(AM335x,OMAP5,DRA7xx).
 335          * According to OMAP3 TRM:
 336          * Set SRC(SRD) bit in MMCHS_SYSCTL register to 0x1 and wait until it
 337          * returns to 0x0.
 338          * According to OMAP4(AM335x,OMAP5,DRA7xx) TRMs, CMD(DATA) lines reset
 339          * procedure steps must be as follows:
 340          * 1. Initiate CMD(DAT) line reset by writing 0x1 to SRC(SRD) bit in
 341          *    MMCHS_SYSCTL register (SD_SYSCTL for AM335x).
 342          * 2. Poll the SRC(SRD) bit until it is set to 0x1.
 343          * 3. Wait until the SRC (SRD) bit returns to 0x0
 344          *    (reset procedure is completed).
 345          */
 346 #if defined(CONFIG_OMAP44XX) || defined(CONFIG_OMAP54XX) || \
 347         defined(CONFIG_AM33XX) || defined(CONFIG_AM43XX)
 348         if (!(readl(&mmc_base->sysctl) & bit)) {
 349                 start = get_timer(0);
 350                 while (!(readl(&mmc_base->sysctl) & bit)) {
 351                         if (get_timer(0) - start > MAX_RETRY_MS)
 352                                 return;
 353                 }
 354         }
 355 #endif
 356         start = get_timer(0);
 357         while ((readl(&mmc_base->sysctl) & bit) != 0) {
 358                 if (get_timer(0) - start > MAX_RETRY_MS) {
 359                         printf("%s: timedout waiting for sysctl %x to clear\n",
 360                                 __func__, bit);
 361                         return;
 362                 }
 363         }
 364 }
 365
 366 #ifndef CONFIG_OMAP34XX
 367 static void omap_hsmmc_adma_desc(struct mmc *mmc, char *buf, u16 len, bool end)
 368 {
 369         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 370         struct omap_hsmmc_adma_desc *desc;
 371         u8 attr;
 372
 373         desc = &priv->adma_desc_table[priv->desc_slot];
 374
 375         attr = ADMA_DESC_ATTR_VALID | ADMA_DESC_TRANSFER_DATA;
 376         if (!end)
 377                 priv->desc_slot++;
 378         else
 379                 attr |= ADMA_DESC_ATTR_END;
 380
 381         desc->len = len;
 382         desc->addr = (u32)buf;
 383         desc->reserved = 0;
 384         desc->attr = attr;
 385 }
 386
 387 static void omap_hsmmc_prepare_adma_table(struct mmc *mmc,
 388                                           struct mmc_data *data)
 389 {
 390         uint total_len = data->blocksize * data->blocks;
 391         uint desc_count = DIV_ROUND_UP(total_len, ADMA_MAX_LEN);
 392         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 393         int i = desc_count;
 394         char *buf;
 395
 396         priv->desc_slot = 0;
 397         priv->adma_desc_table = (struct omap_hsmmc_adma_desc *)
 398                                 memalign(ARCH_DMA_MINALIGN, desc_count *
 399                                 sizeof(struct omap_hsmmc_adma_desc));
 400
 401         if (data->flags & MMC_DATA_READ)
 402                 buf = data->dest;
 403         else
 404                 buf = (char *)data->src;
 405
 406         while (--i) {
 407                 omap_hsmmc_adma_desc(mmc, buf, ADMA_MAX_LEN, false);
 408                 buf += ADMA_MAX_LEN;
 409                 total_len -= ADMA_MAX_LEN;
 410         }
 411
 412         omap_hsmmc_adma_desc(mmc, buf, total_len, true);
 413
 414         flush_dcache_range((long)priv->adma_desc_table,
 415                            (long)priv->adma_desc_table +
 416                            ROUND(desc_count *
 417                            sizeof(struct omap_hsmmc_adma_desc),
 418                            ARCH_DMA_MINALIGN));
 419 }
 420
 421 static void omap_hsmmc_prepare_data(struct mmc *mmc, struct mmc_data *data)
 422 {
 423         struct hsmmc *mmc_base;
 424         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 425         u32 val;
 426         char *buf;
 427
 428         mmc_base = priv->base_addr;
 429         omap_hsmmc_prepare_adma_table(mmc, data);
 430
 431         if (data->flags & MMC_DATA_READ)
 432                 buf = data->dest;
 433         else
 434                 buf = (char *)data->src;
 435
 436         val = readl(&mmc_base->hctl);
 437         val |= DMA_SELECT;
 438         writel(val, &mmc_base->hctl);
 439
 440         val = readl(&mmc_base->con);
 441         val |= DMA_MASTER;
 442         writel(val, &mmc_base->con);
 443
 444         writel((u32)priv->adma_desc_table, &mmc_base->admasal);
 445
 446         flush_dcache_range((u32)buf,
 447                            (u32)buf +
 448                            ROUND(data->blocksize * data->blocks,
 449                                  ARCH_DMA_MINALIGN));
 450 }
 451
 452 static void omap_hsmmc_dma_cleanup(struct mmc *mmc)
 453 {
 454         struct hsmmc *mmc_base;
 455         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 456         u32 val;
 457
 458         mmc_base = priv->base_addr;
 459
 460         val = readl(&mmc_base->con);
 461         val &= ~DMA_MASTER;
 462         writel(val, &mmc_base->con);
 463
 464         val = readl(&mmc_base->hctl);
 465         val &= ~DMA_SELECT;
 466         writel(val, &mmc_base->hctl);
 467
 468         kfree(priv->adma_desc_table);
 469 }
 470 #else
 471 #define omap_hsmmc_adma_desc
 472 #define omap_hsmmc_prepare_adma_table
 473 #define omap_hsmmc_prepare_data
 474 #define omap_hsmmc_dma_cleanup
 475 #endif
 476
 477 #if !CONFIG_IS_ENABLED(DM_MMC)
 478 static int omap_hsmmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
 479                         struct mmc_data *data)
 480 {
 481         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 482 #else
 483 static int omap_hsmmc_send_cmd(struct udevice *dev, struct mmc_cmd *cmd,
 484                         struct mmc_data *data)
 485 {
 486         struct omap_hsmmc_data *priv = dev_get_priv(dev);
 487 #ifndef CONFIG_OMAP34XX
 488         struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
 489         struct mmc *mmc = upriv->mmc;
 490 #endif
 491 #endif
 492         struct hsmmc *mmc_base;
 493         unsigned int flags, mmc_stat;
 494         ulong start;
 495
 496         mmc_base = priv->base_addr;
 497         start = get_timer(0);
 498         while ((readl(&mmc_base->pstate) & (DATI_MASK | CMDI_MASK)) != 0) {
 499                 if (get_timer(0) - start > MAX_RETRY_MS) {
 500                         printf("%s: timedout waiting on cmd inhibit to clear\n",
 501                                         __func__);
 502                         return -ETIMEDOUT;
 503                 }
 504         }
 505         writel(0xFFFFFFFF, &mmc_base->stat);
 506         start = get_timer(0);
 507         while (readl(&mmc_base->stat)) {
 508                 if (get_timer(0) - start > MAX_RETRY_MS) {
 509                         printf("%s: timedout waiting for STAT (%x) to clear\n",
 510                                 __func__, readl(&mmc_base->stat));
 511                         return -ETIMEDOUT;
 512                 }
 513         }
 514         /*
 515          * CMDREG
 516          * CMDIDX[13:8] : Command index
 517          * DATAPRNT[5]  : Data Present Select
 518          * ENCMDIDX[4]  : Command Index Check Enable
 519          * ENCMDCRC[3]  : Command CRC Check Enable
 520          * RSPTYP[1:0]
 521          *      00 = No Response
 522          *      01 = Length 136
 523          *      10 = Length 48
 524          *      11 = Length 48 Check busy after response
 525          */
 526         /* Delay added before checking the status of frq change
 527          * retry not supported by mmc.c(core file)
 528          */
 529         if (cmd->cmdidx == SD_CMD_APP_SEND_SCR)
 530                 udelay(50000); /* wait 50 ms */
 531
 532         if (!(cmd->resp_type & MMC_RSP_PRESENT))
 533                 flags = 0;
 534         else if (cmd->resp_type & MMC_RSP_136)
 535                 flags = RSP_TYPE_LGHT136 | CICE_NOCHECK;
 536         else if (cmd->resp_type & MMC_RSP_BUSY)
 537                 flags = RSP_TYPE_LGHT48B;
 538         else
 539                 flags = RSP_TYPE_LGHT48;
 540
 541         /* enable default flags */
 542         flags = flags | (CMD_TYPE_NORMAL | CICE_NOCHECK | CCCE_NOCHECK |
 543                         MSBS_SGLEBLK | ACEN_DISABLE | BCE_DISABLE | DE_DISABLE);
 544
 545         if (cmd->resp_type & MMC_RSP_CRC)
 546                 flags |= CCCE_CHECK;
 547         if (cmd->resp_type & MMC_RSP_OPCODE)
 548                 flags |= CICE_CHECK;
 549
 550         if (data) {
 551                 if ((cmd->cmdidx == MMC_CMD_READ_MULTIPLE_BLOCK) ||
 552                          (cmd->cmdidx == MMC_CMD_WRITE_MULTIPLE_BLOCK)) {
 553                         flags |= (MSBS_MULTIBLK | BCE_ENABLE);
 554                         data->blocksize = 512;
 555                         writel(data->blocksize | (data->blocks << 16),
 556                                                         &mmc_base->blk);
 557                 } else
 558                         writel(data->blocksize | NBLK_STPCNT, &mmc_base->blk);
 559
 560                 if (data->flags & MMC_DATA_READ)
 561                         flags |= (DP_DATA | DDIR_READ);
 562                 else
 563                         flags |= (DP_DATA | DDIR_WRITE);
 564
 565 #ifndef CONFIG_OMAP34XX
 566                 if ((priv->controller_flags & OMAP_HSMMC_USE_ADMA) &&
 567                     !mmc_is_tuning_cmd(cmd->cmdidx)) {
 568                         omap_hsmmc_prepare_data(mmc, data);
 569                         flags |= DE_ENABLE;
 570                 }
 571 #endif
 572         }
 573
 574         writel(cmd->cmdarg, &mmc_base->arg);
 575         udelay(20);             /* To fix "No status update" error on eMMC */
 576         writel((cmd->cmdidx << 24) | flags, &mmc_base->cmd);
 577
 578         start = get_timer(0);
 579         do {
 580                 mmc_stat = readl(&mmc_base->stat);
 581                 if (get_timer(start) > MAX_RETRY_MS) {
 582                         printf("%s : timeout: No status update\n", __func__);
 583                         return -ETIMEDOUT;
 584                 }
 585         } while (!mmc_stat);
 586
 587         if ((mmc_stat & IE_CTO) != 0) {
 588                 mmc_reset_controller_fsm(mmc_base, SYSCTL_SRC);
 589                 return -ETIMEDOUT;
 590         } else if ((mmc_stat & ERRI_MASK) != 0)
 591                 return -1;
 592
 593         if (mmc_stat & CC_MASK) {
 594                 writel(CC_MASK, &mmc_base->stat);
 595                 if (cmd->resp_type & MMC_RSP_PRESENT) {
 596                         if (cmd->resp_type & MMC_RSP_136) {
 597                                 /* response type 2 */
 598                                 cmd->response[3] = readl(&mmc_base->rsp10);
 599                                 cmd->response[2] = readl(&mmc_base->rsp32);
 600                                 cmd->response[1] = readl(&mmc_base->rsp54);
 601                                 cmd->response[0] = readl(&mmc_base->rsp76);
 602                         } else
 603                                 /* response types 1, 1b, 3, 4, 5, 6 */
 604                                 cmd->response[0] = readl(&mmc_base->rsp10);
 605                 }
 606         }
 607
 608 #ifndef CONFIG_OMAP34XX
 609         if ((priv->controller_flags & OMAP_HSMMC_USE_ADMA) && data &&
 610             !mmc_is_tuning_cmd(cmd->cmdidx)) {
 611                 u32 sz_mb, timeout;
 612
 613                 if (mmc_stat & IE_ADMAE) {
 614                         omap_hsmmc_dma_cleanup(mmc);
 615                         return -EIO;
 616                 }
 617
 618                 sz_mb = DIV_ROUND_UP(data->blocksize *  data->blocks, 1 << 20);
 619                 timeout = sz_mb * DMA_TIMEOUT_PER_MB;
 620                 if (timeout < MAX_RETRY_MS)
 621                         timeout = MAX_RETRY_MS;
 622
 623                 start = get_timer(0);
 624                 do {
 625                         mmc_stat = readl(&mmc_base->stat);
 626                         if (mmc_stat & TC_MASK) {
 627                                 writel(readl(&mmc_base->stat) | TC_MASK,
 628                                        &mmc_base->stat);
 629                                 break;
 630                         }
 631                         if (get_timer(start) > timeout) {
 632                                 printf("%s : DMA timeout: No status update\n",
 633                                        __func__);
 634                                 return -ETIMEDOUT;
 635                         }
 636                 } while (1);
 637
 638                 omap_hsmmc_dma_cleanup(mmc);
 639                 return 0;
 640         }
 641 #endif
 642
 643         if (data && (data->flags & MMC_DATA_READ)) {
 644                 mmc_read_data(mmc_base, data->dest,
 645                                 data->blocksize * data->blocks);
 646         } else if (data && (data->flags & MMC_DATA_WRITE)) {
 647                 mmc_write_data(mmc_base, data->src,
 648                                 data->blocksize * data->blocks);
 649         }
 650         return 0;
 651 }
 652
 653 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size)
 654 {
 655         unsigned int *output_buf = (unsigned int *)buf;
 656         unsigned int mmc_stat;
 657         unsigned int count;
 658
 659         /*
 660          * Start Polled Read
 661          */
 662         count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
 663         count /= 4;
 664
 665         while (size) {
 666                 ulong start = get_timer(0);
 667                 do {
 668                         mmc_stat = readl(&mmc_base->stat);
 669                         if (get_timer(0) - start > MAX_RETRY_MS) {
 670                                 printf("%s: timedout waiting for status!\n",
 671                                                 __func__);
 672                                 return -ETIMEDOUT;
 673                         }
 674                 } while (mmc_stat == 0);
 675
 676                 if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
 677                         mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
 678
 679                 if ((mmc_stat & ERRI_MASK) != 0)
 680                         return 1;
 681
 682                 if (mmc_stat & BRR_MASK) {
 683                         unsigned int k;
 684
 685                         writel(readl(&mmc_base->stat) | BRR_MASK,
 686                                 &mmc_base->stat);
 687                         for (k = 0; k < count; k++) {
 688                                 *output_buf = readl(&mmc_base->data);
 689                                 output_buf++;
 690                         }
 691                         size -= (count*4);
 692                 }
 693
 694                 if (mmc_stat & BWR_MASK)
 695                         writel(readl(&mmc_base->stat) | BWR_MASK,
 696                                 &mmc_base->stat);
 697
 698                 if (mmc_stat & TC_MASK) {
 699                         writel(readl(&mmc_base->stat) | TC_MASK,
 700                                 &mmc_base->stat);
 701                         break;
 702                 }
 703         }
 704         return 0;
 705 }
 706
 707 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
 708                                 unsigned int size)
 709 {
 710         unsigned int *input_buf = (unsigned int *)buf;
 711         unsigned int mmc_stat;
 712         unsigned int count;
 713
 714         /*
 715          * Start Polled Write
 716          */
 717         count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
 718         count /= 4;
 719
 720         while (size) {
 721                 ulong start = get_timer(0);
 722                 do {
 723                         mmc_stat = readl(&mmc_base->stat);
 724                         if (get_timer(0) - start > MAX_RETRY_MS) {
 725                                 printf("%s: timedout waiting for status!\n",
 726                                                 __func__);
 727                                 return -ETIMEDOUT;
 728                         }
 729                 } while (mmc_stat == 0);
 730
 731                 if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
 732                         mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
 733
 734                 if ((mmc_stat & ERRI_MASK) != 0)
 735                         return 1;
 736
 737                 if (mmc_stat & BWR_MASK) {
 738                         unsigned int k;
 739
 740                         writel(readl(&mmc_base->stat) | BWR_MASK,
 741                                         &mmc_base->stat);
 742                         for (k = 0; k < count; k++) {
 743                                 writel(*input_buf, &mmc_base->data);
 744                                 input_buf++;
 745                         }
 746                         size -= (count*4);
 747                 }
 748
 749                 if (mmc_stat & BRR_MASK)
 750                         writel(readl(&mmc_base->stat) | BRR_MASK,
 751                                 &mmc_base->stat);
 752
 753                 if (mmc_stat & TC_MASK) {
 754                         writel(readl(&mmc_base->stat) | TC_MASK,
 755                                 &mmc_base->stat);
 756                         break;
 757                 }
 758         }
 759         return 0;
 760 }
 761
 762 #if !CONFIG_IS_ENABLED(DM_MMC)
 763 static int omap_hsmmc_set_ios(struct mmc *mmc)
 764 {
 765         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 766 #else
 767 static int omap_hsmmc_set_ios(struct udevice *dev)
 768 {
 769         struct omap_hsmmc_data *priv = dev_get_priv(dev);
 770         struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
 771         struct mmc *mmc = upriv->mmc;
 772 #endif
 773         struct hsmmc *mmc_base;
 774         unsigned int dsor = 0;
 775         ulong start;
 776
 777         mmc_base = priv->base_addr;
 778         /* configue bus width */
 779         switch (mmc->bus_width) {
 780         case 8:
 781                 writel(readl(&mmc_base->con) | DTW_8_BITMODE,
 782                         &mmc_base->con);
 783                 break;
 784
 785         case 4:
 786                 writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
 787                         &mmc_base->con);
 788                 writel(readl(&mmc_base->hctl) | DTW_4_BITMODE,
 789                         &mmc_base->hctl);
 790                 break;
 791
 792         case 1:
 793         default:
 794                 writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
 795                         &mmc_base->con);
 796                 writel(readl(&mmc_base->hctl) & ~DTW_4_BITMODE,
 797                         &mmc_base->hctl);
 798                 break;
 799         }
 800
 801         /* configure clock with 96Mhz system clock.
 802          */
 803         if (mmc->clock != 0) {
 804                 dsor = (MMC_CLOCK_REFERENCE * 1000000 / mmc->clock);
 805                 if ((MMC_CLOCK_REFERENCE * 1000000) / dsor > mmc->clock)
 806                         dsor++;
 807         }
 808
 809         mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
 810                                 (ICE_STOP | DTO_15THDTO | CEN_DISABLE));
 811
 812         mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
 813                                 (dsor << CLKD_OFFSET) | ICE_OSCILLATE);
 814
 815         start = get_timer(0);
 816         while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
 817                 if (get_timer(0) - start > MAX_RETRY_MS) {
 818                         printf("%s: timedout waiting for ics!\n", __func__);
 819                         return -ETIMEDOUT;
 820                 }
 821         }
 822         writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
 823
 824         return 0;
 825 }
 826
 827 #ifdef OMAP_HSMMC_USE_GPIO
 828 #if CONFIG_IS_ENABLED(DM_MMC)
 829 static int omap_hsmmc_getcd(struct udevice *dev)
 830 {
 831         struct omap_hsmmc_data *priv = dev_get_priv(dev);
 832         int value;
 833
 834         value = dm_gpio_get_value(&priv->cd_gpio);
 835         /* if no CD return as 1 */
 836         if (value < 0)
 837                 return 1;
 838
 839         if (priv->cd_inverted)
 840                 return !value;
 841         return value;
 842 }
 843
 844 static int omap_hsmmc_getwp(struct udevice *dev)
 845 {
 846         struct omap_hsmmc_data *priv = dev_get_priv(dev);
 847         int value;
 848
 849         value = dm_gpio_get_value(&priv->wp_gpio);
 850         /* if no WP return as 0 */
 851         if (value < 0)
 852                 return 0;
 853         return value;
 854 }
 855 #else
 856 static int omap_hsmmc_getcd(struct mmc *mmc)
 857 {
 858         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 859         int cd_gpio;
 860
 861         /* if no CD return as 1 */
 862         cd_gpio = priv->cd_gpio;
 863         if (cd_gpio < 0)
 864                 return 1;
 865
 866         /* NOTE: assumes card detect signal is active-low */
 867         return !gpio_get_value(cd_gpio);
 868 }
 869
 870 static int omap_hsmmc_getwp(struct mmc *mmc)
 871 {
 872         struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
 873         int wp_gpio;
 874
 875         /* if no WP return as 0 */
 876         wp_gpio = priv->wp_gpio;
 877         if (wp_gpio < 0)
 878                 return 0;
 879
 880         /* NOTE: assumes write protect signal is active-high */
 881         return gpio_get_value(wp_gpio);
 882 }
 883 #endif
 884 #endif
 885
 886 #if CONFIG_IS_ENABLED(DM_MMC)
 887 static const struct dm_mmc_ops omap_hsmmc_ops = {
 888         .send_cmd       = omap_hsmmc_send_cmd,
 889         .set_ios        = omap_hsmmc_set_ios,
 890 #ifdef OMAP_HSMMC_USE_GPIO
 891         .get_cd         = omap_hsmmc_getcd,
 892         .get_wp         = omap_hsmmc_getwp,
 893 #endif
 894 };
 895 #else
 896 static const struct mmc_ops omap_hsmmc_ops = {
 897         .send_cmd       = omap_hsmmc_send_cmd,
 898         .set_ios        = omap_hsmmc_set_ios,
 899         .init           = omap_hsmmc_init_setup,
 900 #ifdef OMAP_HSMMC_USE_GPIO
 901         .getcd          = omap_hsmmc_getcd,
 902         .getwp          = omap_hsmmc_getwp,
 903 #endif
 904 };
 905 #endif
 906
 907 #if !CONFIG_IS_ENABLED(DM_MMC)
 908 int omap_mmc_init(int dev_index, uint host_caps_mask, uint f_max, int cd_gpio,
 909                 int wp_gpio)
 910 {
 911         struct mmc *mmc;
 912         struct omap_hsmmc_data *priv;
 913         struct mmc_config *cfg;
 914         uint host_caps_val;
 915
 916         priv = malloc(sizeof(*priv));
 917         if (priv == NULL)
 918                 return -1;
 919
 920         host_caps_val = MMC_MODE_4BIT | MMC_MODE_HS_52MHz | MMC_MODE_HS;
 921
 922         switch (dev_index) {
 923         case 0:
 924                 priv->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
 925                 break;
 926 #ifdef OMAP_HSMMC2_BASE
 927         case 1:
 928                 priv->base_addr = (struct hsmmc *)OMAP_HSMMC2_BASE;
 929 #if (defined(CONFIG_OMAP44XX) || defined(CONFIG_OMAP54XX) || \
 930         defined(CONFIG_DRA7XX) || defined(CONFIG_AM33XX) || \
 931         defined(CONFIG_AM43XX) || defined(CONFIG_SOC_KEYSTONE)) && \
 932                 defined(CONFIG_HSMMC2_8BIT)
 933                 /* Enable 8-bit interface for eMMC on OMAP4/5 or DRA7XX */
 934                 host_caps_val |= MMC_MODE_8BIT;
 935 #endif
 936                 break;
 937 #endif
 938 #ifdef OMAP_HSMMC3_BASE
 939         case 2:
 940                 priv->base_addr = (struct hsmmc *)OMAP_HSMMC3_BASE;
 941 #if defined(CONFIG_DRA7XX) && defined(CONFIG_HSMMC3_8BIT)
 942                 /* Enable 8-bit interface for eMMC on DRA7XX */
 943                 host_caps_val |= MMC_MODE_8BIT;
 944 #endif
 945                 break;
 946 #endif
 947         default:
 948                 priv->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
 949                 return 1;
 950         }
 951 #ifdef OMAP_HSMMC_USE_GPIO
 952         /* on error gpio values are set to -1, which is what we want */
 953         priv->cd_gpio = omap_mmc_setup_gpio_in(cd_gpio, "mmc_cd");
 954         priv->wp_gpio = omap_mmc_setup_gpio_in(wp_gpio, "mmc_wp");
 955 #endif
 956
 957         cfg = &priv->cfg;
 958
 959         cfg->name = "OMAP SD/MMC";
 960         cfg->ops = &omap_hsmmc_ops;
 961
 962         cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34 | MMC_VDD_165_195;
 963         cfg->host_caps = host_caps_val & ~host_caps_mask;
 964
 965         cfg->f_min = 400000;
 966
 967         if (f_max != 0)
 968                 cfg->f_max = f_max;
 969         else {
 970                 if (cfg->host_caps & MMC_MODE_HS) {
 971                         if (cfg->host_caps & MMC_MODE_HS_52MHz)
 972                                 cfg->f_max = 52000000;
 973                         else
 974                                 cfg->f_max = 26000000;
 975                 } else
 976                         cfg->f_max = 20000000;
 977         }
 978
 979         cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
 980
 981 #if defined(CONFIG_OMAP34XX)
 982         /*
 983          * Silicon revs 2.1 and older do not support multiblock transfers.
 984          */
 985         if ((get_cpu_family() == CPU_OMAP34XX) && (get_cpu_rev() <= CPU_3XX_ES21))
 986                 cfg->b_max = 1;
 987 #endif
 988         mmc = mmc_create(cfg, priv);
 989         if (mmc == NULL)
 990                 return -1;
 991
 992         return 0;
 993 }
 994 #else
 995 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
 996 static int omap_hsmmc_ofdata_to_platdata(struct udevice *dev)
 997 {
 998         struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
 999         struct mmc_config *cfg = &plat->cfg;
1000         const void *fdt = gd->fdt_blob;
1001         int node = dev_of_offset(dev);
1002         int val;
1003
1004         plat->base_addr = map_physmem(devfdt_get_addr(dev),
1005                                       sizeof(struct hsmmc *),
1006                                       MAP_NOCACHE);
1007
1008         cfg->host_caps = MMC_MODE_HS_52MHz | MMC_MODE_HS;
1009         val = fdtdec_get_int(fdt, node, "bus-width", -1);
1010         if (val < 0) {
1011                 printf("error: bus-width property missing\n");
1012                 return -ENOENT;
1013         }
1014
1015         switch (val) {
1016         case 0x8:
1017                 cfg->host_caps |= MMC_MODE_8BIT;
1018         case 0x4:
1019                 cfg->host_caps |= MMC_MODE_4BIT;
1020                 break;
1021         default:
1022                 printf("error: invalid bus-width property\n");
1023                 return -ENOENT;
1024         }
1025
1026         cfg->f_min = 400000;
1027         cfg->f_max = fdtdec_get_int(fdt, node, "max-frequency", 52000000);
1028         cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34 | MMC_VDD_165_195;
1029         cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
1030
1031 #ifdef OMAP_HSMMC_USE_GPIO
1032         plat->cd_inverted = fdtdec_get_bool(fdt, node, "cd-inverted");
1033 #endif
1034
1035         return 0;
1036 }
1037 #endif
1038
1039 #ifdef CONFIG_BLK
1040
1041 static int omap_hsmmc_bind(struct udevice *dev)
1042 {
1043         struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
1044
1045         return mmc_bind(dev, &plat->mmc, &plat->cfg);
1046 }
1047 #endif
1048 static int omap_hsmmc_probe(struct udevice *dev)
1049 {
1050         struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
1051         struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
1052         struct omap_hsmmc_data *priv = dev_get_priv(dev);
1053         struct mmc_config *cfg = &plat->cfg;
1054         struct mmc *mmc;
1055
1056         cfg->name = "OMAP SD/MMC";
1057         priv->base_addr = plat->base_addr;
1058 #ifdef OMAP_HSMMC_USE_GPIO
1059         priv->cd_inverted = plat->cd_inverted;
1060 #endif
1061
1062 #ifdef CONFIG_BLK
1063         mmc = &plat->mmc;
1064 #else
1065         mmc = mmc_create(cfg, priv);
1066         if (mmc == NULL)
1067                 return -1;
1068 #endif
1069
1070 #if defined(OMAP_HSMMC_USE_GPIO) && CONFIG_IS_ENABLED(OF_CONTROL)
1071         gpio_request_by_name(dev, "cd-gpios", 0, &priv->cd_gpio, GPIOD_IS_IN);
1072         gpio_request_by_name(dev, "wp-gpios", 0, &priv->wp_gpio, GPIOD_IS_IN);
1073 #endif
1074
1075         mmc->dev = dev;
1076         upriv->mmc = mmc;
1077
1078         return omap_hsmmc_init_setup(mmc);
1079 }
1080
1081 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
1082 static const struct udevice_id omap_hsmmc_ids[] = {
1083         { .compatible = "ti,omap3-hsmmc" },
1084         { .compatible = "ti,omap4-hsmmc" },
1085         { .compatible = "ti,am33xx-hsmmc" },
1086         { }
1087 };
1088 #endif
1089
1090 U_BOOT_DRIVER(omap_hsmmc) = {
1091         .name   = "omap_hsmmc",
1092         .id     = UCLASS_MMC,
1093 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
1094         .of_match = omap_hsmmc_ids,
1095         .ofdata_to_platdata = omap_hsmmc_ofdata_to_platdata,
1096         .platdata_auto_alloc_size = sizeof(struct omap_hsmmc_plat),
1097 #endif
1098 #ifdef CONFIG_BLK
1099         .bind = omap_hsmmc_bind,
1100 #endif
1101         .ops = &omap_hsmmc_ops,
1102         .probe  = omap_hsmmc_probe,
1103         .priv_auto_alloc_size = sizeof(struct omap_hsmmc_data),
1104         .flags  = DM_FLAG_PRE_RELOC,
1105 };
1106 #endif