1 /* $NetBSD: dwc_mmc.c,v 1.26 2020/03/20 17:20:30 skrll Exp $ */ 2 3 /*- 4 * Copyright (c) 2014-2017 Jared McNeill <jmcneill@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.26 2020/03/20 17:20:30 skrll 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 666 #if 0 667 /* 668 * The following doesn't work on the 250a verid IP in Odroid-XU4. 669 * 670 * thrctl should only be used for UHS/HS200 and faster timings on 671 * >=240a 672 */ 673 674 if (ISSET(cmd->c_flags, SCF_CMD_READ)) { 675 MMC_WRITE(sc, DWC_MMC_CARDTHRCTL, 676 __SHIFTIN(cmd->c_blklen, DWC_MMC_CARDTHRCTL_RDTHR) | 677 DWC_MMC_CARDTHRCTL_RDTHREN); 678 } 679 #endif 680 } 681 682 MMC_WRITE(sc, DWC_MMC_IMASK, imask | sc->sc_intr_card); 683 MMC_WRITE(sc, DWC_MMC_RINT, 0x7fff); 684 685 MMC_WRITE(sc, DWC_MMC_ARG, cmd->c_arg); 686 687 #ifdef DWC_MMC_DEBUG 688 aprint_normal_dev(sc->sc_dev, "cmdval = %08x\n", cmdval); 689 #endif 690 691 cmd->c_resid = cmd->c_datalen; 692 if (cmd->c_datalen > 0) { 693 dwc_mmc_led(sc, 0); 694 cmd->c_error = dwc_mmc_dma_prepare(sc, cmd); 695 if (cmd->c_error != 0) { 696 SET(cmd->c_flags, SCF_ITSDONE); 697 goto done; 698 } 699 sc->sc_wait_dma = ISSET(cmd->c_flags, SCF_CMD_READ); 700 sc->sc_wait_data = true; 701 } else { 702 sc->sc_wait_dma = false; 703 sc->sc_wait_data = false; 704 } 705 sc->sc_wait_cmd = true; 706 707 if ((cmdval & DWC_MMC_CMD_WAIT_PRE_OVER) != 0) { 708 for (retry = 0; retry < 10000; retry++) { 709 if (!(MMC_READ(sc, DWC_MMC_STATUS) & DWC_MMC_STATUS_CARD_DATA_BUSY)) 710 break; 711 delay(1); 712 } 713 } 714 715 mutex_enter(&sc->sc_intr_lock); 716 717 MMC_WRITE(sc, DWC_MMC_CMD, cmdval | cmd->c_opcode); 718 719 if (sc->sc_wait_dma) 720 MMC_WRITE(sc, DWC_MMC_PLDMND, 1); 721 722 struct bintime timeout = { .sec = 15, .frac = 0 }; 723 const struct bintime epsilon = { .sec = 1, .frac = 0 }; 724 while (!ISSET(cmd->c_flags, SCF_ITSDONE)) { 725 error = cv_timedwaitbt(&sc->sc_intr_cv, 726 &sc->sc_intr_lock, &timeout, &epsilon); 727 if (error != 0) { 728 cmd->c_error = error; 729 SET(cmd->c_flags, SCF_ITSDONE); 730 mutex_exit(&sc->sc_intr_lock); 731 goto done; 732 } 733 } 734 735 mutex_exit(&sc->sc_intr_lock); 736 737 if (cmd->c_error == 0 && cmd->c_datalen > 0) 738 dwc_mmc_dma_complete(sc, cmd); 739 740 if (cmd->c_datalen > 0) 741 dwc_mmc_led(sc, 1); 742 743 if (cmd->c_flags & SCF_RSP_PRESENT) { 744 if (cmd->c_flags & SCF_RSP_136) { 745 cmd->c_resp[0] = MMC_READ(sc, DWC_MMC_RESP0); 746 cmd->c_resp[1] = MMC_READ(sc, DWC_MMC_RESP1); 747 cmd->c_resp[2] = MMC_READ(sc, DWC_MMC_RESP2); 748 cmd->c_resp[3] = MMC_READ(sc, DWC_MMC_RESP3); 749 if (cmd->c_flags & SCF_RSP_CRC) { 750 cmd->c_resp[0] = (cmd->c_resp[0] >> 8) | 751 (cmd->c_resp[1] << 24); 752 cmd->c_resp[1] = (cmd->c_resp[1] >> 8) | 753 (cmd->c_resp[2] << 24); 754 cmd->c_resp[2] = (cmd->c_resp[2] >> 8) | 755 (cmd->c_resp[3] << 24); 756 cmd->c_resp[3] = (cmd->c_resp[3] >> 8); 757 } 758 } else { 759 cmd->c_resp[0] = MMC_READ(sc, DWC_MMC_RESP0); 760 } 761 } 762 763 done: 764 KASSERT(ISSET(cmd->c_flags, SCF_ITSDONE)); 765 MMC_WRITE(sc, DWC_MMC_IMASK, sc->sc_intr_card); 766 MMC_WRITE(sc, DWC_MMC_IDIE, 0); 767 MMC_WRITE(sc, DWC_MMC_RINT, 0x7fff); 768 MMC_WRITE(sc, DWC_MMC_IDST, 0xffffffff); 769 770 if (cmd->c_error) { 771 #ifdef DWC_MMC_DEBUG 772 aprint_error_dev(sc->sc_dev, "i/o error %d\n", cmd->c_error); 773 #endif 774 MMC_WRITE(sc, DWC_MMC_DMAC, DWC_MMC_DMAC_SOFTRESET); 775 for (retry = 0; retry < 100; retry++) { 776 if (!(MMC_READ(sc, DWC_MMC_DMAC) & DWC_MMC_DMAC_SOFTRESET)) 777 break; 778 kpause("dwcmmcrst", false, uimax(mstohz(1), 1), &sc->sc_lock); 779 } 780 } 781 782 sc->sc_curcmd = NULL; 783 mutex_exit(&sc->sc_lock); 784 } 785 786 static void 787 dwc_mmc_card_enable_intr(sdmmc_chipset_handle_t sch, int enable) 788 { 789 struct dwc_mmc_softc *sc = sch; 790 uint32_t imask; 791 792 mutex_enter(&sc->sc_intr_lock); 793 imask = MMC_READ(sc, DWC_MMC_IMASK); 794 if (enable) 795 imask |= sc->sc_intr_cardmask; 796 else 797 imask &= ~sc->sc_intr_cardmask; 798 sc->sc_intr_card = imask & sc->sc_intr_cardmask; 799 MMC_WRITE(sc, DWC_MMC_IMASK, imask); 800 mutex_exit(&sc->sc_intr_lock); 801 } 802 803 static void 804 dwc_mmc_card_intr_ack(sdmmc_chipset_handle_t sch) 805 { 806 struct dwc_mmc_softc *sc = sch; 807 uint32_t imask; 808 809 mutex_enter(&sc->sc_intr_lock); 810 imask = MMC_READ(sc, DWC_MMC_IMASK); 811 MMC_WRITE(sc, DWC_MMC_IMASK, imask | sc->sc_intr_card); 812 mutex_exit(&sc->sc_intr_lock); 813 } 814 815 int 816 dwc_mmc_init(struct dwc_mmc_softc *sc) 817 { 818 uint32_t val; 819 820 val = MMC_READ(sc, DWC_MMC_VERID); 821 sc->sc_verid = __SHIFTOUT(val, DWC_MMC_VERID_ID); 822 823 if (sc->sc_fifo_reg == 0) { 824 if (sc->sc_verid < DWC_MMC_VERID_240A) 825 sc->sc_fifo_reg = 0x100; 826 else 827 sc->sc_fifo_reg = 0x200; 828 } 829 830 if (sc->sc_fifo_depth == 0) { 831 val = MMC_READ(sc, DWC_MMC_FIFOTH); 832 sc->sc_fifo_depth = __SHIFTOUT(val, DWC_MMC_FIFOTH_RX_WMARK) + 1; 833 } 834 835 if (sc->sc_intr_cardmask == 0) 836 sc->sc_intr_cardmask = DWC_MMC_INT_SDIO_INT(0); 837 838 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_NONE); 839 mutex_init(&sc->sc_intr_lock, MUTEX_DEFAULT, IPL_BIO); 840 cv_init(&sc->sc_intr_cv, "dwcmmcirq"); 841 842 if (dwc_mmc_dmabounce_setup(sc) != 0 || 843 dwc_mmc_idma_setup(sc) != 0) { 844 aprint_error_dev(sc->sc_dev, "failed to setup DMA\n"); 845 return ENOMEM; 846 } 847 848 config_interrupts(sc->sc_dev, dwc_mmc_attach_i); 849 850 return 0; 851 } 852 853 int 854 dwc_mmc_intr(void *priv) 855 { 856 struct dwc_mmc_softc *sc = priv; 857 struct sdmmc_command *cmd; 858 uint32_t idst, mint, imask; 859 860 mutex_enter(&sc->sc_intr_lock); 861 idst = MMC_READ(sc, DWC_MMC_IDST); 862 mint = MMC_READ(sc, DWC_MMC_MINT); 863 if (!idst && !mint) { 864 mutex_exit(&sc->sc_intr_lock); 865 return 0; 866 } 867 MMC_WRITE(sc, DWC_MMC_IDST, idst); 868 MMC_WRITE(sc, DWC_MMC_RINT, mint); 869 870 cmd = sc->sc_curcmd; 871 872 #ifdef DWC_MMC_DEBUG 873 device_printf(sc->sc_dev, "mmc intr idst=%08X mint=%08X\n", 874 idst, mint); 875 #endif 876 877 /* Handle SDIO card interrupt */ 878 if ((mint & sc->sc_intr_cardmask) != 0) { 879 imask = MMC_READ(sc, DWC_MMC_IMASK); 880 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~sc->sc_intr_cardmask); 881 sdmmc_card_intr(sc->sc_sdmmc_dev); 882 } 883 884 /* Error interrupts take priority over command and transfer interrupts */ 885 if (cmd != NULL && (mint & DWC_MMC_INT_ERROR) != 0) { 886 imask = MMC_READ(sc, DWC_MMC_IMASK); 887 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~DWC_MMC_INT_ERROR); 888 if ((mint & DWC_MMC_INT_RESP_TIMEOUT) != 0) { 889 cmd->c_error = ETIMEDOUT; 890 /* Wait for command to complete */ 891 sc->sc_wait_data = sc->sc_wait_dma = false; 892 if (cmd->c_opcode != SD_IO_SEND_OP_COND && 893 cmd->c_opcode != SD_IO_RW_DIRECT && 894 !ISSET(cmd->c_flags, SCF_TOUT_OK)) 895 device_printf(sc->sc_dev, "host controller timeout, mint=0x%08x\n", mint); 896 } else { 897 device_printf(sc->sc_dev, "host controller error, mint=0x%08x\n", mint); 898 cmd->c_error = EIO; 899 SET(cmd->c_flags, SCF_ITSDONE); 900 goto done; 901 } 902 } 903 904 if (cmd != NULL && (idst & DWC_MMC_IDST_RECEIVE_INT) != 0) { 905 MMC_WRITE(sc, DWC_MMC_IDIE, 0); 906 if (sc->sc_wait_dma == false) 907 device_printf(sc->sc_dev, "unexpected DMA receive interrupt\n"); 908 sc->sc_wait_dma = false; 909 } 910 911 if (cmd != NULL && (mint & DWC_MMC_INT_CMD_DONE) != 0) { 912 imask = MMC_READ(sc, DWC_MMC_IMASK); 913 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~DWC_MMC_INT_CMD_DONE); 914 if (sc->sc_wait_cmd == false) 915 device_printf(sc->sc_dev, "unexpected command complete interrupt\n"); 916 sc->sc_wait_cmd = false; 917 } 918 919 const uint32_t dmadone_mask = DWC_MMC_INT_AUTO_CMD_DONE|DWC_MMC_INT_DATA_OVER; 920 if (cmd != NULL && (mint & dmadone_mask) != 0) { 921 imask = MMC_READ(sc, DWC_MMC_IMASK); 922 MMC_WRITE(sc, DWC_MMC_IMASK, imask & ~dmadone_mask); 923 if (sc->sc_wait_data == false) 924 device_printf(sc->sc_dev, "unexpected data complete interrupt\n"); 925 sc->sc_wait_data = false; 926 } 927 928 if (cmd != NULL && 929 sc->sc_wait_dma == false && 930 sc->sc_wait_cmd == false && 931 sc->sc_wait_data == false) { 932 SET(cmd->c_flags, SCF_ITSDONE); 933 } 934 935 done: 936 if (cmd != NULL && ISSET(cmd->c_flags, SCF_ITSDONE)) { 937 cv_broadcast(&sc->sc_intr_cv); 938 } 939 940 mutex_exit(&sc->sc_intr_lock); 941 942 return 1; 943 } 944