/* $NetBSD: omap3_sdhc.c,v 1.28 2016/10/05 13:37:48 christos Exp $ */
/*-
* Copyright (c) 2011 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Matt Thomas of 3am Software Foundry.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
* POSSIBILITY OF SUCH DAMAGE.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: omap3_sdhc.c,v 1.28 2016/10/05 13:37:48 christos Exp $");
#include "opt_omap.h"
#include "edma.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/errno.h>
#include <sys/kernel.h>
#include <sys/proc.h>
#include <sys/queue.h>
#include <sys/mutex.h>
#include <sys/condvar.h>
#include <sys/bus.h>
#include <arm/omap/omap2_obiovar.h>
#include <arm/omap/omap2_reg.h>
#include <arm/omap/omap3_sdmmcreg.h>
#ifdef TI_AM335X
# include <arm/mainbus/mainbus.h>
# include <arm/omap/am335x_prcm.h>
# include <arm/omap/omap2_prcm.h>
# include <arm/omap/omap_var.h>
# include <arm/omap/sitara_cm.h>
# include <arm/omap/sitara_cmreg.h>
#endif
#if NEDMA > 0
# include <arm/omap/omap_edma.h>
#endif
#include <dev/sdmmc/sdhcreg.h>
#include <dev/sdmmc/sdhcvar.h>
#include <dev/sdmmc/sdmmcvar.h>
#ifdef TI_AM335X
#define EDMA_MAX_PARAMS 32
#endif
#ifdef OM3SDHC_DEBUG
int om3sdhcdebug = 1;
#define DPRINTF(n,s) do { if ((n) <= om3sdhcdebug) device_printf s; } while (0)
#else
#define DPRINTF(n,s) do {} while (0)
#endif
#define CLKD(kz) (sc->sc.sc_clkbase / (kz))
#define SDHC_READ(sc, reg) \
bus_space_read_4((sc)->sc_bst, (sc)->sc_sdhc_bsh, (reg))
#define SDHC_WRITE(sc, reg, val) \
bus_space_write_4((sc)->sc_bst, (sc)->sc_sdhc_bsh, (reg), (val))
struct mmchs_softc {
struct sdhc_softc sc;
bus_addr_t sc_addr;
bus_space_tag_t sc_bst;
bus_space_handle_t sc_bsh;
bus_space_handle_t sc_hl_bsh;
bus_space_handle_t sc_sdhc_bsh;
struct sdhc_host *sc_hosts[1];
int sc_irq;
void *sc_ih; /* interrupt vectoring */
#if NEDMA > 0
int sc_edmabase;
struct edma_channel *sc_edma_tx;
struct edma_channel *sc_edma_rx;
uint16_t sc_edma_param_tx[EDMA_MAX_PARAMS];
uint16_t sc_edma_param_rx[EDMA_MAX_PARAMS];
kcondvar_t sc_edma_cv;
bus_addr_t sc_edma_fifo;
bool sc_edma_pending;
bus_dmamap_t sc_edma_dmamap;
bus_dma_segment_t sc_edma_segs[1];
void *sc_edma_bbuf;
#endif
};
static int obiosdhc_match(device_t, cfdata_t, void *);
static void obiosdhc_attach(device_t, device_t, void *);
#ifdef TI_AM335X
static int mainbussdhc_match(device_t, cfdata_t, void *);
static void mainbussdhc_attach(device_t, device_t, void *);
#endif
static int mmchs_detach(device_t, int);
static int mmchs_attach(struct mmchs_softc *);
static void mmchs_init(device_t);
static int mmchs_bus_width(struct sdhc_softc *, int);
static int mmchs_rod(struct sdhc_softc *, int);
static int mmchs_write_protect(struct sdhc_softc *);
static int mmchs_card_detect(struct sdhc_softc *);
#if NEDMA > 0
static int mmchs_edma_init(struct mmchs_softc *, unsigned int);
static int mmchs_edma_xfer_data(struct sdhc_softc *, struct sdmmc_command *);
static void mmchs_edma_done(void *);
static int mmchs_edma_transfer(struct sdhc_softc *, struct sdmmc_command *);
#endif
#ifdef TI_AM335X
struct am335x_mmchs {
const char *as_name;
const char *as_parent_name;
bus_addr_t as_base_addr;
int as_intr;
struct omap_module as_module;
};
static const struct am335x_mmchs am335x_mmchs[] = {
{ "MMCHS0", "obio",
SDMMC1_BASE_TIAM335X, 64, { AM335X_PRCM_CM_PER, 0x3c } },
{ "MMC1", "obio",
SDMMC2_BASE_TIAM335X, 28, { AM335X_PRCM_CM_PER, 0xf4 } },
{ "MMCHS2", "mainbus",
SDMMC3_BASE_TIAM335X, 29, { AM335X_PRCM_CM_PER, 0xf8 } },
};
struct am335x_padconf {
const char *padname;
const char *padmode;
};
const struct am335x_padconf am335x_padconf_mmc1[] = {
{ "GPMC_CSn1", "mmc1_clk" },
{ "GPMC_CSn2", "mmc1_cmd" },
{ "GPMC_AD0", "mmc1_dat0" },
{ "GPMC_AD1", "mmc1_dat1" },
{ "GPMC_AD2", "mmc1_dat2" },
{ "GPMC_AD3", "mmc1_dat3" },
{ "GPMC_AD4", "mmc1_dat4" },
{ "GPMC_AD5", "mmc1_dat5" },
{ "GPMC_AD6", "mmc1_dat6" },
{ "GPMC_AD7", "mmc1_dat7" },
{ NULL, NULL }
};
#endif
CFATTACH_DECL_NEW(obiosdhc, sizeof(struct mmchs_softc),
obiosdhc_match, obiosdhc_attach, mmchs_detach, NULL);
static int
obiosdhc_match(device_t parent, cfdata_t cf, void *aux)
{
struct obio_attach_args * const oa = aux;
__USE(oa); // Simpler than complex ifdef.
#if defined(OMAP_3430)
if (oa->obio_addr == SDMMC1_BASE_3430
|| oa->obio_addr == SDMMC2_BASE_3430
|| oa->obio_addr == SDMMC3_BASE_3430)
return 1;
#elif defined(OMAP_3530)
if (oa->obio_addr == SDMMC1_BASE_3530
|| oa->obio_addr == SDMMC2_BASE_3530
|| oa->obio_addr == SDMMC3_BASE_3530)
return 1;
#elif defined(OMAP4) || defined(OMAP5)
if (oa->obio_addr == SDMMC1_BASE_4430
|| oa->obio_addr == SDMMC2_BASE_4430
|| oa->obio_addr == SDMMC3_BASE_4430
|| oa->obio_addr == SDMMC4_BASE_4430
|| oa->obio_addr == SDMMC5_BASE_4430)
return 1;
#endif
#ifdef TI_AM335X
for (size _t i = 0; i < __arraycount(am335x_mmchs); i++)
if (device_is_a(parent, am335x_mmchs[i].as_parent_name) &&
(oa->obio_addr == am335x_mmchs[i].as_base_addr) &&
(oa->obio_intr == am335x_mmchs[i].as_intr))
return 1;
#endif
return 0;
}
static void
obiosdhc_attach(device_t parent, device_t self, void *aux)
{
struct mmchs_softc * const sc = device_private(self);
struct obio_attach_args * const oa = aux;
int error;
sc->sc.sc_dmat = oa->obio_dmat;
sc->sc.sc_dev = self;
sc->sc_addr = oa->obio_addr;
sc->sc_bst = oa->obio_iot;
sc->sc_irq = oa->obio_intr;
#if defined(TI_AM335X)
sc->sc_edmabase = oa->obio_edmabase;
#endif
#if defined(TI_AM335X)
error = bus_space_map(sc->sc_bst, oa->obio_addr + OMAP4_SDMMC_HL_SIZE,
oa->obio_size - OMAP4_SDMMC_HL_SIZE, 0, &sc->sc_bsh);
#elif defined(OMAP4)
error = bus_space_map(sc->sc_bst, oa->obio_addr, oa->obio_size, 0,
&sc->sc_hl_bsh);
if (error == 0)
error = bus_space_subregion(sc->sc_bst, sc->sc_hl_bsh,
OMAP4_SDMMC_HL_SIZE, oa->obio_size - OMAP4_SDMMC_HL_SIZE,
&sc->sc_bsh);
#else
error = bus_space_map(sc->sc_bst, oa->obio_addr, oa->obio_size, 0,
&sc->sc_bsh);
#endif
if (error != 0) {
aprint_error("can't map registers: %d\n", error);
return;
}
if (mmchs_attach(sc) == 0)
mmchs_init(self);
}
#ifdef TI_AM335X
CFATTACH_DECL_NEW(mainbussdhc, sizeof(struct mmchs_softc),
mainbussdhc_match, mainbussdhc_attach, mmchs_detach, NULL);
static int
mainbussdhc_match(device_t parent, cfdata_t cf, void *aux)
{
struct mainbus_attach_args * const mb = aux;
int i;
for (i = 0; i < __arraycount(am335x_mmchs); i++)
if (device_is_a(parent, am335x_mmchs[i].as_parent_name) &&
(mb->mb_iobase == am335x_mmchs[i].as_base_addr) &&
(mb->mb_irq == am335x_mmchs[i].as_intr))
return 1;
return 0;
}
static void
mainbussdhc_attach(device_t parent, device_t self, void *aux)
{
struct mmchs_softc * const sc = device_private(self);
struct mainbus_attach_args * const mb = aux;
int error;
sc->sc.sc_dmat = &omap_bus_dma_tag;
sc->sc.sc_dev = self;
sc->sc_addr = mb->mb_iobase;
sc->sc_bst = &omap_bs_tag;
sc->sc_irq = mb->mb_irq;
sc->sc_edmabase = -1;
error = bus_space_map(sc->sc_bst, mb->mb_iobase + OMAP4_SDMMC_HL_SIZE,
mb->mb_iosize - OMAP4_SDMMC_HL_SIZE, 0, &sc->sc_bsh);
if (error != 0) {
aprint_error("can't map registers: %d\n", error);
return;
}
if (mmchs_attach(sc) == 0)
/* Ensure attach prcm, icu and edma. */
config_defer(self, mmchs_init);
}
#endif
static int
mmchs_attach(struct mmchs_softc *sc)
{
device_t dev = sc->sc.sc_dev;
prop_dictionary_t prop = device_properties(dev);
int error;
bool support8bit = false, dualvolt = false;
prop_dictionary_get_bool(prop, "8bit", &support8bit);
prop_dictionary_get_bool(prop, "dual-volt", &dualvolt);
sc->sc.sc_flags |= SDHC_FLAG_32BIT_ACCESS;
sc->sc.sc_flags |= SDHC_FLAG_NO_LED_ON;
sc->sc.sc_flags |= SDHC_FLAG_RSP136_CRC;
if (support8bit)
sc->sc.sc_flags |= SDHC_FLAG_8BIT_MODE;
#if defined(OMAP_3430)
sc->sc.sc_flags |= SDHC_FLAG_SINGLE_ONLY;
#elif defined(OMAP_3530) || defined(TI_DM37XX)
/*
* Advisory 2.1.1.128: MMC: Multiple Block Read Operation Issue
* from "OMAP3530/25/15/03 Applications Processor Silicon Revisions
* 3.1.2, 3.1, 3.0, 2.1, and 2.0".
*/
switch (omap_devid()) {
case DEVID_OMAP35X_ES10:
case DEVID_OMAP35X_ES20:
case DEVID_OMAP35X_ES21:
case DEVID_AMDM37X_ES10: /* XXXX ? */
case DEVID_AMDM37X_ES11: /* XXXX ? */
case DEVID_AMDM37X_ES12: /* XXXX ? */
sc->sc.sc_flags |= SDHC_FLAG_SINGLE_ONLY;
break;
default:
break;
}
sc->sc.sc_flags |= SDHC_FLAG_NO_HS_BIT;
#elif defined(TI_AM335X)
sc->sc.sc_flags |= SDHC_FLAG_WAIT_RESET;
#elif defined(OMAP_4430)
/*
* MMCHS_HCTL.HSPE Is Not Functional
* Errata ID: i626
*
* Due to design issue MMCHS_HCTL.HSPE bit does not work as intended.
* This means that the configuration must always be the normal speed
* mode configuration (MMCHS_HCTL.HSPE=0).
*/
sc->sc.sc_flags |= SDHC_FLAG_NO_HS_BIT;
#endif
sc->sc.sc_host = sc->sc_hosts;
sc->sc.sc_clkbase = 96000; /* 96MHZ */
if (!prop_dictionary_get_uint32(prop, "clkmask", &sc->sc.sc_clkmsk))
sc->sc.sc_clkmsk = 0x0000ffc0;
if (sc->sc_addr == SDMMC1_BASE_3530 ||
sc->sc_addr == SDMMC1_BASE_TIAM335X ||
sc->sc_addr == SDMMC1_BASE_4430 ||
dualvolt)
sc->sc.sc_caps = SDHC_VOLTAGE_SUPP_3_0V;
sc->sc.sc_vendor_rod = mmchs_rod;
sc->sc.sc_vendor_write_protect = mmchs_write_protect;
sc->sc.sc_vendor_card_detect = mmchs_card_detect;
sc->sc.sc_vendor_bus_width = mmchs_bus_width;
error = bus_space_subregion(sc->sc_bst, sc->sc_bsh,
OMAP3_SDMMC_SDHC_OFFSET, OMAP3_SDMMC_SDHC_SIZE, &sc->sc_sdhc_bsh);
if (error != 0) {
aprint_error("can't map subregion: %d\n", error);
return -1;
}
aprint_naive("\n");
aprint_normal(": SDHC controller\n");
return 0;
}
static void
mmchs_init(device_t dev)
{
struct mmchs_softc * const sc = device_private(dev);
uint32_t clkd, stat;
int error, timo, clksft, n;
#if defined(OMAP4)
uint32_t rev, hwinfo;
int x, y;
#elif defined(TI_AM335X)
int i;
#endif
#if NEDMA > 0
if (sc->sc_edmabase != -1) {
if (mmchs_edma_init(sc, sc->sc_edmabase) != 0)
goto no_dma;
cv_init(&sc->sc_edma_cv, "sdhcedma");
sc->sc_edma_fifo = sc->sc_addr +
#ifdef TI_AM335X
OMAP4_SDMMC_HL_SIZE +
#endif
OMAP3_SDMMC_SDHC_OFFSET + SDHC_DATA;
sc->sc.sc_flags |= SDHC_FLAG_USE_DMA;
sc->sc.sc_flags |= SDHC_FLAG_EXTERNAL_DMA;
sc->sc.sc_flags |= SDHC_FLAG_EXTDMA_DMAEN;
sc->sc.sc_vendor_transfer_data_dma = mmchs_edma_xfer_data;
aprint_normal_dev(sc->sc.sc_dev,
"EDMA tx channel %d, rx channel %d\n",
edma_channel_index(sc->sc_edma_tx),
edma_channel_index(sc->sc_edma_rx));
}
no_dma:
#endif
/* XXXXXX: Turn-on regulator via I2C. */
/* XXXXXX: And enable ICLOCK/FCLOCK. */
#ifdef TI_AM335X
/* XXX Not really AM335X-specific. */
for (i = 0; i < __arraycount(am335x_mmchs); i++)
if ((sc->sc_addr == am335x_mmchs[i].as_base_addr) &&
(sc->sc_irq == am335x_mmchs[i].as_intr)) {
prcm_module_enable(&am335x_mmchs[i].as_module);
break;
}
KASSERT(i < __arraycount(am335x_mmchs));
if (sc->sc_addr == SDMMC2_BASE_TIAM335X) {
const char *mode;
u_int state;
const struct am335x_padconf *padconf = am335x_padconf_mmc1;
for (i = 0; padconf[i].padname; i++) {
const char *padname = padconf[i].padname;
const char *padmode = padconf[i].padmode;
if (sitara_cm_padconf_get(padname, &mode, &state) == 0)
aprint_debug_dev(dev, "%s mode %s state %d\n",
padname, mode, state);
if (sitara_cm_padconf_set(padname, padmode,
(1 << 4) | (1 << 5)) != 0) {
aprint_error_dev(dev,
"can't switch %s pad from %s to %s\n",
padname, mode, padmode);
return;
}
}
}
#endif
#if defined(OMAP4)
rev = bus_space_read_4(sc->sc_bst, sc->sc_hl_bsh, MMCHS_HL_REV);
hwinfo = bus_space_read_4(sc->sc_bst, sc->sc_hl_bsh, MMCHS_HL_HWINFO);
x = 0;
switch (hwinfo & HL_HWINFO_MEM_SIZE_MASK) {
case HL_HWINFO_MEM_SIZE_512: x = 512; y = 512; break;
case HL_HWINFO_MEM_SIZE_1024: x = 1024; y = 1024; break;
case HL_HWINFO_MEM_SIZE_2048: x = 2048; y = 2048; break;
case HL_HWINFO_MEM_SIZE_4096: x = 4096; y = 2048; break;
}
if (hwinfo & HL_HWINFO_MADMA_EN) {
sc->sc.sc_flags |= SDHC_FLAG_USE_DMA;
sc->sc.sc_flags |= SDHC_FLAG_USE_ADMA2;
}
aprint_normal_dev(sc->sc.sc_dev, "IP Rev 0x%08x%s",
rev, hwinfo & HL_HWINFO_RETMODE ? ", Retention Mode" : "");
if (x != 0)
aprint_normal(", %d byte FIFO, max block length %d bytes",
x, y);
aprint_normal("\n");
#endif
SDHC_WRITE(sc, SDHC_CAPABILITIES,
SDHC_READ(sc, SDHC_CAPABILITIES) | SDHC_VOLTAGE_SUPP_1_8V);
if (sc->sc.sc_caps & SDHC_VOLTAGE_SUPP_3_0V)
SDHC_WRITE(sc, SDHC_CAPABILITIES,
SDHC_READ(sc, SDHC_CAPABILITIES) | SDHC_VOLTAGE_SUPP_3_0V);
/* MMCHS Soft reset */
bus_space_write_4(sc->sc_bst, sc->sc_bsh, MMCHS_SYSCONFIG,
SYSCONFIG_SOFTRESET);
timo = 3000000; /* XXXX 3 sec. */
while (timo--) {
if (bus_space_read_4(sc->sc_bst, sc->sc_bsh, MMCHS_SYSSTATUS) &
SYSSTATUS_RESETDONE)
break;
delay(1);
}
if (timo == 0)
aprint_error_dev(dev, "Soft reset timeout\n");
bus_space_write_4(sc->sc_bst, sc->sc_bsh, MMCHS_SYSCONFIG,
SYSCONFIG_ENAWAKEUP |
SYSCONFIG_AUTOIDLE |
SYSCONFIG_SIDLEMODE_AUTO |
SYSCONFIG_CLOCKACTIVITY_FCLK |
SYSCONFIG_CLOCKACTIVITY_ICLK);
sc->sc_ih = intr_establish(sc->sc_irq, IPL_VM, IST_LEVEL,
sdhc_intr, &sc->sc);
if (sc->sc_ih == NULL) {
aprint_error_dev(dev, "failed to establish interrupt %d\n",
sc->sc_irq);
return;
}
error = sdhc_host_found(&sc->sc, sc->sc_bst, sc->sc_sdhc_bsh,
OMAP3_SDMMC_SDHC_SIZE);
if (error != 0) {
aprint_error_dev(dev, "couldn't initialize host, error=%d\n",
error);
intr_disestablish(sc->sc_ih);
return;
}
clksft = ffs(sc->sc.sc_clkmsk) - 1;
/* Set SDVS 1.8v and DTW 1bit mode */
SDHC_WRITE(sc, SDHC_HOST_CTL,
SDHC_VOLTAGE_1_8V << (SDHC_VOLTAGE_SHIFT + 8));
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | SDHC_INTCLK_ENABLE |
SDHC_SDCLK_ENABLE);
SDHC_WRITE(sc, SDHC_HOST_CTL,
SDHC_READ(sc, SDHC_HOST_CTL) | SDHC_BUS_POWER << 8);
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | CLKD(150) << clksft);
/*
* 22.6.1.3.1.5 MMCHS Controller INIT Procedure Start
* from 'OMAP35x Applications Processor Technical Reference Manual'.
*
* During the INIT procedure, the MMCHS controller generates 80 clock
* periods. In order to keep the 1ms gap, the MMCHS controller should
* be configured to generate a clock whose frequency is smaller or
* equal to 80 KHz.
*/
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) & ~SDHC_SDCLK_ENABLE);
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) & ~sc->sc.sc_clkmsk);
clkd = CLKD(80);
n = 1;
while (clkd & ~(sc->sc.sc_clkmsk >> clksft)) {
clkd >>= 1;
n <<= 1;
}
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | (clkd << clksft));
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | SDHC_SDCLK_ENABLE);
bus_space_write_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON,
bus_space_read_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON) | CON_INIT);
SDHC_WRITE(sc, SDHC_TRANSFER_MODE, 0x00000000);
delay(1000);
stat = SDHC_READ(sc, SDHC_NINTR_STATUS);
SDHC_WRITE(sc, SDHC_NINTR_STATUS, stat | SDHC_COMMAND_COMPLETE);
bus_space_write_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON,
bus_space_read_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON) & ~CON_INIT);
SDHC_WRITE(sc, SDHC_NINTR_STATUS, 0xffffffff);
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) & ~SDHC_SDCLK_ENABLE);
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) & ~sc->sc.sc_clkmsk);
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | CLKD(150) << clksft);
timo = 3000000; /* XXXX 3 sec. */
while (--timo) {
if (SDHC_READ(sc, SDHC_CLOCK_CTL) & SDHC_INTCLK_STABLE)
break;
delay(1);
}
if (timo == 0)
aprint_error_dev(dev, "ICS timeout\n");
SDHC_WRITE(sc, SDHC_CLOCK_CTL,
SDHC_READ(sc, SDHC_CLOCK_CTL) | SDHC_SDCLK_ENABLE);
if (sc->sc.sc_flags & SDHC_FLAG_USE_ADMA2)
bus_space_write_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON,
bus_space_read_4(sc->sc_bst, sc->sc_bsh, MMCHS_CON) |
CON_MNS);
}
static int
mmchs_detach(device_t self, int flags)
{
// struct mmchs_softc *sc = device_private(self);
int error;
error = config_detach_children(self, flags);
/* XXXXXX: Regurator turn-off via I2C. */
/* XXXXXX: And disable ICLOCK/FCLOCK. */
return error;
}
static int
mmchs_rod(struct sdhc_softc *sc, int on)
{
struct mmchs_softc *hmsc = (struct mmchs_softc *)sc;
uint32_t con;
con = bus_space_read_4(hmsc->sc_bst, hmsc->sc_bsh, MMCHS_CON);
if (on)
con |= CON_OD;
else
con &= ~CON_OD;
bus_space_write_4(hmsc->sc_bst, hmsc->sc_bsh, MMCHS_CON, con);
return 0;
}
static int
mmchs_write_protect(struct sdhc_softc *sc)
{
/* Maybe board dependent, using GPIO. Get GPIO-pin from prop? */
return 0; /* XXXXXXX */
}
static int
mmchs_card_detect(struct sdhc_softc *sc)
{
/* Maybe board dependent, using GPIO. Get GPIO-pin from prop? */
return 1; /* XXXXXXXX */
}
static int
mmchs_bus_width(struct sdhc_softc *sc, int width)
{
struct mmchs_softc *hmsc = (struct mmchs_softc *)sc;
uint32_t con;
con = bus_space_read_4(hmsc->sc_bst, hmsc->sc_bsh, MMCHS_CON);
if (width == 8) {
con |= CON_DW8;
} else {
con &= ~CON_DW8;
}
bus_space_write_4(hmsc->sc_bst, hmsc->sc_bsh, MMCHS_CON, con);
return 0;
}
#if NEDMA > 0
static int
mmchs_edma_init(struct mmchs_softc *sc, unsigned int edmabase)
{
int i, error, rseg;
/* Request tx and rx DMA channels */
sc->sc_edma_tx = edma_channel_alloc(EDMA_TYPE_DMA, edmabase + 0,
mmchs_edma_done, sc);
KASSERT(sc->sc_edma_tx != NULL);
sc->sc_edma_rx = edma_channel_alloc(EDMA_TYPE_DMA, edmabase + 1,
mmchs_edma_done, sc);
KASSERT(sc->sc_edma_rx != NULL);
/* Allocate some PaRAM pages */
for (i = 0; i < __arraycount(sc->sc_edma_param_tx); i++) {
sc->sc_edma_param_tx[i] = edma_param_alloc(sc->sc_edma_tx);
KASSERT(sc->sc_edma_param_tx[i] != 0xffff);
}
for (i = 0; i < __arraycount(sc->sc_edma_param_rx); i++) {
sc->sc_edma_param_rx[i] = edma_param_alloc(sc->sc_edma_rx);
KASSERT(sc->sc_edma_param_rx[i] != 0xffff);
}
/* Setup bounce buffer */
error = bus_dmamem_alloc(sc->sc.sc_dmat, MAXPHYS, 32, MAXPHYS,
sc->sc_edma_segs, 1, &rseg, BUS_DMA_WAITOK);
if (error) {
aprint_error_dev(sc->sc.sc_dev,
"couldn't allocate dmamem: %d\n", error);
return error;
}
KASSERT(rseg == 1);
error = bus_dmamem_map(sc->sc.sc_dmat, sc->sc_edma_segs, rseg, MAXPHYS,
&sc->sc_edma_bbuf, BUS_DMA_WAITOK);
if (error) {
aprint_error_dev(sc->sc.sc_dev, "couldn't map dmamem: %d\n",
error);
return error;
}
error = bus_dmamap_create(sc->sc.sc_dmat, MAXPHYS, 1, MAXPHYS, 0,
BUS_DMA_WAITOK, &sc->sc_edma_dmamap);
if (error) {
aprint_error_dev(sc->sc.sc_dev, "couldn't create dmamap: %d\n",
error);
return error;
}
return error;
}
static int
mmchs_edma_xfer_data(struct sdhc_softc *sdhc_sc, struct sdmmc_command *cmd)
{
struct mmchs_softc *sc = device_private(sdhc_sc->sc_dev);
const bus_dmamap_t map = cmd->c_dmamap;
int seg, error;
bool bounce;
for (bounce = false, seg = 0; seg < cmd->c_dmamap->dm_nsegs; seg++) {
if ((cmd->c_dmamap->dm_segs[seg].ds_addr & 0x1f) != 0) {
bounce = true;
break;
}
}
if (bounce) {
error = bus_dmamap_load(sc->sc.sc_dmat, sc->sc_edma_dmamap,
sc->sc_edma_bbuf, MAXPHYS, NULL, BUS_DMA_WAITOK);
if (error) {
device_printf(sc->sc.sc_dev,
"[bounce] bus_dmamap_load failed: %d\n", error);
return error;
}
if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
bus_dmamap_sync(sc->sc.sc_dmat, sc->sc_edma_dmamap, 0,
MAXPHYS, BUS_DMASYNC_PREREAD);
} else {
memcpy(sc->sc_edma_bbuf, cmd->c_data, cmd->c_datalen);
bus_dmamap_sync(sc->sc.sc_dmat, sc->sc_edma_dmamap, 0,
MAXPHYS, BUS_DMASYNC_PREWRITE);
}
cmd->c_dmamap = sc->sc_edma_dmamap;
}
error = mmchs_edma_transfer(sdhc_sc, cmd);
if (bounce) {
if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
bus_dmamap_sync(sc->sc.sc_dmat, sc->sc_edma_dmamap, 0,
MAXPHYS, BUS_DMASYNC_POSTREAD);
} else {
bus_dmamap_sync(sc->sc.sc_dmat, sc->sc_edma_dmamap, 0,
MAXPHYS, BUS_DMASYNC_POSTWRITE);
}
bus_dmamap_unload(sc->sc.sc_dmat, sc->sc_edma_dmamap);
if (ISSET(cmd->c_flags, SCF_CMD_READ) && error == 0) {
memcpy(cmd->c_data, sc->sc_edma_bbuf, cmd->c_datalen);
}
cmd->c_dmamap = map;
}
return error;
}
static int
mmchs_edma_transfer(struct sdhc_softc *sdhc_sc, struct sdmmc_command *cmd)
{
struct mmchs_softc *sc = device_private(sdhc_sc->sc_dev);
kmutex_t *plock = sdhc_host_lock(sc->sc_hosts[0]);
struct edma_channel *edma;
uint16_t *edma_param;
struct edma_param ep;
size_t seg;
int error, resid = cmd->c_datalen;
int blksize = MIN(cmd->c_datalen, cmd->c_blklen);
KASSERT(mutex_owned(plock));
edma = ISSET(cmd->c_flags, SCF_CMD_READ) ?
sc->sc_edma_rx : sc->sc_edma_tx;
edma_param = ISSET(cmd->c_flags, SCF_CMD_READ) ?
sc->sc_edma_param_rx : sc->sc_edma_param_tx;
DPRINTF(1, (sc->sc.sc_dev, "edma xfer: nsegs=%d ch# %d\n",
cmd->c_dmamap->dm_nsegs, edma_channel_index(edma)));
if (cmd->c_dmamap->dm_nsegs > EDMA_MAX_PARAMS) {
return ENOMEM;
}
for (seg = 0; seg < cmd->c_dmamap->dm_nsegs; seg++) {
KASSERT(resid > 0);
const int xferlen = min(resid,
cmd->c_dmamap->dm_segs[seg].ds_len);
KASSERT(xferlen == cmd->c_dmamap->dm_segs[seg].ds_len ||
seg == cmd->c_dmamap->dm_nsegs - 1);
resid -= xferlen;
KASSERT((xferlen & 0x3) == 0);
ep.ep_opt = __SHIFTIN(2, EDMA_PARAM_OPT_FWID) /* 32-bit */;
ep.ep_opt |= __SHIFTIN(edma_channel_index(edma),
EDMA_PARAM_OPT_TCC);
if (seg == cmd->c_dmamap->dm_nsegs - 1) {
ep.ep_opt |= EDMA_PARAM_OPT_TCINTEN;
ep.ep_link = 0xffff;
} else {
ep.ep_link = EDMA_PARAM_BASE(edma_param[seg+1]);
}
if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
ep.ep_opt |= EDMA_PARAM_OPT_SAM;
ep.ep_src = sc->sc_edma_fifo;
ep.ep_dst = cmd->c_dmamap->dm_segs[seg].ds_addr;
} else {
ep.ep_opt |= EDMA_PARAM_OPT_DAM;
ep.ep_src = cmd->c_dmamap->dm_segs[seg].ds_addr;
ep.ep_dst = sc->sc_edma_fifo;
}
KASSERT(xferlen <= 65536 * 4);
/*
* In constant addressing mode, the address must be aligned
* to 256-bits.
*/
KASSERT((cmd->c_dmamap->dm_segs[seg].ds_addr & 0x1f) == 0);
/*
* For unknown reason, the A-DMA transfers never completes for
* transfers larger than 64 butes. So use a AB transfer,
* with a 64 bytes A len
*/
ep.ep_bcntrld = 0; /* not used for AB-synchronous mode */
ep.ep_opt |= EDMA_PARAM_OPT_SYNCDIM;
ep.ep_acnt = min(xferlen, 64);
ep.ep_bcnt = min(xferlen, blksize) / ep.ep_acnt;
ep.ep_ccnt = xferlen / (ep.ep_acnt * ep.ep_bcnt);
ep.ep_srcbidx = ep.ep_dstbidx = 0;
ep.ep_srccidx = ep.ep_dstcidx = 0;
if (ISSET(cmd->c_flags, SCF_CMD_READ)) {
ep.ep_dstbidx = ep.ep_acnt;
ep.ep_dstcidx = ep.ep_acnt * ep.ep_bcnt;
} else {
ep.ep_srcbidx = ep.ep_acnt;
ep.ep_srccidx = ep.ep_acnt * ep.ep_bcnt;
}
edma_set_param(edma, edma_param[seg], &ep);
#ifdef OM3SDHC_DEBUG
if (om3sdhcdebug >= 1) {
printf("target OPT: %08x\n", ep.ep_opt);
edma_dump_param(edma, edma_param[seg]);
}
#endif
}
error = 0;
sc->sc_edma_pending = true;
edma_transfer_enable(edma, edma_param[0]);
while (sc->sc_edma_pending) {
error = cv_timedwait(&sc->sc_edma_cv, plock, hz*10);
if (error == EWOULDBLOCK) {
device_printf(sc->sc.sc_dev, "transfer timeout!\n");
edma_dump(edma);
edma_dump_param(edma, edma_param[0]);
edma_halt(edma);
sc->sc_edma_pending = false;
error = ETIMEDOUT;
break;
}
}
edma_halt(edma);
return error;
}
static void
mmchs_edma_done(void *priv)
{
struct mmchs_softc *sc = priv;
kmutex_t *plock = sdhc_host_lock(sc->sc_hosts[0]);
mutex_enter(plock);
KASSERT(sc->sc_edma_pending == true);
sc->sc_edma_pending = false;
cv_broadcast(&sc->sc_edma_cv);
mutex_exit(plock);
}
#endif