Archipelago » qemu

/* 

 * Arm PrimeCell PL110 Color LCD Controller

 *

 * Copyright (c) 2005 CodeSourcery, LLC.

 * Written by Paul Brook

 *

 * This code is licenced under the GNU LGPL

 *

 * Framebuffer format conversion routines.

 */

#ifndef ORDER

#if BITS == 8

#define COPY_PIXEL(to, from) *(to++) = from

#elif BITS == 15 || BITS == 16

#define COPY_PIXEL(to, from) *(uint16_t *)to = from; to += 2;

#elif BITS == 24 

#define COPY_PIXEL(to, from) \

  *(to++) = from; *(to++) = (from) >> 8; *(to++) = (from) >> 16

#elif BITS == 32

#define COPY_PIXEL(to, from) *(uint32_t *)to = from; to += 4;

#else

#error unknown bit depth

#endif

#define ORDER 0

#include "pl110_template.h"

#define ORDER 1

#include "pl110_template.h"

#define ORDER 2

#include "pl110_template.h"

static drawfn glue(pl110_draw_fn_,BITS)[18] =

{

    glue(pl110_draw_line1_lblp,BITS),

    glue(pl110_draw_line2_lblp,BITS),

    glue(pl110_draw_line4_lblp,BITS),

    glue(pl110_draw_line8_lblp,BITS),

    glue(pl110_draw_line16_lblp,BITS),

    glue(pl110_draw_line32_lblp,BITS),

    glue(pl110_draw_line1_bbbp,BITS),

    glue(pl110_draw_line2_bbbp,BITS),

    glue(pl110_draw_line4_bbbp,BITS),

    glue(pl110_draw_line8_bbbp,BITS),

    glue(pl110_draw_line16_bbbp,BITS),

    glue(pl110_draw_line32_bbbp,BITS),

    glue(pl110_draw_line1_lbbp,BITS),

    glue(pl110_draw_line2_lbbp,BITS),

    glue(pl110_draw_line4_lbbp,BITS),

    glue(pl110_draw_line8_lbbp,BITS),

    glue(pl110_draw_line16_lbbp,BITS),

    glue(pl110_draw_line32_lbbp,BITS)

};

#undef BITS

#undef COPY_PIXEL

#else

#if ORDER == 0

#define NAME glue(lblp, BITS)

#ifdef WORDS_BIGENDIAN

#define SWAP_WORDS 1

#endif

#elif ORDER == 1

#define NAME glue(bbbp, BITS)

#ifndef WORDS_BIGENDIAN

#define SWAP_WORDS 1

#endif

#else

#define SWAP_PIXELS 1

#define NAME glue(lbbp, BITS)

#ifdef WORDS_BIGENDIAN

#define SWAP_WORDS 1

#endif

#endif

#define FN_2(x, y) FN(x, y) FN(x+1, y)

#define FN_4(x, y) FN_2(x, y) FN_2(x+1, y)

#define FN_8(y) FN_4(0, y) FN_4(4, y)

static void glue(pl110_draw_line1_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    while (width > 0) {

        data = *(uint32_t *)src;

#ifdef SWAP_PIXELS

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> (y + 7 - (x))) & 1]);

#else

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> ((x) + y)) & 1]);

#endif

#ifdef SWAP_WORDS

        FN_8(24)

        FN_8(16)

        FN_8(8)

        FN_8(0)

#else

        FN_8(0)

        FN_8(8)

        FN_8(16)

        FN_8(24)

#endif

#undef FN

        width -= 32;

        src += 4;

    }

}

static void glue(pl110_draw_line2_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    while (width > 0) {

        data = *(uint32_t *)src;

#ifdef SWAP_PIXELS

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> (y + 6 - (x)*2)) & 3]);

#else

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> ((x)*2 + y)) & 3]);

#endif

#ifdef SWAP_WORDS

        FN_4(0, 24)

        FN_4(0, 16)

        FN_4(0, 8)

        FN_4(0, 0)

#else

        FN_4(0, 0)

        FN_4(0, 8)

        FN_4(0, 16)

        FN_4(0, 24)

#endif

#undef FN

        width -= 16;

        src += 4;

    }

}

static void glue(pl110_draw_line4_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    while (width > 0) {

        data = *(uint32_t *)src;

#ifdef SWAP_PIXELS

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> (y + 4 - (x)*4)) & 0xf]);

#else

#define FN(x, y) COPY_PIXEL(d, pallette[(data >> ((x)*4 + y)) & 0xf]);

#endif

#ifdef SWAP_WORDS

        FN_2(0, 24)

        FN_2(0, 16)

        FN_2(0, 8)

        FN_2(0, 0)

#else

        FN_2(0, 0)

        FN_2(0, 8)

        FN_2(0, 16)

        FN_2(0, 24)

#endif

#undef FN

        width -= 8;

        src += 4;

    }

}

static void glue(pl110_draw_line8_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    while (width > 0) {

        data = *(uint32_t *)src;

#define FN(x) COPY_PIXEL(d, pallette[(data >> (x)) & 0xff]);

#ifdef SWAP_WORDS

        FN(24)

        FN(16)

        FN(8)

        FN(0)

#else

        FN(0)

        FN(8)

        FN(16)

        FN(24)

#endif

#undef FN

        width -= 4;

        src += 4;

    }

}

static void glue(pl110_draw_line16_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    unsigned int r, g, b;

    while (width > 0) {

        data = *(uint32_t *)src;

#ifdef SWAP_WORDS

        data = bswap32(data);

#endif

#if 0

        r = data & 0x1f;

        data >>= 5;

        g = data & 0x3f;

        data >>= 6;

        b = data & 0x1f;

        data >>= 5;

#else

        r = (data & 0x1f) << 3;

        data >>= 5;

        g = (data & 0x3f) << 2;

        data >>= 6;

        b = (data & 0x1f) << 3;

        data >>= 5;

#endif

        COPY_PIXEL(d, glue(rgb_to_pixel,BITS)(r, g, b));

        r = (data & 0x1f) << 3;

        data >>= 5;

        g = (data & 0x3f) << 2;

        data >>= 6;

        b = (data & 0x1f) << 3;

        data >>= 5;

        COPY_PIXEL(d, glue(rgb_to_pixel,BITS)(r, g, b));

        width -= 2;

        src += 4;

    }

}

static void glue(pl110_draw_line32_,NAME)(uint32_t *pallette, uint8_t *d, const uint8_t *src, int width)

{

    uint32_t data;

    unsigned int r, g, b;

    while (width > 0) {

        data = *(uint32_t *)src;

#ifdef SWAP_WORDS

        r = data & 0xff;

        g = (data >> 8) & 0xff;

        b = (data >> 16) & 0xff;

#else

        r = (data >> 24) & 0xff;

        g = (data >> 16) & 0xff;

        b = (data >> 8) & 0xff;

#endif

        COPY_PIXEL(d, glue(rgb_to_pixel,BITS)(r, g, b));

        width--;

        src += 4;

    }

}

#undef SWAP_PIXELS

#undef NAME

#undef SWAP_WORDS

#undef ORDER

#endif