2 * (C) Copyright 2007-2011
3 * Allwinner Technology Co., Ltd. <www.allwinnertech.com>
4 * Aaron <leafy.myeh@allwinnertech.com>
6 * MMC driver for allwinner sunxi platform.
8 * SPDX-License-Identifier: GPL-2.0+
16 #include <asm/arch/clock.h>
17 #include <asm/arch/cpu.h>
18 #include <asm/arch/gpio.h>
19 #include <asm/arch/mmc.h>
20 #include <asm-generic/gpio.h>
22 struct sunxi_mmc_host {
26 struct sunxi_mmc *reg;
27 struct mmc_config cfg;
30 /* support 4 mmc hosts */
31 struct sunxi_mmc_host mmc_host[4];
33 static int sunxi_mmc_getcd_gpio(int sdc_no)
36 case 0: return sunxi_name_to_gpio(CONFIG_MMC0_CD_PIN);
37 case 1: return sunxi_name_to_gpio(CONFIG_MMC1_CD_PIN);
38 case 2: return sunxi_name_to_gpio(CONFIG_MMC2_CD_PIN);
39 case 3: return sunxi_name_to_gpio(CONFIG_MMC3_CD_PIN);
44 static int mmc_resource_init(int sdc_no)
46 struct sunxi_mmc_host *mmchost = &mmc_host[sdc_no];
47 struct sunxi_ccm_reg *ccm = (struct sunxi_ccm_reg *)SUNXI_CCM_BASE;
50 debug("init mmc %d resource\n", sdc_no);
54 mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC0_BASE;
55 mmchost->mclkreg = &ccm->sd0_clk_cfg;
58 mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC1_BASE;
59 mmchost->mclkreg = &ccm->sd1_clk_cfg;
62 mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC2_BASE;
63 mmchost->mclkreg = &ccm->sd2_clk_cfg;
66 mmchost->reg = (struct sunxi_mmc *)SUNXI_MMC3_BASE;
67 mmchost->mclkreg = &ccm->sd3_clk_cfg;
70 printf("Wrong mmc number %d\n", sdc_no);
73 mmchost->mmc_no = sdc_no;
75 cd_pin = sunxi_mmc_getcd_gpio(sdc_no);
77 ret = gpio_request(cd_pin, "mmc_cd");
79 sunxi_gpio_set_pull(cd_pin, SUNXI_GPIO_PULL_UP);
80 ret = gpio_direction_input(cd_pin);
87 static int mmc_set_mod_clk(struct sunxi_mmc_host *mmchost, unsigned int hz)
89 unsigned int pll, pll_hz, div, n, oclk_dly, sclk_dly;
92 pll = CCM_MMC_CTRL_OSCM24;
95 #ifdef CONFIG_MACH_SUN9I
96 pll = CCM_MMC_CTRL_PLL_PERIPH0;
97 pll_hz = clock_get_pll4_periph0();
99 pll = CCM_MMC_CTRL_PLL6;
100 pll_hz = clock_get_pll6();
115 printf("mmc %u error cannot set clock to %u\n",
116 mmchost->mmc_no, hz);
120 /* determine delays */
124 } else if (hz <= 25000000) {
127 #ifdef CONFIG_MACH_SUN9I
128 } else if (hz <= 50000000) {
136 } else if (hz <= 50000000) {
146 writel(CCM_MMC_CTRL_ENABLE | pll | CCM_MMC_CTRL_SCLK_DLY(sclk_dly) |
147 CCM_MMC_CTRL_N(n) | CCM_MMC_CTRL_OCLK_DLY(oclk_dly) |
148 CCM_MMC_CTRL_M(div), mmchost->mclkreg);
150 debug("mmc %u set mod-clk req %u parent %u n %u m %u rate %u\n",
151 mmchost->mmc_no, hz, pll_hz, 1u << n, div,
152 pll_hz / (1u << n) / div);
157 static int mmc_clk_io_on(int sdc_no)
159 struct sunxi_mmc_host *mmchost = &mmc_host[sdc_no];
160 struct sunxi_ccm_reg *ccm = (struct sunxi_ccm_reg *)SUNXI_CCM_BASE;
162 debug("init mmc %d clock and io\n", sdc_no);
164 /* config ahb clock */
165 setbits_le32(&ccm->ahb_gate0, 1 << AHB_GATE_OFFSET_MMC(sdc_no));
167 #ifdef CONFIG_SUNXI_GEN_SUN6I
169 setbits_le32(&ccm->ahb_reset0_cfg, 1 << AHB_RESET_OFFSET_MMC(sdc_no));
171 #if defined(CONFIG_MACH_SUN9I)
172 /* sun9i has a mmc-common module, also set the gate and reset there */
173 writel(SUNXI_MMC_COMMON_CLK_GATE | SUNXI_MMC_COMMON_RESET,
174 SUNXI_MMC_COMMON_BASE + 4 * sdc_no);
177 return mmc_set_mod_clk(mmchost, 24000000);
180 static int mmc_update_clk(struct mmc *mmc)
182 struct sunxi_mmc_host *mmchost = mmc->priv;
184 unsigned timeout_msecs = 2000;
186 cmd = SUNXI_MMC_CMD_START |
187 SUNXI_MMC_CMD_UPCLK_ONLY |
188 SUNXI_MMC_CMD_WAIT_PRE_OVER;
189 writel(cmd, &mmchost->reg->cmd);
190 while (readl(&mmchost->reg->cmd) & SUNXI_MMC_CMD_START) {
191 if (!timeout_msecs--)
196 /* clock update sets various irq status bits, clear these */
197 writel(readl(&mmchost->reg->rint), &mmchost->reg->rint);
202 static int mmc_config_clock(struct mmc *mmc)
204 struct sunxi_mmc_host *mmchost = mmc->priv;
205 unsigned rval = readl(&mmchost->reg->clkcr);
208 rval &= ~SUNXI_MMC_CLK_ENABLE;
209 writel(rval, &mmchost->reg->clkcr);
210 if (mmc_update_clk(mmc))
213 /* Set mod_clk to new rate */
214 if (mmc_set_mod_clk(mmchost, mmc->clock))
217 /* Clear internal divider */
218 rval &= ~SUNXI_MMC_CLK_DIVIDER_MASK;
219 writel(rval, &mmchost->reg->clkcr);
221 /* Re-enable Clock */
222 rval |= SUNXI_MMC_CLK_ENABLE;
223 writel(rval, &mmchost->reg->clkcr);
224 if (mmc_update_clk(mmc))
230 static void sunxi_mmc_set_ios(struct mmc *mmc)
232 struct sunxi_mmc_host *mmchost = mmc->priv;
234 debug("set ios: bus_width: %x, clock: %d\n",
235 mmc->bus_width, mmc->clock);
237 /* Change clock first */
238 if (mmc->clock && mmc_config_clock(mmc) != 0) {
239 mmchost->fatal_err = 1;
243 /* Change bus width */
244 if (mmc->bus_width == 8)
245 writel(0x2, &mmchost->reg->width);
246 else if (mmc->bus_width == 4)
247 writel(0x1, &mmchost->reg->width);
249 writel(0x0, &mmchost->reg->width);
252 static int sunxi_mmc_core_init(struct mmc *mmc)
254 struct sunxi_mmc_host *mmchost = mmc->priv;
256 /* Reset controller */
257 writel(SUNXI_MMC_GCTRL_RESET, &mmchost->reg->gctrl);
263 static int mmc_trans_data_by_cpu(struct mmc *mmc, struct mmc_data *data)
265 struct sunxi_mmc_host *mmchost = mmc->priv;
266 const int reading = !!(data->flags & MMC_DATA_READ);
267 const uint32_t status_bit = reading ? SUNXI_MMC_STATUS_FIFO_EMPTY :
268 SUNXI_MMC_STATUS_FIFO_FULL;
270 unsigned *buff = (unsigned int *)(reading ? data->dest : data->src);
271 unsigned byte_cnt = data->blocksize * data->blocks;
272 unsigned timeout_msecs = byte_cnt >> 8;
273 if (timeout_msecs < 2000)
274 timeout_msecs = 2000;
276 /* Always read / write data through the CPU */
277 setbits_le32(&mmchost->reg->gctrl, SUNXI_MMC_GCTRL_ACCESS_BY_AHB);
279 for (i = 0; i < (byte_cnt >> 2); i++) {
280 while (readl(&mmchost->reg->status) & status_bit) {
281 if (!timeout_msecs--)
287 buff[i] = readl(&mmchost->reg->fifo);
289 writel(buff[i], &mmchost->reg->fifo);
295 static int mmc_rint_wait(struct mmc *mmc, unsigned int timeout_msecs,
296 unsigned int done_bit, const char *what)
298 struct sunxi_mmc_host *mmchost = mmc->priv;
302 status = readl(&mmchost->reg->rint);
303 if (!timeout_msecs-- ||
304 (status & SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT)) {
305 debug("%s timeout %x\n", what,
306 status & SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT);
310 } while (!(status & done_bit));
315 static int sunxi_mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
316 struct mmc_data *data)
318 struct sunxi_mmc_host *mmchost = mmc->priv;
319 unsigned int cmdval = SUNXI_MMC_CMD_START;
320 unsigned int timeout_msecs;
322 unsigned int status = 0;
323 unsigned int bytecnt = 0;
325 if (mmchost->fatal_err)
327 if (cmd->resp_type & MMC_RSP_BUSY)
328 debug("mmc cmd %d check rsp busy\n", cmd->cmdidx);
329 if (cmd->cmdidx == 12)
333 cmdval |= SUNXI_MMC_CMD_SEND_INIT_SEQ;
334 if (cmd->resp_type & MMC_RSP_PRESENT)
335 cmdval |= SUNXI_MMC_CMD_RESP_EXPIRE;
336 if (cmd->resp_type & MMC_RSP_136)
337 cmdval |= SUNXI_MMC_CMD_LONG_RESPONSE;
338 if (cmd->resp_type & MMC_RSP_CRC)
339 cmdval |= SUNXI_MMC_CMD_CHK_RESPONSE_CRC;
342 if ((u32) data->dest & 0x3) {
347 cmdval |= SUNXI_MMC_CMD_DATA_EXPIRE|SUNXI_MMC_CMD_WAIT_PRE_OVER;
348 if (data->flags & MMC_DATA_WRITE)
349 cmdval |= SUNXI_MMC_CMD_WRITE;
350 if (data->blocks > 1)
351 cmdval |= SUNXI_MMC_CMD_AUTO_STOP;
352 writel(data->blocksize, &mmchost->reg->blksz);
353 writel(data->blocks * data->blocksize, &mmchost->reg->bytecnt);
356 debug("mmc %d, cmd %d(0x%08x), arg 0x%08x\n", mmchost->mmc_no,
357 cmd->cmdidx, cmdval | cmd->cmdidx, cmd->cmdarg);
358 writel(cmd->cmdarg, &mmchost->reg->arg);
361 writel(cmdval | cmd->cmdidx, &mmchost->reg->cmd);
364 * transfer data and check status
365 * STATREG[2] : FIFO empty
366 * STATREG[3] : FIFO full
371 bytecnt = data->blocksize * data->blocks;
372 debug("trans data %d bytes\n", bytecnt);
373 writel(cmdval | cmd->cmdidx, &mmchost->reg->cmd);
374 ret = mmc_trans_data_by_cpu(mmc, data);
376 error = readl(&mmchost->reg->rint) & \
377 SUNXI_MMC_RINT_INTERRUPT_ERROR_BIT;
383 error = mmc_rint_wait(mmc, 1000, SUNXI_MMC_RINT_COMMAND_DONE, "cmd");
389 debug("cacl timeout %x msec\n", timeout_msecs);
390 error = mmc_rint_wait(mmc, timeout_msecs,
392 SUNXI_MMC_RINT_AUTO_COMMAND_DONE :
393 SUNXI_MMC_RINT_DATA_OVER,
399 if (cmd->resp_type & MMC_RSP_BUSY) {
400 timeout_msecs = 2000;
402 status = readl(&mmchost->reg->status);
403 if (!timeout_msecs--) {
404 debug("busy timeout\n");
409 } while (status & SUNXI_MMC_STATUS_CARD_DATA_BUSY);
412 if (cmd->resp_type & MMC_RSP_136) {
413 cmd->response[0] = readl(&mmchost->reg->resp3);
414 cmd->response[1] = readl(&mmchost->reg->resp2);
415 cmd->response[2] = readl(&mmchost->reg->resp1);
416 cmd->response[3] = readl(&mmchost->reg->resp0);
417 debug("mmc resp 0x%08x 0x%08x 0x%08x 0x%08x\n",
418 cmd->response[3], cmd->response[2],
419 cmd->response[1], cmd->response[0]);
421 cmd->response[0] = readl(&mmchost->reg->resp0);
422 debug("mmc resp 0x%08x\n", cmd->response[0]);
426 writel(SUNXI_MMC_GCTRL_RESET, &mmchost->reg->gctrl);
429 writel(0xffffffff, &mmchost->reg->rint);
430 writel(readl(&mmchost->reg->gctrl) | SUNXI_MMC_GCTRL_FIFO_RESET,
431 &mmchost->reg->gctrl);
436 static int sunxi_mmc_getcd(struct mmc *mmc)
438 struct sunxi_mmc_host *mmchost = mmc->priv;
441 cd_pin = sunxi_mmc_getcd_gpio(mmchost->mmc_no);
445 return !gpio_get_value(cd_pin);
448 int sunxi_mmc_has_egon_boot_signature(struct mmc *mmc)
450 char *buf = malloc(512);
451 int valid_signature = 0;
454 panic("Failed to allocate memory\n");
456 if (mmc_getcd(mmc) && mmc_init(mmc) == 0 &&
457 mmc->block_dev.block_read(mmc->block_dev.dev, 16, 1, buf) == 1 &&
458 strncmp(&buf[4], "eGON.BT0", 8) == 0)
462 return valid_signature;
465 static const struct mmc_ops sunxi_mmc_ops = {
466 .send_cmd = sunxi_mmc_send_cmd,
467 .set_ios = sunxi_mmc_set_ios,
468 .init = sunxi_mmc_core_init,
469 .getcd = sunxi_mmc_getcd,
472 struct mmc *sunxi_mmc_init(int sdc_no)
474 struct mmc_config *cfg = &mmc_host[sdc_no].cfg;
476 memset(&mmc_host[sdc_no], 0, sizeof(struct sunxi_mmc_host));
478 cfg->name = "SUNXI SD/MMC";
479 cfg->ops = &sunxi_mmc_ops;
481 cfg->voltages = MMC_VDD_32_33 | MMC_VDD_33_34;
482 cfg->host_caps = MMC_MODE_4BIT;
483 cfg->host_caps |= MMC_MODE_HS_52MHz | MMC_MODE_HS;
484 cfg->b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT;
487 cfg->f_max = 52000000;
489 if (mmc_resource_init(sdc_no) != 0)
492 mmc_clk_io_on(sdc_no);
494 return mmc_create(cfg, &mmc_host[sdc_no]);