mirror of https://github.com/proxmox/mirror_qemu
1001 lines
27 KiB
C
1001 lines
27 KiB
C
/*
|
|
* Intel XScale PXA255/270 LCDC emulation.
|
|
*
|
|
* Copyright (c) 2006 Openedhand Ltd.
|
|
* Written by Andrzej Zaborowski <balrog@zabor.org>
|
|
*
|
|
* This code is licensed under the GPLv2.
|
|
*/
|
|
|
|
#include "vl.h"
|
|
|
|
typedef void (*drawfn)(uint32_t *, uint8_t *, const uint8_t *, int, int);
|
|
|
|
struct pxa2xx_lcdc_s {
|
|
target_phys_addr_t base;
|
|
qemu_irq irq;
|
|
int irqlevel;
|
|
|
|
int invalidated;
|
|
DisplayState *ds;
|
|
drawfn *line_fn[2];
|
|
int dest_width;
|
|
int xres, yres;
|
|
int pal_for;
|
|
int transp;
|
|
enum {
|
|
pxa_lcdc_2bpp = 1,
|
|
pxa_lcdc_4bpp = 2,
|
|
pxa_lcdc_8bpp = 3,
|
|
pxa_lcdc_16bpp = 4,
|
|
pxa_lcdc_18bpp = 5,
|
|
pxa_lcdc_18pbpp = 6,
|
|
pxa_lcdc_19bpp = 7,
|
|
pxa_lcdc_19pbpp = 8,
|
|
pxa_lcdc_24bpp = 9,
|
|
pxa_lcdc_25bpp = 10,
|
|
} bpp;
|
|
|
|
uint32_t control[6];
|
|
uint32_t status[2];
|
|
uint32_t ovl1c[2];
|
|
uint32_t ovl2c[2];
|
|
uint32_t ccr;
|
|
uint32_t cmdcr;
|
|
uint32_t trgbr;
|
|
uint32_t tcr;
|
|
uint32_t liidr;
|
|
uint8_t bscntr;
|
|
|
|
struct {
|
|
target_phys_addr_t branch;
|
|
int up;
|
|
uint8_t palette[1024];
|
|
uint8_t pbuffer[1024];
|
|
void (*redraw)(struct pxa2xx_lcdc_s *s, uint8_t *fb,
|
|
int *miny, int *maxy);
|
|
|
|
target_phys_addr_t descriptor;
|
|
target_phys_addr_t source;
|
|
uint32_t id;
|
|
uint32_t command;
|
|
} dma_ch[7];
|
|
|
|
void (*vsync_cb)(void *opaque);
|
|
void *opaque;
|
|
int orientation;
|
|
};
|
|
|
|
struct __attribute__ ((__packed__)) pxa_frame_descriptor_s {
|
|
uint32_t fdaddr;
|
|
uint32_t fsaddr;
|
|
uint32_t fidr;
|
|
uint32_t ldcmd;
|
|
};
|
|
|
|
#define LCCR0 0x000 /* LCD Controller Control register 0 */
|
|
#define LCCR1 0x004 /* LCD Controller Control register 1 */
|
|
#define LCCR2 0x008 /* LCD Controller Control register 2 */
|
|
#define LCCR3 0x00c /* LCD Controller Control register 3 */
|
|
#define LCCR4 0x010 /* LCD Controller Control register 4 */
|
|
#define LCCR5 0x014 /* LCD Controller Control register 5 */
|
|
|
|
#define FBR0 0x020 /* DMA Channel 0 Frame Branch register */
|
|
#define FBR1 0x024 /* DMA Channel 1 Frame Branch register */
|
|
#define FBR2 0x028 /* DMA Channel 2 Frame Branch register */
|
|
#define FBR3 0x02c /* DMA Channel 3 Frame Branch register */
|
|
#define FBR4 0x030 /* DMA Channel 4 Frame Branch register */
|
|
#define FBR5 0x110 /* DMA Channel 5 Frame Branch register */
|
|
#define FBR6 0x114 /* DMA Channel 6 Frame Branch register */
|
|
|
|
#define LCSR1 0x034 /* LCD Controller Status register 1 */
|
|
#define LCSR0 0x038 /* LCD Controller Status register 0 */
|
|
#define LIIDR 0x03c /* LCD Controller Interrupt ID register */
|
|
|
|
#define TRGBR 0x040 /* TMED RGB Seed register */
|
|
#define TCR 0x044 /* TMED Control register */
|
|
|
|
#define OVL1C1 0x050 /* Overlay 1 Control register 1 */
|
|
#define OVL1C2 0x060 /* Overlay 1 Control register 2 */
|
|
#define OVL2C1 0x070 /* Overlay 2 Control register 1 */
|
|
#define OVL2C2 0x080 /* Overlay 2 Control register 2 */
|
|
#define CCR 0x090 /* Cursor Control register */
|
|
|
|
#define CMDCR 0x100 /* Command Control register */
|
|
#define PRSR 0x104 /* Panel Read Status register */
|
|
|
|
#define PXA_LCDDMA_CHANS 7
|
|
#define DMA_FDADR 0x00 /* Frame Descriptor Address register */
|
|
#define DMA_FSADR 0x04 /* Frame Source Address register */
|
|
#define DMA_FIDR 0x08 /* Frame ID register */
|
|
#define DMA_LDCMD 0x0c /* Command register */
|
|
|
|
/* LCD Buffer Strength Control register */
|
|
#define BSCNTR 0x04000054
|
|
|
|
/* Bitfield masks */
|
|
#define LCCR0_ENB (1 << 0)
|
|
#define LCCR0_CMS (1 << 1)
|
|
#define LCCR0_SDS (1 << 2)
|
|
#define LCCR0_LDM (1 << 3)
|
|
#define LCCR0_SOFM0 (1 << 4)
|
|
#define LCCR0_IUM (1 << 5)
|
|
#define LCCR0_EOFM0 (1 << 6)
|
|
#define LCCR0_PAS (1 << 7)
|
|
#define LCCR0_DPD (1 << 9)
|
|
#define LCCR0_DIS (1 << 10)
|
|
#define LCCR0_QDM (1 << 11)
|
|
#define LCCR0_PDD (0xff << 12)
|
|
#define LCCR0_BSM0 (1 << 20)
|
|
#define LCCR0_OUM (1 << 21)
|
|
#define LCCR0_LCDT (1 << 22)
|
|
#define LCCR0_RDSTM (1 << 23)
|
|
#define LCCR0_CMDIM (1 << 24)
|
|
#define LCCR0_OUC (1 << 25)
|
|
#define LCCR0_LDDALT (1 << 26)
|
|
#define LCCR1_PPL(x) ((x) & 0x3ff)
|
|
#define LCCR2_LPP(x) ((x) & 0x3ff)
|
|
#define LCCR3_API (15 << 16)
|
|
#define LCCR3_BPP(x) ((((x) >> 24) & 7) | (((x) >> 26) & 8))
|
|
#define LCCR3_PDFOR(x) (((x) >> 30) & 3)
|
|
#define LCCR4_K1(x) (((x) >> 0) & 7)
|
|
#define LCCR4_K2(x) (((x) >> 3) & 7)
|
|
#define LCCR4_K3(x) (((x) >> 6) & 7)
|
|
#define LCCR4_PALFOR(x) (((x) >> 15) & 3)
|
|
#define LCCR5_SOFM(ch) (1 << (ch - 1))
|
|
#define LCCR5_EOFM(ch) (1 << (ch + 7))
|
|
#define LCCR5_BSM(ch) (1 << (ch + 15))
|
|
#define LCCR5_IUM(ch) (1 << (ch + 23))
|
|
#define OVLC1_EN (1 << 31)
|
|
#define CCR_CEN (1 << 31)
|
|
#define FBR_BRA (1 << 0)
|
|
#define FBR_BINT (1 << 1)
|
|
#define FBR_SRCADDR (0xfffffff << 4)
|
|
#define LCSR0_LDD (1 << 0)
|
|
#define LCSR0_SOF0 (1 << 1)
|
|
#define LCSR0_BER (1 << 2)
|
|
#define LCSR0_ABC (1 << 3)
|
|
#define LCSR0_IU0 (1 << 4)
|
|
#define LCSR0_IU1 (1 << 5)
|
|
#define LCSR0_OU (1 << 6)
|
|
#define LCSR0_QD (1 << 7)
|
|
#define LCSR0_EOF0 (1 << 8)
|
|
#define LCSR0_BS0 (1 << 9)
|
|
#define LCSR0_SINT (1 << 10)
|
|
#define LCSR0_RDST (1 << 11)
|
|
#define LCSR0_CMDINT (1 << 12)
|
|
#define LCSR0_BERCH(x) (((x) & 7) << 28)
|
|
#define LCSR1_SOF(ch) (1 << (ch - 1))
|
|
#define LCSR1_EOF(ch) (1 << (ch + 7))
|
|
#define LCSR1_BS(ch) (1 << (ch + 15))
|
|
#define LCSR1_IU(ch) (1 << (ch + 23))
|
|
#define LDCMD_LENGTH(x) ((x) & 0x001ffffc)
|
|
#define LDCMD_EOFINT (1 << 21)
|
|
#define LDCMD_SOFINT (1 << 22)
|
|
#define LDCMD_PAL (1 << 26)
|
|
|
|
/* Route internal interrupt lines to the global IC */
|
|
static void pxa2xx_lcdc_int_update(struct pxa2xx_lcdc_s *s)
|
|
{
|
|
int level = 0;
|
|
level |= (s->status[0] & LCSR0_LDD) && !(s->control[0] & LCCR0_LDM);
|
|
level |= (s->status[0] & LCSR0_SOF0) && !(s->control[0] & LCCR0_SOFM0);
|
|
level |= (s->status[0] & LCSR0_IU0) && !(s->control[0] & LCCR0_IUM);
|
|
level |= (s->status[0] & LCSR0_IU1) && !(s->control[5] & LCCR5_IUM(1));
|
|
level |= (s->status[0] & LCSR0_OU) && !(s->control[0] & LCCR0_OUM);
|
|
level |= (s->status[0] & LCSR0_QD) && !(s->control[0] & LCCR0_QDM);
|
|
level |= (s->status[0] & LCSR0_EOF0) && !(s->control[0] & LCCR0_EOFM0);
|
|
level |= (s->status[0] & LCSR0_BS0) && !(s->control[0] & LCCR0_BSM0);
|
|
level |= (s->status[0] & LCSR0_RDST) && !(s->control[0] & LCCR0_RDSTM);
|
|
level |= (s->status[0] & LCSR0_CMDINT) && !(s->control[0] & LCCR0_CMDIM);
|
|
level |= (s->status[1] & ~s->control[5]);
|
|
|
|
qemu_set_irq(s->irq, !!level);
|
|
s->irqlevel = level;
|
|
}
|
|
|
|
/* Set Branch Status interrupt high and poke associated registers */
|
|
static inline void pxa2xx_dma_bs_set(struct pxa2xx_lcdc_s *s, int ch)
|
|
{
|
|
int unmasked;
|
|
if (ch == 0) {
|
|
s->status[0] |= LCSR0_BS0;
|
|
unmasked = !(s->control[0] & LCCR0_BSM0);
|
|
} else {
|
|
s->status[1] |= LCSR1_BS(ch);
|
|
unmasked = !(s->control[5] & LCCR5_BSM(ch));
|
|
}
|
|
|
|
if (unmasked) {
|
|
if (s->irqlevel)
|
|
s->status[0] |= LCSR0_SINT;
|
|
else
|
|
s->liidr = s->dma_ch[ch].id;
|
|
}
|
|
}
|
|
|
|
/* Set Start Of Frame Status interrupt high and poke associated registers */
|
|
static inline void pxa2xx_dma_sof_set(struct pxa2xx_lcdc_s *s, int ch)
|
|
{
|
|
int unmasked;
|
|
if (!(s->dma_ch[ch].command & LDCMD_SOFINT))
|
|
return;
|
|
|
|
if (ch == 0) {
|
|
s->status[0] |= LCSR0_SOF0;
|
|
unmasked = !(s->control[0] & LCCR0_SOFM0);
|
|
} else {
|
|
s->status[1] |= LCSR1_SOF(ch);
|
|
unmasked = !(s->control[5] & LCCR5_SOFM(ch));
|
|
}
|
|
|
|
if (unmasked) {
|
|
if (s->irqlevel)
|
|
s->status[0] |= LCSR0_SINT;
|
|
else
|
|
s->liidr = s->dma_ch[ch].id;
|
|
}
|
|
}
|
|
|
|
/* Set End Of Frame Status interrupt high and poke associated registers */
|
|
static inline void pxa2xx_dma_eof_set(struct pxa2xx_lcdc_s *s, int ch)
|
|
{
|
|
int unmasked;
|
|
if (!(s->dma_ch[ch].command & LDCMD_EOFINT))
|
|
return;
|
|
|
|
if (ch == 0) {
|
|
s->status[0] |= LCSR0_EOF0;
|
|
unmasked = !(s->control[0] & LCCR0_EOFM0);
|
|
} else {
|
|
s->status[1] |= LCSR1_EOF(ch);
|
|
unmasked = !(s->control[5] & LCCR5_EOFM(ch));
|
|
}
|
|
|
|
if (unmasked) {
|
|
if (s->irqlevel)
|
|
s->status[0] |= LCSR0_SINT;
|
|
else
|
|
s->liidr = s->dma_ch[ch].id;
|
|
}
|
|
}
|
|
|
|
/* Set Bus Error Status interrupt high and poke associated registers */
|
|
static inline void pxa2xx_dma_ber_set(struct pxa2xx_lcdc_s *s, int ch)
|
|
{
|
|
s->status[0] |= LCSR0_BERCH(ch) | LCSR0_BER;
|
|
if (s->irqlevel)
|
|
s->status[0] |= LCSR0_SINT;
|
|
else
|
|
s->liidr = s->dma_ch[ch].id;
|
|
}
|
|
|
|
/* Set Read Status interrupt high and poke associated registers */
|
|
static inline void pxa2xx_dma_rdst_set(struct pxa2xx_lcdc_s *s)
|
|
{
|
|
s->status[0] |= LCSR0_RDST;
|
|
if (s->irqlevel && !(s->control[0] & LCCR0_RDSTM))
|
|
s->status[0] |= LCSR0_SINT;
|
|
}
|
|
|
|
/* Load new Frame Descriptors from DMA */
|
|
static void pxa2xx_descriptor_load(struct pxa2xx_lcdc_s *s)
|
|
{
|
|
struct pxa_frame_descriptor_s *desc[PXA_LCDDMA_CHANS];
|
|
target_phys_addr_t descptr;
|
|
int i;
|
|
|
|
for (i = 0; i < PXA_LCDDMA_CHANS; i ++) {
|
|
desc[i] = 0;
|
|
s->dma_ch[i].source = 0;
|
|
|
|
if (!s->dma_ch[i].up)
|
|
continue;
|
|
|
|
if (s->dma_ch[i].branch & FBR_BRA) {
|
|
descptr = s->dma_ch[i].branch & FBR_SRCADDR;
|
|
if (s->dma_ch[i].branch & FBR_BINT)
|
|
pxa2xx_dma_bs_set(s, i);
|
|
s->dma_ch[i].branch &= ~FBR_BRA;
|
|
} else
|
|
descptr = s->dma_ch[i].descriptor;
|
|
|
|
if (!(descptr >= PXA2XX_SDRAM_BASE && descptr +
|
|
sizeof(*desc[i]) <= PXA2XX_SDRAM_BASE + phys_ram_size))
|
|
continue;
|
|
|
|
descptr -= PXA2XX_SDRAM_BASE;
|
|
desc[i] = (struct pxa_frame_descriptor_s *) (phys_ram_base + descptr);
|
|
s->dma_ch[i].descriptor = desc[i]->fdaddr;
|
|
s->dma_ch[i].source = desc[i]->fsaddr;
|
|
s->dma_ch[i].id = desc[i]->fidr;
|
|
s->dma_ch[i].command = desc[i]->ldcmd;
|
|
}
|
|
}
|
|
|
|
static uint32_t pxa2xx_lcdc_read(void *opaque, target_phys_addr_t offset)
|
|
{
|
|
struct pxa2xx_lcdc_s *s = (struct pxa2xx_lcdc_s *) opaque;
|
|
int ch;
|
|
offset -= s->base;
|
|
|
|
switch (offset) {
|
|
case LCCR0:
|
|
return s->control[0];
|
|
case LCCR1:
|
|
return s->control[1];
|
|
case LCCR2:
|
|
return s->control[2];
|
|
case LCCR3:
|
|
return s->control[3];
|
|
case LCCR4:
|
|
return s->control[4];
|
|
case LCCR5:
|
|
return s->control[5];
|
|
|
|
case OVL1C1:
|
|
return s->ovl1c[0];
|
|
case OVL1C2:
|
|
return s->ovl1c[1];
|
|
case OVL2C1:
|
|
return s->ovl2c[0];
|
|
case OVL2C2:
|
|
return s->ovl2c[1];
|
|
|
|
case CCR:
|
|
return s->ccr;
|
|
|
|
case CMDCR:
|
|
return s->cmdcr;
|
|
|
|
case TRGBR:
|
|
return s->trgbr;
|
|
case TCR:
|
|
return s->tcr;
|
|
|
|
case 0x200 ... 0x1000: /* DMA per-channel registers */
|
|
ch = (offset - 0x200) >> 4;
|
|
if (!(ch >= 0 && ch < PXA_LCDDMA_CHANS))
|
|
goto fail;
|
|
|
|
switch (offset & 0xf) {
|
|
case DMA_FDADR:
|
|
return s->dma_ch[ch].descriptor;
|
|
case DMA_FSADR:
|
|
return s->dma_ch[ch].source;
|
|
case DMA_FIDR:
|
|
return s->dma_ch[ch].id;
|
|
case DMA_LDCMD:
|
|
return s->dma_ch[ch].command;
|
|
default:
|
|
goto fail;
|
|
}
|
|
|
|
case FBR0:
|
|
return s->dma_ch[0].branch;
|
|
case FBR1:
|
|
return s->dma_ch[1].branch;
|
|
case FBR2:
|
|
return s->dma_ch[2].branch;
|
|
case FBR3:
|
|
return s->dma_ch[3].branch;
|
|
case FBR4:
|
|
return s->dma_ch[4].branch;
|
|
case FBR5:
|
|
return s->dma_ch[5].branch;
|
|
case FBR6:
|
|
return s->dma_ch[6].branch;
|
|
|
|
case BSCNTR:
|
|
return s->bscntr;
|
|
|
|
case PRSR:
|
|
return 0;
|
|
|
|
case LCSR0:
|
|
return s->status[0];
|
|
case LCSR1:
|
|
return s->status[1];
|
|
case LIIDR:
|
|
return s->liidr;
|
|
|
|
default:
|
|
fail:
|
|
cpu_abort(cpu_single_env,
|
|
"%s: Bad offset " REG_FMT "\n", __FUNCTION__, offset);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void pxa2xx_lcdc_write(void *opaque,
|
|
target_phys_addr_t offset, uint32_t value)
|
|
{
|
|
struct pxa2xx_lcdc_s *s = (struct pxa2xx_lcdc_s *) opaque;
|
|
int ch;
|
|
offset -= s->base;
|
|
|
|
switch (offset) {
|
|
case LCCR0:
|
|
/* ACK Quick Disable done */
|
|
if ((s->control[0] & LCCR0_ENB) && !(value & LCCR0_ENB))
|
|
s->status[0] |= LCSR0_QD;
|
|
|
|
if (!(s->control[0] & LCCR0_LCDT) && (value & LCCR0_LCDT))
|
|
printf("%s: internal frame buffer unsupported\n", __FUNCTION__);
|
|
|
|
if ((s->control[3] & LCCR3_API) &&
|
|
(value & LCCR0_ENB) && !(value & LCCR0_LCDT))
|
|
s->status[0] |= LCSR0_ABC;
|
|
|
|
s->control[0] = value & 0x07ffffff;
|
|
pxa2xx_lcdc_int_update(s);
|
|
|
|
s->dma_ch[0].up = !!(value & LCCR0_ENB);
|
|
s->dma_ch[1].up = (s->ovl1c[0] & OVLC1_EN) || (value & LCCR0_SDS);
|
|
break;
|
|
|
|
case LCCR1:
|
|
s->control[1] = value;
|
|
break;
|
|
|
|
case LCCR2:
|
|
s->control[2] = value;
|
|
break;
|
|
|
|
case LCCR3:
|
|
s->control[3] = value & 0xefffffff;
|
|
s->bpp = LCCR3_BPP(value);
|
|
break;
|
|
|
|
case LCCR4:
|
|
s->control[4] = value & 0x83ff81ff;
|
|
break;
|
|
|
|
case LCCR5:
|
|
s->control[5] = value & 0x3f3f3f3f;
|
|
break;
|
|
|
|
case OVL1C1:
|
|
if (!(s->ovl1c[0] & OVLC1_EN) && (value & OVLC1_EN))
|
|
printf("%s: Overlay 1 not supported\n", __FUNCTION__);
|
|
|
|
s->ovl1c[0] = value & 0x80ffffff;
|
|
s->dma_ch[1].up = (value & OVLC1_EN) || (s->control[0] & LCCR0_SDS);
|
|
break;
|
|
|
|
case OVL1C2:
|
|
s->ovl1c[1] = value & 0x000fffff;
|
|
break;
|
|
|
|
case OVL2C1:
|
|
if (!(s->ovl2c[0] & OVLC1_EN) && (value & OVLC1_EN))
|
|
printf("%s: Overlay 2 not supported\n", __FUNCTION__);
|
|
|
|
s->ovl2c[0] = value & 0x80ffffff;
|
|
s->dma_ch[2].up = !!(value & OVLC1_EN);
|
|
s->dma_ch[3].up = !!(value & OVLC1_EN);
|
|
s->dma_ch[4].up = !!(value & OVLC1_EN);
|
|
break;
|
|
|
|
case OVL2C2:
|
|
s->ovl2c[1] = value & 0x007fffff;
|
|
break;
|
|
|
|
case CCR:
|
|
if (!(s->ccr & CCR_CEN) && (value & CCR_CEN))
|
|
printf("%s: Hardware cursor unimplemented\n", __FUNCTION__);
|
|
|
|
s->ccr = value & 0x81ffffe7;
|
|
s->dma_ch[5].up = !!(value & CCR_CEN);
|
|
break;
|
|
|
|
case CMDCR:
|
|
s->cmdcr = value & 0xff;
|
|
break;
|
|
|
|
case TRGBR:
|
|
s->trgbr = value & 0x00ffffff;
|
|
break;
|
|
|
|
case TCR:
|
|
s->tcr = value & 0x7fff;
|
|
break;
|
|
|
|
case 0x200 ... 0x1000: /* DMA per-channel registers */
|
|
ch = (offset - 0x200) >> 4;
|
|
if (!(ch >= 0 && ch < PXA_LCDDMA_CHANS))
|
|
goto fail;
|
|
|
|
switch (offset & 0xf) {
|
|
case DMA_FDADR:
|
|
s->dma_ch[ch].descriptor = value & 0xfffffff0;
|
|
break;
|
|
|
|
default:
|
|
goto fail;
|
|
}
|
|
break;
|
|
|
|
case FBR0:
|
|
s->dma_ch[0].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR1:
|
|
s->dma_ch[1].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR2:
|
|
s->dma_ch[2].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR3:
|
|
s->dma_ch[3].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR4:
|
|
s->dma_ch[4].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR5:
|
|
s->dma_ch[5].branch = value & 0xfffffff3;
|
|
break;
|
|
case FBR6:
|
|
s->dma_ch[6].branch = value & 0xfffffff3;
|
|
break;
|
|
|
|
case BSCNTR:
|
|
s->bscntr = value & 0xf;
|
|
break;
|
|
|
|
case PRSR:
|
|
break;
|
|
|
|
case LCSR0:
|
|
s->status[0] &= ~(value & 0xfff);
|
|
if (value & LCSR0_BER)
|
|
s->status[0] &= ~LCSR0_BERCH(7);
|
|
break;
|
|
|
|
case LCSR1:
|
|
s->status[1] &= ~(value & 0x3e3f3f);
|
|
break;
|
|
|
|
default:
|
|
fail:
|
|
cpu_abort(cpu_single_env,
|
|
"%s: Bad offset " REG_FMT "\n", __FUNCTION__, offset);
|
|
}
|
|
}
|
|
|
|
static CPUReadMemoryFunc *pxa2xx_lcdc_readfn[] = {
|
|
pxa2xx_lcdc_read,
|
|
pxa2xx_lcdc_read,
|
|
pxa2xx_lcdc_read
|
|
};
|
|
|
|
static CPUWriteMemoryFunc *pxa2xx_lcdc_writefn[] = {
|
|
pxa2xx_lcdc_write,
|
|
pxa2xx_lcdc_write,
|
|
pxa2xx_lcdc_write
|
|
};
|
|
|
|
static inline
|
|
uint32_t rgb_to_pixel8(unsigned int r, unsigned int g, unsigned b)
|
|
{
|
|
return ((r >> 5) << 5) | ((g >> 5) << 2) | (b >> 6);
|
|
}
|
|
|
|
static inline
|
|
uint32_t rgb_to_pixel15(unsigned int r, unsigned int g, unsigned b)
|
|
{
|
|
return ((r >> 3) << 10) | ((g >> 3) << 5) | (b >> 3);
|
|
}
|
|
|
|
static inline
|
|
uint32_t rgb_to_pixel16(unsigned int r, unsigned int g, unsigned b)
|
|
{
|
|
return ((r >> 3) << 11) | ((g >> 2) << 5) | (b >> 3);
|
|
}
|
|
|
|
static inline
|
|
uint32_t rgb_to_pixel24(unsigned int r, unsigned int g, unsigned b)
|
|
{
|
|
return (r << 16) | (g << 8) | b;
|
|
}
|
|
|
|
static inline
|
|
uint32_t rgb_to_pixel32(unsigned int r, unsigned int g, unsigned b)
|
|
{
|
|
return (r << 16) | (g << 8) | b;
|
|
}
|
|
|
|
/* Load new palette for a given DMA channel, convert to internal format */
|
|
static void pxa2xx_palette_parse(struct pxa2xx_lcdc_s *s, int ch, int bpp)
|
|
{
|
|
int i, n, format, r, g, b, alpha;
|
|
uint32_t *dest, *src;
|
|
s->pal_for = LCCR4_PALFOR(s->control[4]);
|
|
format = s->pal_for;
|
|
|
|
switch (bpp) {
|
|
case pxa_lcdc_2bpp:
|
|
n = 4;
|
|
break;
|
|
case pxa_lcdc_4bpp:
|
|
n = 16;
|
|
break;
|
|
case pxa_lcdc_8bpp:
|
|
n = 256;
|
|
break;
|
|
default:
|
|
format = 0;
|
|
return;
|
|
}
|
|
|
|
src = (uint32_t *) s->dma_ch[ch].pbuffer;
|
|
dest = (uint32_t *) s->dma_ch[ch].palette;
|
|
alpha = r = g = b = 0;
|
|
|
|
for (i = 0; i < n; i ++) {
|
|
switch (format) {
|
|
case 0: /* 16 bpp, no transparency */
|
|
alpha = 0;
|
|
if (s->control[0] & LCCR0_CMS)
|
|
r = g = b = *src & 0xff;
|
|
else {
|
|
r = (*src & 0xf800) >> 8;
|
|
g = (*src & 0x07e0) >> 3;
|
|
b = (*src & 0x001f) << 3;
|
|
}
|
|
break;
|
|
case 1: /* 16 bpp plus transparency */
|
|
alpha = *src & (1 << 24);
|
|
if (s->control[0] & LCCR0_CMS)
|
|
r = g = b = *src & 0xff;
|
|
else {
|
|
r = (*src & 0xf800) >> 8;
|
|
g = (*src & 0x07e0) >> 3;
|
|
b = (*src & 0x001f) << 3;
|
|
}
|
|
break;
|
|
case 2: /* 18 bpp plus transparency */
|
|
alpha = *src & (1 << 24);
|
|
if (s->control[0] & LCCR0_CMS)
|
|
r = g = b = *src & 0xff;
|
|
else {
|
|
r = (*src & 0xf80000) >> 16;
|
|
g = (*src & 0x00fc00) >> 8;
|
|
b = (*src & 0x0000f8);
|
|
}
|
|
break;
|
|
case 3: /* 24 bpp plus transparency */
|
|
alpha = *src & (1 << 24);
|
|
if (s->control[0] & LCCR0_CMS)
|
|
r = g = b = *src & 0xff;
|
|
else {
|
|
r = (*src & 0xff0000) >> 16;
|
|
g = (*src & 0x00ff00) >> 8;
|
|
b = (*src & 0x0000ff);
|
|
}
|
|
break;
|
|
}
|
|
switch (s->ds->depth) {
|
|
case 8:
|
|
*dest = rgb_to_pixel8(r, g, b) | alpha;
|
|
break;
|
|
case 15:
|
|
*dest = rgb_to_pixel15(r, g, b) | alpha;
|
|
break;
|
|
case 16:
|
|
*dest = rgb_to_pixel16(r, g, b) | alpha;
|
|
break;
|
|
case 24:
|
|
*dest = rgb_to_pixel24(r, g, b) | alpha;
|
|
break;
|
|
case 32:
|
|
*dest = rgb_to_pixel32(r, g, b) | alpha;
|
|
break;
|
|
}
|
|
src ++;
|
|
dest ++;
|
|
}
|
|
}
|
|
|
|
static void pxa2xx_lcdc_dma0_redraw_horiz(struct pxa2xx_lcdc_s *s,
|
|
uint8_t *fb, int *miny, int *maxy)
|
|
{
|
|
int y, src_width, dest_width, dirty[2];
|
|
uint8_t *src, *dest;
|
|
ram_addr_t x, addr, new_addr, start, end;
|
|
drawfn fn = 0;
|
|
if (s->dest_width)
|
|
fn = s->line_fn[s->transp][s->bpp];
|
|
if (!fn)
|
|
return;
|
|
|
|
src = fb;
|
|
src_width = (s->xres + 3) & ~3; /* Pad to a 4 pixels multiple */
|
|
if (s->bpp == pxa_lcdc_19pbpp || s->bpp == pxa_lcdc_18pbpp)
|
|
src_width *= 3;
|
|
else if (s->bpp > pxa_lcdc_16bpp)
|
|
src_width *= 4;
|
|
else if (s->bpp > pxa_lcdc_8bpp)
|
|
src_width *= 2;
|
|
|
|
dest = s->ds->data;
|
|
dest_width = s->xres * s->dest_width;
|
|
|
|
addr = (ram_addr_t) (fb - phys_ram_base);
|
|
start = addr + s->yres * src_width;
|
|
end = addr;
|
|
dirty[0] = dirty[1] = cpu_physical_memory_get_dirty(start, VGA_DIRTY_FLAG);
|
|
for (y = 0; y < s->yres; y ++) {
|
|
new_addr = addr + src_width;
|
|
for (x = addr + TARGET_PAGE_SIZE; x < new_addr;
|
|
x += TARGET_PAGE_SIZE) {
|
|
dirty[1] = cpu_physical_memory_get_dirty(x, VGA_DIRTY_FLAG);
|
|
dirty[0] |= dirty[1];
|
|
}
|
|
if (dirty[0] || s->invalidated) {
|
|
fn((uint32_t *) s->dma_ch[0].palette,
|
|
dest, src, s->xres, s->dest_width);
|
|
if (addr < start)
|
|
start = addr;
|
|
end = new_addr;
|
|
if (y < *miny)
|
|
*miny = y;
|
|
if (y >= *maxy)
|
|
*maxy = y + 1;
|
|
}
|
|
addr = new_addr;
|
|
dirty[0] = dirty[1];
|
|
src += src_width;
|
|
dest += dest_width;
|
|
}
|
|
|
|
if (end > start)
|
|
cpu_physical_memory_reset_dirty(start, end, VGA_DIRTY_FLAG);
|
|
}
|
|
|
|
static void pxa2xx_lcdc_dma0_redraw_vert(struct pxa2xx_lcdc_s *s,
|
|
uint8_t *fb, int *miny, int *maxy)
|
|
{
|
|
int y, src_width, dest_width, dirty[2];
|
|
uint8_t *src, *dest;
|
|
ram_addr_t x, addr, new_addr, start, end;
|
|
drawfn fn = 0;
|
|
if (s->dest_width)
|
|
fn = s->line_fn[s->transp][s->bpp];
|
|
if (!fn)
|
|
return;
|
|
|
|
src = fb;
|
|
src_width = (s->xres + 3) & ~3; /* Pad to a 4 pixels multiple */
|
|
if (s->bpp == pxa_lcdc_19pbpp || s->bpp == pxa_lcdc_18pbpp)
|
|
src_width *= 3;
|
|
else if (s->bpp > pxa_lcdc_16bpp)
|
|
src_width *= 4;
|
|
else if (s->bpp > pxa_lcdc_8bpp)
|
|
src_width *= 2;
|
|
|
|
dest_width = s->yres * s->dest_width;
|
|
dest = s->ds->data + dest_width * (s->xres - 1);
|
|
|
|
addr = (ram_addr_t) (fb - phys_ram_base);
|
|
start = addr + s->yres * src_width;
|
|
end = addr;
|
|
dirty[0] = dirty[1] = cpu_physical_memory_get_dirty(start, VGA_DIRTY_FLAG);
|
|
for (y = 0; y < s->yres; y ++) {
|
|
new_addr = addr + src_width;
|
|
for (x = addr + TARGET_PAGE_SIZE; x < new_addr;
|
|
x += TARGET_PAGE_SIZE) {
|
|
dirty[1] = cpu_physical_memory_get_dirty(x, VGA_DIRTY_FLAG);
|
|
dirty[0] |= dirty[1];
|
|
}
|
|
if (dirty[0] || s->invalidated) {
|
|
fn((uint32_t *) s->dma_ch[0].palette,
|
|
dest, src, s->xres, -dest_width);
|
|
if (addr < start)
|
|
start = addr;
|
|
if (new_addr > end)
|
|
end = new_addr;
|
|
if (y < *miny)
|
|
*miny = y;
|
|
if (y >= *maxy)
|
|
*maxy = y + 1;
|
|
}
|
|
addr = new_addr;
|
|
dirty[0] = dirty[1];
|
|
src += src_width;
|
|
dest += s->dest_width;
|
|
}
|
|
|
|
if (end > start)
|
|
cpu_physical_memory_reset_dirty(start, end, VGA_DIRTY_FLAG);
|
|
}
|
|
|
|
static void pxa2xx_lcdc_resize(struct pxa2xx_lcdc_s *s)
|
|
{
|
|
int width, height;
|
|
if (!(s->control[0] & LCCR0_ENB))
|
|
return;
|
|
|
|
width = LCCR1_PPL(s->control[1]) + 1;
|
|
height = LCCR2_LPP(s->control[2]) + 1;
|
|
|
|
if (width != s->xres || height != s->yres) {
|
|
if (s->orientation)
|
|
dpy_resize(s->ds, height, width);
|
|
else
|
|
dpy_resize(s->ds, width, height);
|
|
s->invalidated = 1;
|
|
s->xres = width;
|
|
s->yres = height;
|
|
}
|
|
}
|
|
|
|
static void pxa2xx_update_display(void *opaque)
|
|
{
|
|
struct pxa2xx_lcdc_s *s = (struct pxa2xx_lcdc_s *) opaque;
|
|
uint8_t *fb;
|
|
target_phys_addr_t fbptr;
|
|
int miny, maxy;
|
|
int ch;
|
|
if (!(s->control[0] & LCCR0_ENB))
|
|
return;
|
|
|
|
pxa2xx_descriptor_load(s);
|
|
|
|
pxa2xx_lcdc_resize(s);
|
|
miny = s->yres;
|
|
maxy = 0;
|
|
s->transp = s->dma_ch[2].up || s->dma_ch[3].up;
|
|
/* Note: With overlay planes the order depends on LCCR0 bit 25. */
|
|
for (ch = 0; ch < PXA_LCDDMA_CHANS; ch ++)
|
|
if (s->dma_ch[ch].up) {
|
|
if (!s->dma_ch[ch].source) {
|
|
pxa2xx_dma_ber_set(s, ch);
|
|
continue;
|
|
}
|
|
fbptr = s->dma_ch[ch].source;
|
|
if (!(fbptr >= PXA2XX_SDRAM_BASE &&
|
|
fbptr <= PXA2XX_SDRAM_BASE + phys_ram_size)) {
|
|
pxa2xx_dma_ber_set(s, ch);
|
|
continue;
|
|
}
|
|
fbptr -= PXA2XX_SDRAM_BASE;
|
|
fb = phys_ram_base + fbptr;
|
|
|
|
if (s->dma_ch[ch].command & LDCMD_PAL) {
|
|
memcpy(s->dma_ch[ch].pbuffer, fb,
|
|
MAX(LDCMD_LENGTH(s->dma_ch[ch].command),
|
|
sizeof(s->dma_ch[ch].pbuffer)));
|
|
pxa2xx_palette_parse(s, ch, s->bpp);
|
|
} else {
|
|
/* Do we need to reparse palette */
|
|
if (LCCR4_PALFOR(s->control[4]) != s->pal_for)
|
|
pxa2xx_palette_parse(s, ch, s->bpp);
|
|
|
|
/* ACK frame start */
|
|
pxa2xx_dma_sof_set(s, ch);
|
|
|
|
s->dma_ch[ch].redraw(s, fb, &miny, &maxy);
|
|
s->invalidated = 0;
|
|
|
|
/* ACK frame completed */
|
|
pxa2xx_dma_eof_set(s, ch);
|
|
}
|
|
}
|
|
|
|
if (s->control[0] & LCCR0_DIS) {
|
|
/* ACK last frame completed */
|
|
s->control[0] &= ~LCCR0_ENB;
|
|
s->status[0] |= LCSR0_LDD;
|
|
}
|
|
|
|
if (s->orientation)
|
|
dpy_update(s->ds, miny, 0, maxy, s->xres);
|
|
else
|
|
dpy_update(s->ds, 0, miny, s->xres, maxy);
|
|
pxa2xx_lcdc_int_update(s);
|
|
|
|
if (s->vsync_cb)
|
|
s->vsync_cb(s->opaque);
|
|
}
|
|
|
|
static void pxa2xx_invalidate_display(void *opaque)
|
|
{
|
|
struct pxa2xx_lcdc_s *s = (struct pxa2xx_lcdc_s *) opaque;
|
|
s->invalidated = 1;
|
|
}
|
|
|
|
static void pxa2xx_screen_dump(void *opaque, const char *filename)
|
|
{
|
|
/* TODO */
|
|
}
|
|
|
|
void pxa2xx_lcdc_orientation(void *opaque, int angle)
|
|
{
|
|
struct pxa2xx_lcdc_s *s = (struct pxa2xx_lcdc_s *) opaque;
|
|
|
|
if (angle) {
|
|
s->dma_ch[0].redraw = pxa2xx_lcdc_dma0_redraw_vert;
|
|
} else {
|
|
s->dma_ch[0].redraw = pxa2xx_lcdc_dma0_redraw_horiz;
|
|
}
|
|
|
|
s->orientation = angle;
|
|
s->xres = s->yres = -1;
|
|
pxa2xx_lcdc_resize(s);
|
|
}
|
|
|
|
#define BITS 8
|
|
#include "pxa2xx_template.h"
|
|
#define BITS 15
|
|
#include "pxa2xx_template.h"
|
|
#define BITS 16
|
|
#include "pxa2xx_template.h"
|
|
#define BITS 24
|
|
#include "pxa2xx_template.h"
|
|
#define BITS 32
|
|
#include "pxa2xx_template.h"
|
|
|
|
struct pxa2xx_lcdc_s *pxa2xx_lcdc_init(target_phys_addr_t base, qemu_irq irq,
|
|
DisplayState *ds)
|
|
{
|
|
int iomemtype;
|
|
struct pxa2xx_lcdc_s *s;
|
|
|
|
s = (struct pxa2xx_lcdc_s *) qemu_mallocz(sizeof(struct pxa2xx_lcdc_s));
|
|
s->base = base;
|
|
s->invalidated = 1;
|
|
s->irq = irq;
|
|
s->ds = ds;
|
|
|
|
pxa2xx_lcdc_orientation(s, graphic_rotate);
|
|
|
|
iomemtype = cpu_register_io_memory(0, pxa2xx_lcdc_readfn,
|
|
pxa2xx_lcdc_writefn, s);
|
|
cpu_register_physical_memory(base, 0x000fffff, iomemtype);
|
|
|
|
graphic_console_init(ds, pxa2xx_update_display,
|
|
pxa2xx_invalidate_display, pxa2xx_screen_dump, s);
|
|
|
|
switch (s->ds->depth) {
|
|
case 0:
|
|
s->dest_width = 0;
|
|
break;
|
|
case 8:
|
|
s->line_fn[0] = pxa2xx_draw_fn_8;
|
|
s->line_fn[1] = pxa2xx_draw_fn_8t;
|
|
s->dest_width = 1;
|
|
break;
|
|
case 15:
|
|
s->line_fn[0] = pxa2xx_draw_fn_15;
|
|
s->line_fn[1] = pxa2xx_draw_fn_15t;
|
|
s->dest_width = 2;
|
|
break;
|
|
case 16:
|
|
s->line_fn[0] = pxa2xx_draw_fn_16;
|
|
s->line_fn[1] = pxa2xx_draw_fn_16t;
|
|
s->dest_width = 2;
|
|
break;
|
|
case 24:
|
|
s->line_fn[0] = pxa2xx_draw_fn_24;
|
|
s->line_fn[1] = pxa2xx_draw_fn_24t;
|
|
s->dest_width = 3;
|
|
break;
|
|
case 32:
|
|
s->line_fn[0] = pxa2xx_draw_fn_32;
|
|
s->line_fn[1] = pxa2xx_draw_fn_32t;
|
|
s->dest_width = 4;
|
|
break;
|
|
default:
|
|
fprintf(stderr, "%s: Bad color depth\n", __FUNCTION__);
|
|
exit(1);
|
|
}
|
|
return s;
|
|
}
|
|
|
|
void pxa2xx_lcd_vsync_cb(struct pxa2xx_lcdc_s *s,
|
|
void (*cb)(void *opaque), void *opaque) {
|
|
s->vsync_cb = cb;
|
|
s->opaque = opaque;
|
|
}
|