common/lcd.c

   1 /*
   2  * Common LCD routines for supported CPUs
   3  *
   4  * (C) Copyright 2001-2002
   5  * Wolfgang Denk, DENX Software Engineering -- wd@denx.de
   6  *
   7  * SPDX-License-Identifier:     GPL-2.0+
   8  */
   9
  10 /************************************************************************/
  11 /* ** HEADER FILES                                                      */
  12 /************************************************************************/
  13
  14 /* #define DEBUG */
  15
  16 #include <config.h>
  17 #include <common.h>
  18 #include <command.h>
  19 #include <stdarg.h>
  20 #include <search.h>
  21 #include <env_callback.h>
  22 #include <linux/types.h>
  23 #include <stdio_dev.h>
  24 #if defined(CONFIG_POST)
  25 #include <post.h>
  26 #endif
  27 #include <lcd.h>
  28 #include <watchdog.h>
  29 #include <asm/unaligned.h>
  30 #include <splash.h>
  31 #include <asm/io.h>
  32 #include <asm/unaligned.h>
  33 #include <fdt_support.h>
  34
  35 #if defined(CONFIG_CPU_PXA25X) || defined(CONFIG_CPU_PXA27X) || \
  36         defined(CONFIG_CPU_MONAHANS)
  37 #include <asm/byteorder.h>
  38 #endif
  39
  40 #if defined(CONFIG_MPC823)
  41 #include <lcdvideo.h>
  42 #endif
  43
  44 #if defined(CONFIG_ATMEL_LCD)
  45 #include <atmel_lcdc.h>
  46 #endif
  47
  48 #if defined(CONFIG_LCD_DT_SIMPLEFB)
  49 #include <libfdt.h>
  50 #endif
  51
  52 /************************************************************************/
  53 /* ** FONT DATA                                                         */
  54 /************************************************************************/
  55 #include <video_font.h>         /* Get font data, width and height      */
  56
  57 /************************************************************************/
  58 /* ** LOGO DATA                                                         */
  59 /************************************************************************/
  60 #ifdef CONFIG_LCD_LOGO
  61 # include <bmp_logo.h>          /* Get logo data, width and height      */
  62 # include <bmp_logo_data.h>
  63 # if (CONSOLE_COLOR_WHITE >= BMP_LOGO_OFFSET) && (LCD_BPP != LCD_COLOR16)
  64 #  error Default Color Map overlaps with Logo Color Map
  65 # endif
  66 #endif
  67
  68 #ifdef CONFIG_SANDBOX
  69 #include <asm/sdl.h>
  70 #endif
  71
  72 #ifndef CONFIG_LCD_ALIGNMENT
  73 #define CONFIG_LCD_ALIGNMENT PAGE_SIZE
  74 #endif
  75
  76 #if (LCD_BPP != LCD_COLOR8) && (LCD_BPP != LCD_COLOR16) && \
  77         (LCD_BPP != LCD_COLOR32)
  78 # error Unsupported LCD BPP.
  79 #endif
  80
  81 DECLARE_GLOBAL_DATA_PTR;
  82
  83 static int lcd_init(void *lcdbase);
  84
  85 static void *lcd_logo(void);
  86
  87 static void lcd_setfgcolor(int color);
  88 static void lcd_setbgcolor(int color);
  89
  90 static int lcd_color_fg;
  91 static int lcd_color_bg;
  92 int lcd_line_length;
  93
  94 char lcd_is_enabled = 0;
  95
  96 static void *lcd_base;                  /* Start of framebuffer memory  */
  97
  98 static char lcd_flush_dcache;   /* 1 to flush dcache after each lcd update */
  99
 100 /************************************************************************/
 101
 102 /* Flush LCD activity to the caches */
 103 void lcd_sync(void)
 104 {
 105         /*
 106          * flush_dcache_range() is declared in common.h but it seems that some
 107          * architectures do not actually implement it. Is there a way to find
 108          * out whether it exists? For now, ARM is safe.
 109          */
 110 #if defined(CONFIG_ARM) && !defined(CONFIG_SYS_DCACHE_OFF)
 111         int line_length;
 112
 113         if (lcd_flush_dcache)
 114                 flush_dcache_range((u32)lcd_base,
 115                         (u32)(lcd_base + lcd_get_size(&line_length)));
 116 #elif defined(CONFIG_SANDBOX) && defined(CONFIG_VIDEO_SANDBOX_SDL)
 117         static ulong last_sync;
 118
 119         if (get_timer(last_sync) > 10) {
 120                 sandbox_sdl_sync(lcd_base);
 121                 last_sync = get_timer(0);
 122         }
 123 #endif
 124 }
 125
 126 void lcd_set_flush_dcache(int flush)
 127 {
 128         lcd_flush_dcache = (flush != 0);
 129 }
 130
 131 /*----------------------------------------------------------------------*/
 132
 133 static void lcd_stub_putc(struct stdio_dev *dev, const char c)
 134 {
 135         lcd_putc(c);
 136 }
 137
 138 static void lcd_stub_puts(struct stdio_dev *dev, const char *s)
 139 {
 140         lcd_puts(s);
 141 }
 142
 143 /************************************************************************/
 144 /**  Small utility to check that you got the colours right              */
 145 /************************************************************************/
 146 #ifdef LCD_TEST_PATTERN
 147
 148 #define N_BLK_VERT      2
 149 #define N_BLK_HOR       3
 150
 151 static int test_colors[N_BLK_HOR * N_BLK_VERT] = {
 152         CONSOLE_COLOR_RED,      CONSOLE_COLOR_GREEN,    CONSOLE_COLOR_YELLOW,
 153         CONSOLE_COLOR_BLUE,     CONSOLE_COLOR_MAGENTA,  CONSOLE_COLOR_CYAN,
 154 };
 155
 156 static void test_pattern(void)
 157 {
 158         ushort v_max  = panel_info.vl_row;
 159         ushort h_max  = panel_info.vl_col;
 160         ushort v_step = (v_max + N_BLK_VERT - 1) / N_BLK_VERT;
 161         ushort h_step = (h_max + N_BLK_HOR  - 1) / N_BLK_HOR;
 162         ushort v, h;
 163         uchar *pix = (uchar *)lcd_base;
 164
 165         printf("[LCD] Test Pattern: %d x %d [%d x %d]\n",
 166                 h_max, v_max, h_step, v_step);
 167
 168         /* WARNING: Code silently assumes 8bit/pixel */
 169         for (v = 0; v < v_max; ++v) {
 170                 uchar iy = v / v_step;
 171                 for (h = 0; h < h_max; ++h) {
 172                         uchar ix = N_BLK_HOR * iy + h / h_step;
 173                         *pix++ = test_colors[ix];
 174                 }
 175         }
 176 }
 177 #endif /* LCD_TEST_PATTERN */
 178
 179
 180 /************************************************************************/
 181 /* ** GENERIC Initialization Routines                                   */
 182 /************************************************************************/
 183 /*
 184  * With most lcd drivers the line length is set up
 185  * by calculating it from panel_info parameters. Some
 186  * drivers need to calculate the line length differently,
 187  * so make the function weak to allow overriding it.
 188  */
 189 __weak int lcd_get_size(int *line_length)
 190 {
 191         *line_length = (panel_info.vl_col * NBITS(panel_info.vl_bpix)) / 8;
 192         return *line_length * panel_info.vl_row;
 193 }
 194
 195 int drv_lcd_init(void)
 196 {
 197         struct stdio_dev lcddev;
 198         int rc;
 199
 200         lcd_base = map_sysmem(gd->fb_base, 0);
 201
 202         lcd_init(lcd_base);             /* LCD initialization */
 203
 204         /* Device initialization */
 205         memset(&lcddev, 0, sizeof(lcddev));
 206
 207         strcpy(lcddev.name, "lcd");
 208         lcddev.ext   = 0;                       /* No extensions */
 209         lcddev.flags = DEV_FLAGS_OUTPUT;        /* Output only */
 210         lcddev.putc  = lcd_stub_putc;           /* 'putc' function */
 211         lcddev.puts  = lcd_stub_puts;           /* 'puts' function */
 212
 213         rc = stdio_register(&lcddev);
 214
 215         return (rc == 0) ? 1 : rc;
 216 }
 217
 218 /*----------------------------------------------------------------------*/
 219 void lcd_clear(void)
 220 {
 221         short console_rows, console_cols;
 222         int bg_color;
 223 #if LCD_BPP == LCD_COLOR8
 224         /* Setting the palette */
 225         lcd_setcolreg(CONSOLE_COLOR_BLACK, 0, 0, 0);
 226         lcd_setcolreg(CONSOLE_COLOR_RED, 0xFF, 0, 0);
 227         lcd_setcolreg(CONSOLE_COLOR_GREEN, 0, 0xFF, 0);
 228         lcd_setcolreg(CONSOLE_COLOR_YELLOW, 0xFF, 0xFF, 0);
 229         lcd_setcolreg(CONSOLE_COLOR_BLUE, 0, 0, 0xFF);
 230         lcd_setcolreg(CONSOLE_COLOR_MAGENTA, 0xFF, 0, 0xFF);
 231         lcd_setcolreg(CONSOLE_COLOR_CYAN, 0, 0xFF, 0xFF);
 232         lcd_setcolreg(CONSOLE_COLOR_GREY, 0xAA, 0xAA, 0xAA);
 233         lcd_setcolreg(CONSOLE_COLOR_WHITE, 0xFF, 0xFF, 0xFF);
 234 #endif
 235
 236 #ifndef CONFIG_SYS_WHITE_ON_BLACK
 237         lcd_setfgcolor(CONSOLE_COLOR_BLACK);
 238         lcd_setbgcolor(CONSOLE_COLOR_WHITE);
 239         bg_color = CONSOLE_COLOR_WHITE;
 240 #else
 241         lcd_setfgcolor(CONSOLE_COLOR_WHITE);
 242         lcd_setbgcolor(CONSOLE_COLOR_BLACK);
 243         bg_color = CONSOLE_COLOR_BLACK;
 244 #endif  /* CONFIG_SYS_WHITE_ON_BLACK */
 245
 246 #ifdef  LCD_TEST_PATTERN
 247         test_pattern();
 248 #else
 249         /* set framebuffer to background color */
 250 #if (LCD_BPP != LCD_COLOR32)
 251         memset((char *)lcd_base, bg_color, lcd_line_length * panel_info.vl_row);
 252 #else
 253         u32 *ppix = lcd_base;
 254         u32 i;
 255         for (i = 0;
 256            i < (lcd_line_length * panel_info.vl_row)/NBYTES(panel_info.vl_bpix);
 257            i++) {
 258                 *ppix++ = bg_color;
 259         }
 260 #endif
 261 #endif
 262         /* Paint the logo and retrieve LCD base address */
 263         debug("[LCD] Drawing the logo...\n");
 264 #if defined(CONFIG_LCD_LOGO) && !defined(CONFIG_LCD_INFO_BELOW_LOGO)
 265         console_rows = (panel_info.vl_row - BMP_LOGO_HEIGHT);
 266         console_rows /= VIDEO_FONT_HEIGHT;
 267 #else
 268         console_rows = panel_info.vl_row / VIDEO_FONT_HEIGHT;
 269 #endif
 270         console_cols = panel_info.vl_col / VIDEO_FONT_WIDTH;
 271         lcd_init_console(lcd_base, console_rows, console_cols);
 272         lcd_init_console(lcd_logo(), console_rows, console_cols);
 273         lcd_sync();
 274 }
 275
 276 static int do_lcd_clear(cmd_tbl_t *cmdtp, int flag, int argc,
 277                         char *const argv[])
 278 {
 279         lcd_clear();
 280         return 0;
 281 }
 282
 283 U_BOOT_CMD(
 284         cls,    1,      1,      do_lcd_clear,
 285         "clear screen",
 286         ""
 287 );
 288
 289 /*----------------------------------------------------------------------*/
 290
 291 static int lcd_init(void *lcdbase)
 292 {
 293         /* Initialize the lcd controller */
 294         debug("[LCD] Initializing LCD frambuffer at %p\n", lcdbase);
 295
 296         lcd_ctrl_init(lcdbase);
 297
 298         /*
 299          * lcd_ctrl_init() of some drivers (i.e. bcm2835 on rpi) ignores
 300          * the 'lcdbase' argument and uses custom lcd base address
 301          * by setting up gd->fb_base. Check for this condition and fixup
 302          * 'lcd_base' address.
 303          */
 304         if (map_to_sysmem(lcdbase) != gd->fb_base)
 305                 lcd_base = map_sysmem(gd->fb_base, 0);
 306
 307         debug("[LCD] Using LCD frambuffer at %p\n", lcd_base);
 308
 309         lcd_get_size(&lcd_line_length);
 310         lcd_is_enabled = 1;
 311         lcd_clear();
 312         lcd_enable();
 313
 314         /* Initialize the console */
 315         lcd_set_col(0);
 316 #ifdef CONFIG_LCD_INFO_BELOW_LOGO
 317         lcd_set_row(7 + BMP_LOGO_HEIGHT / VIDEO_FONT_HEIGHT);
 318 #else
 319         lcd_set_row(1); /* leave 1 blank line below logo */
 320 #endif
 321
 322         return 0;
 323 }
 324
 325
 326 /************************************************************************/
 327 /* ** ROM capable initialization part - needed to reserve FB memory     */
 328 /************************************************************************/
 329 /*
 330  * This is called early in the system initialization to grab memory
 331  * for the LCD controller.
 332  * Returns new address for monitor, after reserving LCD buffer memory
 333  *
 334  * Note that this is running from ROM, so no write access to global data.
 335  */
 336 ulong lcd_setmem(ulong addr)
 337 {
 338         ulong size;
 339         int line_length;
 340
 341         debug("LCD panel info: %d x %d, %d bit/pix\n", panel_info.vl_col,
 342                 panel_info.vl_row, NBITS(panel_info.vl_bpix));
 343
 344         size = lcd_get_size(&line_length);
 345
 346         /* Round up to nearest full page, or MMU section if defined */
 347         size = ALIGN(size, CONFIG_LCD_ALIGNMENT);
 348         addr = ALIGN(addr - CONFIG_LCD_ALIGNMENT + 1, CONFIG_LCD_ALIGNMENT);
 349
 350         /* Allocate pages for the frame buffer. */
 351         addr -= size;
 352
 353         debug("Reserving %ldk for LCD Framebuffer at: %08lx\n",
 354               size >> 10, addr);
 355
 356         return addr;
 357 }
 358
 359 /*----------------------------------------------------------------------*/
 360
 361 static void lcd_setfgcolor(int color)
 362 {
 363         lcd_color_fg = color;
 364 }
 365
 366 int lcd_getfgcolor(void)
 367 {
 368         return lcd_color_fg;
 369 }
 370
 371 /*----------------------------------------------------------------------*/
 372
 373 static void lcd_setbgcolor(int color)
 374 {
 375         lcd_color_bg = color;
 376 }
 377
 378 int lcd_getbgcolor(void)
 379 {
 380         return lcd_color_bg;
 381 }
 382
 383 /************************************************************************/
 384 /* ** Chipset depending Bitmap / Logo stuff...                          */
 385 /************************************************************************/
 386 static inline ushort *configuration_get_cmap(void)
 387 {
 388 #if defined CONFIG_CPU_PXA
 389         struct pxafb_info *fbi = &panel_info.pxa;
 390         return (ushort *)fbi->palette;
 391 #elif defined(CONFIG_MPC823)
 392         immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
 393         cpm8xx_t *cp = &(immr->im_cpm);
 394         return (ushort *)&(cp->lcd_cmap[255 * sizeof(ushort)]);
 395 #elif defined(CONFIG_ATMEL_LCD)
 396         return (ushort *)(panel_info.mmio + ATMEL_LCDC_LUT(0));
 397 #elif !defined(CONFIG_ATMEL_HLCD) && !defined(CONFIG_EXYNOS_FB)
 398         return panel_info.cmap;
 399 #elif defined(CONFIG_LCD_LOGO)
 400         return bmp_logo_palette;
 401 #else
 402         return NULL;
 403 #endif
 404 }
 405
 406 #ifdef CONFIG_LCD_LOGO
 407 void bitmap_plot(int x, int y)
 408 {
 409 #ifdef CONFIG_ATMEL_LCD
 410         uint *cmap = (uint *)bmp_logo_palette;
 411 #else
 412         ushort *cmap = (ushort *)bmp_logo_palette;
 413 #endif
 414         ushort i, j;
 415         uchar *bmap;
 416         uchar *fb;
 417         ushort *fb16;
 418 #if defined(CONFIG_MPC823)
 419         immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
 420         cpm8xx_t *cp = &(immr->im_cpm);
 421 #endif
 422         unsigned bpix = NBITS(panel_info.vl_bpix);
 423
 424         debug("Logo: width %d  height %d  colors %d  cmap %d\n",
 425                 BMP_LOGO_WIDTH, BMP_LOGO_HEIGHT, BMP_LOGO_COLORS,
 426                 ARRAY_SIZE(bmp_logo_palette));
 427
 428         bmap = &bmp_logo_bitmap[0];
 429         fb   = (uchar *)(lcd_base + y * lcd_line_length + x * bpix / 8);
 430
 431         if (bpix < 12) {
 432                 /* Leave room for default color map
 433                  * default case: generic system with no cmap (most likely 16bpp)
 434                  * cmap was set to the source palette, so no change is done.
 435                  * This avoids even more ifdefs in the next stanza
 436                  */
 437 #if defined(CONFIG_MPC823)
 438                 cmap = (ushort *) &(cp->lcd_cmap[BMP_LOGO_OFFSET * sizeof(ushort)]);
 439 #elif defined(CONFIG_ATMEL_LCD)
 440                 cmap = (uint *)configuration_get_cmap();
 441 #else
 442                 cmap = configuration_get_cmap();
 443 #endif
 444
 445                 WATCHDOG_RESET();
 446
 447                 /* Set color map */
 448                 for (i = 0; i < ARRAY_SIZE(bmp_logo_palette); ++i) {
 449                         ushort colreg = bmp_logo_palette[i];
 450 #ifdef CONFIG_ATMEL_LCD
 451                         uint lut_entry;
 452 #ifdef CONFIG_ATMEL_LCD_BGR555
 453                         lut_entry = ((colreg & 0x000F) << 11) |
 454                                         ((colreg & 0x00F0) <<  2) |
 455                                         ((colreg & 0x0F00) >>  7);
 456 #else /* CONFIG_ATMEL_LCD_RGB565 */
 457                         lut_entry = ((colreg & 0x000F) << 1) |
 458                                         ((colreg & 0x00F0) << 3) |
 459                                         ((colreg & 0x0F00) << 4);
 460 #endif
 461                         *(cmap + BMP_LOGO_OFFSET) = lut_entry;
 462                         cmap++;
 463 #else /* !CONFIG_ATMEL_LCD */
 464                         *cmap++ = colreg;
 465 #endif /* CONFIG_ATMEL_LCD */
 466                 }
 467
 468                 WATCHDOG_RESET();
 469
 470                 for (i = 0; i < BMP_LOGO_HEIGHT; ++i) {
 471                         memcpy(fb, bmap, BMP_LOGO_WIDTH);
 472                         bmap += BMP_LOGO_WIDTH;
 473                         fb += panel_info.vl_col;
 474                 }
 475         }
 476         else { /* true color mode */
 477                 u16 col16;
 478                 fb16 = (ushort *)fb;
 479                 for (i = 0; i < BMP_LOGO_HEIGHT; ++i) {
 480                         for (j = 0; j < BMP_LOGO_WIDTH; j++) {
 481                                 col16 = bmp_logo_palette[(bmap[j]-16)];
 482                                 fb16[j] =
 483                                         ((col16 & 0x000F) << 1) |
 484                                         ((col16 & 0x00F0) << 3) |
 485                                         ((col16 & 0x0F00) << 4);
 486                                 }
 487                         bmap += BMP_LOGO_WIDTH;
 488                         fb16 += panel_info.vl_col;
 489                 }
 490         }
 491
 492         WATCHDOG_RESET();
 493         lcd_sync();
 494 }
 495 #else
 496 static inline void bitmap_plot(int x, int y) {}
 497 #endif /* CONFIG_LCD_LOGO */
 498
 499 /*----------------------------------------------------------------------*/
 500 #if defined(CONFIG_CMD_BMP) || defined(CONFIG_SPLASH_SCREEN)
 501 /*
 502  * Display the BMP file located at address bmp_image.
 503  * Only uncompressed.
 504  */
 505
 506 #ifdef CONFIG_SPLASH_SCREEN_ALIGN
 507 #define BMP_ALIGN_CENTER        0x7FFF
 508
 509 static void splash_align_axis(int *axis, unsigned long panel_size,
 510                                         unsigned long picture_size)
 511 {
 512         unsigned long panel_picture_delta = panel_size - picture_size;
 513         unsigned long axis_alignment;
 514
 515         if (*axis == BMP_ALIGN_CENTER)
 516                 axis_alignment = panel_picture_delta / 2;
 517         else if (*axis < 0)
 518                 axis_alignment = panel_picture_delta + *axis + 1;
 519         else
 520                 return;
 521
 522         *axis = max(0, (int)axis_alignment);
 523 }
 524 #endif
 525
 526
 527 #ifdef CONFIG_LCD_BMP_RLE8
 528
 529 #define BMP_RLE8_ESCAPE         0
 530 #define BMP_RLE8_EOL            0
 531 #define BMP_RLE8_EOBMP          1
 532 #define BMP_RLE8_DELTA          2
 533
 534 static void draw_unencoded_bitmap(ushort **fbp, uchar *bmap, ushort *cmap,
 535                                   int cnt)
 536 {
 537         while (cnt > 0) {
 538                 *(*fbp)++ = cmap[*bmap++];
 539                 cnt--;
 540         }
 541 }
 542
 543 static void draw_encoded_bitmap(ushort **fbp, ushort c, int cnt)
 544 {
 545         ushort *fb = *fbp;
 546         int cnt_8copy = cnt >> 3;
 547
 548         cnt -= cnt_8copy << 3;
 549         while (cnt_8copy > 0) {
 550                 *fb++ = c;
 551                 *fb++ = c;
 552                 *fb++ = c;
 553                 *fb++ = c;
 554                 *fb++ = c;
 555                 *fb++ = c;
 556                 *fb++ = c;
 557                 *fb++ = c;
 558                 cnt_8copy--;
 559         }
 560         while (cnt > 0) {
 561                 *fb++ = c;
 562                 cnt--;
 563         }
 564         *fbp = fb;
 565 }
 566
 567 /*
 568  * Do not call this function directly, must be called from lcd_display_bitmap.
 569  */
 570 static void lcd_display_rle8_bitmap(bmp_image_t *bmp, ushort *cmap, uchar *fb,
 571                                     int x_off, int y_off)
 572 {
 573         uchar *bmap;
 574         ulong width, height;
 575         ulong cnt, runlen;
 576         int x, y;
 577         int decode = 1;
 578
 579         width = get_unaligned_le32(&bmp->header.width);
 580         height = get_unaligned_le32(&bmp->header.height);
 581         bmap = (uchar *)bmp + get_unaligned_le32(&bmp->header.data_offset);
 582
 583         x = 0;
 584         y = height - 1;
 585
 586         while (decode) {
 587                 if (bmap[0] == BMP_RLE8_ESCAPE) {
 588                         switch (bmap[1]) {
 589                         case BMP_RLE8_EOL:
 590                                 /* end of line */
 591                                 bmap += 2;
 592                                 x = 0;
 593                                 y--;
 594                                 /* 16bpix, 2-byte per pixel, width should *2 */
 595                                 fb -= (width * 2 + lcd_line_length);
 596                                 break;
 597                         case BMP_RLE8_EOBMP:
 598                                 /* end of bitmap */
 599                                 decode = 0;
 600                                 break;
 601                         case BMP_RLE8_DELTA:
 602                                 /* delta run */
 603                                 x += bmap[2];
 604                                 y -= bmap[3];
 605                                 /* 16bpix, 2-byte per pixel, x should *2 */
 606                                 fb = (uchar *) (lcd_base + (y + y_off - 1)
 607                                         * lcd_line_length + (x + x_off) * 2);
 608                                 bmap += 4;
 609                                 break;
 610                         default:
 611                                 /* unencoded run */
 612                                 runlen = bmap[1];
 613                                 bmap += 2;
 614                                 if (y < height) {
 615                                         if (x < width) {
 616                                                 if (x + runlen > width)
 617                                                         cnt = width - x;
 618                                                 else
 619                                                         cnt = runlen;
 620                                                 draw_unencoded_bitmap(
 621                                                         (ushort **)&fb,
 622                                                         bmap, cmap, cnt);
 623                                         }
 624                                         x += runlen;
 625                                 }
 626                                 bmap += runlen;
 627                                 if (runlen & 1)
 628                                         bmap++;
 629                         }
 630                 } else {
 631                         /* encoded run */
 632                         if (y < height) {
 633                                 runlen = bmap[0];
 634                                 if (x < width) {
 635                                         /* aggregate the same code */
 636                                         while (bmap[0] == 0xff &&
 637                                                bmap[2] != BMP_RLE8_ESCAPE &&
 638                                                bmap[1] == bmap[3]) {
 639                                                 runlen += bmap[2];
 640                                                 bmap += 2;
 641                                         }
 642                                         if (x + runlen > width)
 643                                                 cnt = width - x;
 644                                         else
 645                                                 cnt = runlen;
 646                                         draw_encoded_bitmap((ushort **)&fb,
 647                                                 cmap[bmap[1]], cnt);
 648                                 }
 649                                 x += runlen;
 650                         }
 651                         bmap += 2;
 652                 }
 653         }
 654 }
 655 #endif
 656
 657 #if defined(CONFIG_MPC823)
 658 #define FB_PUT_BYTE(fb, from) *(fb)++ = (255 - *(from)++)
 659 #else
 660 #define FB_PUT_BYTE(fb, from) *(fb)++ = *(from)++
 661 #endif
 662
 663 #if defined(CONFIG_BMP_16BPP)
 664 #if defined(CONFIG_ATMEL_LCD_BGR555)
 665 static inline void fb_put_word(uchar **fb, uchar **from)
 666 {
 667         *(*fb)++ = (((*from)[0] & 0x1f) << 2) | ((*from)[1] & 0x03);
 668         *(*fb)++ = ((*from)[0] & 0xe0) | (((*from)[1] & 0x7c) >> 2);
 669         *from += 2;
 670 }
 671 #else
 672 static inline void fb_put_word(uchar **fb, uchar **from)
 673 {
 674         *(*fb)++ = *(*from)++;
 675         *(*fb)++ = *(*from)++;
 676 }
 677 #endif
 678 #endif /* CONFIG_BMP_16BPP */
 679
 680 int lcd_display_bitmap(ulong bmp_image, int x, int y)
 681 {
 682         ushort *cmap = NULL;
 683         ushort *cmap_base = NULL;
 684         ushort i, j;
 685         uchar *fb;
 686         bmp_image_t *bmp = (bmp_image_t *)map_sysmem(bmp_image, 0);
 687         uchar *bmap;
 688         ushort padded_width;
 689         unsigned long width, height, byte_width;
 690         unsigned long pwidth = panel_info.vl_col;
 691         unsigned colors, bpix, bmp_bpix;
 692
 693         if (!bmp || !(bmp->header.signature[0] == 'B' &&
 694                 bmp->header.signature[1] == 'M')) {
 695                 printf("Error: no valid bmp image at %lx\n", bmp_image);
 696
 697                 return 1;
 698         }
 699
 700         width = get_unaligned_le32(&bmp->header.width);
 701         height = get_unaligned_le32(&bmp->header.height);
 702         bmp_bpix = get_unaligned_le16(&bmp->header.bit_count);
 703
 704         colors = 1 << bmp_bpix;
 705
 706         bpix = NBITS(panel_info.vl_bpix);
 707
 708         if (bpix != 1 && bpix != 8 && bpix != 16 && bpix != 32) {
 709                 printf ("Error: %d bit/pixel mode, but BMP has %d bit/pixel\n",
 710                         bpix, bmp_bpix);
 711
 712                 return 1;
 713         }
 714
 715         /*
 716          * We support displaying 8bpp BMPs on 16bpp LCDs
 717          * and displaying 24bpp BMPs on 32bpp LCDs
 718          * */
 719         if (bpix != bmp_bpix &&
 720             !(bmp_bpix == 8 && bpix == 16) &&
 721             !(bmp_bpix == 24 && bpix == 32)) {
 722                 printf ("Error: %d bit/pixel mode, but BMP has %d bit/pixel\n",
 723                         bpix, get_unaligned_le16(&bmp->header.bit_count));
 724                 return 1;
 725         }
 726
 727         debug("Display-bmp: %d x %d  with %d colors\n",
 728                 (int)width, (int)height, (int)colors);
 729
 730         if (bmp_bpix == 8) {
 731                 cmap = configuration_get_cmap();
 732                 cmap_base = cmap;
 733
 734                 /* Set color map */
 735                 for (i = 0; i < colors; ++i) {
 736                         bmp_color_table_entry_t cte = bmp->color_table[i];
 737 #if !defined(CONFIG_ATMEL_LCD)
 738                         ushort colreg =
 739                                 ( ((cte.red)   << 8) & 0xf800) |
 740                                 ( ((cte.green) << 3) & 0x07e0) |
 741                                 ( ((cte.blue)  >> 3) & 0x001f) ;
 742                         *cmap = colreg;
 743 #if defined(CONFIG_MPC823)
 744                         cmap--;
 745 #else
 746                         cmap++;
 747 #endif
 748 #else /* CONFIG_ATMEL_LCD */
 749                         lcd_setcolreg(i, cte.red, cte.green, cte.blue);
 750 #endif
 751                 }
 752         }
 753
 754         padded_width = (width & 0x3 ? (width & ~0x3) + 4 : width);
 755
 756 #ifdef CONFIG_SPLASH_SCREEN_ALIGN
 757         splash_align_axis(&x, pwidth, width);
 758         splash_align_axis(&y, panel_info.vl_row, height);
 759 #endif /* CONFIG_SPLASH_SCREEN_ALIGN */
 760
 761         if ((x + width) > pwidth)
 762                 width = pwidth - x;
 763         if ((y + height) > panel_info.vl_row)
 764                 height = panel_info.vl_row - y;
 765
 766         bmap = (uchar *)bmp + get_unaligned_le32(&bmp->header.data_offset);
 767         fb   = (uchar *)(lcd_base +
 768                 (y + height - 1) * lcd_line_length + x * bpix / 8);
 769
 770         switch (bmp_bpix) {
 771         case 1: /* pass through */
 772         case 8: {
 773 #ifdef CONFIG_LCD_BMP_RLE8
 774                 u32 compression = get_unaligned_le32(&bmp->header.compression);
 775                 if (compression == BMP_BI_RLE8) {
 776                         if (bpix != 16) {
 777                                 /* TODO implement render code for bpix != 16 */
 778                                 printf("Error: only support 16 bpix");
 779                                 return 1;
 780                         }
 781                         lcd_display_rle8_bitmap(bmp, cmap_base, fb, x, y);
 782                         break;
 783                 }
 784 #endif
 785
 786                 if (bpix != 16)
 787                         byte_width = width;
 788                 else
 789                         byte_width = width * 2;
 790
 791                 for (i = 0; i < height; ++i) {
 792                         WATCHDOG_RESET();
 793                         for (j = 0; j < width; j++) {
 794                                 if (bpix != 16) {
 795                                         FB_PUT_BYTE(fb, bmap);
 796                                 } else {
 797                                         *(uint16_t *)fb = cmap_base[*(bmap++)];
 798                                         fb += sizeof(uint16_t) / sizeof(*fb);
 799                                 }
 800                         }
 801                         bmap += (padded_width - width);
 802                         fb -= byte_width + lcd_line_length;
 803                 }
 804                 break;
 805         }
 806 #if defined(CONFIG_BMP_16BPP)
 807         case 16:
 808                 for (i = 0; i < height; ++i) {
 809                         WATCHDOG_RESET();
 810                         for (j = 0; j < width; j++)
 811                                 fb_put_word(&fb, &bmap);
 812
 813                         bmap += (padded_width - width) * 2;
 814                         fb -= width * 2 + lcd_line_length;
 815                 }
 816                 break;
 817 #endif /* CONFIG_BMP_16BPP */
 818 #if defined(CONFIG_BMP_24BMP)
 819         case 24:
 820                 for (i = 0; i < height; ++i) {
 821                         for (j = 0; j < width; j++) {
 822                                 *(fb++) = *(bmap++);
 823                                 *(fb++) = *(bmap++);
 824                                 *(fb++) = *(bmap++);
 825                                 *(fb++) = 0;
 826                         }
 827                         fb -= lcd_line_length + width * (bpix / 8);
 828                 }
 829                 break;
 830 #endif /* CONFIG_BMP_24BMP */
 831 #if defined(CONFIG_BMP_32BPP)
 832         case 32:
 833                 for (i = 0; i < height; ++i) {
 834                         for (j = 0; j < width; j++) {
 835                                 *(fb++) = *(bmap++);
 836                                 *(fb++) = *(bmap++);
 837                                 *(fb++) = *(bmap++);
 838                                 *(fb++) = *(bmap++);
 839                         }
 840                         fb -= lcd_line_length + width * (bpix / 8);
 841                 }
 842                 break;
 843 #endif /* CONFIG_BMP_32BPP */
 844         default:
 845                 break;
 846         };
 847
 848         lcd_sync();
 849         return 0;
 850 }
 851 #endif
 852
 853 static void *lcd_logo(void)
 854 {
 855 #ifdef CONFIG_SPLASH_SCREEN
 856         char *s;
 857         ulong addr;
 858         static int do_splash = 1;
 859
 860         if (do_splash && (s = getenv("splashimage")) != NULL) {
 861                 int x = 0, y = 0;
 862                 do_splash = 0;
 863
 864                 if (splash_screen_prepare())
 865                         return (void *)lcd_base;
 866
 867                 addr = simple_strtoul (s, NULL, 16);
 868
 869                 splash_get_pos(&x, &y);
 870
 871                 if (bmp_display(addr, x, y) == 0)
 872                         return (void *)lcd_base;
 873         }
 874 #endif /* CONFIG_SPLASH_SCREEN */
 875
 876         bitmap_plot(0, 0);
 877
 878 #ifdef CONFIG_LCD_INFO
 879         lcd_set_col(LCD_INFO_X / VIDEO_FONT_WIDTH);
 880         lcd_set_row(LCD_INFO_Y / VIDEO_FONT_HEIGHT);
 881         lcd_show_board_info();
 882 #endif /* CONFIG_LCD_INFO */
 883
 884 #if defined(CONFIG_LCD_LOGO) && !defined(CONFIG_LCD_INFO_BELOW_LOGO)
 885         return (void *)((ulong)lcd_base + BMP_LOGO_HEIGHT * lcd_line_length);
 886 #else
 887         return (void *)lcd_base;
 888 #endif /* CONFIG_LCD_LOGO && !defined(CONFIG_LCD_INFO_BELOW_LOGO) */
 889 }
 890
 891 #ifdef CONFIG_SPLASHIMAGE_GUARD
 892 static int on_splashimage(const char *name, const char *value, enum env_op op,
 893         int flags)
 894 {
 895         ulong addr;
 896         int aligned;
 897
 898         if (op == env_op_delete)
 899                 return 0;
 900
 901         addr = simple_strtoul(value, NULL, 16);
 902         /* See README.displaying-bmps */
 903         aligned = (addr % 4 == 2);
 904         if (!aligned) {
 905                 printf("Invalid splashimage value. Value must be 16 bit aligned, but not 32 bit aligned\n");
 906                 return -1;
 907         }
 908
 909         return 0;
 910 }
 911
 912 U_BOOT_ENV_CALLBACK(splashimage, on_splashimage);
 913 #endif
 914
 915 int lcd_get_pixel_width(void)
 916 {
 917         return panel_info.vl_col;
 918 }
 919
 920 int lcd_get_pixel_height(void)
 921 {
 922         return panel_info.vl_row;
 923 }
 924
 925 #if defined(CONFIG_LCD_DT_SIMPLEFB)
 926 static int lcd_dt_simplefb_configure_node(void *blob, int off)
 927 {
 928 #if LCD_BPP == LCD_COLOR16
 929         return fdt_setup_simplefb_node(blob, off, gd->fb_base,
 930                                        panel_info.vl_col, panel_info.vl_row,
 931                                        panel_info.vl_col * 2, "r5g6b5");
 932 #else
 933         return -1;
 934 #endif
 935 }
 936
 937 int lcd_dt_simplefb_add_node(void *blob)
 938 {
 939         static const char compat[] = "simple-framebuffer";
 940         static const char disabled[] = "disabled";
 941         int off, ret;
 942
 943         off = fdt_add_subnode(blob, 0, "framebuffer");
 944         if (off < 0)
 945                 return -1;
 946
 947         ret = fdt_setprop(blob, off, "status", disabled, sizeof(disabled));
 948         if (ret < 0)
 949                 return -1;
 950
 951         ret = fdt_setprop(blob, off, "compatible", compat, sizeof(compat));
 952         if (ret < 0)
 953                 return -1;
 954
 955         return lcd_dt_simplefb_configure_node(blob, off);
 956 }
 957
 958 int lcd_dt_simplefb_enable_existing_node(void *blob)
 959 {
 960         int off;
 961
 962         off = fdt_node_offset_by_compatible(blob, -1, "simple-framebuffer");
 963         if (off < 0)
 964                 return -1;
 965
 966         return lcd_dt_simplefb_configure_node(blob, off);
 967 }
 968 #endif