sdhci.c 58.2 KB
Newer Older
1
/*
P
Pierre Ossman 已提交
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 8 9
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or (at
 * your option) any later version.
10 11 12 13
 *
 * Thanks to the following companies for their support:
 *
 *     - JMicron (hardware and technical support)
14 15 16 17
 */

#include <linux/delay.h>
#include <linux/highmem.h>
18
#include <linux/io.h>
19
#include <linux/dma-mapping.h>
20
#include <linux/slab.h>
21
#include <linux/scatterlist.h>
M
Marek Szyprowski 已提交
22
#include <linux/regulator/consumer.h>
23

24 25
#include <linux/leds.h>

26
#include <linux/mmc/mmc.h>
27 28 29 30 31 32 33
#include <linux/mmc/host.h>

#include "sdhci.h"

#define DRIVER_NAME "sdhci"

#define DBG(f, x...) \
34
	pr_debug(DRIVER_NAME " [%s()]: " f, __func__,## x)
35

36 37 38 39 40
#if defined(CONFIG_LEDS_CLASS) || (defined(CONFIG_LEDS_CLASS_MODULE) && \
	defined(CONFIG_MMC_SDHCI_MODULE))
#define SDHCI_USE_LEDS_CLASS
#endif

41
static unsigned int debug_quirks = 0;
42

43 44 45 46 47 48 49
static void sdhci_finish_data(struct sdhci_host *);

static void sdhci_send_command(struct sdhci_host *, struct mmc_command *);
static void sdhci_finish_command(struct sdhci_host *);

static void sdhci_dumpregs(struct sdhci_host *host)
{
50 51
	printk(KERN_DEBUG DRIVER_NAME ": =========== REGISTER DUMP (%s)===========\n",
		mmc_hostname(host->mmc));
52 53

	printk(KERN_DEBUG DRIVER_NAME ": Sys addr: 0x%08x | Version:  0x%08x\n",
54 55
		sdhci_readl(host, SDHCI_DMA_ADDRESS),
		sdhci_readw(host, SDHCI_HOST_VERSION));
56
	printk(KERN_DEBUG DRIVER_NAME ": Blk size: 0x%08x | Blk cnt:  0x%08x\n",
57 58
		sdhci_readw(host, SDHCI_BLOCK_SIZE),
		sdhci_readw(host, SDHCI_BLOCK_COUNT));
59
	printk(KERN_DEBUG DRIVER_NAME ": Argument: 0x%08x | Trn mode: 0x%08x\n",
60 61
		sdhci_readl(host, SDHCI_ARGUMENT),
		sdhci_readw(host, SDHCI_TRANSFER_MODE));
62
	printk(KERN_DEBUG DRIVER_NAME ": Present:  0x%08x | Host ctl: 0x%08x\n",
63 64
		sdhci_readl(host, SDHCI_PRESENT_STATE),
		sdhci_readb(host, SDHCI_HOST_CONTROL));
65
	printk(KERN_DEBUG DRIVER_NAME ": Power:    0x%08x | Blk gap:  0x%08x\n",
66 67
		sdhci_readb(host, SDHCI_POWER_CONTROL),
		sdhci_readb(host, SDHCI_BLOCK_GAP_CONTROL));
68
	printk(KERN_DEBUG DRIVER_NAME ": Wake-up:  0x%08x | Clock:    0x%08x\n",
69 70
		sdhci_readb(host, SDHCI_WAKE_UP_CONTROL),
		sdhci_readw(host, SDHCI_CLOCK_CONTROL));
71
	printk(KERN_DEBUG DRIVER_NAME ": Timeout:  0x%08x | Int stat: 0x%08x\n",
72 73
		sdhci_readb(host, SDHCI_TIMEOUT_CONTROL),
		sdhci_readl(host, SDHCI_INT_STATUS));
74
	printk(KERN_DEBUG DRIVER_NAME ": Int enab: 0x%08x | Sig enab: 0x%08x\n",
75 76
		sdhci_readl(host, SDHCI_INT_ENABLE),
		sdhci_readl(host, SDHCI_SIGNAL_ENABLE));
77
	printk(KERN_DEBUG DRIVER_NAME ": AC12 err: 0x%08x | Slot int: 0x%08x\n",
78 79
		sdhci_readw(host, SDHCI_ACMD12_ERR),
		sdhci_readw(host, SDHCI_SLOT_INT_STATUS));
80
	printk(KERN_DEBUG DRIVER_NAME ": Caps:     0x%08x | Caps_1:   0x%08x\n",
81
		sdhci_readl(host, SDHCI_CAPABILITIES),
82 83 84
		sdhci_readl(host, SDHCI_CAPABILITIES_1));
	printk(KERN_DEBUG DRIVER_NAME ": Cmd:      0x%08x | Max curr: 0x%08x\n",
		sdhci_readw(host, SDHCI_COMMAND),
85
		sdhci_readl(host, SDHCI_MAX_CURRENT));
86 87
	printk(KERN_DEBUG DRIVER_NAME ": Host ctl2: 0x%08x\n",
		sdhci_readw(host, SDHCI_HOST_CONTROL2));
88

89 90 91 92 93
	if (host->flags & SDHCI_USE_ADMA)
		printk(KERN_DEBUG DRIVER_NAME ": ADMA Err: 0x%08x | ADMA Ptr: 0x%08x\n",
		       readl(host->ioaddr + SDHCI_ADMA_ERROR),
		       readl(host->ioaddr + SDHCI_ADMA_ADDRESS));

94 95 96 97 98 99 100 101 102
	printk(KERN_DEBUG DRIVER_NAME ": ===========================================\n");
}

/*****************************************************************************\
 *                                                                           *
 * Low level functions                                                       *
 *                                                                           *
\*****************************************************************************/

103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127
static void sdhci_clear_set_irqs(struct sdhci_host *host, u32 clear, u32 set)
{
	u32 ier;

	ier = sdhci_readl(host, SDHCI_INT_ENABLE);
	ier &= ~clear;
	ier |= set;
	sdhci_writel(host, ier, SDHCI_INT_ENABLE);
	sdhci_writel(host, ier, SDHCI_SIGNAL_ENABLE);
}

static void sdhci_unmask_irqs(struct sdhci_host *host, u32 irqs)
{
	sdhci_clear_set_irqs(host, 0, irqs);
}

static void sdhci_mask_irqs(struct sdhci_host *host, u32 irqs)
{
	sdhci_clear_set_irqs(host, irqs, 0);
}

static void sdhci_set_card_detection(struct sdhci_host *host, bool enable)
{
	u32 irqs = SDHCI_INT_CARD_REMOVE | SDHCI_INT_CARD_INSERT;

128 129 130
	if (host->quirks & SDHCI_QUIRK_BROKEN_CARD_DETECTION)
		return;

131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146
	if (enable)
		sdhci_unmask_irqs(host, irqs);
	else
		sdhci_mask_irqs(host, irqs);
}

static void sdhci_enable_card_detection(struct sdhci_host *host)
{
	sdhci_set_card_detection(host, true);
}

static void sdhci_disable_card_detection(struct sdhci_host *host)
{
	sdhci_set_card_detection(host, false);
}

147 148
static void sdhci_reset(struct sdhci_host *host, u8 mask)
{
149
	unsigned long timeout;
150
	u32 uninitialized_var(ier);
151

152
	if (host->quirks & SDHCI_QUIRK_NO_CARD_NO_RESET) {
153
		if (!(sdhci_readl(host, SDHCI_PRESENT_STATE) &
154 155 156 157
			SDHCI_CARD_PRESENT))
			return;
	}

158 159 160
	if (host->quirks & SDHCI_QUIRK_RESTORE_IRQS_AFTER_RESET)
		ier = sdhci_readl(host, SDHCI_INT_ENABLE);

161 162 163
	if (host->ops->platform_reset_enter)
		host->ops->platform_reset_enter(host, mask);

164
	sdhci_writeb(host, mask, SDHCI_SOFTWARE_RESET);
165

166
	if (mask & SDHCI_RESET_ALL)
167 168
		host->clock = 0;

169 170 171 172
	/* Wait max 100 ms */
	timeout = 100;

	/* hw clears the bit when it's done */
173
	while (sdhci_readb(host, SDHCI_SOFTWARE_RESET) & mask) {
174
		if (timeout == 0) {
P
Pierre Ossman 已提交
175
			printk(KERN_ERR "%s: Reset 0x%x never completed.\n",
176 177 178 179 180 181
				mmc_hostname(host->mmc), (int)mask);
			sdhci_dumpregs(host);
			return;
		}
		timeout--;
		mdelay(1);
182
	}
183

184 185 186
	if (host->ops->platform_reset_exit)
		host->ops->platform_reset_exit(host, mask);

187 188
	if (host->quirks & SDHCI_QUIRK_RESTORE_IRQS_AFTER_RESET)
		sdhci_clear_set_irqs(host, SDHCI_INT_ALL_MASK, ier);
189 190
}

191 192 193
static void sdhci_set_ios(struct mmc_host *mmc, struct mmc_ios *ios);

static void sdhci_init(struct sdhci_host *host, int soft)
194
{
195 196 197 198
	if (soft)
		sdhci_reset(host, SDHCI_RESET_CMD|SDHCI_RESET_DATA);
	else
		sdhci_reset(host, SDHCI_RESET_ALL);
199

200 201
	sdhci_clear_set_irqs(host, SDHCI_INT_ALL_MASK,
		SDHCI_INT_BUS_POWER | SDHCI_INT_DATA_END_BIT |
202 203
		SDHCI_INT_DATA_CRC | SDHCI_INT_DATA_TIMEOUT | SDHCI_INT_INDEX |
		SDHCI_INT_END_BIT | SDHCI_INT_CRC | SDHCI_INT_TIMEOUT |
204
		SDHCI_INT_DATA_END | SDHCI_INT_RESPONSE);
205 206 207 208 209 210

	if (soft) {
		/* force clock reconfiguration */
		host->clock = 0;
		sdhci_set_ios(host->mmc, &host->mmc->ios);
	}
211
}
212

213 214
static void sdhci_reinit(struct sdhci_host *host)
{
215
	sdhci_init(host, 0);
216
	sdhci_enable_card_detection(host);
217 218 219 220 221 222
}

static void sdhci_activate_led(struct sdhci_host *host)
{
	u8 ctrl;

223
	ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
224
	ctrl |= SDHCI_CTRL_LED;
225
	sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
226 227 228 229 230 231
}

static void sdhci_deactivate_led(struct sdhci_host *host)
{
	u8 ctrl;

232
	ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
233
	ctrl &= ~SDHCI_CTRL_LED;
234
	sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
235 236
}

237
#ifdef SDHCI_USE_LEDS_CLASS
238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254
static void sdhci_led_control(struct led_classdev *led,
	enum led_brightness brightness)
{
	struct sdhci_host *host = container_of(led, struct sdhci_host, led);
	unsigned long flags;

	spin_lock_irqsave(&host->lock, flags);

	if (brightness == LED_OFF)
		sdhci_deactivate_led(host);
	else
		sdhci_activate_led(host);

	spin_unlock_irqrestore(&host->lock, flags);
}
#endif

255 256 257 258 259 260
/*****************************************************************************\
 *                                                                           *
 * Core functions                                                            *
 *                                                                           *
\*****************************************************************************/

P
Pierre Ossman 已提交
261
static void sdhci_read_block_pio(struct sdhci_host *host)
262
{
263 264
	unsigned long flags;
	size_t blksize, len, chunk;
265
	u32 uninitialized_var(scratch);
266
	u8 *buf;
267

P
Pierre Ossman 已提交
268
	DBG("PIO reading\n");
269

P
Pierre Ossman 已提交
270
	blksize = host->data->blksz;
271
	chunk = 0;
272

273
	local_irq_save(flags);
274

P
Pierre Ossman 已提交
275
	while (blksize) {
276 277
		if (!sg_miter_next(&host->sg_miter))
			BUG();
278

279
		len = min(host->sg_miter.length, blksize);
280

281 282
		blksize -= len;
		host->sg_miter.consumed = len;
283

284
		buf = host->sg_miter.addr;
285

286 287
		while (len) {
			if (chunk == 0) {
288
				scratch = sdhci_readl(host, SDHCI_BUFFER);
289
				chunk = 4;
P
Pierre Ossman 已提交
290
			}
291 292 293 294 295 296 297

			*buf = scratch & 0xFF;

			buf++;
			scratch >>= 8;
			chunk--;
			len--;
298
		}
P
Pierre Ossman 已提交
299
	}
300 301 302 303

	sg_miter_stop(&host->sg_miter);

	local_irq_restore(flags);
P
Pierre Ossman 已提交
304
}
305

P
Pierre Ossman 已提交
306 307
static void sdhci_write_block_pio(struct sdhci_host *host)
{
308 309 310 311
	unsigned long flags;
	size_t blksize, len, chunk;
	u32 scratch;
	u8 *buf;
312

P
Pierre Ossman 已提交
313 314 315
	DBG("PIO writing\n");

	blksize = host->data->blksz;
316 317
	chunk = 0;
	scratch = 0;
318

319
	local_irq_save(flags);
320

P
Pierre Ossman 已提交
321
	while (blksize) {
322 323
		if (!sg_miter_next(&host->sg_miter))
			BUG();
P
Pierre Ossman 已提交
324

325 326 327 328 329 330
		len = min(host->sg_miter.length, blksize);

		blksize -= len;
		host->sg_miter.consumed = len;

		buf = host->sg_miter.addr;
331

332 333 334 335 336 337 338 339
		while (len) {
			scratch |= (u32)*buf << (chunk * 8);

			buf++;
			chunk++;
			len--;

			if ((chunk == 4) || ((len == 0) && (blksize == 0))) {
340
				sdhci_writel(host, scratch, SDHCI_BUFFER);
341 342
				chunk = 0;
				scratch = 0;
343 344 345
			}
		}
	}
346 347 348 349

	sg_miter_stop(&host->sg_miter);

	local_irq_restore(flags);
P
Pierre Ossman 已提交
350 351 352 353 354 355 356 357
}

static void sdhci_transfer_pio(struct sdhci_host *host)
{
	u32 mask;

	BUG_ON(!host->data);

358
	if (host->blocks == 0)
P
Pierre Ossman 已提交
359 360 361 362 363 364 365
		return;

	if (host->data->flags & MMC_DATA_READ)
		mask = SDHCI_DATA_AVAILABLE;
	else
		mask = SDHCI_SPACE_AVAILABLE;

366 367 368 369 370 371 372 373 374
	/*
	 * Some controllers (JMicron JMB38x) mess up the buffer bits
	 * for transfers < 4 bytes. As long as it is just one block,
	 * we can ignore the bits.
	 */
	if ((host->quirks & SDHCI_QUIRK_BROKEN_SMALL_PIO) &&
		(host->data->blocks == 1))
		mask = ~0;

375
	while (sdhci_readl(host, SDHCI_PRESENT_STATE) & mask) {
376 377 378
		if (host->quirks & SDHCI_QUIRK_PIO_NEEDS_DELAY)
			udelay(100);

P
Pierre Ossman 已提交
379 380 381 382
		if (host->data->flags & MMC_DATA_READ)
			sdhci_read_block_pio(host);
		else
			sdhci_write_block_pio(host);
383

384 385
		host->blocks--;
		if (host->blocks == 0)
P
Pierre Ossman 已提交
386 387
			break;
	}
388

P
Pierre Ossman 已提交
389
	DBG("PIO transfer complete.\n");
390 391
}

392 393 394 395 396 397 398 399 400 401 402 403
static char *sdhci_kmap_atomic(struct scatterlist *sg, unsigned long *flags)
{
	local_irq_save(*flags);
	return kmap_atomic(sg_page(sg), KM_BIO_SRC_IRQ) + sg->offset;
}

static void sdhci_kunmap_atomic(void *buffer, unsigned long *flags)
{
	kunmap_atomic(buffer, KM_BIO_SRC_IRQ);
	local_irq_restore(*flags);
}

B
Ben Dooks 已提交
404 405
static void sdhci_set_adma_desc(u8 *desc, u32 addr, int len, unsigned cmd)
{
406 407
	__le32 *dataddr = (__le32 __force *)(desc + 4);
	__le16 *cmdlen = (__le16 __force *)desc;
B
Ben Dooks 已提交
408

409 410
	/* SDHCI specification says ADMA descriptors should be 4 byte
	 * aligned, so using 16 or 32bit operations should be safe. */
B
Ben Dooks 已提交
411

412 413 414 415
	cmdlen[0] = cpu_to_le16(cmd);
	cmdlen[1] = cpu_to_le16(len);

	dataddr[0] = cpu_to_le32(addr);
B
Ben Dooks 已提交
416 417
}

418
static int sdhci_adma_table_pre(struct sdhci_host *host,
419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450
	struct mmc_data *data)
{
	int direction;

	u8 *desc;
	u8 *align;
	dma_addr_t addr;
	dma_addr_t align_addr;
	int len, offset;

	struct scatterlist *sg;
	int i;
	char *buffer;
	unsigned long flags;

	/*
	 * The spec does not specify endianness of descriptor table.
	 * We currently guess that it is LE.
	 */

	if (data->flags & MMC_DATA_READ)
		direction = DMA_FROM_DEVICE;
	else
		direction = DMA_TO_DEVICE;

	/*
	 * The ADMA descriptor table is mapped further down as we
	 * need to fill it with data first.
	 */

	host->align_addr = dma_map_single(mmc_dev(host->mmc),
		host->align_buffer, 128 * 4, direction);
451
	if (dma_mapping_error(mmc_dev(host->mmc), host->align_addr))
452
		goto fail;
453 454 455 456
	BUG_ON(host->align_addr & 0x3);

	host->sg_count = dma_map_sg(mmc_dev(host->mmc),
		data->sg, data->sg_len, direction);
457 458
	if (host->sg_count == 0)
		goto unmap_align;
459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479

	desc = host->adma_desc;
	align = host->align_buffer;

	align_addr = host->align_addr;

	for_each_sg(data->sg, sg, host->sg_count, i) {
		addr = sg_dma_address(sg);
		len = sg_dma_len(sg);

		/*
		 * The SDHCI specification states that ADMA
		 * addresses must be 32-bit aligned. If they
		 * aren't, then we use a bounce buffer for
		 * the (up to three) bytes that screw up the
		 * alignment.
		 */
		offset = (4 - (addr & 0x3)) & 0x3;
		if (offset) {
			if (data->flags & MMC_DATA_WRITE) {
				buffer = sdhci_kmap_atomic(sg, &flags);
480
				WARN_ON(((long)buffer & PAGE_MASK) > (PAGE_SIZE - 3));
481 482 483 484
				memcpy(align, buffer, offset);
				sdhci_kunmap_atomic(buffer, &flags);
			}

B
Ben Dooks 已提交
485 486
			/* tran, valid */
			sdhci_set_adma_desc(desc, align_addr, offset, 0x21);
487 488 489 490 491 492 493 494 495 496 497 498 499 500

			BUG_ON(offset > 65536);

			align += 4;
			align_addr += 4;

			desc += 8;

			addr += offset;
			len -= offset;
		}

		BUG_ON(len > 65536);

B
Ben Dooks 已提交
501 502
		/* tran, valid */
		sdhci_set_adma_desc(desc, addr, len, 0x21);
503 504 505 506 507 508 509 510 511
		desc += 8;

		/*
		 * If this triggers then we have a calculation bug
		 * somewhere. :/
		 */
		WARN_ON((desc - host->adma_desc) > (128 * 2 + 1) * 4);
	}

512 513 514 515 516 517 518 519 520 521 522 523
	if (host->quirks & SDHCI_QUIRK_NO_ENDATTR_IN_NOPDESC) {
		/*
		* Mark the last descriptor as the terminating descriptor
		*/
		if (desc != host->adma_desc) {
			desc -= 8;
			desc[0] |= 0x2; /* end */
		}
	} else {
		/*
		* Add a terminating entry.
		*/
524

525 526 527
		/* nop, end, valid */
		sdhci_set_adma_desc(desc, 0, 0, 0x3);
	}
528 529 530 531 532 533 534 535 536 537 538

	/*
	 * Resync align buffer as we might have changed it.
	 */
	if (data->flags & MMC_DATA_WRITE) {
		dma_sync_single_for_device(mmc_dev(host->mmc),
			host->align_addr, 128 * 4, direction);
	}

	host->adma_addr = dma_map_single(mmc_dev(host->mmc),
		host->adma_desc, (128 * 2 + 1) * 4, DMA_TO_DEVICE);
539
	if (dma_mapping_error(mmc_dev(host->mmc), host->adma_addr))
540
		goto unmap_entries;
541
	BUG_ON(host->adma_addr & 0x3);
542 543 544 545 546 547 548 549 550 551 552

	return 0;

unmap_entries:
	dma_unmap_sg(mmc_dev(host->mmc), data->sg,
		data->sg_len, direction);
unmap_align:
	dma_unmap_single(mmc_dev(host->mmc), host->align_addr,
		128 * 4, direction);
fail:
	return -EINVAL;
553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587
}

static void sdhci_adma_table_post(struct sdhci_host *host,
	struct mmc_data *data)
{
	int direction;

	struct scatterlist *sg;
	int i, size;
	u8 *align;
	char *buffer;
	unsigned long flags;

	if (data->flags & MMC_DATA_READ)
		direction = DMA_FROM_DEVICE;
	else
		direction = DMA_TO_DEVICE;

	dma_unmap_single(mmc_dev(host->mmc), host->adma_addr,
		(128 * 2 + 1) * 4, DMA_TO_DEVICE);

	dma_unmap_single(mmc_dev(host->mmc), host->align_addr,
		128 * 4, direction);

	if (data->flags & MMC_DATA_READ) {
		dma_sync_sg_for_cpu(mmc_dev(host->mmc), data->sg,
			data->sg_len, direction);

		align = host->align_buffer;

		for_each_sg(data->sg, sg, host->sg_count, i) {
			if (sg_dma_address(sg) & 0x3) {
				size = 4 - (sg_dma_address(sg) & 0x3);

				buffer = sdhci_kmap_atomic(sg, &flags);
588
				WARN_ON(((long)buffer & PAGE_MASK) > (PAGE_SIZE - 3));
589 590 591 592 593 594 595 596 597 598 599 600
				memcpy(buffer, align, size);
				sdhci_kunmap_atomic(buffer, &flags);

				align += 4;
			}
		}
	}

	dma_unmap_sg(mmc_dev(host->mmc), data->sg,
		data->sg_len, direction);
}

601
static u8 sdhci_calc_timeout(struct sdhci_host *host, struct mmc_command *cmd)
602
{
603
	u8 count;
604
	struct mmc_data *data = cmd->data;
605
	unsigned target_timeout, current_timeout;
606

607 608 609 610 611 612
	/*
	 * If the host controller provides us with an incorrect timeout
	 * value, just skip the check and use 0xE.  The hardware may take
	 * longer to time out, but that's much better than having a too-short
	 * timeout value.
	 */
613
	if (host->quirks & SDHCI_QUIRK_BROKEN_TIMEOUT_VAL)
614
		return 0xE;
615

616 617 618
	/* Unspecified timeout, assume max */
	if (!data && !cmd->cmd_timeout_ms)
		return 0xE;
619

620 621 622 623 624 625
	/* timeout in us */
	if (!data)
		target_timeout = cmd->cmd_timeout_ms * 1000;
	else
		target_timeout = data->timeout_ns / 1000 +
			data->timeout_clks / host->clock;
626

627 628 629
	if (host->quirks & SDHCI_QUIRK_DATA_TIMEOUT_USES_SDCLK)
		host->timeout_clk = host->clock / 1000;

630 631 632 633 634 635 636 637 638 639
	/*
	 * Figure out needed cycles.
	 * We do this in steps in order to fit inside a 32 bit int.
	 * The first step is the minimum timeout, which will have a
	 * minimum resolution of 6 bits:
	 * (1) 2^13*1000 > 2^22,
	 * (2) host->timeout_clk < 2^16
	 *     =>
	 *     (1) / (2) > 2^6
	 */
640
	BUG_ON(!host->timeout_clk);
641 642 643 644 645 646 647 648 649 650
	count = 0;
	current_timeout = (1 << 13) * 1000 / host->timeout_clk;
	while (current_timeout < target_timeout) {
		count++;
		current_timeout <<= 1;
		if (count >= 0xF)
			break;
	}

	if (count >= 0xF) {
651 652
		printk(KERN_WARNING "%s: Too large timeout requested for CMD%d!\n",
		       mmc_hostname(host->mmc), cmd->opcode);
653 654 655
		count = 0xE;
	}

656 657 658
	return count;
}

659 660 661 662 663 664 665 666 667 668 669
static void sdhci_set_transfer_irqs(struct sdhci_host *host)
{
	u32 pio_irqs = SDHCI_INT_DATA_AVAIL | SDHCI_INT_SPACE_AVAIL;
	u32 dma_irqs = SDHCI_INT_DMA_END | SDHCI_INT_ADMA_ERROR;

	if (host->flags & SDHCI_REQ_USE_DMA)
		sdhci_clear_set_irqs(host, pio_irqs, dma_irqs);
	else
		sdhci_clear_set_irqs(host, dma_irqs, pio_irqs);
}

670
static void sdhci_prepare_data(struct sdhci_host *host, struct mmc_command *cmd)
671 672
{
	u8 count;
673
	u8 ctrl;
674
	struct mmc_data *data = cmd->data;
675
	int ret;
676 677 678

	WARN_ON(host->data);

679 680 681 682 683 684
	if (data || (cmd->flags & MMC_RSP_BUSY)) {
		count = sdhci_calc_timeout(host, cmd);
		sdhci_writeb(host, count, SDHCI_TIMEOUT_CONTROL);
	}

	if (!data)
685 686 687 688 689 690 691 692 693
		return;

	/* Sanity checks */
	BUG_ON(data->blksz * data->blocks > 524288);
	BUG_ON(data->blksz > host->mmc->max_blk_size);
	BUG_ON(data->blocks > 65535);

	host->data = data;
	host->data_early = 0;
694
	host->data->bytes_xfered = 0;
695

696
	if (host->flags & (SDHCI_USE_SDMA | SDHCI_USE_ADMA))
697 698
		host->flags |= SDHCI_REQ_USE_DMA;

699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726
	/*
	 * FIXME: This doesn't account for merging when mapping the
	 * scatterlist.
	 */
	if (host->flags & SDHCI_REQ_USE_DMA) {
		int broken, i;
		struct scatterlist *sg;

		broken = 0;
		if (host->flags & SDHCI_USE_ADMA) {
			if (host->quirks & SDHCI_QUIRK_32BIT_ADMA_SIZE)
				broken = 1;
		} else {
			if (host->quirks & SDHCI_QUIRK_32BIT_DMA_SIZE)
				broken = 1;
		}

		if (unlikely(broken)) {
			for_each_sg(data->sg, sg, data->sg_len, i) {
				if (sg->length & 0x3) {
					DBG("Reverting to PIO because of "
						"transfer size (%d)\n",
						sg->length);
					host->flags &= ~SDHCI_REQ_USE_DMA;
					break;
				}
			}
		}
727 728 729 730 731 732
	}

	/*
	 * The assumption here being that alignment is the same after
	 * translation to device address space.
	 */
733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762
	if (host->flags & SDHCI_REQ_USE_DMA) {
		int broken, i;
		struct scatterlist *sg;

		broken = 0;
		if (host->flags & SDHCI_USE_ADMA) {
			/*
			 * As we use 3 byte chunks to work around
			 * alignment problems, we need to check this
			 * quirk.
			 */
			if (host->quirks & SDHCI_QUIRK_32BIT_ADMA_SIZE)
				broken = 1;
		} else {
			if (host->quirks & SDHCI_QUIRK_32BIT_DMA_ADDR)
				broken = 1;
		}

		if (unlikely(broken)) {
			for_each_sg(data->sg, sg, data->sg_len, i) {
				if (sg->offset & 0x3) {
					DBG("Reverting to PIO because of "
						"bad alignment\n");
					host->flags &= ~SDHCI_REQ_USE_DMA;
					break;
				}
			}
		}
	}

763 764 765 766 767 768 769 770 771
	if (host->flags & SDHCI_REQ_USE_DMA) {
		if (host->flags & SDHCI_USE_ADMA) {
			ret = sdhci_adma_table_pre(host, data);
			if (ret) {
				/*
				 * This only happens when someone fed
				 * us an invalid request.
				 */
				WARN_ON(1);
772
				host->flags &= ~SDHCI_REQ_USE_DMA;
773
			} else {
774 775
				sdhci_writel(host, host->adma_addr,
					SDHCI_ADMA_ADDRESS);
776 777
			}
		} else {
778
			int sg_cnt;
779

780
			sg_cnt = dma_map_sg(mmc_dev(host->mmc),
781 782 783 784
					data->sg, data->sg_len,
					(data->flags & MMC_DATA_READ) ?
						DMA_FROM_DEVICE :
						DMA_TO_DEVICE);
785
			if (sg_cnt == 0) {
786 787 788 789 790
				/*
				 * This only happens when someone fed
				 * us an invalid request.
				 */
				WARN_ON(1);
791
				host->flags &= ~SDHCI_REQ_USE_DMA;
792
			} else {
793
				WARN_ON(sg_cnt != 1);
794 795
				sdhci_writel(host, sg_dma_address(data->sg),
					SDHCI_DMA_ADDRESS);
796 797 798 799
			}
		}
	}

800 801 802 803 804 805
	/*
	 * Always adjust the DMA selection as some controllers
	 * (e.g. JMicron) can't do PIO properly when the selection
	 * is ADMA.
	 */
	if (host->version >= SDHCI_SPEC_200) {
806
		ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
807 808 809 810 811 812
		ctrl &= ~SDHCI_CTRL_DMA_MASK;
		if ((host->flags & SDHCI_REQ_USE_DMA) &&
			(host->flags & SDHCI_USE_ADMA))
			ctrl |= SDHCI_CTRL_ADMA32;
		else
			ctrl |= SDHCI_CTRL_SDMA;
813
		sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
814 815
	}

816
	if (!(host->flags & SDHCI_REQ_USE_DMA)) {
817 818 819 820 821 822 823 824
		int flags;

		flags = SG_MITER_ATOMIC;
		if (host->data->flags & MMC_DATA_READ)
			flags |= SG_MITER_TO_SG;
		else
			flags |= SG_MITER_FROM_SG;
		sg_miter_start(&host->sg_miter, data->sg, data->sg_len, flags);
825
		host->blocks = data->blocks;
826
	}
827

828 829
	sdhci_set_transfer_irqs(host);

830 831 832
	/* Set the DMA boundary value and block size */
	sdhci_writew(host, SDHCI_MAKE_BLKSZ(SDHCI_DEFAULT_BOUNDARY_ARG,
		data->blksz), SDHCI_BLOCK_SIZE);
833
	sdhci_writew(host, data->blocks, SDHCI_BLOCK_COUNT);
834 835 836 837 838 839 840 841 842 843
}

static void sdhci_set_transfer_mode(struct sdhci_host *host,
	struct mmc_data *data)
{
	u16 mode;

	if (data == NULL)
		return;

844 845
	WARN_ON(!host->data);

846
	mode = SDHCI_TRNS_BLK_CNT_EN;
847 848 849 850 851 852
	if (data->blocks > 1) {
		if (host->quirks & SDHCI_QUIRK_MULTIBLOCK_READ_ACMD12)
			mode |= SDHCI_TRNS_MULTI | SDHCI_TRNS_ACMD12;
		else
			mode |= SDHCI_TRNS_MULTI;
	}
853 854
	if (data->flags & MMC_DATA_READ)
		mode |= SDHCI_TRNS_READ;
855
	if (host->flags & SDHCI_REQ_USE_DMA)
856 857
		mode |= SDHCI_TRNS_DMA;

858
	sdhci_writew(host, mode, SDHCI_TRANSFER_MODE);
859 860 861 862 863 864 865 866 867 868 869
}

static void sdhci_finish_data(struct sdhci_host *host)
{
	struct mmc_data *data;

	BUG_ON(!host->data);

	data = host->data;
	host->data = NULL;

870
	if (host->flags & SDHCI_REQ_USE_DMA) {
871 872 873 874 875 876 877
		if (host->flags & SDHCI_USE_ADMA)
			sdhci_adma_table_post(host, data);
		else {
			dma_unmap_sg(mmc_dev(host->mmc), data->sg,
				data->sg_len, (data->flags & MMC_DATA_READ) ?
					DMA_FROM_DEVICE : DMA_TO_DEVICE);
		}
878 879 880
	}

	/*
881 882 883 884 885
	 * The specification states that the block count register must
	 * be updated, but it does not specify at what point in the
	 * data flow. That makes the register entirely useless to read
	 * back so we have to assume that nothing made it to the card
	 * in the event of an error.
886
	 */
887 888
	if (data->error)
		data->bytes_xfered = 0;
889
	else
890
		data->bytes_xfered = data->blksz * data->blocks;
891 892 893 894 895 896

	if (data->stop) {
		/*
		 * The controller needs a reset of internal state machines
		 * upon error conditions.
		 */
P
Pierre Ossman 已提交
897
		if (data->error) {
898 899 900 901 902 903 904 905 906 907 908 909
			sdhci_reset(host, SDHCI_RESET_CMD);
			sdhci_reset(host, SDHCI_RESET_DATA);
		}

		sdhci_send_command(host, data->stop);
	} else
		tasklet_schedule(&host->finish_tasklet);
}

static void sdhci_send_command(struct sdhci_host *host, struct mmc_command *cmd)
{
	int flags;
910
	u32 mask;
911
	unsigned long timeout;
912 913 914 915

	WARN_ON(host->cmd);

	/* Wait max 10 ms */
916
	timeout = 10;
917 918 919 920 921 922 923 924 925 926

	mask = SDHCI_CMD_INHIBIT;
	if ((cmd->data != NULL) || (cmd->flags & MMC_RSP_BUSY))
		mask |= SDHCI_DATA_INHIBIT;

	/* We shouldn't wait for data inihibit for stop commands, even
	   though they might use busy signaling */
	if (host->mrq->data && (cmd == host->mrq->data->stop))
		mask &= ~SDHCI_DATA_INHIBIT;

927
	while (sdhci_readl(host, SDHCI_PRESENT_STATE) & mask) {
928
		if (timeout == 0) {
929
			printk(KERN_ERR "%s: Controller never released "
P
Pierre Ossman 已提交
930
				"inhibit bit(s).\n", mmc_hostname(host->mmc));
931
			sdhci_dumpregs(host);
P
Pierre Ossman 已提交
932
			cmd->error = -EIO;
933 934 935
			tasklet_schedule(&host->finish_tasklet);
			return;
		}
936 937 938
		timeout--;
		mdelay(1);
	}
939 940 941 942 943

	mod_timer(&host->timer, jiffies + 10 * HZ);

	host->cmd = cmd;

944
	sdhci_prepare_data(host, cmd);
945

946
	sdhci_writel(host, cmd->arg, SDHCI_ARGUMENT);
947

948 949
	sdhci_set_transfer_mode(host, cmd->data);

950
	if ((cmd->flags & MMC_RSP_136) && (cmd->flags & MMC_RSP_BUSY)) {
P
Pierre Ossman 已提交
951
		printk(KERN_ERR "%s: Unsupported response type!\n",
952
			mmc_hostname(host->mmc));
P
Pierre Ossman 已提交
953
		cmd->error = -EINVAL;
954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973
		tasklet_schedule(&host->finish_tasklet);
		return;
	}

	if (!(cmd->flags & MMC_RSP_PRESENT))
		flags = SDHCI_CMD_RESP_NONE;
	else if (cmd->flags & MMC_RSP_136)
		flags = SDHCI_CMD_RESP_LONG;
	else if (cmd->flags & MMC_RSP_BUSY)
		flags = SDHCI_CMD_RESP_SHORT_BUSY;
	else
		flags = SDHCI_CMD_RESP_SHORT;

	if (cmd->flags & MMC_RSP_CRC)
		flags |= SDHCI_CMD_CRC;
	if (cmd->flags & MMC_RSP_OPCODE)
		flags |= SDHCI_CMD_INDEX;
	if (cmd->data)
		flags |= SDHCI_CMD_DATA;

974
	sdhci_writew(host, SDHCI_MAKE_CMD(cmd->opcode, flags), SDHCI_COMMAND);
975 976 977 978 979 980 981 982 983 984 985 986
}

static void sdhci_finish_command(struct sdhci_host *host)
{
	int i;

	BUG_ON(host->cmd == NULL);

	if (host->cmd->flags & MMC_RSP_PRESENT) {
		if (host->cmd->flags & MMC_RSP_136) {
			/* CRC is stripped so we need to do some shifting. */
			for (i = 0;i < 4;i++) {
987
				host->cmd->resp[i] = sdhci_readl(host,
988 989 990
					SDHCI_RESPONSE + (3-i)*4) << 8;
				if (i != 3)
					host->cmd->resp[i] |=
991
						sdhci_readb(host,
992 993 994
						SDHCI_RESPONSE + (3-i)*4-1);
			}
		} else {
995
			host->cmd->resp[0] = sdhci_readl(host, SDHCI_RESPONSE);
996 997 998
		}
	}

P
Pierre Ossman 已提交
999
	host->cmd->error = 0;
1000

1001 1002 1003 1004
	if (host->data && host->data_early)
		sdhci_finish_data(host);

	if (!host->cmd->data)
1005 1006 1007 1008 1009 1010 1011 1012 1013
		tasklet_schedule(&host->finish_tasklet);

	host->cmd = NULL;
}

static void sdhci_set_clock(struct sdhci_host *host, unsigned int clock)
{
	int div;
	u16 clk;
1014
	unsigned long timeout;
1015 1016 1017 1018

	if (clock == host->clock)
		return;

1019 1020 1021 1022 1023 1024
	if (host->ops->set_clock) {
		host->ops->set_clock(host, clock);
		if (host->quirks & SDHCI_QUIRK_NONSTANDARD_CLOCK)
			return;
	}

1025
	sdhci_writew(host, 0, SDHCI_CLOCK_CONTROL);
1026 1027 1028 1029

	if (clock == 0)
		goto out;

1030 1031 1032 1033 1034
	if (host->version >= SDHCI_SPEC_300) {
		/* Version 3.00 divisors must be a multiple of 2. */
		if (host->max_clk <= clock)
			div = 1;
		else {
1035
			for (div = 2; div < SDHCI_MAX_DIV_SPEC_300; div += 2) {
1036 1037 1038 1039 1040 1041
				if ((host->max_clk / div) <= clock)
					break;
			}
		}
	} else {
		/* Version 2.00 divisors must be a power of 2. */
1042
		for (div = 1; div < SDHCI_MAX_DIV_SPEC_200; div *= 2) {
1043 1044 1045
			if ((host->max_clk / div) <= clock)
				break;
		}
1046 1047 1048
	}
	div >>= 1;

1049 1050 1051
	clk = (div & SDHCI_DIV_MASK) << SDHCI_DIVIDER_SHIFT;
	clk |= ((div & SDHCI_DIV_HI_MASK) >> SDHCI_DIV_MASK_LEN)
		<< SDHCI_DIVIDER_HI_SHIFT;
1052
	clk |= SDHCI_CLOCK_INT_EN;
1053
	sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);
1054

1055 1056
	/* Wait max 20 ms */
	timeout = 20;
1057
	while (!((clk = sdhci_readw(host, SDHCI_CLOCK_CONTROL))
1058 1059
		& SDHCI_CLOCK_INT_STABLE)) {
		if (timeout == 0) {
P
Pierre Ossman 已提交
1060 1061
			printk(KERN_ERR "%s: Internal clock never "
				"stabilised.\n", mmc_hostname(host->mmc));
1062 1063 1064
			sdhci_dumpregs(host);
			return;
		}
1065 1066 1067
		timeout--;
		mdelay(1);
	}
1068 1069

	clk |= SDHCI_CLOCK_CARD_EN;
1070
	sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);
1071 1072 1073 1074 1075

out:
	host->clock = clock;
}

1076 1077
static void sdhci_set_power(struct sdhci_host *host, unsigned short power)
{
1078
	u8 pwr = 0;
1079

1080
	if (power != (unsigned short)-1) {
1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098
		switch (1 << power) {
		case MMC_VDD_165_195:
			pwr = SDHCI_POWER_180;
			break;
		case MMC_VDD_29_30:
		case MMC_VDD_30_31:
			pwr = SDHCI_POWER_300;
			break;
		case MMC_VDD_32_33:
		case MMC_VDD_33_34:
			pwr = SDHCI_POWER_330;
			break;
		default:
			BUG();
		}
	}

	if (host->pwr == pwr)
1099 1100
		return;

1101 1102 1103
	host->pwr = pwr;

	if (pwr == 0) {
1104
		sdhci_writeb(host, 0, SDHCI_POWER_CONTROL);
1105
		return;
1106 1107 1108 1109 1110 1111
	}

	/*
	 * Spec says that we should clear the power reg before setting
	 * a new value. Some controllers don't seem to like this though.
	 */
1112
	if (!(host->quirks & SDHCI_QUIRK_SINGLE_POWER_WRITE))
1113
		sdhci_writeb(host, 0, SDHCI_POWER_CONTROL);
1114

1115
	/*
1116
	 * At least the Marvell CaFe chip gets confused if we set the voltage
1117 1118
	 * and set turn on power at the same time, so set the voltage first.
	 */
1119
	if (host->quirks & SDHCI_QUIRK_NO_SIMULT_VDD_AND_POWER)
1120
		sdhci_writeb(host, pwr, SDHCI_POWER_CONTROL);
1121

1122
	pwr |= SDHCI_POWER_ON;
1123

1124
	sdhci_writeb(host, pwr, SDHCI_POWER_CONTROL);
1125 1126 1127 1128 1129

	/*
	 * Some controllers need an extra 10ms delay of 10ms before they
	 * can apply clock after applying power
	 */
1130
	if (host->quirks & SDHCI_QUIRK_DELAY_AFTER_POWER)
1131
		mdelay(10);
1132 1133
}

1134 1135 1136 1137 1138 1139 1140 1141 1142
/*****************************************************************************\
 *                                                                           *
 * MMC callbacks                                                             *
 *                                                                           *
\*****************************************************************************/

static void sdhci_request(struct mmc_host *mmc, struct mmc_request *mrq)
{
	struct sdhci_host *host;
1143
	bool present;
1144 1145 1146 1147 1148 1149 1150 1151
	unsigned long flags;

	host = mmc_priv(mmc);

	spin_lock_irqsave(&host->lock, flags);

	WARN_ON(host->mrq != NULL);

1152
#ifndef SDHCI_USE_LEDS_CLASS
1153
	sdhci_activate_led(host);
1154
#endif
1155 1156 1157 1158 1159 1160
	if (host->quirks & SDHCI_QUIRK_MULTIBLOCK_READ_ACMD12) {
		if (mrq->stop) {
			mrq->data->stop = NULL;
			mrq->stop = NULL;
		}
	}
1161 1162 1163

	host->mrq = mrq;

1164 1165 1166 1167 1168 1169 1170 1171
	/* If polling, assume that the card is always present. */
	if (host->quirks & SDHCI_QUIRK_BROKEN_CARD_DETECTION)
		present = true;
	else
		present = sdhci_readl(host, SDHCI_PRESENT_STATE) &
				SDHCI_CARD_PRESENT;

	if (!present || host->flags & SDHCI_DEVICE_DEAD) {
P
Pierre Ossman 已提交
1172
		host->mrq->cmd->error = -ENOMEDIUM;
1173 1174 1175 1176
		tasklet_schedule(&host->finish_tasklet);
	} else
		sdhci_send_command(host, mrq->cmd);

1177
	mmiowb();
1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190
	spin_unlock_irqrestore(&host->lock, flags);
}

static void sdhci_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
{
	struct sdhci_host *host;
	unsigned long flags;
	u8 ctrl;

	host = mmc_priv(mmc);

	spin_lock_irqsave(&host->lock, flags);

P
Pierre Ossman 已提交
1191 1192 1193
	if (host->flags & SDHCI_DEVICE_DEAD)
		goto out;

1194 1195 1196 1197 1198
	/*
	 * Reset the chip on each power off.
	 * Should clear out any weird states.
	 */
	if (ios->power_mode == MMC_POWER_OFF) {
1199
		sdhci_writel(host, 0, SDHCI_SIGNAL_ENABLE);
1200
		sdhci_reinit(host);
1201 1202 1203 1204 1205
	}

	sdhci_set_clock(host, ios->clock);

	if (ios->power_mode == MMC_POWER_OFF)
1206
		sdhci_set_power(host, -1);
1207
	else
1208
		sdhci_set_power(host, ios->vdd);
1209

1210 1211 1212
	if (host->ops->platform_send_init_74_clocks)
		host->ops->platform_send_init_74_clocks(host, ios->power_mode);

1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235
	/*
	 * If your platform has 8-bit width support but is not a v3 controller,
	 * or if it requires special setup code, you should implement that in
	 * platform_8bit_width().
	 */
	if (host->ops->platform_8bit_width)
		host->ops->platform_8bit_width(host, ios->bus_width);
	else {
		ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
		if (ios->bus_width == MMC_BUS_WIDTH_8) {
			ctrl &= ~SDHCI_CTRL_4BITBUS;
			if (host->version >= SDHCI_SPEC_300)
				ctrl |= SDHCI_CTRL_8BITBUS;
		} else {
			if (host->version >= SDHCI_SPEC_300)
				ctrl &= ~SDHCI_CTRL_8BITBUS;
			if (ios->bus_width == MMC_BUS_WIDTH_4)
				ctrl |= SDHCI_CTRL_4BITBUS;
			else
				ctrl &= ~SDHCI_CTRL_4BITBUS;
		}
		sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
	}
1236

1237
	ctrl = sdhci_readb(host, SDHCI_HOST_CONTROL);
1238

1239 1240 1241
	if ((ios->timing == MMC_TIMING_SD_HS ||
	     ios->timing == MMC_TIMING_MMC_HS)
	    && !(host->quirks & SDHCI_QUIRK_NO_HISPD_BIT))
1242 1243 1244 1245
		ctrl |= SDHCI_CTRL_HISPD;
	else
		ctrl &= ~SDHCI_CTRL_HISPD;

1246
	sdhci_writeb(host, ctrl, SDHCI_HOST_CONTROL);
1247

1248 1249 1250 1251 1252
	/*
	 * Some (ENE) controllers go apeshit on some ios operation,
	 * signalling timeout and CRC errors even on CMD0. Resetting
	 * it on each ios seems to solve the problem.
	 */
1253
	if(host->quirks & SDHCI_QUIRK_RESET_CMD_DATA_ON_IOS)
1254 1255
		sdhci_reset(host, SDHCI_RESET_CMD | SDHCI_RESET_DATA);

P
Pierre Ossman 已提交
1256
out:
1257
	mmiowb();
1258 1259 1260
	spin_unlock_irqrestore(&host->lock, flags);
}

1261
static int check_ro(struct sdhci_host *host)
1262 1263
{
	unsigned long flags;
1264
	int is_readonly;
1265 1266 1267

	spin_lock_irqsave(&host->lock, flags);

P
Pierre Ossman 已提交
1268
	if (host->flags & SDHCI_DEVICE_DEAD)
1269 1270 1271
		is_readonly = 0;
	else if (host->ops->get_ro)
		is_readonly = host->ops->get_ro(host);
P
Pierre Ossman 已提交
1272
	else
1273 1274
		is_readonly = !(sdhci_readl(host, SDHCI_PRESENT_STATE)
				& SDHCI_WRITE_PROTECT);
1275 1276 1277

	spin_unlock_irqrestore(&host->lock, flags);

1278 1279 1280
	/* This quirk needs to be replaced by a callback-function later */
	return host->quirks & SDHCI_QUIRK_INVERTED_WRITE_PROTECT ?
		!is_readonly : is_readonly;
1281 1282
}

1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305
#define SAMPLE_COUNT	5

static int sdhci_get_ro(struct mmc_host *mmc)
{
	struct sdhci_host *host;
	int i, ro_count;

	host = mmc_priv(mmc);

	if (!(host->quirks & SDHCI_QUIRK_UNSTABLE_RO_DETECT))
		return check_ro(host);

	ro_count = 0;
	for (i = 0; i < SAMPLE_COUNT; i++) {
		if (check_ro(host)) {
			if (++ro_count > SAMPLE_COUNT / 2)
				return 1;
		}
		msleep(30);
	}
	return 0;
}

P
Pierre Ossman 已提交
1306 1307 1308 1309 1310 1311 1312 1313 1314
static void sdhci_enable_sdio_irq(struct mmc_host *mmc, int enable)
{
	struct sdhci_host *host;
	unsigned long flags;

	host = mmc_priv(mmc);

	spin_lock_irqsave(&host->lock, flags);

P
Pierre Ossman 已提交
1315 1316 1317
	if (host->flags & SDHCI_DEVICE_DEAD)
		goto out;

P
Pierre Ossman 已提交
1318
	if (enable)
1319 1320 1321
		sdhci_unmask_irqs(host, SDHCI_INT_CARD_INT);
	else
		sdhci_mask_irqs(host, SDHCI_INT_CARD_INT);
P
Pierre Ossman 已提交
1322
out:
P
Pierre Ossman 已提交
1323 1324 1325 1326 1327
	mmiowb();

	spin_unlock_irqrestore(&host->lock, flags);
}

1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429
static int sdhci_start_signal_voltage_switch(struct mmc_host *mmc,
	struct mmc_ios *ios)
{
	struct sdhci_host *host;
	u8 pwr;
	u16 clk, ctrl;
	u32 present_state;

	host = mmc_priv(mmc);

	/*
	 * Signal Voltage Switching is only applicable for Host Controllers
	 * v3.00 and above.
	 */
	if (host->version < SDHCI_SPEC_300)
		return 0;

	/*
	 * We first check whether the request is to set signalling voltage
	 * to 3.3V. If so, we change the voltage to 3.3V and return quickly.
	 */
	ctrl = sdhci_readw(host, SDHCI_HOST_CONTROL2);
	if (ios->signal_voltage == MMC_SIGNAL_VOLTAGE_330) {
		/* Set 1.8V Signal Enable in the Host Control2 register to 0 */
		ctrl &= ~SDHCI_CTRL_VDD_180;
		sdhci_writew(host, ctrl, SDHCI_HOST_CONTROL2);

		/* Wait for 5ms */
		usleep_range(5000, 5500);

		/* 3.3V regulator output should be stable within 5 ms */
		ctrl = sdhci_readw(host, SDHCI_HOST_CONTROL2);
		if (!(ctrl & SDHCI_CTRL_VDD_180))
			return 0;
		else {
			printk(KERN_INFO DRIVER_NAME ": Switching to 3.3V "
				"signalling voltage failed\n");
			return -EIO;
		}
	} else if (!(ctrl & SDHCI_CTRL_VDD_180) &&
		  (ios->signal_voltage == MMC_SIGNAL_VOLTAGE_180)) {
		/* Stop SDCLK */
		clk = sdhci_readw(host, SDHCI_CLOCK_CONTROL);
		clk &= ~SDHCI_CLOCK_CARD_EN;
		sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);

		/* Check whether DAT[3:0] is 0000 */
		present_state = sdhci_readl(host, SDHCI_PRESENT_STATE);
		if (!((present_state & SDHCI_DATA_LVL_MASK) >>
		       SDHCI_DATA_LVL_SHIFT)) {
			/*
			 * Enable 1.8V Signal Enable in the Host Control2
			 * register
			 */
			ctrl |= SDHCI_CTRL_VDD_180;
			sdhci_writew(host, ctrl, SDHCI_HOST_CONTROL2);

			/* Wait for 5ms */
			usleep_range(5000, 5500);

			ctrl = sdhci_readw(host, SDHCI_HOST_CONTROL2);
			if (ctrl & SDHCI_CTRL_VDD_180) {
				/* Provide SDCLK again and wait for 1ms*/
				clk = sdhci_readw(host, SDHCI_CLOCK_CONTROL);
				clk |= SDHCI_CLOCK_CARD_EN;
				sdhci_writew(host, clk, SDHCI_CLOCK_CONTROL);
				usleep_range(1000, 1500);

				/*
				 * If DAT[3:0] level is 1111b, then the card
				 * was successfully switched to 1.8V signaling.
				 */
				present_state = sdhci_readl(host,
							SDHCI_PRESENT_STATE);
				if ((present_state & SDHCI_DATA_LVL_MASK) ==
				     SDHCI_DATA_LVL_MASK)
					return 0;
			}
		}

		/*
		 * If we are here, that means the switch to 1.8V signaling
		 * failed. We power cycle the card, and retry initialization
		 * sequence by setting S18R to 0.
		 */
		pwr = sdhci_readb(host, SDHCI_POWER_CONTROL);
		pwr &= ~SDHCI_POWER_ON;
		sdhci_writeb(host, pwr, SDHCI_POWER_CONTROL);

		/* Wait for 1ms as per the spec */
		usleep_range(1000, 1500);
		pwr |= SDHCI_POWER_ON;
		sdhci_writeb(host, pwr, SDHCI_POWER_CONTROL);

		printk(KERN_INFO DRIVER_NAME ": Switching to 1.8V signalling "
			"voltage failed, retrying with S18R set to 0\n");
		return -EAGAIN;
	} else
		/* No signal voltage switch required */
		return 0;
}

1430
static const struct mmc_host_ops sdhci_ops = {
1431 1432 1433
	.request	= sdhci_request,
	.set_ios	= sdhci_set_ios,
	.get_ro		= sdhci_get_ro,
P
Pierre Ossman 已提交
1434
	.enable_sdio_irq = sdhci_enable_sdio_irq,
1435
	.start_signal_voltage_switch	= sdhci_start_signal_voltage_switch,
1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452
};

/*****************************************************************************\
 *                                                                           *
 * Tasklets                                                                  *
 *                                                                           *
\*****************************************************************************/

static void sdhci_tasklet_card(unsigned long param)
{
	struct sdhci_host *host;
	unsigned long flags;

	host = (struct sdhci_host*)param;

	spin_lock_irqsave(&host->lock, flags);

1453
	if (!(sdhci_readl(host, SDHCI_PRESENT_STATE) & SDHCI_CARD_PRESENT)) {
1454 1455 1456 1457 1458 1459 1460 1461 1462
		if (host->mrq) {
			printk(KERN_ERR "%s: Card removed during transfer!\n",
				mmc_hostname(host->mmc));
			printk(KERN_ERR "%s: Resetting controller.\n",
				mmc_hostname(host->mmc));

			sdhci_reset(host, SDHCI_RESET_CMD);
			sdhci_reset(host, SDHCI_RESET_DATA);

P
Pierre Ossman 已提交
1463
			host->mrq->cmd->error = -ENOMEDIUM;
1464 1465 1466 1467 1468 1469
			tasklet_schedule(&host->finish_tasklet);
		}
	}

	spin_unlock_irqrestore(&host->lock, flags);

P
Pierre Ossman 已提交
1470
	mmc_detect_change(host->mmc, msecs_to_jiffies(200));
1471 1472 1473 1474 1475 1476 1477 1478 1479 1480
}

static void sdhci_tasklet_finish(unsigned long param)
{
	struct sdhci_host *host;
	unsigned long flags;
	struct mmc_request *mrq;

	host = (struct sdhci_host*)param;

1481 1482 1483 1484 1485 1486 1487
        /*
         * If this tasklet gets rescheduled while running, it will
         * be run again afterwards but without any active request.
         */
	if (!host->mrq)
		return;

1488 1489 1490 1491 1492 1493 1494 1495 1496 1497
	spin_lock_irqsave(&host->lock, flags);

	del_timer(&host->timer);

	mrq = host->mrq;

	/*
	 * The controller needs a reset of internal state machines
	 * upon error conditions.
	 */
P
Pierre Ossman 已提交
1498
	if (!(host->flags & SDHCI_DEVICE_DEAD) &&
1499
	    ((mrq->cmd && mrq->cmd->error) ||
P
Pierre Ossman 已提交
1500 1501 1502
		 (mrq->data && (mrq->data->error ||
		  (mrq->data->stop && mrq->data->stop->error))) ||
		   (host->quirks & SDHCI_QUIRK_RESET_AFTER_REQUEST))) {
1503 1504

		/* Some controllers need this kick or reset won't work here */
1505
		if (host->quirks & SDHCI_QUIRK_CLOCK_BEFORE_RESET) {
1506 1507 1508 1509 1510 1511 1512 1513 1514 1515
			unsigned int clock;

			/* This is to force an update */
			clock = host->clock;
			host->clock = 0;
			sdhci_set_clock(host, clock);
		}

		/* Spec says we should do both at the same time, but Ricoh
		   controllers do not like that. */
1516 1517 1518 1519 1520 1521 1522 1523
		sdhci_reset(host, SDHCI_RESET_CMD);
		sdhci_reset(host, SDHCI_RESET_DATA);
	}

	host->mrq = NULL;
	host->cmd = NULL;
	host->data = NULL;

1524
#ifndef SDHCI_USE_LEDS_CLASS
1525
	sdhci_deactivate_led(host);
1526
#endif
1527

1528
	mmiowb();
1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543
	spin_unlock_irqrestore(&host->lock, flags);

	mmc_request_done(host->mmc, mrq);
}

static void sdhci_timeout_timer(unsigned long data)
{
	struct sdhci_host *host;
	unsigned long flags;

	host = (struct sdhci_host*)data;

	spin_lock_irqsave(&host->lock, flags);

	if (host->mrq) {
P
Pierre Ossman 已提交
1544 1545
		printk(KERN_ERR "%s: Timeout waiting for hardware "
			"interrupt.\n", mmc_hostname(host->mmc));
1546 1547 1548
		sdhci_dumpregs(host);

		if (host->data) {
P
Pierre Ossman 已提交
1549
			host->data->error = -ETIMEDOUT;
1550 1551 1552
			sdhci_finish_data(host);
		} else {
			if (host->cmd)
P
Pierre Ossman 已提交
1553
				host->cmd->error = -ETIMEDOUT;
1554
			else
P
Pierre Ossman 已提交
1555
				host->mrq->cmd->error = -ETIMEDOUT;
1556 1557 1558 1559 1560

			tasklet_schedule(&host->finish_tasklet);
		}
	}

1561
	mmiowb();
1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575
	spin_unlock_irqrestore(&host->lock, flags);
}

/*****************************************************************************\
 *                                                                           *
 * Interrupt handling                                                        *
 *                                                                           *
\*****************************************************************************/

static void sdhci_cmd_irq(struct sdhci_host *host, u32 intmask)
{
	BUG_ON(intmask == 0);

	if (!host->cmd) {
1576 1577 1578
		printk(KERN_ERR "%s: Got command interrupt 0x%08x even "
			"though no command operation was in progress.\n",
			mmc_hostname(host->mmc), (unsigned)intmask);
1579 1580 1581 1582
		sdhci_dumpregs(host);
		return;
	}

1583
	if (intmask & SDHCI_INT_TIMEOUT)
P
Pierre Ossman 已提交
1584 1585 1586 1587
		host->cmd->error = -ETIMEDOUT;
	else if (intmask & (SDHCI_INT_CRC | SDHCI_INT_END_BIT |
			SDHCI_INT_INDEX))
		host->cmd->error = -EILSEQ;
1588

1589
	if (host->cmd->error) {
1590
		tasklet_schedule(&host->finish_tasklet);
1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608
		return;
	}

	/*
	 * The host can send and interrupt when the busy state has
	 * ended, allowing us to wait without wasting CPU cycles.
	 * Unfortunately this is overloaded on the "data complete"
	 * interrupt, so we need to take some care when handling
	 * it.
	 *
	 * Note: The 1.0 specification is a bit ambiguous about this
	 *       feature so there might be some problems with older
	 *       controllers.
	 */
	if (host->cmd->flags & MMC_RSP_BUSY) {
		if (host->cmd->data)
			DBG("Cannot wait for busy signal when also "
				"doing a data transfer");
1609
		else if (!(host->quirks & SDHCI_QUIRK_NO_BUSY_IRQ))
1610
			return;
1611 1612 1613

		/* The controller does not support the end-of-busy IRQ,
		 * fall through and take the SDHCI_INT_RESPONSE */
1614 1615 1616
	}

	if (intmask & SDHCI_INT_RESPONSE)
1617
		sdhci_finish_command(host);
1618 1619
}

1620
#ifdef CONFIG_MMC_DEBUG
1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648
static void sdhci_show_adma_error(struct sdhci_host *host)
{
	const char *name = mmc_hostname(host->mmc);
	u8 *desc = host->adma_desc;
	__le32 *dma;
	__le16 *len;
	u8 attr;

	sdhci_dumpregs(host);

	while (true) {
		dma = (__le32 *)(desc + 4);
		len = (__le16 *)(desc + 2);
		attr = *desc;

		DBG("%s: %p: DMA 0x%08x, LEN 0x%04x, Attr=0x%02x\n",
		    name, desc, le32_to_cpu(*dma), le16_to_cpu(*len), attr);

		desc += 8;

		if (attr & 2)
			break;
	}
}
#else
static void sdhci_show_adma_error(struct sdhci_host *host) { }
#endif

1649 1650 1651 1652 1653 1654
static void sdhci_data_irq(struct sdhci_host *host, u32 intmask)
{
	BUG_ON(intmask == 0);

	if (!host->data) {
		/*
1655 1656 1657
		 * The "data complete" interrupt is also used to
		 * indicate that a busy state has ended. See comment
		 * above in sdhci_cmd_irq().
1658
		 */
1659 1660 1661 1662 1663 1664
		if (host->cmd && (host->cmd->flags & MMC_RSP_BUSY)) {
			if (intmask & SDHCI_INT_DATA_END) {
				sdhci_finish_command(host);
				return;
			}
		}
1665

1666 1667 1668
		printk(KERN_ERR "%s: Got data interrupt 0x%08x even "
			"though no data operation was in progress.\n",
			mmc_hostname(host->mmc), (unsigned)intmask);
1669 1670 1671 1672 1673 1674
		sdhci_dumpregs(host);

		return;
	}

	if (intmask & SDHCI_INT_DATA_TIMEOUT)
P
Pierre Ossman 已提交
1675
		host->data->error = -ETIMEDOUT;
1676 1677 1678 1679 1680
	else if (intmask & SDHCI_INT_DATA_END_BIT)
		host->data->error = -EILSEQ;
	else if ((intmask & SDHCI_INT_DATA_CRC) &&
		SDHCI_GET_CMD(sdhci_readw(host, SDHCI_COMMAND))
			!= MMC_BUS_TEST_R)
P
Pierre Ossman 已提交
1681
		host->data->error = -EILSEQ;
1682 1683 1684
	else if (intmask & SDHCI_INT_ADMA_ERROR) {
		printk(KERN_ERR "%s: ADMA error\n", mmc_hostname(host->mmc));
		sdhci_show_adma_error(host);
1685
		host->data->error = -EIO;
1686
	}
1687

P
Pierre Ossman 已提交
1688
	if (host->data->error)
1689 1690
		sdhci_finish_data(host);
	else {
P
Pierre Ossman 已提交
1691
		if (intmask & (SDHCI_INT_DATA_AVAIL | SDHCI_INT_SPACE_AVAIL))
1692 1693
			sdhci_transfer_pio(host);

1694 1695 1696 1697
		/*
		 * We currently don't do anything fancy with DMA
		 * boundaries, but as we can't disable the feature
		 * we need to at least restart the transfer.
1698 1699 1700 1701
		 *
		 * According to the spec sdhci_readl(host, SDHCI_DMA_ADDRESS)
		 * should return a valid address to continue from, but as
		 * some controllers are faulty, don't trust them.
1702
		 */
1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719
		if (intmask & SDHCI_INT_DMA_END) {
			u32 dmastart, dmanow;
			dmastart = sg_dma_address(host->data->sg);
			dmanow = dmastart + host->data->bytes_xfered;
			/*
			 * Force update to the next DMA block boundary.
			 */
			dmanow = (dmanow &
				~(SDHCI_DEFAULT_BOUNDARY_SIZE - 1)) +
				SDHCI_DEFAULT_BOUNDARY_SIZE;
			host->data->bytes_xfered = dmanow - dmastart;
			DBG("%s: DMA base 0x%08x, transferred 0x%06x bytes,"
				" next 0x%08x\n",
				mmc_hostname(host->mmc), dmastart,
				host->data->bytes_xfered, dmanow);
			sdhci_writel(host, dmanow, SDHCI_DMA_ADDRESS);
		}
1720

1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732
		if (intmask & SDHCI_INT_DATA_END) {
			if (host->cmd) {
				/*
				 * Data managed to finish before the
				 * command completed. Make sure we do
				 * things in the proper order.
				 */
				host->data_early = 1;
			} else {
				sdhci_finish_data(host);
			}
		}
1733 1734 1735
	}
}

1736
static irqreturn_t sdhci_irq(int irq, void *dev_id)
1737 1738 1739 1740
{
	irqreturn_t result;
	struct sdhci_host* host = dev_id;
	u32 intmask;
P
Pierre Ossman 已提交
1741
	int cardint = 0;
1742 1743 1744

	spin_lock(&host->lock);

1745
	intmask = sdhci_readl(host, SDHCI_INT_STATUS);
1746

1747
	if (!intmask || intmask == 0xffffffff) {
1748 1749 1750 1751
		result = IRQ_NONE;
		goto out;
	}

1752 1753
	DBG("*** %s got interrupt: 0x%08x\n",
		mmc_hostname(host->mmc), intmask);
1754

1755
	if (intmask & (SDHCI_INT_CARD_INSERT | SDHCI_INT_CARD_REMOVE)) {
1756 1757
		sdhci_writel(host, intmask & (SDHCI_INT_CARD_INSERT |
			SDHCI_INT_CARD_REMOVE), SDHCI_INT_STATUS);
1758
		tasklet_schedule(&host->card_tasklet);
1759
	}
1760

1761
	intmask &= ~(SDHCI_INT_CARD_INSERT | SDHCI_INT_CARD_REMOVE);
1762

1763
	if (intmask & SDHCI_INT_CMD_MASK) {
1764 1765
		sdhci_writel(host, intmask & SDHCI_INT_CMD_MASK,
			SDHCI_INT_STATUS);
1766
		sdhci_cmd_irq(host, intmask & SDHCI_INT_CMD_MASK);
1767 1768 1769
	}

	if (intmask & SDHCI_INT_DATA_MASK) {
1770 1771
		sdhci_writel(host, intmask & SDHCI_INT_DATA_MASK,
			SDHCI_INT_STATUS);
1772
		sdhci_data_irq(host, intmask & SDHCI_INT_DATA_MASK);
1773 1774 1775 1776
	}

	intmask &= ~(SDHCI_INT_CMD_MASK | SDHCI_INT_DATA_MASK);

1777 1778
	intmask &= ~SDHCI_INT_ERROR;

1779
	if (intmask & SDHCI_INT_BUS_POWER) {
1780
		printk(KERN_ERR "%s: Card is consuming too much power!\n",
1781
			mmc_hostname(host->mmc));
1782
		sdhci_writel(host, SDHCI_INT_BUS_POWER, SDHCI_INT_STATUS);
1783 1784
	}

1785
	intmask &= ~SDHCI_INT_BUS_POWER;
1786

P
Pierre Ossman 已提交
1787 1788 1789 1790 1791
	if (intmask & SDHCI_INT_CARD_INT)
		cardint = 1;

	intmask &= ~SDHCI_INT_CARD_INT;

1792
	if (intmask) {
P
Pierre Ossman 已提交
1793
		printk(KERN_ERR "%s: Unexpected interrupt 0x%08x.\n",
1794
			mmc_hostname(host->mmc), intmask);
1795 1796
		sdhci_dumpregs(host);

1797
		sdhci_writel(host, intmask, SDHCI_INT_STATUS);
1798
	}
1799 1800 1801

	result = IRQ_HANDLED;

1802
	mmiowb();
1803 1804 1805
out:
	spin_unlock(&host->lock);

P
Pierre Ossman 已提交
1806 1807 1808 1809 1810 1811
	/*
	 * We have to delay this as it calls back into the driver.
	 */
	if (cardint)
		mmc_signal_sdio_irq(host->mmc);

1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822
	return result;
}

/*****************************************************************************\
 *                                                                           *
 * Suspend/resume                                                            *
 *                                                                           *
\*****************************************************************************/

#ifdef CONFIG_PM

1823
int sdhci_suspend_host(struct sdhci_host *host, pm_message_t state)
1824
{
1825
	int ret;
1826

1827 1828
	sdhci_disable_card_detection(host);

1829
	ret = mmc_suspend_host(host->mmc);
1830 1831
	if (ret)
		return ret;
1832

1833
	free_irq(host->irq, host);
1834

M
Marek Szyprowski 已提交
1835 1836 1837 1838
	if (host->vmmc)
		ret = regulator_disable(host->vmmc);

	return ret;
1839 1840
}

1841
EXPORT_SYMBOL_GPL(sdhci_suspend_host);
1842

1843 1844 1845
int sdhci_resume_host(struct sdhci_host *host)
{
	int ret;
1846

M
Marek Szyprowski 已提交
1847 1848 1849 1850 1851 1852 1853
	if (host->vmmc) {
		int ret = regulator_enable(host->vmmc);
		if (ret)
			return ret;
	}


1854
	if (host->flags & (SDHCI_USE_SDMA | SDHCI_USE_ADMA)) {
1855 1856 1857
		if (host->ops->enable_dma)
			host->ops->enable_dma(host);
	}
1858

1859 1860
	ret = request_irq(host->irq, sdhci_irq, IRQF_SHARED,
			  mmc_hostname(host->mmc), host);
1861 1862
	if (ret)
		return ret;
1863

1864
	sdhci_init(host, (host->mmc->pm_flags & MMC_PM_KEEP_POWER));
1865 1866 1867
	mmiowb();

	ret = mmc_resume_host(host->mmc);
1868 1869
	sdhci_enable_card_detection(host);

1870
	return ret;
1871 1872
}

1873
EXPORT_SYMBOL_GPL(sdhci_resume_host);
1874

1875 1876 1877 1878 1879 1880 1881 1882 1883 1884
void sdhci_enable_irq_wakeups(struct sdhci_host *host)
{
	u8 val;
	val = sdhci_readb(host, SDHCI_WAKE_UP_CONTROL);
	val |= SDHCI_WAKE_ON_INT;
	sdhci_writeb(host, val, SDHCI_WAKE_UP_CONTROL);
}

EXPORT_SYMBOL_GPL(sdhci_enable_irq_wakeups);

1885 1886 1887 1888
#endif /* CONFIG_PM */

/*****************************************************************************\
 *                                                                           *
1889
 * Device allocation/registration                                            *
1890 1891 1892
 *                                                                           *
\*****************************************************************************/

1893 1894
struct sdhci_host *sdhci_alloc_host(struct device *dev,
	size_t priv_size)
1895 1896 1897 1898
{
	struct mmc_host *mmc;
	struct sdhci_host *host;

1899
	WARN_ON(dev == NULL);
1900

1901
	mmc = mmc_alloc_host(sizeof(struct sdhci_host) + priv_size, dev);
1902
	if (!mmc)
1903
		return ERR_PTR(-ENOMEM);
1904 1905 1906 1907

	host = mmc_priv(mmc);
	host->mmc = mmc;

1908 1909
	return host;
}
1910

1911
EXPORT_SYMBOL_GPL(sdhci_alloc_host);
1912

1913 1914 1915
int sdhci_add_host(struct sdhci_host *host)
{
	struct mmc_host *mmc;
1916 1917 1918
	u32 caps[2];
	u32 max_current_caps;
	unsigned int ocr_avail;
1919
	int ret;
1920

1921 1922 1923
	WARN_ON(host == NULL);
	if (host == NULL)
		return -EINVAL;
1924

1925
	mmc = host->mmc;
1926

1927 1928
	if (debug_quirks)
		host->quirks = debug_quirks;
1929

1930 1931
	sdhci_reset(host, SDHCI_RESET_ALL);

1932
	host->version = sdhci_readw(host, SDHCI_HOST_VERSION);
1933 1934
	host->version = (host->version & SDHCI_SPEC_VER_MASK)
				>> SDHCI_SPEC_VER_SHIFT;
1935
	if (host->version > SDHCI_SPEC_300) {
1936
		printk(KERN_ERR "%s: Unknown controller version (%d). "
1937
			"You may experience problems.\n", mmc_hostname(mmc),
1938
			host->version);
1939 1940
	}

1941
	caps[0] = (host->quirks & SDHCI_QUIRK_MISSING_CAPS) ? host->caps :
1942
		sdhci_readl(host, SDHCI_CAPABILITIES);
1943

1944 1945 1946
	caps[1] = (host->version >= SDHCI_SPEC_300) ?
		sdhci_readl(host, SDHCI_CAPABILITIES_1) : 0;

1947
	if (host->quirks & SDHCI_QUIRK_FORCE_DMA)
1948
		host->flags |= SDHCI_USE_SDMA;
1949
	else if (!(caps[0] & SDHCI_CAN_DO_SDMA))
1950
		DBG("Controller doesn't have SDMA capability\n");
1951
	else
1952
		host->flags |= SDHCI_USE_SDMA;
1953

1954
	if ((host->quirks & SDHCI_QUIRK_BROKEN_DMA) &&
1955
		(host->flags & SDHCI_USE_SDMA)) {
R
Rolf Eike Beer 已提交
1956
		DBG("Disabling DMA as it is marked broken\n");
1957
		host->flags &= ~SDHCI_USE_SDMA;
1958 1959
	}

1960 1961
	if ((host->version >= SDHCI_SPEC_200) &&
		(caps[0] & SDHCI_CAN_DO_ADMA2))
1962
		host->flags |= SDHCI_USE_ADMA;
1963 1964 1965 1966 1967 1968 1969

	if ((host->quirks & SDHCI_QUIRK_BROKEN_ADMA) &&
		(host->flags & SDHCI_USE_ADMA)) {
		DBG("Disabling ADMA as it is marked broken\n");
		host->flags &= ~SDHCI_USE_ADMA;
	}

1970
	if (host->flags & (SDHCI_USE_SDMA | SDHCI_USE_ADMA)) {
1971 1972 1973 1974 1975
		if (host->ops->enable_dma) {
			if (host->ops->enable_dma(host)) {
				printk(KERN_WARNING "%s: No suitable DMA "
					"available. Falling back to PIO.\n",
					mmc_hostname(mmc));
1976 1977
				host->flags &=
					~(SDHCI_USE_SDMA | SDHCI_USE_ADMA);
1978
			}
1979 1980 1981
		}
	}

1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999
	if (host->flags & SDHCI_USE_ADMA) {
		/*
		 * We need to allocate descriptors for all sg entries
		 * (128) and potentially one alignment transfer for
		 * each of those entries.
		 */
		host->adma_desc = kmalloc((128 * 2 + 1) * 4, GFP_KERNEL);
		host->align_buffer = kmalloc(128 * 4, GFP_KERNEL);
		if (!host->adma_desc || !host->align_buffer) {
			kfree(host->adma_desc);
			kfree(host->align_buffer);
			printk(KERN_WARNING "%s: Unable to allocate ADMA "
				"buffers. Falling back to standard DMA.\n",
				mmc_hostname(mmc));
			host->flags &= ~SDHCI_USE_ADMA;
		}
	}

2000 2001 2002 2003 2004
	/*
	 * If we use DMA, then it's up to the caller to set the DMA
	 * mask, but PIO does not need the hw shim so we set a new
	 * mask here in that case.
	 */
2005
	if (!(host->flags & (SDHCI_USE_SDMA | SDHCI_USE_ADMA))) {
2006 2007 2008
		host->dma_mask = DMA_BIT_MASK(64);
		mmc_dev(host->mmc)->dma_mask = &host->dma_mask;
	}
2009

2010
	if (host->version >= SDHCI_SPEC_300)
2011
		host->max_clk = (caps[0] & SDHCI_CLOCK_V3_BASE_MASK)
2012 2013
			>> SDHCI_CLOCK_BASE_SHIFT;
	else
2014
		host->max_clk = (caps[0] & SDHCI_CLOCK_BASE_MASK)
2015 2016
			>> SDHCI_CLOCK_BASE_SHIFT;

2017
	host->max_clk *= 1000000;
2018 2019
	if (host->max_clk == 0 || host->quirks &
			SDHCI_QUIRK_CAP_CLOCK_BASE_BROKEN) {
2020 2021 2022 2023 2024 2025 2026
		if (!host->ops->get_max_clock) {
			printk(KERN_ERR
			       "%s: Hardware doesn't specify base clock "
			       "frequency.\n", mmc_hostname(mmc));
			return -ENODEV;
		}
		host->max_clk = host->ops->get_max_clock(host);
2027
	}
2028

2029
	host->timeout_clk =
2030
		(caps[0] & SDHCI_TIMEOUT_CLK_MASK) >> SDHCI_TIMEOUT_CLK_SHIFT;
2031
	if (host->timeout_clk == 0) {
2032 2033 2034 2035
		if (host->ops->get_timeout_clock) {
			host->timeout_clk = host->ops->get_timeout_clock(host);
		} else if (!(host->quirks &
				SDHCI_QUIRK_DATA_TIMEOUT_USES_SDCLK)) {
2036 2037 2038 2039 2040
			printk(KERN_ERR
			       "%s: Hardware doesn't specify timeout clock "
			       "frequency.\n", mmc_hostname(mmc));
			return -ENODEV;
		}
2041
	}
2042
	if (caps[0] & SDHCI_TIMEOUT_CLK_UNIT)
2043
		host->timeout_clk *= 1000;
2044 2045 2046 2047 2048

	/*
	 * Set host parameters.
	 */
	mmc->ops = &sdhci_ops;
2049
	if (host->ops->get_min_clock)
2050
		mmc->f_min = host->ops->get_min_clock(host);
2051 2052
	else if (host->version >= SDHCI_SPEC_300)
		mmc->f_min = host->max_clk / SDHCI_MAX_DIV_SPEC_300;
2053
	else
2054
		mmc->f_min = host->max_clk / SDHCI_MAX_DIV_SPEC_200;
2055

2056
	mmc->f_max = host->max_clk;
2057
	mmc->caps |= MMC_CAP_SDIO_IRQ | MMC_CAP_ERASE;
2058

2059 2060 2061 2062 2063 2064 2065
	/*
	 * A controller may support 8-bit width, but the board itself
	 * might not have the pins brought out.  Boards that support
	 * 8-bit width must set "mmc->caps |= MMC_CAP_8_BIT_DATA;" in
	 * their platform code before calling sdhci_add_host(), and we
	 * won't assume 8-bit width for hosts without that CAP.
	 */
2066
	if (!(host->quirks & SDHCI_QUIRK_FORCE_1_BIT_DATA))
2067
		mmc->caps |= MMC_CAP_4_BIT_DATA;
2068

2069
	if (caps[0] & SDHCI_CAN_DO_HISPD)
2070
		mmc->caps |= MMC_CAP_SD_HIGHSPEED | MMC_CAP_MMC_HIGHSPEED;
2071

2072 2073
	if ((host->quirks & SDHCI_QUIRK_BROKEN_CARD_DETECTION) &&
	    mmc_card_is_removable(mmc))
2074 2075
		mmc->caps |= MMC_CAP_NEEDS_POLL;

2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088
	/* UHS-I mode(s) supported by the host controller. */
	if (host->version >= SDHCI_SPEC_300)
		mmc->caps |= MMC_CAP_UHS_SDR12 | MMC_CAP_UHS_SDR25;

	/* SDR104 supports also implies SDR50 support */
	if (caps[1] & SDHCI_SUPPORT_SDR104)
		mmc->caps |= MMC_CAP_UHS_SDR104 | MMC_CAP_UHS_SDR50;
	else if (caps[1] & SDHCI_SUPPORT_SDR50)
		mmc->caps |= MMC_CAP_UHS_SDR50;

	if (caps[1] & SDHCI_SUPPORT_DDR50)
		mmc->caps |= MMC_CAP_UHS_DDR50;

2089
	ocr_avail = 0;
2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101
	/*
	 * According to SD Host Controller spec v3.00, if the Host System
	 * can afford more than 150mA, Host Driver should set XPC to 1. Also
	 * the value is meaningful only if Voltage Support in the Capabilities
	 * register is set. The actual current value is 4 times the register
	 * value.
	 */
	max_current_caps = sdhci_readl(host, SDHCI_MAX_CURRENT);

	if (caps[0] & SDHCI_CAN_VDD_330) {
		int max_current_330;

2102
		ocr_avail |= MMC_VDD_32_33 | MMC_VDD_33_34;
2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114

		max_current_330 = ((max_current_caps &
				   SDHCI_MAX_CURRENT_330_MASK) >>
				   SDHCI_MAX_CURRENT_330_SHIFT) *
				   SDHCI_MAX_CURRENT_MULTIPLIER;

		if (max_current_330 > 150)
			mmc->caps |= MMC_CAP_SET_XPC_330;
	}
	if (caps[0] & SDHCI_CAN_VDD_300) {
		int max_current_300;

2115
		ocr_avail |= MMC_VDD_29_30 | MMC_VDD_30_31;
2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127

		max_current_300 = ((max_current_caps &
				   SDHCI_MAX_CURRENT_300_MASK) >>
				   SDHCI_MAX_CURRENT_300_SHIFT) *
				   SDHCI_MAX_CURRENT_MULTIPLIER;

		if (max_current_300 > 150)
			mmc->caps |= MMC_CAP_SET_XPC_300;
	}
	if (caps[0] & SDHCI_CAN_VDD_180) {
		int max_current_180;

2128 2129
		ocr_avail |= MMC_VDD_165_195;

2130 2131 2132 2133 2134 2135 2136 2137 2138
		max_current_180 = ((max_current_caps &
				   SDHCI_MAX_CURRENT_180_MASK) >>
				   SDHCI_MAX_CURRENT_180_SHIFT) *
				   SDHCI_MAX_CURRENT_MULTIPLIER;

		if (max_current_180 > 150)
			mmc->caps |= MMC_CAP_SET_XPC_180;
	}

2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150
	mmc->ocr_avail = ocr_avail;
	mmc->ocr_avail_sdio = ocr_avail;
	if (host->ocr_avail_sdio)
		mmc->ocr_avail_sdio &= host->ocr_avail_sdio;
	mmc->ocr_avail_sd = ocr_avail;
	if (host->ocr_avail_sd)
		mmc->ocr_avail_sd &= host->ocr_avail_sd;
	else /* normal SD controllers don't support 1.8V */
		mmc->ocr_avail_sd &= ~MMC_VDD_165_195;
	mmc->ocr_avail_mmc = ocr_avail;
	if (host->ocr_avail_mmc)
		mmc->ocr_avail_mmc &= host->ocr_avail_mmc;
2151 2152 2153

	if (mmc->ocr_avail == 0) {
		printk(KERN_ERR "%s: Hardware doesn't report any "
2154
			"support voltages.\n", mmc_hostname(mmc));
2155
		return -ENODEV;
2156 2157
	}

2158 2159 2160
	spin_lock_init(&host->lock);

	/*
2161 2162
	 * Maximum number of segments. Depends on if the hardware
	 * can do scatter/gather or not.
2163
	 */
2164
	if (host->flags & SDHCI_USE_ADMA)
2165
		mmc->max_segs = 128;
2166
	else if (host->flags & SDHCI_USE_SDMA)
2167
		mmc->max_segs = 1;
2168
	else /* PIO */
2169
		mmc->max_segs = 128;
2170 2171

	/*
2172
	 * Maximum number of sectors in one transfer. Limited by DMA boundary
2173
	 * size (512KiB).
2174
	 */
2175
	mmc->max_req_size = 524288;
2176 2177 2178

	/*
	 * Maximum segment size. Could be one segment with the maximum number
2179 2180
	 * of bytes. When doing hardware scatter/gather, each entry cannot
	 * be larger than 64 KiB though.
2181
	 */
2182 2183 2184 2185 2186 2187
	if (host->flags & SDHCI_USE_ADMA) {
		if (host->quirks & SDHCI_QUIRK_BROKEN_ADMA_ZEROLEN_DESC)
			mmc->max_seg_size = 65535;
		else
			mmc->max_seg_size = 65536;
	} else {
2188
		mmc->max_seg_size = mmc->max_req_size;
2189
	}
2190

2191 2192 2193 2194
	/*
	 * Maximum block size. This varies from controller to controller and
	 * is specified in the capabilities register.
	 */
2195 2196 2197
	if (host->quirks & SDHCI_QUIRK_FORCE_BLK_SZ_2048) {
		mmc->max_blk_size = 2;
	} else {
2198
		mmc->max_blk_size = (caps[0] & SDHCI_MAX_BLOCK_MASK) >>
2199 2200 2201 2202 2203 2204 2205 2206 2207
				SDHCI_MAX_BLOCK_SHIFT;
		if (mmc->max_blk_size >= 3) {
			printk(KERN_WARNING "%s: Invalid maximum block size, "
				"assuming 512 bytes\n", mmc_hostname(mmc));
			mmc->max_blk_size = 0;
		}
	}

	mmc->max_blk_size = 512 << mmc->max_blk_size;
2208

2209 2210 2211
	/*
	 * Maximum block count.
	 */
2212
	mmc->max_blk_count = (host->quirks & SDHCI_QUIRK_NO_MULTIBLOCK) ? 1 : 65535;
2213

2214 2215 2216 2217 2218 2219 2220 2221
	/*
	 * Init tasklets.
	 */
	tasklet_init(&host->card_tasklet,
		sdhci_tasklet_card, (unsigned long)host);
	tasklet_init(&host->finish_tasklet,
		sdhci_tasklet_finish, (unsigned long)host);

2222
	setup_timer(&host->timer, sdhci_timeout_timer, (unsigned long)host);
2223

2224
	ret = request_irq(host->irq, sdhci_irq, IRQF_SHARED,
2225
		mmc_hostname(mmc), host);
2226
	if (ret)
2227
		goto untasklet;
2228

M
Marek Szyprowski 已提交
2229 2230 2231 2232 2233 2234 2235 2236
	host->vmmc = regulator_get(mmc_dev(mmc), "vmmc");
	if (IS_ERR(host->vmmc)) {
		printk(KERN_INFO "%s: no vmmc regulator found\n", mmc_hostname(mmc));
		host->vmmc = NULL;
	} else {
		regulator_enable(host->vmmc);
	}

2237
	sdhci_init(host, 0);
2238 2239 2240 2241 2242

#ifdef CONFIG_MMC_DEBUG
	sdhci_dumpregs(host);
#endif

2243
#ifdef SDHCI_USE_LEDS_CLASS
H
Helmut Schaa 已提交
2244 2245 2246
	snprintf(host->led_name, sizeof(host->led_name),
		"%s::", mmc_hostname(mmc));
	host->led.name = host->led_name;
2247 2248 2249 2250
	host->led.brightness = LED_OFF;
	host->led.default_trigger = mmc_hostname(mmc);
	host->led.brightness_set = sdhci_led_control;

2251
	ret = led_classdev_register(mmc_dev(mmc), &host->led);
2252 2253 2254 2255
	if (ret)
		goto reset;
#endif

2256 2257
	mmiowb();

2258 2259
	mmc_add_host(mmc);

2260
	printk(KERN_INFO "%s: SDHCI controller on %s [%s] using %s\n",
2261
		mmc_hostname(mmc), host->hw_name, dev_name(mmc_dev(mmc)),
2262 2263
		(host->flags & SDHCI_USE_ADMA) ? "ADMA" :
		(host->flags & SDHCI_USE_SDMA) ? "DMA" : "PIO");
2264

2265 2266
	sdhci_enable_card_detection(host);

2267 2268
	return 0;

2269
#ifdef SDHCI_USE_LEDS_CLASS
2270 2271 2272 2273
reset:
	sdhci_reset(host, SDHCI_RESET_ALL);
	free_irq(host->irq, host);
#endif
2274
untasklet:
2275 2276 2277 2278 2279 2280
	tasklet_kill(&host->card_tasklet);
	tasklet_kill(&host->finish_tasklet);

	return ret;
}

2281
EXPORT_SYMBOL_GPL(sdhci_add_host);
2282

P
Pierre Ossman 已提交
2283
void sdhci_remove_host(struct sdhci_host *host, int dead)
2284
{
P
Pierre Ossman 已提交
2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302
	unsigned long flags;

	if (dead) {
		spin_lock_irqsave(&host->lock, flags);

		host->flags |= SDHCI_DEVICE_DEAD;

		if (host->mrq) {
			printk(KERN_ERR "%s: Controller removed during "
				" transfer!\n", mmc_hostname(host->mmc));

			host->mrq->cmd->error = -ENOMEDIUM;
			tasklet_schedule(&host->finish_tasklet);
		}

		spin_unlock_irqrestore(&host->lock, flags);
	}

2303 2304
	sdhci_disable_card_detection(host);

2305
	mmc_remove_host(host->mmc);
2306

2307
#ifdef SDHCI_USE_LEDS_CLASS
2308 2309 2310
	led_classdev_unregister(&host->led);
#endif

P
Pierre Ossman 已提交
2311 2312
	if (!dead)
		sdhci_reset(host, SDHCI_RESET_ALL);
2313 2314 2315 2316 2317 2318 2319

	free_irq(host->irq, host);

	del_timer_sync(&host->timer);

	tasklet_kill(&host->card_tasklet);
	tasklet_kill(&host->finish_tasklet);
2320

M
Marek Szyprowski 已提交
2321 2322 2323 2324 2325
	if (host->vmmc) {
		regulator_disable(host->vmmc);
		regulator_put(host->vmmc);
	}

2326 2327 2328 2329 2330
	kfree(host->adma_desc);
	kfree(host->align_buffer);

	host->adma_desc = NULL;
	host->align_buffer = NULL;
2331 2332
}

2333
EXPORT_SYMBOL_GPL(sdhci_remove_host);
2334

2335
void sdhci_free_host(struct sdhci_host *host)
2336
{
2337
	mmc_free_host(host->mmc);
2338 2339
}

2340
EXPORT_SYMBOL_GPL(sdhci_free_host);
2341 2342 2343 2344 2345 2346 2347 2348 2349 2350

/*****************************************************************************\
 *                                                                           *
 * Driver init/exit                                                          *
 *                                                                           *
\*****************************************************************************/

static int __init sdhci_drv_init(void)
{
	printk(KERN_INFO DRIVER_NAME
2351
		": Secure Digital Host Controller Interface driver\n");
2352 2353
	printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");

2354
	return 0;
2355 2356 2357 2358 2359 2360 2361 2362 2363
}

static void __exit sdhci_drv_exit(void)
{
}

module_init(sdhci_drv_init);
module_exit(sdhci_drv_exit);

2364
module_param(debug_quirks, uint, 0444);
2365

2366
MODULE_AUTHOR("Pierre Ossman <pierre@ossman.eu>");
2367
MODULE_DESCRIPTION("Secure Digital Host Controller Interface core driver");
2368
MODULE_LICENSE("GPL");
2369

2370
MODULE_PARM_DESC(debug_quirks, "Force certain quirks.");