dwc_mmc.c revision 1.22 1 /* $NetBSD: dwc_mmc.c,v 1.22 2020/01/23 23:53:55 jmcneill Exp $ */
2
3 /*-
4 * Copyright (c) 2014-2017 Jared McNeill <jmcneill (at) invisible.ca>
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __KERNEL_RCSID(0, "$NetBSD: dwc_mmc.c,v 1.22 2020/01/23 23:53:55 jmcneill Exp $");
31
32 #include <sys/param.h>
33 #include <sys/bus.h>
34 #include <sys/device.h>
35 #include <sys/intr.h>
36 #include <sys/systm.h>
37 #include <sys/kernel.h>
38 #include <sys/proc.h>
39
40 #include <dev/sdmmc/sdmmcvar.h>
41 #include <dev/sdmmc/sdmmcchip.h>
42 #include <dev/sdmmc/sdmmc_ioreg.h>
43
44 #include <dev/ic/dwc_mmc_reg.h>
45 #include <dev/ic/dwc_mmc_var.h>
46
47 #define DWC_MMC_NDESC 64
48
49 static int dwc_mmc_host_reset(sdmmc_chipset_handle_t);
50 static uint32_t dwc_mmc_host_ocr(sdmmc_chipset_handle_t);
51 static int dwc_mmc_host_maxblklen(sdmmc_chipset_handle_t);
52 static int dwc_mmc_card_detect(sdmmc_chipset_handle_t);
53 static int dwc_mmc_write_protect(sdmmc_chipset_handle_t);
54 static int dwc_mmc_bus_power(sdmmc_chipset_handle_t, uint32_t);
55 static int dwc_mmc_bus_clock(sdmmc_chipset_handle_t, int);
56 static int dwc_mmc_bus_width(sdmmc_chipset_handle_t, int);
57 static int dwc_mmc_bus_rod(sdmmc_chipset_handle_t, int);
58 static int dwc_mmc_signal_voltage(sdmmc_chipset_handle_t, int);
59 static void dwc_mmc_exec_command(sdmmc_chipset_handle_t,
60 struct sdmmc_command *);
61 static void dwc_mmc_card_enable_intr(sdmmc_chipset_handle_t, int);
62 static void dwc_mmc_card_intr_ack(sdmmc_chipset_handle_t);
63
64 static struct sdmmc_chip_functions dwc_mmc_chip_functions = {
65 .host_reset = dwc_mmc_host_reset,
66 .host_ocr = dwc_mmc_host_ocr,
67 .host_maxblklen = dwc_mmc_host_maxblklen,
68 .card_detect = dwc_mmc_card_detect,
69 .write_protect = dwc_mmc_write_protect,
70 .bus_power = dwc_mmc_bus_power,
71 .bus_clock = dwc_mmc_bus_clock,
72 .bus_width = dwc_mmc_bus_width,
73 .bus_rod = dwc_mmc_bus_rod,
74 .signal_voltage = dwc_mmc_signal_voltage,
75 .exec_command = dwc_mmc_exec_command,
76 .card_enable_intr = dwc_mmc_card_enable_intr,
77 .card_intr_ack = dwc_mmc_card_intr_ack,
78 };
79
80 #define MMC_WRITE(sc, reg, val) \
81 bus_space_write_4((sc)->sc_bst, (sc)->sc_bsh, (reg), (val))
82 #define MMC_READ(sc, reg) \
83 bus_space_read_4((sc)->sc_bst, (sc)->sc_bsh, (reg))
84
85 static int
86 dwc_mmc_dmabounce_setup(struct dwc_mmc_softc *sc)
87 {
88 bus_dma_segment_t ds[1];
89 int error, rseg;
90
91 sc->sc_dmabounce_buflen = dwc_mmc_host_maxblklen(sc);
92 error = bus_dmamem_alloc(sc->sc_dmat, sc->sc_dmabounce_buflen, 0,
93 sc->sc_dmabounce_buflen, ds, 1, &rseg, BUS_DMA_WAITOK);
94 if (error)
95 return error;
96 error = bus_dmamem_map(sc->sc_dmat, ds, 1, sc->sc_dmabounce_buflen,
97 &sc->sc_dmabounce_buf, BUS_DMA_WAITOK);
98 if (error)
99 goto free;
100 error = bus_dmamap_create(sc->sc_dmat, sc->sc_dmabounce_buflen, 1,
101 sc->sc_dmabounce_buflen, 0, BUS_DMA_WAITOK, &sc->sc_dmabounce_map);
102 if (error)
103 goto unmap;
104 error = bus_dmamap_load(sc->sc_dmat, sc->sc_dmabounce_map,
105 sc->sc_dmabounce_buf, sc->sc_dmabounce_buflen, NULL,
106 BUS_DMA_WAITOK);
107 if (error)
108 goto destroy;
109 return 0;
110
111 destroy:
112 bus_dmamap_destroy(sc->sc_dmat, sc->sc_dmabounce_map);
113 unmap:
114 bus_dmamem_unmap(sc->sc_dmat, sc->sc_dmabounce_buf,
115 sc->sc_dmabounce_buflen);
116 free:
117 bus_dmamem_free(sc->sc_dmat, ds, rseg);
118 return error;
119 }
120
121 static int
122 dwc_mmc_idma_setup(struct dwc_mmc_softc *sc)
123 {
124 int error;
125
126 sc->sc_idma_xferlen = 0x1000;
127
128 sc->sc_idma_ndesc = DWC_MMC_NDESC;
129 sc->sc_idma_size = sizeof(struct dwc_mmc_idma_desc) *
130 sc->sc_idma_ndesc;
131 error = bus_dmamem_alloc(sc->sc_dmat, sc->sc_idma_size, 8,
132 sc->sc_idma_size, sc->sc_idma_segs, 1,
133 &sc->sc_idma_nsegs, BUS_DMA_WAITOK);
134 if (error)
135 return error;
136 error = bus_dmamem_map(sc->sc_dmat, sc->sc_idma_segs,
137 sc->sc_idma_nsegs, sc->sc_idma_size,
138 &sc->sc_idma_desc, BUS_DMA_WAITOK);
139 if (error)
140 goto free;
141 error = bus_dmamap_create(sc->sc_dmat, sc->sc_idma_size, 1,
142 sc->sc_idma_size, 0, BUS_DMA_WAITOK, &sc->sc_idma_map);
143 if (error)
144 goto unmap;
145 error = bus_dmamap_load(sc->sc_dmat, sc->sc_idma_map,
146 sc->sc_idma_desc, sc->sc_idma_size, NULL, BUS_DMA_WAITOK);
147 if (error)
148 goto destroy;
149 return 0;
150
151 destroy:
152 bus_dmamap_destroy(sc->sc_dmat, sc->sc_idma_map);
153 unmap:
154 bus_dmamem_unmap(sc->sc_dmat, sc->sc_idma_desc, sc->sc_idma_size);
155 free:
156 bus_dmamem_free(sc->sc_dmat, sc->sc_idma_segs, sc->sc_idma_nsegs);
157 return error;
158 }
159
160 static void
161 dwc_mmc_attach_i(device_t self)
162 {
163 struct dwc_mmc_softc *sc = device_private(self);
164 struct sdmmcbus_attach_args saa;
165
166 if (sc->sc_pre_power_on)
167 sc->sc_pre_power_on(sc);
168
169 dwc_mmc_signal_voltage(sc, SDMMC_SIGNAL_VOLTAGE_330);
170 dwc_mmc_host_reset(sc);
171 dwc_mmc_bus_width(sc, 1);
172
173 if (sc->sc_post_power_on)
174 sc->sc_post_power_on(sc);
175
176 memset(&saa, 0, sizeof(saa));
177 saa.saa_busname = "sdmmc";
178 saa.saa_sct = &dwc_mmc_chip_functions;
179 saa.saa_sch = sc;
180 saa.saa_clkmin = 400;
181 saa.saa_clkmax = sc->sc_clock_freq / 1000;
182 saa.saa_dmat = sc->sc_dmat;
183 saa.saa_caps = SMC_CAPS_SD_HIGHSPEED |
184 SMC_CAPS_MMC_HIGHSPEED |
185 SMC_CAPS_AUTO_STOP |
186 SMC_CAPS_DMA |
187 SMC_CAPS_MULTI_SEG_DMA;
188 if (sc->sc_bus_width == 8)
189 saa.saa_caps |= SMC_CAPS_8BIT_MODE;
190 else
191 saa.saa_caps |= SMC_CAPS_4BIT_MODE;
192 if (sc->sc_card_detect)
193 saa.saa_caps |= SMC_CAPS_POLL_CARD_DET;
194
195 sc->sc_sdmmc_dev = config_found(self, &saa, NULL);
196 }
197
198 static void
199 dwc_mmc_led(struct dwc_mmc_softc *sc, int on)
200 {
201 if (sc->sc_set_led)
202 sc->sc_set_led(sc, on);
203 }
204
205 static int
206 dwc_mmc_host_reset(sdmmc_chipset_handle_t sch)
207 {
208 struct dwc_mmc_softc *sc = sch;
209 uint32_t fifoth, ctrl;
210 int retry = 1000;
211
212 #ifdef DWC_MMC_DEBUG
213 aprint_normal_dev(sc->sc_dev, "host reset\n");
214 #endif
215
216 if (ISSET(sc->sc_flags, DWC_MMC_F_PWREN_INV))
217 MMC_WRITE(sc, DWC_MMC_PWREN, 0);
218 else
219 MMC_WRITE(sc, DWC_MMC_PWREN, 1);
220
221 ctrl = MMC_READ(sc, DWC_MMC_GCTRL);
222 ctrl &= ~DWC_MMC_GCTRL_USE_INTERNAL_DMAC;
223 MMC_WRITE(sc, DWC_MMC_GCTRL, ctrl);
224
225 MMC_WRITE(sc, DWC_MMC_DMAC, DWC_MMC_DMAC_SOFTRESET);
226
227 MMC_WRITE(sc, DWC_MMC_GCTRL,
228 MMC_READ(sc, DWC_MMC_GCTRL) | DWC_MMC_GCTRL_RESET);
229 while (--retry > 0) {
230 if (!(MMC_READ(sc, DWC_MMC_GCTRL) & DWC_MMC_GCTRL_RESET))
231 break;
232 delay(100);
233 }
234
235 MMC_WRITE(sc, DWC_MMC_CLKSRC, 0);
236
237 MMC_WRITE(sc, DWC_MMC_TIMEOUT, 0xffffffff);
238
239 MMC_WRITE(sc, DWC_MMC_IMASK, 0);
240
241 MMC_WRITE(sc, DWC_MMC_RINT, 0xffffffff);
242
243 const uint32_t rx_wmark = (sc->sc_fifo_depth / 2) - 1;
244 const uint32_t tx_wmark = sc->sc_fifo_depth / 2;
245 fifoth = __SHIFTIN(DWC_MMC_FIFOTH_DMA_MULTIPLE_TXN_SIZE_16,
246 DWC_MMC_FIFOTH_DMA_MULTIPLE_TXN_SIZE);
247 fifoth |= __SHIFTIN(rx_wmark, DWC_MMC_FIFOTH_RX_WMARK);
248 fifoth |= __SHIFTIN(tx_wmark, DWC_MMC_FIFOTH_TX_WMARK);
249 MMC_WRITE(sc, DWC_MMC_FIFOTH, fifoth);
250
251 MMC_WRITE(sc, DWC_MMC_UHS, 0);
252
253 ctrl = MMC_READ(sc, DWC_MMC_GCTRL);
254 ctrl |= DWC_MMC_GCTRL_INTEN;
255 ctrl |= DWC_MMC_GCTRL_DMAEN;
256 ctrl |= DWC_MMC_GCTRL_SEND_AUTO_STOP_CCSD;
257 ctrl |= DWC_MMC_GCTRL_USE_INTERNAL_DMAC;
258 MMC_WRITE(sc, DWC_MMC_GCTRL, ctrl);
259
260 return 0;
261 }
262
263 static uint32_t
264 dwc_mmc_host_ocr(sdmmc_chipset_handle_t sch)
265 {
266 return MMC_OCR_3_2V_3_3V | MMC_OCR_3_3V_3_4V | MMC_OCR_HCS;
267 }
268
269 static int
270 dwc_mmc_host_maxblklen(sdmmc_chipset_handle_t sch)
271 {
272 return 32768;
273 }
274
275 static int
276 dwc_mmc_card_detect(sdmmc_chipset_handle_t sch)
277 {
278 struct dwc_mmc_softc *sc = sch;
279
280 if (!sc->sc_card_detect)
281 return 1; /* no card detect pin, assume present */
282
283 return sc->sc_card_detect(sc);
284 }
285
286 static int
287 dwc_mmc_write_protect(sdmmc_chipset_handle_t sch)
288 {
289 struct dwc_mmc_softc *sc = sch;
290
291 if (!sc->sc_write_protect)
292 return 0; /* no write protect pin, assume rw */
293
294 return sc->sc_write_protect(sc);
295 }
296
297 static int
298 dwc_mmc_bus_power(sdmmc_chipset_handle_t sch, uint32_t ocr)
299 {
300 struct dwc_mmc_softc *sc = sch;
301
302 if (ocr == 0)
303 sc->sc_card_inited = false;
304
305 return 0;
306 }
307
308 static int
309 dwc_mmc_signal_voltage(sdmmc_chipset_handle_t sch, int signal_voltage)
310 {
311 struct dwc_mmc_softc *sc = sch;
312
313 if (sc->sc_signal_voltage == NULL)
314 return 0;
315
316 return sc->sc_signal_voltage(sc, signal_voltage);
317 }
318
319 static int
320 dwc_mmc_update_clock(struct dwc_mmc_softc *sc)
321 {
322 uint32_t cmd;
323 int retry;
324
325 #ifdef DWC_MMC_DEBUG
326 aprint_normal_dev(sc->sc_dev, "update clock\n");
327 #endif
328
329 cmd = DWC_MMC_CMD_START |
330 DWC_MMC_CMD_UPCLK_ONLY |
331 DWC_MMC_CMD_WAIT_PRE_OVER;
332 if (ISSET(sc->sc_flags, DWC_MMC_F_USE_HOLD_REG))
333 cmd |= DWC_MMC_CMD_USE_HOLD_REG;
334 MMC_WRITE(sc, DWC_MMC_ARG, 0);
335 MMC_WRITE(sc, DWC_MMC_CMD, cmd);
336 retry = 200000;
337 while (--retry > 0) {
338 if (!(MMC_READ(sc, DWC_MMC_CMD) & DWC_MMC_CMD_START))
339 break;
340 delay(10);
341 }
342
343 if (retry == 0) {
344 aprint_error_dev(sc->sc_dev, "timeout updating clock\n");
345 #ifdef DWC_MMC_DEBUG
346 device_printf(sc->sc_dev, "GCTRL: 0x%08x\n",
347 MMC_READ(sc, DWC_MMC_GCTRL));
348 device_printf(sc->sc_dev, "CLKENA: 0x%08x\n",
349 MMC_READ(sc, DWC_MMC_CLKENA));
350 device_printf(sc->sc_dev, "CLKDIV: 0x%08x\n",
351 MMC_READ(sc, DWC_MMC_CLKDIV));
352 device_printf(sc->sc_dev, "TIMEOUT: 0x%08x\n",
353 MMC_READ(sc, DWC_MMC_TIMEOUT));
354 device_printf(sc->sc_dev, "WIDTH: 0x%08x\n",
355 MMC_READ(sc, DWC_MMC_WIDTH));
356 device_printf(sc->sc_dev, "CMD: 0x%08x\n",
357 MMC_READ(sc, DWC_MMC_CMD));
358 device_printf(sc->sc_dev, "MINT: 0x%08x\n",
359 MMC_READ(sc, DWC_MMC_MINT));
360 device_printf(sc->sc_dev, "RINT: 0x%08x\n",
361 MMC_READ(sc, DWC_MMC_RINT));
362 device_printf(sc->sc_dev, "STATUS: 0x%08x\n",
363 MMC_READ(sc, DWC_MMC_STATUS));
364 #endif
365 return ETIMEDOUT;
366 }
367
368 return 0;
369 }
370
371 static int
372 dwc_mmc_set_clock(struct dwc_mmc_softc *sc, u_int freq)
373 {
374 const u_int pll_freq = sc->sc_clock_freq / 1000;
375 u_int clk_div, ciu_div;
376
377 ciu_div = sc->sc_ciu_div > 0 ? sc->sc_ciu_div : 1;
378
379 if (freq != pll_freq)
380 clk_div = howmany(pll_freq, freq * ciu_div);
381 else
382 clk_div = 0;
383
384 MMC_WRITE(sc, DWC_MMC_CLKDIV, clk_div);
385
386 return dwc_mmc_update_clock(sc);
387 }
388
389 static int
390 dwc_mmc_bus_clock(sdmmc_chipset_handle_t sch, int freq)
391 {
392 struct dwc_mmc_softc *sc = sch;
393 uint32_t clkena;
394
395 MMC_WRITE(sc, DWC_MMC_CLKSRC, 0);
396 MMC_WRITE(sc, DWC_MMC_CLKENA, 0);
397 if (dwc_mmc_update_clock(sc) != 0)
398 return 1;
399
400 if (freq) {
401 if (sc->sc_bus_clock && sc->sc_bus_clock(sc, freq) != 0)
402 return 1;
403
404 if (dwc_mmc_set_clock(sc, freq) != 0)
405 return 1;
406
407 clkena = DWC_MMC_CLKENA_CARDCLKON;
408 MMC_WRITE(sc, DWC_MMC_CLKENA, clkena);
409 if (dwc_mmc_update_clock(sc) != 0)
410 return 1;
411 }
412
413 delay(1000);
414
415 return 0;
416 }
417
418 static int
419 dwc_mmc_bus_width(sdmmc_chipset_handle_t sch, int width)
420 {
421 struct dwc_mmc_softc *sc = sch;
422
423 #ifdef DWC_MMC_DEBUG
424 aprint_normal_dev(sc->sc_dev, "width = %d\n", width);
425 #endif
426
427 switch (width) {
428 case 1:
429 MMC_WRITE(sc, DWC_MMC_WIDTH, DWC_MMC_WIDTH_1);
430 break;
431 case 4:
432 MMC_WRITE(sc, DWC_MMC_WIDTH, DWC_MMC_WIDTH_4);
433 break;
434 case 8:
435 MMC_WRITE(sc, DWC_MMC_WIDTH, DWC_MMC_WIDTH_8);
436 break;
437 default:
438 return 1;
439 }
440
441 sc->sc_mmc_width = width;
442
443 return 0;
444 }
445
446 static int
447 dwc_mmc_bus_rod(sdmmc_chipset_handle_t sch, int on)
448 {
449 return -1;
450 }
451
452 static int
453 dwc_mmc_dma_prepare(struct dwc_mmc_softc *sc, struct sdmmc_command *cmd)
454 {
455 struct dwc_mmc_idma_desc *dma = sc->sc_idma_desc;
456 bus_addr_t desc_paddr = sc->sc_idma_map->dm_segs[0].ds_addr;
457 bus_dmamap_t map;
458 bus_size_t off;
459 int desc, resid, seg;
460 uint32_t val;
461
462 /*
463 * If the command includs a dma map use it, otherwise we need to
464 * bounce. This can happen for SDIO IO_RW_EXTENDED (CMD53) commands.
465 */
466 if (cmd->c_dmamap) {
467 map = cmd->c_dmamap;
468 } else {
469 if (cmd->c_datalen > sc->sc_dmabounce_buflen)
470 return E2BIG;
471 map = sc->sc_dmabounce_map;
472
473 if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
474 memset(sc->sc_dmabounce_buf, 0, cmd->c_datalen);
475 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmabounce_map,
476 0, cmd->c_datalen, BUS_DMASYNC_PREREAD);
477 } else {
478 memcpy(sc->sc_dmabounce_buf, cmd->c_data,
479 cmd->c_datalen);
480 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmabounce_map,
481 0, cmd->c_datalen, BUS_DMASYNC_PREWRITE);
482 }
483 }
484
485 desc = 0;
486 for (seg = 0; seg < map->dm_nsegs; seg++) {
487 bus_addr_t paddr = map->dm_segs[seg].ds_addr;
488 bus_size_t len = map->dm_segs[seg].ds_len;
489 resid = uimin(len, cmd->c_resid);
490 off = 0;
491 while (resid > 0) {
492 if (desc == sc->sc_idma_ndesc)
493 break;
494 len = uimin(sc->sc_idma_xferlen, resid);
495 dma[desc].dma_buf_size = htole32(len);
496 dma[desc].dma_buf_addr = htole32(paddr + off);
497 dma[desc].dma_config = htole32(
498 DWC_MMC_IDMA_CONFIG_CH |
499 DWC_MMC_IDMA_CONFIG_OWN);
500 cmd->c_resid -= len;
501 resid -= len;
502 off += len;
503 if (desc == 0) {
504 dma[desc].dma_config |= htole32(
505 DWC_MMC_IDMA_CONFIG_FD);
506 }
507 if (cmd->c_resid == 0) {
508 dma[desc].dma_config |= htole32(
509 DWC_MMC_IDMA_CONFIG_LD);
510 dma[desc].dma_config |= htole32(
511 DWC_MMC_IDMA_CONFIG_ER);
512 dma[desc].dma_next = 0;
513 } else {
514 dma[desc].dma_config |=
515 htole32(DWC_MMC_IDMA_CONFIG_DIC);
516 dma[desc].dma_next = htole32(
517 desc_paddr + ((desc+1) *
518 sizeof(struct dwc_mmc_idma_desc)));
519 }
520 ++desc;
521 }
522 }
523 if (desc == sc->sc_idma_ndesc) {
524 aprint_error_dev(sc->sc_dev,
525 "not enough descriptors for %d byte transfer!\n",
526 cmd->c_datalen);
527 return EIO;
528 }
529
530 bus_dmamap_sync(sc->sc_dmat, sc->sc_idma_map, 0,
531 sc->sc_idma_size, BUS_DMASYNC_PREWRITE);
532
533 MMC_WRITE(sc, DWC_MMC_DLBA, desc_paddr);
534
535 val = MMC_READ(sc, DWC_MMC_GCTRL);
536 val |= DWC_MMC_GCTRL_DMAEN;
537 MMC_WRITE(sc, DWC_MMC_GCTRL, val);
538 val |= DWC_MMC_GCTRL_DMARESET;
539 MMC_WRITE(sc, DWC_MMC_GCTRL, val);
540
541 if (cmd->c_flags & SCF_CMD_READ)
542 val = DWC_MMC_IDST_RECEIVE_INT;
543 else
544 val = 0;
545 MMC_WRITE(sc, DWC_MMC_IDIE, val);
546 MMC_WRITE(sc, DWC_MMC_DMAC,
547 DWC_MMC_DMAC_IDMA_ON|DWC_MMC_DMAC_FIX_BURST);
548
549 return 0;
550 }
551
552 static void
553 dwc_mmc_dma_complete(struct dwc_mmc_softc *sc, struct sdmmc_command *cmd)
554 {
555 MMC_WRITE(sc, DWC_MMC_DMAC, 0);
556 MMC_WRITE(sc, DWC_MMC_IDIE, 0);
557
558 bus_dmamap_sync(sc->sc_dmat, sc->sc_idma_map, 0,
559 sc->sc_idma_size, BUS_DMASYNC_POSTWRITE);
560
561 if (cmd->c_dmamap == NULL) {
562 if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
563 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmabounce_map,
564 0, cmd->c_datalen, BUS_DMASYNC_POSTREAD);
565 memcpy(cmd->c_data, sc->sc_dmabounce_buf,
566 cmd->c_datalen);
567 } else {
568 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmabounce_map,
569 0, cmd->c_datalen, BUS_DMASYNC_POSTWRITE);
570 }
571 }
572 }
573
574 static void
575 dwc_mmc_exec_command(sdmmc_chipset_handle_t sch, struct sdmmc_command *cmd)
576 {
577 struct dwc_mmc_softc *sc = sch;
578 uint32_t cmdval = DWC_MMC_CMD_START;
579 int retry, error;
580 uint32_t imask;
581 u_int reg;
582
583 #ifdef DWC_MMC_DEBUG
584 aprint_normal_dev(sc->sc_dev,
585 "opcode %d flags 0x%x data %p datalen %d blklen %d\n",
586 cmd->c_opcode, cmd->c_flags, cmd->c_data, cmd->c_datalen,
587 cmd->c_blklen);
588 #endif
589
590 mutex_enter(&sc->sc_lock);
591 if (sc->sc_curcmd != NULL) {
592 device_printf(sc->sc_dev,
593 "WARNING: driver submitted a command while the controller was busy\n");
594 cmd->c_error = EBUSY;
595 SET(cmd->c_flags, SCF_ITSDONE);
596 mutex_exit(&sc->sc_lock);
597 return;
598 }
599 sc->sc_curcmd = cmd;
600
601 MMC_WRITE(sc, DWC_MMC_IDST, 0xffffffff);
602
603 if (!sc->sc_card_inited) {
604 cmdval |= DWC_MMC_CMD_SEND_INIT_SEQ;
605 sc->sc_card_inited = true;
606 }
607
608 if (ISSET(sc->sc_flags, DWC_MMC_F_USE_HOLD_REG))
609 cmdval |= DWC_MMC_CMD_USE_HOLD_REG;
610
611 switch (cmd->c_opcode) {
612 case SD_IO_RW_DIRECT:
613 reg = (cmd->c_arg >> SD_ARG_CMD52_REG_SHIFT) &
614 SD_ARG_CMD52_REG_MASK;
615 if (reg != 0x6) /* func abort / card reset */
616 break;
617 /* FALLTHROUGH */
618 case MMC_GO_IDLE_STATE:
619 case MMC_STOP_TRANSMISSION:
620 case MMC_INACTIVE_STATE:
621 cmdval |= DWC_MMC_CMD_STOP_ABORT_CMD;
622 break;
623 }
624
625 if (cmd->c_flags & SCF_RSP_PRESENT)
626 cmdval |= DWC_MMC_CMD_RSP_EXP;
627 if (cmd->c_flags & SCF_RSP_136)
628 cmdval |= DWC_MMC_CMD_LONG_RSP;
629 if (cmd->c_flags & SCF_RSP_CRC)
630 cmdval |= DWC_MMC_CMD_CHECK_RSP_CRC;
631
632 imask = DWC_MMC_INT_ERROR | DWC_MMC_INT_CMD_DONE;
633
634 if (cmd->c_datalen > 0) {
635 unsigned int nblks;
636
637 MMC_WRITE(sc, DWC_MMC_GCTRL,
638 MMC_READ(sc, DWC_MMC_GCTRL) | DWC_MMC_GCTRL_FIFORESET);
639 for (retry = 0; retry < 100000; retry++) {
640 if (!(MMC_READ(sc, DWC_MMC_DMAC) & DWC_MMC_DMAC_SOFTRESET))
641 break;
642 delay(1);
643 }
644
645 cmdval |= DWC_MMC_CMD_DATA_EXP | DWC_MMC_CMD_WAIT_PRE_OVER;
646 if (!ISSET(cmd->c_flags, SCF_CMD_READ)) {
647 cmdval |= DWC_MMC_CMD_WRITE;
648 }
649
650 nblks = cmd->c_datalen / cmd->c_blklen;
651 if (nblks == 0 || (cmd->c_datalen % cmd->c_blklen) != 0)
652 ++nblks;
653
654 if (nblks > 1 && cmd->c_opcode != SD_IO_RW_EXTENDED) {
655 cmdval |= DWC_MMC_CMD_SEND_AUTO_STOP;
656 imask |= DWC_MMC_INT_AUTO_CMD_DONE;
657 } else {
658 imask |= DWC_MMC_INT_DATA_OVER;
659 }
660
661 MMC_WRITE(sc, DWC_MMC_TIMEOUT, 0xffffffff);
662 MMC_WRITE(sc, DWC_MMC_BLKSZ, cmd->c_blklen);
663 MMC_WRITE(sc, DWC_MMC_BYTECNT,
664 nblks > 1 ? nblks * cmd->c_blklen : cmd->c_datalen);
665 if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
666 MMC_WRITE(sc, DWC_MMC_CARDTHRCTL,
667 __SHIFTIN(cmd->c_blklen, DWC_MMC_CARDTHRCTL_RDTHR) |
668 DWC_MMC_CARDTHRCTL_RDTHREN);
669 }
670 }
671
672 MMC_WRITE(sc, DWC_MMC_IMASK, imask | sc->sc_intr_card);
673 MMC_WRITE(sc, DWC_MMC_RINT, 0x7fff);
674
675 MMC_WRITE(sc, DWC_MMC_ARG, cmd->c_arg);
676
677 #ifdef DWC_MMC_DEBUG
678 aprint_normal_dev(sc->sc_dev, "cmdval = %08x\n", cmdval);
679 #endif
680
681 cmd->c_resid = cmd->c_datalen;
682 if (cmd->c_datalen > 0) {
683 dwc_mmc_led(sc, 0);
684 cmd->c_error = dwc_mmc_dma_prepare(sc, cmd);
685 if (cmd->c_error != 0) {
686 SET(cmd->c_flags, SCF_ITSDONE);
687 goto done;
688 }
689 sc->sc_wait_dma = ISSET(cmd->c_flags, SCF_CMD_READ);
690 sc->sc_wait_data = true;
691 } else {
692 sc->sc_wait_dma = false;
693 sc->sc_wait_data = false;
694 }
695 sc->sc_wait_cmd = true;
696
697 if ((cmdval & DWC_MMC_CMD_WAIT_PRE_OVER) != 0) {
698 for (retry = 0; retry < 10000; retry++) {
699 if (!(MMC_READ(sc, DWC_MMC_STATUS) & DWC_MMC_STATUS_CARD_DATA_BUSY))
700 break;
701 delay(1);
702 }
703 }
704
705 mutex_enter(&sc->sc_intr_lock);
706
707 MMC_WRITE(sc, DWC_MMC_CMD, cmdval | cmd->c_opcode);
708
709 if (sc->sc_wait_dma)
710 MMC_WRITE(sc, DWC_MMC_PLDMND, 1);
711
712 struct bintime timeout = { .sec = 15, .frac = 0 };
713 const struct bintime epsilon = { .sec = 1, .frac = 0 };
714 while (!ISSET(cmd->c_flags, SCF_ITSDONE)) {
715 error = cv_timedwaitbt(&sc->sc_intr_cv,
716 &sc->sc_intr_lock, &timeout, &epsilon);
717 if (error != 0) {
718 cmd->c_error = error;
719 SET(cmd->c_flags, SCF_ITSDONE);
720 goto done;
721 }
722 }
723
724 mutex_exit(&sc->sc_intr_lock);
725
726 if (cmd->c_error == 0 && cmd->c_datalen > 0)
727 dwc_mmc_dma_complete(sc, cmd);
728
729 if (cmd->c_datalen > 0)
730 dwc_mmc_led(sc, 1);
731
732 if (cmd->c_flags & SCF_RSP_PRESENT) {
733 if (cmd->c_flags & SCF_RSP_136) {
734 cmd->c_resp[0] = MMC_READ(sc, DWC_MMC_RESP0);
735 cmd->c_resp[1] = MMC_READ(sc, DWC_MMC_RESP1);
736 cmd->c_resp[2] = MMC_READ(sc, DWC_MMC_RESP2);
737 cmd->c_resp[3] = MMC_READ(sc, DWC_MMC_RESP3);
738 if (cmd->c_flags & SCF_RSP_CRC) {
739 cmd->c_resp[0] = (cmd->c_resp[0] >> 8) |
740 (cmd->c_resp[1] << 24);
741 cmd->c_resp[1] = (cmd->c_resp[1] >> 8) |
742 (cmd->c_resp[2] << 24);
743 cmd->c_resp[2] = (cmd->c_resp[2] >> 8) |
744 (cmd->c_resp[3] << 24);
745 cmd->c_resp[3] = (cmd->c_resp[3] >> 8);
746 }
747 } else {
748 cmd->c_resp[0] = MMC_READ(sc, DWC_MMC_RESP0);
749 }
750 }
751
752 done:
753 KASSERT(ISSET(cmd->c_flags, SCF_ITSDONE));
754 MMC_WRITE(sc, DWC_MMC_IMASK, sc->sc_intr_card);
755 MMC_WRITE(sc, DWC_MMC_IDIE, 0);
756 MMC_WRITE(sc, DWC_MMC_RINT, 0x7fff);
757 MMC_WRITE(sc, DWC_MMC_IDST, 0xffffffff);
758
759 if (cmd->c_error) {
760 #ifdef DWC_MMC_DEBUG
761 aprint_error_dev(sc->sc_dev, "i/o error %d\n", cmd->c_error);
762 #endif
763 MMC_WRITE(sc, DWC_MMC_DMAC, DWC_MMC_DMAC_SOFTRESET);
764 for (retry = 0; retry < 100; retry++) {
765 if (!(MMC_READ(sc, DWC_MMC_DMAC) & DWC_MMC_DMAC_SOFTRESET))
766 break;
767 kpause("dwcmmcrst", false, uimax(mstohz(1), 1), &sc->sc_lock);
768 }
769 }
770
771 sc->sc_curcmd = NULL;
772 mutex_exit(&sc->sc_lock);
773 }
774
775 static void
776 dwc_mmc_card_enable_intr(sdmmc_chipset_handle_t sch, int enable)
777 {
778 struct dwc_mmc_softc *sc = sch;
779 uint32_t imask;
780
781 mutex_enter(&sc->sc_intr_lock);
782 imask = MMC_READ(sc, DWC_MMC_IMASK);
783 if (enable)
784 imask |= sc->sc_intr_cardmask;
785 else
786 imask &= ~sc->sc_intr_cardmask;
787 sc->sc_intr_card = imask & sc->sc_intr_cardmask;
788 MMC_WRITE(sc, DWC_MMC_IMASK, imask);
789 mutex_exit(&sc->sc_intr_lock);
790 }
791
792 static void
793 dwc_mmc_card_intr_ack(sdmmc_chipset_handle_t sch)
794 {
795 struct dwc_mmc_softc *sc = sch;
796 uint32_t imask;
797
798 mutex_enter(&sc->sc_intr_lock);
799 imask = MMC_READ(sc, DWC_MMC_IMASK);
800 MMC_WRITE(sc, DWC_MMC_IMASK, imask | sc->sc_intr_card);
801 mutex_exit(&sc->sc_intr_lock);
802 }
803
804 int
805 dwc_mmc_init(struct dwc_mmc_softc *sc)
806 {
807 uint32_t val;
808
809 if (sc->sc_fifo_reg == 0) {
810 val = MMC_READ(sc, DWC_MMC_VERID);
811 const u_int id = __SHIFTOUT(val, DWC_MMC_VERID_ID);
812
813 if (id < DWC_MMC_VERID_240A)
814 sc->sc_fifo_reg = 0x100;
815 else
816 sc->sc_fifo_reg = 0x200;
817 }
818
819 if (sc->sc_fifo_depth == 0) {
820 val = MMC_READ(sc, DWC_MMC_FIFOTH);
821 sc->sc_fifo_depth = __SHIFTOUT(val, DWC_MMC_FIFOTH_RX_WMARK) + 1;
822 }
823
824 if (sc->sc_intr_cardmask == 0)
825 sc->sc_intr_cardmask = DWC_MMC_INT_SDIO_INT(0);
826
827 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE);
828 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_BIO);
829 cv_init(&sc->sc_intr_cv, "dwcmmcirq");
830
831 if (dwc_mmc_dmabounce_setup(sc) != 0 ||
832 dwc_mmc_idma_setup(sc) != 0) {
833 aprint_error_dev(sc->sc_dev, "failed to setup DMA\n");
834 return ENOMEM;
835 }
836
837 config_interrupts(sc->sc_dev, dwc_mmc_attach_i);
838
839 return 0;
840 }
841
842 int
843 dwc_mmc_intr(void *priv)
844 {
845 struct dwc_mmc_softc *sc = priv;
846 struct sdmmc_command *cmd;
847 uint32_t idst, mint, imask;
848
849 mutex_enter(&sc->sc_intr_lock);
850 idst = MMC_READ(sc, DWC_MMC_IDST);
851 mint = MMC_READ(sc, DWC_MMC_MINT);
852 if (!idst && !mint) {
853 mutex_exit(&sc->sc_intr_lock);
854 return 0;
855 }
856 MMC_WRITE(sc, DWC_MMC_IDST, idst);
857 MMC_WRITE(sc, DWC_MMC_RINT, mint);
858
859 cmd = sc->sc_curcmd;
860
861 #ifdef DWC_MMC_DEBUG
862 device_printf(sc->sc_dev, "mmc intr idst=%08X mint=%08X\n",
863 idst, mint);
864 #endif
865
866 /* Handle SDIO card interrupt */
867 if ((mint & sc->sc_intr_cardmask) != 0) {
868 imask = MMC_READ(sc, DWC_MMC_IMASK);
869 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~sc->sc_intr_cardmask);
870 sdmmc_card_intr(sc->sc_sdmmc_dev);
871 }
872
873 /* Error interrupts take priority over command and transfer interrupts */
874 if (cmd != NULL && (mint & DWC_MMC_INT_ERROR) != 0) {
875 imask = MMC_READ(sc, DWC_MMC_IMASK);
876 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~DWC_MMC_INT_ERROR);
877 if ((mint & DWC_MMC_INT_RESP_TIMEOUT) != 0) {
878 cmd->c_error = ETIMEDOUT;
879 /* Wait for command to complete */
880 sc->sc_wait_data = sc->sc_wait_dma = false;
881 if (cmd->c_opcode != SD_IO_SEND_OP_COND &&
882 cmd->c_opcode != SD_IO_RW_DIRECT &&
883 !ISSET(cmd->c_flags, SCF_TOUT_OK))
884 device_printf(sc->sc_dev, "host controller timeout, mint=0x%08x\n", mint);
885 } else {
886 device_printf(sc->sc_dev, "host controller error, mint=0x%08x\n", mint);
887 cmd->c_error = EIO;
888 SET(cmd->c_flags, SCF_ITSDONE);
889 goto done;
890 }
891 }
892
893 if (cmd != NULL && (idst & DWC_MMC_IDST_RECEIVE_INT) != 0) {
894 MMC_WRITE(sc, DWC_MMC_IDIE, 0);
895 if (sc->sc_wait_dma == false)
896 device_printf(sc->sc_dev, "unexpected DMA receive interrupt\n");
897 sc->sc_wait_dma = false;
898 }
899
900 if (cmd != NULL && (mint & DWC_MMC_INT_CMD_DONE) != 0) {
901 imask = MMC_READ(sc, DWC_MMC_IMASK);
902 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~DWC_MMC_INT_CMD_DONE);
903 if (sc->sc_wait_cmd == false)
904 device_printf(sc->sc_dev, "unexpected command complete interrupt\n");
905 sc->sc_wait_cmd = false;
906 }
907
908 const uint32_t dmadone_mask = DWC_MMC_INT_AUTO_CMD_DONE|DWC_MMC_INT_DATA_OVER;
909 if (cmd != NULL && (mint & dmadone_mask) != 0) {
910 imask = MMC_READ(sc, DWC_MMC_IMASK);
911 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~dmadone_mask);
912 if (sc->sc_wait_data == false)
913 device_printf(sc->sc_dev, "unexpected data complete interrupt\n");
914 sc->sc_wait_data = false;
915 }
916
917 if (cmd != NULL &&
918 sc->sc_wait_dma == false &&
919 sc->sc_wait_cmd == false &&
920 sc->sc_wait_data == false) {
921 SET(cmd->c_flags, SCF_ITSDONE);
922 }
923
924 done:
925 if (cmd != NULL && ISSET(cmd->c_flags, SCF_ITSDONE)) {
926 cv_broadcast(&sc->sc_intr_cv);
927 }
928
929 mutex_exit(&sc->sc_intr_lock);
930
931 return 1;
932 }
933