1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * Marvell MMC/SD/SDIO driver
4 *
5 * (C) Copyright 2012-2014
6 * Marvell Semiconductor <www.marvell.com>
7 * Written-by: Maen Suleiman, Gerald Kerma
8 */
9
10 #include <common.h>
11 #include <errno.h>
12 #include <malloc.h>
13 #include <part.h>
14 #include <mmc.h>
15 #include <asm/io.h>
16 #include <asm/arch/cpu.h>
17 #include <asm/arch/soc.h>
18 #include <mvebu_mmc.h>
19
20 DECLARE_GLOBAL_DATA_PTR;
21
22 #define DRIVER_NAME "MVEBU_MMC"
23
24 #define MVEBU_TARGET_DRAM 0
25
26 #define TIMEOUT_DELAY 5*CONFIG_SYS_HZ /* wait 5 seconds */
27
mvebu_mmc_write(u32 offs,u32 val)28 static void mvebu_mmc_write(u32 offs, u32 val)
29 {
30 writel(val, CONFIG_SYS_MMC_BASE + (offs));
31 }
32
mvebu_mmc_read(u32 offs)33 static u32 mvebu_mmc_read(u32 offs)
34 {
35 return readl(CONFIG_SYS_MMC_BASE + (offs));
36 }
37
mvebu_mmc_setup_data(struct mmc_data * data)38 static int mvebu_mmc_setup_data(struct mmc_data *data)
39 {
40 u32 ctrl_reg;
41
42 debug("%s, data %s : blocks=%d blksz=%d\n", DRIVER_NAME,
43 (data->flags & MMC_DATA_READ) ? "read" : "write",
44 data->blocks, data->blocksize);
45
46 /* default to maximum timeout */
47 ctrl_reg = mvebu_mmc_read(SDIO_HOST_CTRL);
48 ctrl_reg |= SDIO_HOST_CTRL_TMOUT(SDIO_HOST_CTRL_TMOUT_MAX);
49 mvebu_mmc_write(SDIO_HOST_CTRL, ctrl_reg);
50
51 if (data->flags & MMC_DATA_READ) {
52 mvebu_mmc_write(SDIO_SYS_ADDR_LOW, (u32)data->dest & 0xffff);
53 mvebu_mmc_write(SDIO_SYS_ADDR_HI, (u32)data->dest >> 16);
54 } else {
55 mvebu_mmc_write(SDIO_SYS_ADDR_LOW, (u32)data->src & 0xffff);
56 mvebu_mmc_write(SDIO_SYS_ADDR_HI, (u32)data->src >> 16);
57 }
58
59 mvebu_mmc_write(SDIO_BLK_COUNT, data->blocks);
60 mvebu_mmc_write(SDIO_BLK_SIZE, data->blocksize);
61
62 return 0;
63 }
64
mvebu_mmc_send_cmd(struct mmc * mmc,struct mmc_cmd * cmd,struct mmc_data * data)65 static int mvebu_mmc_send_cmd(struct mmc *mmc, struct mmc_cmd *cmd,
66 struct mmc_data *data)
67 {
68 ulong start;
69 ushort waittype = 0;
70 ushort resptype = 0;
71 ushort xfertype = 0;
72 ushort resp_indx = 0;
73
74 debug("%s: cmdidx [0x%x] resp_type[0x%x] cmdarg[0x%x]\n",
75 DRIVER_NAME, cmd->cmdidx, cmd->resp_type, cmd->cmdarg);
76
77 debug("%s: cmd %d (hw state 0x%04x)\n", DRIVER_NAME,
78 cmd->cmdidx, mvebu_mmc_read(SDIO_HW_STATE));
79
80 /*
81 * Hardware weirdness. The FIFO_EMPTY bit of the HW_STATE
82 * register is sometimes not set before a while when some
83 * "unusual" data block sizes are used (such as with the SWITCH
84 * command), even despite the fact that the XFER_DONE interrupt
85 * was raised. And if another data transfer starts before
86 * this bit comes to good sense (which eventually happens by
87 * itself) then the new transfer simply fails with a timeout.
88 */
89 if (!(mvebu_mmc_read(SDIO_HW_STATE) & CMD_FIFO_EMPTY)) {
90 ushort hw_state, count = 0;
91
92 start = get_timer(0);
93 do {
94 hw_state = mvebu_mmc_read(SDIO_HW_STATE);
95 if ((get_timer(0) - start) > TIMEOUT_DELAY) {
96 printf("%s : FIFO_EMPTY bit missing\n",
97 DRIVER_NAME);
98 break;
99 }
100 count++;
101 } while (!(hw_state & CMD_FIFO_EMPTY));
102 debug("%s *** wait for FIFO_EMPTY bit (hw=0x%04x, count=%d, jiffies=%ld)\n",
103 DRIVER_NAME, hw_state, count, (get_timer(0) - (start)));
104 }
105
106 /* Clear status */
107 mvebu_mmc_write(SDIO_NOR_INTR_STATUS, SDIO_POLL_MASK);
108 mvebu_mmc_write(SDIO_ERR_INTR_STATUS, SDIO_POLL_MASK);
109
110 resptype = SDIO_CMD_INDEX(cmd->cmdidx);
111
112 /* Analyzing resptype/xfertype/waittype for the command */
113 if (cmd->resp_type & MMC_RSP_BUSY)
114 resptype |= SDIO_CMD_RSP_48BUSY;
115 else if (cmd->resp_type & MMC_RSP_136)
116 resptype |= SDIO_CMD_RSP_136;
117 else if (cmd->resp_type & MMC_RSP_PRESENT)
118 resptype |= SDIO_CMD_RSP_48;
119 else
120 resptype |= SDIO_CMD_RSP_NONE;
121
122 if (cmd->resp_type & MMC_RSP_CRC)
123 resptype |= SDIO_CMD_CHECK_CMDCRC;
124
125 if (cmd->resp_type & MMC_RSP_OPCODE)
126 resptype |= SDIO_CMD_INDX_CHECK;
127
128 if (cmd->resp_type & MMC_RSP_PRESENT) {
129 resptype |= SDIO_UNEXPECTED_RESP;
130 waittype |= SDIO_NOR_UNEXP_RSP;
131 }
132
133 if (data) {
134 int err = mvebu_mmc_setup_data(data);
135
136 if (err) {
137 debug("%s: command DATA error :%x\n",
138 DRIVER_NAME, err);
139 return err;
140 }
141
142 resptype |= SDIO_CMD_DATA_PRESENT | SDIO_CMD_CHECK_DATACRC16;
143 xfertype |= SDIO_XFER_MODE_HW_WR_DATA_EN;
144 if (data->flags & MMC_DATA_READ) {
145 xfertype |= SDIO_XFER_MODE_TO_HOST;
146 waittype = SDIO_NOR_DMA_INI;
147 } else {
148 waittype |= SDIO_NOR_XFER_DONE;
149 }
150 } else {
151 waittype |= SDIO_NOR_CMD_DONE;
152 }
153
154 /* Setting cmd arguments */
155 mvebu_mmc_write(SDIO_ARG_LOW, cmd->cmdarg & 0xffff);
156 mvebu_mmc_write(SDIO_ARG_HI, cmd->cmdarg >> 16);
157
158 /* Setting Xfer mode */
159 mvebu_mmc_write(SDIO_XFER_MODE, xfertype);
160
161 /* Sending command */
162 mvebu_mmc_write(SDIO_CMD, resptype);
163
164 start = get_timer(0);
165
166 while (!((mvebu_mmc_read(SDIO_NOR_INTR_STATUS)) & waittype)) {
167 if (mvebu_mmc_read(SDIO_NOR_INTR_STATUS) & SDIO_NOR_ERROR) {
168 debug("%s: error! cmdidx : %d, err reg: %04x\n",
169 DRIVER_NAME, cmd->cmdidx,
170 mvebu_mmc_read(SDIO_ERR_INTR_STATUS));
171 if (mvebu_mmc_read(SDIO_ERR_INTR_STATUS) &
172 (SDIO_ERR_CMD_TIMEOUT | SDIO_ERR_DATA_TIMEOUT)) {
173 debug("%s: command READ timed out\n",
174 DRIVER_NAME);
175 return -ETIMEDOUT;
176 }
177 debug("%s: command READ error\n", DRIVER_NAME);
178 return -ECOMM;
179 }
180
181 if ((get_timer(0) - start) > TIMEOUT_DELAY) {
182 debug("%s: command timed out\n", DRIVER_NAME);
183 return -ETIMEDOUT;
184 }
185 }
186
187 /* Handling response */
188 if (cmd->resp_type & MMC_RSP_136) {
189 uint response[8];
190
191 for (resp_indx = 0; resp_indx < 8; resp_indx++)
192 response[resp_indx]
193 = mvebu_mmc_read(SDIO_RSP(resp_indx));
194
195 cmd->response[0] = ((response[0] & 0x03ff) << 22) |
196 ((response[1] & 0xffff) << 6) |
197 ((response[2] & 0xfc00) >> 10);
198 cmd->response[1] = ((response[2] & 0x03ff) << 22) |
199 ((response[3] & 0xffff) << 6) |
200 ((response[4] & 0xfc00) >> 10);
201 cmd->response[2] = ((response[4] & 0x03ff) << 22) |
202 ((response[5] & 0xffff) << 6) |
203 ((response[6] & 0xfc00) >> 10);
204 cmd->response[3] = ((response[6] & 0x03ff) << 22) |
205 ((response[7] & 0x3fff) << 8);
206 } else if (cmd->resp_type & MMC_RSP_PRESENT) {
207 uint response[3];
208
209 for (resp_indx = 0; resp_indx < 3; resp_indx++)
210 response[resp_indx]
211 = mvebu_mmc_read(SDIO_RSP(resp_indx));
212
213 cmd->response[0] = ((response[2] & 0x003f) << (8 - 8)) |
214 ((response[1] & 0xffff) << (14 - 8)) |
215 ((response[0] & 0x03ff) << (30 - 8));
216 cmd->response[1] = ((response[0] & 0xfc00) >> 10);
217 cmd->response[2] = 0;
218 cmd->response[3] = 0;
219 } else {
220 cmd->response[0] = 0;
221 cmd->response[1] = 0;
222 cmd->response[2] = 0;
223 cmd->response[3] = 0;
224 }
225
226 debug("%s: resp[0x%x] ", DRIVER_NAME, cmd->resp_type);
227 debug("[0x%x] ", cmd->response[0]);
228 debug("[0x%x] ", cmd->response[1]);
229 debug("[0x%x] ", cmd->response[2]);
230 debug("[0x%x] ", cmd->response[3]);
231 debug("\n");
232
233 if (mvebu_mmc_read(SDIO_ERR_INTR_STATUS) &
234 (SDIO_ERR_CMD_TIMEOUT | SDIO_ERR_DATA_TIMEOUT))
235 return -ETIMEDOUT;
236
237 return 0;
238 }
239
mvebu_mmc_power_up(void)240 static void mvebu_mmc_power_up(void)
241 {
242 debug("%s: power up\n", DRIVER_NAME);
243
244 /* disable interrupts */
245 mvebu_mmc_write(SDIO_NOR_INTR_EN, 0);
246 mvebu_mmc_write(SDIO_ERR_INTR_EN, 0);
247
248 /* SW reset */
249 mvebu_mmc_write(SDIO_SW_RESET, SDIO_SW_RESET_NOW);
250
251 mvebu_mmc_write(SDIO_XFER_MODE, 0);
252
253 /* enable status */
254 mvebu_mmc_write(SDIO_NOR_STATUS_EN, SDIO_POLL_MASK);
255 mvebu_mmc_write(SDIO_ERR_STATUS_EN, SDIO_POLL_MASK);
256
257 /* enable interrupts status */
258 mvebu_mmc_write(SDIO_NOR_INTR_STATUS, SDIO_POLL_MASK);
259 mvebu_mmc_write(SDIO_ERR_INTR_STATUS, SDIO_POLL_MASK);
260 }
261
mvebu_mmc_set_clk(unsigned int clock)262 static void mvebu_mmc_set_clk(unsigned int clock)
263 {
264 unsigned int m;
265
266 if (clock == 0) {
267 debug("%s: clock off\n", DRIVER_NAME);
268 mvebu_mmc_write(SDIO_XFER_MODE, SDIO_XFER_MODE_STOP_CLK);
269 mvebu_mmc_write(SDIO_CLK_DIV, MVEBU_MMC_BASE_DIV_MAX);
270 } else {
271 m = MVEBU_MMC_BASE_FAST_CLOCK/(2*clock) - 1;
272 if (m > MVEBU_MMC_BASE_DIV_MAX)
273 m = MVEBU_MMC_BASE_DIV_MAX;
274 mvebu_mmc_write(SDIO_CLK_DIV, m & MVEBU_MMC_BASE_DIV_MAX);
275 debug("%s: clock (%d) div : %d\n", DRIVER_NAME, clock, m);
276 }
277 }
278
mvebu_mmc_set_bus(unsigned int bus)279 static void mvebu_mmc_set_bus(unsigned int bus)
280 {
281 u32 ctrl_reg = 0;
282
283 ctrl_reg = mvebu_mmc_read(SDIO_HOST_CTRL);
284 ctrl_reg &= ~SDIO_HOST_CTRL_DATA_WIDTH_4_BITS;
285
286 switch (bus) {
287 case 4:
288 ctrl_reg |= SDIO_HOST_CTRL_DATA_WIDTH_4_BITS;
289 break;
290 case 1:
291 default:
292 ctrl_reg |= SDIO_HOST_CTRL_DATA_WIDTH_1_BIT;
293 }
294
295 /* default transfer mode */
296 ctrl_reg |= SDIO_HOST_CTRL_BIG_ENDIAN;
297 ctrl_reg &= ~SDIO_HOST_CTRL_LSB_FIRST;
298
299 /* default to maximum timeout */
300 ctrl_reg |= SDIO_HOST_CTRL_TMOUT(SDIO_HOST_CTRL_TMOUT_MAX);
301 ctrl_reg |= SDIO_HOST_CTRL_TMOUT_EN;
302
303 ctrl_reg |= SDIO_HOST_CTRL_PUSH_PULL_EN;
304
305 ctrl_reg |= SDIO_HOST_CTRL_CARD_TYPE_MEM_ONLY;
306
307 debug("%s: ctrl 0x%04x: %s %s %s\n", DRIVER_NAME, ctrl_reg,
308 (ctrl_reg & SDIO_HOST_CTRL_PUSH_PULL_EN) ?
309 "push-pull" : "open-drain",
310 (ctrl_reg & SDIO_HOST_CTRL_DATA_WIDTH_4_BITS) ?
311 "4bit-width" : "1bit-width",
312 (ctrl_reg & SDIO_HOST_CTRL_HI_SPEED_EN) ?
313 "high-speed" : "");
314
315 mvebu_mmc_write(SDIO_HOST_CTRL, ctrl_reg);
316 }
317
mvebu_mmc_set_ios(struct mmc * mmc)318 static int mvebu_mmc_set_ios(struct mmc *mmc)
319 {
320 debug("%s: bus[%d] clock[%d]\n", DRIVER_NAME,
321 mmc->bus_width, mmc->clock);
322 mvebu_mmc_set_bus(mmc->bus_width);
323 mvebu_mmc_set_clk(mmc->clock);
324
325 return 0;
326 }
327
328 /*
329 * Set window register.
330 */
mvebu_window_setup(void)331 static void mvebu_window_setup(void)
332 {
333 int i;
334
335 for (i = 0; i < 4; i++) {
336 mvebu_mmc_write(WINDOW_CTRL(i), 0);
337 mvebu_mmc_write(WINDOW_BASE(i), 0);
338 }
339 for (i = 0; i < CONFIG_NR_DRAM_BANKS; i++) {
340 u32 size, base, attrib;
341
342 /* Enable DRAM bank */
343 switch (i) {
344 case 0:
345 attrib = KWCPU_ATTR_DRAM_CS0;
346 break;
347 case 1:
348 attrib = KWCPU_ATTR_DRAM_CS1;
349 break;
350 case 2:
351 attrib = KWCPU_ATTR_DRAM_CS2;
352 break;
353 case 3:
354 attrib = KWCPU_ATTR_DRAM_CS3;
355 break;
356 default:
357 /* invalide bank, disable access */
358 attrib = 0;
359 break;
360 }
361
362 size = gd->bd->bi_dram[i].size;
363 base = gd->bd->bi_dram[i].start;
364 if (size && attrib) {
365 mvebu_mmc_write(WINDOW_CTRL(i),
366 MVCPU_WIN_CTRL_DATA(size,
367 MVEBU_TARGET_DRAM,
368 attrib,
369 MVCPU_WIN_ENABLE));
370 } else {
371 mvebu_mmc_write(WINDOW_CTRL(i), MVCPU_WIN_DISABLE);
372 }
373 mvebu_mmc_write(WINDOW_BASE(i), base);
374 }
375 }
376
mvebu_mmc_initialize(struct mmc * mmc)377 static int mvebu_mmc_initialize(struct mmc *mmc)
378 {
379 debug("%s: mvebu_mmc_initialize\n", DRIVER_NAME);
380
381 /*
382 * Setting host parameters
383 * Initial Host Ctrl : Timeout : max , Normal Speed mode,
384 * 4-bit data mode, Big Endian, SD memory Card, Push_pull CMD Line
385 */
386 mvebu_mmc_write(SDIO_HOST_CTRL,
387 SDIO_HOST_CTRL_TMOUT(SDIO_HOST_CTRL_TMOUT_MAX) |
388 SDIO_HOST_CTRL_DATA_WIDTH_4_BITS |
389 SDIO_HOST_CTRL_BIG_ENDIAN |
390 SDIO_HOST_CTRL_PUSH_PULL_EN |
391 SDIO_HOST_CTRL_CARD_TYPE_MEM_ONLY);
392
393 mvebu_mmc_write(SDIO_CLK_CTRL, 0);
394
395 /* enable status */
396 mvebu_mmc_write(SDIO_NOR_STATUS_EN, SDIO_POLL_MASK);
397 mvebu_mmc_write(SDIO_ERR_STATUS_EN, SDIO_POLL_MASK);
398
399 /* disable interrupts */
400 mvebu_mmc_write(SDIO_NOR_INTR_EN, 0);
401 mvebu_mmc_write(SDIO_ERR_INTR_EN, 0);
402
403 mvebu_window_setup();
404
405 /* SW reset */
406 mvebu_mmc_write(SDIO_SW_RESET, SDIO_SW_RESET_NOW);
407
408 return 0;
409 }
410
411 static const struct mmc_ops mvebu_mmc_ops = {
412 .send_cmd = mvebu_mmc_send_cmd,
413 .set_ios = mvebu_mmc_set_ios,
414 .init = mvebu_mmc_initialize,
415 };
416
417 static struct mmc_config mvebu_mmc_cfg = {
418 .name = DRIVER_NAME,
419 .ops = &mvebu_mmc_ops,
420 .f_min = MVEBU_MMC_BASE_FAST_CLOCK / MVEBU_MMC_BASE_DIV_MAX,
421 .f_max = MVEBU_MMC_CLOCKRATE_MAX,
422 .voltages = MMC_VDD_32_33 | MMC_VDD_33_34,
423 .host_caps = MMC_MODE_4BIT | MMC_MODE_HS |
424 MMC_MODE_HS_52MHz,
425 .part_type = PART_TYPE_DOS,
426 .b_max = CONFIG_SYS_MMC_MAX_BLK_COUNT,
427 };
428
mvebu_mmc_init(bd_t * bis)429 int mvebu_mmc_init(bd_t *bis)
430 {
431 struct mmc *mmc;
432
433 mvebu_mmc_power_up();
434
435 mmc = mmc_create(&mvebu_mmc_cfg, bis);
436 if (mmc == NULL)
437 return -1;
438
439 return 0;
440 }
441