2 * linux/drivers/mmc/host/wbsd.c - Winbond W83L51xD SD/MMC driver
4 * Copyright (C) 2004-2007 Pierre Ossman, All Rights Reserved.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or (at
9 * your option) any later version.
14 * Changes to the FIFO system should be done with extreme care since
15 * the hardware is full of bugs related to the FIFO. Known issues are:
17 * - FIFO size field in FSR is always zero.
19 * - FIFO interrupts tend not to work as they should. Interrupts are
20 * triggered only for full/empty events, not for threshold values.
22 * - On APIC systems the FIFO empty interrupt is sometimes lost.
25 #include <linux/module.h>
26 #include <linux/moduleparam.h>
27 #include <linux/init.h>
28 #include <linux/ioport.h>
29 #include <linux/platform_device.h>
30 #include <linux/interrupt.h>
31 #include <linux/dma-mapping.h>
32 #include <linux/delay.h>
33 #include <linux/pnp.h>
34 #include <linux/highmem.h>
35 #include <linux/mmc/host.h>
36 #include <linux/scatterlist.h>
37 #include <linux/slab.h>
44 #define DRIVER_NAME "wbsd"
47 pr_debug(DRIVER_NAME ": " x)
48 #define DBGF(f, x...) \
49 pr_debug(DRIVER_NAME " [%s()]: " f, __func__ , ##x)
57 static const struct pnp_device_id pnp_dev_table
[] = {
63 MODULE_DEVICE_TABLE(pnp
, pnp_dev_table
);
65 #endif /* CONFIG_PNP */
67 static const int config_ports
[] = { 0x2E, 0x4E };
68 static const int unlock_codes
[] = { 0x83, 0x87 };
70 static const int valid_ids
[] = {
75 static unsigned int param_nopnp
= 0;
77 static const unsigned int param_nopnp
= 1;
79 static unsigned int param_io
= 0x248;
80 static unsigned int param_irq
= 6;
81 static int param_dma
= 2;
87 static inline void wbsd_unlock_config(struct wbsd_host
*host
)
89 BUG_ON(host
->config
== 0);
91 outb(host
->unlock_code
, host
->config
);
92 outb(host
->unlock_code
, host
->config
);
95 static inline void wbsd_lock_config(struct wbsd_host
*host
)
97 BUG_ON(host
->config
== 0);
99 outb(LOCK_CODE
, host
->config
);
102 static inline void wbsd_write_config(struct wbsd_host
*host
, u8 reg
, u8 value
)
104 BUG_ON(host
->config
== 0);
106 outb(reg
, host
->config
);
107 outb(value
, host
->config
+ 1);
110 static inline u8
wbsd_read_config(struct wbsd_host
*host
, u8 reg
)
112 BUG_ON(host
->config
== 0);
114 outb(reg
, host
->config
);
115 return inb(host
->config
+ 1);
118 static inline void wbsd_write_index(struct wbsd_host
*host
, u8 index
, u8 value
)
120 outb(index
, host
->base
+ WBSD_IDXR
);
121 outb(value
, host
->base
+ WBSD_DATAR
);
124 static inline u8
wbsd_read_index(struct wbsd_host
*host
, u8 index
)
126 outb(index
, host
->base
+ WBSD_IDXR
);
127 return inb(host
->base
+ WBSD_DATAR
);
134 static void wbsd_init_device(struct wbsd_host
*host
)
139 * Reset chip (SD/MMC part) and fifo.
141 setup
= wbsd_read_index(host
, WBSD_IDX_SETUP
);
142 setup
|= WBSD_FIFO_RESET
| WBSD_SOFT_RESET
;
143 wbsd_write_index(host
, WBSD_IDX_SETUP
, setup
);
148 setup
&= ~WBSD_DAT3_H
;
149 wbsd_write_index(host
, WBSD_IDX_SETUP
, setup
);
150 host
->flags
&= ~WBSD_FIGNORE_DETECT
;
153 * Read back default clock.
155 host
->clk
= wbsd_read_index(host
, WBSD_IDX_CLK
);
160 outb(WBSD_POWER_N
, host
->base
+ WBSD_CSR
);
163 * Set maximum timeout.
165 wbsd_write_index(host
, WBSD_IDX_TAAC
, 0x7F);
168 * Test for card presence
170 if (inb(host
->base
+ WBSD_CSR
) & WBSD_CARDPRESENT
)
171 host
->flags
|= WBSD_FCARD_PRESENT
;
173 host
->flags
&= ~WBSD_FCARD_PRESENT
;
176 * Enable interesting interrupts.
179 ier
|= WBSD_EINT_CARD
;
180 ier
|= WBSD_EINT_FIFO_THRE
;
181 ier
|= WBSD_EINT_CRC
;
182 ier
|= WBSD_EINT_TIMEOUT
;
185 outb(ier
, host
->base
+ WBSD_EIR
);
190 inb(host
->base
+ WBSD_ISR
);
193 static void wbsd_reset(struct wbsd_host
*host
)
197 pr_err("%s: Resetting chip\n", mmc_hostname(host
->mmc
));
200 * Soft reset of chip (SD/MMC part).
202 setup
= wbsd_read_index(host
, WBSD_IDX_SETUP
);
203 setup
|= WBSD_SOFT_RESET
;
204 wbsd_write_index(host
, WBSD_IDX_SETUP
, setup
);
207 static void wbsd_request_end(struct wbsd_host
*host
, struct mmc_request
*mrq
)
209 unsigned long dmaflags
;
211 if (host
->dma
>= 0) {
213 * Release ISA DMA controller.
215 dmaflags
= claim_dma_lock();
216 disable_dma(host
->dma
);
217 clear_dma_ff(host
->dma
);
218 release_dma_lock(dmaflags
);
221 * Disable DMA on host.
223 wbsd_write_index(host
, WBSD_IDX_DMA
, 0);
229 * MMC layer might call back into the driver so first unlock.
231 spin_unlock(&host
->lock
);
232 mmc_request_done(host
->mmc
, mrq
);
233 spin_lock(&host
->lock
);
237 * Scatter/gather functions
240 static inline void wbsd_init_sg(struct wbsd_host
*host
, struct mmc_data
*data
)
243 * Get info. about SG list from data structure.
245 host
->cur_sg
= data
->sg
;
246 host
->num_sg
= data
->sg_len
;
249 host
->remain
= host
->cur_sg
->length
;
252 static inline int wbsd_next_sg(struct wbsd_host
*host
)
255 * Skip to next SG entry.
263 if (host
->num_sg
> 0) {
265 host
->remain
= host
->cur_sg
->length
;
271 static inline char *wbsd_sg_to_buffer(struct wbsd_host
*host
)
273 return sg_virt(host
->cur_sg
);
276 static inline void wbsd_sg_to_dma(struct wbsd_host
*host
, struct mmc_data
*data
)
279 struct scatterlist
*sg
;
280 char *dmabuf
= host
->dma_buffer
;
286 for (i
= 0; i
< len
; i
++) {
287 sgbuf
= sg_virt(&sg
[i
]);
288 memcpy(dmabuf
, sgbuf
, sg
[i
].length
);
289 dmabuf
+= sg
[i
].length
;
293 static inline void wbsd_dma_to_sg(struct wbsd_host
*host
, struct mmc_data
*data
)
296 struct scatterlist
*sg
;
297 char *dmabuf
= host
->dma_buffer
;
303 for (i
= 0; i
< len
; i
++) {
304 sgbuf
= sg_virt(&sg
[i
]);
305 memcpy(sgbuf
, dmabuf
, sg
[i
].length
);
306 dmabuf
+= sg
[i
].length
;
314 static inline void wbsd_get_short_reply(struct wbsd_host
*host
,
315 struct mmc_command
*cmd
)
318 * Correct response type?
320 if (wbsd_read_index(host
, WBSD_IDX_RSPLEN
) != WBSD_RSP_SHORT
) {
321 cmd
->error
= -EILSEQ
;
325 cmd
->resp
[0] = wbsd_read_index(host
, WBSD_IDX_RESP12
) << 24;
326 cmd
->resp
[0] |= wbsd_read_index(host
, WBSD_IDX_RESP13
) << 16;
327 cmd
->resp
[0] |= wbsd_read_index(host
, WBSD_IDX_RESP14
) << 8;
328 cmd
->resp
[0] |= wbsd_read_index(host
, WBSD_IDX_RESP15
) << 0;
329 cmd
->resp
[1] = wbsd_read_index(host
, WBSD_IDX_RESP16
) << 24;
332 static inline void wbsd_get_long_reply(struct wbsd_host
*host
,
333 struct mmc_command
*cmd
)
338 * Correct response type?
340 if (wbsd_read_index(host
, WBSD_IDX_RSPLEN
) != WBSD_RSP_LONG
) {
341 cmd
->error
= -EILSEQ
;
345 for (i
= 0; i
< 4; i
++) {
347 wbsd_read_index(host
, WBSD_IDX_RESP1
+ i
* 4) << 24;
349 wbsd_read_index(host
, WBSD_IDX_RESP2
+ i
* 4) << 16;
351 wbsd_read_index(host
, WBSD_IDX_RESP3
+ i
* 4) << 8;
353 wbsd_read_index(host
, WBSD_IDX_RESP4
+ i
* 4) << 0;
357 static void wbsd_send_command(struct wbsd_host
*host
, struct mmc_command
*cmd
)
363 * Clear accumulated ISR. The interrupt routine
364 * will fill this one with events that occur during
370 * Send the command (CRC calculated by host).
372 outb(cmd
->opcode
, host
->base
+ WBSD_CMDR
);
373 for (i
= 3; i
>= 0; i
--)
374 outb((cmd
->arg
>> (i
* 8)) & 0xff, host
->base
+ WBSD_CMDR
);
379 * Wait for the request to complete.
382 status
= wbsd_read_index(host
, WBSD_IDX_STATUS
);
383 } while (status
& WBSD_CARDTRAFFIC
);
386 * Do we expect a reply?
388 if (cmd
->flags
& MMC_RSP_PRESENT
) {
395 if (isr
& WBSD_INT_CARD
)
396 cmd
->error
= -ENOMEDIUM
;
398 else if (isr
& WBSD_INT_TIMEOUT
)
399 cmd
->error
= -ETIMEDOUT
;
401 else if ((cmd
->flags
& MMC_RSP_CRC
) && (isr
& WBSD_INT_CRC
))
402 cmd
->error
= -EILSEQ
;
405 if (cmd
->flags
& MMC_RSP_136
)
406 wbsd_get_long_reply(host
, cmd
);
408 wbsd_get_short_reply(host
, cmd
);
417 static void wbsd_empty_fifo(struct wbsd_host
*host
)
419 struct mmc_data
*data
= host
->mrq
->cmd
->data
;
424 * Handle excessive data.
426 if (host
->num_sg
== 0)
429 buffer
= wbsd_sg_to_buffer(host
) + host
->offset
;
432 * Drain the fifo. This has a tendency to loop longer
433 * than the FIFO length (usually one block).
435 while (!((fsr
= inb(host
->base
+ WBSD_FSR
)) & WBSD_FIFO_EMPTY
)) {
437 * The size field in the FSR is broken so we have to
440 if (fsr
& WBSD_FIFO_FULL
)
442 else if (fsr
& WBSD_FIFO_FUTHRE
)
447 for (i
= 0; i
< fifo
; i
++) {
448 *buffer
= inb(host
->base
+ WBSD_DFR
);
453 data
->bytes_xfered
++;
456 * End of scatter list entry?
458 if (host
->remain
== 0) {
460 * Get next entry. Check if last.
462 if (!wbsd_next_sg(host
))
465 buffer
= wbsd_sg_to_buffer(host
);
471 * This is a very dirty hack to solve a
472 * hardware problem. The chip doesn't trigger
473 * FIFO threshold interrupts properly.
475 if ((data
->blocks
* data
->blksz
- data
->bytes_xfered
) < 16)
476 tasklet_schedule(&host
->fifo_tasklet
);
479 static void wbsd_fill_fifo(struct wbsd_host
*host
)
481 struct mmc_data
*data
= host
->mrq
->cmd
->data
;
486 * Check that we aren't being called after the
487 * entire buffer has been transferred.
489 if (host
->num_sg
== 0)
492 buffer
= wbsd_sg_to_buffer(host
) + host
->offset
;
495 * Fill the fifo. This has a tendency to loop longer
496 * than the FIFO length (usually one block).
498 while (!((fsr
= inb(host
->base
+ WBSD_FSR
)) & WBSD_FIFO_FULL
)) {
500 * The size field in the FSR is broken so we have to
503 if (fsr
& WBSD_FIFO_EMPTY
)
505 else if (fsr
& WBSD_FIFO_EMTHRE
)
510 for (i
= 16; i
> fifo
; i
--) {
511 outb(*buffer
, host
->base
+ WBSD_DFR
);
516 data
->bytes_xfered
++;
519 * End of scatter list entry?
521 if (host
->remain
== 0) {
523 * Get next entry. Check if last.
525 if (!wbsd_next_sg(host
))
528 buffer
= wbsd_sg_to_buffer(host
);
534 * The controller stops sending interrupts for
535 * 'FIFO empty' under certain conditions. So we
536 * need to be a bit more pro-active.
538 tasklet_schedule(&host
->fifo_tasklet
);
541 static void wbsd_prepare_data(struct wbsd_host
*host
, struct mmc_data
*data
)
545 unsigned long dmaflags
;
551 size
= data
->blocks
* data
->blksz
;
554 * Check timeout values for overflow.
555 * (Yes, some cards cause this value to overflow).
557 if (data
->timeout_ns
> 127000000)
558 wbsd_write_index(host
, WBSD_IDX_TAAC
, 127);
560 wbsd_write_index(host
, WBSD_IDX_TAAC
,
561 data
->timeout_ns
/ 1000000);
564 if (data
->timeout_clks
> 255)
565 wbsd_write_index(host
, WBSD_IDX_NSAC
, 255);
567 wbsd_write_index(host
, WBSD_IDX_NSAC
, data
->timeout_clks
);
570 * Inform the chip of how large blocks will be
571 * sent. It needs this to determine when to
574 * Space for CRC must be included in the size.
575 * Two bytes are needed for each data line.
577 if (host
->bus_width
== MMC_BUS_WIDTH_1
) {
578 blksize
= data
->blksz
+ 2;
580 wbsd_write_index(host
, WBSD_IDX_PBSMSB
, (blksize
>> 4) & 0xF0);
581 wbsd_write_index(host
, WBSD_IDX_PBSLSB
, blksize
& 0xFF);
582 } else if (host
->bus_width
== MMC_BUS_WIDTH_4
) {
583 blksize
= data
->blksz
+ 2 * 4;
585 wbsd_write_index(host
, WBSD_IDX_PBSMSB
,
586 ((blksize
>> 4) & 0xF0) | WBSD_DATA_WIDTH
);
587 wbsd_write_index(host
, WBSD_IDX_PBSLSB
, blksize
& 0xFF);
589 data
->error
= -EINVAL
;
594 * Clear the FIFO. This is needed even for DMA
595 * transfers since the chip still uses the FIFO
598 setup
= wbsd_read_index(host
, WBSD_IDX_SETUP
);
599 setup
|= WBSD_FIFO_RESET
;
600 wbsd_write_index(host
, WBSD_IDX_SETUP
, setup
);
605 if (host
->dma
>= 0) {
607 * The buffer for DMA is only 64 kB.
609 BUG_ON(size
> 0x10000);
610 if (size
> 0x10000) {
611 data
->error
= -EINVAL
;
616 * Transfer data from the SG list to
619 if (data
->flags
& MMC_DATA_WRITE
)
620 wbsd_sg_to_dma(host
, data
);
623 * Initialise the ISA DMA controller.
625 dmaflags
= claim_dma_lock();
626 disable_dma(host
->dma
);
627 clear_dma_ff(host
->dma
);
628 if (data
->flags
& MMC_DATA_READ
)
629 set_dma_mode(host
->dma
, DMA_MODE_READ
& ~0x40);
631 set_dma_mode(host
->dma
, DMA_MODE_WRITE
& ~0x40);
632 set_dma_addr(host
->dma
, host
->dma_addr
);
633 set_dma_count(host
->dma
, size
);
635 enable_dma(host
->dma
);
636 release_dma_lock(dmaflags
);
639 * Enable DMA on the host.
641 wbsd_write_index(host
, WBSD_IDX_DMA
, WBSD_DMA_ENABLE
);
644 * This flag is used to keep printk
645 * output to a minimum.
650 * Initialise the SG list.
652 wbsd_init_sg(host
, data
);
657 wbsd_write_index(host
, WBSD_IDX_DMA
, 0);
660 * Set up FIFO threshold levels (and fill
661 * buffer if doing a write).
663 if (data
->flags
& MMC_DATA_READ
) {
664 wbsd_write_index(host
, WBSD_IDX_FIFOEN
,
665 WBSD_FIFOEN_FULL
| 8);
667 wbsd_write_index(host
, WBSD_IDX_FIFOEN
,
668 WBSD_FIFOEN_EMPTY
| 8);
669 wbsd_fill_fifo(host
);
676 static void wbsd_finish_data(struct wbsd_host
*host
, struct mmc_data
*data
)
678 unsigned long dmaflags
;
682 WARN_ON(host
->mrq
== NULL
);
685 * Send a stop command if needed.
688 wbsd_send_command(host
, data
->stop
);
691 * Wait for the controller to leave data
695 status
= wbsd_read_index(host
, WBSD_IDX_STATUS
);
696 } while (status
& (WBSD_BLOCK_READ
| WBSD_BLOCK_WRITE
));
701 if (host
->dma
>= 0) {
703 * Disable DMA on the host.
705 wbsd_write_index(host
, WBSD_IDX_DMA
, 0);
708 * Turn of ISA DMA controller.
710 dmaflags
= claim_dma_lock();
711 disable_dma(host
->dma
);
712 clear_dma_ff(host
->dma
);
713 count
= get_dma_residue(host
->dma
);
714 release_dma_lock(dmaflags
);
716 data
->bytes_xfered
= host
->mrq
->data
->blocks
*
717 host
->mrq
->data
->blksz
- count
;
718 data
->bytes_xfered
-= data
->bytes_xfered
% data
->blksz
;
724 pr_err("%s: Incomplete DMA transfer. "
726 mmc_hostname(host
->mmc
), count
);
732 * Transfer data from DMA buffer to
735 if (data
->flags
& MMC_DATA_READ
)
736 wbsd_dma_to_sg(host
, data
);
740 if (data
->bytes_xfered
)
741 data
->bytes_xfered
-= data
->blksz
;
745 wbsd_request_end(host
, host
->mrq
);
748 /*****************************************************************************\
750 * MMC layer callbacks *
752 \*****************************************************************************/
754 static void wbsd_request(struct mmc_host
*mmc
, struct mmc_request
*mrq
)
756 struct wbsd_host
*host
= mmc_priv(mmc
);
757 struct mmc_command
*cmd
;
760 * Disable tasklets to avoid a deadlock.
762 spin_lock_bh(&host
->lock
);
764 BUG_ON(host
->mrq
!= NULL
);
771 * Check that there is actually a card in the slot.
773 if (!(host
->flags
& WBSD_FCARD_PRESENT
)) {
774 cmd
->error
= -ENOMEDIUM
;
780 * The hardware is so delightfully stupid that it has a list
781 * of "data" commands. If a command isn't on this list, it'll
782 * just go back to the idle state and won't send any data
785 switch (cmd
->opcode
) {
799 /* ACMDs. We don't keep track of state, so we just treat them
800 * like any other command. */
805 pr_warn("%s: Data command %d is not supported by this controller\n",
806 mmc_hostname(host
->mmc
), cmd
->opcode
);
807 cmd
->error
= -EINVAL
;
814 * Does the request include data?
817 wbsd_prepare_data(host
, cmd
->data
);
819 if (cmd
->data
->error
)
823 wbsd_send_command(host
, cmd
);
826 * If this is a data transfer the request
827 * will be finished after the data has
830 if (cmd
->data
&& !cmd
->error
) {
832 * Dirty fix for hardware bug.
835 tasklet_schedule(&host
->fifo_tasklet
);
837 spin_unlock_bh(&host
->lock
);
843 wbsd_request_end(host
, mrq
);
845 spin_unlock_bh(&host
->lock
);
848 static void wbsd_set_ios(struct mmc_host
*mmc
, struct mmc_ios
*ios
)
850 struct wbsd_host
*host
= mmc_priv(mmc
);
853 spin_lock_bh(&host
->lock
);
856 * Reset the chip on each power off.
857 * Should clear out any weird states.
859 if (ios
->power_mode
== MMC_POWER_OFF
)
860 wbsd_init_device(host
);
862 if (ios
->clock
>= 24000000)
864 else if (ios
->clock
>= 16000000)
866 else if (ios
->clock
>= 12000000)
872 * Only write to the clock register when
873 * there is an actual change.
875 if (clk
!= host
->clk
) {
876 wbsd_write_index(host
, WBSD_IDX_CLK
, clk
);
883 if (ios
->power_mode
!= MMC_POWER_OFF
) {
884 pwr
= inb(host
->base
+ WBSD_CSR
);
885 pwr
&= ~WBSD_POWER_N
;
886 outb(pwr
, host
->base
+ WBSD_CSR
);
890 * MMC cards need to have pin 1 high during init.
891 * It wreaks havoc with the card detection though so
892 * that needs to be disabled.
894 setup
= wbsd_read_index(host
, WBSD_IDX_SETUP
);
895 if (ios
->chip_select
== MMC_CS_HIGH
) {
896 BUG_ON(ios
->bus_width
!= MMC_BUS_WIDTH_1
);
897 setup
|= WBSD_DAT3_H
;
898 host
->flags
|= WBSD_FIGNORE_DETECT
;
900 if (setup
& WBSD_DAT3_H
) {
901 setup
&= ~WBSD_DAT3_H
;
904 * We cannot resume card detection immediately
905 * because of capacitance and delays in the chip.
907 mod_timer(&host
->ignore_timer
, jiffies
+ HZ
/ 100);
910 wbsd_write_index(host
, WBSD_IDX_SETUP
, setup
);
913 * Store bus width for later. Will be used when
914 * setting up the data transfer.
916 host
->bus_width
= ios
->bus_width
;
918 spin_unlock_bh(&host
->lock
);
921 static int wbsd_get_ro(struct mmc_host
*mmc
)
923 struct wbsd_host
*host
= mmc_priv(mmc
);
926 spin_lock_bh(&host
->lock
);
928 csr
= inb(host
->base
+ WBSD_CSR
);
930 outb(csr
, host
->base
+ WBSD_CSR
);
934 csr
= inb(host
->base
+ WBSD_CSR
);
936 outb(csr
, host
->base
+ WBSD_CSR
);
938 spin_unlock_bh(&host
->lock
);
940 return !!(csr
& WBSD_WRPT
);
943 static const struct mmc_host_ops wbsd_ops
= {
944 .request
= wbsd_request
,
945 .set_ios
= wbsd_set_ios
,
946 .get_ro
= wbsd_get_ro
,
949 /*****************************************************************************\
951 * Interrupt handling *
953 \*****************************************************************************/
956 * Helper function to reset detection ignore
959 static void wbsd_reset_ignore(struct timer_list
*t
)
961 struct wbsd_host
*host
= from_timer(host
, t
, ignore_timer
);
963 BUG_ON(host
== NULL
);
965 DBG("Resetting card detection ignore\n");
967 spin_lock_bh(&host
->lock
);
969 host
->flags
&= ~WBSD_FIGNORE_DETECT
;
972 * Card status might have changed during the
975 tasklet_schedule(&host
->card_tasklet
);
977 spin_unlock_bh(&host
->lock
);
984 static inline struct mmc_data
*wbsd_get_data(struct wbsd_host
*host
)
990 WARN_ON(!host
->mrq
->cmd
);
994 WARN_ON(!host
->mrq
->cmd
->data
);
995 if (!host
->mrq
->cmd
->data
)
998 return host
->mrq
->cmd
->data
;
1001 static void wbsd_tasklet_card(unsigned long param
)
1003 struct wbsd_host
*host
= (struct wbsd_host
*)param
;
1007 spin_lock(&host
->lock
);
1009 if (host
->flags
& WBSD_FIGNORE_DETECT
) {
1010 spin_unlock(&host
->lock
);
1014 csr
= inb(host
->base
+ WBSD_CSR
);
1015 WARN_ON(csr
== 0xff);
1017 if (csr
& WBSD_CARDPRESENT
) {
1018 if (!(host
->flags
& WBSD_FCARD_PRESENT
)) {
1019 DBG("Card inserted\n");
1020 host
->flags
|= WBSD_FCARD_PRESENT
;
1024 } else if (host
->flags
& WBSD_FCARD_PRESENT
) {
1025 DBG("Card removed\n");
1026 host
->flags
&= ~WBSD_FCARD_PRESENT
;
1029 pr_err("%s: Card removed during transfer!\n",
1030 mmc_hostname(host
->mmc
));
1033 host
->mrq
->cmd
->error
= -ENOMEDIUM
;
1034 tasklet_schedule(&host
->finish_tasklet
);
1041 * Unlock first since we might get a call back.
1044 spin_unlock(&host
->lock
);
1047 mmc_detect_change(host
->mmc
, msecs_to_jiffies(delay
));
1050 static void wbsd_tasklet_fifo(unsigned long param
)
1052 struct wbsd_host
*host
= (struct wbsd_host
*)param
;
1053 struct mmc_data
*data
;
1055 spin_lock(&host
->lock
);
1060 data
= wbsd_get_data(host
);
1064 if (data
->flags
& MMC_DATA_WRITE
)
1065 wbsd_fill_fifo(host
);
1067 wbsd_empty_fifo(host
);
1072 if (host
->num_sg
== 0) {
1073 wbsd_write_index(host
, WBSD_IDX_FIFOEN
, 0);
1074 tasklet_schedule(&host
->finish_tasklet
);
1078 spin_unlock(&host
->lock
);
1081 static void wbsd_tasklet_crc(unsigned long param
)
1083 struct wbsd_host
*host
= (struct wbsd_host
*)param
;
1084 struct mmc_data
*data
;
1086 spin_lock(&host
->lock
);
1091 data
= wbsd_get_data(host
);
1095 DBGF("CRC error\n");
1097 data
->error
= -EILSEQ
;
1099 tasklet_schedule(&host
->finish_tasklet
);
1102 spin_unlock(&host
->lock
);
1105 static void wbsd_tasklet_timeout(unsigned long param
)
1107 struct wbsd_host
*host
= (struct wbsd_host
*)param
;
1108 struct mmc_data
*data
;
1110 spin_lock(&host
->lock
);
1115 data
= wbsd_get_data(host
);
1121 data
->error
= -ETIMEDOUT
;
1123 tasklet_schedule(&host
->finish_tasklet
);
1126 spin_unlock(&host
->lock
);
1129 static void wbsd_tasklet_finish(unsigned long param
)
1131 struct wbsd_host
*host
= (struct wbsd_host
*)param
;
1132 struct mmc_data
*data
;
1134 spin_lock(&host
->lock
);
1136 WARN_ON(!host
->mrq
);
1140 data
= wbsd_get_data(host
);
1144 wbsd_finish_data(host
, data
);
1147 spin_unlock(&host
->lock
);
1151 * Interrupt handling
1154 static irqreturn_t
wbsd_irq(int irq
, void *dev_id
)
1156 struct wbsd_host
*host
= dev_id
;
1159 isr
= inb(host
->base
+ WBSD_ISR
);
1162 * Was it actually our hardware that caused the interrupt?
1164 if (isr
== 0xff || isr
== 0x00)
1170 * Schedule tasklets as needed.
1172 if (isr
& WBSD_INT_CARD
)
1173 tasklet_schedule(&host
->card_tasklet
);
1174 if (isr
& WBSD_INT_FIFO_THRE
)
1175 tasklet_schedule(&host
->fifo_tasklet
);
1176 if (isr
& WBSD_INT_CRC
)
1177 tasklet_hi_schedule(&host
->crc_tasklet
);
1178 if (isr
& WBSD_INT_TIMEOUT
)
1179 tasklet_hi_schedule(&host
->timeout_tasklet
);
1180 if (isr
& WBSD_INT_TC
)
1181 tasklet_schedule(&host
->finish_tasklet
);
1186 /*****************************************************************************\
1188 * Device initialisation and shutdown *
1190 \*****************************************************************************/
1193 * Allocate/free MMC structure.
1196 static int wbsd_alloc_mmc(struct device
*dev
)
1198 struct mmc_host
*mmc
;
1199 struct wbsd_host
*host
;
1202 * Allocate MMC structure.
1204 mmc
= mmc_alloc_host(sizeof(struct wbsd_host
), dev
);
1208 host
= mmc_priv(mmc
);
1214 * Set host parameters.
1216 mmc
->ops
= &wbsd_ops
;
1217 mmc
->f_min
= 375000;
1218 mmc
->f_max
= 24000000;
1219 mmc
->ocr_avail
= MMC_VDD_32_33
| MMC_VDD_33_34
;
1220 mmc
->caps
= MMC_CAP_4_BIT_DATA
;
1222 spin_lock_init(&host
->lock
);
1227 timer_setup(&host
->ignore_timer
, wbsd_reset_ignore
, 0);
1230 * Maximum number of segments. Worst case is one sector per segment
1231 * so this will be 64kB/512.
1233 mmc
->max_segs
= 128;
1236 * Maximum request size. Also limited by 64KiB buffer.
1238 mmc
->max_req_size
= 65536;
1241 * Maximum segment size. Could be one segment with the maximum number
1244 mmc
->max_seg_size
= mmc
->max_req_size
;
1247 * Maximum block size. We have 12 bits (= 4095) but have to subtract
1248 * space for CRC. So the maximum is 4095 - 4*2 = 4087.
1250 mmc
->max_blk_size
= 4087;
1253 * Maximum block count. There is no real limit so the maximum
1254 * request size will be the only restriction.
1256 mmc
->max_blk_count
= mmc
->max_req_size
;
1258 dev_set_drvdata(dev
, mmc
);
1263 static void wbsd_free_mmc(struct device
*dev
)
1265 struct mmc_host
*mmc
;
1266 struct wbsd_host
*host
;
1268 mmc
= dev_get_drvdata(dev
);
1272 host
= mmc_priv(mmc
);
1273 BUG_ON(host
== NULL
);
1275 del_timer_sync(&host
->ignore_timer
);
1279 dev_set_drvdata(dev
, NULL
);
1283 * Scan for known chip id:s
1286 static int wbsd_scan(struct wbsd_host
*host
)
1292 * Iterate through all ports, all codes to
1293 * find hardware that is in our known list.
1295 for (i
= 0; i
< ARRAY_SIZE(config_ports
); i
++) {
1296 if (!request_region(config_ports
[i
], 2, DRIVER_NAME
))
1299 for (j
= 0; j
< ARRAY_SIZE(unlock_codes
); j
++) {
1302 host
->config
= config_ports
[i
];
1303 host
->unlock_code
= unlock_codes
[j
];
1305 wbsd_unlock_config(host
);
1307 outb(WBSD_CONF_ID_HI
, config_ports
[i
]);
1308 id
= inb(config_ports
[i
] + 1) << 8;
1310 outb(WBSD_CONF_ID_LO
, config_ports
[i
]);
1311 id
|= inb(config_ports
[i
] + 1);
1313 wbsd_lock_config(host
);
1315 for (k
= 0; k
< ARRAY_SIZE(valid_ids
); k
++) {
1316 if (id
== valid_ids
[k
]) {
1324 DBG("Unknown hardware (id %x) found at %x\n",
1325 id
, config_ports
[i
]);
1329 release_region(config_ports
[i
], 2);
1333 host
->unlock_code
= 0;
1339 * Allocate/free io port ranges
1342 static int wbsd_request_region(struct wbsd_host
*host
, int base
)
1347 if (!request_region(base
, 8, DRIVER_NAME
))
1355 static void wbsd_release_regions(struct wbsd_host
*host
)
1358 release_region(host
->base
, 8);
1363 release_region(host
->config
, 2);
1369 * Allocate/free DMA port and buffer
1372 static void wbsd_request_dma(struct wbsd_host
*host
, int dma
)
1377 if (request_dma(dma
, DRIVER_NAME
))
1381 * We need to allocate a special buffer in
1382 * order for ISA to be able to DMA to it.
1384 host
->dma_buffer
= kmalloc(WBSD_DMA_SIZE
,
1385 GFP_NOIO
| GFP_DMA
| __GFP_RETRY_MAYFAIL
| __GFP_NOWARN
);
1386 if (!host
->dma_buffer
)
1390 * Translate the address to a physical address.
1392 host
->dma_addr
= dma_map_single(mmc_dev(host
->mmc
), host
->dma_buffer
,
1393 WBSD_DMA_SIZE
, DMA_BIDIRECTIONAL
);
1394 if (dma_mapping_error(mmc_dev(host
->mmc
), host
->dma_addr
))
1398 * ISA DMA must be aligned on a 64k basis.
1400 if ((host
->dma_addr
& 0xffff) != 0)
1403 * ISA cannot access memory above 16 MB.
1405 else if (host
->dma_addr
>= 0x1000000)
1414 * If we've gotten here then there is some kind of alignment bug
1418 dma_unmap_single(mmc_dev(host
->mmc
), host
->dma_addr
,
1419 WBSD_DMA_SIZE
, DMA_BIDIRECTIONAL
);
1423 kfree(host
->dma_buffer
);
1424 host
->dma_buffer
= NULL
;
1430 pr_warn(DRIVER_NAME
": Unable to allocate DMA %d - falling back on FIFO\n",
1434 static void wbsd_release_dma(struct wbsd_host
*host
)
1437 * host->dma_addr is valid here iff host->dma_buffer is not NULL.
1439 if (host
->dma_buffer
) {
1440 dma_unmap_single(mmc_dev(host
->mmc
), host
->dma_addr
,
1441 WBSD_DMA_SIZE
, DMA_BIDIRECTIONAL
);
1442 kfree(host
->dma_buffer
);
1445 free_dma(host
->dma
);
1448 host
->dma_buffer
= NULL
;
1453 * Allocate/free IRQ.
1456 static int wbsd_request_irq(struct wbsd_host
*host
, int irq
)
1461 * Set up tasklets. Must be done before requesting interrupt.
1463 tasklet_init(&host
->card_tasklet
, wbsd_tasklet_card
,
1464 (unsigned long)host
);
1465 tasklet_init(&host
->fifo_tasklet
, wbsd_tasklet_fifo
,
1466 (unsigned long)host
);
1467 tasklet_init(&host
->crc_tasklet
, wbsd_tasklet_crc
,
1468 (unsigned long)host
);
1469 tasklet_init(&host
->timeout_tasklet
, wbsd_tasklet_timeout
,
1470 (unsigned long)host
);
1471 tasklet_init(&host
->finish_tasklet
, wbsd_tasklet_finish
,
1472 (unsigned long)host
);
1475 * Allocate interrupt.
1477 ret
= request_irq(irq
, wbsd_irq
, IRQF_SHARED
, DRIVER_NAME
, host
);
1486 static void wbsd_release_irq(struct wbsd_host
*host
)
1491 free_irq(host
->irq
, host
);
1495 tasklet_kill(&host
->card_tasklet
);
1496 tasklet_kill(&host
->fifo_tasklet
);
1497 tasklet_kill(&host
->crc_tasklet
);
1498 tasklet_kill(&host
->timeout_tasklet
);
1499 tasklet_kill(&host
->finish_tasklet
);
1503 * Allocate all resources for the host.
1506 static int wbsd_request_resources(struct wbsd_host
*host
,
1507 int base
, int irq
, int dma
)
1512 * Allocate I/O ports.
1514 ret
= wbsd_request_region(host
, base
);
1519 * Allocate interrupt.
1521 ret
= wbsd_request_irq(host
, irq
);
1528 wbsd_request_dma(host
, dma
);
1534 * Release all resources for the host.
1537 static void wbsd_release_resources(struct wbsd_host
*host
)
1539 wbsd_release_dma(host
);
1540 wbsd_release_irq(host
);
1541 wbsd_release_regions(host
);
1545 * Configure the resources the chip should use.
1548 static void wbsd_chip_config(struct wbsd_host
*host
)
1550 wbsd_unlock_config(host
);
1555 wbsd_write_config(host
, WBSD_CONF_SWRST
, 1);
1556 wbsd_write_config(host
, WBSD_CONF_SWRST
, 0);
1559 * Select SD/MMC function.
1561 wbsd_write_config(host
, WBSD_CONF_DEVICE
, DEVICE_SD
);
1564 * Set up card detection.
1566 wbsd_write_config(host
, WBSD_CONF_PINS
, WBSD_PINS_DETECT_GP11
);
1571 wbsd_write_config(host
, WBSD_CONF_PORT_HI
, host
->base
>> 8);
1572 wbsd_write_config(host
, WBSD_CONF_PORT_LO
, host
->base
& 0xff);
1574 wbsd_write_config(host
, WBSD_CONF_IRQ
, host
->irq
);
1577 wbsd_write_config(host
, WBSD_CONF_DRQ
, host
->dma
);
1580 * Enable and power up chip.
1582 wbsd_write_config(host
, WBSD_CONF_ENABLE
, 1);
1583 wbsd_write_config(host
, WBSD_CONF_POWER
, 0x20);
1585 wbsd_lock_config(host
);
1589 * Check that configured resources are correct.
1592 static int wbsd_chip_validate(struct wbsd_host
*host
)
1596 wbsd_unlock_config(host
);
1599 * Select SD/MMC function.
1601 wbsd_write_config(host
, WBSD_CONF_DEVICE
, DEVICE_SD
);
1604 * Read configuration.
1606 base
= wbsd_read_config(host
, WBSD_CONF_PORT_HI
) << 8;
1607 base
|= wbsd_read_config(host
, WBSD_CONF_PORT_LO
);
1609 irq
= wbsd_read_config(host
, WBSD_CONF_IRQ
);
1611 dma
= wbsd_read_config(host
, WBSD_CONF_DRQ
);
1613 wbsd_lock_config(host
);
1616 * Validate against given configuration.
1618 if (base
!= host
->base
)
1620 if (irq
!= host
->irq
)
1622 if ((dma
!= host
->dma
) && (host
->dma
!= -1))
1629 * Powers down the SD function
1632 static void wbsd_chip_poweroff(struct wbsd_host
*host
)
1634 wbsd_unlock_config(host
);
1636 wbsd_write_config(host
, WBSD_CONF_DEVICE
, DEVICE_SD
);
1637 wbsd_write_config(host
, WBSD_CONF_ENABLE
, 0);
1639 wbsd_lock_config(host
);
1642 /*****************************************************************************\
1644 * Devices setup and shutdown *
1646 \*****************************************************************************/
1648 static int wbsd_init(struct device
*dev
, int base
, int irq
, int dma
,
1651 struct wbsd_host
*host
= NULL
;
1652 struct mmc_host
*mmc
= NULL
;
1655 ret
= wbsd_alloc_mmc(dev
);
1659 mmc
= dev_get_drvdata(dev
);
1660 host
= mmc_priv(mmc
);
1663 * Scan for hardware.
1665 ret
= wbsd_scan(host
);
1667 if (pnp
&& (ret
== -ENODEV
)) {
1668 pr_warn(DRIVER_NAME
": Unable to confirm device presence - you may experience lock-ups\n");
1676 * Request resources.
1678 ret
= wbsd_request_resources(host
, base
, irq
, dma
);
1680 wbsd_release_resources(host
);
1686 * See if chip needs to be configured.
1689 if ((host
->config
!= 0) && !wbsd_chip_validate(host
)) {
1690 pr_warn(DRIVER_NAME
": PnP active but chip not configured! You probably have a buggy BIOS. Configuring chip manually.\n");
1691 wbsd_chip_config(host
);
1694 wbsd_chip_config(host
);
1697 * Power Management stuff. No idea how this works.
1702 wbsd_unlock_config(host
);
1703 wbsd_write_config(host
, WBSD_CONF_PME
, 0xA0);
1704 wbsd_lock_config(host
);
1708 * Allow device to initialise itself properly.
1713 * Reset the chip into a known state.
1715 wbsd_init_device(host
);
1719 pr_info("%s: W83L51xD", mmc_hostname(mmc
));
1720 if (host
->chip_id
!= 0)
1721 printk(" id %x", (int)host
->chip_id
);
1722 printk(" at 0x%x irq %d", (int)host
->base
, (int)host
->irq
);
1724 printk(" dma %d", (int)host
->dma
);
1734 static void wbsd_shutdown(struct device
*dev
, int pnp
)
1736 struct mmc_host
*mmc
= dev_get_drvdata(dev
);
1737 struct wbsd_host
*host
;
1742 host
= mmc_priv(mmc
);
1744 mmc_remove_host(mmc
);
1747 * Power down the SD/MMC function.
1750 wbsd_chip_poweroff(host
);
1752 wbsd_release_resources(host
);
1761 static int wbsd_probe(struct platform_device
*dev
)
1763 /* Use the module parameters for resources */
1764 return wbsd_init(&dev
->dev
, param_io
, param_irq
, param_dma
, 0);
1767 static int wbsd_remove(struct platform_device
*dev
)
1769 wbsd_shutdown(&dev
->dev
, 0);
1781 wbsd_pnp_probe(struct pnp_dev
*pnpdev
, const struct pnp_device_id
*dev_id
)
1786 * Get resources from PnP layer.
1788 io
= pnp_port_start(pnpdev
, 0);
1789 irq
= pnp_irq(pnpdev
, 0);
1790 if (pnp_dma_valid(pnpdev
, 0))
1791 dma
= pnp_dma(pnpdev
, 0);
1795 DBGF("PnP resources: port %3x irq %d dma %d\n", io
, irq
, dma
);
1797 return wbsd_init(&pnpdev
->dev
, io
, irq
, dma
, 1);
1800 static void wbsd_pnp_remove(struct pnp_dev
*dev
)
1802 wbsd_shutdown(&dev
->dev
, 1);
1805 #endif /* CONFIG_PNP */
1813 static int wbsd_platform_suspend(struct platform_device
*dev
,
1816 struct mmc_host
*mmc
= platform_get_drvdata(dev
);
1817 struct wbsd_host
*host
;
1822 DBGF("Suspending...\n");
1824 host
= mmc_priv(mmc
);
1826 wbsd_chip_poweroff(host
);
1830 static int wbsd_platform_resume(struct platform_device
*dev
)
1832 struct mmc_host
*mmc
= platform_get_drvdata(dev
);
1833 struct wbsd_host
*host
;
1838 DBGF("Resuming...\n");
1840 host
= mmc_priv(mmc
);
1842 wbsd_chip_config(host
);
1845 * Allow device to initialise itself properly.
1849 wbsd_init_device(host
);
1855 static int wbsd_pnp_suspend(struct pnp_dev
*pnp_dev
, pm_message_t state
)
1857 struct mmc_host
*mmc
= dev_get_drvdata(&pnp_dev
->dev
);
1862 DBGF("Suspending...\n");
1866 static int wbsd_pnp_resume(struct pnp_dev
*pnp_dev
)
1868 struct mmc_host
*mmc
= dev_get_drvdata(&pnp_dev
->dev
);
1869 struct wbsd_host
*host
;
1874 DBGF("Resuming...\n");
1876 host
= mmc_priv(mmc
);
1879 * See if chip needs to be configured.
1881 if (host
->config
!= 0) {
1882 if (!wbsd_chip_validate(host
)) {
1883 pr_warn(DRIVER_NAME
": PnP active but chip not configured! You probably have a buggy BIOS. Configuring chip manually.\n");
1884 wbsd_chip_config(host
);
1889 * Allow device to initialise itself properly.
1893 wbsd_init_device(host
);
1897 #endif /* CONFIG_PNP */
1899 #else /* CONFIG_PM */
1901 #define wbsd_platform_suspend NULL
1902 #define wbsd_platform_resume NULL
1904 #define wbsd_pnp_suspend NULL
1905 #define wbsd_pnp_resume NULL
1907 #endif /* CONFIG_PM */
1909 static struct platform_device
*wbsd_device
;
1911 static struct platform_driver wbsd_driver
= {
1912 .probe
= wbsd_probe
,
1913 .remove
= wbsd_remove
,
1915 .suspend
= wbsd_platform_suspend
,
1916 .resume
= wbsd_platform_resume
,
1918 .name
= DRIVER_NAME
,
1924 static struct pnp_driver wbsd_pnp_driver
= {
1925 .name
= DRIVER_NAME
,
1926 .id_table
= pnp_dev_table
,
1927 .probe
= wbsd_pnp_probe
,
1928 .remove
= wbsd_pnp_remove
,
1930 .suspend
= wbsd_pnp_suspend
,
1931 .resume
= wbsd_pnp_resume
,
1934 #endif /* CONFIG_PNP */
1937 * Module loading/unloading
1940 static int __init
wbsd_drv_init(void)
1945 ": Winbond W83L51xD SD/MMC card interface driver\n");
1946 pr_info(DRIVER_NAME
": Copyright(c) Pierre Ossman\n");
1951 result
= pnp_register_driver(&wbsd_pnp_driver
);
1955 #endif /* CONFIG_PNP */
1958 result
= platform_driver_register(&wbsd_driver
);
1962 wbsd_device
= platform_device_alloc(DRIVER_NAME
, -1);
1964 platform_driver_unregister(&wbsd_driver
);
1968 result
= platform_device_add(wbsd_device
);
1970 platform_device_put(wbsd_device
);
1971 platform_driver_unregister(&wbsd_driver
);
1979 static void __exit
wbsd_drv_exit(void)
1984 pnp_unregister_driver(&wbsd_pnp_driver
);
1986 #endif /* CONFIG_PNP */
1989 platform_device_unregister(wbsd_device
);
1991 platform_driver_unregister(&wbsd_driver
);
1997 module_init(wbsd_drv_init
);
1998 module_exit(wbsd_drv_exit
);
2000 module_param_hw_named(nopnp
, param_nopnp
, uint
, other
, 0444);
2002 module_param_hw_named(io
, param_io
, uint
, ioport
, 0444);
2003 module_param_hw_named(irq
, param_irq
, uint
, irq
, 0444);
2004 module_param_hw_named(dma
, param_dma
, int, dma
, 0444);
2006 MODULE_LICENSE("GPL");
2007 MODULE_AUTHOR("Pierre Ossman <pierre@ossman.eu>");
2008 MODULE_DESCRIPTION("Winbond W83L51xD SD/MMC card interface driver");
2011 MODULE_PARM_DESC(nopnp
, "Scan for device instead of relying on PNP. (default 0)");
2013 MODULE_PARM_DESC(io
, "I/O base to allocate. Must be 8 byte aligned. (default 0x248)");
2014 MODULE_PARM_DESC(irq
, "IRQ to allocate. (default 6)");
2015 MODULE_PARM_DESC(dma
, "DMA channel to allocate. -1 for no DMA. (default 2)");