| /* |
| * 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 |
