xref: /openbmc/u-boot/drivers/mmc/omap_hsmmc.c (revision 173f023f)
1 /*
2  * (C) Copyright 2008
3  * Texas Instruments, <www.ti.com>
4  * Sukumar Ghorai <s-ghorai@ti.com>
5  *
6  * See file CREDITS for list of people who contributed to this
7  * project.
8  *
9  * This program is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU General Public License as
11  * published by the Free Software Foundation's version 2 of
12  * the License.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
22  * MA 02111-1307 USA
23  */
24 
25 #include <config.h>
26 #include <common.h>
27 #include <malloc.h>
28 #include <memalign.h>
29 #include <mmc.h>
30 #include <part.h>
31 #include <i2c.h>
32 #if defined(CONFIG_OMAP54XX) || defined(CONFIG_OMAP44XX)
33 #include <palmas.h>
34 #endif
35 #include <asm/io.h>
36 #include <asm/arch/mmc_host_def.h>
37 #if !defined(CONFIG_SOC_KEYSTONE)
38 #include <asm/gpio.h>
39 #include <asm/arch/sys_proto.h>
40 #endif
41 #ifdef CONFIG_MMC_OMAP36XX_PINS
42 #include <asm/arch/mux.h>
43 #endif
44 #include <dm.h>
45 
46 DECLARE_GLOBAL_DATA_PTR;
47 
48 /* simplify defines to OMAP_HSMMC_USE_GPIO */
49 #if (defined(CONFIG_OMAP_GPIO) && !defined(CONFIG_SPL_BUILD)) || \
50 	(defined(CONFIG_SPL_BUILD) && defined(CONFIG_SPL_GPIO_SUPPORT))
51 #define OMAP_HSMMC_USE_GPIO
52 #else
53 #undef OMAP_HSMMC_USE_GPIO
54 #endif
55 
56 /* common definitions for all OMAPs */
57 #define SYSCTL_SRC	(1 << 25)
58 #define SYSCTL_SRD	(1 << 26)
59 
60 struct omap_hsmmc_data {
61 	struct hsmmc *base_addr;
62 #if !CONFIG_IS_ENABLED(DM_MMC)
63 	struct mmc_config cfg;
64 #endif
65 #ifdef OMAP_HSMMC_USE_GPIO
66 #if CONFIG_IS_ENABLED(DM_MMC)
67 	struct gpio_desc cd_gpio;	/* Change Detect GPIO */
68 	struct gpio_desc wp_gpio;	/* Write Protect GPIO */
69 	bool cd_inverted;
70 #else
71 	int cd_gpio;
72 	int wp_gpio;
73 #endif
74 #endif
75 	u8 controller_flags;
76 #ifndef CONFIG_OMAP34XX
77 	struct omap_hsmmc_adma_desc *adma_desc_table;
78 	uint desc_slot;
79 #endif
80 };
81 
82 #ifndef CONFIG_OMAP34XX
83 struct omap_hsmmc_adma_desc {
84 	u8 attr;
85 	u8 reserved;
86 	u16 len;
87 	u32 addr;
88 };
89 
90 #define ADMA_MAX_LEN	63488
91 
92 /* Decriptor table defines */
93 #define ADMA_DESC_ATTR_VALID		BIT(0)
94 #define ADMA_DESC_ATTR_END		BIT(1)
95 #define ADMA_DESC_ATTR_INT		BIT(2)
96 #define ADMA_DESC_ATTR_ACT1		BIT(4)
97 #define ADMA_DESC_ATTR_ACT2		BIT(5)
98 
99 #define ADMA_DESC_TRANSFER_DATA		ADMA_DESC_ATTR_ACT2
100 #define ADMA_DESC_LINK_DESC	(ADMA_DESC_ATTR_ACT1 | ADMA_DESC_ATTR_ACT2)
101 #endif
102 
103 /* If we fail after 1 second wait, something is really bad */
104 #define MAX_RETRY_MS	1000
105 
106 /* DMA transfers can take a long time if a lot a data is transferred.
107  * The timeout must take in account the amount of data. Let's assume
108  * that the time will never exceed 333 ms per MB (in other word we assume
109  * that the bandwidth is always above 3MB/s).
110  */
111 #define DMA_TIMEOUT_PER_MB	333
112 #define OMAP_HSMMC_USE_ADMA			BIT(2)
113 
114 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size);
115 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
116 			unsigned int siz);
117 
118 static inline struct omap_hsmmc_data *omap_hsmmc_get_data(struct mmc *mmc)
119 {
120 #if CONFIG_IS_ENABLED(DM_MMC)
121 	return dev_get_priv(mmc->dev);
122 #else
123 	return (struct omap_hsmmc_data *)mmc->priv;
124 #endif
125 }
126 static inline struct mmc_config *omap_hsmmc_get_cfg(struct mmc *mmc)
127 {
128 #if CONFIG_IS_ENABLED(DM_MMC)
129 	struct omap_hsmmc_plat *plat = dev_get_platdata(mmc->dev);
130 	return &plat->cfg;
131 #else
132 	return &((struct omap_hsmmc_data *)mmc->priv)->cfg;
133 #endif
134 }
135 
136 #if defined(OMAP_HSMMC_USE_GPIO) && !CONFIG_IS_ENABLED(DM_MMC)
137 static int omap_mmc_setup_gpio_in(int gpio, const char *label)
138 {
139 	int ret;
140 
141 #ifndef CONFIG_DM_GPIO
142 	if (!gpio_is_valid(gpio))
143 		return -1;
144 #endif
145 	ret = gpio_request(gpio, label);
146 	if (ret)
147 		return ret;
148 
149 	ret = gpio_direction_input(gpio);
150 	if (ret)
151 		return ret;
152 
153 	return gpio;
154 }
155 #endif
156 
157 static unsigned char mmc_board_init(struct mmc *mmc)
158 {
159 #if defined(CONFIG_OMAP34XX)
160 	struct mmc_config *cfg = omap_hsmmc_get_cfg(mmc);
161 	t2_t *t2_base = (t2_t *)T2_BASE;
162 	struct prcm *prcm_base = (struct prcm *)PRCM_BASE;
163 	u32 pbias_lite;
164 #ifdef CONFIG_MMC_OMAP36XX_PINS
165 	u32 wkup_ctrl = readl(OMAP34XX_CTRL_WKUP_CTRL);
166 #endif
167 
168 	pbias_lite = readl(&t2_base->pbias_lite);
169 	pbias_lite &= ~(PBIASLITEPWRDNZ1 | PBIASLITEPWRDNZ0);
170 #ifdef CONFIG_TARGET_OMAP3_CAIRO
171 	/* for cairo board, we need to set up 1.8 Volt bias level on MMC1 */
172 	pbias_lite &= ~PBIASLITEVMODE0;
173 #endif
174 #ifdef CONFIG_MMC_OMAP36XX_PINS
175 	if (get_cpu_family() == CPU_OMAP36XX) {
176 		/* Disable extended drain IO before changing PBIAS */
177 		wkup_ctrl &= ~OMAP34XX_CTRL_WKUP_CTRL_GPIO_IO_PWRDNZ;
178 		writel(wkup_ctrl, OMAP34XX_CTRL_WKUP_CTRL);
179 	}
180 #endif
181 	writel(pbias_lite, &t2_base->pbias_lite);
182 
183 	writel(pbias_lite | PBIASLITEPWRDNZ1 |
184 		PBIASSPEEDCTRL0 | PBIASLITEPWRDNZ0,
185 		&t2_base->pbias_lite);
186 
187 #ifdef CONFIG_MMC_OMAP36XX_PINS
188 	if (get_cpu_family() == CPU_OMAP36XX)
189 		/* Enable extended drain IO after changing PBIAS */
190 		writel(wkup_ctrl |
191 				OMAP34XX_CTRL_WKUP_CTRL_GPIO_IO_PWRDNZ,
192 				OMAP34XX_CTRL_WKUP_CTRL);
193 #endif
194 	writel(readl(&t2_base->devconf0) | MMCSDIO1ADPCLKISEL,
195 		&t2_base->devconf0);
196 
197 	writel(readl(&t2_base->devconf1) | MMCSDIO2ADPCLKISEL,
198 		&t2_base->devconf1);
199 
200 	/* Change from default of 52MHz to 26MHz if necessary */
201 	if (!(cfg->host_caps & MMC_MODE_HS_52MHz))
202 		writel(readl(&t2_base->ctl_prog_io1) & ~CTLPROGIO1SPEEDCTRL,
203 			&t2_base->ctl_prog_io1);
204 
205 	writel(readl(&prcm_base->fclken1_core) |
206 		EN_MMC1 | EN_MMC2 | EN_MMC3,
207 		&prcm_base->fclken1_core);
208 
209 	writel(readl(&prcm_base->iclken1_core) |
210 		EN_MMC1 | EN_MMC2 | EN_MMC3,
211 		&prcm_base->iclken1_core);
212 #endif
213 
214 #if defined(CONFIG_OMAP54XX) || defined(CONFIG_OMAP44XX)
215 	/* PBIAS config needed for MMC1 only */
216 	if (mmc_get_blk_desc(mmc)->devnum == 0)
217 		vmmc_pbias_config(LDO_VOLT_3V0);
218 #endif
219 
220 	return 0;
221 }
222 
223 void mmc_init_stream(struct hsmmc *mmc_base)
224 {
225 	ulong start;
226 
227 	writel(readl(&mmc_base->con) | INIT_INITSTREAM, &mmc_base->con);
228 
229 	writel(MMC_CMD0, &mmc_base->cmd);
230 	start = get_timer(0);
231 	while (!(readl(&mmc_base->stat) & CC_MASK)) {
232 		if (get_timer(0) - start > MAX_RETRY_MS) {
233 			printf("%s: timedout waiting for cc!\n", __func__);
234 			return;
235 		}
236 	}
237 	writel(CC_MASK, &mmc_base->stat)
238 		;
239 	writel(MMC_CMD0, &mmc_base->cmd)
240 		;
241 	start = get_timer(0);
242 	while (!(readl(&mmc_base->stat) & CC_MASK)) {
243 		if (get_timer(0) - start > MAX_RETRY_MS) {
244 			printf("%s: timedout waiting for cc2!\n", __func__);
245 			return;
246 		}
247 	}
248 	writel(readl(&mmc_base->con) & ~INIT_INITSTREAM, &mmc_base->con);
249 }
250 
251 static int omap_hsmmc_init_setup(struct mmc *mmc)
252 {
253 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
254 	struct hsmmc *mmc_base;
255 	unsigned int reg_val;
256 	unsigned int dsor;
257 	ulong start;
258 
259 	mmc_base = priv->base_addr;
260 	mmc_board_init(mmc);
261 
262 	writel(readl(&mmc_base->sysconfig) | MMC_SOFTRESET,
263 		&mmc_base->sysconfig);
264 	start = get_timer(0);
265 	while ((readl(&mmc_base->sysstatus) & RESETDONE) == 0) {
266 		if (get_timer(0) - start > MAX_RETRY_MS) {
267 			printf("%s: timedout waiting for cc2!\n", __func__);
268 			return -ETIMEDOUT;
269 		}
270 	}
271 	writel(readl(&mmc_base->sysctl) | SOFTRESETALL, &mmc_base->sysctl);
272 	start = get_timer(0);
273 	while ((readl(&mmc_base->sysctl) & SOFTRESETALL) != 0x0) {
274 		if (get_timer(0) - start > MAX_RETRY_MS) {
275 			printf("%s: timedout waiting for softresetall!\n",
276 				__func__);
277 			return -ETIMEDOUT;
278 		}
279 	}
280 #ifndef CONFIG_OMAP34XX
281 	reg_val = readl(&mmc_base->hl_hwinfo);
282 	if (reg_val & MADMA_EN)
283 		priv->controller_flags |= OMAP_HSMMC_USE_ADMA;
284 #endif
285 	writel(DTW_1_BITMODE | SDBP_PWROFF | SDVS_3V0, &mmc_base->hctl);
286 	writel(readl(&mmc_base->capa) | VS30_3V0SUP | VS18_1V8SUP,
287 		&mmc_base->capa);
288 
289 	reg_val = readl(&mmc_base->con) & RESERVED_MASK;
290 
291 	writel(CTPL_MMC_SD | reg_val | WPP_ACTIVEHIGH | CDP_ACTIVEHIGH |
292 		MIT_CTO | DW8_1_4BITMODE | MODE_FUNC | STR_BLOCK |
293 		HR_NOHOSTRESP | INIT_NOINIT | NOOPENDRAIN, &mmc_base->con);
294 
295 	dsor = 240;
296 	mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
297 		(ICE_STOP | DTO_15THDTO));
298 	mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
299 		(dsor << CLKD_OFFSET) | ICE_OSCILLATE);
300 	start = get_timer(0);
301 	while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
302 		if (get_timer(0) - start > MAX_RETRY_MS) {
303 			printf("%s: timedout waiting for ics!\n", __func__);
304 			return -ETIMEDOUT;
305 		}
306 	}
307 	writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
308 
309 	writel(readl(&mmc_base->hctl) | SDBP_PWRON, &mmc_base->hctl);
310 
311 	writel(IE_BADA | IE_CERR | IE_DEB | IE_DCRC | IE_DTO | IE_CIE |
312 		IE_CEB | IE_CCRC | IE_ADMAE | IE_CTO | IE_BRR | IE_BWR | IE_TC |
313 		IE_CC, &mmc_base->ie);
314 
315 	mmc_init_stream(mmc_base);
316 
317 	return 0;
318 }
319 
320 /*
321  * MMC controller internal finite state machine reset
322  *
323  * Used to reset command or data internal state machines, using respectively
324  * SRC or SRD bit of SYSCTL register
325  */
326 static void mmc_reset_controller_fsm(struct hsmmc *mmc_base, u32 bit)
327 {
328 	ulong start;
329 
330 	mmc_reg_out(&mmc_base->sysctl, bit, bit);
331 
332 	/*
333 	 * CMD(DAT) lines reset procedures are slightly different
334 	 * for OMAP3 and OMAP4(AM335x,OMAP5,DRA7xx).
335 	 * According to OMAP3 TRM:
336 	 * Set SRC(SRD) bit in MMCHS_SYSCTL register to 0x1 and wait until it
337 	 * returns to 0x0.
338 	 * According to OMAP4(AM335x,OMAP5,DRA7xx) TRMs, CMD(DATA) lines reset
339 	 * procedure steps must be as follows:
340 	 * 1. Initiate CMD(DAT) line reset by writing 0x1 to SRC(SRD) bit in
341 	 *    MMCHS_SYSCTL register (SD_SYSCTL for AM335x).
342 	 * 2. Poll the SRC(SRD) bit until it is set to 0x1.
343 	 * 3. Wait until the SRC (SRD) bit returns to 0x0
344 	 *    (reset procedure is completed).
345 	 */
346 #if defined(CONFIG_OMAP44XX) || defined(CONFIG_OMAP54XX) || \
347 	defined(CONFIG_AM33XX) || defined(CONFIG_AM43XX)
348 	if (!(readl(&mmc_base->sysctl) & bit)) {
349 		start = get_timer(0);
350 		while (!(readl(&mmc_base->sysctl) & bit)) {
351 			if (get_timer(0) - start > MAX_RETRY_MS)
352 				return;
353 		}
354 	}
355 #endif
356 	start = get_timer(0);
357 	while ((readl(&mmc_base->sysctl) & bit) != 0) {
358 		if (get_timer(0) - start > MAX_RETRY_MS) {
359 			printf("%s: timedout waiting for sysctl %x to clear\n",
360 				__func__, bit);
361 			return;
362 		}
363 	}
364 }
365 
366 #ifndef CONFIG_OMAP34XX
367 static void omap_hsmmc_adma_desc(struct mmc *mmc, char *buf, u16 len, bool end)
368 {
369 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
370 	struct omap_hsmmc_adma_desc *desc;
371 	u8 attr;
372 
373 	desc = &priv->adma_desc_table[priv->desc_slot];
374 
375 	attr = ADMA_DESC_ATTR_VALID | ADMA_DESC_TRANSFER_DATA;
376 	if (!end)
377 		priv->desc_slot++;
378 	else
379 		attr |= ADMA_DESC_ATTR_END;
380 
381 	desc->len = len;
382 	desc->addr = (u32)buf;
383 	desc->reserved = 0;
384 	desc->attr = attr;
385 }
386 
387 static void omap_hsmmc_prepare_adma_table(struct mmc *mmc,
388 					  struct mmc_data *data)
389 {
390 	uint total_len = data->blocksize * data->blocks;
391 	uint desc_count = DIV_ROUND_UP(total_len, ADMA_MAX_LEN);
392 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
393 	int i = desc_count;
394 	char *buf;
395 
396 	priv->desc_slot = 0;
397 	priv->adma_desc_table = (struct omap_hsmmc_adma_desc *)
398 				memalign(ARCH_DMA_MINALIGN, desc_count *
399 				sizeof(struct omap_hsmmc_adma_desc));
400 
401 	if (data->flags & MMC_DATA_READ)
402 		buf = data->dest;
403 	else
404 		buf = (char *)data->src;
405 
406 	while (--i) {
407 		omap_hsmmc_adma_desc(mmc, buf, ADMA_MAX_LEN, false);
408 		buf += ADMA_MAX_LEN;
409 		total_len -= ADMA_MAX_LEN;
410 	}
411 
412 	omap_hsmmc_adma_desc(mmc, buf, total_len, true);
413 
414 	flush_dcache_range((long)priv->adma_desc_table,
415 			   (long)priv->adma_desc_table +
416 			   ROUND(desc_count *
417 			   sizeof(struct omap_hsmmc_adma_desc),
418 			   ARCH_DMA_MINALIGN));
419 }
420 
421 static void omap_hsmmc_prepare_data(struct mmc *mmc, struct mmc_data *data)
422 {
423 	struct hsmmc *mmc_base;
424 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
425 	u32 val;
426 	char *buf;
427 
428 	mmc_base = priv->base_addr;
429 	omap_hsmmc_prepare_adma_table(mmc, data);
430 
431 	if (data->flags & MMC_DATA_READ)
432 		buf = data->dest;
433 	else
434 		buf = (char *)data->src;
435 
436 	val = readl(&mmc_base->hctl);
437 	val |= DMA_SELECT;
438 	writel(val, &mmc_base->hctl);
439 
440 	val = readl(&mmc_base->con);
441 	val |= DMA_MASTER;
442 	writel(val, &mmc_base->con);
443 
444 	writel((u32)priv->adma_desc_table, &mmc_base->admasal);
445 
446 	flush_dcache_range((u32)buf,
447 			   (u32)buf +
448 			   ROUND(data->blocksize * data->blocks,
449 				 ARCH_DMA_MINALIGN));
450 }
451 
452 static void omap_hsmmc_dma_cleanup(struct mmc *mmc)
453 {
454 	struct hsmmc *mmc_base;
455 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
456 	u32 val;
457 
458 	mmc_base = priv->base_addr;
459 
460 	val = readl(&mmc_base->con);
461 	val &= ~DMA_MASTER;
462 	writel(val, &mmc_base->con);
463 
464 	val = readl(&mmc_base->hctl);
465 	val &= ~DMA_SELECT;
466 	writel(val, &mmc_base->hctl);
467 
468 	kfree(priv->adma_desc_table);
469 }
470 #else
471 #define omap_hsmmc_adma_desc
472 #define omap_hsmmc_prepare_adma_table
473 #define omap_hsmmc_prepare_data
474 #define omap_hsmmc_dma_cleanup
475 #endif
476 
477 #if !CONFIG_IS_ENABLED(DM_MMC)
478 static int omap_hsmmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
479 			struct mmc_data *data)
480 {
481 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
482 #else
483 static int omap_hsmmc_send_cmd(struct udevice *dev, struct mmc_cmd *cmd,
484 			struct mmc_data *data)
485 {
486 	struct omap_hsmmc_data *priv = dev_get_priv(dev);
487 #ifndef CONFIG_OMAP34XX
488 	struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
489 	struct mmc *mmc = upriv->mmc;
490 #endif
491 #endif
492 	struct hsmmc *mmc_base;
493 	unsigned int flags, mmc_stat;
494 	ulong start;
495 
496 	mmc_base = priv->base_addr;
497 
498 	if (cmd->cmdidx == MMC_CMD_STOP_TRANSMISSION)
499 		return 0;
500 
501 	start = get_timer(0);
502 	while ((readl(&mmc_base->pstate) & (DATI_MASK | CMDI_MASK)) != 0) {
503 		if (get_timer(0) - start > MAX_RETRY_MS) {
504 			printf("%s: timedout waiting on cmd inhibit to clear\n",
505 					__func__);
506 			return -ETIMEDOUT;
507 		}
508 	}
509 	writel(0xFFFFFFFF, &mmc_base->stat);
510 	start = get_timer(0);
511 	while (readl(&mmc_base->stat)) {
512 		if (get_timer(0) - start > MAX_RETRY_MS) {
513 			printf("%s: timedout waiting for STAT (%x) to clear\n",
514 				__func__, readl(&mmc_base->stat));
515 			return -ETIMEDOUT;
516 		}
517 	}
518 	/*
519 	 * CMDREG
520 	 * CMDIDX[13:8]	: Command index
521 	 * DATAPRNT[5]	: Data Present Select
522 	 * ENCMDIDX[4]	: Command Index Check Enable
523 	 * ENCMDCRC[3]	: Command CRC Check Enable
524 	 * RSPTYP[1:0]
525 	 *	00 = No Response
526 	 *	01 = Length 136
527 	 *	10 = Length 48
528 	 *	11 = Length 48 Check busy after response
529 	 */
530 	/* Delay added before checking the status of frq change
531 	 * retry not supported by mmc.c(core file)
532 	 */
533 	if (cmd->cmdidx == SD_CMD_APP_SEND_SCR)
534 		udelay(50000); /* wait 50 ms */
535 
536 	if (!(cmd->resp_type & MMC_RSP_PRESENT))
537 		flags = 0;
538 	else if (cmd->resp_type & MMC_RSP_136)
539 		flags = RSP_TYPE_LGHT136 | CICE_NOCHECK;
540 	else if (cmd->resp_type & MMC_RSP_BUSY)
541 		flags = RSP_TYPE_LGHT48B;
542 	else
543 		flags = RSP_TYPE_LGHT48;
544 
545 	/* enable default flags */
546 	flags =	flags | (CMD_TYPE_NORMAL | CICE_NOCHECK | CCCE_NOCHECK |
547 			MSBS_SGLEBLK);
548 	flags &= ~(ACEN_ENABLE | BCE_ENABLE | DE_ENABLE);
549 
550 	if (cmd->resp_type & MMC_RSP_CRC)
551 		flags |= CCCE_CHECK;
552 	if (cmd->resp_type & MMC_RSP_OPCODE)
553 		flags |= CICE_CHECK;
554 
555 	if (data) {
556 		if ((cmd->cmdidx == MMC_CMD_READ_MULTIPLE_BLOCK) ||
557 			 (cmd->cmdidx == MMC_CMD_WRITE_MULTIPLE_BLOCK)) {
558 			flags |= (MSBS_MULTIBLK | BCE_ENABLE | ACEN_ENABLE);
559 			data->blocksize = 512;
560 			writel(data->blocksize | (data->blocks << 16),
561 							&mmc_base->blk);
562 		} else
563 			writel(data->blocksize | NBLK_STPCNT, &mmc_base->blk);
564 
565 		if (data->flags & MMC_DATA_READ)
566 			flags |= (DP_DATA | DDIR_READ);
567 		else
568 			flags |= (DP_DATA | DDIR_WRITE);
569 
570 #ifndef CONFIG_OMAP34XX
571 		if ((priv->controller_flags & OMAP_HSMMC_USE_ADMA) &&
572 		    !mmc_is_tuning_cmd(cmd->cmdidx)) {
573 			omap_hsmmc_prepare_data(mmc, data);
574 			flags |= DE_ENABLE;
575 		}
576 #endif
577 	}
578 
579 	writel(cmd->cmdarg, &mmc_base->arg);
580 	udelay(20);		/* To fix "No status update" error on eMMC */
581 	writel((cmd->cmdidx << 24) | flags, &mmc_base->cmd);
582 
583 	start = get_timer(0);
584 	do {
585 		mmc_stat = readl(&mmc_base->stat);
586 		if (get_timer(start) > MAX_RETRY_MS) {
587 			printf("%s : timeout: No status update\n", __func__);
588 			return -ETIMEDOUT;
589 		}
590 	} while (!mmc_stat);
591 
592 	if ((mmc_stat & IE_CTO) != 0) {
593 		mmc_reset_controller_fsm(mmc_base, SYSCTL_SRC);
594 		return -ETIMEDOUT;
595 	} else if ((mmc_stat & ERRI_MASK) != 0)
596 		return -1;
597 
598 	if (mmc_stat & CC_MASK) {
599 		writel(CC_MASK, &mmc_base->stat);
600 		if (cmd->resp_type & MMC_RSP_PRESENT) {
601 			if (cmd->resp_type & MMC_RSP_136) {
602 				/* response type 2 */
603 				cmd->response[3] = readl(&mmc_base->rsp10);
604 				cmd->response[2] = readl(&mmc_base->rsp32);
605 				cmd->response[1] = readl(&mmc_base->rsp54);
606 				cmd->response[0] = readl(&mmc_base->rsp76);
607 			} else
608 				/* response types 1, 1b, 3, 4, 5, 6 */
609 				cmd->response[0] = readl(&mmc_base->rsp10);
610 		}
611 	}
612 
613 #ifndef CONFIG_OMAP34XX
614 	if ((priv->controller_flags & OMAP_HSMMC_USE_ADMA) && data &&
615 	    !mmc_is_tuning_cmd(cmd->cmdidx)) {
616 		u32 sz_mb, timeout;
617 
618 		if (mmc_stat & IE_ADMAE) {
619 			omap_hsmmc_dma_cleanup(mmc);
620 			return -EIO;
621 		}
622 
623 		sz_mb = DIV_ROUND_UP(data->blocksize *  data->blocks, 1 << 20);
624 		timeout = sz_mb * DMA_TIMEOUT_PER_MB;
625 		if (timeout < MAX_RETRY_MS)
626 			timeout = MAX_RETRY_MS;
627 
628 		start = get_timer(0);
629 		do {
630 			mmc_stat = readl(&mmc_base->stat);
631 			if (mmc_stat & TC_MASK) {
632 				writel(readl(&mmc_base->stat) | TC_MASK,
633 				       &mmc_base->stat);
634 				break;
635 			}
636 			if (get_timer(start) > timeout) {
637 				printf("%s : DMA timeout: No status update\n",
638 				       __func__);
639 				return -ETIMEDOUT;
640 			}
641 		} while (1);
642 
643 		omap_hsmmc_dma_cleanup(mmc);
644 		return 0;
645 	}
646 #endif
647 
648 	if (data && (data->flags & MMC_DATA_READ)) {
649 		mmc_read_data(mmc_base,	data->dest,
650 				data->blocksize * data->blocks);
651 	} else if (data && (data->flags & MMC_DATA_WRITE)) {
652 		mmc_write_data(mmc_base, data->src,
653 				data->blocksize * data->blocks);
654 	}
655 	return 0;
656 }
657 
658 static int mmc_read_data(struct hsmmc *mmc_base, char *buf, unsigned int size)
659 {
660 	unsigned int *output_buf = (unsigned int *)buf;
661 	unsigned int mmc_stat;
662 	unsigned int count;
663 
664 	/*
665 	 * Start Polled Read
666 	 */
667 	count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
668 	count /= 4;
669 
670 	while (size) {
671 		ulong start = get_timer(0);
672 		do {
673 			mmc_stat = readl(&mmc_base->stat);
674 			if (get_timer(0) - start > MAX_RETRY_MS) {
675 				printf("%s: timedout waiting for status!\n",
676 						__func__);
677 				return -ETIMEDOUT;
678 			}
679 		} while (mmc_stat == 0);
680 
681 		if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
682 			mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
683 
684 		if ((mmc_stat & ERRI_MASK) != 0)
685 			return 1;
686 
687 		if (mmc_stat & BRR_MASK) {
688 			unsigned int k;
689 
690 			writel(readl(&mmc_base->stat) | BRR_MASK,
691 				&mmc_base->stat);
692 			for (k = 0; k < count; k++) {
693 				*output_buf = readl(&mmc_base->data);
694 				output_buf++;
695 			}
696 			size -= (count*4);
697 		}
698 
699 		if (mmc_stat & BWR_MASK)
700 			writel(readl(&mmc_base->stat) | BWR_MASK,
701 				&mmc_base->stat);
702 
703 		if (mmc_stat & TC_MASK) {
704 			writel(readl(&mmc_base->stat) | TC_MASK,
705 				&mmc_base->stat);
706 			break;
707 		}
708 	}
709 	return 0;
710 }
711 
712 static int mmc_write_data(struct hsmmc *mmc_base, const char *buf,
713 				unsigned int size)
714 {
715 	unsigned int *input_buf = (unsigned int *)buf;
716 	unsigned int mmc_stat;
717 	unsigned int count;
718 
719 	/*
720 	 * Start Polled Write
721 	 */
722 	count = (size > MMCSD_SECTOR_SIZE) ? MMCSD_SECTOR_SIZE : size;
723 	count /= 4;
724 
725 	while (size) {
726 		ulong start = get_timer(0);
727 		do {
728 			mmc_stat = readl(&mmc_base->stat);
729 			if (get_timer(0) - start > MAX_RETRY_MS) {
730 				printf("%s: timedout waiting for status!\n",
731 						__func__);
732 				return -ETIMEDOUT;
733 			}
734 		} while (mmc_stat == 0);
735 
736 		if ((mmc_stat & (IE_DTO | IE_DCRC | IE_DEB)) != 0)
737 			mmc_reset_controller_fsm(mmc_base, SYSCTL_SRD);
738 
739 		if ((mmc_stat & ERRI_MASK) != 0)
740 			return 1;
741 
742 		if (mmc_stat & BWR_MASK) {
743 			unsigned int k;
744 
745 			writel(readl(&mmc_base->stat) | BWR_MASK,
746 					&mmc_base->stat);
747 			for (k = 0; k < count; k++) {
748 				writel(*input_buf, &mmc_base->data);
749 				input_buf++;
750 			}
751 			size -= (count*4);
752 		}
753 
754 		if (mmc_stat & BRR_MASK)
755 			writel(readl(&mmc_base->stat) | BRR_MASK,
756 				&mmc_base->stat);
757 
758 		if (mmc_stat & TC_MASK) {
759 			writel(readl(&mmc_base->stat) | TC_MASK,
760 				&mmc_base->stat);
761 			break;
762 		}
763 	}
764 	return 0;
765 }
766 
767 #if !CONFIG_IS_ENABLED(DM_MMC)
768 static int omap_hsmmc_set_ios(struct mmc *mmc)
769 {
770 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
771 #else
772 static int omap_hsmmc_set_ios(struct udevice *dev)
773 {
774 	struct omap_hsmmc_data *priv = dev_get_priv(dev);
775 	struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
776 	struct mmc *mmc = upriv->mmc;
777 #endif
778 	struct hsmmc *mmc_base;
779 	unsigned int dsor = 0;
780 	ulong start;
781 
782 	mmc_base = priv->base_addr;
783 	/* configue bus width */
784 	switch (mmc->bus_width) {
785 	case 8:
786 		writel(readl(&mmc_base->con) | DTW_8_BITMODE,
787 			&mmc_base->con);
788 		break;
789 
790 	case 4:
791 		writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
792 			&mmc_base->con);
793 		writel(readl(&mmc_base->hctl) | DTW_4_BITMODE,
794 			&mmc_base->hctl);
795 		break;
796 
797 	case 1:
798 	default:
799 		writel(readl(&mmc_base->con) & ~DTW_8_BITMODE,
800 			&mmc_base->con);
801 		writel(readl(&mmc_base->hctl) & ~DTW_4_BITMODE,
802 			&mmc_base->hctl);
803 		break;
804 	}
805 
806 	/* configure clock with 96Mhz system clock.
807 	 */
808 	if (mmc->clock != 0) {
809 		dsor = (MMC_CLOCK_REFERENCE * 1000000 / mmc->clock);
810 		if ((MMC_CLOCK_REFERENCE * 1000000) / dsor > mmc->clock)
811 			dsor++;
812 	}
813 
814 	mmc_reg_out(&mmc_base->sysctl, (ICE_MASK | DTO_MASK | CEN_MASK),
815 				(ICE_STOP | DTO_15THDTO));
816 
817 	mmc_reg_out(&mmc_base->sysctl, ICE_MASK | CLKD_MASK,
818 				(dsor << CLKD_OFFSET) | ICE_OSCILLATE);
819 
820 	start = get_timer(0);
821 	while ((readl(&mmc_base->sysctl) & ICS_MASK) == ICS_NOTREADY) {
822 		if (get_timer(0) - start > MAX_RETRY_MS) {
823 			printf("%s: timedout waiting for ics!\n", __func__);
824 			return -ETIMEDOUT;
825 		}
826 	}
827 	writel(readl(&mmc_base->sysctl) | CEN_ENABLE, &mmc_base->sysctl);
828 
829 	return 0;
830 }
831 
832 #ifdef OMAP_HSMMC_USE_GPIO
833 #if CONFIG_IS_ENABLED(DM_MMC)
834 static int omap_hsmmc_getcd(struct udevice *dev)
835 {
836 	struct omap_hsmmc_data *priv = dev_get_priv(dev);
837 	int value;
838 
839 	value = dm_gpio_get_value(&priv->cd_gpio);
840 	/* if no CD return as 1 */
841 	if (value < 0)
842 		return 1;
843 
844 	if (priv->cd_inverted)
845 		return !value;
846 	return value;
847 }
848 
849 static int omap_hsmmc_getwp(struct udevice *dev)
850 {
851 	struct omap_hsmmc_data *priv = dev_get_priv(dev);
852 	int value;
853 
854 	value = dm_gpio_get_value(&priv->wp_gpio);
855 	/* if no WP return as 0 */
856 	if (value < 0)
857 		return 0;
858 	return value;
859 }
860 #else
861 static int omap_hsmmc_getcd(struct mmc *mmc)
862 {
863 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
864 	int cd_gpio;
865 
866 	/* if no CD return as 1 */
867 	cd_gpio = priv->cd_gpio;
868 	if (cd_gpio < 0)
869 		return 1;
870 
871 	/* NOTE: assumes card detect signal is active-low */
872 	return !gpio_get_value(cd_gpio);
873 }
874 
875 static int omap_hsmmc_getwp(struct mmc *mmc)
876 {
877 	struct omap_hsmmc_data *priv = omap_hsmmc_get_data(mmc);
878 	int wp_gpio;
879 
880 	/* if no WP return as 0 */
881 	wp_gpio = priv->wp_gpio;
882 	if (wp_gpio < 0)
883 		return 0;
884 
885 	/* NOTE: assumes write protect signal is active-high */
886 	return gpio_get_value(wp_gpio);
887 }
888 #endif
889 #endif
890 
891 #if CONFIG_IS_ENABLED(DM_MMC)
892 static const struct dm_mmc_ops omap_hsmmc_ops = {
893 	.send_cmd	= omap_hsmmc_send_cmd,
894 	.set_ios	= omap_hsmmc_set_ios,
895 #ifdef OMAP_HSMMC_USE_GPIO
896 	.get_cd		= omap_hsmmc_getcd,
897 	.get_wp		= omap_hsmmc_getwp,
898 #endif
899 };
900 #else
901 static const struct mmc_ops omap_hsmmc_ops = {
902 	.send_cmd	= omap_hsmmc_send_cmd,
903 	.set_ios	= omap_hsmmc_set_ios,
904 	.init		= omap_hsmmc_init_setup,
905 #ifdef OMAP_HSMMC_USE_GPIO
906 	.getcd		= omap_hsmmc_getcd,
907 	.getwp		= omap_hsmmc_getwp,
908 #endif
909 };
910 #endif
911 
912 #if !CONFIG_IS_ENABLED(DM_MMC)
913 int omap_mmc_init(int dev_index, uint host_caps_mask, uint f_max, int cd_gpio,
914 		int wp_gpio)
915 {
916 	struct mmc *mmc;
917 	struct omap_hsmmc_data *priv;
918 	struct mmc_config *cfg;
919 	uint host_caps_val;
920 
921 	priv = malloc(sizeof(*priv));
922 	if (priv == NULL)
923 		return -1;
924 
925 	host_caps_val = MMC_MODE_4BIT | MMC_MODE_HS_52MHz | MMC_MODE_HS;
926 
927 	switch (dev_index) {
928 	case 0:
929 		priv->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
930 		break;
931 #ifdef OMAP_HSMMC2_BASE
932 	case 1:
933 		priv->base_addr = (struct hsmmc *)OMAP_HSMMC2_BASE;
934 #if (defined(CONFIG_OMAP44XX) || defined(CONFIG_OMAP54XX) || \
935 	defined(CONFIG_DRA7XX) || defined(CONFIG_AM33XX) || \
936 	defined(CONFIG_AM43XX) || defined(CONFIG_SOC_KEYSTONE)) && \
937 		defined(CONFIG_HSMMC2_8BIT)
938 		/* Enable 8-bit interface for eMMC on OMAP4/5 or DRA7XX */
939 		host_caps_val |= MMC_MODE_8BIT;
940 #endif
941 		break;
942 #endif
943 #ifdef OMAP_HSMMC3_BASE
944 	case 2:
945 		priv->base_addr = (struct hsmmc *)OMAP_HSMMC3_BASE;
946 #if defined(CONFIG_DRA7XX) && defined(CONFIG_HSMMC3_8BIT)
947 		/* Enable 8-bit interface for eMMC on DRA7XX */
948 		host_caps_val |= MMC_MODE_8BIT;
949 #endif
950 		break;
951 #endif
952 	default:
953 		priv->base_addr = (struct hsmmc *)OMAP_HSMMC1_BASE;
954 		return 1;
955 	}
956 #ifdef OMAP_HSMMC_USE_GPIO
957 	/* on error gpio values are set to -1, which is what we want */
958 	priv->cd_gpio = omap_mmc_setup_gpio_in(cd_gpio, "mmc_cd");
959 	priv->wp_gpio = omap_mmc_setup_gpio_in(wp_gpio, "mmc_wp");
960 #endif
961 
962 	cfg = &priv->cfg;
963 
964 	cfg->name = "OMAP SD/MMC";
965 	cfg->ops = &omap_hsmmc_ops;
966 
967 	cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34 | MMC_VDD_165_195;
968 	cfg->host_caps = host_caps_val & ~host_caps_mask;
969 
970 	cfg->f_min = 400000;
971 
972 	if (f_max != 0)
973 		cfg->f_max = f_max;
974 	else {
975 		if (cfg->host_caps & MMC_MODE_HS) {
976 			if (cfg->host_caps & MMC_MODE_HS_52MHz)
977 				cfg->f_max = 52000000;
978 			else
979 				cfg->f_max = 26000000;
980 		} else
981 			cfg->f_max = 20000000;
982 	}
983 
984 	cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
985 
986 #if defined(CONFIG_OMAP34XX)
987 	/*
988 	 * Silicon revs 2.1 and older do not support multiblock transfers.
989 	 */
990 	if ((get_cpu_family() == CPU_OMAP34XX) && (get_cpu_rev() <= CPU_3XX_ES21))
991 		cfg->b_max = 1;
992 #endif
993 	mmc = mmc_create(cfg, priv);
994 	if (mmc == NULL)
995 		return -1;
996 
997 	return 0;
998 }
999 #else
1000 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
1001 static int omap_hsmmc_ofdata_to_platdata(struct udevice *dev)
1002 {
1003 	struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
1004 	struct mmc_config *cfg = &plat->cfg;
1005 	const void *fdt = gd->fdt_blob;
1006 	int node = dev_of_offset(dev);
1007 	int val;
1008 
1009 	plat->base_addr = map_physmem(devfdt_get_addr(dev),
1010 				      sizeof(struct hsmmc *),
1011 				      MAP_NOCACHE);
1012 
1013 	cfg->host_caps = MMC_MODE_HS_52MHz | MMC_MODE_HS;
1014 	val = fdtdec_get_int(fdt, node, "bus-width", -1);
1015 	if (val < 0) {
1016 		printf("error: bus-width property missing\n");
1017 		return -ENOENT;
1018 	}
1019 
1020 	switch (val) {
1021 	case 0x8:
1022 		cfg->host_caps |= MMC_MODE_8BIT;
1023 	case 0x4:
1024 		cfg->host_caps |= MMC_MODE_4BIT;
1025 		break;
1026 	default:
1027 		printf("error: invalid bus-width property\n");
1028 		return -ENOENT;
1029 	}
1030 
1031 	cfg->f_min = 400000;
1032 	cfg->f_max = fdtdec_get_int(fdt, node, "max-frequency", 52000000);
1033 	cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34 | MMC_VDD_165_195;
1034 	cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
1035 
1036 #ifdef OMAP_HSMMC_USE_GPIO
1037 	plat->cd_inverted = fdtdec_get_bool(fdt, node, "cd-inverted");
1038 #endif
1039 
1040 	return 0;
1041 }
1042 #endif
1043 
1044 #ifdef CONFIG_BLK
1045 
1046 static int omap_hsmmc_bind(struct udevice *dev)
1047 {
1048 	struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
1049 
1050 	return mmc_bind(dev, &plat->mmc, &plat->cfg);
1051 }
1052 #endif
1053 static int omap_hsmmc_probe(struct udevice *dev)
1054 {
1055 	struct omap_hsmmc_plat *plat = dev_get_platdata(dev);
1056 	struct mmc_uclass_priv *upriv = dev_get_uclass_priv(dev);
1057 	struct omap_hsmmc_data *priv = dev_get_priv(dev);
1058 	struct mmc_config *cfg = &plat->cfg;
1059 	struct mmc *mmc;
1060 
1061 	cfg->name = "OMAP SD/MMC";
1062 	priv->base_addr = plat->base_addr;
1063 #ifdef OMAP_HSMMC_USE_GPIO
1064 	priv->cd_inverted = plat->cd_inverted;
1065 #endif
1066 
1067 #ifdef CONFIG_BLK
1068 	mmc = &plat->mmc;
1069 #else
1070 	mmc = mmc_create(cfg, priv);
1071 	if (mmc == NULL)
1072 		return -1;
1073 #endif
1074 
1075 #if defined(OMAP_HSMMC_USE_GPIO) && CONFIG_IS_ENABLED(OF_CONTROL)
1076 	gpio_request_by_name(dev, "cd-gpios", 0, &priv->cd_gpio, GPIOD_IS_IN);
1077 	gpio_request_by_name(dev, "wp-gpios", 0, &priv->wp_gpio, GPIOD_IS_IN);
1078 #endif
1079 
1080 	mmc->dev = dev;
1081 	upriv->mmc = mmc;
1082 
1083 	return omap_hsmmc_init_setup(mmc);
1084 }
1085 
1086 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
1087 static const struct udevice_id omap_hsmmc_ids[] = {
1088 	{ .compatible = "ti,omap3-hsmmc" },
1089 	{ .compatible = "ti,omap4-hsmmc" },
1090 	{ .compatible = "ti,am33xx-hsmmc" },
1091 	{ }
1092 };
1093 #endif
1094 
1095 U_BOOT_DRIVER(omap_hsmmc) = {
1096 	.name	= "omap_hsmmc",
1097 	.id	= UCLASS_MMC,
1098 #if CONFIG_IS_ENABLED(OF_CONTROL) && !CONFIG_IS_ENABLED(OF_PLATDATA)
1099 	.of_match = omap_hsmmc_ids,
1100 	.ofdata_to_platdata = omap_hsmmc_ofdata_to_platdata,
1101 	.platdata_auto_alloc_size = sizeof(struct omap_hsmmc_plat),
1102 #endif
1103 #ifdef CONFIG_BLK
1104 	.bind = omap_hsmmc_bind,
1105 #endif
1106 	.ops = &omap_hsmmc_ops,
1107 	.probe	= omap_hsmmc_probe,
1108 	.priv_auto_alloc_size = sizeof(struct omap_hsmmc_data),
1109 	.flags	= DM_FLAG_PRE_RELOC,
1110 };
1111 #endif
1112