drivers/mmc/mxsmmc.c

   1 /*
   2  * Freescale i.MX28 SSP MMC driver
   3  *
   4  * Copyright (C) 2011 Marek Vasut <marek.vasut@gmail.com>
   5  * on behalf of DENX Software Engineering GmbH
   6  *
   7  * Based on code from LTIB:
   8  * (C) Copyright 2008-2010 Freescale Semiconductor, Inc.
   9  * Terry Lv
  10  *
  11  * Copyright 2007, Freescale Semiconductor, Inc
  12  * Andy Fleming
  13  *
  14  * Based vaguely on the pxa mmc code:
  15  * (C) Copyright 2003
  16  * Kyle Harris, Nexus Technologies, Inc. kharris@nexus-tech.net
  17  *
  18  * See file CREDITS for list of people who contributed to this
  19  * project.
  20  *
  21  * This program is free software; you can redistribute it and/or
  22  * modify it under the terms of the GNU General Public License as
  23  * published by the Free Software Foundation; either version 2 of
  24  * the License, or (at your option) any later version.
  25  *
  26  * This program is distributed in the hope that it will be useful,
  27  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  28  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  29  * GNU General Public License for more details.
  30  *
  31  * You should have received a copy of the GNU General Public License
  32  * along with this program; if not, write to the Free Software
  33  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  34  * MA 02111-1307 USA
  35  */
  36 #include <common.h>
  37 #include <malloc.h>
  38 #include <mmc.h>
  39 #include <asm/errno.h>
  40 #include <asm/io.h>
  41 #include <asm/arch/clock.h>
  42 #include <asm/arch/imx-regs.h>
  43 #include <asm/arch/sys_proto.h>
  44 #include <asm/arch/dma.h>
  45
  46 /*
  47  * CONFIG_MXS_MMC_DMA: This feature is highly experimental and has no
  48  *                     performance benefit unless you operate the platform with
  49  *                     data cache enabled. This is disabled by default, enable
  50  *                     only if you know what you're doing.
  51  */
  52
  53 struct mxsmmc_priv {
  54         int                     id;
  55         struct mx28_ssp_regs    *regs;
  56         uint32_t                clkseq_bypass;
  57         uint32_t                *clkctrl_ssp;
  58         uint32_t                buswidth;
  59         int                     (*mmc_is_wp)(int);
  60         struct mxs_dma_desc     *desc;
  61 };
  62
  63 #define MXSMMC_MAX_TIMEOUT      10000
  64
  65 /*
  66  * Sends a command out on the bus.  Takes the mmc pointer,
  67  * a command pointer, and an optional data pointer.
  68  */
  69 static int
  70 mxsmmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd, struct mmc_data *data)
  71 {
  72         struct mxsmmc_priv *priv = (struct mxsmmc_priv *)mmc->priv;
  73         struct mx28_ssp_regs *ssp_regs = priv->regs;
  74         uint32_t reg;
  75         int timeout;
  76         uint32_t data_count;
  77         uint32_t ctrl0;
  78         const uint32_t busy_stat = SSP_STATUS_BUSY | SSP_STATUS_DATA_BUSY |
  79                 SSP_STATUS_CMD_BUSY;
  80 #ifndef CONFIG_MXS_MMC_DMA
  81         uint32_t *data_ptr;
  82 #else
  83         uint32_t cache_data_count;
  84 #endif
  85
  86         debug("MMC%d: CMD%d\n", mmc->block_dev.dev, cmd->cmdidx);
  87
  88         /* Check bus busy */
  89         timeout = MXSMMC_MAX_TIMEOUT;
  90         while ((reg = readl(&ssp_regs->hw_ssp_status)) & busy_stat) {
  91                 if (timeout-- <= 0)
  92                         break;
  93                 udelay(1000);
  94         }
  95         if (reg & busy_stat && readl(&ssp_regs->hw_ssp_status) & busy_stat) {
  96                 printf("MMC%d: Bus busy timeout!\n", mmc->block_dev.dev);
  97                 return TIMEOUT;
  98         }
  99
 100         /* See if card is present */
 101         if (readl(&ssp_regs->hw_ssp_status) & SSP_STATUS_CARD_DETECT) {
 102                 printf("MMC%d: No card detected!\n", mmc->block_dev.dev);
 103                 return NO_CARD_ERR;
 104         }
 105
 106         /* Start building CTRL0 contents */
 107         ctrl0 = priv->buswidth;
 108
 109         /* Set up command */
 110         if (!(cmd->resp_type & MMC_RSP_CRC))
 111                 ctrl0 |= SSP_CTRL0_IGNORE_CRC;
 112         if (cmd->resp_type & MMC_RSP_PRESENT)   /* Need to get response */
 113                 ctrl0 |= SSP_CTRL0_GET_RESP;
 114         if (cmd->resp_type & MMC_RSP_136)       /* It's a 136 bits response */
 115                 ctrl0 |= SSP_CTRL0_LONG_RESP;
 116
 117         /* Command index */
 118         reg = readl(&ssp_regs->hw_ssp_cmd0);
 119         reg &= ~(SSP_CMD0_CMD_MASK | SSP_CMD0_APPEND_8CYC);
 120         reg |= cmd->cmdidx << SSP_CMD0_CMD_OFFSET;
 121         if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
 122                 reg |= SSP_CMD0_APPEND_8CYC;
 123         writel(reg, &ssp_regs->hw_ssp_cmd0);
 124
 125         /* Command argument */
 126         writel(cmd->cmdarg, &ssp_regs->hw_ssp_cmd1);
 127
 128         /* Set up data */
 129         if (data) {
 130                 /* READ or WRITE */
 131                 if (data->flags & MMC_DATA_READ) {
 132                         ctrl0 |= SSP_CTRL0_READ;
 133                 } else if (priv->mmc_is_wp &&
 134                         priv->mmc_is_wp(mmc->block_dev.dev)) {
 135                         printf("MMC%d: Can not write a locked card!\n",
 136                                 mmc->block_dev.dev);
 137                         return UNUSABLE_ERR;
 138                 }
 139
 140                 ctrl0 |= SSP_CTRL0_DATA_XFER;
 141                 reg = ((data->blocks - 1) <<
 142                         SSP_BLOCK_SIZE_BLOCK_COUNT_OFFSET) |
 143                         ((ffs(data->blocksize) - 1) <<
 144                         SSP_BLOCK_SIZE_BLOCK_SIZE_OFFSET);
 145                 writel(reg, &ssp_regs->hw_ssp_block_size);
 146
 147                 reg = data->blocksize * data->blocks;
 148                 writel(reg, &ssp_regs->hw_ssp_xfer_size);
 149         }
 150
 151         /* Kick off the command */
 152         ctrl0 |= SSP_CTRL0_WAIT_FOR_IRQ | SSP_CTRL0_ENABLE | SSP_CTRL0_RUN;
 153         writel(ctrl0, &ssp_regs->hw_ssp_ctrl0);
 154
 155         /* Wait for the command to complete */
 156         timeout = MXSMMC_MAX_TIMEOUT;
 157         while (--timeout) {
 158                 udelay(1000);
 159                 reg = readl(&ssp_regs->hw_ssp_status);
 160                 if (!(reg & SSP_STATUS_CMD_BUSY))
 161                         break;
 162         }
 163         if ((reg & SSP_STATUS_CMD_BUSY) &&
 164                 (readl(&ssp_regs->hw_ssp_status) & SSP_STATUS_CMD_BUSY)) {
 165                 printf("MMC%d: Command %d busy\n",
 166                         mmc->block_dev.dev, cmd->cmdidx);
 167                 return TIMEOUT;
 168         }
 169
 170         /* Check command timeout */
 171         if (reg & SSP_STATUS_RESP_TIMEOUT) {
 172                 printf("MMC%d: Command %d timeout (status 0x%08x)\n",
 173                         mmc->block_dev.dev, cmd->cmdidx, reg);
 174                 return TIMEOUT;
 175         }
 176
 177         /* Check command errors */
 178         if (reg & (SSP_STATUS_RESP_CRC_ERR | SSP_STATUS_RESP_ERR)) {
 179                 printf("MMC%d: Command %d error (status 0x%08x)!\n",
 180                         mmc->block_dev.dev, cmd->cmdidx, reg);
 181                 return COMM_ERR;
 182         }
 183
 184         /* Copy response to response buffer */
 185         if (cmd->resp_type & MMC_RSP_136) {
 186                 cmd->response[3] = readl(&ssp_regs->hw_ssp_sdresp0);
 187                 cmd->response[2] = readl(&ssp_regs->hw_ssp_sdresp1);
 188                 cmd->response[1] = readl(&ssp_regs->hw_ssp_sdresp2);
 189                 cmd->response[0] = readl(&ssp_regs->hw_ssp_sdresp3);
 190         } else
 191                 cmd->response[0] = readl(&ssp_regs->hw_ssp_sdresp0);
 192
 193         /* Return if no data to process */
 194         if (!data)
 195                 return 0;
 196
 197         data_count = data->blocksize * data->blocks;
 198         timeout = get_timer(0);
 199
 200 #ifdef CONFIG_MXS_MMC_DMA
 201         if (data_count % ARCH_DMA_MINALIGN)
 202                 cache_data_count = roundup(data_count, ARCH_DMA_MINALIGN);
 203         else
 204                 cache_data_count = data_count;
 205
 206         if (data->flags & MMC_DATA_READ) {
 207                 priv->desc->cmd.data = MXS_DMA_DESC_COMMAND_DMA_WRITE;
 208                 priv->desc->cmd.address = (dma_addr_t)data->dest;
 209         } else {
 210                 priv->desc->cmd.data = MXS_DMA_DESC_COMMAND_DMA_READ;
 211                 priv->desc->cmd.address = (dma_addr_t)data->src;
 212
 213                 /* Flush data to DRAM so DMA can pick them up */
 214                 flush_dcache_range((uint32_t)priv->desc->cmd.address,
 215                         (uint32_t)(priv->desc->cmd.address + cache_data_count));
 216         }
 217
 218         priv->desc->cmd.data |= MXS_DMA_DESC_IRQ | MXS_DMA_DESC_DEC_SEM |
 219                                 (data_count << MXS_DMA_DESC_BYTES_OFFSET);
 220
 221
 222         mxs_dma_desc_append(MXS_DMA_CHANNEL_AHB_APBH_SSP0, priv->desc);
 223         if (mxs_dma_go(MXS_DMA_CHANNEL_AHB_APBH_SSP0)) {
 224                 printf("MMC%d: DMA transfer failed\n", mmc->block_dev.dev);
 225                 return COMM_ERR;
 226         }
 227
 228         /* The data arrived into DRAM, invalidate cache over them */
 229         if (data->flags & MMC_DATA_READ) {
 230                 invalidate_dcache_range((uint32_t)priv->desc->cmd.address,
 231                         (uint32_t)(priv->desc->cmd.address + cache_data_count));
 232         }
 233 #else
 234         if (data->flags & MMC_DATA_READ) {
 235                 data_ptr = (uint32_t *)data->dest;
 236                 while (data_count) {
 237                         reg = readl(&ssp_regs->hw_ssp_status);
 238                         if (!(reg & SSP_STATUS_FIFO_EMPTY)) {
 239                                 *data_ptr++ = readl(&ssp_regs->hw_ssp_data);
 240                                 data_count -= 4;
 241                                 timeout = get_timer(0);
 242                         } else if ((get_timer(timeout) > MXSMMC_MAX_TIMEOUT) &&
 243                                 (readl(&ssp_regs->hw_ssp_status) & SSP_STATUS_FIFO_EMPTY)) {
 244                                 break;
 245                         }
 246                 }
 247         } else {
 248                 data_ptr = (uint32_t *)data->src;
 249                 while (data_count) {
 250                         reg = readl(&ssp_regs->hw_ssp_status);
 251                         if (!(reg & SSP_STATUS_FIFO_FULL)) {
 252                                 writel(*data_ptr++, &ssp_regs->hw_ssp_data);
 253                                 data_count -= 4;
 254                                 timeout = get_timer(0);
 255                         } else if ((get_timer(timeout) > MXSMMC_MAX_TIMEOUT * 100) &&
 256                                 (readl(&ssp_regs->hw_ssp_status) & SSP_STATUS_FIFO_FULL)) {
 257                                         break;
 258                         }
 259                 }
 260         }
 261
 262         if (data_count) {
 263                 printf("MMC%d: Data timeout with command %d (status 0x%08x)!\n",
 264                         mmc->block_dev.dev, cmd->cmdidx, reg);
 265                 return COMM_ERR;
 266         }
 267 #endif
 268
 269         /* Check data errors */
 270         reg = readl(&ssp_regs->hw_ssp_status);
 271         if (reg &
 272                 (SSP_STATUS_TIMEOUT | SSP_STATUS_DATA_CRC_ERR |
 273                 SSP_STATUS_FIFO_OVRFLW | SSP_STATUS_FIFO_UNDRFLW)) {
 274                 printf("MMC%d: Data error with command %d (status 0x%08x)!\n",
 275                         mmc->block_dev.dev, cmd->cmdidx, reg);
 276                 return COMM_ERR;
 277         }
 278
 279         return 0;
 280 }
 281
 282 static void mxsmmc_set_ios(struct mmc *mmc)
 283 {
 284         struct mxsmmc_priv *priv = (struct mxsmmc_priv *)mmc->priv;
 285         struct mx28_ssp_regs *ssp_regs = priv->regs;
 286
 287         /* Set the clock speed */
 288         if (mmc->clock)
 289                 mx28_set_ssp_busclock(priv->id, mmc->clock / 1000);
 290
 291         switch (mmc->bus_width) {
 292         case 1:
 293                 priv->buswidth = SSP_CTRL0_BUS_WIDTH_ONE_BIT;
 294                 break;
 295         case 4:
 296                 priv->buswidth = SSP_CTRL0_BUS_WIDTH_FOUR_BIT;
 297                 break;
 298         case 8:
 299                 priv->buswidth = SSP_CTRL0_BUS_WIDTH_EIGHT_BIT;
 300                 break;
 301         }
 302
 303         /* Set the bus width */
 304         clrsetbits_le32(&ssp_regs->hw_ssp_ctrl0,
 305                         SSP_CTRL0_BUS_WIDTH_MASK, priv->buswidth);
 306
 307         debug("MMC%d: Set %d bits bus width\n",
 308                 mmc->block_dev.dev, mmc->bus_width);
 309 }
 310
 311 static int mxsmmc_init(struct mmc *mmc)
 312 {
 313         struct mxsmmc_priv *priv = (struct mxsmmc_priv *)mmc->priv;
 314         struct mx28_ssp_regs *ssp_regs = priv->regs;
 315
 316         /* Reset SSP */
 317         mx28_reset_block(&ssp_regs->hw_ssp_ctrl0_reg);
 318
 319         /* 8 bits word length in MMC mode */
 320         clrsetbits_le32(&ssp_regs->hw_ssp_ctrl1,
 321                 SSP_CTRL1_SSP_MODE_MASK | SSP_CTRL1_WORD_LENGTH_MASK,
 322                 SSP_CTRL1_SSP_MODE_SD_MMC | SSP_CTRL1_WORD_LENGTH_EIGHT_BITS |
 323                 SSP_CTRL1_DMA_ENABLE);
 324
 325         /* Set initial bit clock 400 KHz */
 326         mx28_set_ssp_busclock(priv->id, 400);
 327
 328         /* Send initial 74 clock cycles (185 us @ 400 KHz)*/
 329         writel(SSP_CMD0_CONT_CLKING_EN, &ssp_regs->hw_ssp_cmd0_set);
 330         udelay(200);
 331         writel(SSP_CMD0_CONT_CLKING_EN, &ssp_regs->hw_ssp_cmd0_clr);
 332
 333         return 0;
 334 }
 335
 336 int mxsmmc_initialize(bd_t *bis, int id, int (*wp)(int))
 337 {
 338         struct mx28_clkctrl_regs *clkctrl_regs =
 339                 (struct mx28_clkctrl_regs *)MXS_CLKCTRL_BASE;
 340         struct mmc *mmc = NULL;
 341         struct mxsmmc_priv *priv = NULL;
 342         int ret;
 343
 344         mmc = calloc(sizeof(struct mmc), 1);
 345         if (!mmc)
 346                 return -ENOMEM;
 347
 348         priv = calloc(sizeof(struct mxsmmc_priv), 1);
 349         if (!priv) {
 350                 free(mmc);
 351                 return -ENOMEM;
 352         }
 353
 354         priv->desc = mxs_dma_desc_alloc();
 355         if (!priv->desc) {
 356                 free(priv);
 357                 free(mmc);
 358                 return -ENOMEM;
 359         }
 360
 361         ret = mxs_dma_init_channel(id);
 362         if (ret)
 363                 return ret;
 364
 365         priv->mmc_is_wp = wp;
 366         priv->id = id;
 367         switch (id) {
 368         case 0:
 369                 priv->regs = (struct mx28_ssp_regs *)MXS_SSP0_BASE;
 370                 priv->clkseq_bypass = CLKCTRL_CLKSEQ_BYPASS_SSP0;
 371                 priv->clkctrl_ssp = &clkctrl_regs->hw_clkctrl_ssp0;
 372                 break;
 373         case 1:
 374                 priv->regs = (struct mx28_ssp_regs *)MXS_SSP1_BASE;
 375                 priv->clkseq_bypass = CLKCTRL_CLKSEQ_BYPASS_SSP1;
 376                 priv->clkctrl_ssp = &clkctrl_regs->hw_clkctrl_ssp1;
 377                 break;
 378         case 2:
 379                 priv->regs = (struct mx28_ssp_regs *)MXS_SSP2_BASE;
 380                 priv->clkseq_bypass = CLKCTRL_CLKSEQ_BYPASS_SSP2;
 381                 priv->clkctrl_ssp = &clkctrl_regs->hw_clkctrl_ssp2;
 382                 break;
 383         case 3:
 384                 priv->regs = (struct mx28_ssp_regs *)MXS_SSP3_BASE;
 385                 priv->clkseq_bypass = CLKCTRL_CLKSEQ_BYPASS_SSP3;
 386                 priv->clkctrl_ssp = &clkctrl_regs->hw_clkctrl_ssp3;
 387                 break;
 388         }
 389
 390         sprintf(mmc->name, "MXS MMC");
 391         mmc->send_cmd = mxsmmc_send_cmd;
 392         mmc->set_ios = mxsmmc_set_ios;
 393         mmc->init = mxsmmc_init;
 394         mmc->getcd = NULL;
 395         mmc->priv = priv;
 396
 397         mmc->voltages = MMC_VDD_32_33 | MMC_VDD_33_34;
 398
 399         mmc->host_caps = MMC_MODE_4BIT | MMC_MODE_8BIT |
 400                          MMC_MODE_HS_52MHz | MMC_MODE_HS;
 401
 402         mmc->f_min = 400000;
 403         mmc->f_max = mxc_get_clock(MXC_SSP0_CLK + id) * 1000 / 2;
 404         mmc->b_max = 0x40;
 405
 406         mmc_register(mmc);
 407         return 0;
 408 }