qla3xxx: bugfix tx reset after stress conditions.
[linux-2.6] / drivers / mmc / tifm_sd.c
1 /*
2  *  tifm_sd.c - TI FlashMedia driver
3  *
4  *  Copyright (C) 2006 Alex Dubov <oakad@yahoo.com>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 as
8  * published by the Free Software Foundation.
9  *
10  */
11
12
13 #include <linux/tifm.h>
14 #include <linux/mmc/protocol.h>
15 #include <linux/mmc/host.h>
16 #include <linux/highmem.h>
17 #include <asm/io.h>
18
19 #define DRIVER_NAME "tifm_sd"
20 #define DRIVER_VERSION "0.7"
21
22 static int no_dma = 0;
23 static int fixed_timeout = 0;
24 module_param(no_dma, bool, 0644);
25 module_param(fixed_timeout, bool, 0644);
26
27 /* Constants here are mostly from OMAP5912 datasheet */
28 #define TIFM_MMCSD_RESET      0x0002
29 #define TIFM_MMCSD_CLKMASK    0x03ff
30 #define TIFM_MMCSD_POWER      0x0800
31 #define TIFM_MMCSD_4BBUS      0x8000
32 #define TIFM_MMCSD_RXDE       0x8000   /* rx dma enable */
33 #define TIFM_MMCSD_TXDE       0x0080   /* tx dma enable */
34 #define TIFM_MMCSD_BUFINT     0x0c00   /* set bits: AE, AF */
35 #define TIFM_MMCSD_DPE        0x0020   /* data timeout counted in kilocycles */
36 #define TIFM_MMCSD_INAB       0x0080   /* abort / initialize command */
37 #define TIFM_MMCSD_READ       0x8000
38
39 #define TIFM_MMCSD_DATAMASK   0x401d   /* set bits: CERR, EOFB, BRS, CB, EOC */
40 #define TIFM_MMCSD_ERRMASK    0x01e0   /* set bits: CCRC, CTO, DCRC, DTO */
41 #define TIFM_MMCSD_EOC        0x0001   /* end of command phase  */
42 #define TIFM_MMCSD_CB         0x0004   /* card enter busy state */
43 #define TIFM_MMCSD_BRS        0x0008   /* block received/sent   */
44 #define TIFM_MMCSD_EOFB       0x0010   /* card exit busy state  */
45 #define TIFM_MMCSD_DTO        0x0020   /* data time-out         */
46 #define TIFM_MMCSD_DCRC       0x0040   /* data crc error        */
47 #define TIFM_MMCSD_CTO        0x0080   /* command time-out      */
48 #define TIFM_MMCSD_CCRC       0x0100   /* command crc error     */
49 #define TIFM_MMCSD_AF         0x0400   /* fifo almost full      */
50 #define TIFM_MMCSD_AE         0x0800   /* fifo almost empty     */
51 #define TIFM_MMCSD_CERR       0x4000   /* card status error     */
52
53 #define TIFM_MMCSD_FIFO_SIZE  0x0020
54
55 #define TIFM_MMCSD_RSP_R0     0x0000
56 #define TIFM_MMCSD_RSP_R1     0x0100
57 #define TIFM_MMCSD_RSP_R2     0x0200
58 #define TIFM_MMCSD_RSP_R3     0x0300
59 #define TIFM_MMCSD_RSP_R4     0x0400
60 #define TIFM_MMCSD_RSP_R5     0x0500
61 #define TIFM_MMCSD_RSP_R6     0x0600
62
63 #define TIFM_MMCSD_RSP_BUSY   0x0800
64
65 #define TIFM_MMCSD_CMD_BC     0x0000
66 #define TIFM_MMCSD_CMD_BCR    0x1000
67 #define TIFM_MMCSD_CMD_AC     0x2000
68 #define TIFM_MMCSD_CMD_ADTC   0x3000
69
70 typedef enum {
71         IDLE = 0,
72         CMD,    /* main command ended                   */
73         BRS,    /* block transfer finished              */
74         SCMD,   /* stop command ended                   */
75         CARD,   /* card left busy state                 */
76         FIFO,   /* FIFO operation completed (uncertain) */
77         READY
78 } card_state_t;
79
80 enum {
81         FIFO_RDY   = 0x0001,     /* hardware dependent value */
82         EJECT      = 0x0004,
83         EJECT_DONE = 0x0008,
84         CARD_BUSY  = 0x0010,
85         OPENDRAIN  = 0x0040,     /* hardware dependent value */
86         CARD_EVENT = 0x0100,     /* hardware dependent value */
87         CARD_RO    = 0x0200,     /* hardware dependent value */
88         FIFO_EVENT = 0x10000 };  /* hardware dependent value */
89
90 struct tifm_sd {
91         struct tifm_dev     *dev;
92
93         unsigned int        flags;
94         card_state_t        state;
95         unsigned int        clk_freq;
96         unsigned int        clk_div;
97         unsigned long       timeout_jiffies;
98
99         struct tasklet_struct finish_tasklet;
100         struct timer_list     timer;
101         struct mmc_request    *req;
102         wait_queue_head_t     notify;
103
104         size_t                written_blocks;
105         size_t                buffer_size;
106         size_t                buffer_pos;
107
108 };
109
110 static char* tifm_sd_data_buffer(struct mmc_data *data)
111 {
112         return page_address(data->sg->page) + data->sg->offset;
113 }
114
115 static int tifm_sd_transfer_data(struct tifm_dev *sock, struct tifm_sd *host,
116                                  unsigned int host_status)
117 {
118         struct mmc_command *cmd = host->req->cmd;
119         unsigned int t_val = 0, cnt = 0;
120         char *buffer;
121
122         if (host_status & TIFM_MMCSD_BRS) {
123                 /* in non-dma rx mode BRS fires when fifo is still not empty */
124                 if (no_dma && (cmd->data->flags & MMC_DATA_READ)) {
125                         buffer = tifm_sd_data_buffer(host->req->data);
126                         while (host->buffer_size > host->buffer_pos) {
127                                 t_val = readl(sock->addr + SOCK_MMCSD_DATA);
128                                 buffer[host->buffer_pos++] = t_val & 0xff;
129                                 buffer[host->buffer_pos++] =
130                                                         (t_val >> 8) & 0xff;
131                         }
132                 }
133                 return 1;
134         } else if (no_dma) {
135                 buffer = tifm_sd_data_buffer(host->req->data);
136                 if ((cmd->data->flags & MMC_DATA_READ) &&
137                                 (host_status & TIFM_MMCSD_AF)) {
138                         for (cnt = 0; cnt < TIFM_MMCSD_FIFO_SIZE; cnt++) {
139                                 t_val = readl(sock->addr + SOCK_MMCSD_DATA);
140                                 if (host->buffer_size > host->buffer_pos) {
141                                         buffer[host->buffer_pos++] =
142                                                         t_val & 0xff;
143                                         buffer[host->buffer_pos++] =
144                                                         (t_val >> 8) & 0xff;
145                                 }
146                         }
147                 } else if ((cmd->data->flags & MMC_DATA_WRITE)
148                            && (host_status & TIFM_MMCSD_AE)) {
149                         for (cnt = 0; cnt < TIFM_MMCSD_FIFO_SIZE; cnt++) {
150                                 if (host->buffer_size > host->buffer_pos) {
151                                         t_val = buffer[host->buffer_pos++]
152                                                 & 0x00ff;
153                                         t_val |= ((buffer[host->buffer_pos++])
154                                                   << 8) & 0xff00;
155                                         writel(t_val,
156                                                sock->addr + SOCK_MMCSD_DATA);
157                                 }
158                         }
159                 }
160         }
161         return 0;
162 }
163
164 static unsigned int tifm_sd_op_flags(struct mmc_command *cmd)
165 {
166         unsigned int rc = 0;
167
168         switch (mmc_resp_type(cmd)) {
169         case MMC_RSP_NONE:
170                 rc |= TIFM_MMCSD_RSP_R0;
171                 break;
172         case MMC_RSP_R1B:
173                 rc |= TIFM_MMCSD_RSP_BUSY; // deliberate fall-through
174         case MMC_RSP_R1:
175                 rc |= TIFM_MMCSD_RSP_R1;
176                 break;
177         case MMC_RSP_R2:
178                 rc |= TIFM_MMCSD_RSP_R2;
179                 break;
180         case MMC_RSP_R3:
181                 rc |= TIFM_MMCSD_RSP_R3;
182                 break;
183         default:
184                 BUG();
185         }
186
187         switch (mmc_cmd_type(cmd)) {
188         case MMC_CMD_BC:
189                 rc |= TIFM_MMCSD_CMD_BC;
190                 break;
191         case MMC_CMD_BCR:
192                 rc |= TIFM_MMCSD_CMD_BCR;
193                 break;
194         case MMC_CMD_AC:
195                 rc |= TIFM_MMCSD_CMD_AC;
196                 break;
197         case MMC_CMD_ADTC:
198                 rc |= TIFM_MMCSD_CMD_ADTC;
199                 break;
200         default:
201                 BUG();
202         }
203         return rc;
204 }
205
206 static void tifm_sd_exec(struct tifm_sd *host, struct mmc_command *cmd)
207 {
208         struct tifm_dev *sock = host->dev;
209         unsigned int cmd_mask = tifm_sd_op_flags(cmd) |
210                                 (host->flags & OPENDRAIN);
211
212         if (cmd->data && (cmd->data->flags & MMC_DATA_READ))
213                 cmd_mask |= TIFM_MMCSD_READ;
214
215         dev_dbg(&sock->dev, "executing opcode 0x%x, arg: 0x%x, mask: 0x%x\n",
216                 cmd->opcode, cmd->arg, cmd_mask);
217
218         writel((cmd->arg >> 16) & 0xffff, sock->addr + SOCK_MMCSD_ARG_HIGH);
219         writel(cmd->arg & 0xffff, sock->addr + SOCK_MMCSD_ARG_LOW);
220         writel(cmd->opcode | cmd_mask, sock->addr + SOCK_MMCSD_COMMAND);
221 }
222
223 static void tifm_sd_fetch_resp(struct mmc_command *cmd, struct tifm_dev *sock)
224 {
225         cmd->resp[0] = (readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x1c) << 16)
226                        | readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x18);
227         cmd->resp[1] = (readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x14) << 16)
228                        | readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x10);
229         cmd->resp[2] = (readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x0c) << 16)
230                        | readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x08);
231         cmd->resp[3] = (readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x04) << 16)
232                        | readl(sock->addr + SOCK_MMCSD_RESPONSE + 0x00);
233 }
234
235 static void tifm_sd_process_cmd(struct tifm_dev *sock, struct tifm_sd *host,
236                                        unsigned int host_status)
237 {
238         struct mmc_command *cmd = host->req->cmd;
239
240 change_state:
241         switch (host->state) {
242         case IDLE:
243                 return;
244         case CMD:
245                 if (host_status & (TIFM_MMCSD_EOC | TIFM_MMCSD_CERR)) {
246                         tifm_sd_fetch_resp(cmd, sock);
247                         if (cmd->data) {
248                                 host->state = BRS;
249                         } else {
250                                 host->state = READY;
251                         }
252                         goto change_state;
253                 }
254                 break;
255         case BRS:
256                 if (tifm_sd_transfer_data(sock, host, host_status)) {
257                         if (cmd->data->flags & MMC_DATA_WRITE) {
258                                 host->state = CARD;
259                         } else {
260                                 if (no_dma) {
261                                         if (host->req->stop) {
262                                                 tifm_sd_exec(host, host->req->stop);
263                                                 host->state = SCMD;
264                                         } else {
265                                                 host->state = READY;
266                                         }
267                                 } else {
268                                         host->state = FIFO;
269                                 }
270                         }
271                         goto change_state;
272                 }
273                 break;
274         case SCMD:
275                 if (host_status & TIFM_MMCSD_EOC) {
276                         tifm_sd_fetch_resp(host->req->stop, sock);
277                         host->state = READY;
278                         goto change_state;
279                 }
280                 break;
281         case CARD:
282                 dev_dbg(&sock->dev, "waiting for CARD, have %zd blocks\n",
283                         host->written_blocks);
284                 if (!(host->flags & CARD_BUSY)
285                     && (host->written_blocks == cmd->data->blocks)) {
286                         if (no_dma) {
287                                 if (host->req->stop) {
288                                         tifm_sd_exec(host, host->req->stop);
289                                         host->state = SCMD;
290                                 } else {
291                                         host->state = READY;
292                                 }
293                         } else {
294                                 host->state = FIFO;
295                         }
296                         goto change_state;
297                 }
298                 break;
299         case FIFO:
300                 if (host->flags & FIFO_RDY) {
301                         host->flags &= ~FIFO_RDY;
302                         if (host->req->stop) {
303                                 tifm_sd_exec(host, host->req->stop);
304                                 host->state = SCMD;
305                         } else {
306                                 host->state = READY;
307                         }
308                         goto change_state;
309                 }
310                 break;
311         case READY:
312                 tasklet_schedule(&host->finish_tasklet);
313                 return;
314         }
315
316 }
317
318 /* Called from interrupt handler */
319 static void tifm_sd_signal_irq(struct tifm_dev *sock,
320                                unsigned int sock_irq_status)
321 {
322         struct tifm_sd *host;
323         unsigned int host_status = 0, fifo_status = 0;
324         int error_code = 0;
325
326         spin_lock(&sock->lock);
327         host = mmc_priv((struct mmc_host*)tifm_get_drvdata(sock));
328
329         if (sock_irq_status & FIFO_EVENT) {
330                 fifo_status = readl(sock->addr + SOCK_DMA_FIFO_STATUS);
331                 writel(fifo_status, sock->addr + SOCK_DMA_FIFO_STATUS);
332
333                 host->flags |= fifo_status & FIFO_RDY;
334         }
335
336         if (sock_irq_status & CARD_EVENT) {
337                 host_status = readl(sock->addr + SOCK_MMCSD_STATUS);
338                 writel(host_status, sock->addr + SOCK_MMCSD_STATUS);
339
340                 if (!host->req)
341                         goto done;
342
343                 if (host_status & TIFM_MMCSD_ERRMASK) {
344                         if (host_status & (TIFM_MMCSD_CTO | TIFM_MMCSD_DTO))
345                                 error_code = MMC_ERR_TIMEOUT;
346                         else if (host_status
347                                  & (TIFM_MMCSD_CCRC | TIFM_MMCSD_DCRC))
348                                 error_code = MMC_ERR_BADCRC;
349
350                         writel(TIFM_FIFO_INT_SETALL,
351                                sock->addr + SOCK_DMA_FIFO_INT_ENABLE_CLEAR);
352                         writel(TIFM_DMA_RESET, sock->addr + SOCK_DMA_CONTROL);
353
354                         if (host->req->stop) {
355                                 if (host->state == SCMD) {
356                                         host->req->stop->error = error_code;
357                                 } else if (host->state == BRS
358                                            || host->state == CARD
359                                            || host->state == FIFO) {
360                                         host->req->cmd->error = error_code;
361                                         tifm_sd_exec(host, host->req->stop);
362                                         host->state = SCMD;
363                                         goto done;
364                                 } else {
365                                         host->req->cmd->error = error_code;
366                                 }
367                         } else {
368                                 host->req->cmd->error = error_code;
369                         }
370                         host->state = READY;
371                 }
372
373                 if (host_status & TIFM_MMCSD_CB)
374                         host->flags |= CARD_BUSY;
375                 if ((host_status & TIFM_MMCSD_EOFB)
376                     && (host->flags & CARD_BUSY)) {
377                         host->written_blocks++;
378                         host->flags &= ~CARD_BUSY;
379                 }
380         }
381
382         if (host->req)
383                 tifm_sd_process_cmd(sock, host, host_status);
384 done:
385         dev_dbg(&sock->dev, "host_status %x, fifo_status %x\n",
386                 host_status, fifo_status);
387         spin_unlock(&sock->lock);
388 }
389
390 static void tifm_sd_prepare_data(struct tifm_sd *host, struct mmc_command *cmd)
391 {
392         struct tifm_dev *sock = host->dev;
393         unsigned int dest_cnt;
394
395         /* DMA style IO */
396         dev_dbg(&sock->dev, "setting dma for %d blocks\n",
397                 cmd->data->blocks);
398         writel(TIFM_FIFO_INT_SETALL,
399                sock->addr + SOCK_DMA_FIFO_INT_ENABLE_CLEAR);
400         writel(ilog2(cmd->data->blksz) - 2,
401                sock->addr + SOCK_FIFO_PAGE_SIZE);
402         writel(TIFM_FIFO_ENABLE, sock->addr + SOCK_FIFO_CONTROL);
403         writel(TIFM_FIFO_INTMASK, sock->addr + SOCK_DMA_FIFO_INT_ENABLE_SET);
404
405         dest_cnt = (cmd->data->blocks) << 8;
406
407         writel(sg_dma_address(cmd->data->sg), sock->addr + SOCK_DMA_ADDRESS);
408
409         writel(cmd->data->blocks - 1, sock->addr + SOCK_MMCSD_NUM_BLOCKS);
410         writel(cmd->data->blksz - 1, sock->addr + SOCK_MMCSD_BLOCK_LEN);
411
412         if (cmd->data->flags & MMC_DATA_WRITE) {
413                 writel(TIFM_MMCSD_TXDE, sock->addr + SOCK_MMCSD_BUFFER_CONFIG);
414                 writel(dest_cnt | TIFM_DMA_TX | TIFM_DMA_EN,
415                        sock->addr + SOCK_DMA_CONTROL);
416         } else {
417                 writel(TIFM_MMCSD_RXDE, sock->addr + SOCK_MMCSD_BUFFER_CONFIG);
418                 writel(dest_cnt | TIFM_DMA_EN, sock->addr + SOCK_DMA_CONTROL);
419         }
420 }
421
422 static void tifm_sd_set_data_timeout(struct tifm_sd *host,
423                                      struct mmc_data *data)
424 {
425         struct tifm_dev *sock = host->dev;
426         unsigned int data_timeout = data->timeout_clks;
427
428         if (fixed_timeout)
429                 return;
430
431         data_timeout += data->timeout_ns /
432                         ((1000000000UL / host->clk_freq) * host->clk_div);
433
434         if (data_timeout < 0xffff) {
435                 writel(data_timeout, sock->addr + SOCK_MMCSD_DATA_TO);
436                 writel((~TIFM_MMCSD_DPE)
437                        & readl(sock->addr + SOCK_MMCSD_SDIO_MODE_CONFIG),
438                        sock->addr + SOCK_MMCSD_SDIO_MODE_CONFIG);
439         } else {
440                 data_timeout = (data_timeout >> 10) + 1;
441                 if (data_timeout > 0xffff)
442                         data_timeout = 0;       /* set to unlimited */
443                 writel(data_timeout, sock->addr + SOCK_MMCSD_DATA_TO);
444                 writel(TIFM_MMCSD_DPE
445                        | readl(sock->addr + SOCK_MMCSD_SDIO_MODE_CONFIG),
446                        sock->addr + SOCK_MMCSD_SDIO_MODE_CONFIG);
447         }
448 }
449
450 static void tifm_sd_request(struct mmc_host *mmc, struct mmc_request *mrq)
451 {
452         struct tifm_sd *host = mmc_priv(mmc);
453         struct tifm_dev *sock = host->dev;
454         unsigned long flags;
455         int sg_count = 0;
456         struct mmc_data *r_data = mrq->cmd->data;
457
458         spin_lock_irqsave(&sock->lock, flags);
459         if (host->flags & EJECT) {
460                 spin_unlock_irqrestore(&sock->lock, flags);
461                 goto err_out;
462         }
463
464         if (host->req) {
465                 printk(KERN_ERR DRIVER_NAME ": unfinished request detected\n");
466                 spin_unlock_irqrestore(&sock->lock, flags);
467                 goto err_out;
468         }
469
470         if (r_data) {
471                 tifm_sd_set_data_timeout(host, r_data);
472
473                 sg_count = tifm_map_sg(sock, r_data->sg, r_data->sg_len,
474                                        mrq->cmd->flags & MMC_DATA_WRITE
475                                        ? PCI_DMA_TODEVICE : PCI_DMA_FROMDEVICE);
476                 if (sg_count != 1) {
477                         printk(KERN_ERR DRIVER_NAME
478                                 ": scatterlist map failed\n");
479                         spin_unlock_irqrestore(&sock->lock, flags);
480                         goto err_out;
481                 }
482
483                 host->written_blocks = 0;
484                 host->flags &= ~CARD_BUSY;
485                 tifm_sd_prepare_data(host, mrq->cmd);
486         }
487
488         host->req = mrq;
489         mod_timer(&host->timer, jiffies + host->timeout_jiffies);
490         host->state = CMD;
491         writel(TIFM_CTRL_LED | readl(sock->addr + SOCK_CONTROL),
492                sock->addr + SOCK_CONTROL);
493         tifm_sd_exec(host, mrq->cmd);
494         spin_unlock_irqrestore(&sock->lock, flags);
495         return;
496
497 err_out:
498         if (sg_count > 0)
499                 tifm_unmap_sg(sock, r_data->sg, r_data->sg_len,
500                               (r_data->flags & MMC_DATA_WRITE)
501                               ? PCI_DMA_TODEVICE : PCI_DMA_FROMDEVICE);
502
503         mrq->cmd->error = MMC_ERR_TIMEOUT;
504         mmc_request_done(mmc, mrq);
505 }
506
507 static void tifm_sd_end_cmd(unsigned long data)
508 {
509         struct tifm_sd *host = (struct tifm_sd*)data;
510         struct tifm_dev *sock = host->dev;
511         struct mmc_host *mmc = tifm_get_drvdata(sock);
512         struct mmc_request *mrq;
513         struct mmc_data *r_data = NULL;
514         unsigned long flags;
515
516         spin_lock_irqsave(&sock->lock, flags);
517
518         del_timer(&host->timer);
519         mrq = host->req;
520         host->req = NULL;
521         host->state = IDLE;
522
523         if (!mrq) {
524                 printk(KERN_ERR DRIVER_NAME ": no request to complete?\n");
525                 spin_unlock_irqrestore(&sock->lock, flags);
526                 return;
527         }
528
529         r_data = mrq->cmd->data;
530         if (r_data) {
531                 if (r_data->flags & MMC_DATA_WRITE) {
532                         r_data->bytes_xfered = host->written_blocks
533                                                * r_data->blksz;
534                 } else {
535                         r_data->bytes_xfered = r_data->blocks -
536                                 readl(sock->addr + SOCK_MMCSD_NUM_BLOCKS) - 1;
537                         r_data->bytes_xfered *= r_data->blksz;
538                         r_data->bytes_xfered += r_data->blksz -
539                                 readl(sock->addr + SOCK_MMCSD_BLOCK_LEN) + 1;
540                 }
541                 tifm_unmap_sg(sock, r_data->sg, r_data->sg_len,
542                               (r_data->flags & MMC_DATA_WRITE)
543                               ? PCI_DMA_TODEVICE : PCI_DMA_FROMDEVICE);
544         }
545
546         writel((~TIFM_CTRL_LED) & readl(sock->addr + SOCK_CONTROL),
547                sock->addr + SOCK_CONTROL);
548
549         spin_unlock_irqrestore(&sock->lock, flags);
550         mmc_request_done(mmc, mrq);
551 }
552
553 static void tifm_sd_request_nodma(struct mmc_host *mmc, struct mmc_request *mrq)
554 {
555         struct tifm_sd *host = mmc_priv(mmc);
556         struct tifm_dev *sock = host->dev;
557         unsigned long flags;
558         struct mmc_data *r_data = mrq->cmd->data;
559
560         spin_lock_irqsave(&sock->lock, flags);
561         if (host->flags & EJECT) {
562                 spin_unlock_irqrestore(&sock->lock, flags);
563                 goto err_out;
564         }
565
566         if (host->req) {
567                 printk(KERN_ERR DRIVER_NAME ": unfinished request detected\n");
568                 spin_unlock_irqrestore(&sock->lock, flags);
569                 goto err_out;
570         }
571
572         if (r_data) {
573                 tifm_sd_set_data_timeout(host, r_data);
574
575                 host->buffer_size = mrq->cmd->data->blocks
576                                     * mrq->cmd->data->blksz;
577
578                 writel(TIFM_MMCSD_BUFINT
579                        | readl(sock->addr + SOCK_MMCSD_INT_ENABLE),
580                        sock->addr + SOCK_MMCSD_INT_ENABLE);
581                 writel(((TIFM_MMCSD_FIFO_SIZE - 1) << 8)
582                        | (TIFM_MMCSD_FIFO_SIZE - 1),
583                        sock->addr + SOCK_MMCSD_BUFFER_CONFIG);
584
585                 host->written_blocks = 0;
586                 host->flags &= ~CARD_BUSY;
587                 host->buffer_pos = 0;
588                 writel(r_data->blocks - 1, sock->addr + SOCK_MMCSD_NUM_BLOCKS);
589                 writel(r_data->blksz - 1, sock->addr + SOCK_MMCSD_BLOCK_LEN);
590         }
591
592         host->req = mrq;
593         mod_timer(&host->timer, jiffies + host->timeout_jiffies);
594         host->state = CMD;
595         writel(TIFM_CTRL_LED | readl(sock->addr + SOCK_CONTROL),
596                sock->addr + SOCK_CONTROL);
597         tifm_sd_exec(host, mrq->cmd);
598         spin_unlock_irqrestore(&sock->lock, flags);
599         return;
600
601 err_out:
602         mrq->cmd->error = MMC_ERR_TIMEOUT;
603         mmc_request_done(mmc, mrq);
604 }
605
606 static void tifm_sd_end_cmd_nodma(unsigned long data)
607 {
608         struct tifm_sd *host = (struct tifm_sd*)data;
609         struct tifm_dev *sock = host->dev;
610         struct mmc_host *mmc = tifm_get_drvdata(sock);
611         struct mmc_request *mrq;
612         struct mmc_data *r_data = NULL;
613         unsigned long flags;
614
615         spin_lock_irqsave(&sock->lock, flags);
616
617         del_timer(&host->timer);
618         mrq = host->req;
619         host->req = NULL;
620         host->state = IDLE;
621
622         if (!mrq) {
623                 printk(KERN_ERR DRIVER_NAME ": no request to complete?\n");
624                 spin_unlock_irqrestore(&sock->lock, flags);
625                 return;
626         }
627
628         r_data = mrq->cmd->data;
629         if (r_data) {
630                 writel((~TIFM_MMCSD_BUFINT) &
631                         readl(sock->addr + SOCK_MMCSD_INT_ENABLE),
632                         sock->addr + SOCK_MMCSD_INT_ENABLE);
633
634                 if (r_data->flags & MMC_DATA_WRITE) {
635                         r_data->bytes_xfered = host->written_blocks
636                                                * r_data->blksz;
637                 } else {
638                         r_data->bytes_xfered = r_data->blocks -
639                                 readl(sock->addr + SOCK_MMCSD_NUM_BLOCKS) - 1;
640                         r_data->bytes_xfered *= r_data->blksz;
641                         r_data->bytes_xfered += r_data->blksz -
642                                 readl(sock->addr + SOCK_MMCSD_BLOCK_LEN) + 1;
643                 }
644                 host->buffer_pos = 0;
645                 host->buffer_size = 0;
646         }
647
648         writel((~TIFM_CTRL_LED) & readl(sock->addr + SOCK_CONTROL),
649                sock->addr + SOCK_CONTROL);
650
651         spin_unlock_irqrestore(&sock->lock, flags);
652
653         mmc_request_done(mmc, mrq);
654 }
655
656 static void tifm_sd_terminate(struct tifm_sd *host)
657 {
658         struct tifm_dev *sock = host->dev;
659         unsigned long flags;
660
661         writel(0, sock->addr + SOCK_MMCSD_INT_ENABLE);
662         mmiowb();
663         spin_lock_irqsave(&sock->lock, flags);
664         host->flags |= EJECT;
665         if (host->req) {
666                 writel(TIFM_FIFO_INT_SETALL,
667                        sock->addr + SOCK_DMA_FIFO_INT_ENABLE_CLEAR);
668                 writel(0, sock->addr + SOCK_DMA_FIFO_INT_ENABLE_SET);
669                 tasklet_schedule(&host->finish_tasklet);
670         }
671         spin_unlock_irqrestore(&sock->lock, flags);
672 }
673
674 static void tifm_sd_abort(unsigned long data)
675 {
676         struct tifm_sd *host = (struct tifm_sd*)data;
677
678         printk(KERN_ERR DRIVER_NAME
679                ": card failed to respond for a long period of time");
680
681         tifm_sd_terminate(host);
682         tifm_eject(host->dev);
683 }
684
685 static void tifm_sd_ios(struct mmc_host *mmc, struct mmc_ios *ios)
686 {
687         struct tifm_sd *host = mmc_priv(mmc);
688         struct tifm_dev *sock = host->dev;
689         unsigned int clk_div1, clk_div2;
690         unsigned long flags;
691
692         spin_lock_irqsave(&sock->lock, flags);
693
694         dev_dbg(&sock->dev, "Setting bus width %d, power %d\n", ios->bus_width,
695                 ios->power_mode);
696         if (ios->bus_width == MMC_BUS_WIDTH_4) {
697                 writel(TIFM_MMCSD_4BBUS | readl(sock->addr + SOCK_MMCSD_CONFIG),
698                        sock->addr + SOCK_MMCSD_CONFIG);
699         } else {
700                 writel((~TIFM_MMCSD_4BBUS)
701                        & readl(sock->addr + SOCK_MMCSD_CONFIG),
702                        sock->addr + SOCK_MMCSD_CONFIG);
703         }
704
705         if (ios->clock) {
706                 clk_div1 = 20000000 / ios->clock;
707                 if (!clk_div1)
708                         clk_div1 = 1;
709
710                 clk_div2 = 24000000 / ios->clock;
711                 if (!clk_div2)
712                         clk_div2 = 1;
713
714                 if ((20000000 / clk_div1) > ios->clock)
715                         clk_div1++;
716                 if ((24000000 / clk_div2) > ios->clock)
717                         clk_div2++;
718                 if ((20000000 / clk_div1) > (24000000 / clk_div2)) {
719                         host->clk_freq = 20000000;
720                         host->clk_div = clk_div1;
721                         writel((~TIFM_CTRL_FAST_CLK)
722                                & readl(sock->addr + SOCK_CONTROL),
723                                sock->addr + SOCK_CONTROL);
724                 } else {
725                         host->clk_freq = 24000000;
726                         host->clk_div = clk_div2;
727                         writel(TIFM_CTRL_FAST_CLK
728                                | readl(sock->addr + SOCK_CONTROL),
729                                sock->addr + SOCK_CONTROL);
730                 }
731         } else {
732                 host->clk_div = 0;
733         }
734         host->clk_div &= TIFM_MMCSD_CLKMASK;
735         writel(host->clk_div
736                | ((~TIFM_MMCSD_CLKMASK)
737                   & readl(sock->addr + SOCK_MMCSD_CONFIG)),
738                sock->addr + SOCK_MMCSD_CONFIG);
739
740         if (ios->bus_mode == MMC_BUSMODE_OPENDRAIN)
741                 host->flags |= OPENDRAIN;
742         else
743                 host->flags &= ~OPENDRAIN;
744
745         /* chip_select : maybe later */
746         //vdd
747         //power is set before probe / after remove
748         //I believe, power_off when already marked for eject is sufficient to
749         // allow removal.
750         if ((host->flags & EJECT) && ios->power_mode == MMC_POWER_OFF) {
751                 host->flags |= EJECT_DONE;
752                 wake_up_all(&host->notify);
753         }
754
755         spin_unlock_irqrestore(&sock->lock, flags);
756 }
757
758 static int tifm_sd_ro(struct mmc_host *mmc)
759 {
760         int rc;
761         struct tifm_sd *host = mmc_priv(mmc);
762         struct tifm_dev *sock = host->dev;
763         unsigned long flags;
764
765         spin_lock_irqsave(&sock->lock, flags);
766
767         host->flags |= (CARD_RO & readl(sock->addr + SOCK_PRESENT_STATE));
768         rc = (host->flags & CARD_RO) ? 1 : 0;
769
770         spin_unlock_irqrestore(&sock->lock, flags);
771         return rc;
772 }
773
774 static struct mmc_host_ops tifm_sd_ops = {
775         .request = tifm_sd_request,
776         .set_ios = tifm_sd_ios,
777         .get_ro  = tifm_sd_ro
778 };
779
780 static int tifm_sd_initialize_host(struct tifm_sd *host)
781 {
782         int rc;
783         unsigned int host_status = 0;
784         struct tifm_dev *sock = host->dev;
785
786         writel(0, sock->addr + SOCK_MMCSD_INT_ENABLE);
787         mmiowb();
788         host->clk_div = 61;
789         host->clk_freq = 20000000;
790         writel(TIFM_MMCSD_RESET, sock->addr + SOCK_MMCSD_SYSTEM_CONTROL);
791         writel(host->clk_div | TIFM_MMCSD_POWER,
792                sock->addr + SOCK_MMCSD_CONFIG);
793
794         /* wait up to 0.51 sec for reset */
795         for (rc = 2; rc <= 256; rc <<= 1) {
796                 if (1 & readl(sock->addr + SOCK_MMCSD_SYSTEM_STATUS)) {
797                         rc = 0;
798                         break;
799                 }
800                 msleep(rc);
801         }
802
803         if (rc) {
804                 printk(KERN_ERR DRIVER_NAME
805                        ": controller failed to reset\n");
806                 return -ENODEV;
807         }
808
809         writel(0, sock->addr + SOCK_MMCSD_NUM_BLOCKS);
810         writel(host->clk_div | TIFM_MMCSD_POWER,
811                sock->addr + SOCK_MMCSD_CONFIG);
812         writel(TIFM_MMCSD_RXDE, sock->addr + SOCK_MMCSD_BUFFER_CONFIG);
813
814         // command timeout fixed to 64 clocks for now
815         writel(64, sock->addr + SOCK_MMCSD_COMMAND_TO);
816         writel(TIFM_MMCSD_INAB, sock->addr + SOCK_MMCSD_COMMAND);
817
818         /* INAB should take much less than reset */
819         for (rc = 1; rc <= 16; rc <<= 1) {
820                 host_status = readl(sock->addr + SOCK_MMCSD_STATUS);
821                 writel(host_status, sock->addr + SOCK_MMCSD_STATUS);
822                 if (!(host_status & TIFM_MMCSD_ERRMASK)
823                     && (host_status & TIFM_MMCSD_EOC)) {
824                         rc = 0;
825                         break;
826                 }
827                 msleep(rc);
828         }
829
830         if (rc) {
831                 printk(KERN_ERR DRIVER_NAME
832                        ": card not ready - probe failed on initialization\n");
833                 return -ENODEV;
834         }
835
836         writel(TIFM_MMCSD_DATAMASK | TIFM_MMCSD_ERRMASK,
837                sock->addr + SOCK_MMCSD_INT_ENABLE);
838         mmiowb();
839
840         return 0;
841 }
842
843 static int tifm_sd_probe(struct tifm_dev *sock)
844 {
845         struct mmc_host *mmc;
846         struct tifm_sd *host;
847         int rc = -EIO;
848
849         if (!(TIFM_SOCK_STATE_OCCUPIED
850               & readl(sock->addr + SOCK_PRESENT_STATE))) {
851                 printk(KERN_WARNING DRIVER_NAME ": card gone, unexpectedly\n");
852                 return rc;
853         }
854
855         mmc = mmc_alloc_host(sizeof(struct tifm_sd), &sock->dev);
856         if (!mmc)
857                 return -ENOMEM;
858
859         host = mmc_priv(mmc);
860         tifm_set_drvdata(sock, mmc);
861         host->dev = sock;
862         host->timeout_jiffies = msecs_to_jiffies(1000);
863
864         init_waitqueue_head(&host->notify);
865         tasklet_init(&host->finish_tasklet,
866                      no_dma ? tifm_sd_end_cmd_nodma : tifm_sd_end_cmd,
867                      (unsigned long)host);
868         setup_timer(&host->timer, tifm_sd_abort, (unsigned long)host);
869
870         tifm_sd_ops.request = no_dma ? tifm_sd_request_nodma : tifm_sd_request;
871         mmc->ops = &tifm_sd_ops;
872         mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34;
873         mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_MULTIWRITE;
874         mmc->f_min = 20000000 / 60;
875         mmc->f_max = 24000000;
876         mmc->max_hw_segs = 1;
877         mmc->max_phys_segs = 1;
878         // limited by DMA counter - it's safer to stick with
879         // block counter has 11 bits though
880         mmc->max_blk_count = 256;
881         // 2k maximum hw block length
882         mmc->max_blk_size = 2048;
883         mmc->max_req_size = mmc->max_blk_size * mmc->max_blk_count;
884         mmc->max_seg_size = mmc->max_req_size;
885         sock->signal_irq = tifm_sd_signal_irq;
886         rc = tifm_sd_initialize_host(host);
887
888         if (!rc)
889                 rc = mmc_add_host(mmc);
890         if (rc)
891                 goto out_free_mmc;
892
893         return 0;
894 out_free_mmc:
895         mmc_free_host(mmc);
896         return rc;
897 }
898
899 static void tifm_sd_remove(struct tifm_dev *sock)
900 {
901         struct mmc_host *mmc = tifm_get_drvdata(sock);
902         struct tifm_sd *host = mmc_priv(mmc);
903
904         del_timer_sync(&host->timer);
905         tifm_sd_terminate(host);
906         wait_event_timeout(host->notify, host->flags & EJECT_DONE,
907                            host->timeout_jiffies);
908         tasklet_kill(&host->finish_tasklet);
909         mmc_remove_host(mmc);
910
911         /* The meaning of the bit majority in this constant is unknown. */
912         writel(0xfff8 & readl(sock->addr + SOCK_CONTROL),
913                sock->addr + SOCK_CONTROL);
914
915         tifm_set_drvdata(sock, NULL);
916         mmc_free_host(mmc);
917 }
918
919 #ifdef CONFIG_PM
920
921 static int tifm_sd_suspend(struct tifm_dev *sock, pm_message_t state)
922 {
923         struct mmc_host *mmc = tifm_get_drvdata(sock);
924         int rc;
925
926         rc = mmc_suspend_host(mmc, state);
927         /* The meaning of the bit majority in this constant is unknown. */
928         writel(0xfff8 & readl(sock->addr + SOCK_CONTROL),
929                sock->addr + SOCK_CONTROL);
930         return rc;
931 }
932
933 static int tifm_sd_resume(struct tifm_dev *sock)
934 {
935         struct mmc_host *mmc = tifm_get_drvdata(sock);
936         struct tifm_sd *host = mmc_priv(mmc);
937
938         if (sock->media_id != FM_SD
939             || tifm_sd_initialize_host(host)) {
940                 tifm_eject(sock);
941                 return 0;
942         } else {
943                 return mmc_resume_host(mmc);
944         }
945 }
946
947 #else
948
949 #define tifm_sd_suspend NULL
950 #define tifm_sd_resume NULL
951
952 #endif /* CONFIG_PM */
953
954 static tifm_media_id tifm_sd_id_tbl[] = {
955         FM_SD, 0
956 };
957
958 static struct tifm_driver tifm_sd_driver = {
959         .driver = {
960                 .name  = DRIVER_NAME,
961                 .owner = THIS_MODULE
962         },
963         .id_table = tifm_sd_id_tbl,
964         .probe    = tifm_sd_probe,
965         .remove   = tifm_sd_remove,
966         .suspend  = tifm_sd_suspend,
967         .resume   = tifm_sd_resume
968 };
969
970 static int __init tifm_sd_init(void)
971 {
972         return tifm_register_driver(&tifm_sd_driver);
973 }
974
975 static void __exit tifm_sd_exit(void)
976 {
977         tifm_unregister_driver(&tifm_sd_driver);
978 }
979
980 MODULE_AUTHOR("Alex Dubov");
981 MODULE_DESCRIPTION("TI FlashMedia SD driver");
982 MODULE_LICENSE("GPL");
983 MODULE_DEVICE_TABLE(tifm, tifm_sd_id_tbl);
984 MODULE_VERSION(DRIVER_VERSION);
985
986 module_init(tifm_sd_init);
987 module_exit(tifm_sd_exit);