git.oblomov.eu Git - linux-2.6/blob - drivers/mmc/host/mvsdio.c

   1 /*
   2  * Marvell MMC/SD/SDIO driver
   3  *
   4  * Authors: Maen Suleiman, Nicolas Pitre
   5  * Copyright (C) 2008-2009 Marvell Ltd.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License version 2 as
   9  * published by the Free Software Foundation.
  10  */
  11
  12 #include <linux/module.h>
  13 #include <linux/init.h>
  14 #include <linux/io.h>
  15 #include <linux/platform_device.h>
  16 #include <linux/mbus.h>
  17 #include <linux/delay.h>
  18 #include <linux/interrupt.h>
  19 #include <linux/dma-mapping.h>
  20 #include <linux/scatterlist.h>
  21 #include <linux/irq.h>
  22 #include <linux/gpio.h>
  23 #include <linux/mmc/host.h>
  24
  25 #include <asm/sizes.h>
  26 #include <asm/unaligned.h>
  27 #include <plat/mvsdio.h>
  28
  29 #include "mvsdio.h"
  30
  31 #define DRIVER_NAME     "mvsdio"
  32
  33 static int maxfreq = MVSD_CLOCKRATE_MAX;
  34 static int nodma;
  35
  36 struct mvsd_host {
  37         void __iomem *base;
  38         struct mmc_request *mrq;
  39         spinlock_t lock;
  40         unsigned int xfer_mode;
  41         unsigned int intr_en;
  42         unsigned int ctrl;
  43         unsigned int pio_size;
  44         void *pio_ptr;
  45         unsigned int sg_frags;
  46         unsigned int ns_per_clk;
  47         unsigned int clock;
  48         unsigned int base_clock;
  49         struct timer_list timer;
  50         struct mmc_host *mmc;
  51         struct device *dev;
  52         struct resource *res;
  53         int irq;
  54         int gpio_card_detect;
  55         int gpio_write_protect;
  56 };
  57
  58 #define mvsd_write(offs, val)   writel(val, iobase + (offs))
  59 #define mvsd_read(offs)         readl(iobase + (offs))
  60
  61 static int mvsd_setup_data(struct mvsd_host *host, struct mmc_data *data)
  62 {
  63         void __iomem *iobase = host->base;
  64         unsigned int tmout;
  65         int tmout_index;
  66
  67         /*
  68          * Hardware weirdness.  The FIFO_EMPTY bit of the HW_STATE
  69          * register is sometimes not set before a while when some
  70          * "unusual" data block sizes are used (such as with the SWITCH
  71          * command), even despite the fact that the XFER_DONE interrupt
  72          * was raised.  And if another data transfer starts before
  73          * this bit comes to good sense (which eventually happens by
  74          * itself) then the new transfer simply fails with a timeout.
  75          */
  76         if (!(mvsd_read(MVSD_HW_STATE) & (1 << 13))) {
  77                 unsigned long t = jiffies + HZ;
  78                 unsigned int hw_state,  count = 0;
  79                 do {
  80                         if (time_after(jiffies, t)) {
  81                                 dev_warn(host->dev, "FIFO_EMPTY bit missing\n");
  82                                 break;
  83                         }
  84                         hw_state = mvsd_read(MVSD_HW_STATE);
  85                         count++;
  86                 } while (!(hw_state & (1 << 13)));
  87                 dev_dbg(host->dev, "*** wait for FIFO_EMPTY bit "
  88                                    "(hw=0x%04x, count=%d, jiffies=%ld)\n",
  89                                    hw_state, count, jiffies - (t - HZ));
  90         }
  91
  92         /* If timeout=0 then maximum timeout index is used. */
  93         tmout = DIV_ROUND_UP(data->timeout_ns, host->ns_per_clk);
  94         tmout += data->timeout_clks;
  95         tmout_index = fls(tmout - 1) - 12;
  96         if (tmout_index < 0)
  97                 tmout_index = 0;
  98         if (tmout_index > MVSD_HOST_CTRL_TMOUT_MAX)
  99                 tmout_index = MVSD_HOST_CTRL_TMOUT_MAX;
 100
 101         dev_dbg(host->dev, "data %s at 0x%08x: blocks=%d blksz=%d tmout=%u (%d)\n",
 102                 (data->flags & MMC_DATA_READ) ? "read" : "write",
 103                 (u32)sg_virt(data->sg), data->blocks, data->blksz,
 104                 tmout, tmout_index);
 105
 106         host->ctrl &= ~MVSD_HOST_CTRL_TMOUT_MASK;
 107         host->ctrl |= MVSD_HOST_CTRL_TMOUT(tmout_index);
 108         mvsd_write(MVSD_HOST_CTRL, host->ctrl);
 109         mvsd_write(MVSD_BLK_COUNT, data->blocks);
 110         mvsd_write(MVSD_BLK_SIZE, data->blksz);
 111
 112         if (nodma || (data->blksz | data->sg->offset) & 3) {
 113                 /*
 114                  * We cannot do DMA on a buffer which offset or size
 115                  * is not aligned on a 4-byte boundary.
 116                  */
 117                 host->pio_size = data->blocks * data->blksz;
 118                 host->pio_ptr = sg_virt(data->sg);
 119                 if (!nodma)
 120                         printk(KERN_DEBUG "%s: fallback to PIO for data "
 121                                           "at 0x%p size %d\n",
 122                                           mmc_hostname(host->mmc),
 123                                           host->pio_ptr, host->pio_size);
 124                 return 1;
 125         } else {
 126                 dma_addr_t phys_addr;
 127                 int dma_dir = (data->flags & MMC_DATA_READ) ?
 128                         DMA_FROM_DEVICE : DMA_TO_DEVICE;
 129                 host->sg_frags = dma_map_sg(mmc_dev(host->mmc), data->sg,
 130                                             data->sg_len, dma_dir);
 131                 phys_addr = sg_dma_address(data->sg);
 132                 mvsd_write(MVSD_SYS_ADDR_LOW, (u32)phys_addr & 0xffff);
 133                 mvsd_write(MVSD_SYS_ADDR_HI,  (u32)phys_addr >> 16);
 134                 return 0;
 135         }
 136 }
 137
 138 static void mvsd_request(struct mmc_host *mmc, struct mmc_request *mrq)
 139 {
 140         struct mvsd_host *host = mmc_priv(mmc);
 141         void __iomem *iobase = host->base;
 142         struct mmc_command *cmd = mrq->cmd;
 143         u32 cmdreg = 0, xfer = 0, intr = 0;
 144         unsigned long flags;
 145
 146         BUG_ON(host->mrq != NULL);
 147         host->mrq = mrq;
 148
 149         dev_dbg(host->dev, "cmd %d (hw state 0x%04x)\n",
 150                 cmd->opcode, mvsd_read(MVSD_HW_STATE));
 151
 152         cmdreg = MVSD_CMD_INDEX(cmd->opcode);
 153
 154         if (cmd->flags & MMC_RSP_BUSY)
 155                 cmdreg |= MVSD_CMD_RSP_48BUSY;
 156         else if (cmd->flags & MMC_RSP_136)
 157                 cmdreg |= MVSD_CMD_RSP_136;
 158         else if (cmd->flags & MMC_RSP_PRESENT)
 159                 cmdreg |= MVSD_CMD_RSP_48;
 160         else
 161                 cmdreg |= MVSD_CMD_RSP_NONE;
 162
 163         if (cmd->flags & MMC_RSP_CRC)
 164                 cmdreg |= MVSD_CMD_CHECK_CMDCRC;
 165
 166         if (cmd->flags & MMC_RSP_OPCODE)
 167                 cmdreg |= MVSD_CMD_INDX_CHECK;
 168
 169         if (cmd->flags & MMC_RSP_PRESENT) {
 170                 cmdreg |= MVSD_UNEXPECTED_RESP;
 171                 intr |= MVSD_NOR_UNEXP_RSP;
 172         }
 173
 174         if (mrq->data) {
 175                 struct mmc_data *data = mrq->data;
 176                 int pio;
 177
 178                 cmdreg |= MVSD_CMD_DATA_PRESENT | MVSD_CMD_CHECK_DATACRC16;
 179                 xfer |= MVSD_XFER_MODE_HW_WR_DATA_EN;
 180                 if (data->flags & MMC_DATA_READ)
 181                         xfer |= MVSD_XFER_MODE_TO_HOST;
 182
 183                 pio = mvsd_setup_data(host, data);
 184                 if (pio) {
 185                         xfer |= MVSD_XFER_MODE_PIO;
 186                         /* PIO section of mvsd_irq has comments on those bits */
 187                         if (data->flags & MMC_DATA_WRITE)
 188                                 intr |= MVSD_NOR_TX_AVAIL;
 189                         else if (host->pio_size > 32)
 190                                 intr |= MVSD_NOR_RX_FIFO_8W;
 191                         else
 192                                 intr |= MVSD_NOR_RX_READY;
 193                 }
 194
 195                 if (data->stop) {
 196                         struct mmc_command *stop = data->stop;
 197                         u32 cmd12reg = 0;
 198
 199                         mvsd_write(MVSD_AUTOCMD12_ARG_LOW, stop->arg & 0xffff);
 200                         mvsd_write(MVSD_AUTOCMD12_ARG_HI,  stop->arg >> 16);
 201
 202                         if (stop->flags & MMC_RSP_BUSY)
 203                                 cmd12reg |= MVSD_AUTOCMD12_BUSY;
 204                         if (stop->flags & MMC_RSP_OPCODE)
 205                                 cmd12reg |= MVSD_AUTOCMD12_INDX_CHECK;
 206                         cmd12reg |= MVSD_AUTOCMD12_INDEX(stop->opcode);
 207                         mvsd_write(MVSD_AUTOCMD12_CMD, cmd12reg);
 208
 209                         xfer |= MVSD_XFER_MODE_AUTO_CMD12;
 210                         intr |= MVSD_NOR_AUTOCMD12_DONE;
 211                 } else {
 212                         intr |= MVSD_NOR_XFER_DONE;
 213                 }
 214         } else {
 215                 intr |= MVSD_NOR_CMD_DONE;
 216         }
 217
 218         mvsd_write(MVSD_ARG_LOW, cmd->arg & 0xffff);
 219         mvsd_write(MVSD_ARG_HI,  cmd->arg >> 16);
 220
 221         spin_lock_irqsave(&host->lock, flags);
 222
 223         host->xfer_mode &= MVSD_XFER_MODE_INT_CHK_EN;
 224         host->xfer_mode |= xfer;
 225         mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
 226
 227         mvsd_write(MVSD_NOR_INTR_STATUS, ~MVSD_NOR_CARD_INT);
 228         mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
 229         mvsd_write(MVSD_CMD, cmdreg);
 230
 231         host->intr_en &= MVSD_NOR_CARD_INT;
 232         host->intr_en |= intr | MVSD_NOR_ERROR;
 233         mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 234         mvsd_write(MVSD_ERR_INTR_EN, 0xffff);
 235
 236         mod_timer(&host->timer, jiffies + 5 * HZ);
 237
 238         spin_unlock_irqrestore(&host->lock, flags);
 239 }
 240
 241 static u32 mvsd_finish_cmd(struct mvsd_host *host, struct mmc_command *cmd,
 242                            u32 err_status)
 243 {
 244         void __iomem *iobase = host->base;
 245
 246         if (cmd->flags & MMC_RSP_136) {
 247                 unsigned int response[8], i;
 248                 for (i = 0; i < 8; i++)
 249                         response[i] = mvsd_read(MVSD_RSP(i));
 250                 cmd->resp[0] =          ((response[0] & 0x03ff) << 22) |
 251                                         ((response[1] & 0xffff) << 6) |
 252                                         ((response[2] & 0xfc00) >> 10);
 253                 cmd->resp[1] =          ((response[2] & 0x03ff) << 22) |
 254                                         ((response[3] & 0xffff) << 6) |
 255                                         ((response[4] & 0xfc00) >> 10);
 256                 cmd->resp[2] =          ((response[4] & 0x03ff) << 22) |
 257                                         ((response[5] & 0xffff) << 6) |
 258                                         ((response[6] & 0xfc00) >> 10);
 259                 cmd->resp[3] =          ((response[6] & 0x03ff) << 22) |
 260                                         ((response[7] & 0x3fff) << 8);
 261         } else if (cmd->flags & MMC_RSP_PRESENT) {
 262                 unsigned int response[3], i;
 263                 for (i = 0; i < 3; i++)
 264                         response[i] = mvsd_read(MVSD_RSP(i));
 265                 cmd->resp[0] =          ((response[2] & 0x003f) << (8 - 8)) |
 266                                         ((response[1] & 0xffff) << (14 - 8)) |
 267                                         ((response[0] & 0x03ff) << (30 - 8));
 268                 cmd->resp[1] =          ((response[0] & 0xfc00) >> 10);
 269                 cmd->resp[2] = 0;
 270                 cmd->resp[3] = 0;
 271         }
 272
 273         if (err_status & MVSD_ERR_CMD_TIMEOUT) {
 274                 cmd->error = -ETIMEDOUT;
 275         } else if (err_status & (MVSD_ERR_CMD_CRC | MVSD_ERR_CMD_ENDBIT |
 276                                  MVSD_ERR_CMD_INDEX | MVSD_ERR_CMD_STARTBIT)) {
 277                 cmd->error = -EILSEQ;
 278         }
 279         err_status &= ~(MVSD_ERR_CMD_TIMEOUT | MVSD_ERR_CMD_CRC |
 280                         MVSD_ERR_CMD_ENDBIT | MVSD_ERR_CMD_INDEX |
 281                         MVSD_ERR_CMD_STARTBIT);
 282
 283         return err_status;
 284 }
 285
 286 static u32 mvsd_finish_data(struct mvsd_host *host, struct mmc_data *data,
 287                             u32 err_status)
 288 {
 289         void __iomem *iobase = host->base;
 290
 291         if (host->pio_ptr) {
 292                 host->pio_ptr = NULL;
 293                 host->pio_size = 0;
 294         } else {
 295                 dma_unmap_sg(mmc_dev(host->mmc), data->sg, host->sg_frags,
 296                              (data->flags & MMC_DATA_READ) ?
 297                                 DMA_FROM_DEVICE : DMA_TO_DEVICE);
 298         }
 299
 300         if (err_status & MVSD_ERR_DATA_TIMEOUT)
 301                 data->error = -ETIMEDOUT;
 302         else if (err_status & (MVSD_ERR_DATA_CRC | MVSD_ERR_DATA_ENDBIT))
 303                 data->error = -EILSEQ;
 304         else if (err_status & MVSD_ERR_XFER_SIZE)
 305                 data->error = -EBADE;
 306         err_status &= ~(MVSD_ERR_DATA_TIMEOUT | MVSD_ERR_DATA_CRC |
 307                         MVSD_ERR_DATA_ENDBIT | MVSD_ERR_XFER_SIZE);
 308
 309         dev_dbg(host->dev, "data done: blocks_left=%d, bytes_left=%d\n",
 310                 mvsd_read(MVSD_CURR_BLK_LEFT), mvsd_read(MVSD_CURR_BYTE_LEFT));
 311         data->bytes_xfered =
 312                 (data->blocks - mvsd_read(MVSD_CURR_BLK_LEFT)) * data->blksz;
 313         /* We can't be sure about the last block when errors are detected */
 314         if (data->bytes_xfered && data->error)
 315                 data->bytes_xfered -= data->blksz;
 316
 317         /* Handle Auto cmd 12 response */
 318         if (data->stop) {
 319                 unsigned int response[3], i;
 320                 for (i = 0; i < 3; i++)
 321                         response[i] = mvsd_read(MVSD_AUTO_RSP(i));
 322                 data->stop->resp[0] =   ((response[2] & 0x003f) << (8 - 8)) |
 323                                         ((response[1] & 0xffff) << (14 - 8)) |
 324                                         ((response[0] & 0x03ff) << (30 - 8));
 325                 data->stop->resp[1] =   ((response[0] & 0xfc00) >> 10);
 326                 data->stop->resp[2] = 0;
 327                 data->stop->resp[3] = 0;
 328
 329                 if (err_status & MVSD_ERR_AUTOCMD12) {
 330                         u32 err_cmd12 = mvsd_read(MVSD_AUTOCMD12_ERR_STATUS);
 331                         dev_dbg(host->dev, "c12err 0x%04x\n", err_cmd12);
 332                         if (err_cmd12 & MVSD_AUTOCMD12_ERR_NOTEXE)
 333                                 data->stop->error = -ENOEXEC;
 334                         else if (err_cmd12 & MVSD_AUTOCMD12_ERR_TIMEOUT)
 335                                 data->stop->error = -ETIMEDOUT;
 336                         else if (err_cmd12)
 337                                 data->stop->error = -EILSEQ;
 338                         err_status &= ~MVSD_ERR_AUTOCMD12;
 339                 }
 340         }
 341
 342         return err_status;
 343 }
 344
 345 static irqreturn_t mvsd_irq(int irq, void *dev)
 346 {
 347         struct mvsd_host *host = dev;
 348         void __iomem *iobase = host->base;
 349         u32 intr_status, intr_done_mask;
 350         int irq_handled = 0;
 351
 352         intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 353         dev_dbg(host->dev, "intr 0x%04x intr_en 0x%04x hw_state 0x%04x\n",
 354                 intr_status, mvsd_read(MVSD_NOR_INTR_EN),
 355                 mvsd_read(MVSD_HW_STATE));
 356
 357         spin_lock(&host->lock);
 358
 359         /* PIO handling, if needed. Messy business... */
 360         if (host->pio_size &&
 361             (intr_status & host->intr_en &
 362              (MVSD_NOR_RX_READY | MVSD_NOR_RX_FIFO_8W))) {
 363                 u16 *p = host->pio_ptr;
 364                 int s = host->pio_size;
 365                 while (s >= 32 && (intr_status & MVSD_NOR_RX_FIFO_8W)) {
 366                         readsw(iobase + MVSD_FIFO, p, 16);
 367                         p += 16;
 368                         s -= 32;
 369                         intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 370                 }
 371                 /*
 372                  * Normally we'd use < 32 here, but the RX_FIFO_8W bit
 373                  * doesn't appear to assert when there is exactly 32 bytes
 374                  * (8 words) left to fetch in a transfer.
 375                  */
 376                 if (s <= 32) {
 377                         while (s >= 4 && (intr_status & MVSD_NOR_RX_READY)) {
 378                                 put_unaligned(mvsd_read(MVSD_FIFO), p++);
 379                                 put_unaligned(mvsd_read(MVSD_FIFO), p++);
 380                                 s -= 4;
 381                                 intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 382                         }
 383                         if (s && s < 4 && (intr_status & MVSD_NOR_RX_READY)) {
 384                                 u16 val[2] = {0, 0};
 385                                 val[0] = mvsd_read(MVSD_FIFO);
 386                                 val[1] = mvsd_read(MVSD_FIFO);
 387                                 memcpy(p, &val, s);
 388                                 s = 0;
 389                                 intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 390                         }
 391                         if (s == 0) {
 392                                 host->intr_en &=
 393                                      ~(MVSD_NOR_RX_READY | MVSD_NOR_RX_FIFO_8W);
 394                                 mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 395                         } else if (host->intr_en & MVSD_NOR_RX_FIFO_8W) {
 396                                 host->intr_en &= ~MVSD_NOR_RX_FIFO_8W;
 397                                 host->intr_en |= MVSD_NOR_RX_READY;
 398                                 mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 399                         }
 400                 }
 401                 dev_dbg(host->dev, "pio %d intr 0x%04x hw_state 0x%04x\n",
 402                         s, intr_status, mvsd_read(MVSD_HW_STATE));
 403                 host->pio_ptr = p;
 404                 host->pio_size = s;
 405                 irq_handled = 1;
 406         } else if (host->pio_size &&
 407                    (intr_status & host->intr_en &
 408                     (MVSD_NOR_TX_AVAIL | MVSD_NOR_TX_FIFO_8W))) {
 409                 u16 *p = host->pio_ptr;
 410                 int s = host->pio_size;
 411                 /*
 412                  * The TX_FIFO_8W bit is unreliable. When set, bursting
 413                  * 16 halfwords all at once in the FIFO drops data. Actually
 414                  * TX_AVAIL does go off after only one word is pushed even if
 415                  * TX_FIFO_8W remains set.
 416                  */
 417                 while (s >= 4 && (intr_status & MVSD_NOR_TX_AVAIL)) {
 418                         mvsd_write(MVSD_FIFO, get_unaligned(p++));
 419                         mvsd_write(MVSD_FIFO, get_unaligned(p++));
 420                         s -= 4;
 421                         intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 422                 }
 423                 if (s < 4) {
 424                         if (s && (intr_status & MVSD_NOR_TX_AVAIL)) {
 425                                 u16 val[2] = {0, 0};
 426                                 memcpy(&val, p, s);
 427                                 mvsd_write(MVSD_FIFO, val[0]);
 428                                 mvsd_write(MVSD_FIFO, val[1]);
 429                                 s = 0;
 430                                 intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
 431                         }
 432                         if (s == 0) {
 433                                 host->intr_en &=
 434                                      ~(MVSD_NOR_TX_AVAIL | MVSD_NOR_TX_FIFO_8W);
 435                                 mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 436                         }
 437                 }
 438                 dev_dbg(host->dev, "pio %d intr 0x%04x hw_state 0x%04x\n",
 439                         s, intr_status, mvsd_read(MVSD_HW_STATE));
 440                 host->pio_ptr = p;
 441                 host->pio_size = s;
 442                 irq_handled = 1;
 443         }
 444
 445         mvsd_write(MVSD_NOR_INTR_STATUS, intr_status);
 446
 447         intr_done_mask = MVSD_NOR_CARD_INT | MVSD_NOR_RX_READY |
 448                          MVSD_NOR_RX_FIFO_8W | MVSD_NOR_TX_FIFO_8W;
 449         if (intr_status & host->intr_en & ~intr_done_mask) {
 450                 struct mmc_request *mrq = host->mrq;
 451                 struct mmc_command *cmd = mrq->cmd;
 452                 u32 err_status = 0;
 453
 454                 del_timer(&host->timer);
 455                 host->mrq = NULL;
 456
 457                 host->intr_en &= MVSD_NOR_CARD_INT;
 458                 mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 459                 mvsd_write(MVSD_ERR_INTR_EN, 0);
 460
 461                 spin_unlock(&host->lock);
 462
 463                 if (intr_status & MVSD_NOR_UNEXP_RSP) {
 464                         cmd->error = -EPROTO;
 465                 } else if (intr_status & MVSD_NOR_ERROR) {
 466                         err_status = mvsd_read(MVSD_ERR_INTR_STATUS);
 467                         dev_dbg(host->dev, "err 0x%04x\n", err_status);
 468                 }
 469
 470                 err_status = mvsd_finish_cmd(host, cmd, err_status);
 471                 if (mrq->data)
 472                         err_status = mvsd_finish_data(host, mrq->data, err_status);
 473                 if (err_status) {
 474                         printk(KERN_ERR "%s: unhandled error status %#04x\n",
 475                                         mmc_hostname(host->mmc), err_status);
 476                         cmd->error = -ENOMSG;
 477                 }
 478
 479                 mmc_request_done(host->mmc, mrq);
 480                 irq_handled = 1;
 481         } else
 482                 spin_unlock(&host->lock);
 483
 484         if (intr_status & MVSD_NOR_CARD_INT) {
 485                 mmc_signal_sdio_irq(host->mmc);
 486                 irq_handled = 1;
 487         }
 488
 489         if (irq_handled)
 490                 return IRQ_HANDLED;
 491
 492         printk(KERN_ERR "%s: unhandled interrupt status=0x%04x en=0x%04x "
 493                         "pio=%d\n", mmc_hostname(host->mmc), intr_status,
 494                         host->intr_en, host->pio_size);
 495         return IRQ_NONE;
 496 }
 497
 498 static void mvsd_timeout_timer(unsigned long data)
 499 {
 500         struct mvsd_host *host = (struct mvsd_host *)data;
 501         void __iomem *iobase = host->base;
 502         struct mmc_request *mrq;
 503         unsigned long flags;
 504
 505         spin_lock_irqsave(&host->lock, flags);
 506         mrq = host->mrq;
 507         if (mrq) {
 508                 printk(KERN_ERR "%s: Timeout waiting for hardware interrupt.\n",
 509                                 mmc_hostname(host->mmc));
 510                 printk(KERN_ERR "%s: hw_state=0x%04x, intr_status=0x%04x "
 511                                 "intr_en=0x%04x\n", mmc_hostname(host->mmc),
 512                                 mvsd_read(MVSD_HW_STATE),
 513                                 mvsd_read(MVSD_NOR_INTR_STATUS),
 514                                 mvsd_read(MVSD_NOR_INTR_EN));
 515
 516                 host->mrq = NULL;
 517
 518                 mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
 519
 520                 host->xfer_mode &= MVSD_XFER_MODE_INT_CHK_EN;
 521                 mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
 522
 523                 host->intr_en &= MVSD_NOR_CARD_INT;
 524                 mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 525                 mvsd_write(MVSD_ERR_INTR_EN, 0);
 526                 mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
 527
 528                 mrq->cmd->error = -ETIMEDOUT;
 529                 mvsd_finish_cmd(host, mrq->cmd, 0);
 530                 if (mrq->data) {
 531                         mrq->data->error = -ETIMEDOUT;
 532                         mvsd_finish_data(host, mrq->data, 0);
 533                 }
 534         }
 535         spin_unlock_irqrestore(&host->lock, flags);
 536
 537         if (mrq)
 538                 mmc_request_done(host->mmc, mrq);
 539 }
 540
 541 static irqreturn_t mvsd_card_detect_irq(int irq, void *dev)
 542 {
 543         struct mvsd_host *host = dev;
 544         mmc_detect_change(host->mmc, msecs_to_jiffies(100));
 545         return IRQ_HANDLED;
 546 }
 547
 548 static void mvsd_enable_sdio_irq(struct mmc_host *mmc, int enable)
 549 {
 550         struct mvsd_host *host = mmc_priv(mmc);
 551         void __iomem *iobase = host->base;
 552         unsigned long flags;
 553
 554         spin_lock_irqsave(&host->lock, flags);
 555         if (enable) {
 556                 host->xfer_mode |= MVSD_XFER_MODE_INT_CHK_EN;
 557                 host->intr_en |= MVSD_NOR_CARD_INT;
 558         } else {
 559                 host->xfer_mode &= ~MVSD_XFER_MODE_INT_CHK_EN;
 560                 host->intr_en &= ~MVSD_NOR_CARD_INT;
 561         }
 562         mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
 563         mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
 564         spin_unlock_irqrestore(&host->lock, flags);
 565 }
 566
 567 static int mvsd_get_ro(struct mmc_host *mmc)
 568 {
 569         struct mvsd_host *host = mmc_priv(mmc);
 570
 571         if (host->gpio_write_protect)
 572                 return gpio_get_value(host->gpio_write_protect);
 573
 574         /*
 575          * Board doesn't support read only detection; let the mmc core
 576          * decide what to do.
 577          */
 578         return -ENOSYS;
 579 }
 580
 581 static void mvsd_power_up(struct mvsd_host *host)
 582 {
 583         void __iomem *iobase = host->base;
 584         dev_dbg(host->dev, "power up\n");
 585         mvsd_write(MVSD_NOR_INTR_EN, 0);
 586         mvsd_write(MVSD_ERR_INTR_EN, 0);
 587         mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
 588         mvsd_write(MVSD_XFER_MODE, 0);
 589         mvsd_write(MVSD_NOR_STATUS_EN, 0xffff);
 590         mvsd_write(MVSD_ERR_STATUS_EN, 0xffff);
 591         mvsd_write(MVSD_NOR_INTR_STATUS, 0xffff);
 592         mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
 593 }
 594
 595 static void mvsd_power_down(struct mvsd_host *host)
 596 {
 597         void __iomem *iobase = host->base;
 598         dev_dbg(host->dev, "power down\n");
 599         mvsd_write(MVSD_NOR_INTR_EN, 0);
 600         mvsd_write(MVSD_ERR_INTR_EN, 0);
 601         mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
 602         mvsd_write(MVSD_XFER_MODE, MVSD_XFER_MODE_STOP_CLK);
 603         mvsd_write(MVSD_NOR_STATUS_EN, 0);
 604         mvsd_write(MVSD_ERR_STATUS_EN, 0);
 605         mvsd_write(MVSD_NOR_INTR_STATUS, 0xffff);
 606         mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
 607 }
 608
 609 static void mvsd_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
 610 {
 611         struct mvsd_host *host = mmc_priv(mmc);
 612         void __iomem *iobase = host->base;
 613         u32 ctrl_reg = 0;
 614
 615         if (ios->power_mode == MMC_POWER_UP)
 616                 mvsd_power_up(host);
 617
 618         if (ios->clock == 0) {
 619                 mvsd_write(MVSD_XFER_MODE, MVSD_XFER_MODE_STOP_CLK);
 620                 mvsd_write(MVSD_CLK_DIV, MVSD_BASE_DIV_MAX);
 621                 host->clock = 0;
 622                 dev_dbg(host->dev, "clock off\n");
 623         } else if (ios->clock != host->clock) {
 624                 u32 m = DIV_ROUND_UP(host->base_clock, ios->clock) - 1;
 625                 if (m > MVSD_BASE_DIV_MAX)
 626                         m = MVSD_BASE_DIV_MAX;
 627                 mvsd_write(MVSD_CLK_DIV, m);
 628                 host->clock = ios->clock;
 629                 host->ns_per_clk = 1000000000 / (host->base_clock / (m+1));
 630                 dev_dbg(host->dev, "clock=%d (%d), div=0x%04x\n",
 631                         ios->clock, host->base_clock / (m+1), m);
 632         }
 633
 634         /* default transfer mode */
 635         ctrl_reg |= MVSD_HOST_CTRL_BIG_ENDIAN;
 636         ctrl_reg &= ~MVSD_HOST_CTRL_LSB_FIRST;
 637
 638         /* default to maximum timeout */
 639         ctrl_reg |= MVSD_HOST_CTRL_TMOUT_MASK;
 640         ctrl_reg |= MVSD_HOST_CTRL_TMOUT_EN;
 641
 642         if (ios->bus_mode == MMC_BUSMODE_PUSHPULL)
 643                 ctrl_reg |= MVSD_HOST_CTRL_PUSH_PULL_EN;
 644
 645         if (ios->bus_width == MMC_BUS_WIDTH_4)
 646                 ctrl_reg |= MVSD_HOST_CTRL_DATA_WIDTH_4_BITS;
 647
 648         /*
 649          * The HI_SPEED_EN bit is causing trouble with many (but not all)
 650          * high speed SD, SDHC and SDIO cards.  Not enabling that bit
 651          * makes all cards work.  So let's just ignore that bit for now
 652          * and revisit this issue if problems for not enabling this bit
 653          * are ever reported.
 654          */
 655 #if 0
 656         if (ios->timing == MMC_TIMING_MMC_HS ||
 657             ios->timing == MMC_TIMING_SD_HS)
 658                 ctrl_reg |= MVSD_HOST_CTRL_HI_SPEED_EN;
 659 #endif
 660
 661         host->ctrl = ctrl_reg;
 662         mvsd_write(MVSD_HOST_CTRL, ctrl_reg);
 663         dev_dbg(host->dev, "ctrl 0x%04x: %s %s %s\n", ctrl_reg,
 664                 (ctrl_reg & MVSD_HOST_CTRL_PUSH_PULL_EN) ?
 665                         "push-pull" : "open-drain",
 666                 (ctrl_reg & MVSD_HOST_CTRL_DATA_WIDTH_4_BITS) ?
 667                         "4bit-width" : "1bit-width",
 668                 (ctrl_reg & MVSD_HOST_CTRL_HI_SPEED_EN) ?
 669                         "high-speed" : "");
 670
 671         if (ios->power_mode == MMC_POWER_OFF)
 672                 mvsd_power_down(host);
 673 }
 674
 675 static const struct mmc_host_ops mvsd_ops = {
 676         .request                = mvsd_request,
 677         .get_ro                 = mvsd_get_ro,
 678         .set_ios                = mvsd_set_ios,
 679         .enable_sdio_irq        = mvsd_enable_sdio_irq,
 680 };
 681
 682 static void __init mv_conf_mbus_windows(struct mvsd_host *host,
 683                                         struct mbus_dram_target_info *dram)
 684 {
 685         void __iomem *iobase = host->base;
 686         int i;
 687
 688         for (i = 0; i < 4; i++) {
 689                 writel(0, iobase + MVSD_WINDOW_CTRL(i));
 690                 writel(0, iobase + MVSD_WINDOW_BASE(i));
 691         }
 692
 693         for (i = 0; i < dram->num_cs; i++) {
 694                 struct mbus_dram_window *cs = dram->cs + i;
 695                 writel(((cs->size - 1) & 0xffff0000) |
 696                        (cs->mbus_attr << 8) |
 697                        (dram->mbus_dram_target_id << 4) | 1,
 698                        iobase + MVSD_WINDOW_CTRL(i));
 699                 writel(cs->base, iobase + MVSD_WINDOW_BASE(i));
 700         }
 701 }
 702
 703 static int __init mvsd_probe(struct platform_device *pdev)
 704 {
 705         struct mmc_host *mmc = NULL;
 706         struct mvsd_host *host = NULL;
 707         const struct mvsdio_platform_data *mvsd_data;
 708         struct resource *r;
 709         int ret, irq;
 710
 711         r = platform_get_resource(pdev, IORESOURCE_MEM, 0);
 712         irq = platform_get_irq(pdev, 0);
 713         mvsd_data = pdev->dev.platform_data;
 714         if (!r || irq < 0 || !mvsd_data)
 715                 return -ENXIO;
 716
 717         r = request_mem_region(r->start, SZ_1K, DRIVER_NAME);
 718         if (!r)
 719                 return -EBUSY;
 720
 721         mmc = mmc_alloc_host(sizeof(struct mvsd_host), &pdev->dev);
 722         if (!mmc) {
 723                 ret = -ENOMEM;
 724                 goto out;
 725         }
 726
 727         host = mmc_priv(mmc);
 728         host->mmc = mmc;
 729         host->dev = &pdev->dev;
 730         host->res = r;
 731         host->base_clock = mvsd_data->clock / 2;
 732
 733         mmc->ops = &mvsd_ops;
 734
 735         mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34;
 736         mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_SDIO_IRQ |
 737                     MMC_CAP_SD_HIGHSPEED | MMC_CAP_MMC_HIGHSPEED;
 738
 739         mmc->f_min = DIV_ROUND_UP(host->base_clock, MVSD_BASE_DIV_MAX);
 740         mmc->f_max = maxfreq;
 741
 742         mmc->max_blk_size = 2048;
 743         mmc->max_blk_count = 65535;
 744
 745         mmc->max_hw_segs = 1;
 746         mmc->max_phys_segs = 1;
 747         mmc->max_seg_size = mmc->max_blk_size * mmc->max_blk_count;
 748         mmc->max_req_size = mmc->max_blk_size * mmc->max_blk_count;
 749
 750         spin_lock_init(&host->lock);
 751
 752         host->base = ioremap(r->start, SZ_4K);
 753         if (!host->base) {
 754                 ret = -ENOMEM;
 755                 goto out;
 756         }
 757
 758         /* (Re-)program MBUS remapping windows if we are asked to. */
 759         if (mvsd_data->dram != NULL)
 760                 mv_conf_mbus_windows(host, mvsd_data->dram);
 761
 762         mvsd_power_down(host);
 763
 764         ret = request_irq(irq, mvsd_irq, 0, DRIVER_NAME, host);
 765         if (ret) {
 766                 printk(KERN_ERR "%s: cannot assign irq %d\n", DRIVER_NAME, irq);
 767                 goto out;
 768         } else
 769                 host->irq = irq;
 770
 771         if (mvsd_data->gpio_card_detect) {
 772                 ret = gpio_request(mvsd_data->gpio_card_detect,
 773                                    DRIVER_NAME " cd");
 774                 if (ret == 0) {
 775                         gpio_direction_input(mvsd_data->gpio_card_detect);
 776                         irq = gpio_to_irq(mvsd_data->gpio_card_detect);
 777                         ret = request_irq(irq, mvsd_card_detect_irq,
 778                                           IRQ_TYPE_EDGE_RISING | IRQ_TYPE_EDGE_FALLING,
 779                                           DRIVER_NAME " cd", host);
 780                         if (ret == 0)
 781                                 host->gpio_card_detect =
 782                                         mvsd_data->gpio_card_detect;
 783                         else
 784                                 gpio_free(mvsd_data->gpio_card_detect);
 785                 }
 786         }
 787         if (!host->gpio_card_detect)
 788                 mmc->caps |= MMC_CAP_NEEDS_POLL;
 789
 790         if (mvsd_data->gpio_write_protect) {
 791                 ret = gpio_request(mvsd_data->gpio_write_protect,
 792                                    DRIVER_NAME " wp");
 793                 if (ret == 0) {
 794                         gpio_direction_input(mvsd_data->gpio_write_protect);
 795                         host->gpio_write_protect =
 796                                 mvsd_data->gpio_write_protect;
 797                 }
 798         }
 799
 800         setup_timer(&host->timer, mvsd_timeout_timer, (unsigned long)host);
 801         platform_set_drvdata(pdev, mmc);
 802         ret = mmc_add_host(mmc);
 803         if (ret)
 804                 goto out;
 805
 806         printk(KERN_NOTICE "%s: %s driver initialized, ",
 807                            mmc_hostname(mmc), DRIVER_NAME);
 808         if (host->gpio_card_detect)
 809                 printk("using GPIO %d for card detection\n",
 810                        host->gpio_card_detect);
 811         else
 812                 printk("lacking card detect (fall back to polling)\n");
 813         return 0;
 814
 815 out:
 816         if (host) {
 817                 if (host->irq)
 818                         free_irq(host->irq, host);
 819                 if (host->gpio_card_detect) {
 820                         free_irq(gpio_to_irq(host->gpio_card_detect), host);
 821                         gpio_free(host->gpio_card_detect);
 822                 }
 823                 if (host->gpio_write_protect)
 824                         gpio_free(host->gpio_write_protect);
 825                 if (host->base)
 826                         iounmap(host->base);
 827         }
 828         if (r)
 829                 release_resource(r);
 830         if (mmc)
 831                 mmc_free_host(mmc);
 832
 833         return ret;
 834 }
 835
 836 static int __exit mvsd_remove(struct platform_device *pdev)
 837 {
 838         struct mmc_host *mmc = platform_get_drvdata(pdev);
 839
 840         if (mmc) {
 841                 struct mvsd_host *host = mmc_priv(mmc);
 842
 843                 if (host->gpio_card_detect) {
 844                         free_irq(gpio_to_irq(host->gpio_card_detect), host);
 845                         gpio_free(host->gpio_card_detect);
 846                 }
 847                 mmc_remove_host(mmc);
 848                 free_irq(host->irq, host);
 849                 if (host->gpio_write_protect)
 850                         gpio_free(host->gpio_write_protect);
 851                 del_timer_sync(&host->timer);
 852                 mvsd_power_down(host);
 853                 iounmap(host->base);
 854                 release_resource(host->res);
 855                 mmc_free_host(mmc);
 856         }
 857         platform_set_drvdata(pdev, NULL);
 858         return 0;
 859 }
 860
 861 #ifdef CONFIG_PM
 862 static int mvsd_suspend(struct platform_device *dev, pm_message_t state)
 863 {
 864         struct mmc_host *mmc = platform_get_drvdata(dev);
 865         int ret = 0;
 866
 867         if (mmc)
 868                 ret = mmc_suspend_host(mmc, state);
 869
 870         return ret;
 871 }
 872
 873 static int mvsd_resume(struct platform_device *dev)
 874 {
 875         struct mmc_host *mmc = platform_get_drvdata(dev);
 876         int ret = 0;
 877
 878         if (mmc)
 879                 ret = mmc_resume_host(mmc);
 880
 881         return ret;
 882 }
 883 #else
 884 #define mvsd_suspend    NULL
 885 #define mvsd_resume     NULL
 886 #endif
 887
 888 static struct platform_driver mvsd_driver = {
 889         .remove         = __exit_p(mvsd_remove),
 890         .suspend        = mvsd_suspend,
 891         .resume         = mvsd_resume,
 892         .driver         = {
 893                 .name   = DRIVER_NAME,
 894         },
 895 };
 896
 897 static int __init mvsd_init(void)
 898 {
 899         return platform_driver_probe(&mvsd_driver, mvsd_probe);
 900 }
 901
 902 static void __exit mvsd_exit(void)
 903 {
 904         platform_driver_unregister(&mvsd_driver);
 905 }
 906
 907 module_init(mvsd_init);
 908 module_exit(mvsd_exit);
 909
 910 /* maximum card clock frequency (default 50MHz) */
 911 module_param(maxfreq, int, 0);
 912
 913 /* force PIO transfers all the time */
 914 module_param(nodma, int, 0);
 915
 916 MODULE_AUTHOR("Maen Suleiman, Nicolas Pitre");
 917 MODULE_DESCRIPTION("Marvell MMC,SD,SDIO Host Controller driver");
 918 MODULE_LICENSE("GPL");
 919 MODULE_ALIAS("platform:mvsdio");