blob: b7fbd30b49a0de18d1b05cf30bcfe62c0f64efac [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * linux/drivers/mmc/wbsd.c - Winbond W83L51xD SD/MMC driver
3 *
4 * Copyright (C) 2004-2005 Pierre Ossman, All Rights Reserved.
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 * Warning!
12 *
13 * Changes to the FIFO system should be done with extreme care since
14 * the hardware is full of bugs related to the FIFO. Known issues are:
15 *
16 * - FIFO size field in FSR is always zero.
17 *
18 * - FIFO interrupts tend not to work as they should. Interrupts are
19 * triggered only for full/empty events, not for threshold values.
20 *
21 * - On APIC systems the FIFO empty interrupt is sometimes lost.
22 */
23
24#include <linux/config.h>
25#include <linux/module.h>
26#include <linux/moduleparam.h>
27#include <linux/init.h>
28#include <linux/ioport.h>
29#include <linux/device.h>
30#include <linux/interrupt.h>
Pierre Ossman85bcc132005-05-08 19:35:27 +010031#include <linux/dma-mapping.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070032#include <linux/delay.h>
Pierre Ossman85bcc132005-05-08 19:35:27 +010033#include <linux/pnp.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070034#include <linux/highmem.h>
35#include <linux/mmc/host.h>
36#include <linux/mmc/protocol.h>
37
38#include <asm/io.h>
39#include <asm/dma.h>
40#include <asm/scatterlist.h>
41
42#include "wbsd.h"
43
44#define DRIVER_NAME "wbsd"
Pierre Ossman85bcc132005-05-08 19:35:27 +010045#define DRIVER_VERSION "1.2"
Linus Torvalds1da177e2005-04-16 15:20:36 -070046
47#ifdef CONFIG_MMC_DEBUG
48#define DBG(x...) \
49 printk(KERN_DEBUG DRIVER_NAME ": " x)
50#define DBGF(f, x...) \
51 printk(KERN_DEBUG DRIVER_NAME " [%s()]: " f, __func__ , ##x)
52#else
53#define DBG(x...) do { } while (0)
54#define DBGF(x...) do { } while (0)
55#endif
56
Linus Torvalds1da177e2005-04-16 15:20:36 -070057#ifdef CONFIG_MMC_DEBUG
58void DBG_REG(int reg, u8 value)
59{
60 int i;
61
62 printk(KERN_DEBUG "wbsd: Register %d: 0x%02X %3d '%c' ",
63 reg, (int)value, (int)value, (value < 0x20)?'.':value);
64
65 for (i = 7;i >= 0;i--)
66 {
67 if (value & (1 << i))
68 printk("x");
69 else
70 printk(".");
71 }
72
73 printk("\n");
74}
75#else
76#define DBG_REG(r, v) do {} while (0)
77#endif
78
79/*
Pierre Ossman85bcc132005-05-08 19:35:27 +010080 * Device resources
81 */
82
83#ifdef CONFIG_PNP
84
85static const struct pnp_device_id pnp_dev_table[] = {
86 { "WEC0517", 0 },
87 { "WEC0518", 0 },
88 { "", 0 },
89};
90
91MODULE_DEVICE_TABLE(pnp, pnp_dev_table);
92
93#endif /* CONFIG_PNP */
94
95#ifdef CONFIG_PNP
96static unsigned int nopnp = 0;
97#else
98static const unsigned int nopnp = 1;
99#endif
100static unsigned int io = 0x248;
101static unsigned int irq = 6;
102static int dma = 2;
103
104/*
Linus Torvalds1da177e2005-04-16 15:20:36 -0700105 * Basic functions
106 */
107
108static inline void wbsd_unlock_config(struct wbsd_host* host)
109{
Pierre Ossman85bcc132005-05-08 19:35:27 +0100110 BUG_ON(host->config == 0);
111
Linus Torvalds1da177e2005-04-16 15:20:36 -0700112 outb(host->unlock_code, host->config);
113 outb(host->unlock_code, host->config);
114}
115
116static inline void wbsd_lock_config(struct wbsd_host* host)
117{
Pierre Ossman85bcc132005-05-08 19:35:27 +0100118 BUG_ON(host->config == 0);
119
Linus Torvalds1da177e2005-04-16 15:20:36 -0700120 outb(LOCK_CODE, host->config);
121}
122
123static inline void wbsd_write_config(struct wbsd_host* host, u8 reg, u8 value)
124{
Pierre Ossman85bcc132005-05-08 19:35:27 +0100125 BUG_ON(host->config == 0);
126
Linus Torvalds1da177e2005-04-16 15:20:36 -0700127 outb(reg, host->config);
128 outb(value, host->config + 1);
129}
130
131static inline u8 wbsd_read_config(struct wbsd_host* host, u8 reg)
132{
Pierre Ossman85bcc132005-05-08 19:35:27 +0100133 BUG_ON(host->config == 0);
134
Linus Torvalds1da177e2005-04-16 15:20:36 -0700135 outb(reg, host->config);
136 return inb(host->config + 1);
137}
138
139static inline void wbsd_write_index(struct wbsd_host* host, u8 index, u8 value)
140{
141 outb(index, host->base + WBSD_IDXR);
142 outb(value, host->base + WBSD_DATAR);
143}
144
145static inline u8 wbsd_read_index(struct wbsd_host* host, u8 index)
146{
147 outb(index, host->base + WBSD_IDXR);
148 return inb(host->base + WBSD_DATAR);
149}
150
151/*
152 * Common routines
153 */
154
155static void wbsd_init_device(struct wbsd_host* host)
156{
157 u8 setup, ier;
158
159 /*
160 * Reset chip (SD/MMC part) and fifo.
161 */
162 setup = wbsd_read_index(host, WBSD_IDX_SETUP);
163 setup |= WBSD_FIFO_RESET | WBSD_SOFT_RESET;
164 wbsd_write_index(host, WBSD_IDX_SETUP, setup);
165
166 /*
Pierre Ossman85bcc132005-05-08 19:35:27 +0100167 * Set DAT3 to input
168 */
169 setup &= ~WBSD_DAT3_H;
170 wbsd_write_index(host, WBSD_IDX_SETUP, setup);
171 host->flags &= ~WBSD_FIGNORE_DETECT;
172
173 /*
Linus Torvalds1da177e2005-04-16 15:20:36 -0700174 * Read back default clock.
175 */
176 host->clk = wbsd_read_index(host, WBSD_IDX_CLK);
177
178 /*
179 * Power down port.
180 */
181 outb(WBSD_POWER_N, host->base + WBSD_CSR);
182
183 /*
184 * Set maximum timeout.
185 */
186 wbsd_write_index(host, WBSD_IDX_TAAC, 0x7F);
187
188 /*
Pierre Ossman85bcc132005-05-08 19:35:27 +0100189 * Test for card presence
190 */
191 if (inb(host->base + WBSD_CSR) & WBSD_CARDPRESENT)
192 host->flags |= WBSD_FCARD_PRESENT;
193 else
194 host->flags &= ~WBSD_FCARD_PRESENT;
195
196 /*
Linus Torvalds1da177e2005-04-16 15:20:36 -0700197 * Enable interesting interrupts.
198 */
199 ier = 0;
200 ier |= WBSD_EINT_CARD;
201 ier |= WBSD_EINT_FIFO_THRE;
202 ier |= WBSD_EINT_CCRC;
203 ier |= WBSD_EINT_TIMEOUT;
204 ier |= WBSD_EINT_CRC;
205 ier |= WBSD_EINT_TC;
206
207 outb(ier, host->base + WBSD_EIR);
208
209 /*
210 * Clear interrupts.
211 */
212 inb(host->base + WBSD_ISR);
213}
214
215static void wbsd_reset(struct wbsd_host* host)
216{
217 u8 setup;
218
219 printk(KERN_ERR DRIVER_NAME ": Resetting chip\n");
220
221 /*
222 * Soft reset of chip (SD/MMC part).
223 */
224 setup = wbsd_read_index(host, WBSD_IDX_SETUP);
225 setup |= WBSD_SOFT_RESET;
226 wbsd_write_index(host, WBSD_IDX_SETUP, setup);
227}
228
229static void wbsd_request_end(struct wbsd_host* host, struct mmc_request* mrq)
230{
231 unsigned long dmaflags;
232
233 DBGF("Ending request, cmd (%x)\n", mrq->cmd->opcode);
234
235 if (host->dma >= 0)
236 {
237 /*
238 * Release ISA DMA controller.
239 */
240 dmaflags = claim_dma_lock();
241 disable_dma(host->dma);
242 clear_dma_ff(host->dma);
243 release_dma_lock(dmaflags);
244
245 /*
246 * Disable DMA on host.
247 */
248 wbsd_write_index(host, WBSD_IDX_DMA, 0);
249 }
250
251 host->mrq = NULL;
252
253 /*
254 * MMC layer might call back into the driver so first unlock.
255 */
256 spin_unlock(&host->lock);
257 mmc_request_done(host->mmc, mrq);
258 spin_lock(&host->lock);
259}
260
261/*
262 * Scatter/gather functions
263 */
264
265static inline void wbsd_init_sg(struct wbsd_host* host, struct mmc_data* data)
266{
267 /*
268 * Get info. about SG list from data structure.
269 */
270 host->cur_sg = data->sg;
271 host->num_sg = data->sg_len;
272
273 host->offset = 0;
274 host->remain = host->cur_sg->length;
275}
276
277static inline int wbsd_next_sg(struct wbsd_host* host)
278{
279 /*
280 * Skip to next SG entry.
281 */
282 host->cur_sg++;
283 host->num_sg--;
284
285 /*
286 * Any entries left?
287 */
288 if (host->num_sg > 0)
289 {
290 host->offset = 0;
291 host->remain = host->cur_sg->length;
292 }
293
294 return host->num_sg;
295}
296
297static inline char* wbsd_kmap_sg(struct wbsd_host* host)
298{
299 host->mapped_sg = kmap_atomic(host->cur_sg->page, KM_BIO_SRC_IRQ) +
300 host->cur_sg->offset;
301 return host->mapped_sg;
302}
303
304static inline void wbsd_kunmap_sg(struct wbsd_host* host)
305{
306 kunmap_atomic(host->mapped_sg, KM_BIO_SRC_IRQ);
307}
308
309static inline void wbsd_sg_to_dma(struct wbsd_host* host, struct mmc_data* data)
310{
311 unsigned int len, i, size;
312 struct scatterlist* sg;
313 char* dmabuf = host->dma_buffer;
314 char* sgbuf;
315
316 size = host->size;
317
318 sg = data->sg;
319 len = data->sg_len;
320
321 /*
322 * Just loop through all entries. Size might not
323 * be the entire list though so make sure that
324 * we do not transfer too much.
325 */
326 for (i = 0;i < len;i++)
327 {
328 sgbuf = kmap_atomic(sg[i].page, KM_BIO_SRC_IRQ) + sg[i].offset;
329 if (size < sg[i].length)
330 memcpy(dmabuf, sgbuf, size);
331 else
332 memcpy(dmabuf, sgbuf, sg[i].length);
333 kunmap_atomic(sgbuf, KM_BIO_SRC_IRQ);
334 dmabuf += sg[i].length;
335
336 if (size < sg[i].length)
337 size = 0;
338 else
339 size -= sg[i].length;
340
341 if (size == 0)
342 break;
343 }
344
345 /*
346 * Check that we didn't get a request to transfer
347 * more data than can fit into the SG list.
348 */
349
350 BUG_ON(size != 0);
351
352 host->size -= size;
353}
354
355static inline void wbsd_dma_to_sg(struct wbsd_host* host, struct mmc_data* data)
356{
357 unsigned int len, i, size;
358 struct scatterlist* sg;
359 char* dmabuf = host->dma_buffer;
360 char* sgbuf;
361
362 size = host->size;
363
364 sg = data->sg;
365 len = data->sg_len;
366
367 /*
368 * Just loop through all entries. Size might not
369 * be the entire list though so make sure that
370 * we do not transfer too much.
371 */
372 for (i = 0;i < len;i++)
373 {
374 sgbuf = kmap_atomic(sg[i].page, KM_BIO_SRC_IRQ) + sg[i].offset;
375 if (size < sg[i].length)
376 memcpy(sgbuf, dmabuf, size);
377 else
378 memcpy(sgbuf, dmabuf, sg[i].length);
379 kunmap_atomic(sgbuf, KM_BIO_SRC_IRQ);
380 dmabuf += sg[i].length;
381
382 if (size < sg[i].length)
383 size = 0;
384 else
385 size -= sg[i].length;
386
387 if (size == 0)
388 break;
389 }
390
391 /*
392 * Check that we didn't get a request to transfer
393 * more data than can fit into the SG list.
394 */
395
396 BUG_ON(size != 0);
397
398 host->size -= size;
399}
400
401/*
402 * Command handling
403 */
404
405static inline void wbsd_get_short_reply(struct wbsd_host* host,
406 struct mmc_command* cmd)
407{
408 /*
409 * Correct response type?
410 */
411 if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_SHORT)
412 {
413 cmd->error = MMC_ERR_INVALID;
414 return;
415 }
416
417 cmd->resp[0] =
418 wbsd_read_index(host, WBSD_IDX_RESP12) << 24;
419 cmd->resp[0] |=
420 wbsd_read_index(host, WBSD_IDX_RESP13) << 16;
421 cmd->resp[0] |=
422 wbsd_read_index(host, WBSD_IDX_RESP14) << 8;
423 cmd->resp[0] |=
424 wbsd_read_index(host, WBSD_IDX_RESP15) << 0;
425 cmd->resp[1] =
426 wbsd_read_index(host, WBSD_IDX_RESP16) << 24;
427}
428
429static inline void wbsd_get_long_reply(struct wbsd_host* host,
430 struct mmc_command* cmd)
431{
432 int i;
433
434 /*
435 * Correct response type?
436 */
437 if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_LONG)
438 {
439 cmd->error = MMC_ERR_INVALID;
440 return;
441 }
442
443 for (i = 0;i < 4;i++)
444 {
445 cmd->resp[i] =
446 wbsd_read_index(host, WBSD_IDX_RESP1 + i * 4) << 24;
447 cmd->resp[i] |=
448 wbsd_read_index(host, WBSD_IDX_RESP2 + i * 4) << 16;
449 cmd->resp[i] |=
450 wbsd_read_index(host, WBSD_IDX_RESP3 + i * 4) << 8;
451 cmd->resp[i] |=
452 wbsd_read_index(host, WBSD_IDX_RESP4 + i * 4) << 0;
453 }
454}
455
Linus Torvalds1da177e2005-04-16 15:20:36 -0700456static void wbsd_send_command(struct wbsd_host* host, struct mmc_command* cmd)
457{
458 int i;
459 u8 status, isr;
460
461 DBGF("Sending cmd (%x)\n", cmd->opcode);
462
463 /*
464 * Clear accumulated ISR. The interrupt routine
465 * will fill this one with events that occur during
466 * transfer.
467 */
468 host->isr = 0;
469
470 /*
471 * Send the command (CRC calculated by host).
472 */
473 outb(cmd->opcode, host->base + WBSD_CMDR);
474 for (i = 3;i >= 0;i--)
475 outb((cmd->arg >> (i * 8)) & 0xff, host->base + WBSD_CMDR);
476
477 cmd->error = MMC_ERR_NONE;
478
479 /*
480 * Wait for the request to complete.
481 */
482 do {
483 status = wbsd_read_index(host, WBSD_IDX_STATUS);
484 } while (status & WBSD_CARDTRAFFIC);
485
486 /*
487 * Do we expect a reply?
488 */
489 if ((cmd->flags & MMC_RSP_MASK) != MMC_RSP_NONE)
490 {
491 /*
492 * Read back status.
493 */
494 isr = host->isr;
495
496 /* Card removed? */
497 if (isr & WBSD_INT_CARD)
498 cmd->error = MMC_ERR_TIMEOUT;
499 /* Timeout? */
500 else if (isr & WBSD_INT_TIMEOUT)
501 cmd->error = MMC_ERR_TIMEOUT;
502 /* CRC? */
503 else if ((cmd->flags & MMC_RSP_CRC) && (isr & WBSD_INT_CRC))
504 cmd->error = MMC_ERR_BADCRC;
505 /* All ok */
506 else
507 {
508 if ((cmd->flags & MMC_RSP_MASK) == MMC_RSP_SHORT)
509 wbsd_get_short_reply(host, cmd);
510 else
511 wbsd_get_long_reply(host, cmd);
512 }
513 }
514
515 DBGF("Sent cmd (%x), res %d\n", cmd->opcode, cmd->error);
516}
517
518/*
519 * Data functions
520 */
521
522static void wbsd_empty_fifo(struct wbsd_host* host)
523{
524 struct mmc_data* data = host->mrq->cmd->data;
525 char* buffer;
526 int i, fsr, fifo;
527
528 /*
529 * Handle excessive data.
530 */
531 if (data->bytes_xfered == host->size)
532 return;
533
534 buffer = wbsd_kmap_sg(host) + host->offset;
535
536 /*
537 * Drain the fifo. This has a tendency to loop longer
538 * than the FIFO length (usually one block).
539 */
540 while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_EMPTY))
541 {
542 /*
543 * The size field in the FSR is broken so we have to
544 * do some guessing.
545 */
546 if (fsr & WBSD_FIFO_FULL)
547 fifo = 16;
548 else if (fsr & WBSD_FIFO_FUTHRE)
549 fifo = 8;
550 else
551 fifo = 1;
552
553 for (i = 0;i < fifo;i++)
554 {
555 *buffer = inb(host->base + WBSD_DFR);
556 buffer++;
557 host->offset++;
558 host->remain--;
559
560 data->bytes_xfered++;
561
562 /*
563 * Transfer done?
564 */
565 if (data->bytes_xfered == host->size)
566 {
567 wbsd_kunmap_sg(host);
568 return;
569 }
570
571 /*
572 * End of scatter list entry?
573 */
574 if (host->remain == 0)
575 {
576 wbsd_kunmap_sg(host);
577
578 /*
579 * Get next entry. Check if last.
580 */
581 if (!wbsd_next_sg(host))
582 {
583 /*
584 * We should never reach this point.
585 * It means that we're trying to
586 * transfer more blocks than can fit
587 * into the scatter list.
588 */
589 BUG_ON(1);
590
591 host->size = data->bytes_xfered;
592
593 return;
594 }
595
596 buffer = wbsd_kmap_sg(host);
597 }
598 }
599 }
600
601 wbsd_kunmap_sg(host);
602
603 /*
604 * This is a very dirty hack to solve a
605 * hardware problem. The chip doesn't trigger
606 * FIFO threshold interrupts properly.
607 */
608 if ((host->size - data->bytes_xfered) < 16)
609 tasklet_schedule(&host->fifo_tasklet);
610}
611
612static void wbsd_fill_fifo(struct wbsd_host* host)
613{
614 struct mmc_data* data = host->mrq->cmd->data;
615 char* buffer;
616 int i, fsr, fifo;
617
618 /*
619 * Check that we aren't being called after the
620 * entire buffer has been transfered.
621 */
622 if (data->bytes_xfered == host->size)
623 return;
624
625 buffer = wbsd_kmap_sg(host) + host->offset;
626
627 /*
628 * Fill the fifo. This has a tendency to loop longer
629 * than the FIFO length (usually one block).
630 */
631 while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_FULL))
632 {
633 /*
634 * The size field in the FSR is broken so we have to
635 * do some guessing.
636 */
637 if (fsr & WBSD_FIFO_EMPTY)
638 fifo = 0;
639 else if (fsr & WBSD_FIFO_EMTHRE)
640 fifo = 8;
641 else
642 fifo = 15;
643
644 for (i = 16;i > fifo;i--)
645 {
646 outb(*buffer, host->base + WBSD_DFR);
647 buffer++;
648 host->offset++;
649 host->remain--;
650
651 data->bytes_xfered++;
652
653 /*
654 * Transfer done?
655 */
656 if (data->bytes_xfered == host->size)
657 {
658 wbsd_kunmap_sg(host);
659 return;
660 }
661
662 /*
663 * End of scatter list entry?
664 */
665 if (host->remain == 0)
666 {
667 wbsd_kunmap_sg(host);
668
669 /*
670 * Get next entry. Check if last.
671 */
672 if (!wbsd_next_sg(host))
673 {
674 /*
675 * We should never reach this point.
676 * It means that we're trying to
677 * transfer more blocks than can fit
678 * into the scatter list.
679 */
680 BUG_ON(1);
681
682 host->size = data->bytes_xfered;
683
684 return;
685 }
686
687 buffer = wbsd_kmap_sg(host);
688 }
689 }
690 }
691
692 wbsd_kunmap_sg(host);
Pierre Ossman85bcc132005-05-08 19:35:27 +0100693
694 /*
695 * The controller stops sending interrupts for
696 * 'FIFO empty' under certain conditions. So we
697 * need to be a bit more pro-active.
698 */
699 tasklet_schedule(&host->fifo_tasklet);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700700}
701
702static void wbsd_prepare_data(struct wbsd_host* host, struct mmc_data* data)
703{
704 u16 blksize;
705 u8 setup;
706 unsigned long dmaflags;
707
708 DBGF("blksz %04x blks %04x flags %08x\n",
709 1 << data->blksz_bits, data->blocks, data->flags);
710 DBGF("tsac %d ms nsac %d clk\n",
711 data->timeout_ns / 1000000, data->timeout_clks);
712
713 /*
714 * Calculate size.
715 */
716 host->size = data->blocks << data->blksz_bits;
717
718 /*
719 * Check timeout values for overflow.
720 * (Yes, some cards cause this value to overflow).
721 */
722 if (data->timeout_ns > 127000000)
723 wbsd_write_index(host, WBSD_IDX_TAAC, 127);
724 else
725 wbsd_write_index(host, WBSD_IDX_TAAC, data->timeout_ns/1000000);
726
727 if (data->timeout_clks > 255)
728 wbsd_write_index(host, WBSD_IDX_NSAC, 255);
729 else
730 wbsd_write_index(host, WBSD_IDX_NSAC, data->timeout_clks);
731
732 /*
733 * Inform the chip of how large blocks will be
734 * sent. It needs this to determine when to
735 * calculate CRC.
736 *
737 * Space for CRC must be included in the size.
738 */
739 blksize = (1 << data->blksz_bits) + 2;
740
741 wbsd_write_index(host, WBSD_IDX_PBSMSB, (blksize >> 4) & 0xF0);
742 wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
743
744 /*
745 * Clear the FIFO. This is needed even for DMA
746 * transfers since the chip still uses the FIFO
747 * internally.
748 */
749 setup = wbsd_read_index(host, WBSD_IDX_SETUP);
750 setup |= WBSD_FIFO_RESET;
751 wbsd_write_index(host, WBSD_IDX_SETUP, setup);
752
753 /*
754 * DMA transfer?
755 */
756 if (host->dma >= 0)
757 {
758 /*
759 * The buffer for DMA is only 64 kB.
760 */
761 BUG_ON(host->size > 0x10000);
762 if (host->size > 0x10000)
763 {
764 data->error = MMC_ERR_INVALID;
765 return;
766 }
767
768 /*
769 * Transfer data from the SG list to
770 * the DMA buffer.
771 */
772 if (data->flags & MMC_DATA_WRITE)
773 wbsd_sg_to_dma(host, data);
774
775 /*
776 * Initialise the ISA DMA controller.
777 */
778 dmaflags = claim_dma_lock();
779 disable_dma(host->dma);
780 clear_dma_ff(host->dma);
781 if (data->flags & MMC_DATA_READ)
782 set_dma_mode(host->dma, DMA_MODE_READ & ~0x40);
783 else
784 set_dma_mode(host->dma, DMA_MODE_WRITE & ~0x40);
785 set_dma_addr(host->dma, host->dma_addr);
786 set_dma_count(host->dma, host->size);
787
788 enable_dma(host->dma);
789 release_dma_lock(dmaflags);
790
791 /*
792 * Enable DMA on the host.
793 */
794 wbsd_write_index(host, WBSD_IDX_DMA, WBSD_DMA_ENABLE);
795 }
796 else
797 {
798 /*
799 * This flag is used to keep printk
800 * output to a minimum.
801 */
802 host->firsterr = 1;
803
804 /*
805 * Initialise the SG list.
806 */
807 wbsd_init_sg(host, data);
808
809 /*
810 * Turn off DMA.
811 */
812 wbsd_write_index(host, WBSD_IDX_DMA, 0);
813
814 /*
815 * Set up FIFO threshold levels (and fill
816 * buffer if doing a write).
817 */
818 if (data->flags & MMC_DATA_READ)
819 {
820 wbsd_write_index(host, WBSD_IDX_FIFOEN,
821 WBSD_FIFOEN_FULL | 8);
822 }
823 else
824 {
825 wbsd_write_index(host, WBSD_IDX_FIFOEN,
826 WBSD_FIFOEN_EMPTY | 8);
827 wbsd_fill_fifo(host);
828 }
829 }
830
831 data->error = MMC_ERR_NONE;
832}
833
834static void wbsd_finish_data(struct wbsd_host* host, struct mmc_data* data)
835{
836 unsigned long dmaflags;
837 int count;
838 u8 status;
839
840 WARN_ON(host->mrq == NULL);
841
842 /*
843 * Send a stop command if needed.
844 */
845 if (data->stop)
846 wbsd_send_command(host, data->stop);
847
848 /*
849 * Wait for the controller to leave data
850 * transfer state.
851 */
852 do
853 {
854 status = wbsd_read_index(host, WBSD_IDX_STATUS);
855 } while (status & (WBSD_BLOCK_READ | WBSD_BLOCK_WRITE));
856
857 /*
858 * DMA transfer?
859 */
860 if (host->dma >= 0)
861 {
862 /*
863 * Disable DMA on the host.
864 */
865 wbsd_write_index(host, WBSD_IDX_DMA, 0);
866
867 /*
868 * Turn of ISA DMA controller.
869 */
870 dmaflags = claim_dma_lock();
871 disable_dma(host->dma);
872 clear_dma_ff(host->dma);
873 count = get_dma_residue(host->dma);
874 release_dma_lock(dmaflags);
875
876 /*
877 * Any leftover data?
878 */
879 if (count)
880 {
881 printk(KERN_ERR DRIVER_NAME ": Incomplete DMA "
882 "transfer. %d bytes left.\n", count);
883
884 data->error = MMC_ERR_FAILED;
885 }
886 else
887 {
888 /*
889 * Transfer data from DMA buffer to
890 * SG list.
891 */
892 if (data->flags & MMC_DATA_READ)
893 wbsd_dma_to_sg(host, data);
894
895 data->bytes_xfered = host->size;
896 }
897 }
898
899 DBGF("Ending data transfer (%d bytes)\n", data->bytes_xfered);
900
901 wbsd_request_end(host, host->mrq);
902}
903
Pierre Ossman85bcc132005-05-08 19:35:27 +0100904/*****************************************************************************\
905 * *
906 * MMC layer callbacks *
907 * *
908\*****************************************************************************/
Linus Torvalds1da177e2005-04-16 15:20:36 -0700909
910static void wbsd_request(struct mmc_host* mmc, struct mmc_request* mrq)
911{
912 struct wbsd_host* host = mmc_priv(mmc);
913 struct mmc_command* cmd;
914
915 /*
916 * Disable tasklets to avoid a deadlock.
917 */
918 spin_lock_bh(&host->lock);
919
920 BUG_ON(host->mrq != NULL);
921
922 cmd = mrq->cmd;
923
924 host->mrq = mrq;
925
926 /*
927 * If there is no card in the slot then
928 * timeout immediatly.
929 */
Pierre Ossman85bcc132005-05-08 19:35:27 +0100930 if (!(host->flags & WBSD_FCARD_PRESENT))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700931 {
932 cmd->error = MMC_ERR_TIMEOUT;
933 goto done;
934 }
935
936 /*
937 * Does the request include data?
938 */
939 if (cmd->data)
940 {
941 wbsd_prepare_data(host, cmd->data);
942
943 if (cmd->data->error != MMC_ERR_NONE)
944 goto done;
945 }
946
947 wbsd_send_command(host, cmd);
948
949 /*
950 * If this is a data transfer the request
951 * will be finished after the data has
952 * transfered.
953 */
954 if (cmd->data && (cmd->error == MMC_ERR_NONE))
955 {
956 /*
957 * Dirty fix for hardware bug.
958 */
959 if (host->dma == -1)
960 tasklet_schedule(&host->fifo_tasklet);
961
962 spin_unlock_bh(&host->lock);
963
964 return;
965 }
966
967done:
968 wbsd_request_end(host, mrq);
969
970 spin_unlock_bh(&host->lock);
971}
972
973static void wbsd_set_ios(struct mmc_host* mmc, struct mmc_ios* ios)
974{
975 struct wbsd_host* host = mmc_priv(mmc);
976 u8 clk, setup, pwr;
977
978 DBGF("clock %uHz busmode %u powermode %u Vdd %u\n",
979 ios->clock, ios->bus_mode, ios->power_mode, ios->vdd);
980
981 spin_lock_bh(&host->lock);
982
983 /*
984 * Reset the chip on each power off.
985 * Should clear out any weird states.
986 */
987 if (ios->power_mode == MMC_POWER_OFF)
988 wbsd_init_device(host);
989
990 if (ios->clock >= 24000000)
991 clk = WBSD_CLK_24M;
992 else if (ios->clock >= 16000000)
993 clk = WBSD_CLK_16M;
994 else if (ios->clock >= 12000000)
995 clk = WBSD_CLK_12M;
996 else
997 clk = WBSD_CLK_375K;
998
999 /*
1000 * Only write to the clock register when
1001 * there is an actual change.
1002 */
1003 if (clk != host->clk)
1004 {
1005 wbsd_write_index(host, WBSD_IDX_CLK, clk);
1006 host->clk = clk;
1007 }
1008
Pierre Ossman85bcc132005-05-08 19:35:27 +01001009 /*
1010 * Power up card.
1011 */
Linus Torvalds1da177e2005-04-16 15:20:36 -07001012 if (ios->power_mode != MMC_POWER_OFF)
1013 {
Linus Torvalds1da177e2005-04-16 15:20:36 -07001014 pwr = inb(host->base + WBSD_CSR);
1015 pwr &= ~WBSD_POWER_N;
1016 outb(pwr, host->base + WBSD_CSR);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001017 }
1018
Pierre Ossman85bcc132005-05-08 19:35:27 +01001019 /*
1020 * MMC cards need to have pin 1 high during init.
1021 * Init time corresponds rather nicely with the bus mode.
1022 * It wreaks havoc with the card detection though so
1023 * that needs to be disabed.
1024 */
1025 setup = wbsd_read_index(host, WBSD_IDX_SETUP);
1026 if ((ios->power_mode == MMC_POWER_ON) &&
1027 (ios->bus_mode == MMC_BUSMODE_OPENDRAIN))
1028 {
1029 setup |= WBSD_DAT3_H;
1030 host->flags |= WBSD_FIGNORE_DETECT;
1031 }
1032 else
1033 {
1034 setup &= ~WBSD_DAT3_H;
1035 host->flags &= ~WBSD_FIGNORE_DETECT;
1036 }
1037 wbsd_write_index(host, WBSD_IDX_SETUP, setup);
1038
Linus Torvalds1da177e2005-04-16 15:20:36 -07001039 spin_unlock_bh(&host->lock);
1040}
1041
Pierre Ossman85bcc132005-05-08 19:35:27 +01001042static struct mmc_host_ops wbsd_ops = {
1043 .request = wbsd_request,
1044 .set_ios = wbsd_set_ios,
1045};
1046
1047/*****************************************************************************\
1048 * *
1049 * Interrupt handling *
1050 * *
1051\*****************************************************************************/
1052
Linus Torvalds1da177e2005-04-16 15:20:36 -07001053/*
1054 * Tasklets
1055 */
1056
1057inline static struct mmc_data* wbsd_get_data(struct wbsd_host* host)
1058{
1059 WARN_ON(!host->mrq);
1060 if (!host->mrq)
1061 return NULL;
1062
1063 WARN_ON(!host->mrq->cmd);
1064 if (!host->mrq->cmd)
1065 return NULL;
1066
1067 WARN_ON(!host->mrq->cmd->data);
1068 if (!host->mrq->cmd->data)
1069 return NULL;
1070
1071 return host->mrq->cmd->data;
1072}
1073
1074static void wbsd_tasklet_card(unsigned long param)
1075{
1076 struct wbsd_host* host = (struct wbsd_host*)param;
1077 u8 csr;
Pierre Ossman85bcc132005-05-08 19:35:27 +01001078 int change = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001079
1080 spin_lock(&host->lock);
1081
Pierre Ossman85bcc132005-05-08 19:35:27 +01001082 if (host->flags & WBSD_FIGNORE_DETECT)
1083 {
1084 spin_unlock(&host->lock);
1085 return;
1086 }
1087
Linus Torvalds1da177e2005-04-16 15:20:36 -07001088 csr = inb(host->base + WBSD_CSR);
1089 WARN_ON(csr == 0xff);
1090
1091 if (csr & WBSD_CARDPRESENT)
Pierre Ossman85bcc132005-05-08 19:35:27 +01001092 {
1093 if (!(host->flags & WBSD_FCARD_PRESENT))
1094 {
1095 DBG("Card inserted\n");
1096 host->flags |= WBSD_FCARD_PRESENT;
1097 change = 1;
1098 }
1099 }
1100 else if (host->flags & WBSD_FCARD_PRESENT)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001101 {
1102 DBG("Card removed\n");
Pierre Ossman85bcc132005-05-08 19:35:27 +01001103 host->flags &= ~WBSD_FCARD_PRESENT;
1104 change = 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001105
1106 if (host->mrq)
1107 {
1108 printk(KERN_ERR DRIVER_NAME
1109 ": Card removed during transfer!\n");
1110 wbsd_reset(host);
1111
1112 host->mrq->cmd->error = MMC_ERR_FAILED;
1113 tasklet_schedule(&host->finish_tasklet);
1114 }
1115 }
1116
1117 /*
1118 * Unlock first since we might get a call back.
1119 */
1120 spin_unlock(&host->lock);
1121
Pierre Ossman85bcc132005-05-08 19:35:27 +01001122 if (change)
1123 mmc_detect_change(host->mmc);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001124}
1125
1126static void wbsd_tasklet_fifo(unsigned long param)
1127{
1128 struct wbsd_host* host = (struct wbsd_host*)param;
1129 struct mmc_data* data;
1130
1131 spin_lock(&host->lock);
1132
1133 if (!host->mrq)
1134 goto end;
1135
1136 data = wbsd_get_data(host);
1137 if (!data)
1138 goto end;
1139
1140 if (data->flags & MMC_DATA_WRITE)
1141 wbsd_fill_fifo(host);
1142 else
1143 wbsd_empty_fifo(host);
1144
1145 /*
1146 * Done?
1147 */
1148 if (host->size == data->bytes_xfered)
1149 {
1150 wbsd_write_index(host, WBSD_IDX_FIFOEN, 0);
1151 tasklet_schedule(&host->finish_tasklet);
1152 }
1153
1154end:
1155 spin_unlock(&host->lock);
1156}
1157
1158static void wbsd_tasklet_crc(unsigned long param)
1159{
1160 struct wbsd_host* host = (struct wbsd_host*)param;
1161 struct mmc_data* data;
1162
1163 spin_lock(&host->lock);
1164
1165 if (!host->mrq)
1166 goto end;
1167
1168 data = wbsd_get_data(host);
1169 if (!data)
1170 goto end;
1171
1172 DBGF("CRC error\n");
1173
1174 data->error = MMC_ERR_BADCRC;
1175
1176 tasklet_schedule(&host->finish_tasklet);
1177
1178end:
1179 spin_unlock(&host->lock);
1180}
1181
1182static void wbsd_tasklet_timeout(unsigned long param)
1183{
1184 struct wbsd_host* host = (struct wbsd_host*)param;
1185 struct mmc_data* data;
1186
1187 spin_lock(&host->lock);
1188
1189 if (!host->mrq)
1190 goto end;
1191
1192 data = wbsd_get_data(host);
1193 if (!data)
1194 goto end;
1195
1196 DBGF("Timeout\n");
1197
1198 data->error = MMC_ERR_TIMEOUT;
1199
1200 tasklet_schedule(&host->finish_tasklet);
1201
1202end:
1203 spin_unlock(&host->lock);
1204}
1205
1206static void wbsd_tasklet_finish(unsigned long param)
1207{
1208 struct wbsd_host* host = (struct wbsd_host*)param;
1209 struct mmc_data* data;
1210
1211 spin_lock(&host->lock);
1212
1213 WARN_ON(!host->mrq);
1214 if (!host->mrq)
1215 goto end;
1216
1217 data = wbsd_get_data(host);
1218 if (!data)
1219 goto end;
1220
1221 wbsd_finish_data(host, data);
1222
1223end:
1224 spin_unlock(&host->lock);
1225}
1226
1227static void wbsd_tasklet_block(unsigned long param)
1228{
1229 struct wbsd_host* host = (struct wbsd_host*)param;
1230 struct mmc_data* data;
1231
1232 spin_lock(&host->lock);
1233
1234 if ((wbsd_read_index(host, WBSD_IDX_CRCSTATUS) & WBSD_CRC_MASK) !=
1235 WBSD_CRC_OK)
1236 {
1237 data = wbsd_get_data(host);
1238 if (!data)
1239 goto end;
1240
1241 DBGF("CRC error\n");
1242
1243 data->error = MMC_ERR_BADCRC;
1244
1245 tasklet_schedule(&host->finish_tasklet);
1246 }
1247
1248end:
1249 spin_unlock(&host->lock);
1250}
1251
1252/*
1253 * Interrupt handling
1254 */
1255
1256static irqreturn_t wbsd_irq(int irq, void *dev_id, struct pt_regs *regs)
1257{
1258 struct wbsd_host* host = dev_id;
1259 int isr;
1260
1261 isr = inb(host->base + WBSD_ISR);
1262
1263 /*
1264 * Was it actually our hardware that caused the interrupt?
1265 */
1266 if (isr == 0xff || isr == 0x00)
1267 return IRQ_NONE;
1268
1269 host->isr |= isr;
1270
1271 /*
1272 * Schedule tasklets as needed.
1273 */
1274 if (isr & WBSD_INT_CARD)
1275 tasklet_schedule(&host->card_tasklet);
1276 if (isr & WBSD_INT_FIFO_THRE)
1277 tasklet_schedule(&host->fifo_tasklet);
1278 if (isr & WBSD_INT_CRC)
1279 tasklet_hi_schedule(&host->crc_tasklet);
1280 if (isr & WBSD_INT_TIMEOUT)
1281 tasklet_hi_schedule(&host->timeout_tasklet);
1282 if (isr & WBSD_INT_BUSYEND)
1283 tasklet_hi_schedule(&host->block_tasklet);
1284 if (isr & WBSD_INT_TC)
1285 tasklet_schedule(&host->finish_tasklet);
1286
1287 return IRQ_HANDLED;
1288}
1289
Pierre Ossman85bcc132005-05-08 19:35:27 +01001290/*****************************************************************************\
1291 * *
1292 * Device initialisation and shutdown *
1293 * *
1294\*****************************************************************************/
1295
Linus Torvalds1da177e2005-04-16 15:20:36 -07001296/*
Pierre Ossman85bcc132005-05-08 19:35:27 +01001297 * Allocate/free MMC structure.
Linus Torvalds1da177e2005-04-16 15:20:36 -07001298 */
1299
Pierre Ossman85bcc132005-05-08 19:35:27 +01001300static int __devinit wbsd_alloc_mmc(struct device* dev)
1301{
1302 struct mmc_host* mmc;
1303 struct wbsd_host* host;
1304
1305 /*
1306 * Allocate MMC structure.
1307 */
1308 mmc = mmc_alloc_host(sizeof(struct wbsd_host), dev);
1309 if (!mmc)
1310 return -ENOMEM;
1311
1312 host = mmc_priv(mmc);
1313 host->mmc = mmc;
1314
1315 host->dma = -1;
1316
1317 /*
1318 * Set host parameters.
1319 */
1320 mmc->ops = &wbsd_ops;
1321 mmc->f_min = 375000;
1322 mmc->f_max = 24000000;
1323 mmc->ocr_avail = MMC_VDD_32_33|MMC_VDD_33_34;
1324
1325 spin_lock_init(&host->lock);
1326
1327 /*
1328 * Maximum number of segments. Worst case is one sector per segment
1329 * so this will be 64kB/512.
1330 */
1331 mmc->max_hw_segs = 128;
1332 mmc->max_phys_segs = 128;
1333
1334 /*
1335 * Maximum number of sectors in one transfer. Also limited by 64kB
1336 * buffer.
1337 */
1338 mmc->max_sectors = 128;
1339
1340 /*
1341 * Maximum segment size. Could be one segment with the maximum number
1342 * of segments.
1343 */
1344 mmc->max_seg_size = mmc->max_sectors * 512;
1345
1346 dev_set_drvdata(dev, mmc);
1347
1348 return 0;
1349}
1350
1351static void __devexit wbsd_free_mmc(struct device* dev)
1352{
1353 struct mmc_host* mmc;
1354
1355 mmc = dev_get_drvdata(dev);
1356 if (!mmc)
1357 return;
1358
1359 mmc_free_host(mmc);
1360
1361 dev_set_drvdata(dev, NULL);
1362}
1363
1364/*
1365 * Scan for known chip id:s
1366 */
1367
1368static int __devinit wbsd_scan(struct wbsd_host* host)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001369{
1370 int i, j, k;
1371 int id;
1372
1373 /*
1374 * Iterate through all ports, all codes to
1375 * find hardware that is in our known list.
1376 */
1377 for (i = 0;i < sizeof(config_ports)/sizeof(int);i++)
1378 {
1379 if (!request_region(config_ports[i], 2, DRIVER_NAME))
1380 continue;
1381
1382 for (j = 0;j < sizeof(unlock_codes)/sizeof(int);j++)
1383 {
1384 id = 0xFFFF;
1385
1386 outb(unlock_codes[j], config_ports[i]);
1387 outb(unlock_codes[j], config_ports[i]);
1388
1389 outb(WBSD_CONF_ID_HI, config_ports[i]);
1390 id = inb(config_ports[i] + 1) << 8;
1391
1392 outb(WBSD_CONF_ID_LO, config_ports[i]);
1393 id |= inb(config_ports[i] + 1);
1394
1395 for (k = 0;k < sizeof(valid_ids)/sizeof(int);k++)
1396 {
1397 if (id == valid_ids[k])
1398 {
1399 host->chip_id = id;
1400 host->config = config_ports[i];
1401 host->unlock_code = unlock_codes[i];
1402
1403 return 0;
1404 }
1405 }
1406
1407 if (id != 0xFFFF)
1408 {
1409 DBG("Unknown hardware (id %x) found at %x\n",
1410 id, config_ports[i]);
1411 }
1412
1413 outb(LOCK_CODE, config_ports[i]);
1414 }
1415
1416 release_region(config_ports[i], 2);
1417 }
1418
1419 return -ENODEV;
1420}
1421
Pierre Ossman85bcc132005-05-08 19:35:27 +01001422/*
1423 * Allocate/free io port ranges
1424 */
1425
1426static int __devinit wbsd_request_region(struct wbsd_host* host, int base)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001427{
1428 if (io & 0x7)
1429 return -EINVAL;
1430
Pierre Ossman85bcc132005-05-08 19:35:27 +01001431 if (!request_region(base, 8, DRIVER_NAME))
Linus Torvalds1da177e2005-04-16 15:20:36 -07001432 return -EIO;
1433
1434 host->base = io;
1435
1436 return 0;
1437}
1438
Pierre Ossman85bcc132005-05-08 19:35:27 +01001439static void __devexit wbsd_release_regions(struct wbsd_host* host)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001440{
1441 if (host->base)
1442 release_region(host->base, 8);
Pierre Ossman85bcc132005-05-08 19:35:27 +01001443
1444 host->base = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001445
1446 if (host->config)
1447 release_region(host->config, 2);
Pierre Ossman85bcc132005-05-08 19:35:27 +01001448
1449 host->config = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001450}
1451
Pierre Ossman85bcc132005-05-08 19:35:27 +01001452/*
1453 * Allocate/free DMA port and buffer
1454 */
1455
1456static void __devinit wbsd_request_dma(struct wbsd_host* host, int dma)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001457{
Linus Torvalds1da177e2005-04-16 15:20:36 -07001458 if (dma < 0)
1459 return;
1460
1461 if (request_dma(dma, DRIVER_NAME))
1462 goto err;
1463
1464 /*
1465 * We need to allocate a special buffer in
1466 * order for ISA to be able to DMA to it.
1467 */
Pierre Ossman85bcc132005-05-08 19:35:27 +01001468 host->dma_buffer = kmalloc(WBSD_DMA_SIZE,
Linus Torvalds1da177e2005-04-16 15:20:36 -07001469 GFP_NOIO | GFP_DMA | __GFP_REPEAT | __GFP_NOWARN);
1470 if (!host->dma_buffer)
1471 goto free;
1472
1473 /*
1474 * Translate the address to a physical address.
1475 */
Pierre Ossman85bcc132005-05-08 19:35:27 +01001476 host->dma_addr = dma_map_single(host->mmc->dev, host->dma_buffer,
1477 WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001478
1479 /*
1480 * ISA DMA must be aligned on a 64k basis.
1481 */
1482 if ((host->dma_addr & 0xffff) != 0)
1483 goto kfree;
1484 /*
1485 * ISA cannot access memory above 16 MB.
1486 */
1487 else if (host->dma_addr >= 0x1000000)
1488 goto kfree;
1489
1490 host->dma = dma;
1491
1492 return;
1493
1494kfree:
1495 /*
1496 * If we've gotten here then there is some kind of alignment bug
1497 */
1498 BUG_ON(1);
1499
Pierre Ossman85bcc132005-05-08 19:35:27 +01001500 dma_unmap_single(host->mmc->dev, host->dma_addr, WBSD_DMA_SIZE,
1501 DMA_BIDIRECTIONAL);
1502 host->dma_addr = (dma_addr_t)NULL;
1503
Linus Torvalds1da177e2005-04-16 15:20:36 -07001504 kfree(host->dma_buffer);
1505 host->dma_buffer = NULL;
1506
1507free:
1508 free_dma(dma);
1509
1510err:
1511 printk(KERN_WARNING DRIVER_NAME ": Unable to allocate DMA %d. "
1512 "Falling back on FIFO.\n", dma);
1513}
1514
Pierre Ossman85bcc132005-05-08 19:35:27 +01001515static void __devexit wbsd_release_dma(struct wbsd_host* host)
1516{
1517 if (host->dma_addr)
1518 dma_unmap_single(host->mmc->dev, host->dma_addr, WBSD_DMA_SIZE,
1519 DMA_BIDIRECTIONAL);
1520 if (host->dma_buffer)
1521 kfree(host->dma_buffer);
1522 if (host->dma >= 0)
1523 free_dma(host->dma);
1524
1525 host->dma = -1;
1526 host->dma_buffer = NULL;
1527 host->dma_addr = (dma_addr_t)NULL;
1528}
Linus Torvalds1da177e2005-04-16 15:20:36 -07001529
1530/*
Pierre Ossman85bcc132005-05-08 19:35:27 +01001531 * Allocate/free IRQ.
Linus Torvalds1da177e2005-04-16 15:20:36 -07001532 */
1533
Pierre Ossman85bcc132005-05-08 19:35:27 +01001534static int __devinit wbsd_request_irq(struct wbsd_host* host, int irq)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001535{
Linus Torvalds1da177e2005-04-16 15:20:36 -07001536 int ret;
1537
1538 /*
Linus Torvalds1da177e2005-04-16 15:20:36 -07001539 * Allocate interrupt.
1540 */
Pierre Ossman85bcc132005-05-08 19:35:27 +01001541
Linus Torvalds1da177e2005-04-16 15:20:36 -07001542 ret = request_irq(irq, wbsd_irq, SA_SHIRQ, DRIVER_NAME, host);
1543 if (ret)
Pierre Ossman85bcc132005-05-08 19:35:27 +01001544 return ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001545
1546 host->irq = irq;
Pierre Ossman85bcc132005-05-08 19:35:27 +01001547
Linus Torvalds1da177e2005-04-16 15:20:36 -07001548 /*
1549 * Set up tasklets.
1550 */
1551 tasklet_init(&host->card_tasklet, wbsd_tasklet_card, (unsigned long)host);
1552 tasklet_init(&host->fifo_tasklet, wbsd_tasklet_fifo, (unsigned long)host);
1553 tasklet_init(&host->crc_tasklet, wbsd_tasklet_crc, (unsigned long)host);
1554 tasklet_init(&host->timeout_tasklet, wbsd_tasklet_timeout, (unsigned long)host);
1555 tasklet_init(&host->finish_tasklet, wbsd_tasklet_finish, (unsigned long)host);
1556 tasklet_init(&host->block_tasklet, wbsd_tasklet_block, (unsigned long)host);
1557
Linus Torvalds1da177e2005-04-16 15:20:36 -07001558 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001559}
1560
Pierre Ossman85bcc132005-05-08 19:35:27 +01001561static void __devexit wbsd_release_irq(struct wbsd_host* host)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001562{
Pierre Ossman85bcc132005-05-08 19:35:27 +01001563 if (!host->irq)
1564 return;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001565
1566 free_irq(host->irq, host);
1567
Pierre Ossman85bcc132005-05-08 19:35:27 +01001568 host->irq = 0;
1569
Linus Torvalds1da177e2005-04-16 15:20:36 -07001570 tasklet_kill(&host->card_tasklet);
1571 tasklet_kill(&host->fifo_tasklet);
1572 tasklet_kill(&host->crc_tasklet);
1573 tasklet_kill(&host->timeout_tasklet);
1574 tasklet_kill(&host->finish_tasklet);
1575 tasklet_kill(&host->block_tasklet);
Pierre Ossman85bcc132005-05-08 19:35:27 +01001576}
1577
1578/*
1579 * Allocate all resources for the host.
1580 */
1581
1582static int __devinit wbsd_request_resources(struct wbsd_host* host,
1583 int base, int irq, int dma)
1584{
1585 int ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001586
Pierre Ossman85bcc132005-05-08 19:35:27 +01001587 /*
1588 * Allocate I/O ports.
1589 */
1590 ret = wbsd_request_region(host, base);
1591 if (ret)
1592 return ret;
1593
1594 /*
1595 * Allocate interrupt.
1596 */
1597 ret = wbsd_request_irq(host, irq);
1598 if (ret)
1599 return ret;
1600
1601 /*
1602 * Allocate DMA.
1603 */
1604 wbsd_request_dma(host, dma);
1605
1606 return 0;
1607}
1608
1609/*
1610 * Release all resources for the host.
1611 */
1612
1613static void __devexit wbsd_release_resources(struct wbsd_host* host)
1614{
1615 wbsd_release_dma(host);
1616 wbsd_release_irq(host);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001617 wbsd_release_regions(host);
Pierre Ossman85bcc132005-05-08 19:35:27 +01001618}
1619
1620/*
1621 * Configure the resources the chip should use.
1622 */
1623
1624static void __devinit wbsd_chip_config(struct wbsd_host* host)
1625{
1626 /*
1627 * Reset the chip.
1628 */
1629 wbsd_write_config(host, WBSD_CONF_SWRST, 1);
1630 wbsd_write_config(host, WBSD_CONF_SWRST, 0);
1631
1632 /*
1633 * Select SD/MMC function.
1634 */
1635 wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001636
Pierre Ossman85bcc132005-05-08 19:35:27 +01001637 /*
1638 * Set up card detection.
1639 */
1640 wbsd_write_config(host, WBSD_CONF_PINS, WBSD_PINS_DETECT_GP11);
1641
1642 /*
1643 * Configure chip
1644 */
1645 wbsd_write_config(host, WBSD_CONF_PORT_HI, host->base >> 8);
1646 wbsd_write_config(host, WBSD_CONF_PORT_LO, host->base & 0xff);
1647
1648 wbsd_write_config(host, WBSD_CONF_IRQ, host->irq);
1649
1650 if (host->dma >= 0)
1651 wbsd_write_config(host, WBSD_CONF_DRQ, host->dma);
1652
1653 /*
1654 * Enable and power up chip.
1655 */
1656 wbsd_write_config(host, WBSD_CONF_ENABLE, 1);
1657 wbsd_write_config(host, WBSD_CONF_POWER, 0x20);
1658}
1659
1660/*
1661 * Check that configured resources are correct.
1662 */
1663
1664static int __devinit wbsd_chip_validate(struct wbsd_host* host)
1665{
1666 int base, irq, dma;
1667
1668 /*
1669 * Select SD/MMC function.
1670 */
1671 wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
1672
1673 /*
1674 * Read configuration.
1675 */
1676 base = wbsd_read_config(host, WBSD_CONF_PORT_HI) << 8;
1677 base |= wbsd_read_config(host, WBSD_CONF_PORT_LO);
1678
1679 irq = wbsd_read_config(host, WBSD_CONF_IRQ);
1680
1681 dma = wbsd_read_config(host, WBSD_CONF_DRQ);
1682
1683 /*
1684 * Validate against given configuration.
1685 */
1686 if (base != host->base)
1687 return 0;
1688 if (irq != host->irq)
1689 return 0;
1690 if ((dma != host->dma) && (host->dma != -1))
1691 return 0;
1692
1693 return 1;
1694}
1695
1696/*****************************************************************************\
1697 * *
1698 * Devices setup and shutdown *
1699 * *
1700\*****************************************************************************/
1701
1702static int __devinit wbsd_init(struct device* dev, int base, int irq, int dma,
1703 int pnp)
1704{
1705 struct wbsd_host* host = NULL;
1706 struct mmc_host* mmc = NULL;
1707 int ret;
1708
1709 ret = wbsd_alloc_mmc(dev);
1710 if (ret)
1711 return ret;
1712
1713 mmc = dev_get_drvdata(dev);
1714 host = mmc_priv(mmc);
1715
1716 /*
1717 * Scan for hardware.
1718 */
1719 ret = wbsd_scan(host);
1720 if (ret)
1721 {
1722 if (pnp && (ret == -ENODEV))
1723 {
1724 printk(KERN_WARNING DRIVER_NAME
1725 ": Unable to confirm device presence. You may "
1726 "experience lock-ups.\n");
1727 }
1728 else
1729 {
1730 wbsd_free_mmc(dev);
1731 return ret;
1732 }
1733 }
1734
1735 /*
1736 * Request resources.
1737 */
1738 ret = wbsd_request_resources(host, io, irq, dma);
1739 if (ret)
1740 {
1741 wbsd_release_resources(host);
1742 wbsd_free_mmc(dev);
1743 return ret;
1744 }
1745
1746 /*
1747 * See if chip needs to be configured.
1748 */
1749 if (pnp && (host->config != 0))
1750 {
1751 if (!wbsd_chip_validate(host))
1752 {
1753 printk(KERN_WARNING DRIVER_NAME
1754 ": PnP active but chip not configured! "
1755 "You probably have a buggy BIOS. "
1756 "Configuring chip manually.\n");
1757 wbsd_chip_config(host);
1758 }
1759 }
1760 else
1761 wbsd_chip_config(host);
1762
1763 /*
1764 * Power Management stuff. No idea how this works.
1765 * Not tested.
1766 */
1767#ifdef CONFIG_PM
1768 if (host->config)
1769 wbsd_write_config(host, WBSD_CONF_PME, 0xA0);
1770#endif
1771 /*
1772 * Allow device to initialise itself properly.
1773 */
1774 mdelay(5);
1775
1776 /*
1777 * Reset the chip into a known state.
1778 */
1779 wbsd_init_device(host);
1780
1781 mmc_add_host(mmc);
1782
1783 printk(KERN_INFO "%s: W83L51xD", mmc->host_name);
1784 if (host->chip_id != 0)
1785 printk(" id %x", (int)host->chip_id);
1786 printk(" at 0x%x irq %d", (int)host->base, (int)host->irq);
1787 if (host->dma >= 0)
1788 printk(" dma %d", (int)host->dma);
1789 else
1790 printk(" FIFO");
1791 if (pnp)
1792 printk(" PnP");
1793 printk("\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -07001794
1795 return 0;
1796}
1797
Pierre Ossman85bcc132005-05-08 19:35:27 +01001798static void __devexit wbsd_shutdown(struct device* dev, int pnp)
1799{
1800 struct mmc_host* mmc = dev_get_drvdata(dev);
1801 struct wbsd_host* host;
1802
1803 if (!mmc)
1804 return;
1805
1806 host = mmc_priv(mmc);
1807
1808 mmc_remove_host(mmc);
1809
1810 if (!pnp)
1811 {
1812 /*
1813 * Power down the SD/MMC function.
1814 */
1815 wbsd_unlock_config(host);
1816 wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
1817 wbsd_write_config(host, WBSD_CONF_ENABLE, 0);
1818 wbsd_lock_config(host);
1819 }
1820
1821 wbsd_release_resources(host);
1822
1823 wbsd_free_mmc(dev);
1824}
1825
1826/*
1827 * Non-PnP
1828 */
1829
1830static int __devinit wbsd_probe(struct device* dev)
1831{
1832 return wbsd_init(dev, io, irq, dma, 0);
1833}
1834
1835static int __devexit wbsd_remove(struct device* dev)
1836{
1837 wbsd_shutdown(dev, 0);
1838
1839 return 0;
1840}
1841
1842/*
1843 * PnP
1844 */
1845
1846#ifdef CONFIG_PNP
1847
1848static int __devinit
1849wbsd_pnp_probe(struct pnp_dev * pnpdev, const struct pnp_device_id *dev_id)
1850{
1851 int io, irq, dma;
1852
1853 /*
1854 * Get resources from PnP layer.
1855 */
1856 io = pnp_port_start(pnpdev, 0);
1857 irq = pnp_irq(pnpdev, 0);
1858 if (pnp_dma_valid(pnpdev, 0))
1859 dma = pnp_dma(pnpdev, 0);
1860 else
1861 dma = -1;
1862
1863 DBGF("PnP resources: port %3x irq %d dma %d\n", io, irq, dma);
1864
1865 return wbsd_init(&pnpdev->dev, io, irq, dma, 1);
1866}
1867
1868static void __devexit wbsd_pnp_remove(struct pnp_dev * dev)
1869{
1870 wbsd_shutdown(&dev->dev, 1);
1871}
1872
1873#endif /* CONFIG_PNP */
1874
Linus Torvalds1da177e2005-04-16 15:20:36 -07001875/*
1876 * Power management
1877 */
1878
1879#ifdef CONFIG_PM
Pavel Macheke5378ca2005-04-16 15:25:29 -07001880static int wbsd_suspend(struct device *dev, pm_message_t state, u32 level)
Linus Torvalds1da177e2005-04-16 15:20:36 -07001881{
1882 DBGF("Not yet supported\n");
1883
1884 return 0;
1885}
1886
1887static int wbsd_resume(struct device *dev, u32 level)
1888{
1889 DBGF("Not yet supported\n");
1890
1891 return 0;
1892}
1893#else
1894#define wbsd_suspend NULL
1895#define wbsd_resume NULL
1896#endif
1897
Pierre Ossman85bcc132005-05-08 19:35:27 +01001898static struct platform_device *wbsd_device;
Linus Torvalds1da177e2005-04-16 15:20:36 -07001899
1900static struct device_driver wbsd_driver = {
1901 .name = DRIVER_NAME,
1902 .bus = &platform_bus_type,
1903 .probe = wbsd_probe,
1904 .remove = wbsd_remove,
1905
1906 .suspend = wbsd_suspend,
1907 .resume = wbsd_resume,
1908};
1909
Pierre Ossman85bcc132005-05-08 19:35:27 +01001910#ifdef CONFIG_PNP
1911
1912static struct pnp_driver wbsd_pnp_driver = {
1913 .name = DRIVER_NAME,
1914 .id_table = pnp_dev_table,
1915 .probe = wbsd_pnp_probe,
1916 .remove = wbsd_pnp_remove,
1917};
1918
1919#endif /* CONFIG_PNP */
1920
Linus Torvalds1da177e2005-04-16 15:20:36 -07001921/*
1922 * Module loading/unloading
1923 */
1924
1925static int __init wbsd_drv_init(void)
1926{
1927 int result;
1928
1929 printk(KERN_INFO DRIVER_NAME
1930 ": Winbond W83L51xD SD/MMC card interface driver, "
1931 DRIVER_VERSION "\n");
1932 printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -07001933
Pierre Ossman85bcc132005-05-08 19:35:27 +01001934#ifdef CONFIG_PNP
1935
1936 if (!nopnp)
1937 {
1938 result = pnp_register_driver(&wbsd_pnp_driver);
1939 if (result < 0)
1940 return result;
1941 }
1942
1943#endif /* CONFIG_PNP */
1944
1945 if (nopnp)
1946 {
1947 result = driver_register(&wbsd_driver);
1948 if (result < 0)
1949 return result;
1950
1951 wbsd_device = platform_device_register_simple(DRIVER_NAME, -1,
1952 NULL, 0);
1953 if (IS_ERR(wbsd_device))
1954 return PTR_ERR(wbsd_device);
1955 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001956
1957 return 0;
1958}
1959
1960static void __exit wbsd_drv_exit(void)
1961{
Pierre Ossman85bcc132005-05-08 19:35:27 +01001962#ifdef CONFIG_PNP
1963
1964 if (!nopnp)
1965 pnp_unregister_driver(&wbsd_pnp_driver);
Linus Torvalds1da177e2005-04-16 15:20:36 -07001966
Pierre Ossman85bcc132005-05-08 19:35:27 +01001967#endif /* CONFIG_PNP */
1968
1969 if (nopnp)
1970 {
1971 platform_device_unregister(wbsd_device);
1972
1973 driver_unregister(&wbsd_driver);
1974 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07001975
1976 DBG("unloaded\n");
1977}
1978
1979module_init(wbsd_drv_init);
1980module_exit(wbsd_drv_exit);
Pierre Ossman85bcc132005-05-08 19:35:27 +01001981#ifdef CONFIG_PNP
1982module_param(nopnp, uint, 0444);
1983#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -07001984module_param(io, uint, 0444);
1985module_param(irq, uint, 0444);
1986module_param(dma, int, 0444);
1987
1988MODULE_LICENSE("GPL");
1989MODULE_DESCRIPTION("Winbond W83L51xD SD/MMC card interface driver");
1990MODULE_VERSION(DRIVER_VERSION);
1991
Pierre Ossman85bcc132005-05-08 19:35:27 +01001992#ifdef CONFIG_PNP
1993MODULE_PARM_DESC(nopnp, "Scan for device instead of relying on PNP. (default 0)");
1994#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -07001995MODULE_PARM_DESC(io, "I/O base to allocate. Must be 8 byte aligned. (default 0x248)");
1996MODULE_PARM_DESC(irq, "IRQ to allocate. (default 6)");
1997MODULE_PARM_DESC(dma, "DMA channel to allocate. -1 for no DMA. (default 2)");