wbsd.c 40.4 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3
/*
 *  linux/drivers/mmc/wbsd.c - Winbond W83L51xD SD/MMC driver
 *
4
 *  Copyright (C) 2004-2007 Pierre Ossman, All Rights Reserved.
L
Linus Torvalds 已提交
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.
L
Linus Torvalds 已提交
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
 *
 *
 * Warning!
 *
 * Changes to the FIFO system should be done with extreme care since
 * the hardware is full of bugs related to the FIFO. Known issues are:
 *
 * - FIFO size field in FSR is always zero.
 *
 * - FIFO interrupts tend not to work as they should. Interrupts are
 *   triggered only for full/empty events, not for threshold values.
 *
 * - On APIC systems the FIFO empty interrupt is sometimes lost.
 */

#include <linux/module.h>
#include <linux/moduleparam.h>
#include <linux/init.h>
#include <linux/ioport.h>
29
#include <linux/platform_device.h>
L
Linus Torvalds 已提交
30
#include <linux/interrupt.h>
P
Pierre Ossman 已提交
31
#include <linux/dma-mapping.h>
L
Linus Torvalds 已提交
32
#include <linux/delay.h>
P
Pierre Ossman 已提交
33
#include <linux/pnp.h>
L
Linus Torvalds 已提交
34 35 36 37 38 39 40 41 42 43 44 45
#include <linux/highmem.h>
#include <linux/mmc/host.h>

#include <asm/io.h>
#include <asm/dma.h>
#include <asm/scatterlist.h>

#include "wbsd.h"

#define DRIVER_NAME "wbsd"

#define DBG(x...) \
46
	pr_debug(DRIVER_NAME ": " x)
L
Linus Torvalds 已提交
47
#define DBGF(f, x...) \
48
	pr_debug(DRIVER_NAME " [%s()]: " f, __func__ , ##x)
L
Linus Torvalds 已提交
49

P
Pierre Ossman 已提交
50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65
/*
 * Device resources
 */

#ifdef CONFIG_PNP

static const struct pnp_device_id pnp_dev_table[] = {
	{ "WEC0517", 0 },
	{ "WEC0518", 0 },
	{ "", 0 },
};

MODULE_DEVICE_TABLE(pnp, pnp_dev_table);

#endif /* CONFIG_PNP */

A
Adrian Bunk 已提交
66 67 68 69 70 71 72
static const int config_ports[] = { 0x2E, 0x4E };
static const int unlock_codes[] = { 0x83, 0x87 };

static const int valid_ids[] = {
	0x7112,
	};

P
Pierre Ossman 已提交
73 74 75 76 77 78 79 80 81
#ifdef CONFIG_PNP
static unsigned int nopnp = 0;
#else
static const unsigned int nopnp = 1;
#endif
static unsigned int io = 0x248;
static unsigned int irq = 6;
static int dma = 2;

L
Linus Torvalds 已提交
82 83 84 85
/*
 * Basic functions
 */

P
Pierre Ossman 已提交
86
static inline void wbsd_unlock_config(struct wbsd_host *host)
L
Linus Torvalds 已提交
87
{
P
Pierre Ossman 已提交
88
	BUG_ON(host->config == 0);
89

L
Linus Torvalds 已提交
90 91 92 93
	outb(host->unlock_code, host->config);
	outb(host->unlock_code, host->config);
}

P
Pierre Ossman 已提交
94
static inline void wbsd_lock_config(struct wbsd_host *host)
L
Linus Torvalds 已提交
95
{
P
Pierre Ossman 已提交
96
	BUG_ON(host->config == 0);
97

L
Linus Torvalds 已提交
98 99 100
	outb(LOCK_CODE, host->config);
}

P
Pierre Ossman 已提交
101
static inline void wbsd_write_config(struct wbsd_host *host, u8 reg, u8 value)
L
Linus Torvalds 已提交
102
{
P
Pierre Ossman 已提交
103
	BUG_ON(host->config == 0);
104

L
Linus Torvalds 已提交
105 106 107 108
	outb(reg, host->config);
	outb(value, host->config + 1);
}

P
Pierre Ossman 已提交
109
static inline u8 wbsd_read_config(struct wbsd_host *host, u8 reg)
L
Linus Torvalds 已提交
110
{
P
Pierre Ossman 已提交
111
	BUG_ON(host->config == 0);
112

L
Linus Torvalds 已提交
113 114 115 116
	outb(reg, host->config);
	return inb(host->config + 1);
}

P
Pierre Ossman 已提交
117
static inline void wbsd_write_index(struct wbsd_host *host, u8 index, u8 value)
L
Linus Torvalds 已提交
118 119 120 121 122
{
	outb(index, host->base + WBSD_IDXR);
	outb(value, host->base + WBSD_DATAR);
}

P
Pierre Ossman 已提交
123
static inline u8 wbsd_read_index(struct wbsd_host *host, u8 index)
L
Linus Torvalds 已提交
124 125 126 127 128 129 130 131 132
{
	outb(index, host->base + WBSD_IDXR);
	return inb(host->base + WBSD_DATAR);
}

/*
 * Common routines
 */

P
Pierre Ossman 已提交
133
static void wbsd_init_device(struct wbsd_host *host)
L
Linus Torvalds 已提交
134 135
{
	u8 setup, ier;
136

L
Linus Torvalds 已提交
137 138 139 140 141 142
	/*
	 * Reset chip (SD/MMC part) and fifo.
	 */
	setup = wbsd_read_index(host, WBSD_IDX_SETUP);
	setup |= WBSD_FIFO_RESET | WBSD_SOFT_RESET;
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
143

P
Pierre Ossman 已提交
144 145 146 147 148 149
	/*
	 * Set DAT3 to input
	 */
	setup &= ~WBSD_DAT3_H;
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
	host->flags &= ~WBSD_FIGNORE_DETECT;
150

L
Linus Torvalds 已提交
151 152 153 154 155 156 157 158 159
	/*
	 * Read back default clock.
	 */
	host->clk = wbsd_read_index(host, WBSD_IDX_CLK);

	/*
	 * Power down port.
	 */
	outb(WBSD_POWER_N, host->base + WBSD_CSR);
160

L
Linus Torvalds 已提交
161 162 163 164
	/*
	 * Set maximum timeout.
	 */
	wbsd_write_index(host, WBSD_IDX_TAAC, 0x7F);
165

P
Pierre Ossman 已提交
166 167 168 169 170 171 172
	/*
	 * Test for card presence
	 */
	if (inb(host->base + WBSD_CSR) & WBSD_CARDPRESENT)
		host->flags |= WBSD_FCARD_PRESENT;
	else
		host->flags &= ~WBSD_FCARD_PRESENT;
173

L
Linus Torvalds 已提交
174 175 176 177 178 179 180
	/*
	 * Enable interesting interrupts.
	 */
	ier = 0;
	ier |= WBSD_EINT_CARD;
	ier |= WBSD_EINT_FIFO_THRE;
	ier |= WBSD_EINT_CRC;
P
Pierre Ossman 已提交
181
	ier |= WBSD_EINT_TIMEOUT;
L
Linus Torvalds 已提交
182 183 184 185 186 187 188 189 190 191
	ier |= WBSD_EINT_TC;

	outb(ier, host->base + WBSD_EIR);

	/*
	 * Clear interrupts.
	 */
	inb(host->base + WBSD_ISR);
}

P
Pierre Ossman 已提交
192
static void wbsd_reset(struct wbsd_host *host)
L
Linus Torvalds 已提交
193 194
{
	u8 setup;
195

196
	printk(KERN_ERR "%s: Resetting chip\n", mmc_hostname(host->mmc));
197

L
Linus Torvalds 已提交
198 199 200 201 202 203 204 205
	/*
	 * Soft reset of chip (SD/MMC part).
	 */
	setup = wbsd_read_index(host, WBSD_IDX_SETUP);
	setup |= WBSD_SOFT_RESET;
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
}

P
Pierre Ossman 已提交
206
static void wbsd_request_end(struct wbsd_host *host, struct mmc_request *mrq)
L
Linus Torvalds 已提交
207 208
{
	unsigned long dmaflags;
209

L
Linus Torvalds 已提交
210
	DBGF("Ending request, cmd (%x)\n", mrq->cmd->opcode);
211

P
Pierre Ossman 已提交
212
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
213 214 215 216 217 218 219 220 221 222 223 224 225
		/*
		 * Release ISA DMA controller.
		 */
		dmaflags = claim_dma_lock();
		disable_dma(host->dma);
		clear_dma_ff(host->dma);
		release_dma_lock(dmaflags);

		/*
		 * Disable DMA on host.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, 0);
	}
226

L
Linus Torvalds 已提交
227 228 229 230 231 232 233 234 235 236 237 238 239 240
	host->mrq = NULL;

	/*
	 * MMC layer might call back into the driver so first unlock.
	 */
	spin_unlock(&host->lock);
	mmc_request_done(host->mmc, mrq);
	spin_lock(&host->lock);
}

/*
 * Scatter/gather functions
 */

P
Pierre Ossman 已提交
241
static inline void wbsd_init_sg(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
242 243 244 245 246 247 248 249 250 251 252
{
	/*
	 * Get info. about SG list from data structure.
	 */
	host->cur_sg = data->sg;
	host->num_sg = data->sg_len;

	host->offset = 0;
	host->remain = host->cur_sg->length;
}

P
Pierre Ossman 已提交
253
static inline int wbsd_next_sg(struct wbsd_host *host)
L
Linus Torvalds 已提交
254 255 256 257 258 259 260 261 262 263
{
	/*
	 * Skip to next SG entry.
	 */
	host->cur_sg++;
	host->num_sg--;

	/*
	 * Any entries left?
	 */
P
Pierre Ossman 已提交
264 265 266 267
	if (host->num_sg > 0) {
		host->offset = 0;
		host->remain = host->cur_sg->length;
	}
268

L
Linus Torvalds 已提交
269 270 271
	return host->num_sg;
}

272
static inline char *wbsd_sg_to_buffer(struct wbsd_host *host)
L
Linus Torvalds 已提交
273
{
274
	return page_address(host->cur_sg->page) + host->cur_sg->offset;
L
Linus Torvalds 已提交
275 276
}

P
Pierre Ossman 已提交
277
static inline void wbsd_sg_to_dma(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
278
{
279
	unsigned int len, i;
P
Pierre Ossman 已提交
280 281 282
	struct scatterlist *sg;
	char *dmabuf = host->dma_buffer;
	char *sgbuf;
283

L
Linus Torvalds 已提交
284 285
	sg = data->sg;
	len = data->sg_len;
286

P
Pierre Ossman 已提交
287
	for (i = 0; i < len; i++) {
288
		sgbuf = page_address(sg[i].page) + sg[i].offset;
289
		memcpy(dmabuf, sgbuf, sg[i].length);
L
Linus Torvalds 已提交
290 291 292 293
		dmabuf += sg[i].length;
	}
}

P
Pierre Ossman 已提交
294
static inline void wbsd_dma_to_sg(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
295
{
296
	unsigned int len, i;
P
Pierre Ossman 已提交
297 298 299
	struct scatterlist *sg;
	char *dmabuf = host->dma_buffer;
	char *sgbuf;
300

L
Linus Torvalds 已提交
301 302
	sg = data->sg;
	len = data->sg_len;
303

P
Pierre Ossman 已提交
304
	for (i = 0; i < len; i++) {
305
		sgbuf = page_address(sg[i].page) + sg[i].offset;
306
		memcpy(sgbuf, dmabuf, sg[i].length);
L
Linus Torvalds 已提交
307 308 309 310 311 312 313
		dmabuf += sg[i].length;
	}
}

/*
 * Command handling
 */
314

P
Pierre Ossman 已提交
315 316
static inline void wbsd_get_short_reply(struct wbsd_host *host,
					struct mmc_command *cmd)
L
Linus Torvalds 已提交
317 318 319 320
{
	/*
	 * Correct response type?
	 */
P
Pierre Ossman 已提交
321
	if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_SHORT) {
L
Linus Torvalds 已提交
322 323 324
		cmd->error = MMC_ERR_INVALID;
		return;
	}
325

P
Pierre Ossman 已提交
326 327 328 329 330
	cmd->resp[0]  = wbsd_read_index(host, WBSD_IDX_RESP12) << 24;
	cmd->resp[0] |= wbsd_read_index(host, WBSD_IDX_RESP13) << 16;
	cmd->resp[0] |= wbsd_read_index(host, WBSD_IDX_RESP14) << 8;
	cmd->resp[0] |= wbsd_read_index(host, WBSD_IDX_RESP15) << 0;
	cmd->resp[1]  = wbsd_read_index(host, WBSD_IDX_RESP16) << 24;
L
Linus Torvalds 已提交
331 332
}

P
Pierre Ossman 已提交
333 334
static inline void wbsd_get_long_reply(struct wbsd_host *host,
	struct mmc_command *cmd)
L
Linus Torvalds 已提交
335 336
{
	int i;
337

L
Linus Torvalds 已提交
338 339 340
	/*
	 * Correct response type?
	 */
P
Pierre Ossman 已提交
341
	if (wbsd_read_index(host, WBSD_IDX_RSPLEN) != WBSD_RSP_LONG) {
L
Linus Torvalds 已提交
342 343 344
		cmd->error = MMC_ERR_INVALID;
		return;
	}
345

P
Pierre Ossman 已提交
346
	for (i = 0; i < 4; i++) {
L
Linus Torvalds 已提交
347 348 349 350 351 352 353 354 355 356 357
		cmd->resp[i] =
			wbsd_read_index(host, WBSD_IDX_RESP1 + i * 4) << 24;
		cmd->resp[i] |=
			wbsd_read_index(host, WBSD_IDX_RESP2 + i * 4) << 16;
		cmd->resp[i] |=
			wbsd_read_index(host, WBSD_IDX_RESP3 + i * 4) << 8;
		cmd->resp[i] |=
			wbsd_read_index(host, WBSD_IDX_RESP4 + i * 4) << 0;
	}
}

P
Pierre Ossman 已提交
358
static void wbsd_send_command(struct wbsd_host *host, struct mmc_command *cmd)
L
Linus Torvalds 已提交
359 360 361
{
	int i;
	u8 status, isr;
362

L
Linus Torvalds 已提交
363 364 365 366 367 368 369 370
	DBGF("Sending cmd (%x)\n", cmd->opcode);

	/*
	 * Clear accumulated ISR. The interrupt routine
	 * will fill this one with events that occur during
	 * transfer.
	 */
	host->isr = 0;
371

L
Linus Torvalds 已提交
372 373 374 375
	/*
	 * Send the command (CRC calculated by host).
	 */
	outb(cmd->opcode, host->base + WBSD_CMDR);
P
Pierre Ossman 已提交
376
	for (i = 3; i >= 0; i--)
L
Linus Torvalds 已提交
377
		outb((cmd->arg >> (i * 8)) & 0xff, host->base + WBSD_CMDR);
378

L
Linus Torvalds 已提交
379
	cmd->error = MMC_ERR_NONE;
380

L
Linus Torvalds 已提交
381 382 383 384 385 386 387 388 389 390
	/*
	 * Wait for the request to complete.
	 */
	do {
		status = wbsd_read_index(host, WBSD_IDX_STATUS);
	} while (status & WBSD_CARDTRAFFIC);

	/*
	 * Do we expect a reply?
	 */
R
Russell King 已提交
391
	if (cmd->flags & MMC_RSP_PRESENT) {
L
Linus Torvalds 已提交
392 393 394 395
		/*
		 * Read back status.
		 */
		isr = host->isr;
396

L
Linus Torvalds 已提交
397 398 399 400 401 402 403 404 405 406
		/* Card removed? */
		if (isr & WBSD_INT_CARD)
			cmd->error = MMC_ERR_TIMEOUT;
		/* Timeout? */
		else if (isr & WBSD_INT_TIMEOUT)
			cmd->error = MMC_ERR_TIMEOUT;
		/* CRC? */
		else if ((cmd->flags & MMC_RSP_CRC) && (isr & WBSD_INT_CRC))
			cmd->error = MMC_ERR_BADCRC;
		/* All ok */
P
Pierre Ossman 已提交
407
		else {
R
Russell King 已提交
408
			if (cmd->flags & MMC_RSP_136)
L
Linus Torvalds 已提交
409
				wbsd_get_long_reply(host, cmd);
R
Russell King 已提交
410 411
			else
				wbsd_get_short_reply(host, cmd);
L
Linus Torvalds 已提交
412 413 414 415 416 417 418 419 420 421
		}
	}

	DBGF("Sent cmd (%x), res %d\n", cmd->opcode, cmd->error);
}

/*
 * Data functions
 */

P
Pierre Ossman 已提交
422
static void wbsd_empty_fifo(struct wbsd_host *host)
L
Linus Torvalds 已提交
423
{
P
Pierre Ossman 已提交
424 425
	struct mmc_data *data = host->mrq->cmd->data;
	char *buffer;
L
Linus Torvalds 已提交
426
	int i, fsr, fifo;
427

L
Linus Torvalds 已提交
428 429 430
	/*
	 * Handle excessive data.
	 */
431
	if (host->num_sg == 0)
L
Linus Torvalds 已提交
432
		return;
433

434
	buffer = wbsd_sg_to_buffer(host) + host->offset;
L
Linus Torvalds 已提交
435 436 437 438 439

	/*
	 * Drain the fifo. This has a tendency to loop longer
	 * than the FIFO length (usually one block).
	 */
P
Pierre Ossman 已提交
440
	while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_EMPTY)) {
L
Linus Torvalds 已提交
441 442 443
		/*
		 * The size field in the FSR is broken so we have to
		 * do some guessing.
444
		 */
L
Linus Torvalds 已提交
445 446 447 448 449 450
		if (fsr & WBSD_FIFO_FULL)
			fifo = 16;
		else if (fsr & WBSD_FIFO_FUTHRE)
			fifo = 8;
		else
			fifo = 1;
451

P
Pierre Ossman 已提交
452
		for (i = 0; i < fifo; i++) {
L
Linus Torvalds 已提交
453 454 455 456 457 458
			*buffer = inb(host->base + WBSD_DFR);
			buffer++;
			host->offset++;
			host->remain--;

			data->bytes_xfered++;
459

L
Linus Torvalds 已提交
460 461 462
			/*
			 * End of scatter list entry?
			 */
P
Pierre Ossman 已提交
463
			if (host->remain == 0) {
L
Linus Torvalds 已提交
464 465 466
				/*
				 * Get next entry. Check if last.
				 */
467
				if (!wbsd_next_sg(host))
L
Linus Torvalds 已提交
468
					return;
469

470
				buffer = wbsd_sg_to_buffer(host);
L
Linus Torvalds 已提交
471 472 473
			}
		}
	}
474

L
Linus Torvalds 已提交
475 476 477 478 479
	/*
	 * This is a very dirty hack to solve a
	 * hardware problem. The chip doesn't trigger
	 * FIFO threshold interrupts properly.
	 */
480
	if ((data->blocks * data->blksz - data->bytes_xfered) < 16)
L
Linus Torvalds 已提交
481 482 483
		tasklet_schedule(&host->fifo_tasklet);
}

P
Pierre Ossman 已提交
484
static void wbsd_fill_fifo(struct wbsd_host *host)
L
Linus Torvalds 已提交
485
{
P
Pierre Ossman 已提交
486 487
	struct mmc_data *data = host->mrq->cmd->data;
	char *buffer;
L
Linus Torvalds 已提交
488
	int i, fsr, fifo;
489

L
Linus Torvalds 已提交
490 491 492 493
	/*
	 * Check that we aren't being called after the
	 * entire buffer has been transfered.
	 */
494
	if (host->num_sg == 0)
L
Linus Torvalds 已提交
495 496
		return;

497
	buffer = wbsd_sg_to_buffer(host) + host->offset;
L
Linus Torvalds 已提交
498 499 500 501 502

	/*
	 * Fill the fifo. This has a tendency to loop longer
	 * than the FIFO length (usually one block).
	 */
P
Pierre Ossman 已提交
503
	while (!((fsr = inb(host->base + WBSD_FSR)) & WBSD_FIFO_FULL)) {
L
Linus Torvalds 已提交
504 505 506
		/*
		 * The size field in the FSR is broken so we have to
		 * do some guessing.
507
		 */
L
Linus Torvalds 已提交
508 509 510 511 512 513 514
		if (fsr & WBSD_FIFO_EMPTY)
			fifo = 0;
		else if (fsr & WBSD_FIFO_EMTHRE)
			fifo = 8;
		else
			fifo = 15;

P
Pierre Ossman 已提交
515
		for (i = 16; i > fifo; i--) {
L
Linus Torvalds 已提交
516 517 518 519
			outb(*buffer, host->base + WBSD_DFR);
			buffer++;
			host->offset++;
			host->remain--;
520

L
Linus Torvalds 已提交
521
			data->bytes_xfered++;
522

L
Linus Torvalds 已提交
523 524 525
			/*
			 * End of scatter list entry?
			 */
P
Pierre Ossman 已提交
526
			if (host->remain == 0) {
L
Linus Torvalds 已提交
527 528 529
				/*
				 * Get next entry. Check if last.
				 */
530
				if (!wbsd_next_sg(host))
L
Linus Torvalds 已提交
531
					return;
532

533
				buffer = wbsd_sg_to_buffer(host);
L
Linus Torvalds 已提交
534 535 536
			}
		}
	}
537

P
Pierre Ossman 已提交
538 539 540 541 542 543
	/*
	 * The controller stops sending interrupts for
	 * 'FIFO empty' under certain conditions. So we
	 * need to be a bit more pro-active.
	 */
	tasklet_schedule(&host->fifo_tasklet);
L
Linus Torvalds 已提交
544 545
}

P
Pierre Ossman 已提交
546
static void wbsd_prepare_data(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
547 548 549 550
{
	u16 blksize;
	u8 setup;
	unsigned long dmaflags;
551
	unsigned int size;
L
Linus Torvalds 已提交
552 553

	DBGF("blksz %04x blks %04x flags %08x\n",
554
		data->blksz, data->blocks, data->flags);
L
Linus Torvalds 已提交
555 556
	DBGF("tsac %d ms nsac %d clk\n",
		data->timeout_ns / 1000000, data->timeout_clks);
557

L
Linus Torvalds 已提交
558 559 560
	/*
	 * Calculate size.
	 */
561
	size = data->blocks * data->blksz;
L
Linus Torvalds 已提交
562 563 564 565 566 567 568

	/*
	 * Check timeout values for overflow.
	 * (Yes, some cards cause this value to overflow).
	 */
	if (data->timeout_ns > 127000000)
		wbsd_write_index(host, WBSD_IDX_TAAC, 127);
P
Pierre Ossman 已提交
569 570 571 572
	else {
		wbsd_write_index(host, WBSD_IDX_TAAC,
			data->timeout_ns / 1000000);
	}
573

L
Linus Torvalds 已提交
574 575 576 577
	if (data->timeout_clks > 255)
		wbsd_write_index(host, WBSD_IDX_NSAC, 255);
	else
		wbsd_write_index(host, WBSD_IDX_NSAC, data->timeout_clks);
578

L
Linus Torvalds 已提交
579 580 581 582 583 584
	/*
	 * Inform the chip of how large blocks will be
	 * sent. It needs this to determine when to
	 * calculate CRC.
	 *
	 * Space for CRC must be included in the size.
585
	 * Two bytes are needed for each data line.
L
Linus Torvalds 已提交
586
	 */
P
Pierre Ossman 已提交
587
	if (host->bus_width == MMC_BUS_WIDTH_1) {
588
		blksize = data->blksz + 2;
589 590 591

		wbsd_write_index(host, WBSD_IDX_PBSMSB, (blksize >> 4) & 0xF0);
		wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
P
Pierre Ossman 已提交
592
	} else if (host->bus_width == MMC_BUS_WIDTH_4) {
593
		blksize = data->blksz + 2 * 4;
594

P
Pierre Ossman 已提交
595 596
		wbsd_write_index(host, WBSD_IDX_PBSMSB,
			((blksize >> 4) & 0xF0) | WBSD_DATA_WIDTH);
597
		wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
P
Pierre Ossman 已提交
598
	} else {
599 600 601
		data->error = MMC_ERR_INVALID;
		return;
	}
L
Linus Torvalds 已提交
602 603 604 605 606 607 608 609 610

	/*
	 * Clear the FIFO. This is needed even for DMA
	 * transfers since the chip still uses the FIFO
	 * internally.
	 */
	setup = wbsd_read_index(host, WBSD_IDX_SETUP);
	setup |= WBSD_FIFO_RESET;
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
611

L
Linus Torvalds 已提交
612 613 614
	/*
	 * DMA transfer?
	 */
P
Pierre Ossman 已提交
615
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
616 617 618
		/*
		 * The buffer for DMA is only 64 kB.
		 */
619 620
		BUG_ON(size > 0x10000);
		if (size > 0x10000) {
L
Linus Torvalds 已提交
621 622 623
			data->error = MMC_ERR_INVALID;
			return;
		}
624

L
Linus Torvalds 已提交
625 626 627 628 629 630
		/*
		 * Transfer data from the SG list to
		 * the DMA buffer.
		 */
		if (data->flags & MMC_DATA_WRITE)
			wbsd_sg_to_dma(host, data);
631

L
Linus Torvalds 已提交
632 633
		/*
		 * Initialise the ISA DMA controller.
634
		 */
L
Linus Torvalds 已提交
635 636 637 638 639 640 641 642
		dmaflags = claim_dma_lock();
		disable_dma(host->dma);
		clear_dma_ff(host->dma);
		if (data->flags & MMC_DATA_READ)
			set_dma_mode(host->dma, DMA_MODE_READ & ~0x40);
		else
			set_dma_mode(host->dma, DMA_MODE_WRITE & ~0x40);
		set_dma_addr(host->dma, host->dma_addr);
643
		set_dma_count(host->dma, size);
L
Linus Torvalds 已提交
644 645 646 647 648 649 650 651

		enable_dma(host->dma);
		release_dma_lock(dmaflags);

		/*
		 * Enable DMA on the host.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, WBSD_DMA_ENABLE);
P
Pierre Ossman 已提交
652
	} else {
L
Linus Torvalds 已提交
653 654 655 656 657
		/*
		 * This flag is used to keep printk
		 * output to a minimum.
		 */
		host->firsterr = 1;
658

L
Linus Torvalds 已提交
659 660 661 662
		/*
		 * Initialise the SG list.
		 */
		wbsd_init_sg(host, data);
663

L
Linus Torvalds 已提交
664 665 666 667
		/*
		 * Turn off DMA.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, 0);
668

L
Linus Torvalds 已提交
669 670 671 672
		/*
		 * Set up FIFO threshold levels (and fill
		 * buffer if doing a write).
		 */
P
Pierre Ossman 已提交
673
		if (data->flags & MMC_DATA_READ) {
L
Linus Torvalds 已提交
674 675
			wbsd_write_index(host, WBSD_IDX_FIFOEN,
				WBSD_FIFOEN_FULL | 8);
P
Pierre Ossman 已提交
676
		} else {
L
Linus Torvalds 已提交
677 678 679 680
			wbsd_write_index(host, WBSD_IDX_FIFOEN,
				WBSD_FIFOEN_EMPTY | 8);
			wbsd_fill_fifo(host);
		}
681 682
	}

L
Linus Torvalds 已提交
683 684 685
	data->error = MMC_ERR_NONE;
}

P
Pierre Ossman 已提交
686
static void wbsd_finish_data(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
687 688 689 690
{
	unsigned long dmaflags;
	int count;
	u8 status;
691

L
Linus Torvalds 已提交
692 693 694 695 696 697 698 699 700 701 702 703
	WARN_ON(host->mrq == NULL);

	/*
	 * Send a stop command if needed.
	 */
	if (data->stop)
		wbsd_send_command(host, data->stop);

	/*
	 * Wait for the controller to leave data
	 * transfer state.
	 */
P
Pierre Ossman 已提交
704
	do {
L
Linus Torvalds 已提交
705 706
		status = wbsd_read_index(host, WBSD_IDX_STATUS);
	} while (status & (WBSD_BLOCK_READ | WBSD_BLOCK_WRITE));
707

L
Linus Torvalds 已提交
708 709 710
	/*
	 * DMA transfer?
	 */
P
Pierre Ossman 已提交
711
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
712 713 714 715
		/*
		 * Disable DMA on the host.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, 0);
716

L
Linus Torvalds 已提交
717 718 719 720 721 722 723 724
		/*
		 * Turn of ISA DMA controller.
		 */
		dmaflags = claim_dma_lock();
		disable_dma(host->dma);
		clear_dma_ff(host->dma);
		count = get_dma_residue(host->dma);
		release_dma_lock(dmaflags);
725

726 727 728 729
		data->bytes_xfered = host->mrq->data->blocks *
			host->mrq->data->blksz - count;
		data->bytes_xfered -= data->bytes_xfered % data->blksz;

L
Linus Torvalds 已提交
730 731 732
		/*
		 * Any leftover data?
		 */
P
Pierre Ossman 已提交
733
		if (count) {
734 735 736
			printk(KERN_ERR "%s: Incomplete DMA transfer. "
				"%d bytes left.\n",
				mmc_hostname(host->mmc), count);
737

738 739
			if (data->error == MMC_ERR_NONE)
				data->error = MMC_ERR_FAILED;
P
Pierre Ossman 已提交
740
		} else {
L
Linus Torvalds 已提交
741 742 743 744 745 746
			/*
			 * Transfer data from DMA buffer to
			 * SG list.
			 */
			if (data->flags & MMC_DATA_READ)
				wbsd_dma_to_sg(host, data);
747
		}
748

749 750 751
		if (data->error != MMC_ERR_NONE) {
			if (data->bytes_xfered)
				data->bytes_xfered -= data->blksz;
L
Linus Torvalds 已提交
752 753
		}
	}
754

L
Linus Torvalds 已提交
755
	DBGF("Ending data transfer (%d bytes)\n", data->bytes_xfered);
756

L
Linus Torvalds 已提交
757 758 759
	wbsd_request_end(host, host->mrq);
}

P
Pierre Ossman 已提交
760 761 762 763 764
/*****************************************************************************\
 *                                                                           *
 * MMC layer callbacks                                                       *
 *                                                                           *
\*****************************************************************************/
L
Linus Torvalds 已提交
765

P
Pierre Ossman 已提交
766
static void wbsd_request(struct mmc_host *mmc, struct mmc_request *mrq)
L
Linus Torvalds 已提交
767
{
P
Pierre Ossman 已提交
768 769
	struct wbsd_host *host = mmc_priv(mmc);
	struct mmc_command *cmd;
L
Linus Torvalds 已提交
770 771 772 773 774 775 776 777 778 779 780

	/*
	 * Disable tasklets to avoid a deadlock.
	 */
	spin_lock_bh(&host->lock);

	BUG_ON(host->mrq != NULL);

	cmd = mrq->cmd;

	host->mrq = mrq;
781

L
Linus Torvalds 已提交
782 783 784 785
	/*
	 * If there is no card in the slot then
	 * timeout immediatly.
	 */
P
Pierre Ossman 已提交
786
	if (!(host->flags & WBSD_FCARD_PRESENT)) {
L
Linus Torvalds 已提交
787 788 789 790
		cmd->error = MMC_ERR_TIMEOUT;
		goto done;
	}

P
Pierre Ossman 已提交
791
	if (cmd->data) {
792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822
		/*
		 * The hardware is so delightfully stupid that it has a list
		 * of "data" commands. If a command isn't on this list, it'll
		 * just go back to the idle state and won't send any data
		 * interrupts.
		 */
		switch (cmd->opcode) {
		case 11:
		case 17:
		case 18:
		case 20:
		case 24:
		case 25:
		case 26:
		case 27:
		case 30:
		case 42:
		case 56:
			break;

		/* ACMDs. We don't keep track of state, so we just treat them
		 * like any other command. */
		case 51:
			break;

		default:
#ifdef CONFIG_MMC_DEBUG
			printk(KERN_WARNING "%s: Data command %d is not "
				"supported by this controller.\n",
				mmc_hostname(host->mmc), cmd->opcode);
#endif
823
			cmd->error = MMC_ERR_INVALID;
824 825 826

			goto done;
		};
827
	}
828

829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846
	/*
	 * Does the request include data?
	 */
	if (cmd->data) {
		wbsd_prepare_data(host, cmd->data);

		if (cmd->data->error != MMC_ERR_NONE)
			goto done;
	}

	wbsd_send_command(host, cmd);

	/*
	 * If this is a data transfer the request
	 * will be finished after the data has
	 * transfered.
	 */
	if (cmd->data && (cmd->error == MMC_ERR_NONE)) {
L
Linus Torvalds 已提交
847 848 849 850 851 852 853 854 855 856
		/*
		 * Dirty fix for hardware bug.
		 */
		if (host->dma == -1)
			tasklet_schedule(&host->fifo_tasklet);

		spin_unlock_bh(&host->lock);

		return;
	}
857

L
Linus Torvalds 已提交
858 859 860 861 862 863
done:
	wbsd_request_end(host, mrq);

	spin_unlock_bh(&host->lock);
}

P
Pierre Ossman 已提交
864
static void wbsd_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
L
Linus Torvalds 已提交
865
{
P
Pierre Ossman 已提交
866
	struct wbsd_host *host = mmc_priv(mmc);
L
Linus Torvalds 已提交
867
	u8 clk, setup, pwr;
868

L
Linus Torvalds 已提交
869 870 871 872 873 874 875 876
	spin_lock_bh(&host->lock);

	/*
	 * Reset the chip on each power off.
	 * Should clear out any weird states.
	 */
	if (ios->power_mode == MMC_POWER_OFF)
		wbsd_init_device(host);
877

L
Linus Torvalds 已提交
878 879 880 881 882 883 884 885 886 887 888 889 890
	if (ios->clock >= 24000000)
		clk = WBSD_CLK_24M;
	else if (ios->clock >= 16000000)
		clk = WBSD_CLK_16M;
	else if (ios->clock >= 12000000)
		clk = WBSD_CLK_12M;
	else
		clk = WBSD_CLK_375K;

	/*
	 * Only write to the clock register when
	 * there is an actual change.
	 */
P
Pierre Ossman 已提交
891
	if (clk != host->clk) {
L
Linus Torvalds 已提交
892 893 894 895
		wbsd_write_index(host, WBSD_IDX_CLK, clk);
		host->clk = clk;
	}

P
Pierre Ossman 已提交
896 897 898
	/*
	 * Power up card.
	 */
P
Pierre Ossman 已提交
899
	if (ios->power_mode != MMC_POWER_OFF) {
L
Linus Torvalds 已提交
900 901 902 903 904
		pwr = inb(host->base + WBSD_CSR);
		pwr &= ~WBSD_POWER_N;
		outb(pwr, host->base + WBSD_CSR);
	}

P
Pierre Ossman 已提交
905 906 907
	/*
	 * MMC cards need to have pin 1 high during init.
	 * It wreaks havoc with the card detection though so
908
	 * that needs to be disabled.
P
Pierre Ossman 已提交
909 910
	 */
	setup = wbsd_read_index(host, WBSD_IDX_SETUP);
P
Pierre Ossman 已提交
911
	if (ios->chip_select == MMC_CS_HIGH) {
912
		BUG_ON(ios->bus_width != MMC_BUS_WIDTH_1);
P
Pierre Ossman 已提交
913 914
		setup |= WBSD_DAT3_H;
		host->flags |= WBSD_FIGNORE_DETECT;
P
Pierre Ossman 已提交
915 916
	} else {
		if (setup & WBSD_DAT3_H) {
P
Pierre Ossman 已提交
917
			setup &= ~WBSD_DAT3_H;
918

P
Pierre Ossman 已提交
919 920 921 922
			/*
			 * We cannot resume card detection immediatly
			 * because of capacitance and delays in the chip.
			 */
P
Pierre Ossman 已提交
923
			mod_timer(&host->ignore_timer, jiffies + HZ / 100);
P
Pierre Ossman 已提交
924
		}
P
Pierre Ossman 已提交
925 926
	}
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
927

928 929 930 931 932 933
	/*
	 * Store bus width for later. Will be used when
	 * setting up the data transfer.
	 */
	host->bus_width = ios->bus_width;

L
Linus Torvalds 已提交
934 935 936
	spin_unlock_bh(&host->lock);
}

P
Pierre Ossman 已提交
937
static int wbsd_get_ro(struct mmc_host *mmc)
938
{
P
Pierre Ossman 已提交
939
	struct wbsd_host *host = mmc_priv(mmc);
940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958
	u8 csr;

	spin_lock_bh(&host->lock);

	csr = inb(host->base + WBSD_CSR);
	csr |= WBSD_MSLED;
	outb(csr, host->base + WBSD_CSR);

	mdelay(1);

	csr = inb(host->base + WBSD_CSR);
	csr &= ~WBSD_MSLED;
	outb(csr, host->base + WBSD_CSR);

	spin_unlock_bh(&host->lock);

	return csr & WBSD_WRPT;
}

959
static const struct mmc_host_ops wbsd_ops = {
P
Pierre Ossman 已提交
960 961
	.request	= wbsd_request,
	.set_ios	= wbsd_set_ios,
962
	.get_ro		= wbsd_get_ro,
P
Pierre Ossman 已提交
963 964 965 966 967 968 969 970
};

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

971 972 973 974 975 976
/*
 * Helper function to reset detection ignore
 */

static void wbsd_reset_ignore(unsigned long data)
{
P
Pierre Ossman 已提交
977
	struct wbsd_host *host = (struct wbsd_host *)data;
978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995

	BUG_ON(host == NULL);

	DBG("Resetting card detection ignore\n");

	spin_lock_bh(&host->lock);

	host->flags &= ~WBSD_FIGNORE_DETECT;

	/*
	 * Card status might have changed during the
	 * blackout.
	 */
	tasklet_schedule(&host->card_tasklet);

	spin_unlock_bh(&host->lock);
}

L
Linus Torvalds 已提交
996 997 998 999
/*
 * Tasklets
 */

P
Pierre Ossman 已提交
1000
static inline struct mmc_data *wbsd_get_data(struct wbsd_host *host)
L
Linus Torvalds 已提交
1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012
{
	WARN_ON(!host->mrq);
	if (!host->mrq)
		return NULL;

	WARN_ON(!host->mrq->cmd);
	if (!host->mrq->cmd)
		return NULL;

	WARN_ON(!host->mrq->cmd->data);
	if (!host->mrq->cmd->data)
		return NULL;
1013

L
Linus Torvalds 已提交
1014 1015 1016 1017 1018
	return host->mrq->cmd->data;
}

static void wbsd_tasklet_card(unsigned long param)
{
P
Pierre Ossman 已提交
1019
	struct wbsd_host *host = (struct wbsd_host *)param;
L
Linus Torvalds 已提交
1020
	u8 csr;
1021
	int delay = -1;
1022

L
Linus Torvalds 已提交
1023
	spin_lock(&host->lock);
1024

P
Pierre Ossman 已提交
1025
	if (host->flags & WBSD_FIGNORE_DETECT) {
P
Pierre Ossman 已提交
1026 1027 1028
		spin_unlock(&host->lock);
		return;
	}
1029

L
Linus Torvalds 已提交
1030 1031
	csr = inb(host->base + WBSD_CSR);
	WARN_ON(csr == 0xff);
1032

P
Pierre Ossman 已提交
1033 1034
	if (csr & WBSD_CARDPRESENT) {
		if (!(host->flags & WBSD_FCARD_PRESENT)) {
P
Pierre Ossman 已提交
1035 1036
			DBG("Card inserted\n");
			host->flags |= WBSD_FCARD_PRESENT;
1037

1038
			delay = 500;
P
Pierre Ossman 已提交
1039
		}
P
Pierre Ossman 已提交
1040
	} else if (host->flags & WBSD_FCARD_PRESENT) {
L
Linus Torvalds 已提交
1041
		DBG("Card removed\n");
P
Pierre Ossman 已提交
1042
		host->flags &= ~WBSD_FCARD_PRESENT;
1043

P
Pierre Ossman 已提交
1044
		if (host->mrq) {
1045 1046
			printk(KERN_ERR "%s: Card removed during transfer!\n",
				mmc_hostname(host->mmc));
L
Linus Torvalds 已提交
1047
			wbsd_reset(host);
1048

L
Linus Torvalds 已提交
1049 1050 1051
			host->mrq->cmd->error = MMC_ERR_FAILED;
			tasklet_schedule(&host->finish_tasklet);
		}
1052

1053
		delay = 0;
1054
	}
1055 1056 1057 1058 1059 1060 1061 1062 1063

	/*
	 * Unlock first since we might get a call back.
	 */

	spin_unlock(&host->lock);

	if (delay != -1)
		mmc_detect_change(host->mmc, msecs_to_jiffies(delay));
L
Linus Torvalds 已提交
1064 1065 1066 1067
}

static void wbsd_tasklet_fifo(unsigned long param)
{
P
Pierre Ossman 已提交
1068 1069
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1070

L
Linus Torvalds 已提交
1071
	spin_lock(&host->lock);
1072

L
Linus Torvalds 已提交
1073 1074
	if (!host->mrq)
		goto end;
1075

L
Linus Torvalds 已提交
1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087
	data = wbsd_get_data(host);
	if (!data)
		goto end;

	if (data->flags & MMC_DATA_WRITE)
		wbsd_fill_fifo(host);
	else
		wbsd_empty_fifo(host);

	/*
	 * Done?
	 */
1088
	if (host->num_sg == 0) {
L
Linus Torvalds 已提交
1089 1090 1091 1092
		wbsd_write_index(host, WBSD_IDX_FIFOEN, 0);
		tasklet_schedule(&host->finish_tasklet);
	}

1093
end:
L
Linus Torvalds 已提交
1094 1095 1096 1097 1098
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_crc(unsigned long param)
{
P
Pierre Ossman 已提交
1099 1100
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1101

L
Linus Torvalds 已提交
1102
	spin_lock(&host->lock);
1103

L
Linus Torvalds 已提交
1104 1105
	if (!host->mrq)
		goto end;
1106

L
Linus Torvalds 已提交
1107 1108 1109
	data = wbsd_get_data(host);
	if (!data)
		goto end;
1110

L
Linus Torvalds 已提交
1111 1112 1113
	DBGF("CRC error\n");

	data->error = MMC_ERR_BADCRC;
1114

L
Linus Torvalds 已提交
1115 1116
	tasklet_schedule(&host->finish_tasklet);

1117
end:
L
Linus Torvalds 已提交
1118 1119 1120 1121 1122
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_timeout(unsigned long param)
{
P
Pierre Ossman 已提交
1123 1124
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1125

L
Linus Torvalds 已提交
1126
	spin_lock(&host->lock);
1127

L
Linus Torvalds 已提交
1128 1129
	if (!host->mrq)
		goto end;
1130

L
Linus Torvalds 已提交
1131 1132 1133
	data = wbsd_get_data(host);
	if (!data)
		goto end;
1134

L
Linus Torvalds 已提交
1135 1136 1137
	DBGF("Timeout\n");

	data->error = MMC_ERR_TIMEOUT;
1138

L
Linus Torvalds 已提交
1139 1140
	tasklet_schedule(&host->finish_tasklet);

1141
end:
L
Linus Torvalds 已提交
1142 1143 1144 1145 1146
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_finish(unsigned long param)
{
P
Pierre Ossman 已提交
1147 1148
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1149

L
Linus Torvalds 已提交
1150
	spin_lock(&host->lock);
1151

L
Linus Torvalds 已提交
1152 1153 1154
	WARN_ON(!host->mrq);
	if (!host->mrq)
		goto end;
1155

L
Linus Torvalds 已提交
1156 1157 1158 1159 1160
	data = wbsd_get_data(host);
	if (!data)
		goto end;

	wbsd_finish_data(host, data);
1161 1162

end:
L
Linus Torvalds 已提交
1163 1164 1165 1166 1167 1168 1169
	spin_unlock(&host->lock);
}

/*
 * Interrupt handling
 */

1170
static irqreturn_t wbsd_irq(int irq, void *dev_id)
L
Linus Torvalds 已提交
1171
{
P
Pierre Ossman 已提交
1172
	struct wbsd_host *host = dev_id;
L
Linus Torvalds 已提交
1173
	int isr;
1174

L
Linus Torvalds 已提交
1175 1176 1177 1178 1179 1180 1181
	isr = inb(host->base + WBSD_ISR);

	/*
	 * Was it actually our hardware that caused the interrupt?
	 */
	if (isr == 0xff || isr == 0x00)
		return IRQ_NONE;
1182

L
Linus Torvalds 已提交
1183 1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197
	host->isr |= isr;

	/*
	 * Schedule tasklets as needed.
	 */
	if (isr & WBSD_INT_CARD)
		tasklet_schedule(&host->card_tasklet);
	if (isr & WBSD_INT_FIFO_THRE)
		tasklet_schedule(&host->fifo_tasklet);
	if (isr & WBSD_INT_CRC)
		tasklet_hi_schedule(&host->crc_tasklet);
	if (isr & WBSD_INT_TIMEOUT)
		tasklet_hi_schedule(&host->timeout_tasklet);
	if (isr & WBSD_INT_TC)
		tasklet_schedule(&host->finish_tasklet);
1198

L
Linus Torvalds 已提交
1199 1200 1201
	return IRQ_HANDLED;
}

P
Pierre Ossman 已提交
1202 1203 1204 1205 1206 1207
/*****************************************************************************\
 *                                                                           *
 * Device initialisation and shutdown                                        *
 *                                                                           *
\*****************************************************************************/

L
Linus Torvalds 已提交
1208
/*
P
Pierre Ossman 已提交
1209
 * Allocate/free MMC structure.
L
Linus Torvalds 已提交
1210 1211
 */

P
Pierre Ossman 已提交
1212
static int __devinit wbsd_alloc_mmc(struct device *dev)
P
Pierre Ossman 已提交
1213
{
P
Pierre Ossman 已提交
1214 1215
	struct mmc_host *mmc;
	struct wbsd_host *host;
1216

P
Pierre Ossman 已提交
1217 1218 1219 1220 1221 1222
	/*
	 * Allocate MMC structure.
	 */
	mmc = mmc_alloc_host(sizeof(struct wbsd_host), dev);
	if (!mmc)
		return -ENOMEM;
1223

P
Pierre Ossman 已提交
1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234
	host = mmc_priv(mmc);
	host->mmc = mmc;

	host->dma = -1;

	/*
	 * Set host parameters.
	 */
	mmc->ops = &wbsd_ops;
	mmc->f_min = 375000;
	mmc->f_max = 24000000;
P
Pierre Ossman 已提交
1235
	mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34;
1236
	mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_MULTIWRITE | MMC_CAP_BYTEBLOCK;
1237

P
Pierre Ossman 已提交
1238
	spin_lock_init(&host->lock);
1239

1240
	/*
1241
	 * Set up timers
1242
	 */
1243 1244 1245
	init_timer(&host->ignore_timer);
	host->ignore_timer.data = (unsigned long)host;
	host->ignore_timer.function = wbsd_reset_ignore;
1246

P
Pierre Ossman 已提交
1247 1248 1249 1250 1251 1252
	/*
	 * Maximum number of segments. Worst case is one sector per segment
	 * so this will be 64kB/512.
	 */
	mmc->max_hw_segs = 128;
	mmc->max_phys_segs = 128;
1253

P
Pierre Ossman 已提交
1254
	/*
1255
	 * Maximum request size. Also limited by 64KiB buffer.
P
Pierre Ossman 已提交
1256
	 */
1257
	mmc->max_req_size = 65536;
1258

P
Pierre Ossman 已提交
1259 1260
	/*
	 * Maximum segment size. Could be one segment with the maximum number
1261
	 * of bytes.
P
Pierre Ossman 已提交
1262
	 */
1263
	mmc->max_seg_size = mmc->max_req_size;
1264

1265 1266 1267 1268 1269 1270
	/*
	 * Maximum block size. We have 12 bits (= 4095) but have to subtract
	 * space for CRC. So the maximum is 4095 - 4*2 = 4087.
	 */
	mmc->max_blk_size = 4087;

1271 1272 1273 1274 1275 1276
	/*
	 * Maximum block count. There is no real limit so the maximum
	 * request size will be the only restriction.
	 */
	mmc->max_blk_count = mmc->max_req_size;

P
Pierre Ossman 已提交
1277
	dev_set_drvdata(dev, mmc);
1278

P
Pierre Ossman 已提交
1279 1280 1281
	return 0;
}

P
Pierre Ossman 已提交
1282
static void __devexit wbsd_free_mmc(struct device *dev)
P
Pierre Ossman 已提交
1283
{
P
Pierre Ossman 已提交
1284 1285
	struct mmc_host *mmc;
	struct wbsd_host *host;
1286

P
Pierre Ossman 已提交
1287 1288 1289
	mmc = dev_get_drvdata(dev);
	if (!mmc)
		return;
1290

1291 1292
	host = mmc_priv(mmc);
	BUG_ON(host == NULL);
1293

1294
	del_timer_sync(&host->ignore_timer);
1295

P
Pierre Ossman 已提交
1296
	mmc_free_host(mmc);
1297

P
Pierre Ossman 已提交
1298 1299 1300 1301 1302 1303 1304
	dev_set_drvdata(dev, NULL);
}

/*
 * Scan for known chip id:s
 */

P
Pierre Ossman 已提交
1305
static int __devinit wbsd_scan(struct wbsd_host *host)
L
Linus Torvalds 已提交
1306 1307 1308
{
	int i, j, k;
	int id;
1309

L
Linus Torvalds 已提交
1310 1311 1312 1313
	/*
	 * Iterate through all ports, all codes to
	 * find hardware that is in our known list.
	 */
1314
	for (i = 0; i < ARRAY_SIZE(config_ports); i++) {
L
Linus Torvalds 已提交
1315 1316
		if (!request_region(config_ports[i], 2, DRIVER_NAME))
			continue;
1317

1318
		for (j = 0; j < ARRAY_SIZE(unlock_codes); j++) {
L
Linus Torvalds 已提交
1319
			id = 0xFFFF;
1320

P
Pierre Ossman 已提交
1321 1322 1323 1324
			host->config = config_ports[i];
			host->unlock_code = unlock_codes[j];

			wbsd_unlock_config(host);
1325

L
Linus Torvalds 已提交
1326 1327 1328 1329 1330
			outb(WBSD_CONF_ID_HI, config_ports[i]);
			id = inb(config_ports[i] + 1) << 8;

			outb(WBSD_CONF_ID_LO, config_ports[i]);
			id |= inb(config_ports[i] + 1);
1331

P
Pierre Ossman 已提交
1332 1333
			wbsd_lock_config(host);

1334
			for (k = 0; k < ARRAY_SIZE(valid_ids); k++) {
P
Pierre Ossman 已提交
1335
				if (id == valid_ids[k]) {
L
Linus Torvalds 已提交
1336
					host->chip_id = id;
1337

L
Linus Torvalds 已提交
1338 1339 1340
					return 0;
				}
			}
1341

P
Pierre Ossman 已提交
1342
			if (id != 0xFFFF) {
L
Linus Torvalds 已提交
1343 1344 1345 1346
				DBG("Unknown hardware (id %x) found at %x\n",
					id, config_ports[i]);
			}
		}
1347

L
Linus Torvalds 已提交
1348 1349
		release_region(config_ports[i], 2);
	}
1350

P
Pierre Ossman 已提交
1351 1352 1353
	host->config = 0;
	host->unlock_code = 0;

L
Linus Torvalds 已提交
1354 1355 1356
	return -ENODEV;
}

P
Pierre Ossman 已提交
1357 1358 1359 1360
/*
 * Allocate/free io port ranges
 */

P
Pierre Ossman 已提交
1361
static int __devinit wbsd_request_region(struct wbsd_host *host, int base)
L
Linus Torvalds 已提交
1362
{
1363
	if (base & 0x7)
L
Linus Torvalds 已提交
1364
		return -EINVAL;
1365

P
Pierre Ossman 已提交
1366
	if (!request_region(base, 8, DRIVER_NAME))
L
Linus Torvalds 已提交
1367
		return -EIO;
1368

1369
	host->base = base;
1370

L
Linus Torvalds 已提交
1371 1372 1373
	return 0;
}

P
Pierre Ossman 已提交
1374
static void __devexit wbsd_release_regions(struct wbsd_host *host)
L
Linus Torvalds 已提交
1375 1376 1377
{
	if (host->base)
		release_region(host->base, 8);
1378

P
Pierre Ossman 已提交
1379
	host->base = 0;
L
Linus Torvalds 已提交
1380 1381 1382

	if (host->config)
		release_region(host->config, 2);
1383

P
Pierre Ossman 已提交
1384
	host->config = 0;
L
Linus Torvalds 已提交
1385 1386
}

P
Pierre Ossman 已提交
1387 1388 1389 1390
/*
 * Allocate/free DMA port and buffer
 */

P
Pierre Ossman 已提交
1391
static void __devinit wbsd_request_dma(struct wbsd_host *host, int dma)
L
Linus Torvalds 已提交
1392 1393 1394
{
	if (dma < 0)
		return;
1395

L
Linus Torvalds 已提交
1396 1397
	if (request_dma(dma, DRIVER_NAME))
		goto err;
1398

L
Linus Torvalds 已提交
1399 1400 1401 1402
	/*
	 * We need to allocate a special buffer in
	 * order for ISA to be able to DMA to it.
	 */
P
Pierre Ossman 已提交
1403
	host->dma_buffer = kmalloc(WBSD_DMA_SIZE,
L
Linus Torvalds 已提交
1404 1405 1406 1407 1408 1409 1410
		GFP_NOIO | GFP_DMA | __GFP_REPEAT | __GFP_NOWARN);
	if (!host->dma_buffer)
		goto free;

	/*
	 * Translate the address to a physical address.
	 */
1411
	host->dma_addr = dma_map_single(mmc_dev(host->mmc), host->dma_buffer,
P
Pierre Ossman 已提交
1412
		WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
1413

L
Linus Torvalds 已提交
1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425
	/*
	 * ISA DMA must be aligned on a 64k basis.
	 */
	if ((host->dma_addr & 0xffff) != 0)
		goto kfree;
	/*
	 * ISA cannot access memory above 16 MB.
	 */
	else if (host->dma_addr >= 0x1000000)
		goto kfree;

	host->dma = dma;
1426

L
Linus Torvalds 已提交
1427
	return;
1428

L
Linus Torvalds 已提交
1429 1430 1431 1432 1433
kfree:
	/*
	 * If we've gotten here then there is some kind of alignment bug
	 */
	BUG_ON(1);
1434

1435
	dma_unmap_single(mmc_dev(host->mmc), host->dma_addr,
P
Pierre Ossman 已提交
1436
		WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
P
Pierre Ossman 已提交
1437
	host->dma_addr = (dma_addr_t)NULL;
1438

L
Linus Torvalds 已提交
1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449
	kfree(host->dma_buffer);
	host->dma_buffer = NULL;

free:
	free_dma(dma);

err:
	printk(KERN_WARNING DRIVER_NAME ": Unable to allocate DMA %d. "
		"Falling back on FIFO.\n", dma);
}

P
Pierre Ossman 已提交
1450
static void __devexit wbsd_release_dma(struct wbsd_host *host)
P
Pierre Ossman 已提交
1451
{
P
Pierre Ossman 已提交
1452
	if (host->dma_addr) {
1453
		dma_unmap_single(mmc_dev(host->mmc), host->dma_addr,
P
Pierre Ossman 已提交
1454 1455
			WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
	}
1456
	kfree(host->dma_buffer);
P
Pierre Ossman 已提交
1457 1458
	if (host->dma >= 0)
		free_dma(host->dma);
1459

P
Pierre Ossman 已提交
1460 1461 1462 1463
	host->dma = -1;
	host->dma_buffer = NULL;
	host->dma_addr = (dma_addr_t)NULL;
}
L
Linus Torvalds 已提交
1464 1465

/*
P
Pierre Ossman 已提交
1466
 * Allocate/free IRQ.
L
Linus Torvalds 已提交
1467 1468
 */

P
Pierre Ossman 已提交
1469
static int __devinit wbsd_request_irq(struct wbsd_host *host, int irq)
L
Linus Torvalds 已提交
1470 1471
{
	int ret;
1472

L
Linus Torvalds 已提交
1473
	/*
P
Pierre Ossman 已提交
1474
	 * Allocate interrupt.
L
Linus Torvalds 已提交
1475
	 */
P
Pierre Ossman 已提交
1476

1477
	ret = request_irq(irq, wbsd_irq, IRQF_SHARED, DRIVER_NAME, host);
P
Pierre Ossman 已提交
1478 1479
	if (ret)
		return ret;
1480

P
Pierre Ossman 已提交
1481 1482
	host->irq = irq;

L
Linus Torvalds 已提交
1483
	/*
P
Pierre Ossman 已提交
1484
	 * Set up tasklets.
L
Linus Torvalds 已提交
1485
	 */
P
Pierre Ossman 已提交
1486 1487 1488 1489 1490 1491 1492 1493 1494 1495
	tasklet_init(&host->card_tasklet, wbsd_tasklet_card,
			(unsigned long)host);
	tasklet_init(&host->fifo_tasklet, wbsd_tasklet_fifo,
			(unsigned long)host);
	tasklet_init(&host->crc_tasklet, wbsd_tasklet_crc,
			(unsigned long)host);
	tasklet_init(&host->timeout_tasklet, wbsd_tasklet_timeout,
			(unsigned long)host);
	tasklet_init(&host->finish_tasklet, wbsd_tasklet_finish,
			(unsigned long)host);
1496

P
Pierre Ossman 已提交
1497 1498
	return 0;
}
L
Linus Torvalds 已提交
1499

P
Pierre Ossman 已提交
1500
static void __devexit wbsd_release_irq(struct wbsd_host *host)
P
Pierre Ossman 已提交
1501 1502 1503
{
	if (!host->irq)
		return;
L
Linus Torvalds 已提交
1504

P
Pierre Ossman 已提交
1505
	free_irq(host->irq, host);
1506

P
Pierre Ossman 已提交
1507
	host->irq = 0;
1508

P
Pierre Ossman 已提交
1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519
	tasklet_kill(&host->card_tasklet);
	tasklet_kill(&host->fifo_tasklet);
	tasklet_kill(&host->crc_tasklet);
	tasklet_kill(&host->timeout_tasklet);
	tasklet_kill(&host->finish_tasklet);
}

/*
 * Allocate all resources for the host.
 */

P
Pierre Ossman 已提交
1520
static int __devinit wbsd_request_resources(struct wbsd_host *host,
P
Pierre Ossman 已提交
1521 1522 1523
	int base, int irq, int dma)
{
	int ret;
1524

L
Linus Torvalds 已提交
1525 1526 1527
	/*
	 * Allocate I/O ports.
	 */
P
Pierre Ossman 已提交
1528
	ret = wbsd_request_region(host, base);
L
Linus Torvalds 已提交
1529
	if (ret)
P
Pierre Ossman 已提交
1530
		return ret;
L
Linus Torvalds 已提交
1531 1532

	/*
P
Pierre Ossman 已提交
1533
	 * Allocate interrupt.
L
Linus Torvalds 已提交
1534
	 */
P
Pierre Ossman 已提交
1535 1536 1537 1538 1539 1540 1541 1542
	ret = wbsd_request_irq(host, irq);
	if (ret)
		return ret;

	/*
	 * Allocate DMA.
	 */
	wbsd_request_dma(host, dma);
1543

P
Pierre Ossman 已提交
1544 1545 1546 1547 1548 1549 1550
	return 0;
}

/*
 * Release all resources for the host.
 */

P
Pierre Ossman 已提交
1551
static void __devexit wbsd_release_resources(struct wbsd_host *host)
P
Pierre Ossman 已提交
1552 1553 1554 1555 1556 1557 1558 1559 1560 1561
{
	wbsd_release_dma(host);
	wbsd_release_irq(host);
	wbsd_release_regions(host);
}

/*
 * Configure the resources the chip should use.
 */

P
Pierre Ossman 已提交
1562
static void wbsd_chip_config(struct wbsd_host *host)
P
Pierre Ossman 已提交
1563
{
P
Pierre Ossman 已提交
1564 1565
	wbsd_unlock_config(host);

P
Pierre Ossman 已提交
1566 1567
	/*
	 * Reset the chip.
1568
	 */
P
Pierre Ossman 已提交
1569 1570
	wbsd_write_config(host, WBSD_CONF_SWRST, 1);
	wbsd_write_config(host, WBSD_CONF_SWRST, 0);
L
Linus Torvalds 已提交
1571 1572 1573 1574 1575

	/*
	 * Select SD/MMC function.
	 */
	wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
1576

L
Linus Torvalds 已提交
1577 1578 1579
	/*
	 * Set up card detection.
	 */
P
Pierre Ossman 已提交
1580
	wbsd_write_config(host, WBSD_CONF_PINS, WBSD_PINS_DETECT_GP11);
1581

L
Linus Torvalds 已提交
1582
	/*
P
Pierre Ossman 已提交
1583
	 * Configure chip
L
Linus Torvalds 已提交
1584 1585 1586
	 */
	wbsd_write_config(host, WBSD_CONF_PORT_HI, host->base >> 8);
	wbsd_write_config(host, WBSD_CONF_PORT_LO, host->base & 0xff);
1587

P
Pierre Ossman 已提交
1588
	wbsd_write_config(host, WBSD_CONF_IRQ, host->irq);
1589

P
Pierre Ossman 已提交
1590 1591
	if (host->dma >= 0)
		wbsd_write_config(host, WBSD_CONF_DRQ, host->dma);
1592

L
Linus Torvalds 已提交
1593
	/*
P
Pierre Ossman 已提交
1594
	 * Enable and power up chip.
L
Linus Torvalds 已提交
1595
	 */
P
Pierre Ossman 已提交
1596 1597
	wbsd_write_config(host, WBSD_CONF_ENABLE, 1);
	wbsd_write_config(host, WBSD_CONF_POWER, 0x20);
P
Pierre Ossman 已提交
1598 1599

	wbsd_lock_config(host);
P
Pierre Ossman 已提交
1600 1601 1602 1603 1604
}

/*
 * Check that configured resources are correct.
 */
1605

P
Pierre Ossman 已提交
1606
static int wbsd_chip_validate(struct wbsd_host *host)
P
Pierre Ossman 已提交
1607 1608
{
	int base, irq, dma;
1609

P
Pierre Ossman 已提交
1610 1611
	wbsd_unlock_config(host);

L
Linus Torvalds 已提交
1612
	/*
P
Pierre Ossman 已提交
1613
	 * Select SD/MMC function.
L
Linus Torvalds 已提交
1614
	 */
P
Pierre Ossman 已提交
1615
	wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
1616

L
Linus Torvalds 已提交
1617
	/*
P
Pierre Ossman 已提交
1618
	 * Read configuration.
L
Linus Torvalds 已提交
1619
	 */
P
Pierre Ossman 已提交
1620 1621
	base = wbsd_read_config(host, WBSD_CONF_PORT_HI) << 8;
	base |= wbsd_read_config(host, WBSD_CONF_PORT_LO);
1622

P
Pierre Ossman 已提交
1623
	irq = wbsd_read_config(host, WBSD_CONF_IRQ);
1624

P
Pierre Ossman 已提交
1625
	dma = wbsd_read_config(host, WBSD_CONF_DRQ);
1626

P
Pierre Ossman 已提交
1627 1628
	wbsd_lock_config(host);

L
Linus Torvalds 已提交
1629
	/*
P
Pierre Ossman 已提交
1630
	 * Validate against given configuration.
L
Linus Torvalds 已提交
1631
	 */
P
Pierre Ossman 已提交
1632 1633 1634 1635 1636 1637
	if (base != host->base)
		return 0;
	if (irq != host->irq)
		return 0;
	if ((dma != host->dma) && (host->dma != -1))
		return 0;
1638

P
Pierre Ossman 已提交
1639 1640 1641
	return 1;
}

P
Pierre Ossman 已提交
1642 1643 1644 1645
/*
 * Powers down the SD function
 */

P
Pierre Ossman 已提交
1646
static void wbsd_chip_poweroff(struct wbsd_host *host)
P
Pierre Ossman 已提交
1647 1648 1649 1650 1651 1652 1653 1654 1655
{
	wbsd_unlock_config(host);

	wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
	wbsd_write_config(host, WBSD_CONF_ENABLE, 0);

	wbsd_lock_config(host);
}

P
Pierre Ossman 已提交
1656 1657 1658 1659 1660 1661
/*****************************************************************************\
 *                                                                           *
 * Devices setup and shutdown                                                *
 *                                                                           *
\*****************************************************************************/

P
Pierre Ossman 已提交
1662
static int __devinit wbsd_init(struct device *dev, int base, int irq, int dma,
P
Pierre Ossman 已提交
1663 1664
	int pnp)
{
P
Pierre Ossman 已提交
1665 1666
	struct wbsd_host *host = NULL;
	struct mmc_host *mmc = NULL;
P
Pierre Ossman 已提交
1667
	int ret;
1668

P
Pierre Ossman 已提交
1669 1670 1671
	ret = wbsd_alloc_mmc(dev);
	if (ret)
		return ret;
1672

P
Pierre Ossman 已提交
1673 1674
	mmc = dev_get_drvdata(dev);
	host = mmc_priv(mmc);
1675

L
Linus Torvalds 已提交
1676
	/*
P
Pierre Ossman 已提交
1677
	 * Scan for hardware.
L
Linus Torvalds 已提交
1678
	 */
P
Pierre Ossman 已提交
1679
	ret = wbsd_scan(host);
P
Pierre Ossman 已提交
1680 1681
	if (ret) {
		if (pnp && (ret == -ENODEV)) {
P
Pierre Ossman 已提交
1682 1683 1684
			printk(KERN_WARNING DRIVER_NAME
				": Unable to confirm device presence. You may "
				"experience lock-ups.\n");
P
Pierre Ossman 已提交
1685
		} else {
P
Pierre Ossman 已提交
1686 1687 1688 1689
			wbsd_free_mmc(dev);
			return ret;
		}
	}
1690

L
Linus Torvalds 已提交
1691
	/*
P
Pierre Ossman 已提交
1692
	 * Request resources.
L
Linus Torvalds 已提交
1693
	 */
1694
	ret = wbsd_request_resources(host, base, irq, dma);
P
Pierre Ossman 已提交
1695
	if (ret) {
P
Pierre Ossman 已提交
1696 1697 1698 1699
		wbsd_release_resources(host);
		wbsd_free_mmc(dev);
		return ret;
	}
1700

L
Linus Torvalds 已提交
1701
	/*
P
Pierre Ossman 已提交
1702
	 * See if chip needs to be configured.
L
Linus Torvalds 已提交
1703
	 */
P
Pierre Ossman 已提交
1704 1705
	if (pnp) {
		if ((host->config != 0) && !wbsd_chip_validate(host)) {
P
Pierre Ossman 已提交
1706 1707 1708 1709 1710 1711
			printk(KERN_WARNING DRIVER_NAME
				": PnP active but chip not configured! "
				"You probably have a buggy BIOS. "
				"Configuring chip manually.\n");
			wbsd_chip_config(host);
		}
P
Pierre Ossman 已提交
1712
	} else
P
Pierre Ossman 已提交
1713
		wbsd_chip_config(host);
1714

L
Linus Torvalds 已提交
1715 1716 1717 1718 1719
	/*
	 * Power Management stuff. No idea how this works.
	 * Not tested.
	 */
#ifdef CONFIG_PM
P
Pierre Ossman 已提交
1720
	if (host->config) {
P
Pierre Ossman 已提交
1721
		wbsd_unlock_config(host);
P
Pierre Ossman 已提交
1722
		wbsd_write_config(host, WBSD_CONF_PME, 0xA0);
P
Pierre Ossman 已提交
1723 1724
		wbsd_lock_config(host);
	}
L
Linus Torvalds 已提交
1725
#endif
P
Pierre Ossman 已提交
1726 1727 1728 1729
	/*
	 * Allow device to initialise itself properly.
	 */
	mdelay(5);
L
Linus Torvalds 已提交
1730 1731 1732 1733 1734

	/*
	 * Reset the chip into a known state.
	 */
	wbsd_init_device(host);
1735

L
Linus Torvalds 已提交
1736 1737
	mmc_add_host(mmc);

R
Russell King 已提交
1738
	printk(KERN_INFO "%s: W83L51xD", mmc_hostname(mmc));
P
Pierre Ossman 已提交
1739 1740 1741 1742 1743 1744 1745 1746 1747 1748
	if (host->chip_id != 0)
		printk(" id %x", (int)host->chip_id);
	printk(" at 0x%x irq %d", (int)host->base, (int)host->irq);
	if (host->dma >= 0)
		printk(" dma %d", (int)host->dma);
	else
		printk(" FIFO");
	if (pnp)
		printk(" PnP");
	printk("\n");
L
Linus Torvalds 已提交
1749 1750 1751 1752

	return 0;
}

P
Pierre Ossman 已提交
1753
static void __devexit wbsd_shutdown(struct device *dev, int pnp)
L
Linus Torvalds 已提交
1754
{
P
Pierre Ossman 已提交
1755 1756
	struct mmc_host *mmc = dev_get_drvdata(dev);
	struct wbsd_host *host;
1757

L
Linus Torvalds 已提交
1758
	if (!mmc)
P
Pierre Ossman 已提交
1759
		return;
L
Linus Torvalds 已提交
1760 1761

	host = mmc_priv(mmc);
1762

L
Linus Torvalds 已提交
1763 1764
	mmc_remove_host(mmc);

P
Pierre Ossman 已提交
1765 1766 1767
	/*
	 * Power down the SD/MMC function.
	 */
P
Pierre Ossman 已提交
1768
	if (!pnp)
P
Pierre Ossman 已提交
1769
		wbsd_chip_poweroff(host);
1770

P
Pierre Ossman 已提交
1771
	wbsd_release_resources(host);
1772

P
Pierre Ossman 已提交
1773 1774
	wbsd_free_mmc(dev);
}
L
Linus Torvalds 已提交
1775

P
Pierre Ossman 已提交
1776 1777 1778 1779
/*
 * Non-PnP
 */

P
Pierre Ossman 已提交
1780
static int __devinit wbsd_probe(struct platform_device *dev)
P
Pierre Ossman 已提交
1781
{
1782
	/* Use the module parameters for resources */
1783
	return wbsd_init(&dev->dev, io, irq, dma, 0);
P
Pierre Ossman 已提交
1784 1785
}

P
Pierre Ossman 已提交
1786
static int __devexit wbsd_remove(struct platform_device *dev)
P
Pierre Ossman 已提交
1787
{
1788
	wbsd_shutdown(&dev->dev, 0);
P
Pierre Ossman 已提交
1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799

	return 0;
}

/*
 * PnP
 */

#ifdef CONFIG_PNP

static int __devinit
P
Pierre Ossman 已提交
1800
wbsd_pnp_probe(struct pnp_dev *pnpdev, const struct pnp_device_id *dev_id)
P
Pierre Ossman 已提交
1801 1802
{
	int io, irq, dma;
1803

P
Pierre Ossman 已提交
1804 1805 1806 1807 1808 1809 1810 1811 1812
	/*
	 * Get resources from PnP layer.
	 */
	io = pnp_port_start(pnpdev, 0);
	irq = pnp_irq(pnpdev, 0);
	if (pnp_dma_valid(pnpdev, 0))
		dma = pnp_dma(pnpdev, 0);
	else
		dma = -1;
1813

P
Pierre Ossman 已提交
1814
	DBGF("PnP resources: port %3x irq %d dma %d\n", io, irq, dma);
1815

P
Pierre Ossman 已提交
1816 1817
	return wbsd_init(&pnpdev->dev, io, irq, dma, 1);
}
L
Linus Torvalds 已提交
1818

P
Pierre Ossman 已提交
1819
static void __devexit wbsd_pnp_remove(struct pnp_dev *dev)
P
Pierre Ossman 已提交
1820 1821
{
	wbsd_shutdown(&dev->dev, 1);
L
Linus Torvalds 已提交
1822 1823
}

P
Pierre Ossman 已提交
1824 1825
#endif /* CONFIG_PNP */

L
Linus Torvalds 已提交
1826 1827 1828 1829 1830
/*
 * Power management
 */

#ifdef CONFIG_PM
P
Pierre Ossman 已提交
1831

P
Pierre Ossman 已提交
1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847
static int wbsd_suspend(struct wbsd_host *host, pm_message_t state)
{
	BUG_ON(host == NULL);

	return mmc_suspend_host(host->mmc, state);
}

static int wbsd_resume(struct wbsd_host *host)
{
	BUG_ON(host == NULL);

	wbsd_init_device(host);

	return mmc_resume_host(host->mmc);
}

P
Pierre Ossman 已提交
1848 1849
static int wbsd_platform_suspend(struct platform_device *dev,
				 pm_message_t state)
L
Linus Torvalds 已提交
1850
{
1851
	struct mmc_host *mmc = platform_get_drvdata(dev);
P
Pierre Ossman 已提交
1852 1853 1854
	struct wbsd_host *host;
	int ret;

P
Pierre Ossman 已提交
1855
	if (mmc == NULL)
P
Pierre Ossman 已提交
1856 1857
		return 0;

P
Pierre Ossman 已提交
1858
	DBGF("Suspending...\n");
P
Pierre Ossman 已提交
1859 1860 1861

	host = mmc_priv(mmc);

P
Pierre Ossman 已提交
1862 1863 1864 1865
	ret = wbsd_suspend(host, state);
	if (ret)
		return ret;

P
Pierre Ossman 已提交
1866
	wbsd_chip_poweroff(host);
L
Linus Torvalds 已提交
1867 1868 1869 1870

	return 0;
}

P
Pierre Ossman 已提交
1871
static int wbsd_platform_resume(struct platform_device *dev)
L
Linus Torvalds 已提交
1872
{
1873
	struct mmc_host *mmc = platform_get_drvdata(dev);
P
Pierre Ossman 已提交
1874
	struct wbsd_host *host;
L
Linus Torvalds 已提交
1875

P
Pierre Ossman 已提交
1876
	if (mmc == NULL)
P
Pierre Ossman 已提交
1877 1878
		return 0;

P
Pierre Ossman 已提交
1879
	DBGF("Resuming...\n");
P
Pierre Ossman 已提交
1880 1881 1882 1883 1884 1885 1886 1887 1888 1889

	host = mmc_priv(mmc);

	wbsd_chip_config(host);

	/*
	 * Allow device to initialise itself properly.
	 */
	mdelay(5);

P
Pierre Ossman 已提交
1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901
	return wbsd_resume(host);
}

#ifdef CONFIG_PNP

static int wbsd_pnp_suspend(struct pnp_dev *pnp_dev, pm_message_t state)
{
	struct mmc_host *mmc = dev_get_drvdata(&pnp_dev->dev);
	struct wbsd_host *host;

	if (mmc == NULL)
		return 0;
P
Pierre Ossman 已提交
1902

P
Pierre Ossman 已提交
1903 1904 1905 1906 1907
	DBGF("Suspending...\n");

	host = mmc_priv(mmc);

	return wbsd_suspend(host, state);
L
Linus Torvalds 已提交
1908
}
P
Pierre Ossman 已提交
1909

P
Pierre Ossman 已提交
1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924
static int wbsd_pnp_resume(struct pnp_dev *pnp_dev)
{
	struct mmc_host *mmc = dev_get_drvdata(&pnp_dev->dev);
	struct wbsd_host *host;

	if (mmc == NULL)
		return 0;

	DBGF("Resuming...\n");

	host = mmc_priv(mmc);

	/*
	 * See if chip needs to be configured.
	 */
P
Pierre Ossman 已提交
1925 1926
	if (host->config != 0) {
		if (!wbsd_chip_validate(host)) {
P
Pierre Ossman 已提交
1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944
			printk(KERN_WARNING DRIVER_NAME
				": PnP active but chip not configured! "
				"You probably have a buggy BIOS. "
				"Configuring chip manually.\n");
			wbsd_chip_config(host);
		}
	}

	/*
	 * Allow device to initialise itself properly.
	 */
	mdelay(5);

	return wbsd_resume(host);
}

#endif /* CONFIG_PNP */

P
Pierre Ossman 已提交
1945 1946
#else /* CONFIG_PM */

P
Pierre Ossman 已提交
1947 1948 1949 1950 1951
#define wbsd_platform_suspend NULL
#define wbsd_platform_resume NULL

#define wbsd_pnp_suspend NULL
#define wbsd_pnp_resume NULL
P
Pierre Ossman 已提交
1952 1953

#endif /* CONFIG_PM */
L
Linus Torvalds 已提交
1954

P
Pierre Ossman 已提交
1955
static struct platform_device *wbsd_device;
L
Linus Torvalds 已提交
1956

1957
static struct platform_driver wbsd_driver = {
L
Linus Torvalds 已提交
1958
	.probe		= wbsd_probe,
P
Pierre Ossman 已提交
1959
	.remove		= __devexit_p(wbsd_remove),
1960

P
Pierre Ossman 已提交
1961 1962
	.suspend	= wbsd_platform_suspend,
	.resume		= wbsd_platform_resume,
1963 1964 1965
	.driver		= {
		.name	= DRIVER_NAME,
	},
L
Linus Torvalds 已提交
1966 1967
};

P
Pierre Ossman 已提交
1968 1969 1970 1971 1972 1973
#ifdef CONFIG_PNP

static struct pnp_driver wbsd_pnp_driver = {
	.name		= DRIVER_NAME,
	.id_table	= pnp_dev_table,
	.probe		= wbsd_pnp_probe,
P
Pierre Ossman 已提交
1974
	.remove		= __devexit_p(wbsd_pnp_remove),
P
Pierre Ossman 已提交
1975 1976 1977

	.suspend	= wbsd_pnp_suspend,
	.resume		= wbsd_pnp_resume,
P
Pierre Ossman 已提交
1978 1979 1980 1981
};

#endif /* CONFIG_PNP */

L
Linus Torvalds 已提交
1982 1983 1984 1985 1986 1987 1988
/*
 * Module loading/unloading
 */

static int __init wbsd_drv_init(void)
{
	int result;
1989

L
Linus Torvalds 已提交
1990
	printk(KERN_INFO DRIVER_NAME
P
Pierre Ossman 已提交
1991
		": Winbond W83L51xD SD/MMC card interface driver\n");
L
Linus Torvalds 已提交
1992 1993
	printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");

P
Pierre Ossman 已提交
1994 1995
#ifdef CONFIG_PNP

P
Pierre Ossman 已提交
1996
	if (!nopnp) {
P
Pierre Ossman 已提交
1997 1998 1999 2000
		result = pnp_register_driver(&wbsd_pnp_driver);
		if (result < 0)
			return result;
	}
2001 2002
#endif /* CONFIG_PNP */

P
Pierre Ossman 已提交
2003
	if (nopnp) {
2004
		result = platform_driver_register(&wbsd_driver);
P
Pierre Ossman 已提交
2005 2006 2007
		if (result < 0)
			return result;

2008
		wbsd_device = platform_device_alloc(DRIVER_NAME, -1);
P
Pierre Ossman 已提交
2009
		if (!wbsd_device) {
2010 2011 2012 2013 2014
			platform_driver_unregister(&wbsd_driver);
			return -ENOMEM;
		}

		result = platform_device_add(wbsd_device);
P
Pierre Ossman 已提交
2015
		if (result) {
2016 2017 2018 2019
			platform_device_put(wbsd_device);
			platform_driver_unregister(&wbsd_driver);
			return result;
		}
P
Pierre Ossman 已提交
2020
	}
L
Linus Torvalds 已提交
2021 2022 2023 2024 2025 2026

	return 0;
}

static void __exit wbsd_drv_exit(void)
{
P
Pierre Ossman 已提交
2027 2028 2029 2030
#ifdef CONFIG_PNP

	if (!nopnp)
		pnp_unregister_driver(&wbsd_pnp_driver);
2031 2032

#endif /* CONFIG_PNP */
P
Pierre Ossman 已提交
2033

P
Pierre Ossman 已提交
2034
	if (nopnp) {
P
Pierre Ossman 已提交
2035
		platform_device_unregister(wbsd_device);
2036

2037
		platform_driver_unregister(&wbsd_driver);
P
Pierre Ossman 已提交
2038
	}
L
Linus Torvalds 已提交
2039 2040 2041 2042 2043 2044

	DBG("unloaded\n");
}

module_init(wbsd_drv_init);
module_exit(wbsd_drv_exit);
P
Pierre Ossman 已提交
2045 2046 2047
#ifdef CONFIG_PNP
module_param(nopnp, uint, 0444);
#endif
L
Linus Torvalds 已提交
2048 2049 2050 2051 2052
module_param(io, uint, 0444);
module_param(irq, uint, 0444);
module_param(dma, int, 0444);

MODULE_LICENSE("GPL");
P
Pierre Ossman 已提交
2053
MODULE_AUTHOR("Pierre Ossman <drzeus@drzeus.cx>");
L
Linus Torvalds 已提交
2054 2055
MODULE_DESCRIPTION("Winbond W83L51xD SD/MMC card interface driver");

P
Pierre Ossman 已提交
2056 2057 2058
#ifdef CONFIG_PNP
MODULE_PARM_DESC(nopnp, "Scan for device instead of relying on PNP. (default 0)");
#endif
L
Linus Torvalds 已提交
2059 2060 2061
MODULE_PARM_DESC(io, "I/O base to allocate. Must be 8 byte aligned. (default 0x248)");
MODULE_PARM_DESC(irq, "IRQ to allocate. (default 6)");
MODULE_PARM_DESC(dma, "DMA channel to allocate. -1 for no DMA. (default 2)");