mirror of
https://github.com/xemu-project/xemu.git
synced 2024-11-24 12:09:58 +00:00
188d857911
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@1116 c046a42c-6fe2-441c-8c8c-71466251a162
520 lines
16 KiB
C
520 lines
16 KiB
C
/*
|
|
* QEMU VGA Emulator templates
|
|
*
|
|
* Copyright (c) 2003 Fabrice Bellard
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
* of this software and associated documentation files (the "Software"), to deal
|
|
* in the Software without restriction, including without limitation the rights
|
|
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
* copies of the Software, and to permit persons to whom the Software is
|
|
* furnished to do so, subject to the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included in
|
|
* all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
|
* THE SOFTWARE.
|
|
*/
|
|
|
|
#if DEPTH == 8
|
|
#define BPP 1
|
|
#define PIXEL_TYPE uint8_t
|
|
#elif DEPTH == 15 || DEPTH == 16
|
|
#define BPP 2
|
|
#define PIXEL_TYPE uint16_t
|
|
#elif DEPTH == 32
|
|
#define BPP 4
|
|
#define PIXEL_TYPE uint32_t
|
|
#else
|
|
#error unsupport depth
|
|
#endif
|
|
|
|
#if DEPTH != 15
|
|
|
|
static inline void glue(vga_draw_glyph_line_, DEPTH)(uint8_t *d,
|
|
uint32_t font_data,
|
|
uint32_t xorcol,
|
|
uint32_t bgcol)
|
|
{
|
|
#if BPP == 1
|
|
((uint32_t *)d)[0] = (dmask16[(font_data >> 4)] & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[1] = (dmask16[(font_data >> 0) & 0xf] & xorcol) ^ bgcol;
|
|
#elif BPP == 2
|
|
((uint32_t *)d)[0] = (dmask4[(font_data >> 6)] & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[1] = (dmask4[(font_data >> 4) & 3] & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[2] = (dmask4[(font_data >> 2) & 3] & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[3] = (dmask4[(font_data >> 0) & 3] & xorcol) ^ bgcol;
|
|
#else
|
|
((uint32_t *)d)[0] = (-((font_data >> 7)) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[1] = (-((font_data >> 6) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[2] = (-((font_data >> 5) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[3] = (-((font_data >> 4) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[4] = (-((font_data >> 3) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[5] = (-((font_data >> 2) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[6] = (-((font_data >> 1) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[7] = (-((font_data >> 0) & 1) & xorcol) ^ bgcol;
|
|
#endif
|
|
}
|
|
|
|
static void glue(vga_draw_glyph8_, DEPTH)(uint8_t *d, int linesize,
|
|
const uint8_t *font_ptr, int h,
|
|
uint32_t fgcol, uint32_t bgcol)
|
|
{
|
|
uint32_t font_data, xorcol;
|
|
|
|
xorcol = bgcol ^ fgcol;
|
|
do {
|
|
font_data = font_ptr[0];
|
|
glue(vga_draw_glyph_line_, DEPTH)(d, font_data, xorcol, bgcol);
|
|
font_ptr += 4;
|
|
d += linesize;
|
|
} while (--h);
|
|
}
|
|
|
|
static void glue(vga_draw_glyph16_, DEPTH)(uint8_t *d, int linesize,
|
|
const uint8_t *font_ptr, int h,
|
|
uint32_t fgcol, uint32_t bgcol)
|
|
{
|
|
uint32_t font_data, xorcol;
|
|
|
|
xorcol = bgcol ^ fgcol;
|
|
do {
|
|
font_data = font_ptr[0];
|
|
glue(vga_draw_glyph_line_, DEPTH)(d,
|
|
expand4to8[font_data >> 4],
|
|
xorcol, bgcol);
|
|
glue(vga_draw_glyph_line_, DEPTH)(d + 8 * BPP,
|
|
expand4to8[font_data & 0x0f],
|
|
xorcol, bgcol);
|
|
font_ptr += 4;
|
|
d += linesize;
|
|
} while (--h);
|
|
}
|
|
|
|
static void glue(vga_draw_glyph9_, DEPTH)(uint8_t *d, int linesize,
|
|
const uint8_t *font_ptr, int h,
|
|
uint32_t fgcol, uint32_t bgcol, int dup9)
|
|
{
|
|
uint32_t font_data, xorcol, v;
|
|
|
|
xorcol = bgcol ^ fgcol;
|
|
do {
|
|
font_data = font_ptr[0];
|
|
#if BPP == 1
|
|
cpu_to_32wu((uint32_t *)d, (dmask16[(font_data >> 4)] & xorcol) ^ bgcol);
|
|
v = (dmask16[(font_data >> 0) & 0xf] & xorcol) ^ bgcol;
|
|
cpu_to_32wu(((uint32_t *)d)+1, v);
|
|
if (dup9)
|
|
((uint8_t *)d)[8] = v >> (24 * (1 - BIG));
|
|
else
|
|
((uint8_t *)d)[8] = bgcol;
|
|
|
|
#elif BPP == 2
|
|
cpu_to_32wu(((uint32_t *)d)+0, (dmask4[(font_data >> 6)] & xorcol) ^ bgcol);
|
|
cpu_to_32wu(((uint32_t *)d)+1, (dmask4[(font_data >> 4) & 3] & xorcol) ^ bgcol);
|
|
cpu_to_32wu(((uint32_t *)d)+2, (dmask4[(font_data >> 2) & 3] & xorcol) ^ bgcol);
|
|
v = (dmask4[(font_data >> 0) & 3] & xorcol) ^ bgcol;
|
|
cpu_to_32wu(((uint32_t *)d)+3, v);
|
|
if (dup9)
|
|
((uint16_t *)d)[8] = v >> (16 * (1 - BIG));
|
|
else
|
|
((uint16_t *)d)[8] = bgcol;
|
|
#else
|
|
((uint32_t *)d)[0] = (-((font_data >> 7)) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[1] = (-((font_data >> 6) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[2] = (-((font_data >> 5) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[3] = (-((font_data >> 4) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[4] = (-((font_data >> 3) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[5] = (-((font_data >> 2) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[6] = (-((font_data >> 1) & 1) & xorcol) ^ bgcol;
|
|
v = (-((font_data >> 0) & 1) & xorcol) ^ bgcol;
|
|
((uint32_t *)d)[7] = v;
|
|
if (dup9)
|
|
((uint32_t *)d)[8] = v;
|
|
else
|
|
((uint32_t *)d)[8] = bgcol;
|
|
#endif
|
|
font_ptr += 4;
|
|
d += linesize;
|
|
} while (--h);
|
|
}
|
|
|
|
/*
|
|
* 4 color mode
|
|
*/
|
|
static void glue(vga_draw_line2_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t plane_mask, *palette, data, v;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
plane_mask = mask16[s1->ar[0x12] & 0xf];
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
data = ((uint32_t *)s)[0];
|
|
data &= plane_mask;
|
|
v = expand2[GET_PLANE(data, 0)];
|
|
v |= expand2[GET_PLANE(data, 2)] << 2;
|
|
((PIXEL_TYPE *)d)[0] = palette[v >> 12];
|
|
((PIXEL_TYPE *)d)[1] = palette[(v >> 8) & 0xf];
|
|
((PIXEL_TYPE *)d)[2] = palette[(v >> 4) & 0xf];
|
|
((PIXEL_TYPE *)d)[3] = palette[(v >> 0) & 0xf];
|
|
|
|
v = expand2[GET_PLANE(data, 1)];
|
|
v |= expand2[GET_PLANE(data, 3)] << 2;
|
|
((PIXEL_TYPE *)d)[4] = palette[v >> 12];
|
|
((PIXEL_TYPE *)d)[5] = palette[(v >> 8) & 0xf];
|
|
((PIXEL_TYPE *)d)[6] = palette[(v >> 4) & 0xf];
|
|
((PIXEL_TYPE *)d)[7] = palette[(v >> 0) & 0xf];
|
|
d += BPP * 8;
|
|
s += 4;
|
|
}
|
|
}
|
|
|
|
#if BPP == 1
|
|
#define PUT_PIXEL2(d, n, v) ((uint16_t *)d)[(n)] = (v)
|
|
#elif BPP == 2
|
|
#define PUT_PIXEL2(d, n, v) ((uint32_t *)d)[(n)] = (v)
|
|
#else
|
|
#define PUT_PIXEL2(d, n, v) \
|
|
((uint32_t *)d)[2*(n)] = ((uint32_t *)d)[2*(n)+1] = (v)
|
|
#endif
|
|
|
|
/*
|
|
* 4 color mode, dup2 horizontal
|
|
*/
|
|
static void glue(vga_draw_line2d2_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t plane_mask, *palette, data, v;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
plane_mask = mask16[s1->ar[0x12] & 0xf];
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
data = ((uint32_t *)s)[0];
|
|
data &= plane_mask;
|
|
v = expand2[GET_PLANE(data, 0)];
|
|
v |= expand2[GET_PLANE(data, 2)] << 2;
|
|
PUT_PIXEL2(d, 0, palette[v >> 12]);
|
|
PUT_PIXEL2(d, 1, palette[(v >> 8) & 0xf]);
|
|
PUT_PIXEL2(d, 2, palette[(v >> 4) & 0xf]);
|
|
PUT_PIXEL2(d, 3, palette[(v >> 0) & 0xf]);
|
|
|
|
v = expand2[GET_PLANE(data, 1)];
|
|
v |= expand2[GET_PLANE(data, 3)] << 2;
|
|
PUT_PIXEL2(d, 4, palette[v >> 12]);
|
|
PUT_PIXEL2(d, 5, palette[(v >> 8) & 0xf]);
|
|
PUT_PIXEL2(d, 6, palette[(v >> 4) & 0xf]);
|
|
PUT_PIXEL2(d, 7, palette[(v >> 0) & 0xf]);
|
|
d += BPP * 16;
|
|
s += 4;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* 16 color mode
|
|
*/
|
|
static void glue(vga_draw_line4_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t plane_mask, data, v, *palette;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
plane_mask = mask16[s1->ar[0x12] & 0xf];
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
data = ((uint32_t *)s)[0];
|
|
data &= plane_mask;
|
|
v = expand4[GET_PLANE(data, 0)];
|
|
v |= expand4[GET_PLANE(data, 1)] << 1;
|
|
v |= expand4[GET_PLANE(data, 2)] << 2;
|
|
v |= expand4[GET_PLANE(data, 3)] << 3;
|
|
((PIXEL_TYPE *)d)[0] = palette[v >> 28];
|
|
((PIXEL_TYPE *)d)[1] = palette[(v >> 24) & 0xf];
|
|
((PIXEL_TYPE *)d)[2] = palette[(v >> 20) & 0xf];
|
|
((PIXEL_TYPE *)d)[3] = palette[(v >> 16) & 0xf];
|
|
((PIXEL_TYPE *)d)[4] = palette[(v >> 12) & 0xf];
|
|
((PIXEL_TYPE *)d)[5] = palette[(v >> 8) & 0xf];
|
|
((PIXEL_TYPE *)d)[6] = palette[(v >> 4) & 0xf];
|
|
((PIXEL_TYPE *)d)[7] = palette[(v >> 0) & 0xf];
|
|
d += BPP * 8;
|
|
s += 4;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* 16 color mode, dup2 horizontal
|
|
*/
|
|
static void glue(vga_draw_line4d2_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t plane_mask, data, v, *palette;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
plane_mask = mask16[s1->ar[0x12] & 0xf];
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
data = ((uint32_t *)s)[0];
|
|
data &= plane_mask;
|
|
v = expand4[GET_PLANE(data, 0)];
|
|
v |= expand4[GET_PLANE(data, 1)] << 1;
|
|
v |= expand4[GET_PLANE(data, 2)] << 2;
|
|
v |= expand4[GET_PLANE(data, 3)] << 3;
|
|
PUT_PIXEL2(d, 0, palette[v >> 28]);
|
|
PUT_PIXEL2(d, 1, palette[(v >> 24) & 0xf]);
|
|
PUT_PIXEL2(d, 2, palette[(v >> 20) & 0xf]);
|
|
PUT_PIXEL2(d, 3, palette[(v >> 16) & 0xf]);
|
|
PUT_PIXEL2(d, 4, palette[(v >> 12) & 0xf]);
|
|
PUT_PIXEL2(d, 5, palette[(v >> 8) & 0xf]);
|
|
PUT_PIXEL2(d, 6, palette[(v >> 4) & 0xf]);
|
|
PUT_PIXEL2(d, 7, palette[(v >> 0) & 0xf]);
|
|
d += BPP * 16;
|
|
s += 4;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* 256 color mode, double pixels
|
|
*
|
|
* XXX: add plane_mask support (never used in standard VGA modes)
|
|
*/
|
|
static void glue(vga_draw_line8d2_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t *palette;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
PUT_PIXEL2(d, 0, palette[s[0]]);
|
|
PUT_PIXEL2(d, 1, palette[s[1]]);
|
|
PUT_PIXEL2(d, 2, palette[s[2]]);
|
|
PUT_PIXEL2(d, 3, palette[s[3]]);
|
|
d += BPP * 8;
|
|
s += 4;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* standard 256 color mode
|
|
*
|
|
* XXX: add plane_mask support (never used in standard VGA modes)
|
|
*/
|
|
static void glue(vga_draw_line8_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
uint32_t *palette;
|
|
int x;
|
|
|
|
palette = s1->last_palette;
|
|
width >>= 3;
|
|
for(x = 0; x < width; x++) {
|
|
((PIXEL_TYPE *)d)[0] = palette[s[0]];
|
|
((PIXEL_TYPE *)d)[1] = palette[s[1]];
|
|
((PIXEL_TYPE *)d)[2] = palette[s[2]];
|
|
((PIXEL_TYPE *)d)[3] = palette[s[3]];
|
|
((PIXEL_TYPE *)d)[4] = palette[s[4]];
|
|
((PIXEL_TYPE *)d)[5] = palette[s[5]];
|
|
((PIXEL_TYPE *)d)[6] = palette[s[6]];
|
|
((PIXEL_TYPE *)d)[7] = palette[s[7]];
|
|
d += BPP * 8;
|
|
s += 8;
|
|
}
|
|
}
|
|
|
|
#endif /* DEPTH != 15 */
|
|
|
|
|
|
/* XXX: optimize */
|
|
|
|
/*
|
|
* 15 bit color
|
|
*/
|
|
static void glue(vga_draw_line15_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
#if DEPTH == 15 && defined(WORDS_BIGENDIAN) == defined(TARGET_WORDS_BIGENDIAN)
|
|
memcpy(d, s, width * 2);
|
|
#else
|
|
int w;
|
|
uint32_t v, r, g, b;
|
|
|
|
w = width;
|
|
do {
|
|
v = lduw_raw((void *)s);
|
|
r = (v >> 7) & 0xf8;
|
|
g = (v >> 2) & 0xf8;
|
|
b = (v << 3) & 0xf8;
|
|
((PIXEL_TYPE *)d)[0] = glue(rgb_to_pixel, DEPTH)(r, g, b);
|
|
s += 2;
|
|
d += BPP;
|
|
} while (--w != 0);
|
|
#endif
|
|
}
|
|
|
|
/*
|
|
* 16 bit color
|
|
*/
|
|
static void glue(vga_draw_line16_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
#if DEPTH == 16 && defined(WORDS_BIGENDIAN) == defined(TARGET_WORDS_BIGENDIAN)
|
|
memcpy(d, s, width * 2);
|
|
#else
|
|
int w;
|
|
uint32_t v, r, g, b;
|
|
|
|
w = width;
|
|
do {
|
|
v = lduw_raw((void *)s);
|
|
r = (v >> 8) & 0xf8;
|
|
g = (v >> 3) & 0xfc;
|
|
b = (v << 3) & 0xf8;
|
|
((PIXEL_TYPE *)d)[0] = glue(rgb_to_pixel, DEPTH)(r, g, b);
|
|
s += 2;
|
|
d += BPP;
|
|
} while (--w != 0);
|
|
#endif
|
|
}
|
|
|
|
/*
|
|
* 24 bit color
|
|
*/
|
|
static void glue(vga_draw_line24_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
int w;
|
|
uint32_t r, g, b;
|
|
|
|
w = width;
|
|
do {
|
|
#if defined(TARGET_WORDS_BIGENDIAN)
|
|
r = s[0];
|
|
g = s[1];
|
|
b = s[2];
|
|
#else
|
|
b = s[0];
|
|
g = s[1];
|
|
r = s[2];
|
|
#endif
|
|
((PIXEL_TYPE *)d)[0] = glue(rgb_to_pixel, DEPTH)(r, g, b);
|
|
s += 3;
|
|
d += BPP;
|
|
} while (--w != 0);
|
|
}
|
|
|
|
/*
|
|
* 32 bit color
|
|
*/
|
|
static void glue(vga_draw_line32_, DEPTH)(VGAState *s1, uint8_t *d,
|
|
const uint8_t *s, int width)
|
|
{
|
|
#if DEPTH == 32 && defined(WORDS_BIGENDIAN) == defined(TARGET_WORDS_BIGENDIAN)
|
|
memcpy(d, s, width * 4);
|
|
#else
|
|
int w;
|
|
uint32_t r, g, b;
|
|
|
|
w = width;
|
|
do {
|
|
#if defined(TARGET_WORDS_BIGENDIAN)
|
|
r = s[1];
|
|
g = s[2];
|
|
b = s[3];
|
|
#else
|
|
b = s[0];
|
|
g = s[1];
|
|
r = s[2];
|
|
#endif
|
|
((PIXEL_TYPE *)d)[0] = glue(rgb_to_pixel, DEPTH)(r, g, b);
|
|
s += 4;
|
|
d += BPP;
|
|
} while (--w != 0);
|
|
#endif
|
|
}
|
|
|
|
#if DEPTH != 15
|
|
void glue(vga_draw_cursor_line_, DEPTH)(uint8_t *d1,
|
|
const uint8_t *src1,
|
|
int poffset, int w,
|
|
unsigned int color0,
|
|
unsigned int color1,
|
|
unsigned int color_xor)
|
|
{
|
|
const uint8_t *plane0, *plane1;
|
|
int x, b0, b1;
|
|
uint8_t *d;
|
|
|
|
d = d1;
|
|
plane0 = src1;
|
|
plane1 = src1 + poffset;
|
|
for(x = 0; x < w; x++) {
|
|
b0 = (plane0[x >> 3] >> (7 - (x & 7))) & 1;
|
|
b1 = (plane1[x >> 3] >> (7 - (x & 7))) & 1;
|
|
#if DEPTH == 8
|
|
switch(b0 | (b1 << 1)) {
|
|
case 0:
|
|
break;
|
|
case 1:
|
|
d[0] ^= color_xor;
|
|
break;
|
|
case 2:
|
|
d[0] = color0;
|
|
break;
|
|
case 3:
|
|
d[0] = color1;
|
|
break;
|
|
}
|
|
#elif DEPTH == 16
|
|
switch(b0 | (b1 << 1)) {
|
|
case 0:
|
|
break;
|
|
case 1:
|
|
((uint16_t *)d)[0] ^= color_xor;
|
|
break;
|
|
case 2:
|
|
((uint16_t *)d)[0] = color0;
|
|
break;
|
|
case 3:
|
|
((uint16_t *)d)[0] = color1;
|
|
break;
|
|
}
|
|
#elif DEPTH == 32
|
|
switch(b0 | (b1 << 1)) {
|
|
case 0:
|
|
break;
|
|
case 1:
|
|
((uint32_t *)d)[0] ^= color_xor;
|
|
break;
|
|
case 2:
|
|
((uint32_t *)d)[0] = color0;
|
|
break;
|
|
case 3:
|
|
((uint32_t *)d)[0] = color1;
|
|
break;
|
|
}
|
|
#else
|
|
#error unsupported depth
|
|
#endif
|
|
d += BPP;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
#undef PUT_PIXEL2
|
|
#undef DEPTH
|
|
#undef BPP
|
|
#undef PIXEL_TYPE
|