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