mirror of https://gitee.com/openkylin/qemu.git
548 lines
14 KiB
C
548 lines
14 KiB
C
/*
|
|
* Intel XScale PXA255/270 MultiMediaCard/SD/SDIO Controller emulation.
|
|
*
|
|
* Copyright (c) 2006 Openedhand Ltd.
|
|
* Written by Andrzej Zaborowski <balrog@zabor.org>
|
|
*
|
|
* This code is licensed under the GPLv2.
|
|
*/
|
|
|
|
#include "hw.h"
|
|
#include "pxa.h"
|
|
#include "sd.h"
|
|
|
|
struct PXA2xxMMCIState {
|
|
qemu_irq irq;
|
|
void *dma;
|
|
|
|
SDState *card;
|
|
|
|
uint32_t status;
|
|
uint32_t clkrt;
|
|
uint32_t spi;
|
|
uint32_t cmdat;
|
|
uint32_t resp_tout;
|
|
uint32_t read_tout;
|
|
int blklen;
|
|
int numblk;
|
|
uint32_t intmask;
|
|
uint32_t intreq;
|
|
int cmd;
|
|
uint32_t arg;
|
|
|
|
int active;
|
|
int bytesleft;
|
|
uint8_t tx_fifo[64];
|
|
int tx_start;
|
|
int tx_len;
|
|
uint8_t rx_fifo[32];
|
|
int rx_start;
|
|
int rx_len;
|
|
uint16_t resp_fifo[9];
|
|
int resp_len;
|
|
|
|
int cmdreq;
|
|
int ac_width;
|
|
};
|
|
|
|
#define MMC_STRPCL 0x00 /* MMC Clock Start/Stop register */
|
|
#define MMC_STAT 0x04 /* MMC Status register */
|
|
#define MMC_CLKRT 0x08 /* MMC Clock Rate register */
|
|
#define MMC_SPI 0x0c /* MMC SPI Mode register */
|
|
#define MMC_CMDAT 0x10 /* MMC Command/Data register */
|
|
#define MMC_RESTO 0x14 /* MMC Response Time-Out register */
|
|
#define MMC_RDTO 0x18 /* MMC Read Time-Out register */
|
|
#define MMC_BLKLEN 0x1c /* MMC Block Length register */
|
|
#define MMC_NUMBLK 0x20 /* MMC Number of Blocks register */
|
|
#define MMC_PRTBUF 0x24 /* MMC Buffer Partly Full register */
|
|
#define MMC_I_MASK 0x28 /* MMC Interrupt Mask register */
|
|
#define MMC_I_REG 0x2c /* MMC Interrupt Request register */
|
|
#define MMC_CMD 0x30 /* MMC Command register */
|
|
#define MMC_ARGH 0x34 /* MMC Argument High register */
|
|
#define MMC_ARGL 0x38 /* MMC Argument Low register */
|
|
#define MMC_RES 0x3c /* MMC Response FIFO */
|
|
#define MMC_RXFIFO 0x40 /* MMC Receive FIFO */
|
|
#define MMC_TXFIFO 0x44 /* MMC Transmit FIFO */
|
|
#define MMC_RDWAIT 0x48 /* MMC RD_WAIT register */
|
|
#define MMC_BLKS_REM 0x4c /* MMC Blocks Remaining register */
|
|
|
|
/* Bitfield masks */
|
|
#define STRPCL_STOP_CLK (1 << 0)
|
|
#define STRPCL_STRT_CLK (1 << 1)
|
|
#define STAT_TOUT_RES (1 << 1)
|
|
#define STAT_CLK_EN (1 << 8)
|
|
#define STAT_DATA_DONE (1 << 11)
|
|
#define STAT_PRG_DONE (1 << 12)
|
|
#define STAT_END_CMDRES (1 << 13)
|
|
#define SPI_SPI_MODE (1 << 0)
|
|
#define CMDAT_RES_TYPE (3 << 0)
|
|
#define CMDAT_DATA_EN (1 << 2)
|
|
#define CMDAT_WR_RD (1 << 3)
|
|
#define CMDAT_DMA_EN (1 << 7)
|
|
#define CMDAT_STOP_TRAN (1 << 10)
|
|
#define INT_DATA_DONE (1 << 0)
|
|
#define INT_PRG_DONE (1 << 1)
|
|
#define INT_END_CMD (1 << 2)
|
|
#define INT_STOP_CMD (1 << 3)
|
|
#define INT_CLK_OFF (1 << 4)
|
|
#define INT_RXFIFO_REQ (1 << 5)
|
|
#define INT_TXFIFO_REQ (1 << 6)
|
|
#define INT_TINT (1 << 7)
|
|
#define INT_DAT_ERR (1 << 8)
|
|
#define INT_RES_ERR (1 << 9)
|
|
#define INT_RD_STALLED (1 << 10)
|
|
#define INT_SDIO_INT (1 << 11)
|
|
#define INT_SDIO_SACK (1 << 12)
|
|
#define PRTBUF_PRT_BUF (1 << 0)
|
|
|
|
/* Route internal interrupt lines to the global IC and DMA */
|
|
static void pxa2xx_mmci_int_update(PXA2xxMMCIState *s)
|
|
{
|
|
uint32_t mask = s->intmask;
|
|
if (s->cmdat & CMDAT_DMA_EN) {
|
|
mask |= INT_RXFIFO_REQ | INT_TXFIFO_REQ;
|
|
|
|
pxa2xx_dma_request(s->dma,
|
|
PXA2XX_RX_RQ_MMCI, !!(s->intreq & INT_RXFIFO_REQ));
|
|
pxa2xx_dma_request(s->dma,
|
|
PXA2XX_TX_RQ_MMCI, !!(s->intreq & INT_TXFIFO_REQ));
|
|
}
|
|
|
|
qemu_set_irq(s->irq, !!(s->intreq & ~mask));
|
|
}
|
|
|
|
static void pxa2xx_mmci_fifo_update(PXA2xxMMCIState *s)
|
|
{
|
|
if (!s->active)
|
|
return;
|
|
|
|
if (s->cmdat & CMDAT_WR_RD) {
|
|
while (s->bytesleft && s->tx_len) {
|
|
sd_write_data(s->card, s->tx_fifo[s->tx_start ++]);
|
|
s->tx_start &= 0x1f;
|
|
s->tx_len --;
|
|
s->bytesleft --;
|
|
}
|
|
if (s->bytesleft)
|
|
s->intreq |= INT_TXFIFO_REQ;
|
|
} else
|
|
while (s->bytesleft && s->rx_len < 32) {
|
|
s->rx_fifo[(s->rx_start + (s->rx_len ++)) & 0x1f] =
|
|
sd_read_data(s->card);
|
|
s->bytesleft --;
|
|
s->intreq |= INT_RXFIFO_REQ;
|
|
}
|
|
|
|
if (!s->bytesleft) {
|
|
s->active = 0;
|
|
s->intreq |= INT_DATA_DONE;
|
|
s->status |= STAT_DATA_DONE;
|
|
|
|
if (s->cmdat & CMDAT_WR_RD) {
|
|
s->intreq |= INT_PRG_DONE;
|
|
s->status |= STAT_PRG_DONE;
|
|
}
|
|
}
|
|
|
|
pxa2xx_mmci_int_update(s);
|
|
}
|
|
|
|
static void pxa2xx_mmci_wakequeues(PXA2xxMMCIState *s)
|
|
{
|
|
int rsplen, i;
|
|
SDRequest request;
|
|
uint8_t response[16];
|
|
|
|
s->active = 1;
|
|
s->rx_len = 0;
|
|
s->tx_len = 0;
|
|
s->cmdreq = 0;
|
|
|
|
request.cmd = s->cmd;
|
|
request.arg = s->arg;
|
|
request.crc = 0; /* FIXME */
|
|
|
|
rsplen = sd_do_command(s->card, &request, response);
|
|
s->intreq |= INT_END_CMD;
|
|
|
|
memset(s->resp_fifo, 0, sizeof(s->resp_fifo));
|
|
switch (s->cmdat & CMDAT_RES_TYPE) {
|
|
#define PXAMMCI_RESP(wd, value0, value1) \
|
|
s->resp_fifo[(wd) + 0] |= (value0); \
|
|
s->resp_fifo[(wd) + 1] |= (value1) << 8;
|
|
case 0: /* No response */
|
|
goto complete;
|
|
|
|
case 1: /* R1, R4, R5 or R6 */
|
|
if (rsplen < 4)
|
|
goto timeout;
|
|
goto complete;
|
|
|
|
case 2: /* R2 */
|
|
if (rsplen < 16)
|
|
goto timeout;
|
|
goto complete;
|
|
|
|
case 3: /* R3 */
|
|
if (rsplen < 4)
|
|
goto timeout;
|
|
goto complete;
|
|
|
|
complete:
|
|
for (i = 0; rsplen > 0; i ++, rsplen -= 2) {
|
|
PXAMMCI_RESP(i, response[i * 2], response[i * 2 + 1]);
|
|
}
|
|
s->status |= STAT_END_CMDRES;
|
|
|
|
if (!(s->cmdat & CMDAT_DATA_EN))
|
|
s->active = 0;
|
|
else
|
|
s->bytesleft = s->numblk * s->blklen;
|
|
|
|
s->resp_len = 0;
|
|
break;
|
|
|
|
timeout:
|
|
s->active = 0;
|
|
s->status |= STAT_TOUT_RES;
|
|
break;
|
|
}
|
|
|
|
pxa2xx_mmci_fifo_update(s);
|
|
}
|
|
|
|
static uint32_t pxa2xx_mmci_read(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
uint32_t ret;
|
|
|
|
switch (offset) {
|
|
case MMC_STRPCL:
|
|
return 0;
|
|
case MMC_STAT:
|
|
return s->status;
|
|
case MMC_CLKRT:
|
|
return s->clkrt;
|
|
case MMC_SPI:
|
|
return s->spi;
|
|
case MMC_CMDAT:
|
|
return s->cmdat;
|
|
case MMC_RESTO:
|
|
return s->resp_tout;
|
|
case MMC_RDTO:
|
|
return s->read_tout;
|
|
case MMC_BLKLEN:
|
|
return s->blklen;
|
|
case MMC_NUMBLK:
|
|
return s->numblk;
|
|
case MMC_PRTBUF:
|
|
return 0;
|
|
case MMC_I_MASK:
|
|
return s->intmask;
|
|
case MMC_I_REG:
|
|
return s->intreq;
|
|
case MMC_CMD:
|
|
return s->cmd | 0x40;
|
|
case MMC_ARGH:
|
|
return s->arg >> 16;
|
|
case MMC_ARGL:
|
|
return s->arg & 0xffff;
|
|
case MMC_RES:
|
|
if (s->resp_len < 9)
|
|
return s->resp_fifo[s->resp_len ++];
|
|
return 0;
|
|
case MMC_RXFIFO:
|
|
ret = 0;
|
|
while (s->ac_width -- && s->rx_len) {
|
|
ret |= s->rx_fifo[s->rx_start ++] << (s->ac_width << 3);
|
|
s->rx_start &= 0x1f;
|
|
s->rx_len --;
|
|
}
|
|
s->intreq &= ~INT_RXFIFO_REQ;
|
|
pxa2xx_mmci_fifo_update(s);
|
|
return ret;
|
|
case MMC_RDWAIT:
|
|
return 0;
|
|
case MMC_BLKS_REM:
|
|
return s->numblk;
|
|
default:
|
|
hw_error("%s: Bad offset " REG_FMT "\n", __FUNCTION__, offset);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void pxa2xx_mmci_write(void *opaque,
|
|
target_phys_addr_t offset, uint32_t value)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
|
|
switch (offset) {
|
|
case MMC_STRPCL:
|
|
if (value & STRPCL_STRT_CLK) {
|
|
s->status |= STAT_CLK_EN;
|
|
s->intreq &= ~INT_CLK_OFF;
|
|
|
|
if (s->cmdreq && !(s->cmdat & CMDAT_STOP_TRAN)) {
|
|
s->status &= STAT_CLK_EN;
|
|
pxa2xx_mmci_wakequeues(s);
|
|
}
|
|
}
|
|
|
|
if (value & STRPCL_STOP_CLK) {
|
|
s->status &= ~STAT_CLK_EN;
|
|
s->intreq |= INT_CLK_OFF;
|
|
s->active = 0;
|
|
}
|
|
|
|
pxa2xx_mmci_int_update(s);
|
|
break;
|
|
|
|
case MMC_CLKRT:
|
|
s->clkrt = value & 7;
|
|
break;
|
|
|
|
case MMC_SPI:
|
|
s->spi = value & 0xf;
|
|
if (value & SPI_SPI_MODE)
|
|
printf("%s: attempted to use card in SPI mode\n", __FUNCTION__);
|
|
break;
|
|
|
|
case MMC_CMDAT:
|
|
s->cmdat = value & 0x3dff;
|
|
s->active = 0;
|
|
s->cmdreq = 1;
|
|
if (!(value & CMDAT_STOP_TRAN)) {
|
|
s->status &= STAT_CLK_EN;
|
|
|
|
if (s->status & STAT_CLK_EN)
|
|
pxa2xx_mmci_wakequeues(s);
|
|
}
|
|
|
|
pxa2xx_mmci_int_update(s);
|
|
break;
|
|
|
|
case MMC_RESTO:
|
|
s->resp_tout = value & 0x7f;
|
|
break;
|
|
|
|
case MMC_RDTO:
|
|
s->read_tout = value & 0xffff;
|
|
break;
|
|
|
|
case MMC_BLKLEN:
|
|
s->blklen = value & 0xfff;
|
|
break;
|
|
|
|
case MMC_NUMBLK:
|
|
s->numblk = value & 0xffff;
|
|
break;
|
|
|
|
case MMC_PRTBUF:
|
|
if (value & PRTBUF_PRT_BUF) {
|
|
s->tx_start ^= 32;
|
|
s->tx_len = 0;
|
|
}
|
|
pxa2xx_mmci_fifo_update(s);
|
|
break;
|
|
|
|
case MMC_I_MASK:
|
|
s->intmask = value & 0x1fff;
|
|
pxa2xx_mmci_int_update(s);
|
|
break;
|
|
|
|
case MMC_CMD:
|
|
s->cmd = value & 0x3f;
|
|
break;
|
|
|
|
case MMC_ARGH:
|
|
s->arg &= 0x0000ffff;
|
|
s->arg |= value << 16;
|
|
break;
|
|
|
|
case MMC_ARGL:
|
|
s->arg &= 0xffff0000;
|
|
s->arg |= value & 0x0000ffff;
|
|
break;
|
|
|
|
case MMC_TXFIFO:
|
|
while (s->ac_width -- && s->tx_len < 0x20)
|
|
s->tx_fifo[(s->tx_start + (s->tx_len ++)) & 0x1f] =
|
|
(value >> (s->ac_width << 3)) & 0xff;
|
|
s->intreq &= ~INT_TXFIFO_REQ;
|
|
pxa2xx_mmci_fifo_update(s);
|
|
break;
|
|
|
|
case MMC_RDWAIT:
|
|
case MMC_BLKS_REM:
|
|
break;
|
|
|
|
default:
|
|
hw_error("%s: Bad offset " REG_FMT "\n", __FUNCTION__, offset);
|
|
}
|
|
}
|
|
|
|
static uint32_t pxa2xx_mmci_readb(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 1;
|
|
return pxa2xx_mmci_read(opaque, offset);
|
|
}
|
|
|
|
static uint32_t pxa2xx_mmci_readh(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 2;
|
|
return pxa2xx_mmci_read(opaque, offset);
|
|
}
|
|
|
|
static uint32_t pxa2xx_mmci_readw(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 4;
|
|
return pxa2xx_mmci_read(opaque, offset);
|
|
}
|
|
|
|
static CPUReadMemoryFunc *pxa2xx_mmci_readfn[] = {
|
|
pxa2xx_mmci_readb,
|
|
pxa2xx_mmci_readh,
|
|
pxa2xx_mmci_readw
|
|
};
|
|
|
|
static void pxa2xx_mmci_writeb(void *opaque,
|
|
target_phys_addr_t offset, uint32_t value)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 1;
|
|
pxa2xx_mmci_write(opaque, offset, value);
|
|
}
|
|
|
|
static void pxa2xx_mmci_writeh(void *opaque,
|
|
target_phys_addr_t offset, uint32_t value)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 2;
|
|
pxa2xx_mmci_write(opaque, offset, value);
|
|
}
|
|
|
|
static void pxa2xx_mmci_writew(void *opaque,
|
|
target_phys_addr_t offset, uint32_t value)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
s->ac_width = 4;
|
|
pxa2xx_mmci_write(opaque, offset, value);
|
|
}
|
|
|
|
static CPUWriteMemoryFunc *pxa2xx_mmci_writefn[] = {
|
|
pxa2xx_mmci_writeb,
|
|
pxa2xx_mmci_writeh,
|
|
pxa2xx_mmci_writew
|
|
};
|
|
|
|
static void pxa2xx_mmci_save(QEMUFile *f, void *opaque)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
int i;
|
|
|
|
qemu_put_be32s(f, &s->status);
|
|
qemu_put_be32s(f, &s->clkrt);
|
|
qemu_put_be32s(f, &s->spi);
|
|
qemu_put_be32s(f, &s->cmdat);
|
|
qemu_put_be32s(f, &s->resp_tout);
|
|
qemu_put_be32s(f, &s->read_tout);
|
|
qemu_put_be32(f, s->blklen);
|
|
qemu_put_be32(f, s->numblk);
|
|
qemu_put_be32s(f, &s->intmask);
|
|
qemu_put_be32s(f, &s->intreq);
|
|
qemu_put_be32(f, s->cmd);
|
|
qemu_put_be32s(f, &s->arg);
|
|
qemu_put_be32(f, s->cmdreq);
|
|
qemu_put_be32(f, s->active);
|
|
qemu_put_be32(f, s->bytesleft);
|
|
|
|
qemu_put_byte(f, s->tx_len);
|
|
for (i = 0; i < s->tx_len; i ++)
|
|
qemu_put_byte(f, s->tx_fifo[(s->tx_start + i) & 63]);
|
|
|
|
qemu_put_byte(f, s->rx_len);
|
|
for (i = 0; i < s->rx_len; i ++)
|
|
qemu_put_byte(f, s->rx_fifo[(s->rx_start + i) & 31]);
|
|
|
|
qemu_put_byte(f, s->resp_len);
|
|
for (i = s->resp_len; i < 9; i ++)
|
|
qemu_put_be16s(f, &s->resp_fifo[i]);
|
|
}
|
|
|
|
static int pxa2xx_mmci_load(QEMUFile *f, void *opaque, int version_id)
|
|
{
|
|
PXA2xxMMCIState *s = (PXA2xxMMCIState *) opaque;
|
|
int i;
|
|
|
|
qemu_get_be32s(f, &s->status);
|
|
qemu_get_be32s(f, &s->clkrt);
|
|
qemu_get_be32s(f, &s->spi);
|
|
qemu_get_be32s(f, &s->cmdat);
|
|
qemu_get_be32s(f, &s->resp_tout);
|
|
qemu_get_be32s(f, &s->read_tout);
|
|
s->blklen = qemu_get_be32(f);
|
|
s->numblk = qemu_get_be32(f);
|
|
qemu_get_be32s(f, &s->intmask);
|
|
qemu_get_be32s(f, &s->intreq);
|
|
s->cmd = qemu_get_be32(f);
|
|
qemu_get_be32s(f, &s->arg);
|
|
s->cmdreq = qemu_get_be32(f);
|
|
s->active = qemu_get_be32(f);
|
|
s->bytesleft = qemu_get_be32(f);
|
|
|
|
s->tx_len = qemu_get_byte(f);
|
|
s->tx_start = 0;
|
|
if (s->tx_len >= sizeof(s->tx_fifo) || s->tx_len < 0)
|
|
return -EINVAL;
|
|
for (i = 0; i < s->tx_len; i ++)
|
|
s->tx_fifo[i] = qemu_get_byte(f);
|
|
|
|
s->rx_len = qemu_get_byte(f);
|
|
s->rx_start = 0;
|
|
if (s->rx_len >= sizeof(s->rx_fifo) || s->rx_len < 0)
|
|
return -EINVAL;
|
|
for (i = 0; i < s->rx_len; i ++)
|
|
s->rx_fifo[i] = qemu_get_byte(f);
|
|
|
|
s->resp_len = qemu_get_byte(f);
|
|
if (s->resp_len > 9 || s->resp_len < 0)
|
|
return -EINVAL;
|
|
for (i = s->resp_len; i < 9; i ++)
|
|
qemu_get_be16s(f, &s->resp_fifo[i]);
|
|
|
|
return 0;
|
|
}
|
|
|
|
PXA2xxMMCIState *pxa2xx_mmci_init(target_phys_addr_t base,
|
|
BlockDriverState *bd, qemu_irq irq, void *dma)
|
|
{
|
|
int iomemtype;
|
|
PXA2xxMMCIState *s;
|
|
|
|
s = (PXA2xxMMCIState *) qemu_mallocz(sizeof(PXA2xxMMCIState));
|
|
s->irq = irq;
|
|
s->dma = dma;
|
|
|
|
iomemtype = cpu_register_io_memory(0, pxa2xx_mmci_readfn,
|
|
pxa2xx_mmci_writefn, s);
|
|
cpu_register_physical_memory(base, 0x00100000, iomemtype);
|
|
|
|
/* Instantiate the actual storage */
|
|
s->card = sd_init(bd, 0);
|
|
|
|
register_savevm("pxa2xx_mmci", 0, 0,
|
|
pxa2xx_mmci_save, pxa2xx_mmci_load, s);
|
|
|
|
return s;
|
|
}
|
|
|
|
void pxa2xx_mmci_handlers(PXA2xxMMCIState *s, qemu_irq readonly,
|
|
qemu_irq coverswitch)
|
|
{
|
|
sd_set_cb(s->card, readonly, coverswitch);
|
|
}
|