xref: /openbmc/u-boot/drivers/mmc/sunxi_mmc.c (revision 058d2316)
1 /*
2  * (C) Copyright 2007-2011
3  * Allwinner Technology Co., Ltd. <www.allwinnertech.com>
4  * Aaron <leafy.myeh@allwinnertech.com>
5  *
6  * MMC driver for allwinner sunxi platform.
7  *
8  * SPDX-License-Identifier:	GPL-2.0+
9  */
10 
11 #include <common.h>
12 #include <malloc.h>
13 #include <mmc.h>
14 #include <asm/io.h>
15 #include <asm/arch/clock.h>
16 #include <asm/arch/cpu.h>
17 #include <asm/arch/gpio.h>
18 #include <asm/arch/mmc.h>
19 #include <asm-generic/gpio.h>
20 
21 struct sunxi_mmc_host {
22 	unsigned mmc_no;
23 	uint32_t *mclkreg;
24 	unsigned fatal_err;
25 	struct sunxi_mmc *reg;
26 	struct mmc_config cfg;
27 };
28 
29 /* support 4 mmc hosts */
30 struct sunxi_mmc_host mmc_host[4];
31 
32 static int sunxi_mmc_getcd_gpio(int sdc_no)
33 {
34 	switch (sdc_no) {
35 	case 0: return sunxi_name_to_gpio(CONFIG_MMC0_CD_PIN);
36 	case 1: return sunxi_name_to_gpio(CONFIG_MMC1_CD_PIN);
37 	case 2: return sunxi_name_to_gpio(CONFIG_MMC2_CD_PIN);
38 	case 3: return sunxi_name_to_gpio(CONFIG_MMC3_CD_PIN);
39 	}
40 	return -1;
41 }
42 
43 static int mmc_resource_init(int sdc_no)
44 {
45 	struct sunxi_mmc_host *mmchost = &mmc_host[sdc_no];
46 	struct sunxi_ccm_reg *ccm = (struct sunxi_ccm_reg *)SUNXI_CCM_BASE;
47 	int cd_pin, ret = 0;
48 
49 	debug("init mmc %d resource\n", sdc_no);
50 
51 	switch (sdc_no) {
52 	case 0:
53 		mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC0_BASE;
54 		mmchost->mclkreg = &ccm->sd0_clk_cfg;
55 		break;
56 	case 1:
57 		mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC1_BASE;
58 		mmchost->mclkreg = &ccm->sd1_clk_cfg;
59 		break;
60 	case 2:
61 		mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC2_BASE;
62 		mmchost->mclkreg = &ccm->sd2_clk_cfg;
63 		break;
64 	case 3:
65 		mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC3_BASE;
66 		mmchost->mclkreg = &ccm->sd3_clk_cfg;
67 		break;
68 	default:
69 		printf("Wrong mmc number %d\n", sdc_no);
70 		return -1;
71 	}
72 	mmchost->mmc_no = sdc_no;
73 
74 	cd_pin = sunxi_mmc_getcd_gpio(sdc_no);
75 	if (cd_pin != -1) {
76 		ret = gpio_request(cd_pin, "mmc_cd");
77 		if (!ret)
78 			ret = gpio_direction_input(cd_pin);
79 	}
80 
81 	return ret;
82 }
83 
84 static int mmc_set_mod_clk(struct sunxi_mmc_host *mmchost, unsigned int hz)
85 {
86 	unsigned int pll, pll_hz, div, n, oclk_dly, sclk_dly;
87 
88 	if (hz <= 24000000) {
89 		pll = CCM_MMC_CTRL_OSCM24;
90 		pll_hz = 24000000;
91 	} else {
92 #ifdef CONFIG_MACH_SUN9I
93 		pll = CCM_MMC_CTRL_PLL_PERIPH0;
94 		pll_hz = clock_get_pll4_periph0();
95 #else
96 		pll = CCM_MMC_CTRL_PLL6;
97 		pll_hz = clock_get_pll6();
98 #endif
99 	}
100 
101 	div = pll_hz / hz;
102 	if (pll_hz % hz)
103 		div++;
104 
105 	n = 0;
106 	while (div > 16) {
107 		n++;
108 		div = (div + 1) / 2;
109 	}
110 
111 	if (n > 3) {
112 		printf("mmc %u error cannot set clock to %u\n",
113 		       mmchost->mmc_no, hz);
114 		return -1;
115 	}
116 
117 	/* determine delays */
118 	if (hz <= 400000) {
119 		oclk_dly = 0;
120 		sclk_dly = 7;
121 	} else if (hz <= 25000000) {
122 		oclk_dly = 0;
123 		sclk_dly = 5;
124 	} else if (hz <= 50000000) {
125 		oclk_dly = 3;
126 		sclk_dly = 5;
127 	} else {
128 		/* hz > 50000000 */
129 		oclk_dly = 2;
130 		sclk_dly = 4;
131 	}
132 
133 	writel(CCM_MMC_CTRL_ENABLE | pll | CCM_MMC_CTRL_SCLK_DLY(sclk_dly) |
134 	       CCM_MMC_CTRL_N(n) | CCM_MMC_CTRL_OCLK_DLY(oclk_dly) |
135 	       CCM_MMC_CTRL_M(div), mmchost->mclkreg);
136 
137 	debug("mmc %u set mod-clk req %u parent %u n %u m %u rate %u\n",
138 	      mmchost->mmc_no, hz, pll_hz, 1u << n, div,
139 	      pll_hz / (1u << n) / div);
140 
141 	return 0;
142 }
143 
144 static int mmc_clk_io_on(int sdc_no)
145 {
146 	struct sunxi_mmc_host *mmchost = &mmc_host[sdc_no];
147 	struct sunxi_ccm_reg *ccm = (struct sunxi_ccm_reg *)SUNXI_CCM_BASE;
148 
149 	debug("init mmc %d clock and io\n", sdc_no);
150 
151 	/* config ahb clock */
152 	setbits_le32(&ccm->ahb_gate0, 1 << AHB_GATE_OFFSET_MMC(sdc_no));
153 
154 #if defined(CONFIG_MACH_SUN6I) || defined(CONFIG_MACH_SUN8I) || \
155     defined(CONFIG_MACH_SUN9I)
156 	/* unassert reset */
157 	setbits_le32(&ccm->ahb_reset0_cfg, 1 << AHB_RESET_OFFSET_MMC(sdc_no));
158 #endif
159 #if defined(CONFIG_MACH_SUN9I)
160 	/* sun9i has a mmc-common module, also set the gate and reset there */
161 	writel(SUNXI_MMC_COMMON_CLK_GATE | SUNXI_MMC_COMMON_RESET,
162 	       SUNXI_MMC_COMMON_BASE + 4 * sdc_no);
163 #endif
164 
165 	return mmc_set_mod_clk(mmchost, 24000000);
166 }
167 
168 static int mmc_update_clk(struct mmc *mmc)
169 {
170 	struct sunxi_mmc_host *mmchost = mmc->priv;
171 	unsigned int cmd;
172 	unsigned timeout_msecs = 2000;
173 
174 	cmd = SUNXI_MMC_CMD_START |
175 	      SUNXI_MMC_CMD_UPCLK_ONLY |
176 	      SUNXI_MMC_CMD_WAIT_PRE_OVER;
177 	writel(cmd, &mmchost->reg->cmd);
178 	while (readl(&mmchost->reg->cmd) & SUNXI_MMC_CMD_START) {
179 		if (!timeout_msecs--)
180 			return -1;
181 		udelay(1000);
182 	}
183 
184 	/* clock update sets various irq status bits, clear these */
185 	writel(readl(&mmchost->reg->rint), &mmchost->reg->rint);
186 
187 	return 0;
188 }
189 
190 static int mmc_config_clock(struct mmc *mmc)
191 {
192 	struct sunxi_mmc_host *mmchost = mmc->priv;
193 	unsigned rval = readl(&mmchost->reg->clkcr);
194 
195 	/* Disable Clock */
196 	rval &= ~SUNXI_MMC_CLK_ENABLE;
197 	writel(rval, &mmchost->reg->clkcr);
198 	if (mmc_update_clk(mmc))
199 		return -1;
200 
201 	/* Set mod_clk to new rate */
202 	if (mmc_set_mod_clk(mmchost, mmc->clock))
203 		return -1;
204 
205 	/* Clear internal divider */
206 	rval &= ~SUNXI_MMC_CLK_DIVIDER_MASK;
207 	writel(rval, &mmchost->reg->clkcr);
208 
209 	/* Re-enable Clock */
210 	rval |= SUNXI_MMC_CLK_ENABLE;
211 	writel(rval, &mmchost->reg->clkcr);
212 	if (mmc_update_clk(mmc))
213 		return -1;
214 
215 	return 0;
216 }
217 
218 static void sunxi_mmc_set_ios(struct mmc *mmc)
219 {
220 	struct sunxi_mmc_host *mmchost = mmc->priv;
221 
222 	debug("set ios: bus_width: %x, clock: %d\n",
223 	      mmc->bus_width, mmc->clock);
224 
225 	/* Change clock first */
226 	if (mmc->clock && mmc_config_clock(mmc) != 0) {
227 		mmchost->fatal_err = 1;
228 		return;
229 	}
230 
231 	/* Change bus width */
232 	if (mmc->bus_width == 8)
233 		writel(0x2, &mmchost->reg->width);
234 	else if (mmc->bus_width == 4)
235 		writel(0x1, &mmchost->reg->width);
236 	else
237 		writel(0x0, &mmchost->reg->width);
238 }
239 
240 static int sunxi_mmc_core_init(struct mmc *mmc)
241 {
242 	struct sunxi_mmc_host *mmchost = mmc->priv;
243 
244 	/* Reset controller */
245 	writel(SUNXI_MMC_GCTRL_RESET, &mmchost->reg->gctrl);
246 	udelay(1000);
247 
248 	return 0;
249 }
250 
251 static int mmc_trans_data_by_cpu(struct mmc *mmc, struct mmc_data *data)
252 {
253 	struct sunxi_mmc_host *mmchost = mmc->priv;
254 	const int reading = !!(data->flags & MMC_DATA_READ);
255 	const uint32_t status_bit = reading ? SUNXI_MMC_STATUS_FIFO_EMPTY :
256 					      SUNXI_MMC_STATUS_FIFO_FULL;
257 	unsigned i;
258 	unsigned byte_cnt = data->blocksize * data->blocks;
259 	unsigned timeout_msecs = 2000;
260 	unsigned *buff = (unsigned int *)(reading ? data->dest : data->src);
261 
262 	/* Always read / write data through the CPU */
263 	setbits_le32(&mmchost->reg->gctrl, SUNXI_MMC_GCTRL_ACCESS_BY_AHB);
264 
265 	for (i = 0; i < (byte_cnt >> 2); i++) {
266 		while (readl(&mmchost->reg->status) & status_bit) {
267 			if (!timeout_msecs--)
268 				return -1;
269 			udelay(1000);
270 		}
271 
272 		if (reading)
273 			buff[i] = readl(&mmchost->reg->fifo);
274 		else
275 			writel(buff[i], &mmchost->reg->fifo);
276 	}
277 
278 	return 0;
279 }
280 
281 static int mmc_rint_wait(struct mmc *mmc, unsigned int timeout_msecs,
282 			 unsigned int done_bit, const char *what)
283 {
284 	struct sunxi_mmc_host *mmchost = mmc->priv;
285 	unsigned int status;
286 
287 	do {
288 		status = readl(&mmchost->reg->rint);
289 		if (!timeout_msecs-- ||
290 		    (status & SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT)) {
291 			debug("%s timeout %x\n", what,
292 			      status & SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT);
293 			return TIMEOUT;
294 		}
295 		udelay(1000);
296 	} while (!(status & done_bit));
297 
298 	return 0;
299 }
300 
301 static int sunxi_mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
302 			      struct mmc_data *data)
303 {
304 	struct sunxi_mmc_host *mmchost = mmc->priv;
305 	unsigned int cmdval = SUNXI_MMC_CMD_START;
306 	unsigned int timeout_msecs;
307 	int error = 0;
308 	unsigned int status = 0;
309 	unsigned int bytecnt = 0;
310 
311 	if (mmchost->fatal_err)
312 		return -1;
313 	if (cmd->resp_type & MMC_RSP_BUSY)
314 		debug("mmc cmd %d check rsp busy\n", cmd->cmdidx);
315 	if (cmd->cmdidx == 12)
316 		return 0;
317 
318 	if (!cmd->cmdidx)
319 		cmdval |= SUNXI_MMC_CMD_SEND_INIT_SEQ;
320 	if (cmd->resp_type & MMC_RSP_PRESENT)
321 		cmdval |= SUNXI_MMC_CMD_RESP_EXPIRE;
322 	if (cmd->resp_type & MMC_RSP_136)
323 		cmdval |= SUNXI_MMC_CMD_LONG_RESPONSE;
324 	if (cmd->resp_type & MMC_RSP_CRC)
325 		cmdval |= SUNXI_MMC_CMD_CHK_RESPONSE_CRC;
326 
327 	if (data) {
328 		if ((u32) data->dest & 0x3) {
329 			error = -1;
330 			goto out;
331 		}
332 
333 		cmdval |= SUNXI_MMC_CMD_DATA_EXPIRE|SUNXI_MMC_CMD_WAIT_PRE_OVER;
334 		if (data->flags & MMC_DATA_WRITE)
335 			cmdval |= SUNXI_MMC_CMD_WRITE;
336 		if (data->blocks > 1)
337 			cmdval |= SUNXI_MMC_CMD_AUTO_STOP;
338 		writel(data->blocksize, &mmchost->reg->blksz);
339 		writel(data->blocks * data->blocksize, &mmchost->reg->bytecnt);
340 	}
341 
342 	debug("mmc %d, cmd %d(0x%08x), arg 0x%08x\n", mmchost->mmc_no,
343 	      cmd->cmdidx, cmdval | cmd->cmdidx, cmd->cmdarg);
344 	writel(cmd->cmdarg, &mmchost->reg->arg);
345 
346 	if (!data)
347 		writel(cmdval | cmd->cmdidx, &mmchost->reg->cmd);
348 
349 	/*
350 	 * transfer data and check status
351 	 * STATREG[2] : FIFO empty
352 	 * STATREG[3] : FIFO full
353 	 */
354 	if (data) {
355 		int ret = 0;
356 
357 		bytecnt = data->blocksize * data->blocks;
358 		debug("trans data %d bytes\n", bytecnt);
359 		writel(cmdval | cmd->cmdidx, &mmchost->reg->cmd);
360 		ret = mmc_trans_data_by_cpu(mmc, data);
361 		if (ret) {
362 			error = readl(&mmchost->reg->rint) & \
363 				SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT;
364 			error = TIMEOUT;
365 			goto out;
366 		}
367 	}
368 
369 	error = mmc_rint_wait(mmc, 1000, SUNXI_MMC_RINT_COMMAND_DONE, "cmd");
370 	if (error)
371 		goto out;
372 
373 	if (data) {
374 		timeout_msecs = 120;
375 		debug("cacl timeout %x msec\n", timeout_msecs);
376 		error = mmc_rint_wait(mmc, timeout_msecs,
377 				      data->blocks > 1 ?
378 				      SUNXI_MMC_RINT_AUTO_COMMAND_DONE :
379 				      SUNXI_MMC_RINT_DATA_OVER,
380 				      "data");
381 		if (error)
382 			goto out;
383 	}
384 
385 	if (cmd->resp_type & MMC_RSP_BUSY) {
386 		timeout_msecs = 2000;
387 		do {
388 			status = readl(&mmchost->reg->status);
389 			if (!timeout_msecs--) {
390 				debug("busy timeout\n");
391 				error = TIMEOUT;
392 				goto out;
393 			}
394 			udelay(1000);
395 		} while (status & SUNXI_MMC_STATUS_CARD_DATA_BUSY);
396 	}
397 
398 	if (cmd->resp_type & MMC_RSP_136) {
399 		cmd->response[0] = readl(&mmchost->reg->resp3);
400 		cmd->response[1] = readl(&mmchost->reg->resp2);
401 		cmd->response[2] = readl(&mmchost->reg->resp1);
402 		cmd->response[3] = readl(&mmchost->reg->resp0);
403 		debug("mmc resp 0x%08x 0x%08x 0x%08x 0x%08x\n",
404 		      cmd->response[3], cmd->response[2],
405 		      cmd->response[1], cmd->response[0]);
406 	} else {
407 		cmd->response[0] = readl(&mmchost->reg->resp0);
408 		debug("mmc resp 0x%08x\n", cmd->response[0]);
409 	}
410 out:
411 	if (error < 0) {
412 		writel(SUNXI_MMC_GCTRL_RESET, &mmchost->reg->gctrl);
413 		mmc_update_clk(mmc);
414 	}
415 	writel(0xffffffff, &mmchost->reg->rint);
416 	writel(readl(&mmchost->reg->gctrl) | SUNXI_MMC_GCTRL_FIFO_RESET,
417 	       &mmchost->reg->gctrl);
418 
419 	return error;
420 }
421 
422 static int sunxi_mmc_getcd(struct mmc *mmc)
423 {
424 	struct sunxi_mmc_host *mmchost = mmc->priv;
425 	int cd_pin;
426 
427 	cd_pin = sunxi_mmc_getcd_gpio(mmchost->mmc_no);
428 	if (cd_pin == -1)
429 		return 1;
430 
431 	return !gpio_get_value(cd_pin);
432 }
433 
434 static const struct mmc_ops sunxi_mmc_ops = {
435 	.send_cmd	= sunxi_mmc_send_cmd,
436 	.set_ios	= sunxi_mmc_set_ios,
437 	.init		= sunxi_mmc_core_init,
438 	.getcd		= sunxi_mmc_getcd,
439 };
440 
441 struct mmc *sunxi_mmc_init(int sdc_no)
442 {
443 	struct mmc_config *cfg = &mmc_host[sdc_no].cfg;
444 
445 	memset(&mmc_host[sdc_no], 0, sizeof(struct sunxi_mmc_host));
446 
447 	cfg->name = "SUNXI SD/MMC";
448 	cfg->ops  = &sunxi_mmc_ops;
449 
450 	cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34;
451 	cfg->host_caps = MMC_MODE_4BIT;
452 	cfg->host_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS | MMC_MODE_HC;
453 	cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
454 
455 	cfg->f_min = 400000;
456 	cfg->f_max = 52000000;
457 
458 	if (mmc_resource_init(sdc_no) != 0)
459 		return NULL;
460 
461 	mmc_clk_io_on(sdc_no);
462 
463 	return mmc_create(cfg, &mmc_host[sdc_no]);
464 }
465