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