xref: /openbmc/linux/drivers/mmc/host/mvsdio.c (revision 54cbac81)
1 /*
2  * Marvell MMC/SD/SDIO driver
3  *
4  * Authors: Maen Suleiman, Nicolas Pitre
5  * Copyright (C) 2008-2009 Marvell Ltd.
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License version 2 as
9  * published by the Free Software Foundation.
10  */
11 
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/io.h>
15 #include <linux/platform_device.h>
16 #include <linux/mbus.h>
17 #include <linux/delay.h>
18 #include <linux/interrupt.h>
19 #include <linux/dma-mapping.h>
20 #include <linux/scatterlist.h>
21 #include <linux/irq.h>
22 #include <linux/clk.h>
23 #include <linux/gpio.h>
24 #include <linux/mmc/host.h>
25 
26 #include <asm/sizes.h>
27 #include <asm/unaligned.h>
28 #include <linux/platform_data/mmc-mvsdio.h>
29 
30 #include "mvsdio.h"
31 
32 #define DRIVER_NAME	"mvsdio"
33 
34 static int maxfreq = MVSD_CLOCKRATE_MAX;
35 static int nodma;
36 
37 struct mvsd_host {
38 	void __iomem *base;
39 	struct mmc_request *mrq;
40 	spinlock_t lock;
41 	unsigned int xfer_mode;
42 	unsigned int intr_en;
43 	unsigned int ctrl;
44 	unsigned int pio_size;
45 	void *pio_ptr;
46 	unsigned int sg_frags;
47 	unsigned int ns_per_clk;
48 	unsigned int clock;
49 	unsigned int base_clock;
50 	struct timer_list timer;
51 	struct mmc_host *mmc;
52 	struct device *dev;
53 	struct resource *res;
54 	int irq;
55 	struct clk *clk;
56 	int gpio_card_detect;
57 	int gpio_write_protect;
58 };
59 
60 #define mvsd_write(offs, val)	writel(val, iobase + (offs))
61 #define mvsd_read(offs)		readl(iobase + (offs))
62 
63 static int mvsd_setup_data(struct mvsd_host *host, struct mmc_data *data)
64 {
65 	void __iomem *iobase = host->base;
66 	unsigned int tmout;
67 	int tmout_index;
68 
69 	/*
70 	 * Hardware weirdness.  The FIFO_EMPTY bit of the HW_STATE
71 	 * register is sometimes not set before a while when some
72 	 * "unusual" data block sizes are used (such as with the SWITCH
73 	 * command), even despite the fact that the XFER_DONE interrupt
74 	 * was raised.  And if another data transfer starts before
75 	 * this bit comes to good sense (which eventually happens by
76 	 * itself) then the new transfer simply fails with a timeout.
77 	 */
78 	if (!(mvsd_read(MVSD_HW_STATE) & (1 << 13))) {
79 		unsigned long t = jiffies + HZ;
80 		unsigned int hw_state,  count = 0;
81 		do {
82 			if (time_after(jiffies, t)) {
83 				dev_warn(host->dev, "FIFO_EMPTY bit missing\n");
84 				break;
85 			}
86 			hw_state = mvsd_read(MVSD_HW_STATE);
87 			count++;
88 		} while (!(hw_state & (1 << 13)));
89 		dev_dbg(host->dev, "*** wait for FIFO_EMPTY bit "
90 				   "(hw=0x%04x, count=%d, jiffies=%ld)\n",
91 				   hw_state, count, jiffies - (t - HZ));
92 	}
93 
94 	/* If timeout=0 then maximum timeout index is used. */
95 	tmout = DIV_ROUND_UP(data->timeout_ns, host->ns_per_clk);
96 	tmout += data->timeout_clks;
97 	tmout_index = fls(tmout - 1) - 12;
98 	if (tmout_index < 0)
99 		tmout_index = 0;
100 	if (tmout_index > MVSD_HOST_CTRL_TMOUT_MAX)
101 		tmout_index = MVSD_HOST_CTRL_TMOUT_MAX;
102 
103 	dev_dbg(host->dev, "data %s at 0x%08x: blocks=%d blksz=%d tmout=%u (%d)\n",
104 		(data->flags & MMC_DATA_READ) ? "read" : "write",
105 		(u32)sg_virt(data->sg), data->blocks, data->blksz,
106 		tmout, tmout_index);
107 
108 	host->ctrl &= ~MVSD_HOST_CTRL_TMOUT_MASK;
109 	host->ctrl |= MVSD_HOST_CTRL_TMOUT(tmout_index);
110 	mvsd_write(MVSD_HOST_CTRL, host->ctrl);
111 	mvsd_write(MVSD_BLK_COUNT, data->blocks);
112 	mvsd_write(MVSD_BLK_SIZE, data->blksz);
113 
114 	if (nodma || (data->blksz | data->sg->offset) & 3) {
115 		/*
116 		 * We cannot do DMA on a buffer which offset or size
117 		 * is not aligned on a 4-byte boundary.
118 		 */
119 		host->pio_size = data->blocks * data->blksz;
120 		host->pio_ptr = sg_virt(data->sg);
121 		if (!nodma)
122 			pr_debug("%s: fallback to PIO for data "
123 					  "at 0x%p size %d\n",
124 					  mmc_hostname(host->mmc),
125 					  host->pio_ptr, host->pio_size);
126 		return 1;
127 	} else {
128 		dma_addr_t phys_addr;
129 		int dma_dir = (data->flags & MMC_DATA_READ) ?
130 			DMA_FROM_DEVICE : DMA_TO_DEVICE;
131 		host->sg_frags = dma_map_sg(mmc_dev(host->mmc), data->sg,
132 					    data->sg_len, dma_dir);
133 		phys_addr = sg_dma_address(data->sg);
134 		mvsd_write(MVSD_SYS_ADDR_LOW, (u32)phys_addr & 0xffff);
135 		mvsd_write(MVSD_SYS_ADDR_HI,  (u32)phys_addr >> 16);
136 		return 0;
137 	}
138 }
139 
140 static void mvsd_request(struct mmc_host *mmc, struct mmc_request *mrq)
141 {
142 	struct mvsd_host *host = mmc_priv(mmc);
143 	void __iomem *iobase = host->base;
144 	struct mmc_command *cmd = mrq->cmd;
145 	u32 cmdreg = 0, xfer = 0, intr = 0;
146 	unsigned long flags;
147 
148 	BUG_ON(host->mrq != NULL);
149 	host->mrq = mrq;
150 
151 	dev_dbg(host->dev, "cmd %d (hw state 0x%04x)\n",
152 		cmd->opcode, mvsd_read(MVSD_HW_STATE));
153 
154 	cmdreg = MVSD_CMD_INDEX(cmd->opcode);
155 
156 	if (cmd->flags & MMC_RSP_BUSY)
157 		cmdreg |= MVSD_CMD_RSP_48BUSY;
158 	else if (cmd->flags & MMC_RSP_136)
159 		cmdreg |= MVSD_CMD_RSP_136;
160 	else if (cmd->flags & MMC_RSP_PRESENT)
161 		cmdreg |= MVSD_CMD_RSP_48;
162 	else
163 		cmdreg |= MVSD_CMD_RSP_NONE;
164 
165 	if (cmd->flags & MMC_RSP_CRC)
166 		cmdreg |= MVSD_CMD_CHECK_CMDCRC;
167 
168 	if (cmd->flags & MMC_RSP_OPCODE)
169 		cmdreg |= MVSD_CMD_INDX_CHECK;
170 
171 	if (cmd->flags & MMC_RSP_PRESENT) {
172 		cmdreg |= MVSD_UNEXPECTED_RESP;
173 		intr |= MVSD_NOR_UNEXP_RSP;
174 	}
175 
176 	if (mrq->data) {
177 		struct mmc_data *data = mrq->data;
178 		int pio;
179 
180 		cmdreg |= MVSD_CMD_DATA_PRESENT | MVSD_CMD_CHECK_DATACRC16;
181 		xfer |= MVSD_XFER_MODE_HW_WR_DATA_EN;
182 		if (data->flags & MMC_DATA_READ)
183 			xfer |= MVSD_XFER_MODE_TO_HOST;
184 
185 		pio = mvsd_setup_data(host, data);
186 		if (pio) {
187 			xfer |= MVSD_XFER_MODE_PIO;
188 			/* PIO section of mvsd_irq has comments on those bits */
189 			if (data->flags & MMC_DATA_WRITE)
190 				intr |= MVSD_NOR_TX_AVAIL;
191 			else if (host->pio_size > 32)
192 				intr |= MVSD_NOR_RX_FIFO_8W;
193 			else
194 				intr |= MVSD_NOR_RX_READY;
195 		}
196 
197 		if (data->stop) {
198 			struct mmc_command *stop = data->stop;
199 			u32 cmd12reg = 0;
200 
201 			mvsd_write(MVSD_AUTOCMD12_ARG_LOW, stop->arg & 0xffff);
202 			mvsd_write(MVSD_AUTOCMD12_ARG_HI,  stop->arg >> 16);
203 
204 			if (stop->flags & MMC_RSP_BUSY)
205 				cmd12reg |= MVSD_AUTOCMD12_BUSY;
206 			if (stop->flags & MMC_RSP_OPCODE)
207 				cmd12reg |= MVSD_AUTOCMD12_INDX_CHECK;
208 			cmd12reg |= MVSD_AUTOCMD12_INDEX(stop->opcode);
209 			mvsd_write(MVSD_AUTOCMD12_CMD, cmd12reg);
210 
211 			xfer |= MVSD_XFER_MODE_AUTO_CMD12;
212 			intr |= MVSD_NOR_AUTOCMD12_DONE;
213 		} else {
214 			intr |= MVSD_NOR_XFER_DONE;
215 		}
216 	} else {
217 		intr |= MVSD_NOR_CMD_DONE;
218 	}
219 
220 	mvsd_write(MVSD_ARG_LOW, cmd->arg & 0xffff);
221 	mvsd_write(MVSD_ARG_HI,  cmd->arg >> 16);
222 
223 	spin_lock_irqsave(&host->lock, flags);
224 
225 	host->xfer_mode &= MVSD_XFER_MODE_INT_CHK_EN;
226 	host->xfer_mode |= xfer;
227 	mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
228 
229 	mvsd_write(MVSD_NOR_INTR_STATUS, ~MVSD_NOR_CARD_INT);
230 	mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
231 	mvsd_write(MVSD_CMD, cmdreg);
232 
233 	host->intr_en &= MVSD_NOR_CARD_INT;
234 	host->intr_en |= intr | MVSD_NOR_ERROR;
235 	mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
236 	mvsd_write(MVSD_ERR_INTR_EN, 0xffff);
237 
238 	mod_timer(&host->timer, jiffies + 5 * HZ);
239 
240 	spin_unlock_irqrestore(&host->lock, flags);
241 }
242 
243 static u32 mvsd_finish_cmd(struct mvsd_host *host, struct mmc_command *cmd,
244 			   u32 err_status)
245 {
246 	void __iomem *iobase = host->base;
247 
248 	if (cmd->flags & MMC_RSP_136) {
249 		unsigned int response[8], i;
250 		for (i = 0; i < 8; i++)
251 			response[i] = mvsd_read(MVSD_RSP(i));
252 		cmd->resp[0] =		((response[0] & 0x03ff) << 22) |
253 					((response[1] & 0xffff) << 6) |
254 					((response[2] & 0xfc00) >> 10);
255 		cmd->resp[1] =		((response[2] & 0x03ff) << 22) |
256 					((response[3] & 0xffff) << 6) |
257 					((response[4] & 0xfc00) >> 10);
258 		cmd->resp[2] =		((response[4] & 0x03ff) << 22) |
259 					((response[5] & 0xffff) << 6) |
260 					((response[6] & 0xfc00) >> 10);
261 		cmd->resp[3] =		((response[6] & 0x03ff) << 22) |
262 					((response[7] & 0x3fff) << 8);
263 	} else if (cmd->flags & MMC_RSP_PRESENT) {
264 		unsigned int response[3], i;
265 		for (i = 0; i < 3; i++)
266 			response[i] = mvsd_read(MVSD_RSP(i));
267 		cmd->resp[0] =		((response[2] & 0x003f) << (8 - 8)) |
268 					((response[1] & 0xffff) << (14 - 8)) |
269 					((response[0] & 0x03ff) << (30 - 8));
270 		cmd->resp[1] =		((response[0] & 0xfc00) >> 10);
271 		cmd->resp[2] = 0;
272 		cmd->resp[3] = 0;
273 	}
274 
275 	if (err_status & MVSD_ERR_CMD_TIMEOUT) {
276 		cmd->error = -ETIMEDOUT;
277 	} else if (err_status & (MVSD_ERR_CMD_CRC | MVSD_ERR_CMD_ENDBIT |
278 				 MVSD_ERR_CMD_INDEX | MVSD_ERR_CMD_STARTBIT)) {
279 		cmd->error = -EILSEQ;
280 	}
281 	err_status &= ~(MVSD_ERR_CMD_TIMEOUT | MVSD_ERR_CMD_CRC |
282 			MVSD_ERR_CMD_ENDBIT | MVSD_ERR_CMD_INDEX |
283 			MVSD_ERR_CMD_STARTBIT);
284 
285 	return err_status;
286 }
287 
288 static u32 mvsd_finish_data(struct mvsd_host *host, struct mmc_data *data,
289 			    u32 err_status)
290 {
291 	void __iomem *iobase = host->base;
292 
293 	if (host->pio_ptr) {
294 		host->pio_ptr = NULL;
295 		host->pio_size = 0;
296 	} else {
297 		dma_unmap_sg(mmc_dev(host->mmc), data->sg, host->sg_frags,
298 			     (data->flags & MMC_DATA_READ) ?
299 				DMA_FROM_DEVICE : DMA_TO_DEVICE);
300 	}
301 
302 	if (err_status & MVSD_ERR_DATA_TIMEOUT)
303 		data->error = -ETIMEDOUT;
304 	else if (err_status & (MVSD_ERR_DATA_CRC | MVSD_ERR_DATA_ENDBIT))
305 		data->error = -EILSEQ;
306 	else if (err_status & MVSD_ERR_XFER_SIZE)
307 		data->error = -EBADE;
308 	err_status &= ~(MVSD_ERR_DATA_TIMEOUT | MVSD_ERR_DATA_CRC |
309 			MVSD_ERR_DATA_ENDBIT | MVSD_ERR_XFER_SIZE);
310 
311 	dev_dbg(host->dev, "data done: blocks_left=%d, bytes_left=%d\n",
312 		mvsd_read(MVSD_CURR_BLK_LEFT), mvsd_read(MVSD_CURR_BYTE_LEFT));
313 	data->bytes_xfered =
314 		(data->blocks - mvsd_read(MVSD_CURR_BLK_LEFT)) * data->blksz;
315 	/* We can't be sure about the last block when errors are detected */
316 	if (data->bytes_xfered && data->error)
317 		data->bytes_xfered -= data->blksz;
318 
319 	/* Handle Auto cmd 12 response */
320 	if (data->stop) {
321 		unsigned int response[3], i;
322 		for (i = 0; i < 3; i++)
323 			response[i] = mvsd_read(MVSD_AUTO_RSP(i));
324 		data->stop->resp[0] =	((response[2] & 0x003f) << (8 - 8)) |
325 					((response[1] & 0xffff) << (14 - 8)) |
326 					((response[0] & 0x03ff) << (30 - 8));
327 		data->stop->resp[1] =	((response[0] & 0xfc00) >> 10);
328 		data->stop->resp[2] = 0;
329 		data->stop->resp[3] = 0;
330 
331 		if (err_status & MVSD_ERR_AUTOCMD12) {
332 			u32 err_cmd12 = mvsd_read(MVSD_AUTOCMD12_ERR_STATUS);
333 			dev_dbg(host->dev, "c12err 0x%04x\n", err_cmd12);
334 			if (err_cmd12 & MVSD_AUTOCMD12_ERR_NOTEXE)
335 				data->stop->error = -ENOEXEC;
336 			else if (err_cmd12 & MVSD_AUTOCMD12_ERR_TIMEOUT)
337 				data->stop->error = -ETIMEDOUT;
338 			else if (err_cmd12)
339 				data->stop->error = -EILSEQ;
340 			err_status &= ~MVSD_ERR_AUTOCMD12;
341 		}
342 	}
343 
344 	return err_status;
345 }
346 
347 static irqreturn_t mvsd_irq(int irq, void *dev)
348 {
349 	struct mvsd_host *host = dev;
350 	void __iomem *iobase = host->base;
351 	u32 intr_status, intr_done_mask;
352 	int irq_handled = 0;
353 
354 	intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
355 	dev_dbg(host->dev, "intr 0x%04x intr_en 0x%04x hw_state 0x%04x\n",
356 		intr_status, mvsd_read(MVSD_NOR_INTR_EN),
357 		mvsd_read(MVSD_HW_STATE));
358 
359 	spin_lock(&host->lock);
360 
361 	/* PIO handling, if needed. Messy business... */
362 	if (host->pio_size &&
363 	    (intr_status & host->intr_en &
364 	     (MVSD_NOR_RX_READY | MVSD_NOR_RX_FIFO_8W))) {
365 		u16 *p = host->pio_ptr;
366 		int s = host->pio_size;
367 		while (s >= 32 && (intr_status & MVSD_NOR_RX_FIFO_8W)) {
368 			readsw(iobase + MVSD_FIFO, p, 16);
369 			p += 16;
370 			s -= 32;
371 			intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
372 		}
373 		/*
374 		 * Normally we'd use < 32 here, but the RX_FIFO_8W bit
375 		 * doesn't appear to assert when there is exactly 32 bytes
376 		 * (8 words) left to fetch in a transfer.
377 		 */
378 		if (s <= 32) {
379 			while (s >= 4 && (intr_status & MVSD_NOR_RX_READY)) {
380 				put_unaligned(mvsd_read(MVSD_FIFO), p++);
381 				put_unaligned(mvsd_read(MVSD_FIFO), p++);
382 				s -= 4;
383 				intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
384 			}
385 			if (s && s < 4 && (intr_status & MVSD_NOR_RX_READY)) {
386 				u16 val[2] = {0, 0};
387 				val[0] = mvsd_read(MVSD_FIFO);
388 				val[1] = mvsd_read(MVSD_FIFO);
389 				memcpy(p, ((void *)&val) + 4 - s, s);
390 				s = 0;
391 				intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
392 			}
393 			if (s == 0) {
394 				host->intr_en &=
395 				     ~(MVSD_NOR_RX_READY | MVSD_NOR_RX_FIFO_8W);
396 				mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
397 			} else if (host->intr_en & MVSD_NOR_RX_FIFO_8W) {
398 				host->intr_en &= ~MVSD_NOR_RX_FIFO_8W;
399 				host->intr_en |= MVSD_NOR_RX_READY;
400 				mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
401 			}
402 		}
403 		dev_dbg(host->dev, "pio %d intr 0x%04x hw_state 0x%04x\n",
404 			s, intr_status, mvsd_read(MVSD_HW_STATE));
405 		host->pio_ptr = p;
406 		host->pio_size = s;
407 		irq_handled = 1;
408 	} else if (host->pio_size &&
409 		   (intr_status & host->intr_en &
410 		    (MVSD_NOR_TX_AVAIL | MVSD_NOR_TX_FIFO_8W))) {
411 		u16 *p = host->pio_ptr;
412 		int s = host->pio_size;
413 		/*
414 		 * The TX_FIFO_8W bit is unreliable. When set, bursting
415 		 * 16 halfwords all at once in the FIFO drops data. Actually
416 		 * TX_AVAIL does go off after only one word is pushed even if
417 		 * TX_FIFO_8W remains set.
418 		 */
419 		while (s >= 4 && (intr_status & MVSD_NOR_TX_AVAIL)) {
420 			mvsd_write(MVSD_FIFO, get_unaligned(p++));
421 			mvsd_write(MVSD_FIFO, get_unaligned(p++));
422 			s -= 4;
423 			intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
424 		}
425 		if (s < 4) {
426 			if (s && (intr_status & MVSD_NOR_TX_AVAIL)) {
427 				u16 val[2] = {0, 0};
428 				memcpy(((void *)&val) + 4 - s, p, s);
429 				mvsd_write(MVSD_FIFO, val[0]);
430 				mvsd_write(MVSD_FIFO, val[1]);
431 				s = 0;
432 				intr_status = mvsd_read(MVSD_NOR_INTR_STATUS);
433 			}
434 			if (s == 0) {
435 				host->intr_en &=
436 				     ~(MVSD_NOR_TX_AVAIL | MVSD_NOR_TX_FIFO_8W);
437 				mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
438 			}
439 		}
440 		dev_dbg(host->dev, "pio %d intr 0x%04x hw_state 0x%04x\n",
441 			s, intr_status, mvsd_read(MVSD_HW_STATE));
442 		host->pio_ptr = p;
443 		host->pio_size = s;
444 		irq_handled = 1;
445 	}
446 
447 	mvsd_write(MVSD_NOR_INTR_STATUS, intr_status);
448 
449 	intr_done_mask = MVSD_NOR_CARD_INT | MVSD_NOR_RX_READY |
450 			 MVSD_NOR_RX_FIFO_8W | MVSD_NOR_TX_FIFO_8W;
451 	if (intr_status & host->intr_en & ~intr_done_mask) {
452 		struct mmc_request *mrq = host->mrq;
453 		struct mmc_command *cmd = mrq->cmd;
454 		u32 err_status = 0;
455 
456 		del_timer(&host->timer);
457 		host->mrq = NULL;
458 
459 		host->intr_en &= MVSD_NOR_CARD_INT;
460 		mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
461 		mvsd_write(MVSD_ERR_INTR_EN, 0);
462 
463 		spin_unlock(&host->lock);
464 
465 		if (intr_status & MVSD_NOR_UNEXP_RSP) {
466 			cmd->error = -EPROTO;
467 		} else if (intr_status & MVSD_NOR_ERROR) {
468 			err_status = mvsd_read(MVSD_ERR_INTR_STATUS);
469 			dev_dbg(host->dev, "err 0x%04x\n", err_status);
470 		}
471 
472 		err_status = mvsd_finish_cmd(host, cmd, err_status);
473 		if (mrq->data)
474 			err_status = mvsd_finish_data(host, mrq->data, err_status);
475 		if (err_status) {
476 			pr_err("%s: unhandled error status %#04x\n",
477 					mmc_hostname(host->mmc), err_status);
478 			cmd->error = -ENOMSG;
479 		}
480 
481 		mmc_request_done(host->mmc, mrq);
482 		irq_handled = 1;
483 	} else
484 		spin_unlock(&host->lock);
485 
486 	if (intr_status & MVSD_NOR_CARD_INT) {
487 		mmc_signal_sdio_irq(host->mmc);
488 		irq_handled = 1;
489 	}
490 
491 	if (irq_handled)
492 		return IRQ_HANDLED;
493 
494 	pr_err("%s: unhandled interrupt status=0x%04x en=0x%04x "
495 			"pio=%d\n", mmc_hostname(host->mmc), intr_status,
496 			host->intr_en, host->pio_size);
497 	return IRQ_NONE;
498 }
499 
500 static void mvsd_timeout_timer(unsigned long data)
501 {
502 	struct mvsd_host *host = (struct mvsd_host *)data;
503 	void __iomem *iobase = host->base;
504 	struct mmc_request *mrq;
505 	unsigned long flags;
506 
507 	spin_lock_irqsave(&host->lock, flags);
508 	mrq = host->mrq;
509 	if (mrq) {
510 		pr_err("%s: Timeout waiting for hardware interrupt.\n",
511 				mmc_hostname(host->mmc));
512 		pr_err("%s: hw_state=0x%04x, intr_status=0x%04x "
513 				"intr_en=0x%04x\n", mmc_hostname(host->mmc),
514 				mvsd_read(MVSD_HW_STATE),
515 				mvsd_read(MVSD_NOR_INTR_STATUS),
516 				mvsd_read(MVSD_NOR_INTR_EN));
517 
518 		host->mrq = NULL;
519 
520 		mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
521 
522 		host->xfer_mode &= MVSD_XFER_MODE_INT_CHK_EN;
523 		mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
524 
525 		host->intr_en &= MVSD_NOR_CARD_INT;
526 		mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
527 		mvsd_write(MVSD_ERR_INTR_EN, 0);
528 		mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
529 
530 		mrq->cmd->error = -ETIMEDOUT;
531 		mvsd_finish_cmd(host, mrq->cmd, 0);
532 		if (mrq->data) {
533 			mrq->data->error = -ETIMEDOUT;
534 			mvsd_finish_data(host, mrq->data, 0);
535 		}
536 	}
537 	spin_unlock_irqrestore(&host->lock, flags);
538 
539 	if (mrq)
540 		mmc_request_done(host->mmc, mrq);
541 }
542 
543 static irqreturn_t mvsd_card_detect_irq(int irq, void *dev)
544 {
545 	struct mvsd_host *host = dev;
546 	mmc_detect_change(host->mmc, msecs_to_jiffies(100));
547 	return IRQ_HANDLED;
548 }
549 
550 static void mvsd_enable_sdio_irq(struct mmc_host *mmc, int enable)
551 {
552 	struct mvsd_host *host = mmc_priv(mmc);
553 	void __iomem *iobase = host->base;
554 	unsigned long flags;
555 
556 	spin_lock_irqsave(&host->lock, flags);
557 	if (enable) {
558 		host->xfer_mode |= MVSD_XFER_MODE_INT_CHK_EN;
559 		host->intr_en |= MVSD_NOR_CARD_INT;
560 	} else {
561 		host->xfer_mode &= ~MVSD_XFER_MODE_INT_CHK_EN;
562 		host->intr_en &= ~MVSD_NOR_CARD_INT;
563 	}
564 	mvsd_write(MVSD_XFER_MODE, host->xfer_mode);
565 	mvsd_write(MVSD_NOR_INTR_EN, host->intr_en);
566 	spin_unlock_irqrestore(&host->lock, flags);
567 }
568 
569 static int mvsd_get_ro(struct mmc_host *mmc)
570 {
571 	struct mvsd_host *host = mmc_priv(mmc);
572 
573 	if (host->gpio_write_protect)
574 		return gpio_get_value(host->gpio_write_protect);
575 
576 	/*
577 	 * Board doesn't support read only detection; let the mmc core
578 	 * decide what to do.
579 	 */
580 	return -ENOSYS;
581 }
582 
583 static void mvsd_power_up(struct mvsd_host *host)
584 {
585 	void __iomem *iobase = host->base;
586 	dev_dbg(host->dev, "power up\n");
587 	mvsd_write(MVSD_NOR_INTR_EN, 0);
588 	mvsd_write(MVSD_ERR_INTR_EN, 0);
589 	mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
590 	mvsd_write(MVSD_XFER_MODE, 0);
591 	mvsd_write(MVSD_NOR_STATUS_EN, 0xffff);
592 	mvsd_write(MVSD_ERR_STATUS_EN, 0xffff);
593 	mvsd_write(MVSD_NOR_INTR_STATUS, 0xffff);
594 	mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
595 }
596 
597 static void mvsd_power_down(struct mvsd_host *host)
598 {
599 	void __iomem *iobase = host->base;
600 	dev_dbg(host->dev, "power down\n");
601 	mvsd_write(MVSD_NOR_INTR_EN, 0);
602 	mvsd_write(MVSD_ERR_INTR_EN, 0);
603 	mvsd_write(MVSD_SW_RESET, MVSD_SW_RESET_NOW);
604 	mvsd_write(MVSD_XFER_MODE, MVSD_XFER_MODE_STOP_CLK);
605 	mvsd_write(MVSD_NOR_STATUS_EN, 0);
606 	mvsd_write(MVSD_ERR_STATUS_EN, 0);
607 	mvsd_write(MVSD_NOR_INTR_STATUS, 0xffff);
608 	mvsd_write(MVSD_ERR_INTR_STATUS, 0xffff);
609 }
610 
611 static void mvsd_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
612 {
613 	struct mvsd_host *host = mmc_priv(mmc);
614 	void __iomem *iobase = host->base;
615 	u32 ctrl_reg = 0;
616 
617 	if (ios->power_mode == MMC_POWER_UP)
618 		mvsd_power_up(host);
619 
620 	if (ios->clock == 0) {
621 		mvsd_write(MVSD_XFER_MODE, MVSD_XFER_MODE_STOP_CLK);
622 		mvsd_write(MVSD_CLK_DIV, MVSD_BASE_DIV_MAX);
623 		host->clock = 0;
624 		dev_dbg(host->dev, "clock off\n");
625 	} else if (ios->clock != host->clock) {
626 		u32 m = DIV_ROUND_UP(host->base_clock, ios->clock) - 1;
627 		if (m > MVSD_BASE_DIV_MAX)
628 			m = MVSD_BASE_DIV_MAX;
629 		mvsd_write(MVSD_CLK_DIV, m);
630 		host->clock = ios->clock;
631 		host->ns_per_clk = 1000000000 / (host->base_clock / (m+1));
632 		dev_dbg(host->dev, "clock=%d (%d), div=0x%04x\n",
633 			ios->clock, host->base_clock / (m+1), m);
634 	}
635 
636 	/* default transfer mode */
637 	ctrl_reg |= MVSD_HOST_CTRL_BIG_ENDIAN;
638 	ctrl_reg &= ~MVSD_HOST_CTRL_LSB_FIRST;
639 
640 	/* default to maximum timeout */
641 	ctrl_reg |= MVSD_HOST_CTRL_TMOUT_MASK;
642 	ctrl_reg |= MVSD_HOST_CTRL_TMOUT_EN;
643 
644 	if (ios->bus_mode == MMC_BUSMODE_PUSHPULL)
645 		ctrl_reg |= MVSD_HOST_CTRL_PUSH_PULL_EN;
646 
647 	if (ios->bus_width == MMC_BUS_WIDTH_4)
648 		ctrl_reg |= MVSD_HOST_CTRL_DATA_WIDTH_4_BITS;
649 
650 	/*
651 	 * The HI_SPEED_EN bit is causing trouble with many (but not all)
652 	 * high speed SD, SDHC and SDIO cards.  Not enabling that bit
653 	 * makes all cards work.  So let's just ignore that bit for now
654 	 * and revisit this issue if problems for not enabling this bit
655 	 * are ever reported.
656 	 */
657 #if 0
658 	if (ios->timing == MMC_TIMING_MMC_HS ||
659 	    ios->timing == MMC_TIMING_SD_HS)
660 		ctrl_reg |= MVSD_HOST_CTRL_HI_SPEED_EN;
661 #endif
662 
663 	host->ctrl = ctrl_reg;
664 	mvsd_write(MVSD_HOST_CTRL, ctrl_reg);
665 	dev_dbg(host->dev, "ctrl 0x%04x: %s %s %s\n", ctrl_reg,
666 		(ctrl_reg & MVSD_HOST_CTRL_PUSH_PULL_EN) ?
667 			"push-pull" : "open-drain",
668 		(ctrl_reg & MVSD_HOST_CTRL_DATA_WIDTH_4_BITS) ?
669 			"4bit-width" : "1bit-width",
670 		(ctrl_reg & MVSD_HOST_CTRL_HI_SPEED_EN) ?
671 			"high-speed" : "");
672 
673 	if (ios->power_mode == MMC_POWER_OFF)
674 		mvsd_power_down(host);
675 }
676 
677 static const struct mmc_host_ops mvsd_ops = {
678 	.request		= mvsd_request,
679 	.get_ro			= mvsd_get_ro,
680 	.set_ios		= mvsd_set_ios,
681 	.enable_sdio_irq	= mvsd_enable_sdio_irq,
682 };
683 
684 static void __init
685 mv_conf_mbus_windows(struct mvsd_host *host,
686 		     const struct mbus_dram_target_info *dram)
687 {
688 	void __iomem *iobase = host->base;
689 	int i;
690 
691 	for (i = 0; i < 4; i++) {
692 		writel(0, iobase + MVSD_WINDOW_CTRL(i));
693 		writel(0, iobase + MVSD_WINDOW_BASE(i));
694 	}
695 
696 	for (i = 0; i < dram->num_cs; i++) {
697 		const struct mbus_dram_window *cs = dram->cs + i;
698 		writel(((cs->size - 1) & 0xffff0000) |
699 		       (cs->mbus_attr << 8) |
700 		       (dram->mbus_dram_target_id << 4) | 1,
701 		       iobase + MVSD_WINDOW_CTRL(i));
702 		writel(cs->base, iobase + MVSD_WINDOW_BASE(i));
703 	}
704 }
705 
706 static int __init mvsd_probe(struct platform_device *pdev)
707 {
708 	struct mmc_host *mmc = NULL;
709 	struct mvsd_host *host = NULL;
710 	const struct mvsdio_platform_data *mvsd_data;
711 	const struct mbus_dram_target_info *dram;
712 	struct resource *r;
713 	int ret, irq;
714 
715 	r = platform_get_resource(pdev, IORESOURCE_MEM, 0);
716 	irq = platform_get_irq(pdev, 0);
717 	mvsd_data = pdev->dev.platform_data;
718 	if (!r || irq < 0 || !mvsd_data)
719 		return -ENXIO;
720 
721 	r = request_mem_region(r->start, SZ_1K, DRIVER_NAME);
722 	if (!r)
723 		return -EBUSY;
724 
725 	mmc = mmc_alloc_host(sizeof(struct mvsd_host), &pdev->dev);
726 	if (!mmc) {
727 		ret = -ENOMEM;
728 		goto out;
729 	}
730 
731 	host = mmc_priv(mmc);
732 	host->mmc = mmc;
733 	host->dev = &pdev->dev;
734 	host->res = r;
735 	host->base_clock = mvsd_data->clock / 2;
736 
737 	mmc->ops = &mvsd_ops;
738 
739 	mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34;
740 	mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_SDIO_IRQ |
741 		    MMC_CAP_SD_HIGHSPEED | MMC_CAP_MMC_HIGHSPEED;
742 
743 	mmc->f_min = DIV_ROUND_UP(host->base_clock, MVSD_BASE_DIV_MAX);
744 	mmc->f_max = maxfreq;
745 
746 	mmc->max_blk_size = 2048;
747 	mmc->max_blk_count = 65535;
748 
749 	mmc->max_segs = 1;
750 	mmc->max_seg_size = mmc->max_blk_size * mmc->max_blk_count;
751 	mmc->max_req_size = mmc->max_blk_size * mmc->max_blk_count;
752 
753 	spin_lock_init(&host->lock);
754 
755 	host->base = ioremap(r->start, SZ_4K);
756 	if (!host->base) {
757 		ret = -ENOMEM;
758 		goto out;
759 	}
760 
761 	/* (Re-)program MBUS remapping windows if we are asked to. */
762 	dram = mv_mbus_dram_info();
763 	if (dram)
764 		mv_conf_mbus_windows(host, dram);
765 
766 	mvsd_power_down(host);
767 
768 	ret = request_irq(irq, mvsd_irq, 0, DRIVER_NAME, host);
769 	if (ret) {
770 		pr_err("%s: cannot assign irq %d\n", DRIVER_NAME, irq);
771 		goto out;
772 	} else
773 		host->irq = irq;
774 
775 	/* Not all platforms can gate the clock, so it is not
776 	   an error if the clock does not exists. */
777 	host->clk = clk_get(&pdev->dev, NULL);
778 	if (!IS_ERR(host->clk)) {
779 		clk_prepare_enable(host->clk);
780 	}
781 
782 	if (mvsd_data->gpio_card_detect) {
783 		ret = gpio_request(mvsd_data->gpio_card_detect,
784 				   DRIVER_NAME " cd");
785 		if (ret == 0) {
786 			gpio_direction_input(mvsd_data->gpio_card_detect);
787 			irq = gpio_to_irq(mvsd_data->gpio_card_detect);
788 			ret = request_irq(irq, mvsd_card_detect_irq,
789 					  IRQ_TYPE_EDGE_RISING | IRQ_TYPE_EDGE_FALLING,
790 					  DRIVER_NAME " cd", host);
791 			if (ret == 0)
792 				host->gpio_card_detect =
793 					mvsd_data->gpio_card_detect;
794 			else
795 				gpio_free(mvsd_data->gpio_card_detect);
796 		}
797 	}
798 	if (!host->gpio_card_detect)
799 		mmc->caps |= MMC_CAP_NEEDS_POLL;
800 
801 	if (mvsd_data->gpio_write_protect) {
802 		ret = gpio_request(mvsd_data->gpio_write_protect,
803 				   DRIVER_NAME " wp");
804 		if (ret == 0) {
805 			gpio_direction_input(mvsd_data->gpio_write_protect);
806 			host->gpio_write_protect =
807 				mvsd_data->gpio_write_protect;
808 		}
809 	}
810 
811 	setup_timer(&host->timer, mvsd_timeout_timer, (unsigned long)host);
812 	platform_set_drvdata(pdev, mmc);
813 	ret = mmc_add_host(mmc);
814 	if (ret)
815 		goto out;
816 
817 	pr_notice("%s: %s driver initialized, ",
818 			   mmc_hostname(mmc), DRIVER_NAME);
819 	if (host->gpio_card_detect)
820 		printk("using GPIO %d for card detection\n",
821 		       host->gpio_card_detect);
822 	else
823 		printk("lacking card detect (fall back to polling)\n");
824 	return 0;
825 
826 out:
827 	if (host) {
828 		if (host->irq)
829 			free_irq(host->irq, host);
830 		if (host->gpio_card_detect) {
831 			free_irq(gpio_to_irq(host->gpio_card_detect), host);
832 			gpio_free(host->gpio_card_detect);
833 		}
834 		if (host->gpio_write_protect)
835 			gpio_free(host->gpio_write_protect);
836 		if (host->base)
837 			iounmap(host->base);
838 	}
839 	if (r)
840 		release_resource(r);
841 	if (mmc)
842 		if (!IS_ERR_OR_NULL(host->clk)) {
843 			clk_disable_unprepare(host->clk);
844 			clk_put(host->clk);
845 		}
846 		mmc_free_host(mmc);
847 
848 	return ret;
849 }
850 
851 static int __exit mvsd_remove(struct platform_device *pdev)
852 {
853 	struct mmc_host *mmc = platform_get_drvdata(pdev);
854 
855 	if (mmc) {
856 		struct mvsd_host *host = mmc_priv(mmc);
857 
858 		if (host->gpio_card_detect) {
859 			free_irq(gpio_to_irq(host->gpio_card_detect), host);
860 			gpio_free(host->gpio_card_detect);
861 		}
862 		mmc_remove_host(mmc);
863 		free_irq(host->irq, host);
864 		if (host->gpio_write_protect)
865 			gpio_free(host->gpio_write_protect);
866 		del_timer_sync(&host->timer);
867 		mvsd_power_down(host);
868 		iounmap(host->base);
869 		release_resource(host->res);
870 
871 		if (!IS_ERR(host->clk)) {
872 			clk_disable_unprepare(host->clk);
873 			clk_put(host->clk);
874 		}
875 		mmc_free_host(mmc);
876 	}
877 	platform_set_drvdata(pdev, NULL);
878 	return 0;
879 }
880 
881 #ifdef CONFIG_PM
882 static int mvsd_suspend(struct platform_device *dev, pm_message_t state)
883 {
884 	struct mmc_host *mmc = platform_get_drvdata(dev);
885 	int ret = 0;
886 
887 	if (mmc)
888 		ret = mmc_suspend_host(mmc);
889 
890 	return ret;
891 }
892 
893 static int mvsd_resume(struct platform_device *dev)
894 {
895 	struct mmc_host *mmc = platform_get_drvdata(dev);
896 	int ret = 0;
897 
898 	if (mmc)
899 		ret = mmc_resume_host(mmc);
900 
901 	return ret;
902 }
903 #else
904 #define mvsd_suspend	NULL
905 #define mvsd_resume	NULL
906 #endif
907 
908 static struct platform_driver mvsd_driver = {
909 	.remove		= __exit_p(mvsd_remove),
910 	.suspend	= mvsd_suspend,
911 	.resume		= mvsd_resume,
912 	.driver		= {
913 		.name	= DRIVER_NAME,
914 	},
915 };
916 
917 static int __init mvsd_init(void)
918 {
919 	return platform_driver_probe(&mvsd_driver, mvsd_probe);
920 }
921 
922 static void __exit mvsd_exit(void)
923 {
924 	platform_driver_unregister(&mvsd_driver);
925 }
926 
927 module_init(mvsd_init);
928 module_exit(mvsd_exit);
929 
930 /* maximum card clock frequency (default 50MHz) */
931 module_param(maxfreq, int, 0);
932 
933 /* force PIO transfers all the time */
934 module_param(nodma, int, 0);
935 
936 MODULE_AUTHOR("Maen Suleiman, Nicolas Pitre");
937 MODULE_DESCRIPTION("Marvell MMC,SD,SDIO Host Controller driver");
938 MODULE_LICENSE("GPL");
939 MODULE_ALIAS("platform:mvsdio");
940