Merge master.kernel.org:/home/rmk/linux-2.6-mmc
[linux-3.10.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)");