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 <mmc.h>
  28 #include <part.h>
  29 #include <i2c.h>
  30 #include <twl4030.h>
  31 #include <twl6030.h>
  32 #include <palmas.h>
  33 #include <asm/gpio.h>
  34 #include <asm/io.h>
  35 #include <asm/arch/mmc_host_def.h>
  36 #include <asm/arch/sys_proto.h>
  37
  38 /* common definitions for all OMAPs */
  39 #define SYSCTL_SRC      (1 << 25)
  40 #define SYSCTL_SRD      (1 << 26)
  41
  42 struct omap_hsmmc_data {
  43         struct hsmmc *base_addr;
  44         int cd_gpio;
  45         int wp_gpio;
  46 };
  47
  48 /* If we fail after 1 second wait, something is really bad */
  49 #define MAX_RETRY_MS    1000
  50
  51 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size);
  52 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
  53                         unsigned int siz);
  54 static struct mmc hsmmc_dev[3];
  55 static struct omap_hsmmc_data hsmmc_dev_data[3];
  56
  57 #if (defined(CONFIG_OMAP_GPIO) && !defined(CONFIG_SPL_BUILD)) || \
  58         (defined(CONFIG_SPL_BUILD) && defined(CONFIG_SPL_GPIO_SUPPORT))
  59 static int omap_mmc_setup_gpio_in(int gpio, const char *label)
  60 {
  61         if (!gpio_is_valid(gpio))
  62                 return -1;
  63
  64         if (gpio_request(gpio, label) < 0)
  65                 return -1;
  66
  67         if (gpio_direction_input(gpio) < 0)
  68                 return -1;
  69
  70         return gpio;
  71 }
  72
  73 static int omap_mmc_getcd(struct mmc *mmc)
  74 {
  75         int cd_gpio = ((struct omap_hsmmc_data *)mmc->priv)->cd_gpio;
  76         return gpio_get_value(cd_gpio);
  77 }
  78
  79 static int omap_mmc_getwp(struct mmc *mmc)
  80 {
  81         int wp_gpio = ((struct omap_hsmmc_data *)mmc->priv)->wp_gpio;
  82         return gpio_get_value(wp_gpio);
  83 }
  84 #else
  85 static inline int omap_mmc_setup_gpio_in(int gpio, const char *label)
  86 {
  87         return -1;
  88 }
  89
  90 #define omap_mmc_getcd NULL
  91 #define omap_mmc_getwp NULL
  92 #endif
  93
  94 #if defined(CONFIG_OMAP44XX) && defined(CONFIG_TWL6030_POWER)
  95 static void omap4_vmmc_pbias_config(struct mmc *mmc)
  96 {
  97         u32 value = 0;
  98
  99         value = readl((*ctrl)->control_pbiaslite);
 100         value &= ~(MMC1_PBIASLITE_PWRDNZ | MMC1_PWRDNZ);
 101         writel(value, (*ctrl)->control_pbiaslite);
 102         /* set VMMC to 3V */
 103         twl6030_power_mmc_init();
 104         value = readl((*ctrl)->control_pbiaslite);
 105         value |= MMC1_PBIASLITE_VMODE | MMC1_PBIASLITE_PWRDNZ | MMC1_PWRDNZ;
 106         writel(value, (*ctrl)->control_pbiaslite);
 107 }
 108 #endif
 109
 110 #if defined(CONFIG_OMAP54XX) && defined(CONFIG_PALMAS_POWER)
 111 static void omap5_pbias_config(struct mmc *mmc)
 112 {
 113         u32 value = 0;
 114
 115         value = readl((*ctrl)->control_pbias);
 116         value &= ~SDCARD_PWRDNZ;
 117         writel(value, (*ctrl)->control_pbias);
 118         udelay(10); /* wait 10 us */
 119         value &= ~SDCARD_BIAS_PWRDNZ;
 120         writel(value, (*ctrl)->control_pbias);
 121
 122         palmas_mmc1_poweron_ldo();
 123
 124         value = readl((*ctrl)->control_pbias);
 125         value |= SDCARD_BIAS_PWRDNZ;
 126         writel(value, (*ctrl)->control_pbias);
 127         udelay(150); /* wait 150 us */
 128         value |= SDCARD_PWRDNZ;
 129         writel(value, (*ctrl)->control_pbias);
 130         udelay(150); /* wait 150 us */
 131 }
 132 #endif
 133
 134 unsigned char mmc_board_init(struct mmc *mmc)
 135 {
 136 #if defined(CONFIG_OMAP34XX)
 137         t2_t *t2_base = (t2_t *)T2_BASE;
 138         struct prcm *prcm_base = (struct prcm *)PRCM_BASE;
 139         u32 pbias_lite;
 140
 141         pbias_lite = readl(&t2_base->pbias_lite);
 142         pbias_lite &= ~(PBIASLITEPWRDNZ1 | PBIASLITEPWRDNZ0);
 143         writel(pbias_lite, &t2_base->pbias_lite);
 144 #endif
 145 #if defined(CONFIG_TWL4030_POWER)
 146         twl4030_power_mmc_init();
 147         mdelay(100);    /* ramp-up delay from Linux code */
 148 #endif
 149 #if defined(CONFIG_OMAP34XX)
 150         writel(pbias_lite | PBIASLITEPWRDNZ1 |
 151                 PBIASSPEEDCTRL0 | PBIASLITEPWRDNZ0,
 152                 &t2_base->pbias_lite);
 153
 154         writel(readl(&t2_base->devconf0) | MMCSDIO1ADPCLKISEL,
 155                 &t2_base->devconf0);
 156
 157         writel(readl(&t2_base->devconf1) | MMCSDIO2ADPCLKISEL,
 158                 &t2_base->devconf1);
 159
 160         /* Change from default of 52MHz to 26MHz if necessary */
 161         if (!(mmc->host_caps & MMC_MODE_HS_52MHz))
 162                 writel(readl(&t2_base->ctl_prog_io1) & ~CTLPROGIO1SPEEDCTRL,
 163                         &t2_base->ctl_prog_io1);
 164
 165         writel(readl(&prcm_base->fclken1_core) |
 166                 EN_MMC1 | EN_MMC2 | EN_MMC3,
 167                 &prcm_base->fclken1_core);
 168
 169         writel(readl(&prcm_base->iclken1_core) |
 170                 EN_MMC1 | EN_MMC2 | EN_MMC3,
 171                 &prcm_base->iclken1_core);
 172 #endif
 173
 174 #if defined(CONFIG_OMAP44XX) && defined(CONFIG_TWL6030_POWER)
 175         /* PBIAS config needed for MMC1 only */
 176         if (mmc->block_dev.dev == 0)
 177                 omap4_vmmc_pbias_config(mmc);
 178 #endif
 179 #if defined(CONFIG_OMAP54XX) && defined(CONFIG_PALMAS_POWER)
 180         if (mmc->block_dev.dev == 0)
 181                 omap5_pbias_config(mmc);
 182 #endif
 183
 184         return 0;
 185 }
 186
 187 void mmc_init_stream(struct hsmmc *mmc_base)
 188 {
 189         ulong start;
 190
 191         writel(readl(&mmc_base->con) | INIT_INITSTREAM, &mmc_base->con);
 192
 193         writel(MMC_CMD0, &mmc_base->cmd);
 194         start = get_timer(0);
 195         while (!(readl(&mmc_base->stat) & CC_MASK)) {
 196                 if (get_timer(0) - start > MAX_RETRY_MS) {
 197                         printf("%s: timedout waiting for cc!\n", __func__);
 198                         return;
 199                 }
 200         }
 201         writel(CC_MASK, &mmc_base->stat)
 202                 ;
 203         writel(MMC_CMD0, &mmc_base->cmd)
 204                 ;
 205         start = get_timer(0);
 206         while (!(readl(&mmc_base->stat) & CC_MASK)) {
 207                 if (get_timer(0) - start > MAX_RETRY_MS) {
 208                         printf("%s: timedout waiting for cc2!\n", __func__);
 209                         return;
 210                 }
 211         }
 212         writel(readl(&mmc_base->con) & ~INIT_INITSTREAM, &mmc_base->con);
 213 }
 214
 215
 216 static int mmc_init_setup(struct mmc *mmc)
 217 {
 218         struct hsmmc *mmc_base;
 219         unsigned int reg_val;
 220         unsigned int dsor;
 221         ulong start;
 222
 223         mmc_base = ((struct omap_hsmmc_data *)mmc->priv)->base_addr;
 224         mmc_board_init(mmc);
 225
 226         writel(readl(&mmc_base->sysconfig) | MMC_SOFTRESET,
 227                 &mmc_base->sysconfig);
 228         start = get_timer(0);
 229         while ((readl(&mmc_base->sysstatus) & RESETDONE) == 0) {
 230                 if (get_timer(0) - start > MAX_RETRY_MS) {
 231                         printf("%s: timedout waiting for cc2!\n", __func__);
 232                         return TIMEOUT;
 233                 }
 234         }
 235         writel(readl(&mmc_base->sysctl) | SOFTRESETALL, &mmc_base->sysctl);
 236         start = get_timer(0);
 237         while ((readl(&mmc_base->sysctl) & SOFTRESETALL) != 0x0) {
 238                 if (get_timer(0) - start > MAX_RETRY_MS) {
 239                         printf("%s: timedout waiting for softresetall!\n",
 240                                 __func__);
 241                         return TIMEOUT;
 242                 }
 243         }
 244         writel(DTW_1_BITMODE | SDBP_PWROFF | SDVS_3V0, &mmc_base->hctl);
 245         writel(readl(&mmc_base->capa) | VS30_3V0SUP | VS18_1V8SUP,
 246                 &mmc_base->capa);
 247
 248         reg_val = readl(&mmc_base->con) & RESERVED_MASK;
 249
 250         writel(CTPL_MMC_SD | reg_val | WPP_ACTIVEHIGH | CDP_ACTIVEHIGH |
 251                 MIT_CTO | DW8_1_4BITMODE | MODE_FUNC | STR_BLOCK |
 252                 HR_NOHOSTRESP | INIT_NOINIT | NOOPENDRAIN, &mmc_base->con);
 253
 254         dsor = 240;
 255         mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
 256                 (ICE_STOP | DTO_15THDTO | CEN_DISABLE));
 257         mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
 258                 (dsor << CLKD_OFFSET) | ICE_OSCILLATE);
 259         start = get_timer(0);
 260         while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
 261                 if (get_timer(0) - start > MAX_RETRY_MS) {
 262                         printf("%s: timedout waiting for ics!\n", __func__);
 263                         return TIMEOUT;
 264                 }
 265         }
 266         writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
 267
 268         writel(readl(&mmc_base->hctl) | SDBP_PWRON, &mmc_base->hctl);
 269
 270         writel(IE_BADA | IE_CERR | IE_DEB | IE_DCRC | IE_DTO | IE_CIE |
 271                 IE_CEB | IE_CCRC | IE_CTO | IE_BRR | IE_BWR | IE_TC | IE_CC,
 272                 &mmc_base->ie);
 273
 274         mmc_init_stream(mmc_base);
 275
 276         return 0;
 277 }
 278
 279 /*
 280  * MMC controller internal finite state machine reset
 281  *
 282  * Used to reset command or data internal state machines, using respectively
 283  * SRC or SRD bit of SYSCTL register
 284  */
 285 static void mmc_reset_controller_fsm(struct hsmmc *mmc_base, u32 bit)
 286 {
 287         ulong start;
 288
 289         mmc_reg_out(&mmc_base->sysctl, bit, bit);
 290
 291         /*
 292          * CMD(DAT) lines reset procedures are slightly different
 293          * for OMAP3 and OMAP4(AM335x,OMAP5,DRA7xx).
 294          * According to OMAP3 TRM:
 295          * Set SRC(SRD) bit in MMCHS_SYSCTL register to 0x1 and wait until it
 296          * returns to 0x0.
 297          * According to OMAP4(AM335x,OMAP5,DRA7xx) TRMs, CMD(DATA) lines reset
 298          * procedure steps must be as follows:
 299          * 1. Initiate CMD(DAT) line reset by writing 0x1 to SRC(SRD) bit in
 300          *    MMCHS_SYSCTL register (SD_SYSCTL for AM335x).
 301          * 2. Poll the SRC(SRD) bit until it is set to 0x1.
 302          * 3. Wait until the SRC (SRD) bit returns to 0x0
 303          *    (reset procedure is completed).
 304          */
 305 #if defined(CONFIG_OMAP44XX) || defined(CONFIG_OMAP54XX) || \
 306         defined(CONFIG_AM33XX)
 307         if (!(readl(&mmc_base->sysctl) & bit)) {
 308                 start = get_timer(0);
 309                 while (!(readl(&mmc_base->sysctl) & bit)) {
 310                         if (get_timer(0) - start > MAX_RETRY_MS)
 311                                 return;
 312                 }
 313         }
 314 #endif
 315         start = get_timer(0);
 316         while ((readl(&mmc_base->sysctl) & bit) != 0) {
 317                 if (get_timer(0) - start > MAX_RETRY_MS) {
 318                         printf("%s: timedout waiting for sysctl %x to clear\n",
 319                                 __func__, bit);
 320                         return;
 321                 }
 322         }
 323 }
 324
 325 static int mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
 326                         struct mmc_data *data)
 327 {
 328         struct hsmmc *mmc_base;
 329         unsigned int flags, mmc_stat;
 330         ulong start;
 331
 332         mmc_base = ((struct omap_hsmmc_data *)mmc->priv)->base_addr;
 333         start = get_timer(0);
 334         while ((readl(&mmc_base->pstate) & (DATI_MASK | CMDI_MASK)) != 0) {
 335                 if (get_timer(0) - start > MAX_RETRY_MS) {
 336                         printf("%s: timedout waiting on cmd inhibit to clear\n",
 337                                         __func__);
 338                         return TIMEOUT;
 339                 }
 340         }
 341         writel(0xFFFFFFFF, &mmc_base->stat);
 342         start = get_timer(0);
 343         while (readl(&mmc_base->stat)) {
 344                 if (get_timer(0) - start > MAX_RETRY_MS) {
 345                         printf("%s: timedout waiting for STAT (%x) to clear\n",
 346                                 __func__, readl(&mmc_base->stat));
 347                         return TIMEOUT;
 348                 }
 349         }
 350         /*
 351          * CMDREG
 352          * CMDIDX[13:8] : Command index
 353          * DATAPRNT[5]  : Data Present Select
 354          * ENCMDIDX[4]  : Command Index Check Enable
 355          * ENCMDCRC[3]  : Command CRC Check Enable
 356          * RSPTYP[1:0]
 357          *      00 = No Response
 358          *      01 = Length 136
 359          *      10 = Length 48
 360          *      11 = Length 48 Check busy after response
 361          */
 362         /* Delay added before checking the status of frq change
 363          * retry not supported by mmc.c(core file)
 364          */
 365         if (cmd->cmdidx == SD_CMD_APP_SEND_SCR)
 366                 udelay(50000); /* wait 50 ms */
 367
 368         if (!(cmd->resp_type & MMC_RSP_PRESENT))
 369                 flags = 0;
 370         else if (cmd->resp_type & MMC_RSP_136)
 371                 flags = RSP_TYPE_LGHT136 | CICE_NOCHECK;
 372         else if (cmd->resp_type & MMC_RSP_BUSY)
 373                 flags = RSP_TYPE_LGHT48B;
 374         else
 375                 flags = RSP_TYPE_LGHT48;
 376
 377         /* enable default flags */
 378         flags = flags | (CMD_TYPE_NORMAL | CICE_NOCHECK | CCCE_NOCHECK |
 379                         MSBS_SGLEBLK | ACEN_DISABLE | BCE_DISABLE | DE_DISABLE);
 380
 381         if (cmd->resp_type & MMC_RSP_CRC)
 382                 flags |= CCCE_CHECK;
 383         if (cmd->resp_type & MMC_RSP_OPCODE)
 384                 flags |= CICE_CHECK;
 385
 386         if (data) {
 387                 if ((cmd->cmdidx == MMC_CMD_READ_MULTIPLE_BLOCK) ||
 388                          (cmd->cmdidx == MMC_CMD_WRITE_MULTIPLE_BLOCK)) {
 389                         flags |= (MSBS_MULTIBLK | BCE_ENABLE);
 390                         data->blocksize = 512;
 391                         writel(data->blocksize | (data->blocks << 16),
 392                                                         &mmc_base->blk);
 393                 } else
 394                         writel(data->blocksize | NBLK_STPCNT, &mmc_base->blk);
 395
 396                 if (data->flags & MMC_DATA_READ)
 397                         flags |= (DP_DATA | DDIR_READ);
 398                 else
 399                         flags |= (DP_DATA | DDIR_WRITE);
 400         }
 401
 402         writel(cmd->cmdarg, &mmc_base->arg);
 403         writel((cmd->cmdidx << 24) | flags, &mmc_base->cmd);
 404
 405         start = get_timer(0);
 406         do {
 407                 mmc_stat = readl(&mmc_base->stat);
 408                 if (get_timer(0) - start > MAX_RETRY_MS) {
 409                         printf("%s : timeout: No status update\n", __func__);
 410                         return TIMEOUT;
 411                 }
 412         } while (!mmc_stat);
 413
 414         if ((mmc_stat & IE_CTO) != 0) {
 415                 mmc_reset_controller_fsm(mmc_base, SYSCTL_SRC);
 416                 return TIMEOUT;
 417         } else if ((mmc_stat & ERRI_MASK) != 0)
 418                 return -1;
 419
 420         if (mmc_stat & CC_MASK) {
 421                 writel(CC_MASK, &mmc_base->stat);
 422                 if (cmd->resp_type & MMC_RSP_PRESENT) {
 423                         if (cmd->resp_type & MMC_RSP_136) {
 424                                 /* response type 2 */
 425                                 cmd->response[3] = readl(&mmc_base->rsp10);
 426                                 cmd->response[2] = readl(&mmc_base->rsp32);
 427                                 cmd->response[1] = readl(&mmc_base->rsp54);
 428                                 cmd->response[0] = readl(&mmc_base->rsp76);
 429                         } else
 430                                 /* response types 1, 1b, 3, 4, 5, 6 */
 431                                 cmd->response[0] = readl(&mmc_base->rsp10);
 432                 }
 433         }
 434
 435         if (data && (data->flags & MMC_DATA_READ)) {
 436                 mmc_read_data(mmc_base, data->dest,
 437                                 data->blocksize * data->blocks);
 438         } else if (data && (data->flags & MMC_DATA_WRITE)) {
 439                 mmc_write_data(mmc_base, data->src,
 440                                 data->blocksize * data->blocks);
 441         }
 442         return 0;
 443 }
 444
 445 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size)
 446 {
 447         unsigned int *output_buf = (unsigned int *)buf;
 448         unsigned int mmc_stat;
 449         unsigned int count;
 450
 451         /*
 452          * Start Polled Read
 453          */
 454         count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
 455         count /= 4;
 456
 457         while (size) {
 458                 ulong start = get_timer(0);
 459                 do {
 460                         mmc_stat = readl(&mmc_base->stat);
 461                         if (get_timer(0) - start > MAX_RETRY_MS) {
 462                                 printf("%s: timedout waiting for status!\n",
 463                                                 __func__);
 464                                 return TIMEOUT;
 465                         }
 466                 } while (mmc_stat == 0);
 467
 468                 if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
 469                         mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
 470
 471                 if ((mmc_stat & ERRI_MASK) != 0)
 472                         return 1;
 473
 474                 if (mmc_stat & BRR_MASK) {
 475                         unsigned int k;
 476
 477                         writel(readl(&mmc_base->stat) | BRR_MASK,
 478                                 &mmc_base->stat);
 479                         for (k = 0; k < count; k++) {
 480                                 *output_buf = readl(&mmc_base->data);
 481                                 output_buf++;
 482                         }
 483                         size -= (count*4);
 484                 }
 485
 486                 if (mmc_stat & BWR_MASK)
 487                         writel(readl(&mmc_base->stat) | BWR_MASK,
 488                                 &mmc_base->stat);
 489
 490                 if (mmc_stat & TC_MASK) {
 491                         writel(readl(&mmc_base->stat) | TC_MASK,
 492                                 &mmc_base->stat);
 493                         break;
 494                 }
 495         }
 496         return 0;
 497 }
 498
 499 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
 500                                 unsigned int size)
 501 {
 502         unsigned int *input_buf = (unsigned int *)buf;
 503         unsigned int mmc_stat;
 504         unsigned int count;
 505
 506         /*
 507          * Start Polled Read
 508          */
 509         count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
 510         count /= 4;
 511
 512         while (size) {
 513                 ulong start = get_timer(0);
 514                 do {
 515                         mmc_stat = readl(&mmc_base->stat);
 516                         if (get_timer(0) - start > MAX_RETRY_MS) {
 517                                 printf("%s: timedout waiting for status!\n",
 518                                                 __func__);
 519                                 return TIMEOUT;
 520                         }
 521                 } while (mmc_stat == 0);
 522
 523                 if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
 524                         mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
 525
 526                 if ((mmc_stat & ERRI_MASK) != 0)
 527                         return 1;
 528
 529                 if (mmc_stat & BWR_MASK) {
 530                         unsigned int k;
 531
 532                         writel(readl(&mmc_base->stat) | BWR_MASK,
 533                                         &mmc_base->stat);
 534                         for (k = 0; k < count; k++) {
 535                                 writel(*input_buf, &mmc_base->data);
 536                                 input_buf++;
 537                         }
 538                         size -= (count*4);
 539                 }
 540
 541                 if (mmc_stat & BRR_MASK)
 542                         writel(readl(&mmc_base->stat) | BRR_MASK,
 543                                 &mmc_base->stat);
 544
 545                 if (mmc_stat & TC_MASK) {
 546                         writel(readl(&mmc_base->stat) | TC_MASK,
 547                                 &mmc_base->stat);
 548                         break;
 549                 }
 550         }
 551         return 0;
 552 }
 553
 554 static void mmc_set_ios(struct mmc *mmc)
 555 {
 556         struct hsmmc *mmc_base;
 557         unsigned int dsor = 0;
 558         ulong start;
 559
 560         mmc_base = ((struct omap_hsmmc_data *)mmc->priv)->base_addr;
 561         /* configue bus width */
 562         switch (mmc->bus_width) {
 563         case 8:
 564                 writel(readl(&mmc_base->con) | DTW_8_BITMODE,
 565                         &mmc_base->con);
 566                 break;
 567
 568         case 4:
 569                 writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
 570                         &mmc_base->con);
 571                 writel(readl(&mmc_base->hctl) | DTW_4_BITMODE,
 572                         &mmc_base->hctl);
 573                 break;
 574
 575         case 1:
 576         default:
 577                 writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
 578                         &mmc_base->con);
 579                 writel(readl(&mmc_base->hctl) & ~DTW_4_BITMODE,
 580                         &mmc_base->hctl);
 581                 break;
 582         }
 583
 584         /* configure clock with 96Mhz system clock.
 585          */
 586         if (mmc->clock != 0) {
 587                 dsor = (MMC_CLOCK_REFERENCE * 1000000 / mmc->clock);
 588                 if ((MMC_CLOCK_REFERENCE * 1000000) / dsor > mmc->clock)
 589                         dsor++;
 590         }
 591
 592         mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
 593                                 (ICE_STOP | DTO_15THDTO | CEN_DISABLE));
 594
 595         mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
 596                                 (dsor << CLKD_OFFSET) | ICE_OSCILLATE);
 597
 598         start = get_timer(0);
 599         while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
 600                 if (get_timer(0) - start > MAX_RETRY_MS) {
 601                         printf("%s: timedout waiting for ics!\n", __func__);
 602                         return;
 603                 }
 604         }
 605         writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
 606 }
 607
 608 int omap_mmc_init(int dev_index, uint host_caps_mask, uint f_max, int cd_gpio,
 609                 int wp_gpio)
 610 {
 611         struct mmc *mmc = &hsmmc_dev[dev_index];
 612         struct omap_hsmmc_data *priv_data = &hsmmc_dev_data[dev_index];
 613
 614         sprintf(mmc->name, "OMAP SD/MMC");
 615         mmc->send_cmd = mmc_send_cmd;
 616         mmc->set_ios = mmc_set_ios;
 617         mmc->init = mmc_init_setup;
 618         mmc->priv = priv_data;
 619
 620         switch (dev_index) {
 621         case 0:
 622                 priv_data->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
 623                 break;
 624 #ifdef OMAP_HSMMC2_BASE
 625         case 1:
 626                 priv_data->base_addr = (struct hsmmc *)OMAP_HSMMC2_BASE;
 627                 break;
 628 #endif
 629 #ifdef OMAP_HSMMC3_BASE
 630         case 2:
 631                 priv_data->base_addr = (struct hsmmc *)OMAP_HSMMC3_BASE;
 632                 break;
 633 #endif
 634         default:
 635                 priv_data->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
 636                 return 1;
 637         }
 638         priv_data->cd_gpio = omap_mmc_setup_gpio_in(cd_gpio, "mmc_cd");
 639         if (priv_data->cd_gpio != -1)
 640                 mmc->getcd = omap_mmc_getcd;
 641
 642         priv_data->wp_gpio = omap_mmc_setup_gpio_in(wp_gpio, "mmc_wp");
 643         if (priv_data->wp_gpio != -1)
 644                 mmc->getwp = omap_mmc_getwp;
 645
 646         mmc->voltages = MMC_VDD_32_33 | MMC_VDD_33_34 | MMC_VDD_165_195;
 647         mmc->host_caps = (MMC_MODE_4BIT | MMC_MODE_HS_52MHz | MMC_MODE_HS |
 648                                 MMC_MODE_HC) & ~host_caps_mask;
 649
 650         mmc->f_min = 400000;
 651
 652         if (f_max != 0)
 653                 mmc->f_max = f_max;
 654         else {
 655                 if (mmc->host_caps & MMC_MODE_HS) {
 656                         if (mmc->host_caps & MMC_MODE_HS_52MHz)
 657                                 mmc->f_max = 52000000;
 658                         else
 659                                 mmc->f_max = 26000000;
 660                 } else
 661                         mmc->f_max = 20000000;
 662         }
 663
 664         mmc->b_max = 0;
 665
 666 #if defined(CONFIG_OMAP34XX)
 667         /*
 668          * Silicon revs 2.1 and older do not support multiblock transfers.
 669          */
 670         if ((get_cpu_family() == CPU_OMAP34XX) && (get_cpu_rev() <= CPU_3XX_ES21))
 671                 mmc->b_max = 1;
 672 #endif
 673
 674         mmc_register(mmc);
 675
 676         return 0;
 677 }