wbsd.c 39.8 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
P
Pierre Ossman 已提交
2
 *  linux/drivers/mmc/host/wbsd.c - Winbond W83L51xD SD/MMC driver
L
Linus Torvalds 已提交
3
 *
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
#include <linux/highmem.h>
#include <linux/mmc/host.h>
J
Jens Axboe 已提交
36
#include <linux/scatterlist.h>
L
Linus Torvalds 已提交
37 38 39 40 41 42 43 44 45

#include <asm/io.h>
#include <asm/dma.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

P
Pierre Ossman 已提交
210
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
211 212 213 214 215 216 217 218 219 220 221 222 223
		/*
		 * 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);
	}
224

L
Linus Torvalds 已提交
225 226 227 228 229 230 231 232 233 234 235 236 237 238
	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 已提交
239
static inline void wbsd_init_sg(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
240 241 242 243 244 245 246 247 248 249 250
{
	/*
	 * 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 已提交
251
static inline int wbsd_next_sg(struct wbsd_host *host)
L
Linus Torvalds 已提交
252 253 254 255 256 257 258 259 260 261
{
	/*
	 * Skip to next SG entry.
	 */
	host->cur_sg++;
	host->num_sg--;

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

L
Linus Torvalds 已提交
267 268 269
	return host->num_sg;
}

270
static inline char *wbsd_sg_to_buffer(struct wbsd_host *host)
L
Linus Torvalds 已提交
271
{
J
Jens Axboe 已提交
272
	return sg_virt(host->cur_sg);
L
Linus Torvalds 已提交
273 274
}

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

L
Linus Torvalds 已提交
282 283
	sg = data->sg;
	len = data->sg_len;
284

P
Pierre Ossman 已提交
285
	for (i = 0; i < len; i++) {
J
Jens Axboe 已提交
286
		sgbuf = sg_virt(&sg[i]);
287
		memcpy(dmabuf, sgbuf, sg[i].length);
L
Linus Torvalds 已提交
288 289 290 291
		dmabuf += sg[i].length;
	}
}

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

L
Linus Torvalds 已提交
299 300
	sg = data->sg;
	len = data->sg_len;
301

P
Pierre Ossman 已提交
302
	for (i = 0; i < len; i++) {
J
Jens Axboe 已提交
303
		sgbuf = sg_virt(&sg[i]);
304
		memcpy(sgbuf, dmabuf, sg[i].length);
L
Linus Torvalds 已提交
305 306 307 308 309 310 311
		dmabuf += sg[i].length;
	}
}

/*
 * Command handling
 */
312

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

P
Pierre Ossman 已提交
324 325 326 327 328
	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 已提交
329 330
}

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

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

P
Pierre Ossman 已提交
344
	for (i = 0; i < 4; i++) {
L
Linus Torvalds 已提交
345 346 347 348 349 350 351 352 353 354 355
		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 已提交
356
static void wbsd_send_command(struct wbsd_host *host, struct mmc_command *cmd)
L
Linus Torvalds 已提交
357 358 359
{
	int i;
	u8 status, isr;
360

L
Linus Torvalds 已提交
361 362 363 364 365 366
	/*
	 * Clear accumulated ISR. The interrupt routine
	 * will fill this one with events that occur during
	 * transfer.
	 */
	host->isr = 0;
367

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

P
Pierre Ossman 已提交
375
	cmd->error = 0;
376

L
Linus Torvalds 已提交
377 378 379 380 381 382 383 384 385 386
	/*
	 * 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 已提交
387
	if (cmd->flags & MMC_RSP_PRESENT) {
L
Linus Torvalds 已提交
388 389 390 391
		/*
		 * Read back status.
		 */
		isr = host->isr;
392

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

/*
 * Data functions
 */

P
Pierre Ossman 已提交
416
static void wbsd_empty_fifo(struct wbsd_host *host)
L
Linus Torvalds 已提交
417
{
P
Pierre Ossman 已提交
418 419
	struct mmc_data *data = host->mrq->cmd->data;
	char *buffer;
L
Linus Torvalds 已提交
420
	int i, fsr, fifo;
421

L
Linus Torvalds 已提交
422 423 424
	/*
	 * Handle excessive data.
	 */
425
	if (host->num_sg == 0)
L
Linus Torvalds 已提交
426
		return;
427

428
	buffer = wbsd_sg_to_buffer(host) + host->offset;
L
Linus Torvalds 已提交
429 430 431 432 433

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

P
Pierre Ossman 已提交
446
		for (i = 0; i < fifo; i++) {
L
Linus Torvalds 已提交
447 448 449 450 451 452
			*buffer = inb(host->base + WBSD_DFR);
			buffer++;
			host->offset++;
			host->remain--;

			data->bytes_xfered++;
453

L
Linus Torvalds 已提交
454 455 456
			/*
			 * End of scatter list entry?
			 */
P
Pierre Ossman 已提交
457
			if (host->remain == 0) {
L
Linus Torvalds 已提交
458 459 460
				/*
				 * Get next entry. Check if last.
				 */
461
				if (!wbsd_next_sg(host))
L
Linus Torvalds 已提交
462
					return;
463

464
				buffer = wbsd_sg_to_buffer(host);
L
Linus Torvalds 已提交
465 466 467
			}
		}
	}
468

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

P
Pierre Ossman 已提交
478
static void wbsd_fill_fifo(struct wbsd_host *host)
L
Linus Torvalds 已提交
479
{
P
Pierre Ossman 已提交
480 481
	struct mmc_data *data = host->mrq->cmd->data;
	char *buffer;
L
Linus Torvalds 已提交
482
	int i, fsr, fifo;
483

L
Linus Torvalds 已提交
484 485 486 487
	/*
	 * Check that we aren't being called after the
	 * entire buffer has been transfered.
	 */
488
	if (host->num_sg == 0)
L
Linus Torvalds 已提交
489 490
		return;

491
	buffer = wbsd_sg_to_buffer(host) + host->offset;
L
Linus Torvalds 已提交
492 493 494 495 496

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

P
Pierre Ossman 已提交
509
		for (i = 16; i > fifo; i--) {
L
Linus Torvalds 已提交
510 511 512 513
			outb(*buffer, host->base + WBSD_DFR);
			buffer++;
			host->offset++;
			host->remain--;
514

L
Linus Torvalds 已提交
515
			data->bytes_xfered++;
516

L
Linus Torvalds 已提交
517 518 519
			/*
			 * End of scatter list entry?
			 */
P
Pierre Ossman 已提交
520
			if (host->remain == 0) {
L
Linus Torvalds 已提交
521 522 523
				/*
				 * Get next entry. Check if last.
				 */
524
				if (!wbsd_next_sg(host))
L
Linus Torvalds 已提交
525
					return;
526

527
				buffer = wbsd_sg_to_buffer(host);
L
Linus Torvalds 已提交
528 529 530
			}
		}
	}
531

P
Pierre Ossman 已提交
532 533 534 535 536 537
	/*
	 * 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 已提交
538 539
}

P
Pierre Ossman 已提交
540
static void wbsd_prepare_data(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
541 542 543 544
{
	u16 blksize;
	u8 setup;
	unsigned long dmaflags;
545
	unsigned int size;
L
Linus Torvalds 已提交
546 547 548 549

	/*
	 * Calculate size.
	 */
550
	size = data->blocks * data->blksz;
L
Linus Torvalds 已提交
551 552 553 554 555 556 557

	/*
	 * 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 已提交
558 559 560 561
	else {
		wbsd_write_index(host, WBSD_IDX_TAAC,
			data->timeout_ns / 1000000);
	}
562

L
Linus Torvalds 已提交
563 564 565 566
	if (data->timeout_clks > 255)
		wbsd_write_index(host, WBSD_IDX_NSAC, 255);
	else
		wbsd_write_index(host, WBSD_IDX_NSAC, data->timeout_clks);
567

L
Linus Torvalds 已提交
568 569 570 571 572 573
	/*
	 * 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.
574
	 * Two bytes are needed for each data line.
L
Linus Torvalds 已提交
575
	 */
P
Pierre Ossman 已提交
576
	if (host->bus_width == MMC_BUS_WIDTH_1) {
577
		blksize = data->blksz + 2;
578 579 580

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

P
Pierre Ossman 已提交
584 585
		wbsd_write_index(host, WBSD_IDX_PBSMSB,
			((blksize >> 4) & 0xF0) | WBSD_DATA_WIDTH);
586
		wbsd_write_index(host, WBSD_IDX_PBSLSB, blksize & 0xFF);
P
Pierre Ossman 已提交
587
	} else {
P
Pierre Ossman 已提交
588
		data->error = -EINVAL;
589 590
		return;
	}
L
Linus Torvalds 已提交
591 592 593 594 595 596 597 598 599

	/*
	 * 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);
600

L
Linus Torvalds 已提交
601 602 603
	/*
	 * DMA transfer?
	 */
P
Pierre Ossman 已提交
604
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
605 606 607
		/*
		 * The buffer for DMA is only 64 kB.
		 */
608 609
		BUG_ON(size > 0x10000);
		if (size > 0x10000) {
P
Pierre Ossman 已提交
610
			data->error = -EINVAL;
L
Linus Torvalds 已提交
611 612
			return;
		}
613

L
Linus Torvalds 已提交
614 615 616 617 618 619
		/*
		 * Transfer data from the SG list to
		 * the DMA buffer.
		 */
		if (data->flags & MMC_DATA_WRITE)
			wbsd_sg_to_dma(host, data);
620

L
Linus Torvalds 已提交
621 622
		/*
		 * Initialise the ISA DMA controller.
623
		 */
L
Linus Torvalds 已提交
624 625 626 627 628 629 630 631
		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);
632
		set_dma_count(host->dma, size);
L
Linus Torvalds 已提交
633 634 635 636 637 638 639 640

		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 已提交
641
	} else {
L
Linus Torvalds 已提交
642 643 644 645 646
		/*
		 * This flag is used to keep printk
		 * output to a minimum.
		 */
		host->firsterr = 1;
647

L
Linus Torvalds 已提交
648 649 650 651
		/*
		 * Initialise the SG list.
		 */
		wbsd_init_sg(host, data);
652

L
Linus Torvalds 已提交
653 654 655 656
		/*
		 * Turn off DMA.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, 0);
657

L
Linus Torvalds 已提交
658 659 660 661
		/*
		 * Set up FIFO threshold levels (and fill
		 * buffer if doing a write).
		 */
P
Pierre Ossman 已提交
662
		if (data->flags & MMC_DATA_READ) {
L
Linus Torvalds 已提交
663 664
			wbsd_write_index(host, WBSD_IDX_FIFOEN,
				WBSD_FIFOEN_FULL | 8);
P
Pierre Ossman 已提交
665
		} else {
L
Linus Torvalds 已提交
666 667 668 669
			wbsd_write_index(host, WBSD_IDX_FIFOEN,
				WBSD_FIFOEN_EMPTY | 8);
			wbsd_fill_fifo(host);
		}
670 671
	}

P
Pierre Ossman 已提交
672
	data->error = 0;
L
Linus Torvalds 已提交
673 674
}

P
Pierre Ossman 已提交
675
static void wbsd_finish_data(struct wbsd_host *host, struct mmc_data *data)
L
Linus Torvalds 已提交
676 677 678 679
{
	unsigned long dmaflags;
	int count;
	u8 status;
680

L
Linus Torvalds 已提交
681 682 683 684 685 686 687 688 689 690 691 692
	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 已提交
693
	do {
L
Linus Torvalds 已提交
694 695
		status = wbsd_read_index(host, WBSD_IDX_STATUS);
	} while (status & (WBSD_BLOCK_READ | WBSD_BLOCK_WRITE));
696

L
Linus Torvalds 已提交
697 698 699
	/*
	 * DMA transfer?
	 */
P
Pierre Ossman 已提交
700
	if (host->dma >= 0) {
L
Linus Torvalds 已提交
701 702 703 704
		/*
		 * Disable DMA on the host.
		 */
		wbsd_write_index(host, WBSD_IDX_DMA, 0);
705

L
Linus Torvalds 已提交
706 707 708 709 710 711 712 713
		/*
		 * 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);
714

715 716 717 718
		data->bytes_xfered = host->mrq->data->blocks *
			host->mrq->data->blksz - count;
		data->bytes_xfered -= data->bytes_xfered % data->blksz;

L
Linus Torvalds 已提交
719 720 721
		/*
		 * Any leftover data?
		 */
P
Pierre Ossman 已提交
722
		if (count) {
723 724 725
			printk(KERN_ERR "%s: Incomplete DMA transfer. "
				"%d bytes left.\n",
				mmc_hostname(host->mmc), count);
726

P
Pierre Ossman 已提交
727 728
			if (!data->error)
				data->error = -EIO;
P
Pierre Ossman 已提交
729
		} else {
L
Linus Torvalds 已提交
730 731 732 733 734 735
			/*
			 * Transfer data from DMA buffer to
			 * SG list.
			 */
			if (data->flags & MMC_DATA_READ)
				wbsd_dma_to_sg(host, data);
736
		}
737

P
Pierre Ossman 已提交
738
		if (data->error) {
739 740
			if (data->bytes_xfered)
				data->bytes_xfered -= data->blksz;
L
Linus Torvalds 已提交
741 742
		}
	}
743

L
Linus Torvalds 已提交
744 745 746
	wbsd_request_end(host, host->mrq);
}

P
Pierre Ossman 已提交
747 748 749 750 751
/*****************************************************************************\
 *                                                                           *
 * MMC layer callbacks                                                       *
 *                                                                           *
\*****************************************************************************/
L
Linus Torvalds 已提交
752

P
Pierre Ossman 已提交
753
static void wbsd_request(struct mmc_host *mmc, struct mmc_request *mrq)
L
Linus Torvalds 已提交
754
{
P
Pierre Ossman 已提交
755 756
	struct wbsd_host *host = mmc_priv(mmc);
	struct mmc_command *cmd;
L
Linus Torvalds 已提交
757 758 759 760 761 762 763 764 765 766 767

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

	BUG_ON(host->mrq != NULL);

	cmd = mrq->cmd;

	host->mrq = mrq;
768

L
Linus Torvalds 已提交
769
	/*
P
Pierre Ossman 已提交
770
	 * Check that there is actually a card in the slot.
L
Linus Torvalds 已提交
771
	 */
P
Pierre Ossman 已提交
772
	if (!(host->flags & WBSD_FCARD_PRESENT)) {
P
Pierre Ossman 已提交
773
		cmd->error = -ENOMEDIUM;
L
Linus Torvalds 已提交
774 775 776
		goto done;
	}

P
Pierre Ossman 已提交
777
	if (cmd->data) {
778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808
		/*
		 * 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
P
Pierre Ossman 已提交
809
			cmd->error = -EINVAL;
810 811 812

			goto done;
		};
813
	}
814

815 816 817 818 819 820
	/*
	 * Does the request include data?
	 */
	if (cmd->data) {
		wbsd_prepare_data(host, cmd->data);

P
Pierre Ossman 已提交
821
		if (cmd->data->error)
822 823 824 825 826 827 828 829 830 831
			goto done;
	}

	wbsd_send_command(host, cmd);

	/*
	 * If this is a data transfer the request
	 * will be finished after the data has
	 * transfered.
	 */
P
Pierre Ossman 已提交
832
	if (cmd->data && !cmd->error) {
L
Linus Torvalds 已提交
833 834 835 836 837 838 839 840 841 842
		/*
		 * Dirty fix for hardware bug.
		 */
		if (host->dma == -1)
			tasklet_schedule(&host->fifo_tasklet);

		spin_unlock_bh(&host->lock);

		return;
	}
843

L
Linus Torvalds 已提交
844 845 846 847 848 849
done:
	wbsd_request_end(host, mrq);

	spin_unlock_bh(&host->lock);
}

P
Pierre Ossman 已提交
850
static void wbsd_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
L
Linus Torvalds 已提交
851
{
P
Pierre Ossman 已提交
852
	struct wbsd_host *host = mmc_priv(mmc);
L
Linus Torvalds 已提交
853
	u8 clk, setup, pwr;
854

L
Linus Torvalds 已提交
855 856 857 858 859 860 861 862
	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);
863

L
Linus Torvalds 已提交
864 865 866 867 868 869 870 871 872 873 874 875 876
	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 已提交
877
	if (clk != host->clk) {
L
Linus Torvalds 已提交
878 879 880 881
		wbsd_write_index(host, WBSD_IDX_CLK, clk);
		host->clk = clk;
	}

P
Pierre Ossman 已提交
882 883 884
	/*
	 * Power up card.
	 */
P
Pierre Ossman 已提交
885
	if (ios->power_mode != MMC_POWER_OFF) {
L
Linus Torvalds 已提交
886 887 888 889 890
		pwr = inb(host->base + WBSD_CSR);
		pwr &= ~WBSD_POWER_N;
		outb(pwr, host->base + WBSD_CSR);
	}

P
Pierre Ossman 已提交
891 892 893
	/*
	 * MMC cards need to have pin 1 high during init.
	 * It wreaks havoc with the card detection though so
894
	 * that needs to be disabled.
P
Pierre Ossman 已提交
895 896
	 */
	setup = wbsd_read_index(host, WBSD_IDX_SETUP);
P
Pierre Ossman 已提交
897
	if (ios->chip_select == MMC_CS_HIGH) {
898
		BUG_ON(ios->bus_width != MMC_BUS_WIDTH_1);
P
Pierre Ossman 已提交
899 900
		setup |= WBSD_DAT3_H;
		host->flags |= WBSD_FIGNORE_DETECT;
P
Pierre Ossman 已提交
901 902
	} else {
		if (setup & WBSD_DAT3_H) {
P
Pierre Ossman 已提交
903
			setup &= ~WBSD_DAT3_H;
904

P
Pierre Ossman 已提交
905 906 907 908
			/*
			 * We cannot resume card detection immediatly
			 * because of capacitance and delays in the chip.
			 */
P
Pierre Ossman 已提交
909
			mod_timer(&host->ignore_timer, jiffies + HZ / 100);
P
Pierre Ossman 已提交
910
		}
P
Pierre Ossman 已提交
911 912
	}
	wbsd_write_index(host, WBSD_IDX_SETUP, setup);
913

914 915 916 917 918 919
	/*
	 * Store bus width for later. Will be used when
	 * setting up the data transfer.
	 */
	host->bus_width = ios->bus_width;

L
Linus Torvalds 已提交
920 921 922
	spin_unlock_bh(&host->lock);
}

P
Pierre Ossman 已提交
923
static int wbsd_get_ro(struct mmc_host *mmc)
924
{
P
Pierre Ossman 已提交
925
	struct wbsd_host *host = mmc_priv(mmc);
926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944
	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;
}

945
static const struct mmc_host_ops wbsd_ops = {
P
Pierre Ossman 已提交
946 947
	.request	= wbsd_request,
	.set_ios	= wbsd_set_ios,
948
	.get_ro		= wbsd_get_ro,
P
Pierre Ossman 已提交
949 950 951 952 953 954 955 956
};

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

957 958 959 960 961 962
/*
 * Helper function to reset detection ignore
 */

static void wbsd_reset_ignore(unsigned long data)
{
P
Pierre Ossman 已提交
963
	struct wbsd_host *host = (struct wbsd_host *)data;
964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981

	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 已提交
982 983 984 985
/*
 * Tasklets
 */

P
Pierre Ossman 已提交
986
static inline struct mmc_data *wbsd_get_data(struct wbsd_host *host)
L
Linus Torvalds 已提交
987 988 989 990 991 992 993 994 995 996 997 998
{
	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;
999

L
Linus Torvalds 已提交
1000 1001 1002 1003 1004
	return host->mrq->cmd->data;
}

static void wbsd_tasklet_card(unsigned long param)
{
P
Pierre Ossman 已提交
1005
	struct wbsd_host *host = (struct wbsd_host *)param;
L
Linus Torvalds 已提交
1006
	u8 csr;
1007
	int delay = -1;
1008

L
Linus Torvalds 已提交
1009
	spin_lock(&host->lock);
1010

P
Pierre Ossman 已提交
1011
	if (host->flags & WBSD_FIGNORE_DETECT) {
P
Pierre Ossman 已提交
1012 1013 1014
		spin_unlock(&host->lock);
		return;
	}
1015

L
Linus Torvalds 已提交
1016 1017
	csr = inb(host->base + WBSD_CSR);
	WARN_ON(csr == 0xff);
1018

P
Pierre Ossman 已提交
1019 1020
	if (csr & WBSD_CARDPRESENT) {
		if (!(host->flags & WBSD_FCARD_PRESENT)) {
P
Pierre Ossman 已提交
1021 1022
			DBG("Card inserted\n");
			host->flags |= WBSD_FCARD_PRESENT;
1023

1024
			delay = 500;
P
Pierre Ossman 已提交
1025
		}
P
Pierre Ossman 已提交
1026
	} else if (host->flags & WBSD_FCARD_PRESENT) {
L
Linus Torvalds 已提交
1027
		DBG("Card removed\n");
P
Pierre Ossman 已提交
1028
		host->flags &= ~WBSD_FCARD_PRESENT;
1029

P
Pierre Ossman 已提交
1030
		if (host->mrq) {
1031 1032
			printk(KERN_ERR "%s: Card removed during transfer!\n",
				mmc_hostname(host->mmc));
L
Linus Torvalds 已提交
1033
			wbsd_reset(host);
1034

P
Pierre Ossman 已提交
1035
			host->mrq->cmd->error = -ENOMEDIUM;
L
Linus Torvalds 已提交
1036 1037
			tasklet_schedule(&host->finish_tasklet);
		}
1038

1039
		delay = 0;
1040
	}
1041 1042 1043 1044 1045 1046 1047 1048 1049

	/*
	 * 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 已提交
1050 1051 1052 1053
}

static void wbsd_tasklet_fifo(unsigned long param)
{
P
Pierre Ossman 已提交
1054 1055
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1056

L
Linus Torvalds 已提交
1057
	spin_lock(&host->lock);
1058

L
Linus Torvalds 已提交
1059 1060
	if (!host->mrq)
		goto end;
1061

L
Linus Torvalds 已提交
1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073
	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?
	 */
1074
	if (host->num_sg == 0) {
L
Linus Torvalds 已提交
1075 1076 1077 1078
		wbsd_write_index(host, WBSD_IDX_FIFOEN, 0);
		tasklet_schedule(&host->finish_tasklet);
	}

1079
end:
L
Linus Torvalds 已提交
1080 1081 1082 1083 1084
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_crc(unsigned long param)
{
P
Pierre Ossman 已提交
1085 1086
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1087

L
Linus Torvalds 已提交
1088
	spin_lock(&host->lock);
1089

L
Linus Torvalds 已提交
1090 1091
	if (!host->mrq)
		goto end;
1092

L
Linus Torvalds 已提交
1093 1094 1095
	data = wbsd_get_data(host);
	if (!data)
		goto end;
1096

L
Linus Torvalds 已提交
1097 1098
	DBGF("CRC error\n");

P
Pierre Ossman 已提交
1099
	data->error = -EILSEQ;
1100

L
Linus Torvalds 已提交
1101 1102
	tasklet_schedule(&host->finish_tasklet);

1103
end:
L
Linus Torvalds 已提交
1104 1105 1106 1107 1108
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_timeout(unsigned long param)
{
P
Pierre Ossman 已提交
1109 1110
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1111

L
Linus Torvalds 已提交
1112
	spin_lock(&host->lock);
1113

L
Linus Torvalds 已提交
1114 1115
	if (!host->mrq)
		goto end;
1116

L
Linus Torvalds 已提交
1117 1118 1119
	data = wbsd_get_data(host);
	if (!data)
		goto end;
1120

L
Linus Torvalds 已提交
1121 1122
	DBGF("Timeout\n");

P
Pierre Ossman 已提交
1123
	data->error = -ETIMEDOUT;
1124

L
Linus Torvalds 已提交
1125 1126
	tasklet_schedule(&host->finish_tasklet);

1127
end:
L
Linus Torvalds 已提交
1128 1129 1130 1131 1132
	spin_unlock(&host->lock);
}

static void wbsd_tasklet_finish(unsigned long param)
{
P
Pierre Ossman 已提交
1133 1134
	struct wbsd_host *host = (struct wbsd_host *)param;
	struct mmc_data *data;
1135

L
Linus Torvalds 已提交
1136
	spin_lock(&host->lock);
1137

L
Linus Torvalds 已提交
1138 1139 1140
	WARN_ON(!host->mrq);
	if (!host->mrq)
		goto end;
1141

L
Linus Torvalds 已提交
1142 1143 1144 1145 1146
	data = wbsd_get_data(host);
	if (!data)
		goto end;

	wbsd_finish_data(host, data);
1147 1148

end:
L
Linus Torvalds 已提交
1149 1150 1151 1152 1153 1154 1155
	spin_unlock(&host->lock);
}

/*
 * Interrupt handling
 */

1156
static irqreturn_t wbsd_irq(int irq, void *dev_id)
L
Linus Torvalds 已提交
1157
{
P
Pierre Ossman 已提交
1158
	struct wbsd_host *host = dev_id;
L
Linus Torvalds 已提交
1159
	int isr;
1160

L
Linus Torvalds 已提交
1161 1162 1163 1164 1165 1166 1167
	isr = inb(host->base + WBSD_ISR);

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

L
Linus Torvalds 已提交
1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183
	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);
1184

L
Linus Torvalds 已提交
1185 1186 1187
	return IRQ_HANDLED;
}

P
Pierre Ossman 已提交
1188 1189 1190 1191 1192 1193
/*****************************************************************************\
 *                                                                           *
 * Device initialisation and shutdown                                        *
 *                                                                           *
\*****************************************************************************/

L
Linus Torvalds 已提交
1194
/*
P
Pierre Ossman 已提交
1195
 * Allocate/free MMC structure.
L
Linus Torvalds 已提交
1196 1197
 */

P
Pierre Ossman 已提交
1198
static int __devinit wbsd_alloc_mmc(struct device *dev)
P
Pierre Ossman 已提交
1199
{
P
Pierre Ossman 已提交
1200 1201
	struct mmc_host *mmc;
	struct wbsd_host *host;
1202

P
Pierre Ossman 已提交
1203 1204 1205 1206 1207 1208
	/*
	 * Allocate MMC structure.
	 */
	mmc = mmc_alloc_host(sizeof(struct wbsd_host), dev);
	if (!mmc)
		return -ENOMEM;
1209

P
Pierre Ossman 已提交
1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220
	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 已提交
1221
	mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34;
P
Pierre Ossman 已提交
1222
	mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_MULTIWRITE;
1223

P
Pierre Ossman 已提交
1224
	spin_lock_init(&host->lock);
1225

1226
	/*
1227
	 * Set up timers
1228
	 */
1229 1230 1231
	init_timer(&host->ignore_timer);
	host->ignore_timer.data = (unsigned long)host;
	host->ignore_timer.function = wbsd_reset_ignore;
1232

P
Pierre Ossman 已提交
1233 1234 1235 1236 1237 1238
	/*
	 * 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;
1239

P
Pierre Ossman 已提交
1240
	/*
1241
	 * Maximum request size. Also limited by 64KiB buffer.
P
Pierre Ossman 已提交
1242
	 */
1243
	mmc->max_req_size = 65536;
1244

P
Pierre Ossman 已提交
1245 1246
	/*
	 * Maximum segment size. Could be one segment with the maximum number
1247
	 * of bytes.
P
Pierre Ossman 已提交
1248
	 */
1249
	mmc->max_seg_size = mmc->max_req_size;
1250

1251 1252 1253 1254 1255 1256
	/*
	 * 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;

1257 1258 1259 1260 1261 1262
	/*
	 * 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 已提交
1263
	dev_set_drvdata(dev, mmc);
1264

P
Pierre Ossman 已提交
1265 1266 1267
	return 0;
}

G
Gabriel C 已提交
1268
static void wbsd_free_mmc(struct device *dev)
P
Pierre Ossman 已提交
1269
{
P
Pierre Ossman 已提交
1270 1271
	struct mmc_host *mmc;
	struct wbsd_host *host;
1272

P
Pierre Ossman 已提交
1273 1274 1275
	mmc = dev_get_drvdata(dev);
	if (!mmc)
		return;
1276

1277 1278
	host = mmc_priv(mmc);
	BUG_ON(host == NULL);
1279

1280
	del_timer_sync(&host->ignore_timer);
1281

P
Pierre Ossman 已提交
1282
	mmc_free_host(mmc);
1283

P
Pierre Ossman 已提交
1284 1285 1286 1287 1288 1289 1290
	dev_set_drvdata(dev, NULL);
}

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

P
Pierre Ossman 已提交
1291
static int __devinit wbsd_scan(struct wbsd_host *host)
L
Linus Torvalds 已提交
1292 1293 1294
{
	int i, j, k;
	int id;
1295

L
Linus Torvalds 已提交
1296 1297 1298 1299
	/*
	 * Iterate through all ports, all codes to
	 * find hardware that is in our known list.
	 */
1300
	for (i = 0; i < ARRAY_SIZE(config_ports); i++) {
L
Linus Torvalds 已提交
1301 1302
		if (!request_region(config_ports[i], 2, DRIVER_NAME))
			continue;
1303

1304
		for (j = 0; j < ARRAY_SIZE(unlock_codes); j++) {
L
Linus Torvalds 已提交
1305
			id = 0xFFFF;
1306

P
Pierre Ossman 已提交
1307 1308 1309 1310
			host->config = config_ports[i];
			host->unlock_code = unlock_codes[j];

			wbsd_unlock_config(host);
1311

L
Linus Torvalds 已提交
1312 1313 1314 1315 1316
			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);
1317

P
Pierre Ossman 已提交
1318 1319
			wbsd_lock_config(host);

1320
			for (k = 0; k < ARRAY_SIZE(valid_ids); k++) {
P
Pierre Ossman 已提交
1321
				if (id == valid_ids[k]) {
L
Linus Torvalds 已提交
1322
					host->chip_id = id;
1323

L
Linus Torvalds 已提交
1324 1325 1326
					return 0;
				}
			}
1327

P
Pierre Ossman 已提交
1328
			if (id != 0xFFFF) {
L
Linus Torvalds 已提交
1329 1330 1331 1332
				DBG("Unknown hardware (id %x) found at %x\n",
					id, config_ports[i]);
			}
		}
1333

L
Linus Torvalds 已提交
1334 1335
		release_region(config_ports[i], 2);
	}
1336

P
Pierre Ossman 已提交
1337 1338 1339
	host->config = 0;
	host->unlock_code = 0;

L
Linus Torvalds 已提交
1340 1341 1342
	return -ENODEV;
}

P
Pierre Ossman 已提交
1343 1344 1345 1346
/*
 * Allocate/free io port ranges
 */

P
Pierre Ossman 已提交
1347
static int __devinit wbsd_request_region(struct wbsd_host *host, int base)
L
Linus Torvalds 已提交
1348
{
1349
	if (base & 0x7)
L
Linus Torvalds 已提交
1350
		return -EINVAL;
1351

P
Pierre Ossman 已提交
1352
	if (!request_region(base, 8, DRIVER_NAME))
L
Linus Torvalds 已提交
1353
		return -EIO;
1354

1355
	host->base = base;
1356

L
Linus Torvalds 已提交
1357 1358 1359
	return 0;
}

G
Gabriel C 已提交
1360
static void wbsd_release_regions(struct wbsd_host *host)
L
Linus Torvalds 已提交
1361 1362 1363
{
	if (host->base)
		release_region(host->base, 8);
1364

P
Pierre Ossman 已提交
1365
	host->base = 0;
L
Linus Torvalds 已提交
1366 1367 1368

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

P
Pierre Ossman 已提交
1370
	host->config = 0;
L
Linus Torvalds 已提交
1371 1372
}

P
Pierre Ossman 已提交
1373 1374 1375 1376
/*
 * Allocate/free DMA port and buffer
 */

P
Pierre Ossman 已提交
1377
static void __devinit wbsd_request_dma(struct wbsd_host *host, int dma)
L
Linus Torvalds 已提交
1378 1379 1380
{
	if (dma < 0)
		return;
1381

L
Linus Torvalds 已提交
1382 1383
	if (request_dma(dma, DRIVER_NAME))
		goto err;
1384

L
Linus Torvalds 已提交
1385 1386 1387 1388
	/*
	 * We need to allocate a special buffer in
	 * order for ISA to be able to DMA to it.
	 */
P
Pierre Ossman 已提交
1389
	host->dma_buffer = kmalloc(WBSD_DMA_SIZE,
L
Linus Torvalds 已提交
1390 1391 1392 1393 1394 1395 1396
		GFP_NOIO | GFP_DMA | __GFP_REPEAT | __GFP_NOWARN);
	if (!host->dma_buffer)
		goto free;

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

L
Linus Torvalds 已提交
1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411
	/*
	 * 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;
1412

L
Linus Torvalds 已提交
1413
	return;
1414

L
Linus Torvalds 已提交
1415 1416 1417 1418 1419
kfree:
	/*
	 * If we've gotten here then there is some kind of alignment bug
	 */
	BUG_ON(1);
1420

1421
	dma_unmap_single(mmc_dev(host->mmc), host->dma_addr,
P
Pierre Ossman 已提交
1422
		WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
P
Pierre Ossman 已提交
1423
	host->dma_addr = (dma_addr_t)NULL;
1424

L
Linus Torvalds 已提交
1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435
	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);
}

G
Gabriel C 已提交
1436
static void wbsd_release_dma(struct wbsd_host *host)
P
Pierre Ossman 已提交
1437
{
P
Pierre Ossman 已提交
1438
	if (host->dma_addr) {
1439
		dma_unmap_single(mmc_dev(host->mmc), host->dma_addr,
P
Pierre Ossman 已提交
1440 1441
			WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
	}
1442
	kfree(host->dma_buffer);
P
Pierre Ossman 已提交
1443 1444
	if (host->dma >= 0)
		free_dma(host->dma);
1445

P
Pierre Ossman 已提交
1446 1447 1448 1449
	host->dma = -1;
	host->dma_buffer = NULL;
	host->dma_addr = (dma_addr_t)NULL;
}
L
Linus Torvalds 已提交
1450 1451

/*
P
Pierre Ossman 已提交
1452
 * Allocate/free IRQ.
L
Linus Torvalds 已提交
1453 1454
 */

P
Pierre Ossman 已提交
1455
static int __devinit wbsd_request_irq(struct wbsd_host *host, int irq)
L
Linus Torvalds 已提交
1456 1457
{
	int ret;
1458

L
Linus Torvalds 已提交
1459
	/*
1460
	 * Set up tasklets. Must be done before requesting interrupt.
L
Linus Torvalds 已提交
1461
	 */
P
Pierre Ossman 已提交
1462 1463 1464 1465 1466 1467 1468 1469 1470 1471
	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);
1472

1473 1474 1475 1476 1477 1478 1479 1480 1481
	/*
	 * Allocate interrupt.
	 */
	ret = request_irq(irq, wbsd_irq, IRQF_SHARED, DRIVER_NAME, host);
	if (ret)
		return ret;

	host->irq = irq;

P
Pierre Ossman 已提交
1482 1483
	return 0;
}
L
Linus Torvalds 已提交
1484

G
Gabriel C 已提交
1485
static void  wbsd_release_irq(struct wbsd_host *host)
P
Pierre Ossman 已提交
1486 1487 1488
{
	if (!host->irq)
		return;
L
Linus Torvalds 已提交
1489

P
Pierre Ossman 已提交
1490
	free_irq(host->irq, host);
1491

P
Pierre Ossman 已提交
1492
	host->irq = 0;
1493

P
Pierre Ossman 已提交
1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504
	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 已提交
1505
static int __devinit wbsd_request_resources(struct wbsd_host *host,
P
Pierre Ossman 已提交
1506 1507 1508
	int base, int irq, int dma)
{
	int ret;
1509

L
Linus Torvalds 已提交
1510 1511 1512
	/*
	 * Allocate I/O ports.
	 */
P
Pierre Ossman 已提交
1513
	ret = wbsd_request_region(host, base);
L
Linus Torvalds 已提交
1514
	if (ret)
P
Pierre Ossman 已提交
1515
		return ret;
L
Linus Torvalds 已提交
1516 1517

	/*
P
Pierre Ossman 已提交
1518
	 * Allocate interrupt.
L
Linus Torvalds 已提交
1519
	 */
P
Pierre Ossman 已提交
1520 1521 1522 1523 1524 1525 1526 1527
	ret = wbsd_request_irq(host, irq);
	if (ret)
		return ret;

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

P
Pierre Ossman 已提交
1529 1530 1531 1532 1533 1534 1535
	return 0;
}

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

G
Gabriel C 已提交
1536
static void wbsd_release_resources(struct wbsd_host *host)
P
Pierre Ossman 已提交
1537 1538 1539 1540 1541 1542 1543 1544 1545 1546
{
	wbsd_release_dma(host);
	wbsd_release_irq(host);
	wbsd_release_regions(host);
}

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

P
Pierre Ossman 已提交
1547
static void wbsd_chip_config(struct wbsd_host *host)
P
Pierre Ossman 已提交
1548
{
P
Pierre Ossman 已提交
1549 1550
	wbsd_unlock_config(host);

P
Pierre Ossman 已提交
1551 1552
	/*
	 * Reset the chip.
1553
	 */
P
Pierre Ossman 已提交
1554 1555
	wbsd_write_config(host, WBSD_CONF_SWRST, 1);
	wbsd_write_config(host, WBSD_CONF_SWRST, 0);
L
Linus Torvalds 已提交
1556 1557 1558 1559 1560

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

L
Linus Torvalds 已提交
1562 1563 1564
	/*
	 * Set up card detection.
	 */
P
Pierre Ossman 已提交
1565
	wbsd_write_config(host, WBSD_CONF_PINS, WBSD_PINS_DETECT_GP11);
1566

L
Linus Torvalds 已提交
1567
	/*
P
Pierre Ossman 已提交
1568
	 * Configure chip
L
Linus Torvalds 已提交
1569 1570 1571
	 */
	wbsd_write_config(host, WBSD_CONF_PORT_HI, host->base >> 8);
	wbsd_write_config(host, WBSD_CONF_PORT_LO, host->base & 0xff);
1572

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

P
Pierre Ossman 已提交
1575 1576
	if (host->dma >= 0)
		wbsd_write_config(host, WBSD_CONF_DRQ, host->dma);
1577

L
Linus Torvalds 已提交
1578
	/*
P
Pierre Ossman 已提交
1579
	 * Enable and power up chip.
L
Linus Torvalds 已提交
1580
	 */
P
Pierre Ossman 已提交
1581 1582
	wbsd_write_config(host, WBSD_CONF_ENABLE, 1);
	wbsd_write_config(host, WBSD_CONF_POWER, 0x20);
P
Pierre Ossman 已提交
1583 1584

	wbsd_lock_config(host);
P
Pierre Ossman 已提交
1585 1586 1587 1588 1589
}

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

P
Pierre Ossman 已提交
1591
static int wbsd_chip_validate(struct wbsd_host *host)
P
Pierre Ossman 已提交
1592 1593
{
	int base, irq, dma;
1594

P
Pierre Ossman 已提交
1595 1596
	wbsd_unlock_config(host);

L
Linus Torvalds 已提交
1597
	/*
P
Pierre Ossman 已提交
1598
	 * Select SD/MMC function.
L
Linus Torvalds 已提交
1599
	 */
P
Pierre Ossman 已提交
1600
	wbsd_write_config(host, WBSD_CONF_DEVICE, DEVICE_SD);
1601

L
Linus Torvalds 已提交
1602
	/*
P
Pierre Ossman 已提交
1603
	 * Read configuration.
L
Linus Torvalds 已提交
1604
	 */
P
Pierre Ossman 已提交
1605 1606
	base = wbsd_read_config(host, WBSD_CONF_PORT_HI) << 8;
	base |= wbsd_read_config(host, WBSD_CONF_PORT_LO);
1607

P
Pierre Ossman 已提交
1608
	irq = wbsd_read_config(host, WBSD_CONF_IRQ);
1609

P
Pierre Ossman 已提交
1610
	dma = wbsd_read_config(host, WBSD_CONF_DRQ);
1611

P
Pierre Ossman 已提交
1612 1613
	wbsd_lock_config(host);

L
Linus Torvalds 已提交
1614
	/*
P
Pierre Ossman 已提交
1615
	 * Validate against given configuration.
L
Linus Torvalds 已提交
1616
	 */
P
Pierre Ossman 已提交
1617 1618 1619 1620 1621 1622
	if (base != host->base)
		return 0;
	if (irq != host->irq)
		return 0;
	if ((dma != host->dma) && (host->dma != -1))
		return 0;
1623

P
Pierre Ossman 已提交
1624 1625 1626
	return 1;
}

P
Pierre Ossman 已提交
1627 1628 1629 1630
/*
 * Powers down the SD function
 */

P
Pierre Ossman 已提交
1631
static void wbsd_chip_poweroff(struct wbsd_host *host)
P
Pierre Ossman 已提交
1632 1633 1634 1635 1636 1637 1638 1639 1640
{
	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 已提交
1641 1642 1643 1644 1645 1646
/*****************************************************************************\
 *                                                                           *
 * Devices setup and shutdown                                                *
 *                                                                           *
\*****************************************************************************/

P
Pierre Ossman 已提交
1647
static int __devinit wbsd_init(struct device *dev, int base, int irq, int dma,
P
Pierre Ossman 已提交
1648 1649
	int pnp)
{
P
Pierre Ossman 已提交
1650 1651
	struct wbsd_host *host = NULL;
	struct mmc_host *mmc = NULL;
P
Pierre Ossman 已提交
1652
	int ret;
1653

P
Pierre Ossman 已提交
1654 1655 1656
	ret = wbsd_alloc_mmc(dev);
	if (ret)
		return ret;
1657

P
Pierre Ossman 已提交
1658 1659
	mmc = dev_get_drvdata(dev);
	host = mmc_priv(mmc);
1660

L
Linus Torvalds 已提交
1661
	/*
P
Pierre Ossman 已提交
1662
	 * Scan for hardware.
L
Linus Torvalds 已提交
1663
	 */
P
Pierre Ossman 已提交
1664
	ret = wbsd_scan(host);
P
Pierre Ossman 已提交
1665 1666
	if (ret) {
		if (pnp && (ret == -ENODEV)) {
P
Pierre Ossman 已提交
1667 1668 1669
			printk(KERN_WARNING DRIVER_NAME
				": Unable to confirm device presence. You may "
				"experience lock-ups.\n");
P
Pierre Ossman 已提交
1670
		} else {
P
Pierre Ossman 已提交
1671 1672 1673 1674
			wbsd_free_mmc(dev);
			return ret;
		}
	}
1675

L
Linus Torvalds 已提交
1676
	/*
P
Pierre Ossman 已提交
1677
	 * Request resources.
L
Linus Torvalds 已提交
1678
	 */
1679
	ret = wbsd_request_resources(host, base, irq, dma);
P
Pierre Ossman 已提交
1680
	if (ret) {
P
Pierre Ossman 已提交
1681 1682 1683 1684
		wbsd_release_resources(host);
		wbsd_free_mmc(dev);
		return ret;
	}
1685

L
Linus Torvalds 已提交
1686
	/*
P
Pierre Ossman 已提交
1687
	 * See if chip needs to be configured.
L
Linus Torvalds 已提交
1688
	 */
P
Pierre Ossman 已提交
1689 1690
	if (pnp) {
		if ((host->config != 0) && !wbsd_chip_validate(host)) {
P
Pierre Ossman 已提交
1691 1692 1693 1694 1695 1696
			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 已提交
1697
	} else
P
Pierre Ossman 已提交
1698
		wbsd_chip_config(host);
1699

L
Linus Torvalds 已提交
1700 1701 1702 1703 1704
	/*
	 * Power Management stuff. No idea how this works.
	 * Not tested.
	 */
#ifdef CONFIG_PM
P
Pierre Ossman 已提交
1705
	if (host->config) {
P
Pierre Ossman 已提交
1706
		wbsd_unlock_config(host);
P
Pierre Ossman 已提交
1707
		wbsd_write_config(host, WBSD_CONF_PME, 0xA0);
P
Pierre Ossman 已提交
1708 1709
		wbsd_lock_config(host);
	}
L
Linus Torvalds 已提交
1710
#endif
P
Pierre Ossman 已提交
1711 1712 1713 1714
	/*
	 * Allow device to initialise itself properly.
	 */
	mdelay(5);
L
Linus Torvalds 已提交
1715 1716 1717 1718 1719

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

L
Linus Torvalds 已提交
1721 1722
	mmc_add_host(mmc);

R
Russell King 已提交
1723
	printk(KERN_INFO "%s: W83L51xD", mmc_hostname(mmc));
P
Pierre Ossman 已提交
1724 1725 1726 1727 1728 1729 1730 1731 1732 1733
	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 已提交
1734 1735 1736 1737

	return 0;
}

P
Pierre Ossman 已提交
1738
static void __devexit wbsd_shutdown(struct device *dev, int pnp)
L
Linus Torvalds 已提交
1739
{
P
Pierre Ossman 已提交
1740 1741
	struct mmc_host *mmc = dev_get_drvdata(dev);
	struct wbsd_host *host;
1742

L
Linus Torvalds 已提交
1743
	if (!mmc)
P
Pierre Ossman 已提交
1744
		return;
L
Linus Torvalds 已提交
1745 1746

	host = mmc_priv(mmc);
1747

L
Linus Torvalds 已提交
1748 1749
	mmc_remove_host(mmc);

P
Pierre Ossman 已提交
1750 1751 1752
	/*
	 * Power down the SD/MMC function.
	 */
P
Pierre Ossman 已提交
1753
	if (!pnp)
P
Pierre Ossman 已提交
1754
		wbsd_chip_poweroff(host);
1755

P
Pierre Ossman 已提交
1756
	wbsd_release_resources(host);
1757

P
Pierre Ossman 已提交
1758 1759
	wbsd_free_mmc(dev);
}
L
Linus Torvalds 已提交
1760

P
Pierre Ossman 已提交
1761 1762 1763 1764
/*
 * Non-PnP
 */

P
Pierre Ossman 已提交
1765
static int __devinit wbsd_probe(struct platform_device *dev)
P
Pierre Ossman 已提交
1766
{
1767
	/* Use the module parameters for resources */
1768
	return wbsd_init(&dev->dev, io, irq, dma, 0);
P
Pierre Ossman 已提交
1769 1770
}

P
Pierre Ossman 已提交
1771
static int __devexit wbsd_remove(struct platform_device *dev)
P
Pierre Ossman 已提交
1772
{
1773
	wbsd_shutdown(&dev->dev, 0);
P
Pierre Ossman 已提交
1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784

	return 0;
}

/*
 * PnP
 */

#ifdef CONFIG_PNP

static int __devinit
P
Pierre Ossman 已提交
1785
wbsd_pnp_probe(struct pnp_dev *pnpdev, const struct pnp_device_id *dev_id)
P
Pierre Ossman 已提交
1786 1787
{
	int io, irq, dma;
1788

P
Pierre Ossman 已提交
1789 1790 1791 1792 1793 1794 1795 1796 1797
	/*
	 * 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;
1798

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

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

P
Pierre Ossman 已提交
1804
static void __devexit wbsd_pnp_remove(struct pnp_dev *dev)
P
Pierre Ossman 已提交
1805 1806
{
	wbsd_shutdown(&dev->dev, 1);
L
Linus Torvalds 已提交
1807 1808
}

P
Pierre Ossman 已提交
1809 1810
#endif /* CONFIG_PNP */

L
Linus Torvalds 已提交
1811 1812 1813 1814 1815
/*
 * Power management
 */

#ifdef CONFIG_PM
P
Pierre Ossman 已提交
1816

P
Pierre Ossman 已提交
1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832
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 已提交
1833 1834
static int wbsd_platform_suspend(struct platform_device *dev,
				 pm_message_t state)
L
Linus Torvalds 已提交
1835
{
1836
	struct mmc_host *mmc = platform_get_drvdata(dev);
P
Pierre Ossman 已提交
1837 1838 1839
	struct wbsd_host *host;
	int ret;

P
Pierre Ossman 已提交
1840
	if (mmc == NULL)
P
Pierre Ossman 已提交
1841 1842
		return 0;

P
Pierre Ossman 已提交
1843
	DBGF("Suspending...\n");
P
Pierre Ossman 已提交
1844 1845 1846

	host = mmc_priv(mmc);

P
Pierre Ossman 已提交
1847 1848 1849 1850
	ret = wbsd_suspend(host, state);
	if (ret)
		return ret;

P
Pierre Ossman 已提交
1851
	wbsd_chip_poweroff(host);
L
Linus Torvalds 已提交
1852 1853 1854 1855

	return 0;
}

P
Pierre Ossman 已提交
1856
static int wbsd_platform_resume(struct platform_device *dev)
L
Linus Torvalds 已提交
1857
{
1858
	struct mmc_host *mmc = platform_get_drvdata(dev);
P
Pierre Ossman 已提交
1859
	struct wbsd_host *host;
L
Linus Torvalds 已提交
1860

P
Pierre Ossman 已提交
1861
	if (mmc == NULL)
P
Pierre Ossman 已提交
1862 1863
		return 0;

P
Pierre Ossman 已提交
1864
	DBGF("Resuming...\n");
P
Pierre Ossman 已提交
1865 1866 1867 1868 1869 1870 1871 1872 1873 1874

	host = mmc_priv(mmc);

	wbsd_chip_config(host);

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

P
Pierre Ossman 已提交
1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886
	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 已提交
1887

P
Pierre Ossman 已提交
1888 1889 1890 1891 1892
	DBGF("Suspending...\n");

	host = mmc_priv(mmc);

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

P
Pierre Ossman 已提交
1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909
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 已提交
1910 1911
	if (host->config != 0) {
		if (!wbsd_chip_validate(host)) {
P
Pierre Ossman 已提交
1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929
			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 已提交
1930 1931
#else /* CONFIG_PM */

P
Pierre Ossman 已提交
1932 1933 1934 1935 1936
#define wbsd_platform_suspend NULL
#define wbsd_platform_resume NULL

#define wbsd_pnp_suspend NULL
#define wbsd_pnp_resume NULL
P
Pierre Ossman 已提交
1937 1938

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

P
Pierre Ossman 已提交
1940
static struct platform_device *wbsd_device;
L
Linus Torvalds 已提交
1941

1942
static struct platform_driver wbsd_driver = {
L
Linus Torvalds 已提交
1943
	.probe		= wbsd_probe,
P
Pierre Ossman 已提交
1944
	.remove		= __devexit_p(wbsd_remove),
1945

P
Pierre Ossman 已提交
1946 1947
	.suspend	= wbsd_platform_suspend,
	.resume		= wbsd_platform_resume,
1948 1949
	.driver		= {
		.name	= DRIVER_NAME,
1950
		.owner	= THIS_MODULE,
1951
	},
L
Linus Torvalds 已提交
1952 1953
};

P
Pierre Ossman 已提交
1954 1955 1956 1957 1958 1959
#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 已提交
1960
	.remove		= __devexit_p(wbsd_pnp_remove),
P
Pierre Ossman 已提交
1961 1962 1963

	.suspend	= wbsd_pnp_suspend,
	.resume		= wbsd_pnp_resume,
P
Pierre Ossman 已提交
1964 1965 1966 1967
};

#endif /* CONFIG_PNP */

L
Linus Torvalds 已提交
1968 1969 1970 1971 1972 1973 1974
/*
 * Module loading/unloading
 */

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

L
Linus Torvalds 已提交
1976
	printk(KERN_INFO DRIVER_NAME
P
Pierre Ossman 已提交
1977
		": Winbond W83L51xD SD/MMC card interface driver\n");
L
Linus Torvalds 已提交
1978 1979
	printk(KERN_INFO DRIVER_NAME ": Copyright(c) Pierre Ossman\n");

P
Pierre Ossman 已提交
1980 1981
#ifdef CONFIG_PNP

P
Pierre Ossman 已提交
1982
	if (!nopnp) {
P
Pierre Ossman 已提交
1983 1984 1985 1986
		result = pnp_register_driver(&wbsd_pnp_driver);
		if (result < 0)
			return result;
	}
1987 1988
#endif /* CONFIG_PNP */

P
Pierre Ossman 已提交
1989
	if (nopnp) {
1990
		result = platform_driver_register(&wbsd_driver);
P
Pierre Ossman 已提交
1991 1992 1993
		if (result < 0)
			return result;

1994
		wbsd_device = platform_device_alloc(DRIVER_NAME, -1);
P
Pierre Ossman 已提交
1995
		if (!wbsd_device) {
1996 1997 1998 1999 2000
			platform_driver_unregister(&wbsd_driver);
			return -ENOMEM;
		}

		result = platform_device_add(wbsd_device);
P
Pierre Ossman 已提交
2001
		if (result) {
2002 2003 2004 2005
			platform_device_put(wbsd_device);
			platform_driver_unregister(&wbsd_driver);
			return result;
		}
P
Pierre Ossman 已提交
2006
	}
L
Linus Torvalds 已提交
2007 2008 2009 2010 2011 2012

	return 0;
}

static void __exit wbsd_drv_exit(void)
{
P
Pierre Ossman 已提交
2013 2014 2015 2016
#ifdef CONFIG_PNP

	if (!nopnp)
		pnp_unregister_driver(&wbsd_pnp_driver);
2017 2018

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

P
Pierre Ossman 已提交
2020
	if (nopnp) {
P
Pierre Ossman 已提交
2021
		platform_device_unregister(wbsd_device);
2022

2023
		platform_driver_unregister(&wbsd_driver);
P
Pierre Ossman 已提交
2024
	}
L
Linus Torvalds 已提交
2025 2026 2027 2028 2029 2030

	DBG("unloaded\n");
}

module_init(wbsd_drv_init);
module_exit(wbsd_drv_exit);
P
Pierre Ossman 已提交
2031 2032 2033
#ifdef CONFIG_PNP
module_param(nopnp, uint, 0444);
#endif
L
Linus Torvalds 已提交
2034 2035 2036 2037 2038
module_param(io, uint, 0444);
module_param(irq, uint, 0444);
module_param(dma, int, 0444);

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

P
Pierre Ossman 已提交
2042 2043 2044
#ifdef CONFIG_PNP
MODULE_PARM_DESC(nopnp, "Scan for device instead of relying on PNP. (default 0)");
#endif
L
Linus Torvalds 已提交
2045 2046 2047
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)");