qemu-e2k/hw/g364fb.c

388 lines
10 KiB
C

/*
* QEMU G364 framebuffer Emulator.
*
* Copyright (c) 2007-2008 Hervé Poussineau
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307 USA
*/
#include "hw.h"
#include "console.h"
#include "pixel_ops.h"
//#define DEBUG_G364
typedef struct G364State {
unsigned int vram_size;
uint8_t *vram_buffer;
uint32_t ctla;
uint8_t palette[256][3];
/* display refresh support */
DisplayState *ds;
QEMUConsole *console;
int graphic_mode;
uint32_t scr_width, scr_height; /* in pixels */
} G364State;
/*
* graphic modes
*/
#define BPP 8
#define PIXEL_WIDTH 8
#include "g364fb_template.h"
#undef BPP
#undef PIXEL_WIDTH
#define BPP 15
#define PIXEL_WIDTH 16
#include "g364fb_template.h"
#undef BPP
#undef PIXEL_WIDTH
#define BPP 16
#define PIXEL_WIDTH 16
#include "g364fb_template.h"
#undef BPP
#undef PIXEL_WIDTH
#define BPP 32
#define PIXEL_WIDTH 32
#include "g364fb_template.h"
#undef BPP
#undef PIXEL_WIDTH
#define REG_DISPLAYX 0x0918
#define REG_DISPLAYY 0x0940
#define CTLA_FORCE_BLANK 0x400
static void g364fb_draw_graphic(G364State *s, int full_update)
{
switch (ds_get_bits_per_pixel(s->ds)) {
case 8:
g364fb_draw_graphic8(s, full_update);
break;
case 15:
g364fb_draw_graphic15(s, full_update);
break;
case 16:
g364fb_draw_graphic16(s, full_update);
break;
case 32:
g364fb_draw_graphic32(s, full_update);
break;
default:
printf("g364fb: unknown depth %d\n", ds_get_bits_per_pixel(s->ds));
return;
}
dpy_update(s->ds, 0, 0, s->scr_width, s->scr_height);
}
static void g364fb_draw_blank(G364State *s, int full_update)
{
int i, w;
uint8_t *d;
if (!full_update)
return;
w = s->scr_width * ((ds_get_bits_per_pixel(s->ds) + 7) >> 3);
d = ds_get_data(s->ds);
for(i = 0; i < s->scr_height; i++) {
memset(d, 0, w);
d += ds_get_linesize(s->ds);
}
dpy_update(s->ds, 0, 0, s->scr_width, s->scr_height);
}
#define GMODE_GRAPH 0
#define GMODE_BLANK 1
static void g364fb_update_display(void *opaque)
{
G364State *s = opaque;
int full_update, graphic_mode;
if (s->scr_width == 0 || s->scr_height == 0)
return;
if (s->ctla & CTLA_FORCE_BLANK)
graphic_mode = GMODE_BLANK;
else
graphic_mode = GMODE_GRAPH;
full_update = 0;
if (graphic_mode != s->graphic_mode) {
s->graphic_mode = graphic_mode;
full_update = 1;
}
if (s->scr_width != ds_get_width(s->ds) || s->scr_height != ds_get_height(s->ds)) {
qemu_console_resize(s->console, s->scr_width, s->scr_height);
full_update = 1;
}
switch(graphic_mode) {
case GMODE_GRAPH:
g364fb_draw_graphic(s, full_update);
break;
case GMODE_BLANK:
default:
g364fb_draw_blank(s, full_update);
break;
}
}
/* force a full display refresh */
static void g364fb_invalidate_display(void *opaque)
{
G364State *s = opaque;
s->graphic_mode = -1; /* force full update */
}
static void g364fb_reset(void *opaque)
{
G364State *s = opaque;
memset(s->palette, 0, sizeof(s->palette));
s->scr_width = s->scr_height = 0;
memset(s->vram_buffer, 0, s->vram_size);
s->graphic_mode = -1; /* force full update */
}
static void g364fb_screen_dump(void *opaque, const char *filename)
{
G364State *s = opaque;
int y, x;
uint8_t index;
uint8_t *data_buffer;
FILE *f;
f = fopen(filename, "wb");
if (!f)
return;
data_buffer = s->vram_buffer;
fprintf(f, "P6\n%d %d\n%d\n",
s->scr_width, s->scr_height, 255);
for(y = 0; y < s->scr_height; y++)
for(x = 0; x < s->scr_width; x++, data_buffer++) {
index = *data_buffer;
fputc(s->palette[index][0], f);
fputc(s->palette[index][1], f);
fputc(s->palette[index][2], f);
}
fclose(f);
}
/* called for accesses to io ports */
static uint32_t g364fb_ctrl_readb(void *opaque, target_phys_addr_t addr)
{
//G364State *s = opaque;
uint32_t val;
addr &= 0xffff;
switch (addr) {
default:
#ifdef DEBUG_G364
printf("g364fb/ctrl: invalid read at [" TARGET_FMT_lx "]\n", addr);
#endif
val = 0;
break;
}
#ifdef DEBUG_G364
printf("g364fb/ctrl: read 0x%02x at [" TARGET_FMT_lx "]\n", val, addr);
#endif
return val;
}
static uint32_t g364fb_ctrl_readw(void *opaque, target_phys_addr_t addr)
{
uint32_t v;
v = g364fb_ctrl_readb(opaque, addr);
v |= g364fb_ctrl_readb(opaque, addr + 1) << 8;
return v;
}
static uint32_t g364fb_ctrl_readl(void *opaque, target_phys_addr_t addr)
{
uint32_t v;
v = g364fb_ctrl_readb(opaque, addr);
v |= g364fb_ctrl_readb(opaque, addr + 1) << 8;
v |= g364fb_ctrl_readb(opaque, addr + 2) << 16;
v |= g364fb_ctrl_readb(opaque, addr + 3) << 24;
return v;
}
static void g364fb_ctrl_writeb(void *opaque, target_phys_addr_t addr, uint32_t val)
{
G364State *s = opaque;
addr &= 0xffff;
#ifdef DEBUG_G364
printf("g364fb/ctrl: write 0x%02x at [" TARGET_FMT_lx "]\n", val, addr);
#endif
if (addr < 0x0800) {
/* color palette */
int idx = addr >> 3;
int c = addr & 7;
if (c < 3)
s->palette[idx][c] = (uint8_t)val;
} else {
switch (addr) {
case REG_DISPLAYX:
s->scr_width = (s->scr_width & 0xfffffc03) | (val << 2);
break;
case REG_DISPLAYX + 1:
s->scr_width = (s->scr_width & 0xfffc03ff) | (val << 10);
break;
case REG_DISPLAYY:
s->scr_height = (s->scr_height & 0xffffff80) | (val >> 1);
break;
case REG_DISPLAYY + 1:
s->scr_height = (s->scr_height & 0xffff801f) | (val << 7);
break;
default:
#ifdef DEBUG_G364
printf("g364fb/ctrl: invalid write of 0x%02x at [" TARGET_FMT_lx "]\n", val, addr);
#endif
break;
}
}
s->graphic_mode = -1; /* force full update */
}
static void g364fb_ctrl_writew(void *opaque, target_phys_addr_t addr, uint32_t val)
{
g364fb_ctrl_writeb(opaque, addr, val & 0xff);
g364fb_ctrl_writeb(opaque, addr + 1, (val >> 8) & 0xff);
}
static void g364fb_ctrl_writel(void *opaque, target_phys_addr_t addr, uint32_t val)
{
g364fb_ctrl_writeb(opaque, addr, val & 0xff);
g364fb_ctrl_writeb(opaque, addr + 1, (val >> 8) & 0xff);
g364fb_ctrl_writeb(opaque, addr + 2, (val >> 16) & 0xff);
g364fb_ctrl_writeb(opaque, addr + 3, (val >> 24) & 0xff);
}
static CPUReadMemoryFunc *g364fb_ctrl_read[3] = {
g364fb_ctrl_readb,
g364fb_ctrl_readw,
g364fb_ctrl_readl,
};
static CPUWriteMemoryFunc *g364fb_ctrl_write[3] = {
g364fb_ctrl_writeb,
g364fb_ctrl_writew,
g364fb_ctrl_writel,
};
/* called for accesses to video ram */
static uint32_t g364fb_mem_readb(void *opaque, target_phys_addr_t addr)
{
G364State *s = opaque;
return s->vram_buffer[addr];
}
static uint32_t g364fb_mem_readw(void *opaque, target_phys_addr_t addr)
{
uint32_t v;
v = g364fb_mem_readb(opaque, addr);
v |= g364fb_mem_readb(opaque, addr + 1) << 8;
return v;
}
static uint32_t g364fb_mem_readl(void *opaque, target_phys_addr_t addr)
{
uint32_t v;
v = g364fb_mem_readb(opaque, addr);
v |= g364fb_mem_readb(opaque, addr + 1) << 8;
v |= g364fb_mem_readb(opaque, addr + 2) << 16;
v |= g364fb_mem_readb(opaque, addr + 3) << 24;
return v;
}
static void g364fb_mem_writeb(void *opaque, target_phys_addr_t addr, uint32_t val)
{
G364State *s = opaque;
s->vram_buffer[addr] = val;
}
static void g364fb_mem_writew(void *opaque, target_phys_addr_t addr, uint32_t val)
{
g364fb_mem_writeb(opaque, addr, val & 0xff);
g364fb_mem_writeb(opaque, addr + 1, (val >> 8) & 0xff);
}
static void g364fb_mem_writel(void *opaque, target_phys_addr_t addr, uint32_t val)
{
g364fb_mem_writeb(opaque, addr, val & 0xff);
g364fb_mem_writeb(opaque, addr + 1, (val >> 8) & 0xff);
g364fb_mem_writeb(opaque, addr + 2, (val >> 16) & 0xff);
g364fb_mem_writeb(opaque, addr + 3, (val >> 24) & 0xff);
}
static CPUReadMemoryFunc *g364fb_mem_read[3] = {
g364fb_mem_readb,
g364fb_mem_readw,
g364fb_mem_readl,
};
static CPUWriteMemoryFunc *g364fb_mem_write[3] = {
g364fb_mem_writeb,
g364fb_mem_writew,
g364fb_mem_writel,
};
int g364fb_mm_init(DisplayState *ds,
int vram_size, int it_shift,
target_phys_addr_t vram_base, target_phys_addr_t ctrl_base)
{
G364State *s;
int io_vram, io_ctrl;
s = qemu_mallocz(sizeof(G364State));
if (!s)
return -1;
s->vram_size = vram_size;
s->vram_buffer = qemu_mallocz(s->vram_size);
qemu_register_reset(g364fb_reset, s);
g364fb_reset(s);
s->ds = ds;
s->console = graphic_console_init(ds, g364fb_update_display,
g364fb_invalidate_display,
g364fb_screen_dump, NULL, s);
io_vram = cpu_register_io_memory(0, g364fb_mem_read, g364fb_mem_write, s);
cpu_register_physical_memory(vram_base, vram_size, io_vram);
io_ctrl = cpu_register_io_memory(0, g364fb_ctrl_read, g364fb_ctrl_write, s);
cpu_register_physical_memory(ctrl_base, 0x10000, io_ctrl);
return 0;
}