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