Archipelago » qemu

/*

 * Pixel drawing function templates for QEMU SM501 Device

 *

 * Copyright (c) 2008 Shin-ichiro KAWASAKI

 *

 * 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

#ifdef BGR_FORMAT

#define PIXEL_NAME glue(DEPTH, bgr)

#else

#define PIXEL_NAME DEPTH

#endif /* BGR_FORMAT */

static void glue(draw_line8_, PIXEL_NAME)(

                 uint8_t *d, const uint8_t *s, int width, const uint32_t *pal)

{

    uint8_t v, r, g, b;

    do {

              v = ldub_raw(s);

        r = (pal[v] >> 16) & 0xff;

        g = (pal[v] >>  8) & 0xff;

        b = (pal[v] >>  0) & 0xff;

        ((PIXEL_TYPE *) d)[0] = glue(rgb_to_pixel, PIXEL_NAME)(r, g, b);

        s ++;

        d += BPP;

    } while (-- width != 0);

}

static void glue(draw_line16_, PIXEL_NAME)(

                 uint8_t *d, const uint8_t *s, int width, const uint32_t *pal)

{

    uint16_t rgb565;

    uint8_t r, g, b;

    do {

        rgb565 = lduw_raw(s);

        r = ((rgb565 >> 11) & 0x1f) << 3;

        g = ((rgb565 >>  5) & 0x3f) << 2;

        b = ((rgb565 >>  0) & 0x1f) << 3;

        ((PIXEL_TYPE *) d)[0] = glue(rgb_to_pixel, PIXEL_NAME)(r, g, b);

        s += 2;

        d += BPP;

    } while (-- width != 0);

}

static void glue(draw_line32_, PIXEL_NAME)(

                 uint8_t *d, const uint8_t *s, int width, const uint32_t *pal)

{

    uint8_t r, g, b;

    do {

        ldub_raw(s);

#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, PIXEL_NAME)(r, g, b);

        s += 4;

        d += BPP;

    } while (-- width != 0);

}

/**

 * Draw hardware cursor image on the given line.

 */

static void glue(draw_hwc_line_, PIXEL_NAME)(SM501State * s, int crt,

                         uint8_t * palette, int c_y, uint8_t *d, int width)

{

    int x, i;

    uint8_t bitset = 0;

    /* get hardware cursor pattern */

    uint32_t cursor_addr = get_hwc_address(s, crt);

    assert(0 <= c_y && c_y < SM501_HWC_HEIGHT);

    cursor_addr += 64 * c_y / 4;  /* 4 pixels per byte */

    cursor_addr += s->base;

    /* get cursor position */

    x = get_hwc_x(s, crt);

    d += x * BPP;

    for (i = 0; i < SM501_HWC_WIDTH && x + i < width; i++) {

        uint8_t v;

        /* get pixel value */

        if (i % 4 == 0) {

            cpu_physical_memory_rw(cursor_addr, &bitset, 1, 0);

            cursor_addr++;

        }

        v = bitset & 3;

        bitset >>= 2;

        /* write pixel */

        if (v) {

            v--;

            uint8_t r = palette[v * 3 + 0];

            uint8_t g = palette[v * 3 + 1];

            uint8_t b = palette[v * 3 + 2];

            ((PIXEL_TYPE *) d)[0] = glue(rgb_to_pixel, PIXEL_NAME)(r, g, b);

        }

        d += BPP;

    }

}

#undef DEPTH

#undef BPP

#undef PIXEL_TYPE

#undef PIXEL_NAME

#undef BGR_FORMAT