xref: /openbmc/linux/drivers/mmc/host/sdhci.c (revision f15cbe6f1a4b4d9df59142fc8e4abb973302cf44)
1 /*
2  *  linux/drivers/mmc/host/sdhci.c - Secure Digital Host Controller Interface driver
3  *
4  *  Copyright (C) 2005-2008 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 as published by
8  * the Free Software Foundation; either version 2 of the License, or (at
9  * your option) any later version.
10  *
11  * Thanks to the following companies for their support:
12  *
13  *     - JMicron (hardware and technical support)
14  */
15 
16 #include <linux/delay.h>
17 #include <linux/highmem.h>
18 #include <linux/io.h>
19 #include <linux/dma-mapping.h>
20 #include <linux/scatterlist.h>
21 
22 #include <linux/leds.h>
23 
24 #include <linux/mmc/host.h>
25 
26 #include "sdhci.h"
27 
28 #define DRIVER_NAME "sdhci"
29 
30 #define DBG(f, x...) \
31 	pr_debug(DRIVER_NAME " [%s()]: " f, __func__,## x)
32 
33 static unsigned int debug_quirks = 0;
34 
35 static void sdhci_prepare_data(struct sdhci_host *, struct mmc_data *);
36 static void sdhci_finish_data(struct sdhci_host *);
37 
38 static void sdhci_send_command(struct sdhci_host *, struct mmc_command *);
39 static void sdhci_finish_command(struct sdhci_host *);
40 
41 static void sdhci_dumpregs(struct sdhci_host *host)
42 {
43 	printk(KERN_DEBUG DRIVER_NAME ": ============== REGISTER DUMP ==============\n");
44 
45 	printk(KERN_DEBUG DRIVER_NAME ": Sys addr: 0x%08x | Version:  0x%08x\n",
46 		readl(host->ioaddr + SDHCI_DMA_ADDRESS),
47 		readw(host->ioaddr + SDHCI_HOST_VERSION));
48 	printk(KERN_DEBUG DRIVER_NAME ": Blk size: 0x%08x | Blk cnt:  0x%08x\n",
49 		readw(host->ioaddr + SDHCI_BLOCK_SIZE),
50 		readw(host->ioaddr + SDHCI_BLOCK_COUNT));
51 	printk(KERN_DEBUG DRIVER_NAME ": Argument: 0x%08x | Trn mode: 0x%08x\n",
52 		readl(host->ioaddr + SDHCI_ARGUMENT),
53 		readw(host->ioaddr + SDHCI_TRANSFER_MODE));
54 	printk(KERN_DEBUG DRIVER_NAME ": Present:  0x%08x | Host ctl: 0x%08x\n",
55 		readl(host->ioaddr + SDHCI_PRESENT_STATE),
56 		readb(host->ioaddr + SDHCI_HOST_CONTROL));
57 	printk(KERN_DEBUG DRIVER_NAME ": Power:    0x%08x | Blk gap:  0x%08x\n",
58 		readb(host->ioaddr + SDHCI_POWER_CONTROL),
59 		readb(host->ioaddr + SDHCI_BLOCK_GAP_CONTROL));
60 	printk(KERN_DEBUG DRIVER_NAME ": Wake-up:  0x%08x | Clock:    0x%08x\n",
61 		readb(host->ioaddr + SDHCI_WAKE_UP_CONTROL),
62 		readw(host->ioaddr + SDHCI_CLOCK_CONTROL));
63 	printk(KERN_DEBUG DRIVER_NAME ": Timeout:  0x%08x | Int stat: 0x%08x\n",
64 		readb(host->ioaddr + SDHCI_TIMEOUT_CONTROL),
65 		readl(host->ioaddr + SDHCI_INT_STATUS));
66 	printk(KERN_DEBUG DRIVER_NAME ": Int enab: 0x%08x | Sig enab: 0x%08x\n",
67 		readl(host->ioaddr + SDHCI_INT_ENABLE),
68 		readl(host->ioaddr + SDHCI_SIGNAL_ENABLE));
69 	printk(KERN_DEBUG DRIVER_NAME ": AC12 err: 0x%08x | Slot int: 0x%08x\n",
70 		readw(host->ioaddr + SDHCI_ACMD12_ERR),
71 		readw(host->ioaddr + SDHCI_SLOT_INT_STATUS));
72 	printk(KERN_DEBUG DRIVER_NAME ": Caps:     0x%08x | Max curr: 0x%08x\n",
73 		readl(host->ioaddr + SDHCI_CAPABILITIES),
74 		readl(host->ioaddr + SDHCI_MAX_CURRENT));
75 
76 	printk(KERN_DEBUG DRIVER_NAME ": ===========================================\n");
77 }
78 
79 /*****************************************************************************\
80  *                                                                           *
81  * Low level functions                                                       *
82  *                                                                           *
83 \*****************************************************************************/
84 
85 static void sdhci_reset(struct sdhci_host *host, u8 mask)
86 {
87 	unsigned long timeout;
88 
89 	if (host->quirks & SDHCI_QUIRK_NO_CARD_NO_RESET) {
90 		if (!(readl(host->ioaddr + SDHCI_PRESENT_STATE) &
91 			SDHCI_CARD_PRESENT))
92 			return;
93 	}
94 
95 	writeb(mask, host->ioaddr + SDHCI_SOFTWARE_RESET);
96 
97 	if (mask & SDHCI_RESET_ALL)
98 		host->clock = 0;
99 
100 	/* Wait max 100 ms */
101 	timeout = 100;
102 
103 	/* hw clears the bit when it's done */
104 	while (readb(host->ioaddr + SDHCI_SOFTWARE_RESET) & mask) {
105 		if (timeout == 0) {
106 			printk(KERN_ERR "%s: Reset 0x%x never completed.\n",
107 				mmc_hostname(host->mmc), (int)mask);
108 			sdhci_dumpregs(host);
109 			return;
110 		}
111 		timeout--;
112 		mdelay(1);
113 	}
114 }
115 
116 static void sdhci_init(struct sdhci_host *host)
117 {
118 	u32 intmask;
119 
120 	sdhci_reset(host, SDHCI_RESET_ALL);
121 
122 	intmask = SDHCI_INT_BUS_POWER | SDHCI_INT_DATA_END_BIT |
123 		SDHCI_INT_DATA_CRC | SDHCI_INT_DATA_TIMEOUT | SDHCI_INT_INDEX |
124 		SDHCI_INT_END_BIT | SDHCI_INT_CRC | SDHCI_INT_TIMEOUT |
125 		SDHCI_INT_CARD_REMOVE | SDHCI_INT_CARD_INSERT |
126 		SDHCI_INT_DATA_AVAIL | SDHCI_INT_SPACE_AVAIL |
127 		SDHCI_INT_DMA_END | SDHCI_INT_DATA_END | SDHCI_INT_RESPONSE |
128 		SDHCI_INT_ADMA_ERROR;
129 
130 	writel(intmask, host->ioaddr + SDHCI_INT_ENABLE);
131 	writel(intmask, host->ioaddr + SDHCI_SIGNAL_ENABLE);
132 }
133 
134 static void sdhci_activate_led(struct sdhci_host *host)
135 {
136 	u8 ctrl;
137 
138 	ctrl = readb(host->ioaddr + SDHCI_HOST_CONTROL);
139 	ctrl |= SDHCI_CTRL_LED;
140 	writeb(ctrl, host->ioaddr + SDHCI_HOST_CONTROL);
141 }
142 
143 static void sdhci_deactivate_led(struct sdhci_host *host)
144 {
145 	u8 ctrl;
146 
147 	ctrl = readb(host->ioaddr + SDHCI_HOST_CONTROL);
148 	ctrl &= ~SDHCI_CTRL_LED;
149 	writeb(ctrl, host->ioaddr + SDHCI_HOST_CONTROL);
150 }
151 
152 #ifdef CONFIG_LEDS_CLASS
153 static void sdhci_led_control(struct led_classdev *led,
154 	enum led_brightness brightness)
155 {
156 	struct sdhci_host *host = container_of(led, struct sdhci_host, led);
157 	unsigned long flags;
158 
159 	spin_lock_irqsave(&host->lock, flags);
160 
161 	if (brightness == LED_OFF)
162 		sdhci_deactivate_led(host);
163 	else
164 		sdhci_activate_led(host);
165 
166 	spin_unlock_irqrestore(&host->lock, flags);
167 }
168 #endif
169 
170 /*****************************************************************************\
171  *                                                                           *
172  * Core functions                                                            *
173  *                                                                           *
174 \*****************************************************************************/
175 
176 static void sdhci_read_block_pio(struct sdhci_host *host)
177 {
178 	unsigned long flags;
179 	size_t blksize, len, chunk;
180 	u32 scratch;
181 	u8 *buf;
182 
183 	DBG("PIO reading\n");
184 
185 	blksize = host->data->blksz;
186 	chunk = 0;
187 
188 	local_irq_save(flags);
189 
190 	while (blksize) {
191 		if (!sg_miter_next(&host->sg_miter))
192 			BUG();
193 
194 		len = min(host->sg_miter.length, blksize);
195 
196 		blksize -= len;
197 		host->sg_miter.consumed = len;
198 
199 		buf = host->sg_miter.addr;
200 
201 		while (len) {
202 			if (chunk == 0) {
203 				scratch = readl(host->ioaddr + SDHCI_BUFFER);
204 				chunk = 4;
205 			}
206 
207 			*buf = scratch & 0xFF;
208 
209 			buf++;
210 			scratch >>= 8;
211 			chunk--;
212 			len--;
213 		}
214 	}
215 
216 	sg_miter_stop(&host->sg_miter);
217 
218 	local_irq_restore(flags);
219 }
220 
221 static void sdhci_write_block_pio(struct sdhci_host *host)
222 {
223 	unsigned long flags;
224 	size_t blksize, len, chunk;
225 	u32 scratch;
226 	u8 *buf;
227 
228 	DBG("PIO writing\n");
229 
230 	blksize = host->data->blksz;
231 	chunk = 0;
232 	scratch = 0;
233 
234 	local_irq_save(flags);
235 
236 	while (blksize) {
237 		if (!sg_miter_next(&host->sg_miter))
238 			BUG();
239 
240 		len = min(host->sg_miter.length, blksize);
241 
242 		blksize -= len;
243 		host->sg_miter.consumed = len;
244 
245 		buf = host->sg_miter.addr;
246 
247 		while (len) {
248 			scratch |= (u32)*buf << (chunk * 8);
249 
250 			buf++;
251 			chunk++;
252 			len--;
253 
254 			if ((chunk == 4) || ((len == 0) && (blksize == 0))) {
255 				writel(scratch, host->ioaddr + SDHCI_BUFFER);
256 				chunk = 0;
257 				scratch = 0;
258 			}
259 		}
260 	}
261 
262 	sg_miter_stop(&host->sg_miter);
263 
264 	local_irq_restore(flags);
265 }
266 
267 static void sdhci_transfer_pio(struct sdhci_host *host)
268 {
269 	u32 mask;
270 
271 	BUG_ON(!host->data);
272 
273 	if (host->blocks == 0)
274 		return;
275 
276 	if (host->data->flags & MMC_DATA_READ)
277 		mask = SDHCI_DATA_AVAILABLE;
278 	else
279 		mask = SDHCI_SPACE_AVAILABLE;
280 
281 	while (readl(host->ioaddr + SDHCI_PRESENT_STATE) & mask) {
282 		if (host->data->flags & MMC_DATA_READ)
283 			sdhci_read_block_pio(host);
284 		else
285 			sdhci_write_block_pio(host);
286 
287 		host->blocks--;
288 		if (host->blocks == 0)
289 			break;
290 	}
291 
292 	DBG("PIO transfer complete.\n");
293 }
294 
295 static char *sdhci_kmap_atomic(struct scatterlist *sg, unsigned long *flags)
296 {
297 	local_irq_save(*flags);
298 	return kmap_atomic(sg_page(sg), KM_BIO_SRC_IRQ) + sg->offset;
299 }
300 
301 static void sdhci_kunmap_atomic(void *buffer, unsigned long *flags)
302 {
303 	kunmap_atomic(buffer, KM_BIO_SRC_IRQ);
304 	local_irq_restore(*flags);
305 }
306 
307 static int sdhci_adma_table_pre(struct sdhci_host *host,
308 	struct mmc_data *data)
309 {
310 	int direction;
311 
312 	u8 *desc;
313 	u8 *align;
314 	dma_addr_t addr;
315 	dma_addr_t align_addr;
316 	int len, offset;
317 
318 	struct scatterlist *sg;
319 	int i;
320 	char *buffer;
321 	unsigned long flags;
322 
323 	/*
324 	 * The spec does not specify endianness of descriptor table.
325 	 * We currently guess that it is LE.
326 	 */
327 
328 	if (data->flags & MMC_DATA_READ)
329 		direction = DMA_FROM_DEVICE;
330 	else
331 		direction = DMA_TO_DEVICE;
332 
333 	/*
334 	 * The ADMA descriptor table is mapped further down as we
335 	 * need to fill it with data first.
336 	 */
337 
338 	host->align_addr = dma_map_single(mmc_dev(host->mmc),
339 		host->align_buffer, 128 * 4, direction);
340 	if (dma_mapping_error(mmc_dev(host->mmc), host->align_addr))
341 		goto fail;
342 	BUG_ON(host->align_addr & 0x3);
343 
344 	host->sg_count = dma_map_sg(mmc_dev(host->mmc),
345 		data->sg, data->sg_len, direction);
346 	if (host->sg_count == 0)
347 		goto unmap_align;
348 
349 	desc = host->adma_desc;
350 	align = host->align_buffer;
351 
352 	align_addr = host->align_addr;
353 
354 	for_each_sg(data->sg, sg, host->sg_count, i) {
355 		addr = sg_dma_address(sg);
356 		len = sg_dma_len(sg);
357 
358 		/*
359 		 * The SDHCI specification states that ADMA
360 		 * addresses must be 32-bit aligned. If they
361 		 * aren't, then we use a bounce buffer for
362 		 * the (up to three) bytes that screw up the
363 		 * alignment.
364 		 */
365 		offset = (4 - (addr & 0x3)) & 0x3;
366 		if (offset) {
367 			if (data->flags & MMC_DATA_WRITE) {
368 				buffer = sdhci_kmap_atomic(sg, &flags);
369 				WARN_ON(((long)buffer & PAGE_MASK) > (PAGE_SIZE - 3));
370 				memcpy(align, buffer, offset);
371 				sdhci_kunmap_atomic(buffer, &flags);
372 			}
373 
374 			desc[7] = (align_addr >> 24) & 0xff;
375 			desc[6] = (align_addr >> 16) & 0xff;
376 			desc[5] = (align_addr >> 8) & 0xff;
377 			desc[4] = (align_addr >> 0) & 0xff;
378 
379 			BUG_ON(offset > 65536);
380 
381 			desc[3] = (offset >> 8) & 0xff;
382 			desc[2] = (offset >> 0) & 0xff;
383 
384 			desc[1] = 0x00;
385 			desc[0] = 0x21; /* tran, valid */
386 
387 			align += 4;
388 			align_addr += 4;
389 
390 			desc += 8;
391 
392 			addr += offset;
393 			len -= offset;
394 		}
395 
396 		desc[7] = (addr >> 24) & 0xff;
397 		desc[6] = (addr >> 16) & 0xff;
398 		desc[5] = (addr >> 8) & 0xff;
399 		desc[4] = (addr >> 0) & 0xff;
400 
401 		BUG_ON(len > 65536);
402 
403 		desc[3] = (len >> 8) & 0xff;
404 		desc[2] = (len >> 0) & 0xff;
405 
406 		desc[1] = 0x00;
407 		desc[0] = 0x21; /* tran, valid */
408 
409 		desc += 8;
410 
411 		/*
412 		 * If this triggers then we have a calculation bug
413 		 * somewhere. :/
414 		 */
415 		WARN_ON((desc - host->adma_desc) > (128 * 2 + 1) * 4);
416 	}
417 
418 	/*
419 	 * Add a terminating entry.
420 	 */
421 	desc[7] = 0;
422 	desc[6] = 0;
423 	desc[5] = 0;
424 	desc[4] = 0;
425 
426 	desc[3] = 0;
427 	desc[2] = 0;
428 
429 	desc[1] = 0x00;
430 	desc[0] = 0x03; /* nop, end, valid */
431 
432 	/*
433 	 * Resync align buffer as we might have changed it.
434 	 */
435 	if (data->flags & MMC_DATA_WRITE) {
436 		dma_sync_single_for_device(mmc_dev(host->mmc),
437 			host->align_addr, 128 * 4, direction);
438 	}
439 
440 	host->adma_addr = dma_map_single(mmc_dev(host->mmc),
441 		host->adma_desc, (128 * 2 + 1) * 4, DMA_TO_DEVICE);
442 	if (dma_mapping_error(mmc_dev(host->mmc), host->align_addr))
443 		goto unmap_entries;
444 	BUG_ON(host->adma_addr & 0x3);
445 
446 	return 0;
447 
448 unmap_entries:
449 	dma_unmap_sg(mmc_dev(host->mmc), data->sg,
450 		data->sg_len, direction);
451 unmap_align:
452 	dma_unmap_single(mmc_dev(host->mmc), host->align_addr,
453 		128 * 4, direction);
454 fail:
455 	return -EINVAL;
456 }
457 
458 static void sdhci_adma_table_post(struct sdhci_host *host,
459 	struct mmc_data *data)
460 {
461 	int direction;
462 
463 	struct scatterlist *sg;
464 	int i, size;
465 	u8 *align;
466 	char *buffer;
467 	unsigned long flags;
468 
469 	if (data->flags & MMC_DATA_READ)
470 		direction = DMA_FROM_DEVICE;
471 	else
472 		direction = DMA_TO_DEVICE;
473 
474 	dma_unmap_single(mmc_dev(host->mmc), host->adma_addr,
475 		(128 * 2 + 1) * 4, DMA_TO_DEVICE);
476 
477 	dma_unmap_single(mmc_dev(host->mmc), host->align_addr,
478 		128 * 4, direction);
479 
480 	if (data->flags & MMC_DATA_READ) {
481 		dma_sync_sg_for_cpu(mmc_dev(host->mmc), data->sg,
482 			data->sg_len, direction);
483 
484 		align = host->align_buffer;
485 
486 		for_each_sg(data->sg, sg, host->sg_count, i) {
487 			if (sg_dma_address(sg) & 0x3) {
488 				size = 4 - (sg_dma_address(sg) & 0x3);
489 
490 				buffer = sdhci_kmap_atomic(sg, &flags);
491 				WARN_ON(((long)buffer & PAGE_MASK) > (PAGE_SIZE - 3));
492 				memcpy(buffer, align, size);
493 				sdhci_kunmap_atomic(buffer, &flags);
494 
495 				align += 4;
496 			}
497 		}
498 	}
499 
500 	dma_unmap_sg(mmc_dev(host->mmc), data->sg,
501 		data->sg_len, direction);
502 }
503 
504 static u8 sdhci_calc_timeout(struct sdhci_host *host, struct mmc_data *data)
505 {
506 	u8 count;
507 	unsigned target_timeout, current_timeout;
508 
509 	/*
510 	 * If the host controller provides us with an incorrect timeout
511 	 * value, just skip the check and use 0xE.  The hardware may take
512 	 * longer to time out, but that's much better than having a too-short
513 	 * timeout value.
514 	 */
515 	if ((host->quirks & SDHCI_QUIRK_BROKEN_TIMEOUT_VAL))
516 		return 0xE;
517 
518 	/* timeout in us */
519 	target_timeout = data->timeout_ns / 1000 +
520 		data->timeout_clks / host->clock;
521 
522 	/*
523 	 * Figure out needed cycles.
524 	 * We do this in steps in order to fit inside a 32 bit int.
525 	 * The first step is the minimum timeout, which will have a
526 	 * minimum resolution of 6 bits:
527 	 * (1) 2^13*1000 > 2^22,
528 	 * (2) host->timeout_clk < 2^16
529 	 *     =>
530 	 *     (1) / (2) > 2^6
531 	 */
532 	count = 0;
533 	current_timeout = (1 << 13) * 1000 / host->timeout_clk;
534 	while (current_timeout < target_timeout) {
535 		count++;
536 		current_timeout <<= 1;
537 		if (count >= 0xF)
538 			break;
539 	}
540 
541 	if (count >= 0xF) {
542 		printk(KERN_WARNING "%s: Too large timeout requested!\n",
543 			mmc_hostname(host->mmc));
544 		count = 0xE;
545 	}
546 
547 	return count;
548 }
549 
550 static void sdhci_prepare_data(struct sdhci_host *host, struct mmc_data *data)
551 {
552 	u8 count;
553 	u8 ctrl;
554 	int ret;
555 
556 	WARN_ON(host->data);
557 
558 	if (data == NULL)
559 		return;
560 
561 	/* Sanity checks */
562 	BUG_ON(data->blksz * data->blocks > 524288);
563 	BUG_ON(data->blksz > host->mmc->max_blk_size);
564 	BUG_ON(data->blocks > 65535);
565 
566 	host->data = data;
567 	host->data_early = 0;
568 
569 	count = sdhci_calc_timeout(host, data);
570 	writeb(count, host->ioaddr + SDHCI_TIMEOUT_CONTROL);
571 
572 	if (host->flags & SDHCI_USE_DMA)
573 		host->flags |= SDHCI_REQ_USE_DMA;
574 
575 	/*
576 	 * FIXME: This doesn't account for merging when mapping the
577 	 * scatterlist.
578 	 */
579 	if (host->flags & SDHCI_REQ_USE_DMA) {
580 		int broken, i;
581 		struct scatterlist *sg;
582 
583 		broken = 0;
584 		if (host->flags & SDHCI_USE_ADMA) {
585 			if (host->quirks & SDHCI_QUIRK_32BIT_ADMA_SIZE)
586 				broken = 1;
587 		} else {
588 			if (host->quirks & SDHCI_QUIRK_32BIT_DMA_SIZE)
589 				broken = 1;
590 		}
591 
592 		if (unlikely(broken)) {
593 			for_each_sg(data->sg, sg, data->sg_len, i) {
594 				if (sg->length & 0x3) {
595 					DBG("Reverting to PIO because of "
596 						"transfer size (%d)\n",
597 						sg->length);
598 					host->flags &= ~SDHCI_REQ_USE_DMA;
599 					break;
600 				}
601 			}
602 		}
603 	}
604 
605 	/*
606 	 * The assumption here being that alignment is the same after
607 	 * translation to device address space.
608 	 */
609 	if (host->flags & SDHCI_REQ_USE_DMA) {
610 		int broken, i;
611 		struct scatterlist *sg;
612 
613 		broken = 0;
614 		if (host->flags & SDHCI_USE_ADMA) {
615 			/*
616 			 * As we use 3 byte chunks to work around
617 			 * alignment problems, we need to check this
618 			 * quirk.
619 			 */
620 			if (host->quirks & SDHCI_QUIRK_32BIT_ADMA_SIZE)
621 				broken = 1;
622 		} else {
623 			if (host->quirks & SDHCI_QUIRK_32BIT_DMA_ADDR)
624 				broken = 1;
625 		}
626 
627 		if (unlikely(broken)) {
628 			for_each_sg(data->sg, sg, data->sg_len, i) {
629 				if (sg->offset & 0x3) {
630 					DBG("Reverting to PIO because of "
631 						"bad alignment\n");
632 					host->flags &= ~SDHCI_REQ_USE_DMA;
633 					break;
634 				}
635 			}
636 		}
637 	}
638 
639 	if (host->flags & SDHCI_REQ_USE_DMA) {
640 		if (host->flags & SDHCI_USE_ADMA) {
641 			ret = sdhci_adma_table_pre(host, data);
642 			if (ret) {
643 				/*
644 				 * This only happens when someone fed
645 				 * us an invalid request.
646 				 */
647 				WARN_ON(1);
648 				host->flags &= ~SDHCI_USE_DMA;
649 			} else {
650 				writel(host->adma_addr,
651 					host->ioaddr + SDHCI_ADMA_ADDRESS);
652 			}
653 		} else {
654 			int sg_cnt;
655 
656 			sg_cnt = dma_map_sg(mmc_dev(host->mmc),
657 					data->sg, data->sg_len,
658 					(data->flags & MMC_DATA_READ) ?
659 						DMA_FROM_DEVICE :
660 						DMA_TO_DEVICE);
661 			if (sg_cnt == 0) {
662 				/*
663 				 * This only happens when someone fed
664 				 * us an invalid request.
665 				 */
666 				WARN_ON(1);
667 				host->flags &= ~SDHCI_USE_DMA;
668 			} else {
669 				WARN_ON(sg_cnt != 1);
670 				writel(sg_dma_address(data->sg),
671 					host->ioaddr + SDHCI_DMA_ADDRESS);
672 			}
673 		}
674 	}
675 
676 	/*
677 	 * Always adjust the DMA selection as some controllers
678 	 * (e.g. JMicron) can't do PIO properly when the selection
679 	 * is ADMA.
680 	 */
681 	if (host->version >= SDHCI_SPEC_200) {
682 		ctrl = readb(host->ioaddr + SDHCI_HOST_CONTROL);
683 		ctrl &= ~SDHCI_CTRL_DMA_MASK;
684 		if ((host->flags & SDHCI_REQ_USE_DMA) &&
685 			(host->flags & SDHCI_USE_ADMA))
686 			ctrl |= SDHCI_CTRL_ADMA32;
687 		else
688 			ctrl |= SDHCI_CTRL_SDMA;
689 		writeb(ctrl, host->ioaddr + SDHCI_HOST_CONTROL);
690 	}
691 
692 	if (!(host->flags & SDHCI_REQ_USE_DMA)) {
693 		sg_miter_start(&host->sg_miter,
694 			data->sg, data->sg_len, SG_MITER_ATOMIC);
695 		host->blocks = data->blocks;
696 	}
697 
698 	/* We do not handle DMA boundaries, so set it to max (512 KiB) */
699 	writew(SDHCI_MAKE_BLKSZ(7, data->blksz),
700 		host->ioaddr + SDHCI_BLOCK_SIZE);
701 	writew(data->blocks, host->ioaddr + SDHCI_BLOCK_COUNT);
702 }
703 
704 static void sdhci_set_transfer_mode(struct sdhci_host *host,
705 	struct mmc_data *data)
706 {
707 	u16 mode;
708 
709 	if (data == NULL)
710 		return;
711 
712 	WARN_ON(!host->data);
713 
714 	mode = SDHCI_TRNS_BLK_CNT_EN;
715 	if (data->blocks > 1)
716 		mode |= SDHCI_TRNS_MULTI;
717 	if (data->flags & MMC_DATA_READ)
718 		mode |= SDHCI_TRNS_READ;
719 	if (host->flags & SDHCI_REQ_USE_DMA)
720 		mode |= SDHCI_TRNS_DMA;
721 
722 	writew(mode, host->ioaddr + SDHCI_TRANSFER_MODE);
723 }
724 
725 static void sdhci_finish_data(struct sdhci_host *host)
726 {
727 	struct mmc_data *data;
728 
729 	BUG_ON(!host->data);
730 
731 	data = host->data;
732 	host->data = NULL;
733 
734 	if (host->flags & SDHCI_REQ_USE_DMA) {
735 		if (host->flags & SDHCI_USE_ADMA)
736 			sdhci_adma_table_post(host, data);
737 		else {
738 			dma_unmap_sg(mmc_dev(host->mmc), data->sg,
739 				data->sg_len, (data->flags & MMC_DATA_READ) ?
740 					DMA_FROM_DEVICE : DMA_TO_DEVICE);
741 		}
742 	}
743 
744 	/*
745 	 * The specification states that the block count register must
746 	 * be updated, but it does not specify at what point in the
747 	 * data flow. That makes the register entirely useless to read
748 	 * back so we have to assume that nothing made it to the card
749 	 * in the event of an error.
750 	 */
751 	if (data->error)
752 		data->bytes_xfered = 0;
753 	else
754 		data->bytes_xfered = data->blksz * data->blocks;
755 
756 	if (data->stop) {
757 		/*
758 		 * The controller needs a reset of internal state machines
759 		 * upon error conditions.
760 		 */
761 		if (data->error) {
762 			sdhci_reset(host, SDHCI_RESET_CMD);
763 			sdhci_reset(host, SDHCI_RESET_DATA);
764 		}
765 
766 		sdhci_send_command(host, data->stop);
767 	} else
768 		tasklet_schedule(&host->finish_tasklet);
769 }
770 
771 static void sdhci_send_command(struct sdhci_host *host, struct mmc_command *cmd)
772 {
773 	int flags;
774 	u32 mask;
775 	unsigned long timeout;
776 
777 	WARN_ON(host->cmd);
778 
779 	/* Wait max 10 ms */
780 	timeout = 10;
781 
782 	mask = SDHCI_CMD_INHIBIT;
783 	if ((cmd->data != NULL) || (cmd->flags & MMC_RSP_BUSY))
784 		mask |= SDHCI_DATA_INHIBIT;
785 
786 	/* We shouldn't wait for data inihibit for stop commands, even
787 	   though they might use busy signaling */
788 	if (host->mrq->data && (cmd == host->mrq->data->stop))
789 		mask &= ~SDHCI_DATA_INHIBIT;
790 
791 	while (readl(host->ioaddr + SDHCI_PRESENT_STATE) & mask) {
792 		if (timeout == 0) {
793 			printk(KERN_ERR "%s: Controller never released "
794 				"inhibit bit(s).\n", mmc_hostname(host->mmc));
795 			sdhci_dumpregs(host);
796 			cmd->error = -EIO;
797 			tasklet_schedule(&host->finish_tasklet);
798 			return;
799 		}
800 		timeout--;
801 		mdelay(1);
802 	}
803 
804 	mod_timer(&host->timer, jiffies + 10 * HZ);
805 
806 	host->cmd = cmd;
807 
808 	sdhci_prepare_data(host, cmd->data);
809 
810 	writel(cmd->arg, host->ioaddr + SDHCI_ARGUMENT);
811 
812 	sdhci_set_transfer_mode(host, cmd->data);
813 
814 	if ((cmd->flags & MMC_RSP_136) && (cmd->flags & MMC_RSP_BUSY)) {
815 		printk(KERN_ERR "%s: Unsupported response type!\n",
816 			mmc_hostname(host->mmc));
817 		cmd->error = -EINVAL;
818 		tasklet_schedule(&host->finish_tasklet);
819 		return;
820 	}
821 
822 	if (!(cmd->flags & MMC_RSP_PRESENT))
823 		flags = SDHCI_CMD_RESP_NONE;
824 	else if (cmd->flags & MMC_RSP_136)
825 		flags = SDHCI_CMD_RESP_LONG;
826 	else if (cmd->flags & MMC_RSP_BUSY)
827 		flags = SDHCI_CMD_RESP_SHORT_BUSY;
828 	else
829 		flags = SDHCI_CMD_RESP_SHORT;
830 
831 	if (cmd->flags & MMC_RSP_CRC)
832 		flags |= SDHCI_CMD_CRC;
833 	if (cmd->flags & MMC_RSP_OPCODE)
834 		flags |= SDHCI_CMD_INDEX;
835 	if (cmd->data)
836 		flags |= SDHCI_CMD_DATA;
837 
838 	writew(SDHCI_MAKE_CMD(cmd->opcode, flags),
839 		host->ioaddr + SDHCI_COMMAND);
840 }
841 
842 static void sdhci_finish_command(struct sdhci_host *host)
843 {
844 	int i;
845 
846 	BUG_ON(host->cmd == NULL);
847 
848 	if (host->cmd->flags & MMC_RSP_PRESENT) {
849 		if (host->cmd->flags & MMC_RSP_136) {
850 			/* CRC is stripped so we need to do some shifting. */
851 			for (i = 0;i < 4;i++) {
852 				host->cmd->resp[i] = readl(host->ioaddr +
853 					SDHCI_RESPONSE + (3-i)*4) << 8;
854 				if (i != 3)
855 					host->cmd->resp[i] |=
856 						readb(host->ioaddr +
857 						SDHCI_RESPONSE + (3-i)*4-1);
858 			}
859 		} else {
860 			host->cmd->resp[0] = readl(host->ioaddr + SDHCI_RESPONSE);
861 		}
862 	}
863 
864 	host->cmd->error = 0;
865 
866 	if (host->data && host->data_early)
867 		sdhci_finish_data(host);
868 
869 	if (!host->cmd->data)
870 		tasklet_schedule(&host->finish_tasklet);
871 
872 	host->cmd = NULL;
873 }
874 
875 static void sdhci_set_clock(struct sdhci_host *host, unsigned int clock)
876 {
877 	int div;
878 	u16 clk;
879 	unsigned long timeout;
880 
881 	if (clock == host->clock)
882 		return;
883 
884 	writew(0, host->ioaddr + SDHCI_CLOCK_CONTROL);
885 
886 	if (clock == 0)
887 		goto out;
888 
889 	for (div = 1;div < 256;div *= 2) {
890 		if ((host->max_clk / div) <= clock)
891 			break;
892 	}
893 	div >>= 1;
894 
895 	clk = div << SDHCI_DIVIDER_SHIFT;
896 	clk |= SDHCI_CLOCK_INT_EN;
897 	writew(clk, host->ioaddr + SDHCI_CLOCK_CONTROL);
898 
899 	/* Wait max 10 ms */
900 	timeout = 10;
901 	while (!((clk = readw(host->ioaddr + SDHCI_CLOCK_CONTROL))
902 		& SDHCI_CLOCK_INT_STABLE)) {
903 		if (timeout == 0) {
904 			printk(KERN_ERR "%s: Internal clock never "
905 				"stabilised.\n", mmc_hostname(host->mmc));
906 			sdhci_dumpregs(host);
907 			return;
908 		}
909 		timeout--;
910 		mdelay(1);
911 	}
912 
913 	clk |= SDHCI_CLOCK_CARD_EN;
914 	writew(clk, host->ioaddr + SDHCI_CLOCK_CONTROL);
915 
916 out:
917 	host->clock = clock;
918 }
919 
920 static void sdhci_set_power(struct sdhci_host *host, unsigned short power)
921 {
922 	u8 pwr;
923 
924 	if (host->power == power)
925 		return;
926 
927 	if (power == (unsigned short)-1) {
928 		writeb(0, host->ioaddr + SDHCI_POWER_CONTROL);
929 		goto out;
930 	}
931 
932 	/*
933 	 * Spec says that we should clear the power reg before setting
934 	 * a new value. Some controllers don't seem to like this though.
935 	 */
936 	if (!(host->quirks & SDHCI_QUIRK_SINGLE_POWER_WRITE))
937 		writeb(0, host->ioaddr + SDHCI_POWER_CONTROL);
938 
939 	pwr = SDHCI_POWER_ON;
940 
941 	switch (1 << power) {
942 	case MMC_VDD_165_195:
943 		pwr |= SDHCI_POWER_180;
944 		break;
945 	case MMC_VDD_29_30:
946 	case MMC_VDD_30_31:
947 		pwr |= SDHCI_POWER_300;
948 		break;
949 	case MMC_VDD_32_33:
950 	case MMC_VDD_33_34:
951 		pwr |= SDHCI_POWER_330;
952 		break;
953 	default:
954 		BUG();
955 	}
956 
957 	/*
958 	 * At least the Marvell CaFe chip gets confused if we set the voltage
959 	 * and set turn on power at the same time, so set the voltage first.
960 	 */
961 	if ((host->quirks & SDHCI_QUIRK_NO_SIMULT_VDD_AND_POWER))
962 		writeb(pwr & ~SDHCI_POWER_ON,
963 				host->ioaddr + SDHCI_POWER_CONTROL);
964 
965 	writeb(pwr, host->ioaddr + SDHCI_POWER_CONTROL);
966 
967 out:
968 	host->power = power;
969 }
970 
971 /*****************************************************************************\
972  *                                                                           *
973  * MMC callbacks                                                             *
974  *                                                                           *
975 \*****************************************************************************/
976 
977 static void sdhci_request(struct mmc_host *mmc, struct mmc_request *mrq)
978 {
979 	struct sdhci_host *host;
980 	unsigned long flags;
981 
982 	host = mmc_priv(mmc);
983 
984 	spin_lock_irqsave(&host->lock, flags);
985 
986 	WARN_ON(host->mrq != NULL);
987 
988 #ifndef CONFIG_LEDS_CLASS
989 	sdhci_activate_led(host);
990 #endif
991 
992 	host->mrq = mrq;
993 
994 	if (!(readl(host->ioaddr + SDHCI_PRESENT_STATE) & SDHCI_CARD_PRESENT)
995 		|| (host->flags & SDHCI_DEVICE_DEAD)) {
996 		host->mrq->cmd->error = -ENOMEDIUM;
997 		tasklet_schedule(&host->finish_tasklet);
998 	} else
999 		sdhci_send_command(host, mrq->cmd);
1000 
1001 	mmiowb();
1002 	spin_unlock_irqrestore(&host->lock, flags);
1003 }
1004 
1005 static void sdhci_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
1006 {
1007 	struct sdhci_host *host;
1008 	unsigned long flags;
1009 	u8 ctrl;
1010 
1011 	host = mmc_priv(mmc);
1012 
1013 	spin_lock_irqsave(&host->lock, flags);
1014 
1015 	if (host->flags & SDHCI_DEVICE_DEAD)
1016 		goto out;
1017 
1018 	/*
1019 	 * Reset the chip on each power off.
1020 	 * Should clear out any weird states.
1021 	 */
1022 	if (ios->power_mode == MMC_POWER_OFF) {
1023 		writel(0, host->ioaddr + SDHCI_SIGNAL_ENABLE);
1024 		sdhci_init(host);
1025 	}
1026 
1027 	sdhci_set_clock(host, ios->clock);
1028 
1029 	if (ios->power_mode == MMC_POWER_OFF)
1030 		sdhci_set_power(host, -1);
1031 	else
1032 		sdhci_set_power(host, ios->vdd);
1033 
1034 	ctrl = readb(host->ioaddr + SDHCI_HOST_CONTROL);
1035 
1036 	if (ios->bus_width == MMC_BUS_WIDTH_4)
1037 		ctrl |= SDHCI_CTRL_4BITBUS;
1038 	else
1039 		ctrl &= ~SDHCI_CTRL_4BITBUS;
1040 
1041 	if (ios->timing == MMC_TIMING_SD_HS)
1042 		ctrl |= SDHCI_CTRL_HISPD;
1043 	else
1044 		ctrl &= ~SDHCI_CTRL_HISPD;
1045 
1046 	writeb(ctrl, host->ioaddr + SDHCI_HOST_CONTROL);
1047 
1048 	/*
1049 	 * Some (ENE) controllers go apeshit on some ios operation,
1050 	 * signalling timeout and CRC errors even on CMD0. Resetting
1051 	 * it on each ios seems to solve the problem.
1052 	 */
1053 	if(host->quirks & SDHCI_QUIRK_RESET_CMD_DATA_ON_IOS)
1054 		sdhci_reset(host, SDHCI_RESET_CMD | SDHCI_RESET_DATA);
1055 
1056 out:
1057 	mmiowb();
1058 	spin_unlock_irqrestore(&host->lock, flags);
1059 }
1060 
1061 static int sdhci_get_ro(struct mmc_host *mmc)
1062 {
1063 	struct sdhci_host *host;
1064 	unsigned long flags;
1065 	int present;
1066 
1067 	host = mmc_priv(mmc);
1068 
1069 	spin_lock_irqsave(&host->lock, flags);
1070 
1071 	if (host->flags & SDHCI_DEVICE_DEAD)
1072 		present = 0;
1073 	else
1074 		present = readl(host->ioaddr + SDHCI_PRESENT_STATE);
1075 
1076 	spin_unlock_irqrestore(&host->lock, flags);
1077 
1078 	return !(present & SDHCI_WRITE_PROTECT);
1079 }
1080 
1081 static void sdhci_enable_sdio_irq(struct mmc_host *mmc, int enable)
1082 {
1083 	struct sdhci_host *host;
1084 	unsigned long flags;
1085 	u32 ier;
1086 
1087 	host = mmc_priv(mmc);
1088 
1089 	spin_lock_irqsave(&host->lock, flags);
1090 
1091 	if (host->flags & SDHCI_DEVICE_DEAD)
1092 		goto out;
1093 
1094 	ier = readl(host->ioaddr + SDHCI_INT_ENABLE);
1095 
1096 	ier &= ~SDHCI_INT_CARD_INT;
1097 	if (enable)
1098 		ier |= SDHCI_INT_CARD_INT;
1099 
1100 	writel(ier, host->ioaddr + SDHCI_INT_ENABLE);
1101 	writel(ier, host->ioaddr + SDHCI_SIGNAL_ENABLE);
1102 
1103 out:
1104 	mmiowb();
1105 
1106 	spin_unlock_irqrestore(&host->lock, flags);
1107 }
1108 
1109 static const struct mmc_host_ops sdhci_ops = {
1110 	.request	= sdhci_request,
1111 	.set_ios	= sdhci_set_ios,
1112 	.get_ro		= sdhci_get_ro,
1113 	.enable_sdio_irq = sdhci_enable_sdio_irq,
1114 };
1115 
1116 /*****************************************************************************\
1117  *                                                                           *
1118  * Tasklets                                                                  *
1119  *                                                                           *
1120 \*****************************************************************************/
1121 
1122 static void sdhci_tasklet_card(unsigned long param)
1123 {
1124 	struct sdhci_host *host;
1125 	unsigned long flags;
1126 
1127 	host = (struct sdhci_host*)param;
1128 
1129 	spin_lock_irqsave(&host->lock, flags);
1130 
1131 	if (!(readl(host->ioaddr + SDHCI_PRESENT_STATE) & SDHCI_CARD_PRESENT)) {
1132 		if (host->mrq) {
1133 			printk(KERN_ERR "%s: Card removed during transfer!\n",
1134 				mmc_hostname(host->mmc));
1135 			printk(KERN_ERR "%s: Resetting controller.\n",
1136 				mmc_hostname(host->mmc));
1137 
1138 			sdhci_reset(host, SDHCI_RESET_CMD);
1139 			sdhci_reset(host, SDHCI_RESET_DATA);
1140 
1141 			host->mrq->cmd->error = -ENOMEDIUM;
1142 			tasklet_schedule(&host->finish_tasklet);
1143 		}
1144 	}
1145 
1146 	spin_unlock_irqrestore(&host->lock, flags);
1147 
1148 	mmc_detect_change(host->mmc, msecs_to_jiffies(500));
1149 }
1150 
1151 static void sdhci_tasklet_finish(unsigned long param)
1152 {
1153 	struct sdhci_host *host;
1154 	unsigned long flags;
1155 	struct mmc_request *mrq;
1156 
1157 	host = (struct sdhci_host*)param;
1158 
1159 	spin_lock_irqsave(&host->lock, flags);
1160 
1161 	del_timer(&host->timer);
1162 
1163 	mrq = host->mrq;
1164 
1165 	/*
1166 	 * The controller needs a reset of internal state machines
1167 	 * upon error conditions.
1168 	 */
1169 	if (!(host->flags & SDHCI_DEVICE_DEAD) &&
1170 		(mrq->cmd->error ||
1171 		 (mrq->data && (mrq->data->error ||
1172 		  (mrq->data->stop && mrq->data->stop->error))) ||
1173 		   (host->quirks & SDHCI_QUIRK_RESET_AFTER_REQUEST))) {
1174 
1175 		/* Some controllers need this kick or reset won't work here */
1176 		if (host->quirks & SDHCI_QUIRK_CLOCK_BEFORE_RESET) {
1177 			unsigned int clock;
1178 
1179 			/* This is to force an update */
1180 			clock = host->clock;
1181 			host->clock = 0;
1182 			sdhci_set_clock(host, clock);
1183 		}
1184 
1185 		/* Spec says we should do both at the same time, but Ricoh
1186 		   controllers do not like that. */
1187 		sdhci_reset(host, SDHCI_RESET_CMD);
1188 		sdhci_reset(host, SDHCI_RESET_DATA);
1189 	}
1190 
1191 	host->mrq = NULL;
1192 	host->cmd = NULL;
1193 	host->data = NULL;
1194 
1195 #ifndef CONFIG_LEDS_CLASS
1196 	sdhci_deactivate_led(host);
1197 #endif
1198 
1199 	mmiowb();
1200 	spin_unlock_irqrestore(&host->lock, flags);
1201 
1202 	mmc_request_done(host->mmc, mrq);
1203 }
1204 
1205 static void sdhci_timeout_timer(unsigned long data)
1206 {
1207 	struct sdhci_host *host;
1208 	unsigned long flags;
1209 
1210 	host = (struct sdhci_host*)data;
1211 
1212 	spin_lock_irqsave(&host->lock, flags);
1213 
1214 	if (host->mrq) {
1215 		printk(KERN_ERR "%s: Timeout waiting for hardware "
1216 			"interrupt.\n", mmc_hostname(host->mmc));
1217 		sdhci_dumpregs(host);
1218 
1219 		if (host->data) {
1220 			host->data->error = -ETIMEDOUT;
1221 			sdhci_finish_data(host);
1222 		} else {
1223 			if (host->cmd)
1224 				host->cmd->error = -ETIMEDOUT;
1225 			else
1226 				host->mrq->cmd->error = -ETIMEDOUT;
1227 
1228 			tasklet_schedule(&host->finish_tasklet);
1229 		}
1230 	}
1231 
1232 	mmiowb();
1233 	spin_unlock_irqrestore(&host->lock, flags);
1234 }
1235 
1236 /*****************************************************************************\
1237  *                                                                           *
1238  * Interrupt handling                                                        *
1239  *                                                                           *
1240 \*****************************************************************************/
1241 
1242 static void sdhci_cmd_irq(struct sdhci_host *host, u32 intmask)
1243 {
1244 	BUG_ON(intmask == 0);
1245 
1246 	if (!host->cmd) {
1247 		printk(KERN_ERR "%s: Got command interrupt 0x%08x even "
1248 			"though no command operation was in progress.\n",
1249 			mmc_hostname(host->mmc), (unsigned)intmask);
1250 		sdhci_dumpregs(host);
1251 		return;
1252 	}
1253 
1254 	if (intmask & SDHCI_INT_TIMEOUT)
1255 		host->cmd->error = -ETIMEDOUT;
1256 	else if (intmask & (SDHCI_INT_CRC | SDHCI_INT_END_BIT |
1257 			SDHCI_INT_INDEX))
1258 		host->cmd->error = -EILSEQ;
1259 
1260 	if (host->cmd->error)
1261 		tasklet_schedule(&host->finish_tasklet);
1262 	else if (intmask & SDHCI_INT_RESPONSE)
1263 		sdhci_finish_command(host);
1264 }
1265 
1266 static void sdhci_data_irq(struct sdhci_host *host, u32 intmask)
1267 {
1268 	BUG_ON(intmask == 0);
1269 
1270 	if (!host->data) {
1271 		/*
1272 		 * A data end interrupt is sent together with the response
1273 		 * for the stop command.
1274 		 */
1275 		if (intmask & SDHCI_INT_DATA_END)
1276 			return;
1277 
1278 		printk(KERN_ERR "%s: Got data interrupt 0x%08x even "
1279 			"though no data operation was in progress.\n",
1280 			mmc_hostname(host->mmc), (unsigned)intmask);
1281 		sdhci_dumpregs(host);
1282 
1283 		return;
1284 	}
1285 
1286 	if (intmask & SDHCI_INT_DATA_TIMEOUT)
1287 		host->data->error = -ETIMEDOUT;
1288 	else if (intmask & (SDHCI_INT_DATA_CRC | SDHCI_INT_DATA_END_BIT))
1289 		host->data->error = -EILSEQ;
1290 	else if (intmask & SDHCI_INT_ADMA_ERROR)
1291 		host->data->error = -EIO;
1292 
1293 	if (host->data->error)
1294 		sdhci_finish_data(host);
1295 	else {
1296 		if (intmask & (SDHCI_INT_DATA_AVAIL | SDHCI_INT_SPACE_AVAIL))
1297 			sdhci_transfer_pio(host);
1298 
1299 		/*
1300 		 * We currently don't do anything fancy with DMA
1301 		 * boundaries, but as we can't disable the feature
1302 		 * we need to at least restart the transfer.
1303 		 */
1304 		if (intmask & SDHCI_INT_DMA_END)
1305 			writel(readl(host->ioaddr + SDHCI_DMA_ADDRESS),
1306 				host->ioaddr + SDHCI_DMA_ADDRESS);
1307 
1308 		if (intmask & SDHCI_INT_DATA_END) {
1309 			if (host->cmd) {
1310 				/*
1311 				 * Data managed to finish before the
1312 				 * command completed. Make sure we do
1313 				 * things in the proper order.
1314 				 */
1315 				host->data_early = 1;
1316 			} else {
1317 				sdhci_finish_data(host);
1318 			}
1319 		}
1320 	}
1321 }
1322 
1323 static irqreturn_t sdhci_irq(int irq, void *dev_id)
1324 {
1325 	irqreturn_t result;
1326 	struct sdhci_host* host = dev_id;
1327 	u32 intmask;
1328 	int cardint = 0;
1329 
1330 	spin_lock(&host->lock);
1331 
1332 	intmask = readl(host->ioaddr + SDHCI_INT_STATUS);
1333 
1334 	if (!intmask || intmask == 0xffffffff) {
1335 		result = IRQ_NONE;
1336 		goto out;
1337 	}
1338 
1339 	DBG("*** %s got interrupt: 0x%08x\n",
1340 		mmc_hostname(host->mmc), intmask);
1341 
1342 	if (intmask & (SDHCI_INT_CARD_INSERT | SDHCI_INT_CARD_REMOVE)) {
1343 		writel(intmask & (SDHCI_INT_CARD_INSERT | SDHCI_INT_CARD_REMOVE),
1344 			host->ioaddr + SDHCI_INT_STATUS);
1345 		tasklet_schedule(&host->card_tasklet);
1346 	}
1347 
1348 	intmask &= ~(SDHCI_INT_CARD_INSERT | SDHCI_INT_CARD_REMOVE);
1349 
1350 	if (intmask & SDHCI_INT_CMD_MASK) {
1351 		writel(intmask & SDHCI_INT_CMD_MASK,
1352 			host->ioaddr + SDHCI_INT_STATUS);
1353 		sdhci_cmd_irq(host, intmask & SDHCI_INT_CMD_MASK);
1354 	}
1355 
1356 	if (intmask & SDHCI_INT_DATA_MASK) {
1357 		writel(intmask & SDHCI_INT_DATA_MASK,
1358 			host->ioaddr + SDHCI_INT_STATUS);
1359 		sdhci_data_irq(host, intmask & SDHCI_INT_DATA_MASK);
1360 	}
1361 
1362 	intmask &= ~(SDHCI_INT_CMD_MASK | SDHCI_INT_DATA_MASK);
1363 
1364 	intmask &= ~SDHCI_INT_ERROR;
1365 
1366 	if (intmask & SDHCI_INT_BUS_POWER) {
1367 		printk(KERN_ERR "%s: Card is consuming too much power!\n",
1368 			mmc_hostname(host->mmc));
1369 		writel(SDHCI_INT_BUS_POWER, host->ioaddr + SDHCI_INT_STATUS);
1370 	}
1371 
1372 	intmask &= ~SDHCI_INT_BUS_POWER;
1373 
1374 	if (intmask & SDHCI_INT_CARD_INT)
1375 		cardint = 1;
1376 
1377 	intmask &= ~SDHCI_INT_CARD_INT;
1378 
1379 	if (intmask) {
1380 		printk(KERN_ERR "%s: Unexpected interrupt 0x%08x.\n",
1381 			mmc_hostname(host->mmc), intmask);
1382 		sdhci_dumpregs(host);
1383 
1384 		writel(intmask, host->ioaddr + SDHCI_INT_STATUS);
1385 	}
1386 
1387 	result = IRQ_HANDLED;
1388 
1389 	mmiowb();
1390 out:
1391 	spin_unlock(&host->lock);
1392 
1393 	/*
1394 	 * We have to delay this as it calls back into the driver.
1395 	 */
1396 	if (cardint)
1397 		mmc_signal_sdio_irq(host->mmc);
1398 
1399 	return result;
1400 }
1401 
1402 /*****************************************************************************\
1403  *                                                                           *
1404  * Suspend/resume                                                            *
1405  *                                                                           *
1406 \*****************************************************************************/
1407 
1408 #ifdef CONFIG_PM
1409 
1410 int sdhci_suspend_host(struct sdhci_host *host, pm_message_t state)
1411 {
1412 	int ret;
1413 
1414 	ret = mmc_suspend_host(host->mmc, state);
1415 	if (ret)
1416 		return ret;
1417 
1418 	free_irq(host->irq, host);
1419 
1420 	return 0;
1421 }
1422 
1423 EXPORT_SYMBOL_GPL(sdhci_suspend_host);
1424 
1425 int sdhci_resume_host(struct sdhci_host *host)
1426 {
1427 	int ret;
1428 
1429 	if (host->flags & SDHCI_USE_DMA) {
1430 		if (host->ops->enable_dma)
1431 			host->ops->enable_dma(host);
1432 	}
1433 
1434 	ret = request_irq(host->irq, sdhci_irq, IRQF_SHARED,
1435 			  mmc_hostname(host->mmc), host);
1436 	if (ret)
1437 		return ret;
1438 
1439 	sdhci_init(host);
1440 	mmiowb();
1441 
1442 	ret = mmc_resume_host(host->mmc);
1443 	if (ret)
1444 		return ret;
1445 
1446 	return 0;
1447 }
1448 
1449 EXPORT_SYMBOL_GPL(sdhci_resume_host);
1450 
1451 #endif /* CONFIG_PM */
1452 
1453 /*****************************************************************************\
1454  *                                                                           *
1455  * Device allocation/registration                                            *
1456  *                                                                           *
1457 \*****************************************************************************/
1458 
1459 struct sdhci_host *sdhci_alloc_host(struct device *dev,
1460 	size_t priv_size)
1461 {
1462 	struct mmc_host *mmc;
1463 	struct sdhci_host *host;
1464 
1465 	WARN_ON(dev == NULL);
1466 
1467 	mmc = mmc_alloc_host(sizeof(struct sdhci_host) + priv_size, dev);
1468 	if (!mmc)
1469 		return ERR_PTR(-ENOMEM);
1470 
1471 	host = mmc_priv(mmc);
1472 	host->mmc = mmc;
1473 
1474 	return host;
1475 }
1476 
1477 EXPORT_SYMBOL_GPL(sdhci_alloc_host);
1478 
1479 int sdhci_add_host(struct sdhci_host *host)
1480 {
1481 	struct mmc_host *mmc;
1482 	unsigned int caps;
1483 	int ret;
1484 
1485 	WARN_ON(host == NULL);
1486 	if (host == NULL)
1487 		return -EINVAL;
1488 
1489 	mmc = host->mmc;
1490 
1491 	if (debug_quirks)
1492 		host->quirks = debug_quirks;
1493 
1494 	sdhci_reset(host, SDHCI_RESET_ALL);
1495 
1496 	host->version = readw(host->ioaddr + SDHCI_HOST_VERSION);
1497 	host->version = (host->version & SDHCI_SPEC_VER_MASK)
1498 				>> SDHCI_SPEC_VER_SHIFT;
1499 	if (host->version > SDHCI_SPEC_200) {
1500 		printk(KERN_ERR "%s: Unknown controller version (%d). "
1501 			"You may experience problems.\n", mmc_hostname(mmc),
1502 			host->version);
1503 	}
1504 
1505 	caps = readl(host->ioaddr + SDHCI_CAPABILITIES);
1506 
1507 	if (host->quirks & SDHCI_QUIRK_FORCE_DMA)
1508 		host->flags |= SDHCI_USE_DMA;
1509 	else if (!(caps & SDHCI_CAN_DO_DMA))
1510 		DBG("Controller doesn't have DMA capability\n");
1511 	else
1512 		host->flags |= SDHCI_USE_DMA;
1513 
1514 	if ((host->quirks & SDHCI_QUIRK_BROKEN_DMA) &&
1515 		(host->flags & SDHCI_USE_DMA)) {
1516 		DBG("Disabling DMA as it is marked broken\n");
1517 		host->flags &= ~SDHCI_USE_DMA;
1518 	}
1519 
1520 	if (host->flags & SDHCI_USE_DMA) {
1521 		if ((host->version >= SDHCI_SPEC_200) &&
1522 				(caps & SDHCI_CAN_DO_ADMA2))
1523 			host->flags |= SDHCI_USE_ADMA;
1524 	}
1525 
1526 	if ((host->quirks & SDHCI_QUIRK_BROKEN_ADMA) &&
1527 		(host->flags & SDHCI_USE_ADMA)) {
1528 		DBG("Disabling ADMA as it is marked broken\n");
1529 		host->flags &= ~SDHCI_USE_ADMA;
1530 	}
1531 
1532 	if (host->flags & SDHCI_USE_DMA) {
1533 		if (host->ops->enable_dma) {
1534 			if (host->ops->enable_dma(host)) {
1535 				printk(KERN_WARNING "%s: No suitable DMA "
1536 					"available. Falling back to PIO.\n",
1537 					mmc_hostname(mmc));
1538 				host->flags &= ~(SDHCI_USE_DMA | SDHCI_USE_ADMA);
1539 			}
1540 		}
1541 	}
1542 
1543 	if (host->flags & SDHCI_USE_ADMA) {
1544 		/*
1545 		 * We need to allocate descriptors for all sg entries
1546 		 * (128) and potentially one alignment transfer for
1547 		 * each of those entries.
1548 		 */
1549 		host->adma_desc = kmalloc((128 * 2 + 1) * 4, GFP_KERNEL);
1550 		host->align_buffer = kmalloc(128 * 4, GFP_KERNEL);
1551 		if (!host->adma_desc || !host->align_buffer) {
1552 			kfree(host->adma_desc);
1553 			kfree(host->align_buffer);
1554 			printk(KERN_WARNING "%s: Unable to allocate ADMA "
1555 				"buffers. Falling back to standard DMA.\n",
1556 				mmc_hostname(mmc));
1557 			host->flags &= ~SDHCI_USE_ADMA;
1558 		}
1559 	}
1560 
1561 	/*
1562 	 * If we use DMA, then it's up to the caller to set the DMA
1563 	 * mask, but PIO does not need the hw shim so we set a new
1564 	 * mask here in that case.
1565 	 */
1566 	if (!(host->flags & SDHCI_USE_DMA)) {
1567 		host->dma_mask = DMA_BIT_MASK(64);
1568 		mmc_dev(host->mmc)->dma_mask = &host->dma_mask;
1569 	}
1570 
1571 	host->max_clk =
1572 		(caps & SDHCI_CLOCK_BASE_MASK) >> SDHCI_CLOCK_BASE_SHIFT;
1573 	if (host->max_clk == 0) {
1574 		printk(KERN_ERR "%s: Hardware doesn't specify base clock "
1575 			"frequency.\n", mmc_hostname(mmc));
1576 		return -ENODEV;
1577 	}
1578 	host->max_clk *= 1000000;
1579 
1580 	host->timeout_clk =
1581 		(caps & SDHCI_TIMEOUT_CLK_MASK) >> SDHCI_TIMEOUT_CLK_SHIFT;
1582 	if (host->timeout_clk == 0) {
1583 		printk(KERN_ERR "%s: Hardware doesn't specify timeout clock "
1584 			"frequency.\n", mmc_hostname(mmc));
1585 		return -ENODEV;
1586 	}
1587 	if (caps & SDHCI_TIMEOUT_CLK_UNIT)
1588 		host->timeout_clk *= 1000;
1589 
1590 	/*
1591 	 * Set host parameters.
1592 	 */
1593 	mmc->ops = &sdhci_ops;
1594 	mmc->f_min = host->max_clk / 256;
1595 	mmc->f_max = host->max_clk;
1596 	mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_SDIO_IRQ;
1597 
1598 	if (caps & SDHCI_CAN_DO_HISPD)
1599 		mmc->caps |= MMC_CAP_SD_HIGHSPEED;
1600 
1601 	mmc->ocr_avail = 0;
1602 	if (caps & SDHCI_CAN_VDD_330)
1603 		mmc->ocr_avail |= MMC_VDD_32_33|MMC_VDD_33_34;
1604 	if (caps & SDHCI_CAN_VDD_300)
1605 		mmc->ocr_avail |= MMC_VDD_29_30|MMC_VDD_30_31;
1606 	if (caps & SDHCI_CAN_VDD_180)
1607 		mmc->ocr_avail |= MMC_VDD_165_195;
1608 
1609 	if (mmc->ocr_avail == 0) {
1610 		printk(KERN_ERR "%s: Hardware doesn't report any "
1611 			"support voltages.\n", mmc_hostname(mmc));
1612 		return -ENODEV;
1613 	}
1614 
1615 	spin_lock_init(&host->lock);
1616 
1617 	/*
1618 	 * Maximum number of segments. Depends on if the hardware
1619 	 * can do scatter/gather or not.
1620 	 */
1621 	if (host->flags & SDHCI_USE_ADMA)
1622 		mmc->max_hw_segs = 128;
1623 	else if (host->flags & SDHCI_USE_DMA)
1624 		mmc->max_hw_segs = 1;
1625 	else /* PIO */
1626 		mmc->max_hw_segs = 128;
1627 	mmc->max_phys_segs = 128;
1628 
1629 	/*
1630 	 * Maximum number of sectors in one transfer. Limited by DMA boundary
1631 	 * size (512KiB).
1632 	 */
1633 	mmc->max_req_size = 524288;
1634 
1635 	/*
1636 	 * Maximum segment size. Could be one segment with the maximum number
1637 	 * of bytes. When doing hardware scatter/gather, each entry cannot
1638 	 * be larger than 64 KiB though.
1639 	 */
1640 	if (host->flags & SDHCI_USE_ADMA)
1641 		mmc->max_seg_size = 65536;
1642 	else
1643 		mmc->max_seg_size = mmc->max_req_size;
1644 
1645 	/*
1646 	 * Maximum block size. This varies from controller to controller and
1647 	 * is specified in the capabilities register.
1648 	 */
1649 	mmc->max_blk_size = (caps & SDHCI_MAX_BLOCK_MASK) >> SDHCI_MAX_BLOCK_SHIFT;
1650 	if (mmc->max_blk_size >= 3) {
1651 		printk(KERN_WARNING "%s: Invalid maximum block size, "
1652 			"assuming 512 bytes\n", mmc_hostname(mmc));
1653 		mmc->max_blk_size = 512;
1654 	} else
1655 		mmc->max_blk_size = 512 << mmc->max_blk_size;
1656 
1657 	/*
1658 	 * Maximum block count.
1659 	 */
1660 	mmc->max_blk_count = 65535;
1661 
1662 	/*
1663 	 * Init tasklets.
1664 	 */
1665 	tasklet_init(&host->card_tasklet,
1666 		sdhci_tasklet_card, (unsigned long)host);
1667 	tasklet_init(&host->finish_tasklet,
1668 		sdhci_tasklet_finish, (unsigned long)host);
1669 
1670 	setup_timer(&host->timer, sdhci_timeout_timer, (unsigned long)host);
1671 
1672 	ret = request_irq(host->irq, sdhci_irq, IRQF_SHARED,
1673 		mmc_hostname(mmc), host);
1674 	if (ret)
1675 		goto untasklet;
1676 
1677 	sdhci_init(host);
1678 
1679 #ifdef CONFIG_MMC_DEBUG
1680 	sdhci_dumpregs(host);
1681 #endif
1682 
1683 #ifdef CONFIG_LEDS_CLASS
1684 	host->led.name = mmc_hostname(mmc);
1685 	host->led.brightness = LED_OFF;
1686 	host->led.default_trigger = mmc_hostname(mmc);
1687 	host->led.brightness_set = sdhci_led_control;
1688 
1689 	ret = led_classdev_register(mmc_dev(mmc), &host->led);
1690 	if (ret)
1691 		goto reset;
1692 #endif
1693 
1694 	mmiowb();
1695 
1696 	mmc_add_host(mmc);
1697 
1698 	printk(KERN_INFO "%s: SDHCI controller on %s [%s] using %s%s\n",
1699 		mmc_hostname(mmc), host->hw_name, mmc_dev(mmc)->bus_id,
1700 		(host->flags & SDHCI_USE_ADMA)?"A":"",
1701 		(host->flags & SDHCI_USE_DMA)?"DMA":"PIO");
1702 
1703 	return 0;
1704 
1705 #ifdef CONFIG_LEDS_CLASS
1706 reset:
1707 	sdhci_reset(host, SDHCI_RESET_ALL);
1708 	free_irq(host->irq, host);
1709 #endif
1710 untasklet:
1711 	tasklet_kill(&host->card_tasklet);
1712 	tasklet_kill(&host->finish_tasklet);
1713 
1714 	return ret;
1715 }
1716 
1717 EXPORT_SYMBOL_GPL(sdhci_add_host);
1718 
1719 void sdhci_remove_host(struct sdhci_host *host, int dead)
1720 {
1721 	unsigned long flags;
1722 
1723 	if (dead) {
1724 		spin_lock_irqsave(&host->lock, flags);
1725 
1726 		host->flags |= SDHCI_DEVICE_DEAD;
1727 
1728 		if (host->mrq) {
1729 			printk(KERN_ERR "%s: Controller removed during "
1730 				" transfer!\n", mmc_hostname(host->mmc));
1731 
1732 			host->mrq->cmd->error = -ENOMEDIUM;
1733 			tasklet_schedule(&host->finish_tasklet);
1734 		}
1735 
1736 		spin_unlock_irqrestore(&host->lock, flags);
1737 	}
1738 
1739 	mmc_remove_host(host->mmc);
1740 
1741 #ifdef CONFIG_LEDS_CLASS
1742 	led_classdev_unregister(&host->led);
1743 #endif
1744 
1745 	if (!dead)
1746 		sdhci_reset(host, SDHCI_RESET_ALL);
1747 
1748 	free_irq(host->irq, host);
1749 
1750 	del_timer_sync(&host->timer);
1751 
1752 	tasklet_kill(&host->card_tasklet);
1753 	tasklet_kill(&host->finish_tasklet);
1754 
1755 	kfree(host->adma_desc);
1756 	kfree(host->align_buffer);
1757 
1758 	host->adma_desc = NULL;
1759 	host->align_buffer = NULL;
1760 }
1761 
1762 EXPORT_SYMBOL_GPL(sdhci_remove_host);
1763 
1764 void sdhci_free_host(struct sdhci_host *host)
1765 {
1766 	mmc_free_host(host->mmc);
1767 }
1768 
1769 EXPORT_SYMBOL_GPL(sdhci_free_host);
1770 
1771 /*****************************************************************************\
1772  *                                                                           *
1773  * Driver init/exit                                                          *
1774  *                                                                           *
1775 \*****************************************************************************/
1776 
1777 static int __init sdhci_drv_init(void)
1778 {
1779 	printk(KERN_INFO DRIVER_NAME
1780 		": Secure Digital Host Controller Interface driver\n");
1781 	printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");
1782 
1783 	return 0;
1784 }
1785 
1786 static void __exit sdhci_drv_exit(void)
1787 {
1788 }
1789 
1790 module_init(sdhci_drv_init);
1791 module_exit(sdhci_drv_exit);
1792 
1793 module_param(debug_quirks, uint, 0444);
1794 
1795 MODULE_AUTHOR("Pierre Ossman <drzeus@drzeus.cx>");
1796 MODULE_DESCRIPTION("Secure Digital Host Controller Interface core driver");
1797 MODULE_LICENSE("GPL");
1798 
1799 MODULE_PARM_DESC(debug_quirks, "Force certain quirks.");
1800