uisimulator/sdl/lcd-bitmap.c

   1 /***************************************************************************
   2  *             __________               __   ___.
   3  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   4  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   5  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   6  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   7  *                     \/            \/     \/    \/            \/
   8  * $Id$
   9  *
  10  * Copyright (C) 2006 Dan Everton
  11  *
  12  * This program is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU General Public License
  14  * as published by the Free Software Foundation; either version 2
  15  * of the License, or (at your option) any later version.
  16  *
  17  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  18  * KIND, either express or implied.
  19  *
  20  ****************************************************************************/
  21
  22 #include "debug.h"
  23 #include "uisdl.h"
  24 #include "lcd-sdl.h"
  25 #include "misc.h"
  26
  27 SDL_Surface* lcd_surface;
  28
  29 #if LCD_DEPTH <= 8
  30 #ifdef HAVE_BACKLIGHT
  31 SDL_Color lcd_bl_color_dark    = {RED_CMP(LCD_BL_DARKCOLOR),
  32                                   GREEN_CMP(LCD_BL_DARKCOLOR),
  33                                   BLUE_CMP(LCD_BL_DARKCOLOR), 0};
  34 SDL_Color lcd_bl_color_bright  = {RED_CMP(LCD_BL_BRIGHTCOLOR),
  35                                   GREEN_CMP(LCD_BL_BRIGHTCOLOR),
  36                                   BLUE_CMP(LCD_BL_BRIGHTCOLOR), 0};
  37 #ifdef HAVE_LCD_SPLIT
  38 SDL_Color lcd_bl_color2_dark   = {RED_CMP(LCD_BL_DARKCOLOR_2),
  39                                   GREEN_CMP(LCD_BL_DARKCOLOR_2),
  40                                   BLUE_CMP(LCD_BL_DARKCOLOR_2), 0};
  41 SDL_Color lcd_bl_color2_bright = {RED_CMP(LCD_BL_BRIGHTCOLOR_2),
  42                                   GREEN_CMP(LCD_BL_BRIGHTCOLOR_2),
  43                                   BLUE_CMP(LCD_BL_BRIGHTCOLOR_2), 0};
  44 #endif
  45 #endif /* HAVE_BACKLIGHT */
  46 SDL_Color lcd_color_dark    = {RED_CMP(LCD_DARKCOLOR),
  47                                GREEN_CMP(LCD_DARKCOLOR),
  48                                BLUE_CMP(LCD_DARKCOLOR), 0};
  49 SDL_Color lcd_color_bright  = {RED_CMP(LCD_BRIGHTCOLOR),
  50                                GREEN_CMP(LCD_BRIGHTCOLOR),
  51                                BLUE_CMP(LCD_BRIGHTCOLOR), 0};
  52 #ifdef HAVE_LCD_SPLIT
  53 SDL_Color lcd_color2_dark   = {RED_CMP(LCD_DARKCOLOR_2),
  54                                GREEN_CMP(LCD_DARKCOLOR_2),
  55                                BLUE_CMP(LCD_DARKCOLOR_2), 0};
  56 SDL_Color lcd_color2_bright = {RED_CMP(LCD_BRIGHTCOLOR_2),
  57                                GREEN_CMP(LCD_BRIGHTCOLOR_2),
  58                                BLUE_CMP(LCD_BRIGHTCOLOR_2), 0};
  59 #endif
  60
  61 #ifdef HAVE_LCD_SPLIT
  62 #define NUM_SHADES    128
  63 #else
  64 #define NUM_SHADES    129
  65 #endif
  66
  67 #else /* LCD_DEPTH > 8 */
  68
  69 #ifdef HAVE_TRANSFLECTIVE_LCD
  70 #define BACKLIGHT_OFF_ALPHA 85 /* 1/3 brightness */
  71 #else
  72 #define BACKLIGHT_OFF_ALPHA 0  /* pitch black */
  73 #endif
  74
  75 #endif /* LCD_DEPTH */
  76
  77 #if LCD_DEPTH < 8
  78 unsigned long (*lcd_ex_getpixel)(int, int) = NULL;
  79 #endif /* LCD_DEPTH < 8 */
  80
  81 #if LCD_DEPTH == 2
  82 /* Only defined for positive, non-split LCD for now */
  83 static const unsigned char colorindex[4] = {128, 85, 43, 0};
  84 #endif
  85
  86 static unsigned long get_lcd_pixel(int x, int y)
  87 {
  88 #if LCD_DEPTH == 1
  89 #ifdef HAVE_NEGATIVE_LCD
  90     return (lcd_framebuffer[y/8][x] & (1 << (y & 7))) ? (NUM_SHADES-1) : 0;
  91 #else
  92     return (lcd_framebuffer[y/8][x] & (1 << (y & 7))) ? 0 : (NUM_SHADES-1);
  93 #endif
  94 #elif LCD_DEPTH == 2
  95 #if LCD_PIXELFORMAT == HORIZONTAL_PACKING
  96     return colorindex[(lcd_framebuffer[y][x/4] >> (2 * (~x & 3))) & 3];
  97 #elif LCD_PIXELFORMAT == VERTICAL_PACKING
  98     return colorindex[(lcd_framebuffer[y/4][x] >> (2 * (y & 3))) & 3];
  99 #elif LCD_PIXELFORMAT == VERTICAL_INTERLEAVED
 100     unsigned bits = (lcd_framebuffer[y/8][x] >> (y & 7)) & 0x0101;
 101     return colorindex[(bits | (bits >> 7)) & 3];
 102 #endif
 103 #elif LCD_DEPTH == 16
 104 #if LCD_PIXELFORMAT == RGB565SWAPPED
 105     unsigned bits = lcd_framebuffer[y][x];
 106     return (bits >> 8) | (bits << 8);
 107 #else
 108     return lcd_framebuffer[y][x];
 109 #endif
 110 #endif
 111 }
 112
 113 void lcd_update(void)
 114 {
 115     /* update a full screen rect */
 116     lcd_update_rect(0, 0, LCD_WIDTH, LCD_HEIGHT);
 117 }
 118
 119 void lcd_update_rect(int x_start, int y_start, int width, int height)
 120 {
 121     sdl_update_rect(lcd_surface, x_start, y_start, width, height,
 122                     LCD_WIDTH, LCD_HEIGHT, get_lcd_pixel);
 123     sdl_gui_update(lcd_surface, x_start, y_start, width,
 124                    height + LCD_SPLIT_LINES, SIM_LCD_WIDTH, SIM_LCD_HEIGHT,
 125                    background ? UI_LCD_POSX : 0, background? UI_LCD_POSY : 0);
 126 }
 127
 128 #ifdef HAVE_BACKLIGHT
 129 void sim_backlight(int value)
 130 {
 131 #if LCD_DEPTH <= 8
 132     if (value > 0) {
 133         sdl_set_gradient(lcd_surface, &lcd_bl_color_dark,
 134                          &lcd_bl_color_bright, 0, NUM_SHADES);
 135 #ifdef HAVE_LCD_SPLIT
 136         sdl_set_gradient(lcd_surface, &lcd_bl_color2_dark,
 137                          &lcd_bl_color2_bright, NUM_SHADES, NUM_SHADES);
 138 #endif
 139     } else {
 140         sdl_set_gradient(lcd_surface, &lcd_color_dark,
 141                          &lcd_color_bright, 0, NUM_SHADES);
 142 #ifdef HAVE_LCD_SPLIT
 143         sdl_set_gradient(lcd_surface, &lcd_color2_dark,
 144                          &lcd_color2_bright, NUM_SHADES, NUM_SHADES);
 145 #endif
 146     }
 147 #else /* LCD_DEPTH > 8 */
 148     if (value > 0) {
 149         SDL_SetAlpha(lcd_surface, 0, SDL_ALPHA_OPAQUE); /* full on */
 150     } else {
 151         SDL_SetAlpha(lcd_surface, SDL_SRCALPHA, BACKLIGHT_OFF_ALPHA);
 152     }
 153 #endif /* LCD_DEPTH */
 154
 155     sdl_gui_update(lcd_surface, 0, 0, SIM_LCD_WIDTH, SIM_LCD_HEIGHT,
 156                    SIM_LCD_WIDTH, SIM_LCD_HEIGHT,
 157                    background ? UI_LCD_POSX : 0, background? UI_LCD_POSY : 0);
 158 }
 159 #endif /* HAVE_BACKLIGHT */
 160
 161 /* initialise simulator lcd driver */
 162 void sim_lcd_init(void)
 163 {
 164 #if LCD_DEPTH == 16
 165     lcd_surface = SDL_CreateRGBSurface(SDL_SWSURFACE,
 166                                        SIM_LCD_WIDTH * display_zoom,
 167                                        SIM_LCD_HEIGHT * display_zoom,
 168                                        LCD_DEPTH, 0, 0, 0, 0);
 169 #else
 170     lcd_surface = SDL_CreateRGBSurface(SDL_SWSURFACE,
 171                                        SIM_LCD_WIDTH * display_zoom,
 172                                        SIM_LCD_HEIGHT * display_zoom,
 173                                        8, 0, 0, 0, 0);
 174 #endif
 175
 176 #if LCD_DEPTH <= 8
 177 #ifdef HAVE_BACKLIGHT
 178     sdl_set_gradient(lcd_surface, &lcd_bl_color_dark,
 179                      &lcd_bl_color_bright, 0, NUM_SHADES);
 180 #ifdef HAVE_LCD_SPLIT
 181     sdl_set_gradient(lcd_surface, &lcd_bl_color2_dark,
 182                      &lcd_bl_color2_bright, NUM_SHADES, NUM_SHADES);
 183 #endif
 184 #else /* !HAVE_BACKLIGHT */
 185     sdl_set_gradient(lcd_surface, &lcd_color_dark,
 186                      &lcd_color_bright, 0, NUM_SHADES);
 187 #ifdef HAVE_LCD_SPLIT
 188     sdl_set_gradient(lcd_surface, &lcd_color2_dark,
 189                      &lcd_color2_bright, NUM_SHADES, NUM_SHADES);
 190 #endif
 191 #endif /* !HAVE_BACKLIGHT */
 192 #endif /* LCD_DEPTH < 8 */
 193 }
 194
 195 #if LCD_DEPTH < 8
 196 void sim_lcd_ex_init(unsigned long (*getpixel)(int, int))
 197 {
 198     lcd_ex_getpixel = getpixel;
 199 }
 200
 201 void sim_lcd_ex_update_rect(int x_start, int y_start, int width, int height)
 202 {
 203     if (lcd_ex_getpixel) {
 204         sdl_update_rect(lcd_surface, x_start, y_start, width, height,
 205                         LCD_WIDTH, LCD_HEIGHT, lcd_ex_getpixel);
 206         sdl_gui_update(lcd_surface, x_start, y_start, width,
 207                        height + LCD_SPLIT_LINES, SIM_LCD_WIDTH, SIM_LCD_HEIGHT,
 208                        background ? UI_LCD_POSX : 0,
 209                        background ? UI_LCD_POSY : 0);
 210     }
 211 }
 212 #endif
 213
 214 #ifdef HAVE_LCD_COLOR
 215 /**
 216  * |R|   |1.000000 -0.000001  1.402000| |Y'|
 217  * |G| = |1.000000 -0.334136 -0.714136| |Pb|
 218  * |B|   |1.000000  1.772000  0.000000| |Pr|
 219  * Scaled, normalized, rounded and tweaked to yield RGB 565:
 220  * |R|   |74   0 101| |Y' -  16| >> 9
 221  * |G| = |74 -24 -51| |Cb - 128| >> 8
 222  * |B|   |74 128   0| |Cr - 128| >> 9
 223  */
 224 #define YFAC    (74)
 225 #define RVFAC   (101)
 226 #define GUFAC   (-24)
 227 #define GVFAC   (-51)
 228 #define BUFAC   (128)
 229
 230 static inline int clamp(int val, int min, int max)
 231 {
 232     if (val < min)
 233         val = min;
 234     else if (val > max)
 235         val = max;
 236     return val;
 237 }
 238
 239 void lcd_yuv_set_options(unsigned options)
 240 {
 241     (void)options;
 242 }
 243
 244 /* Draw a partial YUV colour bitmap - similiar behavior to lcd_blit_yuv
 245    in the core */
 246 void lcd_blit_yuv(unsigned char * const src[3],
 247                   int src_x, int src_y, int stride,
 248                   int x, int y, int width, int height)
 249 {
 250     const unsigned char *ysrc, *usrc, *vsrc;
 251     int linecounter;
 252     fb_data *dst, *row_end;
 253     long z;
 254
 255     /* width and height must be >= 2 and an even number */
 256     width &= ~1;
 257     linecounter = height >> 1;
 258
 259 #if LCD_WIDTH >= LCD_HEIGHT
 260     dst     = &lcd_framebuffer[y][x];
 261     row_end = dst + width;
 262 #else
 263     dst     = &lcd_framebuffer[x][LCD_WIDTH - y - 1];
 264     row_end = dst + LCD_WIDTH * width;
 265 #endif
 266
 267     z    = stride * src_y;
 268     ysrc = src[0] + z + src_x;
 269     usrc = src[1] + (z >> 2) + (src_x >> 1);
 270     vsrc = src[2] + (usrc - src[1]);
 271
 272     /* stride => amount to jump from end of last row to start of next */
 273     stride -= width;
 274
 275     /* upsampling, YUV->RGB conversion and reduction to RGB565 in one go */
 276
 277     do
 278     {
 279         do
 280         {
 281             int y, cb, cr, rv, guv, bu, r, g, b;
 282
 283             y  = YFAC*(*ysrc++ - 16);
 284             cb = *usrc++ - 128;
 285             cr = *vsrc++ - 128;
 286
 287             rv  =            RVFAC*cr;
 288             guv = GUFAC*cb + GVFAC*cr;
 289             bu  = BUFAC*cb;
 290
 291             r = y + rv;
 292             g = y + guv;
 293             b = y + bu;
 294
 295             if ((unsigned)(r | g | b) > 64*256-1)
 296             {
 297                 r = clamp(r, 0, 64*256-1);
 298                 g = clamp(g, 0, 64*256-1);
 299                 b = clamp(b, 0, 64*256-1);
 300             }
 301
 302             *dst = LCD_RGBPACK_LCD(r >> 9, g >> 8, b >> 9);
 303
 304 #if LCD_WIDTH >= LCD_HEIGHT
 305             dst++;
 306 #else
 307             dst += LCD_WIDTH;
 308 #endif
 309
 310             y = YFAC*(*ysrc++ - 16);
 311             r = y + rv;
 312             g = y + guv;
 313             b = y + bu;
 314
 315             if ((unsigned)(r | g | b) > 64*256-1)
 316             {
 317                 r = clamp(r, 0, 64*256-1);
 318                 g = clamp(g, 0, 64*256-1);
 319                 b = clamp(b, 0, 64*256-1);
 320             }
 321
 322             *dst = LCD_RGBPACK_LCD(r >> 9, g >> 8, b >> 9);
 323
 324 #if LCD_WIDTH >= LCD_HEIGHT
 325             dst++;
 326 #else
 327             dst += LCD_WIDTH;
 328 #endif
 329         }
 330         while (dst < row_end);
 331
 332         ysrc    += stride;
 333         usrc    -= width >> 1;
 334         vsrc    -= width >> 1;
 335
 336 #if LCD_WIDTH >= LCD_HEIGHT
 337         row_end += LCD_WIDTH;
 338         dst     += LCD_WIDTH - width;
 339 #else
 340         row_end -= 1;
 341         dst     -= LCD_WIDTH*width + 1;
 342 #endif
 343
 344         do
 345         {
 346             int y, cb, cr, rv, guv, bu, r, g, b;
 347
 348             y  = YFAC*(*ysrc++ - 16);
 349             cb = *usrc++ - 128;
 350             cr = *vsrc++ - 128;
 351
 352             rv  =            RVFAC*cr;
 353             guv = GUFAC*cb + GVFAC*cr;
 354             bu  = BUFAC*cb;
 355
 356             r = y + rv;
 357             g = y + guv;
 358             b = y + bu;
 359
 360             if ((unsigned)(r | g | b) > 64*256-1)
 361             {
 362                 r = clamp(r, 0, 64*256-1);
 363                 g = clamp(g, 0, 64*256-1);
 364                 b = clamp(b, 0, 64*256-1);
 365             }
 366
 367             *dst = LCD_RGBPACK_LCD(r >> 9, g >> 8, b >> 9);
 368
 369 #if LCD_WIDTH >= LCD_HEIGHT
 370             dst++;
 371 #else
 372             dst += LCD_WIDTH;
 373 #endif
 374
 375             y = YFAC*(*ysrc++ - 16);
 376             r = y + rv;
 377             g = y + guv;
 378             b = y + bu;
 379
 380             if ((unsigned)(r | g | b) > 64*256-1)
 381             {
 382                 r = clamp(r, 0, 64*256-1);
 383                 g = clamp(g, 0, 64*256-1);
 384                 b = clamp(b, 0, 64*256-1);
 385             }
 386
 387             *dst = LCD_RGBPACK_LCD(r >> 9, g >> 8, b >> 9);
 388
 389 #if LCD_WIDTH >= LCD_HEIGHT
 390             dst++;
 391 #else
 392             dst += LCD_WIDTH;
 393 #endif
 394         }
 395         while (dst < row_end);
 396
 397         ysrc    += stride;
 398         usrc    += stride >> 1;
 399         vsrc    += stride >> 1;
 400
 401 #if LCD_WIDTH >= LCD_HEIGHT
 402         row_end += LCD_WIDTH;
 403         dst     += LCD_WIDTH - width;
 404 #else
 405         row_end -= 1;
 406         dst     -= LCD_WIDTH*width + 1;
 407 #endif
 408     }
 409     while (--linecounter > 0);
 410
 411 #if LCD_WIDTH >= LCD_HEIGHT
 412     lcd_update_rect(x, y, width, height);
 413 #else
 414     lcd_update_rect(LCD_WIDTH - y - height, x, height, width);
 415 #endif
 416 }
 417 #endif /* HAVE_LCD_COLOR */