wbsd.c 39.9 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>
37
#include <linux/slab.h>
L
Linus Torvalds 已提交
38 39 40 41 42 43 44 45 46

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

#include "wbsd.h"

#define DRIVER_NAME "wbsd"

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

P
Pierre Ossman 已提交
51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66
/*
 * 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 已提交
67 68 69 70 71
static const int config_ports[] = { 0x2E, 0x4E };
static const int unlock_codes[] = { 0x83, 0x87 };

static const int valid_ids[] = {
	0x7112,
72
};
A
Adrian Bunk 已提交
73

P
Pierre Ossman 已提交
74
#ifdef CONFIG_PNP
75
static unsigned int param_nopnp = 0;
P
Pierre Ossman 已提交
76
#else
77
static const unsigned int param_nopnp = 1;
P
Pierre Ossman 已提交
78
#endif
79 80 81
static unsigned int param_io = 0x248;
static unsigned int param_irq = 6;
static int param_dma = 2;
P
Pierre Ossman 已提交
82

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

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

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

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

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

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

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

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

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

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

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

/*
 * Common routines
 */

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

L
Linus Torvalds 已提交
138 139 140 141 142 143
	/*
	 * 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);
144

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

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

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

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

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

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

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

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

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

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

L
Linus Torvalds 已提交
199 200 201 202 203 204 205 206
	/*
	 * 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 已提交
207
static void wbsd_request_end(struct wbsd_host *host, struct mmc_request *mrq)
L
Linus Torvalds 已提交
208 209
{
	unsigned long dmaflags;
210

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

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

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

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

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

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

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

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

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

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

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

/*
 * Command handling
 */
313

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

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

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

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

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

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

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

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

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

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

/*
 * Data functions
 */

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

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

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

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

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

			data->bytes_xfered++;
454

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	BUG_ON(host->mrq != NULL);

	cmd = mrq->cmd;

	host->mrq = mrq;
769

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

P
Pierre Ossman 已提交
778
	if (cmd->data) {
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 809
		/*
		 * 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 已提交
810
			cmd->error = -EINVAL;
811 812 813

			goto done;
		};
814
	}
815

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

P
Pierre Ossman 已提交
822
		if (cmd->data->error)
823 824 825 826 827 828 829 830 831 832
			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 已提交
833
	if (cmd->data && !cmd->error) {
L
Linus Torvalds 已提交
834 835 836 837 838 839 840 841 842 843
		/*
		 * Dirty fix for hardware bug.
		 */
		if (host->dma == -1)
			tasklet_schedule(&host->fifo_tasklet);

		spin_unlock_bh(&host->lock);

		return;
	}
844

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

	spin_unlock_bh(&host->lock);
}

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

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

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

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

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

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

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

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

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

943
	return !!(csr & WBSD_WRPT);
944 945
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	wbsd_finish_data(host, data);
1148 1149

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

/*
 * Interrupt handling
 */

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1281
	del_timer_sync(&host->ignore_timer);
1282

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

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

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

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

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

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

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

			wbsd_unlock_config(host);
1312

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

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

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

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

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

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

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

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

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

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

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

1356
	host->base = base;
1357

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

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

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

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

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

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

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

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

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

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

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

L
Linus Torvalds 已提交
1414
	return;
1415

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

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

L
Linus Torvalds 已提交
1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436
	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 已提交
1437
static void wbsd_release_dma(struct wbsd_host *host)
P
Pierre Ossman 已提交
1438
{
P
Pierre Ossman 已提交
1439
	if (host->dma_addr) {
1440
		dma_unmap_single(mmc_dev(host->mmc), host->dma_addr,
P
Pierre Ossman 已提交
1441 1442
			WBSD_DMA_SIZE, DMA_BIDIRECTIONAL);
	}
1443
	kfree(host->dma_buffer);
P
Pierre Ossman 已提交
1444 1445
	if (host->dma >= 0)
		free_dma(host->dma);
1446

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

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

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

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

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

	host->irq = irq;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	return 0;
}

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

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

	host = mmc_priv(mmc);
1748

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

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

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

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

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

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

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

	return 0;
}

/*
 * PnP
 */

#ifdef CONFIG_PNP

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

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

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

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

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

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

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

#ifdef CONFIG_PM
P
Pierre Ossman 已提交
1817

P
Pierre Ossman 已提交
1818 1819 1820 1821
static int wbsd_suspend(struct wbsd_host *host, pm_message_t state)
{
	BUG_ON(host == NULL);

1822
	return mmc_suspend_host(host->mmc);
P
Pierre Ossman 已提交
1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833
}

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 已提交
1834 1835
static int wbsd_platform_suspend(struct platform_device *dev,
				 pm_message_t state)
L
Linus Torvalds 已提交
1836
{
1837
	struct mmc_host *mmc = platform_get_drvdata(dev);
P
Pierre Ossman 已提交
1838 1839 1840
	struct wbsd_host *host;
	int ret;

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

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

	host = mmc_priv(mmc);

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

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

	return 0;
}

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

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

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

	host = mmc_priv(mmc);

	wbsd_chip_config(host);

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

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

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

	host = mmc_priv(mmc);

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

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

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

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

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

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

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

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

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

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

#endif /* CONFIG_PNP */

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

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

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

P
Pierre Ossman 已提交
1981 1982
#ifdef CONFIG_PNP

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

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

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

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

	return 0;
}

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

2016
	if (!param_nopnp)
P
Pierre Ossman 已提交
2017
		pnp_unregister_driver(&wbsd_pnp_driver);
2018 2019

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

2021
	if (param_nopnp) {
P
Pierre Ossman 已提交
2022
		platform_device_unregister(wbsd_device);
2023

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

	DBG("unloaded\n");
}

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

MODULE_LICENSE("GPL");
2040
MODULE_AUTHOR("Pierre Ossman <pierre@ossman.eu>");
L
Linus Torvalds 已提交
2041 2042
MODULE_DESCRIPTION("Winbond W83L51xD SD/MMC card interface driver");

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