Home | History | Annotate | Line # | Download | only in sdmmc
sdmmc.c revision 1.23.2.4
      1 /*	$NetBSD: sdmmc.c,v 1.23.2.4 2015/12/27 12:09:58 skrll Exp $	*/
      2 /*	$OpenBSD: sdmmc.c,v 1.18 2009/01/09 10:58:38 jsg Exp $	*/
      3 
      4 /*
      5  * Copyright (c) 2006 Uwe Stuehler <uwe (at) openbsd.org>
      6  *
      7  * Permission to use, copy, modify, and distribute this software for any
      8  * purpose with or without fee is hereby granted, provided that the above
      9  * copyright notice and this permission notice appear in all copies.
     10  *
     11  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
     12  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     13  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
     14  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     15  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     16  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
     17  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     18  */
     19 
     20 /*-
     21  * Copyright (C) 2007, 2008, 2009 NONAKA Kimihiro <nonaka (at) netbsd.org>
     22  * All rights reserved.
     23  *
     24  * Redistribution and use in source and binary forms, with or without
     25  * modification, are permitted provided that the following conditions
     26  * are met:
     27  * 1. Redistributions of source code must retain the above copyright
     28  *    notice, this list of conditions and the following disclaimer.
     29  * 2. Redistributions in binary form must reproduce the above copyright
     30  *    notice, this list of conditions and the following disclaimer in the
     31  *    documentation and/or other materials provided with the distribution.
     32  *
     33  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     34  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     35  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     36  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     37  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     38  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     39  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     40  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     41  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     42  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     43  */
     44 
     45 /*
     46  * Host controller independent SD/MMC bus driver based on information
     47  * from SanDisk SD Card Product Manual Revision 2.2 (SanDisk), SDIO
     48  * Simple Specification Version 1.0 (SDIO) and the Linux "mmc" driver.
     49  */
     50 
     51 #include <sys/cdefs.h>
     52 __KERNEL_RCSID(0, "$NetBSD: sdmmc.c,v 1.23.2.4 2015/12/27 12:09:58 skrll Exp $");
     53 
     54 #ifdef _KERNEL_OPT
     55 #include "opt_sdmmc.h"
     56 #endif
     57 
     58 #include <sys/param.h>
     59 #include <sys/device.h>
     60 #include <sys/kernel.h>
     61 #include <sys/kthread.h>
     62 #include <sys/malloc.h>
     63 #include <sys/proc.h>
     64 #include <sys/systm.h>
     65 #include <sys/callout.h>
     66 
     67 #include <machine/vmparam.h>
     68 
     69 #include <dev/sdmmc/sdmmc_ioreg.h>
     70 #include <dev/sdmmc/sdmmcchip.h>
     71 #include <dev/sdmmc/sdmmcreg.h>
     72 #include <dev/sdmmc/sdmmcvar.h>
     73 
     74 #ifdef SDMMC_DEBUG
     75 int sdmmcdebug = 0;
     76 static void sdmmc_dump_command(struct sdmmc_softc *, struct sdmmc_command *);
     77 #define DPRINTF(n,s)	do { if ((n) <= sdmmcdebug) printf s; } while (0)
     78 #else
     79 #define	DPRINTF(n,s)	do {} while (0)
     80 #endif
     81 
     82 #define	DEVNAME(sc)	SDMMCDEVNAME(sc)
     83 
     84 static int sdmmc_match(device_t, cfdata_t, void *);
     85 static void sdmmc_attach(device_t, device_t, void *);
     86 static int sdmmc_detach(device_t, int);
     87 
     88 CFATTACH_DECL_NEW(sdmmc, sizeof(struct sdmmc_softc),
     89     sdmmc_match, sdmmc_attach, sdmmc_detach, NULL);
     90 
     91 static void sdmmc_doattach(device_t);
     92 static void sdmmc_task_thread(void *);
     93 static void sdmmc_discover_task(void *);
     94 static void sdmmc_polling_card(void *);
     95 static void sdmmc_card_attach(struct sdmmc_softc *);
     96 static void sdmmc_card_detach(struct sdmmc_softc *, int);
     97 static int sdmmc_print(void *, const char *);
     98 static int sdmmc_enable(struct sdmmc_softc *);
     99 static void sdmmc_disable(struct sdmmc_softc *);
    100 static int sdmmc_scan(struct sdmmc_softc *);
    101 static int sdmmc_init(struct sdmmc_softc *);
    102 
    103 static int
    104 sdmmc_match(device_t parent, cfdata_t cf, void *aux)
    105 {
    106 	struct sdmmcbus_attach_args *saa = (struct sdmmcbus_attach_args *)aux;
    107 
    108 	if (strcmp(saa->saa_busname, cf->cf_name) == 0)
    109 		return 1;
    110 	return 0;
    111 }
    112 
    113 static void
    114 sdmmc_attach(device_t parent, device_t self, void *aux)
    115 {
    116 	struct sdmmc_softc *sc = device_private(self);
    117 	struct sdmmcbus_attach_args *saa = (struct sdmmcbus_attach_args *)aux;
    118 	int error;
    119 
    120 	aprint_normal("\n");
    121 	aprint_naive("\n");
    122 
    123 	sc->sc_dev = self;
    124 	sc->sc_sct = saa->saa_sct;
    125 	sc->sc_spi_sct = saa->saa_spi_sct;
    126 	sc->sc_sch = saa->saa_sch;
    127 	sc->sc_dmat = saa->saa_dmat;
    128 	sc->sc_clkmin = saa->saa_clkmin;
    129 	sc->sc_clkmax = saa->saa_clkmax;
    130 	sc->sc_busclk = sc->sc_clkmax;
    131 	sc->sc_buswidth = 1;
    132 	sc->sc_caps = saa->saa_caps;
    133 
    134 	if (ISSET(sc->sc_caps, SMC_CAPS_DMA)) {
    135 		error = bus_dmamap_create(sc->sc_dmat, MAXPHYS, SDMMC_MAXNSEGS,
    136 		    MAXPHYS, 0, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW, &sc->sc_dmap);
    137 		if (error) {
    138 			aprint_error_dev(sc->sc_dev,
    139 			    "couldn't create dma map. (error=%d)\n", error);
    140 			return;
    141 		}
    142 	}
    143 
    144 	SIMPLEQ_INIT(&sc->sf_head);
    145 	TAILQ_INIT(&sc->sc_tskq);
    146 	TAILQ_INIT(&sc->sc_intrq);
    147 
    148 	sdmmc_init_task(&sc->sc_discover_task, sdmmc_discover_task, sc);
    149 	sdmmc_init_task(&sc->sc_intr_task, sdmmc_intr_task, sc);
    150 
    151 	mutex_init(&sc->sc_mtx, MUTEX_DEFAULT, IPL_NONE);
    152 	mutex_init(&sc->sc_tskq_mtx, MUTEX_DEFAULT, IPL_SDMMC);
    153 	mutex_init(&sc->sc_discover_task_mtx, MUTEX_DEFAULT, IPL_SDMMC);
    154 	mutex_init(&sc->sc_intr_task_mtx, MUTEX_DEFAULT, IPL_SDMMC);
    155 	cv_init(&sc->sc_tskq_cv, "mmctaskq");
    156 
    157 	evcnt_attach_dynamic(&sc->sc_ev_xfer, EVCNT_TYPE_MISC, NULL,
    158 	    device_xname(self), "xfer");
    159 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[0], EVCNT_TYPE_MISC,
    160 	    &sc->sc_ev_xfer, device_xname(self), "xfer 512");
    161 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[1], EVCNT_TYPE_MISC,
    162 	    &sc->sc_ev_xfer, device_xname(self), "xfer 1024");
    163 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[2], EVCNT_TYPE_MISC,
    164 	    &sc->sc_ev_xfer, device_xname(self), "xfer 2048");
    165 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[3], EVCNT_TYPE_MISC,
    166 	    &sc->sc_ev_xfer, device_xname(self), "xfer 4096");
    167 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[4], EVCNT_TYPE_MISC,
    168 	    &sc->sc_ev_xfer, device_xname(self), "xfer 8192");
    169 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[5], EVCNT_TYPE_MISC,
    170 	    &sc->sc_ev_xfer, device_xname(self), "xfer 16384");
    171 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[6], EVCNT_TYPE_MISC,
    172 	    &sc->sc_ev_xfer, device_xname(self), "xfer 32768");
    173 	evcnt_attach_dynamic(&sc->sc_ev_xfer_aligned[7], EVCNT_TYPE_MISC,
    174 	    &sc->sc_ev_xfer, device_xname(self), "xfer 65536");
    175 	evcnt_attach_dynamic(&sc->sc_ev_xfer_unaligned, EVCNT_TYPE_MISC,
    176 	    &sc->sc_ev_xfer, device_xname(self), "xfer unaligned");
    177 	evcnt_attach_dynamic(&sc->sc_ev_xfer_error, EVCNT_TYPE_MISC,
    178 	    &sc->sc_ev_xfer, device_xname(self), "xfer error");
    179 
    180 	if (ISSET(sc->sc_caps, SMC_CAPS_POLL_CARD_DET)) {
    181 		callout_init(&sc->sc_card_detect_ch, 0);
    182 		callout_reset(&sc->sc_card_detect_ch, hz,
    183 		    sdmmc_polling_card, sc);
    184 	}
    185 
    186 	if (!pmf_device_register(self, NULL, NULL)) {
    187 		aprint_error_dev(self, "couldn't establish power handler\n");
    188 	}
    189 
    190 	SET(sc->sc_flags, SMF_INITED);
    191 
    192 	/*
    193 	 * Create the event thread that will attach and detach cards
    194 	 * and perform other lengthy operations.
    195 	 */
    196 	config_pending_incr(self);
    197 	config_interrupts(self, sdmmc_doattach);
    198 }
    199 
    200 static int
    201 sdmmc_detach(device_t self, int flags)
    202 {
    203 	struct sdmmc_softc *sc = device_private(self);
    204 	int error, i;
    205 
    206 	mutex_enter(&sc->sc_tskq_mtx);
    207 	sc->sc_dying = 1;
    208 	cv_signal(&sc->sc_tskq_cv);
    209 	while (sc->sc_tskq_lwp != NULL)
    210 		cv_wait(&sc->sc_tskq_cv, &sc->sc_tskq_mtx);
    211 	mutex_exit(&sc->sc_tskq_mtx);
    212 
    213 	pmf_device_deregister(self);
    214 
    215 	error = config_detach_children(self, flags);
    216 	if (error)
    217 		return error;
    218 
    219 	if (ISSET(sc->sc_caps, SMC_CAPS_DMA)) {
    220 		bus_dmamap_unload(sc->sc_dmat, sc->sc_dmap);
    221 		bus_dmamap_destroy(sc->sc_dmat, sc->sc_dmap);
    222 	}
    223 
    224 	if (ISSET(sc->sc_caps, SMC_CAPS_POLL_CARD_DET)) {
    225 		callout_halt(&sc->sc_card_detect_ch, NULL);
    226 		callout_destroy(&sc->sc_card_detect_ch);
    227 	}
    228 
    229 	cv_destroy(&sc->sc_tskq_cv);
    230 	mutex_destroy(&sc->sc_intr_task_mtx);
    231 	mutex_destroy(&sc->sc_discover_task_mtx);
    232 	mutex_destroy(&sc->sc_tskq_mtx);
    233 	mutex_destroy(&sc->sc_mtx);
    234 
    235 	evcnt_detach(&sc->sc_ev_xfer_error);
    236 	evcnt_detach(&sc->sc_ev_xfer_unaligned);
    237 	for (i = 0; i < __arraycount(sc->sc_ev_xfer_aligned); i++)
    238 		evcnt_detach(&sc->sc_ev_xfer_aligned[i]);
    239 	evcnt_detach(&sc->sc_ev_xfer);
    240 
    241 	return 0;
    242 }
    243 
    244 static void
    245 sdmmc_doattach(device_t dev)
    246 {
    247 	struct sdmmc_softc *sc = device_private(dev);
    248 
    249 	if (kthread_create(PRI_BIO, 0, NULL,
    250 	    sdmmc_task_thread, sc, &sc->sc_tskq_lwp, "%s", device_xname(dev))) {
    251 		aprint_error_dev(dev, "couldn't create task thread\n");
    252 	}
    253 }
    254 
    255 void
    256 sdmmc_add_task(struct sdmmc_softc *sc, struct sdmmc_task *task)
    257 {
    258 
    259 	mutex_enter(&sc->sc_tskq_mtx);
    260 	task->onqueue = 1;
    261 	task->sc = sc;
    262 	TAILQ_INSERT_TAIL(&sc->sc_tskq, task, next);
    263 	cv_broadcast(&sc->sc_tskq_cv);
    264 	mutex_exit(&sc->sc_tskq_mtx);
    265 }
    266 
    267 static inline void
    268 sdmmc_del_task1(struct sdmmc_softc *sc, struct sdmmc_task *task)
    269 {
    270 
    271 	TAILQ_REMOVE(&sc->sc_tskq, task, next);
    272 	task->sc = NULL;
    273 	task->onqueue = 0;
    274 }
    275 
    276 void
    277 sdmmc_del_task(struct sdmmc_task *task)
    278 {
    279 	struct sdmmc_softc *sc = (struct sdmmc_softc *)task->sc;
    280 
    281 	if (sc != NULL) {
    282 		mutex_enter(&sc->sc_tskq_mtx);
    283 		sdmmc_del_task1(sc, task);
    284 		mutex_exit(&sc->sc_tskq_mtx);
    285 	}
    286 }
    287 
    288 static void
    289 sdmmc_task_thread(void *arg)
    290 {
    291 	struct sdmmc_softc *sc = (struct sdmmc_softc *)arg;
    292 	struct sdmmc_task *task;
    293 
    294 	sdmmc_discover_task(sc);
    295 	config_pending_decr(sc->sc_dev);
    296 
    297 	mutex_enter(&sc->sc_tskq_mtx);
    298 	for (;;) {
    299 		task = TAILQ_FIRST(&sc->sc_tskq);
    300 		if (task != NULL) {
    301 			sdmmc_del_task1(sc, task);
    302 			mutex_exit(&sc->sc_tskq_mtx);
    303 			(*task->func)(task->arg);
    304 			mutex_enter(&sc->sc_tskq_mtx);
    305 		} else {
    306 			/* Check for the exit condition. */
    307 			if (sc->sc_dying)
    308 				break;
    309 			cv_wait(&sc->sc_tskq_cv, &sc->sc_tskq_mtx);
    310 		}
    311 	}
    312 	/* time to die. */
    313 	sc->sc_dying = 0;
    314 	if (ISSET(sc->sc_flags, SMF_CARD_PRESENT)) {
    315 		/*
    316 		 * sdmmc_card_detach() may issue commands,
    317 		 * so temporarily drop the interrupt-blocking lock.
    318 		 */
    319 		mutex_exit(&sc->sc_tskq_mtx);
    320 		sdmmc_card_detach(sc, DETACH_FORCE);
    321 		mutex_enter(&sc->sc_tskq_mtx);
    322 	}
    323 	sc->sc_tskq_lwp = NULL;
    324 	cv_broadcast(&sc->sc_tskq_cv);
    325 	mutex_exit(&sc->sc_tskq_mtx);
    326 	kthread_exit(0);
    327 }
    328 
    329 void
    330 sdmmc_needs_discover(device_t dev)
    331 {
    332 	struct sdmmc_softc *sc = device_private(dev);
    333 
    334 	if (!ISSET(sc->sc_flags, SMF_INITED))
    335 		return;
    336 
    337 	mutex_enter(&sc->sc_discover_task_mtx);
    338 	if (!sdmmc_task_pending(&sc->sc_discover_task))
    339 		sdmmc_add_task(sc, &sc->sc_discover_task);
    340 	mutex_exit(&sc->sc_discover_task_mtx);
    341 }
    342 
    343 static void
    344 sdmmc_discover_task(void *arg)
    345 {
    346 	struct sdmmc_softc *sc = (struct sdmmc_softc *)arg;
    347 	int card_detect, card_present;
    348 
    349 	mutex_enter(&sc->sc_discover_task_mtx);
    350 	card_detect = sdmmc_chip_card_detect(sc->sc_sct, sc->sc_sch);
    351 	card_present = ISSET(sc->sc_flags, SMF_CARD_PRESENT);
    352 	if (card_detect)
    353 		SET(sc->sc_flags, SMF_CARD_PRESENT);
    354 	else
    355 		CLR(sc->sc_flags, SMF_CARD_PRESENT);
    356 	mutex_exit(&sc->sc_discover_task_mtx);
    357 
    358 	if (card_detect) {
    359 		if (!card_present) {
    360 			sdmmc_card_attach(sc);
    361 			mutex_enter(&sc->sc_discover_task_mtx);
    362 			if (!ISSET(sc->sc_flags, SMF_CARD_ATTACHED))
    363 				CLR(sc->sc_flags, SMF_CARD_PRESENT);
    364 			mutex_exit(&sc->sc_discover_task_mtx);
    365 		}
    366 	} else {
    367 		if (card_present)
    368 			sdmmc_card_detach(sc, DETACH_FORCE);
    369 	}
    370 }
    371 
    372 static void
    373 sdmmc_polling_card(void *arg)
    374 {
    375 	struct sdmmc_softc *sc = (struct sdmmc_softc *)arg;
    376 	int card_detect, card_present;
    377 
    378 	mutex_enter(&sc->sc_discover_task_mtx);
    379 	card_detect = sdmmc_chip_card_detect(sc->sc_sct, sc->sc_sch);
    380 	card_present = ISSET(sc->sc_flags, SMF_CARD_PRESENT);
    381 	mutex_exit(&sc->sc_discover_task_mtx);
    382 
    383 	if (card_detect != card_present)
    384 		sdmmc_needs_discover(sc->sc_dev);
    385 
    386 	callout_schedule(&sc->sc_card_detect_ch, hz);
    387 }
    388 
    389 /*
    390  * Called from process context when a card is present.
    391  */
    392 static void
    393 sdmmc_card_attach(struct sdmmc_softc *sc)
    394 {
    395 	struct sdmmc_function *sf;
    396 	struct sdmmc_attach_args saa;
    397 	int error;
    398 
    399 	DPRINTF(1,("%s: attach card\n", DEVNAME(sc)));
    400 
    401 	CLR(sc->sc_flags, SMF_CARD_ATTACHED);
    402 
    403 	/*
    404 	 * Power up the card (or card stack).
    405 	 */
    406 	error = sdmmc_enable(sc);
    407 	if (error) {
    408 		if (!ISSET(sc->sc_caps, SMC_CAPS_POLL_CARD_DET)) {
    409 			aprint_error_dev(sc->sc_dev, "couldn't enable card: %d\n", error);
    410 		}
    411 		goto err;
    412 	}
    413 
    414 	/*
    415 	 * Scan for I/O functions and memory cards on the bus,
    416 	 * allocating a sdmmc_function structure for each.
    417 	 */
    418 	error = sdmmc_scan(sc);
    419 	if (error) {
    420 		aprint_error_dev(sc->sc_dev, "no functions\n");
    421 		goto err;
    422 	}
    423 
    424 	/*
    425 	 * Initialize the I/O functions and memory cards.
    426 	 */
    427 	error = sdmmc_init(sc);
    428 	if (error) {
    429 		aprint_error_dev(sc->sc_dev, "init failed\n");
    430 		goto err;
    431 	}
    432 
    433 	SIMPLEQ_FOREACH(sf, &sc->sf_head, sf_list) {
    434 		if (ISSET(sc->sc_flags, SMF_IO_MODE) && sf->number < 1)
    435 			continue;
    436 
    437 		memset(&saa, 0, sizeof saa);
    438 		saa.manufacturer = sf->cis.manufacturer;
    439 		saa.product = sf->cis.product;
    440 		saa.interface = sf->interface;
    441 		saa.sf = sf;
    442 
    443 		sf->child =
    444 		    config_found_ia(sc->sc_dev, "sdmmc", &saa, sdmmc_print);
    445 	}
    446 
    447 	SET(sc->sc_flags, SMF_CARD_ATTACHED);
    448 	return;
    449 
    450 err:
    451 	sdmmc_card_detach(sc, DETACH_FORCE);
    452 }
    453 
    454 /*
    455  * Called from process context with DETACH_* flags from <sys/device.h>
    456  * when cards are gone.
    457  */
    458 static void
    459 sdmmc_card_detach(struct sdmmc_softc *sc, int flags)
    460 {
    461 	struct sdmmc_function *sf, *sfnext;
    462 
    463 	DPRINTF(1,("%s: detach card\n", DEVNAME(sc)));
    464 
    465 	if (ISSET(sc->sc_flags, SMF_CARD_ATTACHED)) {
    466 		SIMPLEQ_FOREACH(sf, &sc->sf_head, sf_list) {
    467 			if (sf->child != NULL) {
    468 				config_detach(sf->child, DETACH_FORCE);
    469 				sf->child = NULL;
    470 			}
    471 		}
    472 
    473 		KASSERT(TAILQ_EMPTY(&sc->sc_intrq));
    474 
    475 		CLR(sc->sc_flags, SMF_CARD_ATTACHED);
    476 	}
    477 
    478 	/* Power down. */
    479 	sdmmc_disable(sc);
    480 
    481 	/* Free all sdmmc_function structures. */
    482 	for (sf = SIMPLEQ_FIRST(&sc->sf_head); sf != NULL; sf = sfnext) {
    483 		sfnext = SIMPLEQ_NEXT(sf, sf_list);
    484 		sdmmc_function_free(sf);
    485 	}
    486 	SIMPLEQ_INIT(&sc->sf_head);
    487 	sc->sc_function_count = 0;
    488 	sc->sc_fn0 = NULL;
    489 }
    490 
    491 static int
    492 sdmmc_print(void *aux, const char *pnp)
    493 {
    494 	struct sdmmc_attach_args *sa = aux;
    495 	struct sdmmc_function *sf = sa->sf;
    496 	struct sdmmc_cis *cis = &sf->sc->sc_fn0->cis;
    497 	int i, x;
    498 
    499 	if (pnp) {
    500 		if (sf->number == 0)
    501 			return QUIET;
    502 
    503 		for (i = 0; i < 4 && cis->cis1_info[i]; i++)
    504 			printf("%s%s", i ? ", " : "\"", cis->cis1_info[i]);
    505 		if (i != 0)
    506 			printf("\"");
    507 
    508 		if ((cis->manufacturer != SDMMC_VENDOR_INVALID &&
    509 		    cis->product != SDMMC_PRODUCT_INVALID) ||
    510 		    sa->interface != SD_IO_SFIC_NO_STANDARD) {
    511 			x = !!(cis->manufacturer != SDMMC_VENDOR_INVALID);
    512 			x += !!(cis->product != SDMMC_PRODUCT_INVALID);
    513 			x += !!(sa->interface != SD_IO_SFIC_NO_STANDARD);
    514 			printf("%s(", i ? " " : "");
    515 			if (cis->manufacturer != SDMMC_VENDOR_INVALID)
    516 				printf("manufacturer 0x%x%s",
    517 				    cis->manufacturer, (--x == 0) ?  "" : ", ");
    518 			if (cis->product != SDMMC_PRODUCT_INVALID)
    519 				printf("product 0x%x%s",
    520 				    cis->product, (--x == 0) ?  "" : ", ");
    521 			if (sa->interface != SD_IO_SFIC_NO_STANDARD)
    522 				printf("standard function interface code 0x%x",
    523 				    sf->interface);
    524 			printf(")");
    525 		}
    526 		printf("%sat %s", i ? " " : "", pnp);
    527 	}
    528 	if (sf->number > 0)
    529 		printf(" function %d", sf->number);
    530 
    531 	if (!pnp) {
    532 		for (i = 0; i < 3 && cis->cis1_info[i]; i++)
    533 			printf("%s%s", i ? ", " : " \"", cis->cis1_info[i]);
    534 		if (i != 0)
    535 			printf("\"");
    536 	}
    537 	return UNCONF;
    538 }
    539 
    540 static int
    541 sdmmc_enable(struct sdmmc_softc *sc)
    542 {
    543 	int error;
    544 
    545 	/*
    546 	 * Calculate the equivalent of the card OCR from the host
    547 	 * capabilities and select the maximum supported bus voltage.
    548 	 */
    549 	error = sdmmc_chip_bus_power(sc->sc_sct, sc->sc_sch,
    550 	    sdmmc_chip_host_ocr(sc->sc_sct, sc->sc_sch));
    551 	if (error) {
    552 		aprint_error_dev(sc->sc_dev, "couldn't supply bus power\n");
    553 		goto out;
    554 	}
    555 
    556 	/*
    557 	 * Select the minimum clock frequency.
    558 	 */
    559 	error = sdmmc_chip_bus_clock(sc->sc_sct, sc->sc_sch, SDMMC_SDCLK_400K,
    560 	    false);
    561 	if (error) {
    562 		aprint_error_dev(sc->sc_dev, "couldn't supply clock\n");
    563 		goto out;
    564 	}
    565 
    566 	/* XXX wait for card to power up */
    567 	sdmmc_delay(100000);
    568 
    569 	if (!ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    570 		/* Initialize SD I/O card function(s). */
    571 		error = sdmmc_io_enable(sc);
    572 		if (error) {
    573 			DPRINTF(1, ("%s: sdmmc_io_enable failed %d\n", DEVNAME(sc), error));
    574 			goto out;
    575 		}
    576 	}
    577 
    578 	/* Initialize SD/MMC memory card(s). */
    579 	if (ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE) ||
    580 	    ISSET(sc->sc_flags, SMF_MEM_MODE)) {
    581 		error = sdmmc_mem_enable(sc);
    582 		if (error) {
    583 			DPRINTF(1, ("%s: sdmmc_mem_enable failed %d\n", DEVNAME(sc), error));
    584 			goto out;
    585 		}
    586 	}
    587 
    588 out:
    589 	if (error)
    590 		sdmmc_disable(sc);
    591 	return error;
    592 }
    593 
    594 static void
    595 sdmmc_disable(struct sdmmc_softc *sc)
    596 {
    597 	/* XXX complete commands if card is still present. */
    598 
    599 	if (!ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    600 		/* Make sure no card is still selected. */
    601 		(void)sdmmc_select_card(sc, NULL);
    602 	}
    603 
    604 	/* Turn off bus power and clock. */
    605 	(void)sdmmc_chip_bus_width(sc->sc_sct, sc->sc_sch, 1);
    606 	(void)sdmmc_chip_bus_clock(sc->sc_sct, sc->sc_sch, SDMMC_SDCLK_OFF,
    607 	    false);
    608 	(void)sdmmc_chip_bus_power(sc->sc_sct, sc->sc_sch, 0);
    609 	sc->sc_busclk = sc->sc_clkmax;
    610 }
    611 
    612 /*
    613  * Set the lowest bus voltage supported by the card and the host.
    614  */
    615 int
    616 sdmmc_set_bus_power(struct sdmmc_softc *sc, uint32_t host_ocr,
    617     uint32_t card_ocr)
    618 {
    619 	uint32_t bit;
    620 
    621 	/* Mask off unsupported voltage levels and select the lowest. */
    622 	DPRINTF(1,("%s: host_ocr=%x ", DEVNAME(sc), host_ocr));
    623 	host_ocr &= card_ocr;
    624 	for (bit = 4; bit < 23; bit++) {
    625 		if (ISSET(host_ocr, (1 << bit))) {
    626 			host_ocr &= (3 << bit);
    627 			break;
    628 		}
    629 	}
    630 	DPRINTF(1,("card_ocr=%x new_ocr=%x\n", card_ocr, host_ocr));
    631 
    632 	if (host_ocr == 0 ||
    633 	    sdmmc_chip_bus_power(sc->sc_sct, sc->sc_sch, host_ocr) != 0)
    634 		return 1;
    635 	return 0;
    636 }
    637 
    638 struct sdmmc_function *
    639 sdmmc_function_alloc(struct sdmmc_softc *sc)
    640 {
    641 	struct sdmmc_function *sf;
    642 
    643 	sf = malloc(sizeof *sf, M_DEVBUF, M_WAITOK|M_ZERO);
    644 	if (sf == NULL) {
    645 		aprint_error_dev(sc->sc_dev,
    646 		    "couldn't alloc memory (sdmmc function)\n");
    647 		return NULL;
    648 	}
    649 
    650 	sf->sc = sc;
    651 	sf->number = -1;
    652 	sf->cis.manufacturer = SDMMC_VENDOR_INVALID;
    653 	sf->cis.product = SDMMC_PRODUCT_INVALID;
    654 	sf->cis.function = SDMMC_FUNCTION_INVALID;
    655 	sf->width = 1;
    656 
    657 	if (ISSET(sc->sc_flags, SMF_MEM_MODE) &&
    658 	    ISSET(sc->sc_caps, SMC_CAPS_DMA) &&
    659 	    !ISSET(sc->sc_caps, SMC_CAPS_MULTI_SEG_DMA)) {
    660 		bus_dma_segment_t ds;
    661 		int rseg, error;
    662 
    663 		error = bus_dmamap_create(sc->sc_dmat, MAXPHYS, 1,
    664 		    MAXPHYS, 0, BUS_DMA_WAITOK, &sf->bbuf_dmap);
    665 		if (error)
    666 			goto fail1;
    667 		error = bus_dmamem_alloc(sc->sc_dmat, MAXPHYS,
    668 		    PAGE_SIZE, 0, &ds, 1, &rseg, BUS_DMA_WAITOK);
    669 		if (error)
    670 			goto fail2;
    671 		error = bus_dmamem_map(sc->sc_dmat, &ds, 1, MAXPHYS,
    672 		    &sf->bbuf, BUS_DMA_WAITOK);
    673 		if (error)
    674 			goto fail3;
    675 		error = bus_dmamap_load(sc->sc_dmat, sf->bbuf_dmap,
    676 		    sf->bbuf, MAXPHYS, NULL,
    677 		    BUS_DMA_WAITOK|BUS_DMA_READ|BUS_DMA_WRITE);
    678 		if (error)
    679 			goto fail4;
    680 		error = bus_dmamap_create(sc->sc_dmat, MAXPHYS, 1,
    681 		    MAXPHYS, 0, BUS_DMA_WAITOK, &sf->sseg_dmap);
    682 		if (!error)
    683 			goto out;
    684 
    685 		bus_dmamap_unload(sc->sc_dmat, sf->bbuf_dmap);
    686 fail4:
    687 		bus_dmamem_unmap(sc->sc_dmat, sf->bbuf, MAXPHYS);
    688 fail3:
    689 		bus_dmamem_free(sc->sc_dmat, &ds, 1);
    690 fail2:
    691 		bus_dmamap_destroy(sc->sc_dmat, sf->bbuf_dmap);
    692 fail1:
    693 		free(sf, M_DEVBUF);
    694 		sf = NULL;
    695 	}
    696 out:
    697 
    698 	return sf;
    699 }
    700 
    701 void
    702 sdmmc_function_free(struct sdmmc_function *sf)
    703 {
    704 	struct sdmmc_softc *sc = sf->sc;
    705 
    706 	if (ISSET(sc->sc_flags, SMF_MEM_MODE) &&
    707 	    ISSET(sc->sc_caps, SMC_CAPS_DMA) &&
    708 	    !ISSET(sc->sc_caps, SMC_CAPS_MULTI_SEG_DMA)) {
    709 		bus_dmamap_destroy(sc->sc_dmat, sf->sseg_dmap);
    710 		bus_dmamap_unload(sc->sc_dmat, sf->bbuf_dmap);
    711 		bus_dmamem_unmap(sc->sc_dmat, sf->bbuf, MAXPHYS);
    712 		bus_dmamem_free(sc->sc_dmat,
    713 		    sf->bbuf_dmap->dm_segs, sf->bbuf_dmap->dm_nsegs);
    714 		bus_dmamap_destroy(sc->sc_dmat, sf->bbuf_dmap);
    715 	}
    716 
    717 	free(sf, M_DEVBUF);
    718 }
    719 
    720 /*
    721  * Scan for I/O functions and memory cards on the bus, allocating a
    722  * sdmmc_function structure for each.
    723  */
    724 static int
    725 sdmmc_scan(struct sdmmc_softc *sc)
    726 {
    727 
    728 	if (!ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    729 		/* Scan for I/O functions. */
    730 		if (ISSET(sc->sc_flags, SMF_IO_MODE))
    731 			sdmmc_io_scan(sc);
    732 	}
    733 
    734 	/* Scan for memory cards on the bus. */
    735 	if (ISSET(sc->sc_flags, SMF_MEM_MODE))
    736 		sdmmc_mem_scan(sc);
    737 
    738 	/* There should be at least one function now. */
    739 	if (SIMPLEQ_EMPTY(&sc->sf_head)) {
    740 		aprint_error_dev(sc->sc_dev, "couldn't identify card\n");
    741 		return 1;
    742 	}
    743 	return 0;
    744 }
    745 
    746 /*
    747  * Initialize all the distinguished functions of the card, be it I/O
    748  * or memory functions.
    749  */
    750 static int
    751 sdmmc_init(struct sdmmc_softc *sc)
    752 {
    753 	struct sdmmc_function *sf;
    754 
    755 	/* Initialize all identified card functions. */
    756 	SIMPLEQ_FOREACH(sf, &sc->sf_head, sf_list) {
    757 		if (!ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    758 			if (ISSET(sc->sc_flags, SMF_IO_MODE) &&
    759 			    sdmmc_io_init(sc, sf) != 0) {
    760 				aprint_error_dev(sc->sc_dev,
    761 				    "i/o init failed\n");
    762 			}
    763 		}
    764 
    765 		if (ISSET(sc->sc_flags, SMF_MEM_MODE) &&
    766 		    sdmmc_mem_init(sc, sf) != 0) {
    767 			aprint_error_dev(sc->sc_dev, "mem init failed\n");
    768 		}
    769 	}
    770 
    771 	/* Any good functions left after initialization? */
    772 	SIMPLEQ_FOREACH(sf, &sc->sf_head, sf_list) {
    773 		if (!ISSET(sf->flags, SFF_ERROR))
    774 			return 0;
    775 	}
    776 
    777 	/* No, we should probably power down the card. */
    778 	return 1;
    779 }
    780 
    781 void
    782 sdmmc_delay(u_int usecs)
    783 {
    784 
    785 	delay(usecs);
    786 }
    787 
    788 int
    789 sdmmc_app_command(struct sdmmc_softc *sc, struct sdmmc_function *sf, struct sdmmc_command *cmd)
    790 {
    791 	struct sdmmc_command acmd;
    792 	int error;
    793 
    794 	DPRINTF(1,("sdmmc_app_command: start\n"));
    795 
    796 	/* Don't lock */
    797 
    798 	memset(&acmd, 0, sizeof(acmd));
    799 	acmd.c_opcode = MMC_APP_CMD;
    800 	acmd.c_arg = (sf != NULL) ? (sf->rca << 16) : 0;
    801 	acmd.c_flags = SCF_CMD_AC | SCF_RSP_R1 | SCF_RSP_SPI_R1 | (cmd->c_flags & SCF_TOUT_OK);
    802 
    803 	error = sdmmc_mmc_command(sc, &acmd);
    804 	if (error == 0) {
    805 		if (!ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE) &&
    806 		    !ISSET(MMC_R1(acmd.c_resp), MMC_R1_APP_CMD)) {
    807 			/* Card does not support application commands. */
    808 			error = ENODEV;
    809 		} else {
    810 			error = sdmmc_mmc_command(sc, cmd);
    811 		}
    812 	}
    813 	DPRINTF(1,("sdmmc_app_command: done (error=%d)\n", error));
    814 	return error;
    815 }
    816 
    817 /*
    818  * Execute MMC command and data transfers.  All interactions with the
    819  * host controller to complete the command happen in the context of
    820  * the current process.
    821  */
    822 int
    823 sdmmc_mmc_command(struct sdmmc_softc *sc, struct sdmmc_command *cmd)
    824 {
    825 	int error;
    826 
    827 	DPRINTF(1,("sdmmc_mmc_command: cmd=%d, arg=%#x, flags=%#x\n",
    828 	    cmd->c_opcode, cmd->c_arg, cmd->c_flags));
    829 
    830 	/* Don't lock */
    831 
    832 #if defined(DIAGNOSTIC) || defined(SDMMC_DEBUG)
    833 	if (cmd->c_data && !ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    834 		if (sc->sc_card == NULL)
    835 			panic("%s: deselected card\n", DEVNAME(sc));
    836 	}
    837 #endif
    838 
    839 	sdmmc_chip_exec_command(sc->sc_sct, sc->sc_sch, cmd);
    840 
    841 #ifdef SDMMC_DEBUG
    842 	sdmmc_dump_command(sc, cmd);
    843 #endif
    844 
    845 	error = cmd->c_error;
    846 
    847 	DPRINTF(1,("sdmmc_mmc_command: error=%d\n", error));
    848 
    849 	if (error &&
    850 	   (cmd->c_opcode == MMC_READ_BLOCK_MULTIPLE ||
    851 	    cmd->c_opcode == MMC_WRITE_BLOCK_MULTIPLE)) {
    852 		sdmmc_stop_transmission(sc);
    853 	}
    854 
    855 	return error;
    856 }
    857 
    858 /*
    859  * Send the "STOP TRANSMISSION" command
    860  */
    861 void
    862 sdmmc_stop_transmission(struct sdmmc_softc *sc)
    863 {
    864 	struct sdmmc_command cmd;
    865 
    866 	DPRINTF(1,("sdmmc_stop_transmission\n"));
    867 
    868 	/* Don't lock */
    869 
    870 	memset(&cmd, 0, sizeof(cmd));
    871 	cmd.c_opcode = MMC_STOP_TRANSMISSION;
    872 	cmd.c_flags = SCF_CMD_AC | SCF_RSP_R1B | SCF_RSP_SPI_R1B;
    873 
    874 	(void)sdmmc_mmc_command(sc, &cmd);
    875 }
    876 
    877 /*
    878  * Send the "GO IDLE STATE" command.
    879  */
    880 void
    881 sdmmc_go_idle_state(struct sdmmc_softc *sc)
    882 {
    883 	struct sdmmc_command cmd;
    884 
    885 	DPRINTF(1,("sdmmc_go_idle_state\n"));
    886 
    887 	/* Don't lock */
    888 
    889 	memset(&cmd, 0, sizeof(cmd));
    890 	cmd.c_opcode = MMC_GO_IDLE_STATE;
    891 	cmd.c_flags = SCF_CMD_BC | SCF_RSP_R0 | SCF_RSP_SPI_R1;
    892 
    893 	(void)sdmmc_mmc_command(sc, &cmd);
    894 }
    895 
    896 /*
    897  * Retrieve (SD) or set (MMC) the relative card address (RCA).
    898  */
    899 int
    900 sdmmc_set_relative_addr(struct sdmmc_softc *sc, struct sdmmc_function *sf)
    901 {
    902 	struct sdmmc_command cmd;
    903 	int error;
    904 
    905 	/* Don't lock */
    906 
    907 	if (ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    908 		aprint_error_dev(sc->sc_dev,
    909 			"sdmmc_set_relative_addr: SMC_CAPS_SPI_MODE set");
    910 		return EIO;
    911 	}
    912 
    913 	memset(&cmd, 0, sizeof(cmd));
    914 	if (ISSET(sc->sc_flags, SMF_SD_MODE)) {
    915 		cmd.c_opcode = SD_SEND_RELATIVE_ADDR;
    916 		cmd.c_flags = SCF_CMD_BCR | SCF_RSP_R6;
    917 	} else {
    918 		cmd.c_opcode = MMC_SET_RELATIVE_ADDR;
    919 		cmd.c_arg = MMC_ARG_RCA(sf->rca);
    920 		cmd.c_flags = SCF_CMD_AC | SCF_RSP_R1;
    921 	}
    922 	error = sdmmc_mmc_command(sc, &cmd);
    923 	if (error)
    924 		return error;
    925 
    926 	if (ISSET(sc->sc_flags, SMF_SD_MODE))
    927 		sf->rca = SD_R6_RCA(cmd.c_resp);
    928 
    929 	return 0;
    930 }
    931 
    932 int
    933 sdmmc_select_card(struct sdmmc_softc *sc, struct sdmmc_function *sf)
    934 {
    935 	struct sdmmc_command cmd;
    936 	int error;
    937 
    938 	/* Don't lock */
    939 
    940 	if (ISSET(sc->sc_caps, SMC_CAPS_SPI_MODE)) {
    941 		aprint_error_dev(sc->sc_dev,
    942 			"sdmmc_select_card: SMC_CAPS_SPI_MODE set");
    943 		return EIO;
    944 	}
    945 
    946 	if (sc->sc_card == sf
    947 	 || (sf && sc->sc_card && sc->sc_card->rca == sf->rca)) {
    948 		sc->sc_card = sf;
    949 		return 0;
    950 	}
    951 
    952 	memset(&cmd, 0, sizeof(cmd));
    953 	cmd.c_opcode = MMC_SELECT_CARD;
    954 	cmd.c_arg = (sf == NULL) ? 0 : MMC_ARG_RCA(sf->rca);
    955 	cmd.c_flags = SCF_CMD_AC | ((sf == NULL) ? SCF_RSP_R0 : SCF_RSP_R1);
    956 	error = sdmmc_mmc_command(sc, &cmd);
    957 	if (error == 0 || sf == NULL)
    958 		sc->sc_card = sf;
    959 
    960 	return error;
    961 }
    962 
    963 #ifdef SDMMC_DEBUG
    964 static void
    965 sdmmc_dump_command(struct sdmmc_softc *sc, struct sdmmc_command *cmd)
    966 {
    967 	int i;
    968 
    969 	DPRINTF(1,("%s: cmd %u arg=%#x data=%p dlen=%d flags=%#x (error %d)\n",
    970 	    DEVNAME(sc), cmd->c_opcode, cmd->c_arg, cmd->c_data,
    971 	    cmd->c_datalen, cmd->c_flags, cmd->c_error));
    972 
    973 	if (cmd->c_error || sdmmcdebug < 1)
    974 		return;
    975 
    976 	aprint_normal_dev(sc->sc_dev, "resp=");
    977 	if (ISSET(cmd->c_flags, SCF_RSP_136))
    978 		for (i = 0; i < sizeof cmd->c_resp; i++)
    979 			aprint_normal("%02x ", ((uint8_t *)cmd->c_resp)[i]);
    980 	else if (ISSET(cmd->c_flags, SCF_RSP_PRESENT))
    981 		for (i = 0; i < 4; i++)
    982 			aprint_normal("%02x ", ((uint8_t *)cmd->c_resp)[i]);
    983 	else
    984 		aprint_normal("none");
    985 	aprint_normal("\n");
    986 }
    987 
    988 void
    989 sdmmc_dump_data(const char *title, void *ptr, size_t size)
    990 {
    991 	char buf[16];
    992 	uint8_t *p = ptr;
    993 	int i, j;
    994 
    995 	printf("sdmmc_dump_data: %s\n", title ? title : "");
    996 	printf("--------+--------------------------------------------------+------------------+\n");
    997 	printf("offset  | +0 +1 +2 +3 +4 +5 +6 +7  +8 +9 +a +b +c +d +e +f | data             |\n");
    998 	printf("--------+--------------------------------------------------+------------------+\n");
    999 	for (i = 0; i < (int)size; i++) {
   1000 		if ((i % 16) == 0) {
   1001 			printf("%08x| ", i);
   1002 		} else if ((i % 16) == 8) {
   1003 			printf(" ");
   1004 		}
   1005 
   1006 		printf("%02x ", p[i]);
   1007 		buf[i % 16] = p[i];
   1008 
   1009 		if ((i % 16) == 15) {
   1010 			printf("| ");
   1011 			for (j = 0; j < 16; j++) {
   1012 				if (buf[j] >= 0x20 && buf[j] <= 0x7e) {
   1013 					printf("%c", buf[j]);
   1014 				} else {
   1015 					printf(".");
   1016 				}
   1017 			}
   1018 			printf(" |\n");
   1019 		}
   1020 	}
   1021 	if ((i % 16) != 0) {
   1022 		j = (i % 16);
   1023 		for (; j < 16; j++) {
   1024 			printf("   ");
   1025 			if ((j % 16) == 8) {
   1026 				printf(" ");
   1027 			}
   1028 		}
   1029 
   1030 		printf("| ");
   1031 		for (j = 0; j < (i % 16); j++) {
   1032 			if (buf[j] >= 0x20 && buf[j] <= 0x7e) {
   1033 				printf("%c", buf[j]);
   1034 			} else {
   1035 				printf(".");
   1036 			}
   1037 		}
   1038 		for (; j < 16; j++) {
   1039 			printf(" ");
   1040 		}
   1041 		printf(" |\n");
   1042 	}
   1043 	printf("--------+--------------------------------------------------+------------------+\n");
   1044 }
   1045 #endif
   1046