xref: /openbmc/u-boot/common/lcd.c (revision c9aa831e)
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  * See file CREDITS for list of people who contributed to this
8  * project.
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License as
12  * published by the Free Software Foundation; either version 2 of
13  * the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23  * MA 02111-1307 USA
24  */
25 
26 /************************************************************************/
27 /* ** HEADER FILES							*/
28 /************************************************************************/
29 
30 /* #define DEBUG */
31 
32 #include <config.h>
33 #include <common.h>
34 #include <command.h>
35 #include <stdarg.h>
36 #include <search.h>
37 #include <env_callback.h>
38 #include <linux/types.h>
39 #include <stdio_dev.h>
40 #if defined(CONFIG_POST)
41 #include <post.h>
42 #endif
43 #include <lcd.h>
44 #include <watchdog.h>
45 
46 #if defined(CONFIG_CPU_PXA25X) || defined(CONFIG_CPU_PXA27X) || \
47 	defined(CONFIG_CPU_MONAHANS)
48 #define CONFIG_CPU_PXA
49 #include <asm/byteorder.h>
50 #endif
51 
52 #if defined(CONFIG_MPC823)
53 #include <lcdvideo.h>
54 #endif
55 
56 #if defined(CONFIG_ATMEL_LCD)
57 #include <atmel_lcdc.h>
58 #endif
59 
60 /************************************************************************/
61 /* ** FONT DATA								*/
62 /************************************************************************/
63 #include <video_font.h>		/* Get font data, width and height	*/
64 #include <video_font_data.h>
65 
66 /************************************************************************/
67 /* ** LOGO DATA								*/
68 /************************************************************************/
69 #ifdef CONFIG_LCD_LOGO
70 # include <bmp_logo.h>		/* Get logo data, width and height	*/
71 # include <bmp_logo_data.h>
72 # if (CONSOLE_COLOR_WHITE >= BMP_LOGO_OFFSET) && (LCD_BPP != LCD_COLOR16)
73 #  error Default Color Map overlaps with Logo Color Map
74 # endif
75 #endif
76 
77 #ifndef CONFIG_LCD_ALIGNMENT
78 #define CONFIG_LCD_ALIGNMENT PAGE_SIZE
79 #endif
80 
81 /* By default we scroll by a single line */
82 #ifndef CONFIG_CONSOLE_SCROLL_LINES
83 #define CONFIG_CONSOLE_SCROLL_LINES 1
84 #endif
85 
86 DECLARE_GLOBAL_DATA_PTR;
87 
88 ulong lcd_setmem (ulong addr);
89 
90 static void lcd_drawchars(ushort x, ushort y, uchar *str, int count);
91 static inline void lcd_puts_xy(ushort x, ushort y, uchar *s);
92 static inline void lcd_putc_xy(ushort x, ushort y, uchar  c);
93 
94 static int lcd_init(void *lcdbase);
95 
96 static void *lcd_logo (void);
97 
98 static int lcd_getbgcolor(void);
99 static void lcd_setfgcolor(int color);
100 static void lcd_setbgcolor(int color);
101 
102 char lcd_is_enabled = 0;
103 
104 static char lcd_flush_dcache;	/* 1 to flush dcache after each lcd update */
105 
106 
107 #ifdef	NOT_USED_SO_FAR
108 static void lcd_getcolreg(ushort regno,
109 				ushort *red, ushort *green, ushort *blue);
110 static int lcd_getfgcolor(void);
111 #endif	/* NOT_USED_SO_FAR */
112 
113 /************************************************************************/
114 
115 /* Flush LCD activity to the caches */
116 void lcd_sync(void)
117 {
118 	/*
119 	 * flush_dcache_range() is declared in common.h but it seems that some
120 	 * architectures do not actually implement it. Is there a way to find
121 	 * out whether it exists? For now, ARM is safe.
122 	 */
123 #if defined(CONFIG_ARM) && !defined(CONFIG_SYS_DCACHE_OFF)
124 	int line_length;
125 
126 	if (lcd_flush_dcache)
127 		flush_dcache_range((u32)lcd_base,
128 			(u32)(lcd_base + lcd_get_size(&line_length)));
129 #endif
130 }
131 
132 void lcd_set_flush_dcache(int flush)
133 {
134 	lcd_flush_dcache = (flush != 0);
135 }
136 
137 /*----------------------------------------------------------------------*/
138 
139 static void console_scrollup(void)
140 {
141 	const int rows = CONFIG_CONSOLE_SCROLL_LINES;
142 
143 	/* Copy up rows ignoring those that will be overwritten */
144 	memcpy(CONSOLE_ROW_FIRST,
145 	       lcd_console_address + CONSOLE_ROW_SIZE * rows,
146 	       CONSOLE_SIZE - CONSOLE_ROW_SIZE * rows);
147 
148 	/* Clear the last rows */
149 	memset(lcd_console_address + CONSOLE_SIZE - CONSOLE_ROW_SIZE * rows,
150 		COLOR_MASK(lcd_color_bg),
151 	       CONSOLE_ROW_SIZE * rows);
152 
153 	lcd_sync();
154 	console_row -= rows;
155 }
156 
157 /*----------------------------------------------------------------------*/
158 
159 static inline void console_back(void)
160 {
161 	if (--console_col < 0) {
162 		console_col = CONSOLE_COLS-1 ;
163 		if (--console_row < 0) {
164 			console_row = 0;
165 		}
166 	}
167 
168 	lcd_putc_xy(console_col * VIDEO_FONT_WIDTH,
169 		console_row * VIDEO_FONT_HEIGHT, ' ');
170 }
171 
172 /*----------------------------------------------------------------------*/
173 
174 static inline void console_newline(void)
175 {
176 	++console_row;
177 	console_col = 0;
178 
179 	/* Check if we need to scroll the terminal */
180 	if (console_row >= CONSOLE_ROWS) {
181 		/* Scroll everything up */
182 		console_scrollup();
183 	} else {
184 		lcd_sync();
185 	}
186 }
187 
188 /*----------------------------------------------------------------------*/
189 
190 void lcd_putc(const char c)
191 {
192 	if (!lcd_is_enabled) {
193 		serial_putc(c);
194 
195 		return;
196 	}
197 
198 	switch (c) {
199 	case '\r':
200 		console_col = 0;
201 
202 		return;
203 	case '\n':
204 		console_newline();
205 
206 		return;
207 	case '\t':	/* Tab (8 chars alignment) */
208 		console_col +=  8;
209 		console_col &= ~7;
210 
211 		if (console_col >= CONSOLE_COLS)
212 			console_newline();
213 
214 		return;
215 	case '\b':
216 		console_back();
217 
218 		return;
219 	default:
220 		lcd_putc_xy(console_col * VIDEO_FONT_WIDTH,
221 			console_row * VIDEO_FONT_HEIGHT, c);
222 		if (++console_col >= CONSOLE_COLS)
223 			console_newline();
224 	}
225 }
226 
227 /*----------------------------------------------------------------------*/
228 
229 void lcd_puts(const char *s)
230 {
231 	if (!lcd_is_enabled) {
232 		serial_puts(s);
233 
234 		return;
235 	}
236 
237 	while (*s) {
238 		lcd_putc(*s++);
239 	}
240 	lcd_sync();
241 }
242 
243 /*----------------------------------------------------------------------*/
244 
245 void lcd_printf(const char *fmt, ...)
246 {
247 	va_list args;
248 	char buf[CONFIG_SYS_PBSIZE];
249 
250 	va_start(args, fmt);
251 	vsprintf(buf, fmt, args);
252 	va_end(args);
253 
254 	lcd_puts(buf);
255 }
256 
257 /************************************************************************/
258 /* ** Low-Level Graphics Routines					*/
259 /************************************************************************/
260 
261 static void lcd_drawchars(ushort x, ushort y, uchar *str, int count)
262 {
263 	uchar *dest;
264 	ushort row;
265 
266 #if defined(CONFIG_LCD_LOGO) && !defined(CONFIG_LCD_INFO_BELOW_LOGO)
267 	y += BMP_LOGO_HEIGHT;
268 #endif
269 
270 #if LCD_BPP == LCD_MONOCHROME
271 	ushort off  = x * (1 << LCD_BPP) % 8;
272 #endif
273 
274 	dest = (uchar *)(lcd_base + y * lcd_line_length + x * (1 << LCD_BPP) / 8);
275 
276 	for (row = 0; row < VIDEO_FONT_HEIGHT; ++row, dest += lcd_line_length) {
277 		uchar *s = str;
278 		int i;
279 #if LCD_BPP == LCD_COLOR16
280 		ushort *d = (ushort *)dest;
281 #else
282 		uchar *d = dest;
283 #endif
284 
285 #if LCD_BPP == LCD_MONOCHROME
286 		uchar rest = *d & -(1 << (8-off));
287 		uchar sym;
288 #endif
289 		for (i = 0; i < count; ++i) {
290 			uchar c, bits;
291 
292 			c = *s++;
293 			bits = video_fontdata[c * VIDEO_FONT_HEIGHT + row];
294 
295 #if LCD_BPP == LCD_MONOCHROME
296 			sym  = (COLOR_MASK(lcd_color_fg) & bits) |
297 				(COLOR_MASK(lcd_color_bg) & ~bits);
298 
299 			*d++ = rest | (sym >> off);
300 			rest = sym << (8-off);
301 #elif LCD_BPP == LCD_COLOR8
302 			for (c = 0; c < 8; ++c) {
303 				*d++ = (bits & 0x80) ?
304 						lcd_color_fg : lcd_color_bg;
305 				bits <<= 1;
306 			}
307 #elif LCD_BPP == LCD_COLOR16
308 			for (c = 0; c < 8; ++c) {
309 				*d++ = (bits & 0x80) ?
310 						lcd_color_fg : lcd_color_bg;
311 				bits <<= 1;
312 			}
313 #endif
314 		}
315 #if LCD_BPP == LCD_MONOCHROME
316 		*d  = rest | (*d & ((1 << (8-off)) - 1));
317 #endif
318 	}
319 }
320 
321 /*----------------------------------------------------------------------*/
322 
323 static inline void lcd_puts_xy(ushort x, ushort y, uchar *s)
324 {
325 	lcd_drawchars(x, y, s, strlen((char *)s));
326 }
327 
328 /*----------------------------------------------------------------------*/
329 
330 static inline void lcd_putc_xy(ushort x, ushort y, uchar c)
331 {
332 	lcd_drawchars(x, y, &c, 1);
333 }
334 
335 /************************************************************************/
336 /**  Small utility to check that you got the colours right		*/
337 /************************************************************************/
338 #ifdef LCD_TEST_PATTERN
339 
340 #define	N_BLK_VERT	2
341 #define	N_BLK_HOR	3
342 
343 static int test_colors[N_BLK_HOR*N_BLK_VERT] = {
344 	CONSOLE_COLOR_RED,	CONSOLE_COLOR_GREEN,	CONSOLE_COLOR_YELLOW,
345 	CONSOLE_COLOR_BLUE,	CONSOLE_COLOR_MAGENTA,	CONSOLE_COLOR_CYAN,
346 };
347 
348 static void test_pattern(void)
349 {
350 	ushort v_max  = panel_info.vl_row;
351 	ushort h_max  = panel_info.vl_col;
352 	ushort v_step = (v_max + N_BLK_VERT - 1) / N_BLK_VERT;
353 	ushort h_step = (h_max + N_BLK_HOR  - 1) / N_BLK_HOR;
354 	ushort v, h;
355 	uchar *pix = (uchar *)lcd_base;
356 
357 	printf("[LCD] Test Pattern: %d x %d [%d x %d]\n",
358 		h_max, v_max, h_step, v_step);
359 
360 	/* WARNING: Code silently assumes 8bit/pixel */
361 	for (v = 0; v < v_max; ++v) {
362 		uchar iy = v / v_step;
363 		for (h = 0; h < h_max; ++h) {
364 			uchar ix = N_BLK_HOR * iy + (h/h_step);
365 			*pix++ = test_colors[ix];
366 		}
367 	}
368 }
369 #endif /* LCD_TEST_PATTERN */
370 
371 
372 /************************************************************************/
373 /* ** GENERIC Initialization Routines					*/
374 /************************************************************************/
375 
376 int lcd_get_size(int *line_length)
377 {
378 	*line_length = (panel_info.vl_col * NBITS(panel_info.vl_bpix)) / 8;
379 	return *line_length * panel_info.vl_row;
380 }
381 
382 int drv_lcd_init (void)
383 {
384 	struct stdio_dev lcddev;
385 	int rc;
386 
387 	lcd_base = (void *)(gd->fb_base);
388 
389 	lcd_get_size(&lcd_line_length);
390 
391 	lcd_init(lcd_base);		/* LCD initialization */
392 
393 	/* Device initialization */
394 	memset(&lcddev, 0, sizeof(lcddev));
395 
396 	strcpy(lcddev.name, "lcd");
397 	lcddev.ext   = 0;			/* No extensions */
398 	lcddev.flags = DEV_FLAGS_OUTPUT;	/* Output only */
399 	lcddev.putc  = lcd_putc;		/* 'putc' function */
400 	lcddev.puts  = lcd_puts;		/* 'puts' function */
401 
402 	rc = stdio_register (&lcddev);
403 
404 	return (rc == 0) ? 1 : rc;
405 }
406 
407 /*----------------------------------------------------------------------*/
408 void lcd_clear(void)
409 {
410 #if LCD_BPP == LCD_MONOCHROME
411 	/* Setting the palette */
412 	lcd_initcolregs();
413 
414 #elif LCD_BPP == LCD_COLOR8
415 	/* Setting the palette */
416 	lcd_setcolreg(CONSOLE_COLOR_BLACK, 0, 0, 0);
417 	lcd_setcolreg(CONSOLE_COLOR_RED, 0xFF, 0, 0);
418 	lcd_setcolreg(CONSOLE_COLOR_GREEN, 0, 0xFF, 0);
419 	lcd_setcolreg(CONSOLE_COLOR_YELLOW, 0xFF, 0xFF, 0);
420 	lcd_setcolreg(CONSOLE_COLOR_BLUE, 0, 0, 0xFF);
421 	lcd_setcolreg(CONSOLE_COLOR_MAGENTA, 0xFF, 0, 0xFF);
422 	lcd_setcolreg(CONSOLE_COLOR_CYAN, 0, 0xFF, 0xFF);
423 	lcd_setcolreg(CONSOLE_COLOR_GREY, 0xAA, 0xAA, 0xAA);
424 	lcd_setcolreg(CONSOLE_COLOR_WHITE, 0xFF, 0xFF, 0xFF);
425 #endif
426 
427 #ifndef CONFIG_SYS_WHITE_ON_BLACK
428 	lcd_setfgcolor(CONSOLE_COLOR_BLACK);
429 	lcd_setbgcolor(CONSOLE_COLOR_WHITE);
430 #else
431 	lcd_setfgcolor(CONSOLE_COLOR_WHITE);
432 	lcd_setbgcolor(CONSOLE_COLOR_BLACK);
433 #endif	/* CONFIG_SYS_WHITE_ON_BLACK */
434 
435 #ifdef	LCD_TEST_PATTERN
436 	test_pattern();
437 #else
438 	/* set framebuffer to background color */
439 	memset((char *)lcd_base,
440 		COLOR_MASK(lcd_getbgcolor()),
441 		lcd_line_length*panel_info.vl_row);
442 #endif
443 	/* Paint the logo and retrieve LCD base address */
444 	debug("[LCD] Drawing the logo...\n");
445 	lcd_console_address = lcd_logo ();
446 
447 	console_col = 0;
448 	console_row = 0;
449 	lcd_sync();
450 }
451 
452 static int do_lcd_clear(cmd_tbl_t *cmdtp, int flag, int argc,
453 			char *const argv[])
454 {
455 	lcd_clear();
456 	return 0;
457 }
458 
459 U_BOOT_CMD(
460 	cls,	1,	1,	do_lcd_clear,
461 	"clear screen",
462 	""
463 );
464 
465 /*----------------------------------------------------------------------*/
466 
467 static int lcd_init(void *lcdbase)
468 {
469 	/* Initialize the lcd controller */
470 	debug("[LCD] Initializing LCD frambuffer at %p\n", lcdbase);
471 
472 	lcd_ctrl_init(lcdbase);
473 	lcd_is_enabled = 1;
474 	lcd_clear();
475 	lcd_enable ();
476 
477 	/* Initialize the console */
478 	console_col = 0;
479 #ifdef CONFIG_LCD_INFO_BELOW_LOGO
480 	console_row = 7 + BMP_LOGO_HEIGHT / VIDEO_FONT_HEIGHT;
481 #else
482 	console_row = 1;	/* leave 1 blank line below logo */
483 #endif
484 
485 	return 0;
486 }
487 
488 
489 /************************************************************************/
490 /* ** ROM capable initialization part - needed to reserve FB memory	*/
491 /************************************************************************/
492 /*
493  * This is called early in the system initialization to grab memory
494  * for the LCD controller.
495  * Returns new address for monitor, after reserving LCD buffer memory
496  *
497  * Note that this is running from ROM, so no write access to global data.
498  */
499 ulong lcd_setmem(ulong addr)
500 {
501 	ulong size;
502 	int line_length;
503 
504 	debug("LCD panel info: %d x %d, %d bit/pix\n", panel_info.vl_col,
505 		panel_info.vl_row, NBITS(panel_info.vl_bpix));
506 
507 	size = lcd_get_size(&line_length);
508 
509 	/* Round up to nearest full page, or MMU section if defined */
510 	size = ALIGN(size, CONFIG_LCD_ALIGNMENT);
511 	addr = ALIGN(addr - CONFIG_LCD_ALIGNMENT + 1, CONFIG_LCD_ALIGNMENT);
512 
513 	/* Allocate pages for the frame buffer. */
514 	addr -= size;
515 
516 	debug("Reserving %ldk for LCD Framebuffer at: %08lx\n", size>>10, addr);
517 
518 	return addr;
519 }
520 
521 /*----------------------------------------------------------------------*/
522 
523 static void lcd_setfgcolor(int color)
524 {
525 	lcd_color_fg = color;
526 }
527 
528 /*----------------------------------------------------------------------*/
529 
530 static void lcd_setbgcolor(int color)
531 {
532 	lcd_color_bg = color;
533 }
534 
535 /*----------------------------------------------------------------------*/
536 
537 #ifdef	NOT_USED_SO_FAR
538 static int lcd_getfgcolor(void)
539 {
540 	return lcd_color_fg;
541 }
542 #endif	/* NOT_USED_SO_FAR */
543 
544 /*----------------------------------------------------------------------*/
545 
546 static int lcd_getbgcolor(void)
547 {
548 	return lcd_color_bg;
549 }
550 
551 /*----------------------------------------------------------------------*/
552 
553 /************************************************************************/
554 /* ** Chipset depending Bitmap / Logo stuff...                          */
555 /************************************************************************/
556 static inline ushort *configuration_get_cmap(void)
557 {
558 #if defined CONFIG_CPU_PXA
559 	struct pxafb_info *fbi = &panel_info.pxa;
560 	return (ushort *)fbi->palette;
561 #elif defined(CONFIG_MPC823)
562 	immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
563 	cpm8xx_t *cp = &(immr->im_cpm);
564 	return (ushort *)&(cp->lcd_cmap[255 * sizeof(ushort)]);
565 #elif defined(CONFIG_ATMEL_LCD)
566 	return (ushort *)(panel_info.mmio + ATMEL_LCDC_LUT(0));
567 #elif !defined(CONFIG_ATMEL_HLCD) && !defined(CONFIG_EXYNOS_FB)
568 	return panel_info.cmap;
569 #else
570 #if defined(CONFIG_LCD_LOGO)
571 	return bmp_logo_palette;
572 #else
573 	return NULL;
574 #endif
575 #endif
576 }
577 
578 #ifdef CONFIG_LCD_LOGO
579 void bitmap_plot(int x, int y)
580 {
581 #ifdef CONFIG_ATMEL_LCD
582 	uint *cmap = (uint *)bmp_logo_palette;
583 #else
584 	ushort *cmap = (ushort *)bmp_logo_palette;
585 #endif
586 	ushort i, j;
587 	uchar *bmap;
588 	uchar *fb;
589 	ushort *fb16;
590 #if defined(CONFIG_MPC823)
591 	immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
592 	cpm8xx_t *cp = &(immr->im_cpm);
593 #endif
594 
595 	debug("Logo: width %d  height %d  colors %d  cmap %d\n",
596 		BMP_LOGO_WIDTH, BMP_LOGO_HEIGHT, BMP_LOGO_COLORS,
597 		ARRAY_SIZE(bmp_logo_palette));
598 
599 	bmap = &bmp_logo_bitmap[0];
600 	fb   = (uchar *)(lcd_base + y * lcd_line_length + x);
601 
602 	if (NBITS(panel_info.vl_bpix) < 12) {
603 		/* Leave room for default color map
604 		 * default case: generic system with no cmap (most likely 16bpp)
605 		 * cmap was set to the source palette, so no change is done.
606 		 * This avoids even more ifdefs in the next stanza
607 		 */
608 #if defined(CONFIG_MPC823)
609 		cmap = (ushort *) &(cp->lcd_cmap[BMP_LOGO_OFFSET * sizeof(ushort)]);
610 #elif defined(CONFIG_ATMEL_LCD)
611 		cmap = (uint *)configuration_get_cmap();
612 #else
613 		cmap = configuration_get_cmap();
614 #endif
615 
616 		WATCHDOG_RESET();
617 
618 		/* Set color map */
619 		for (i = 0; i < ARRAY_SIZE(bmp_logo_palette); ++i) {
620 			ushort colreg = bmp_logo_palette[i];
621 #ifdef CONFIG_ATMEL_LCD
622 			uint lut_entry;
623 #ifdef CONFIG_ATMEL_LCD_BGR555
624 			lut_entry = ((colreg & 0x000F) << 11) |
625 					((colreg & 0x00F0) <<  2) |
626 					((colreg & 0x0F00) >>  7);
627 #else /* CONFIG_ATMEL_LCD_RGB565 */
628 			lut_entry = ((colreg & 0x000F) << 1) |
629 					((colreg & 0x00F0) << 3) |
630 					((colreg & 0x0F00) << 4);
631 #endif
632 			*(cmap + BMP_LOGO_OFFSET) = lut_entry;
633 			cmap++;
634 #else /* !CONFIG_ATMEL_LCD */
635 #ifdef  CONFIG_SYS_INVERT_COLORS
636 			*cmap++ = 0xffff - colreg;
637 #else
638 			*cmap++ = colreg;
639 #endif
640 #endif /* CONFIG_ATMEL_LCD */
641 		}
642 
643 		WATCHDOG_RESET();
644 
645 		for (i = 0; i < BMP_LOGO_HEIGHT; ++i) {
646 			memcpy(fb, bmap, BMP_LOGO_WIDTH);
647 			bmap += BMP_LOGO_WIDTH;
648 			fb   += panel_info.vl_col;
649 		}
650 	}
651 	else { /* true color mode */
652 		u16 col16;
653 		fb16 = (ushort *)(lcd_base + y * lcd_line_length + x);
654 		for (i = 0; i < BMP_LOGO_HEIGHT; ++i) {
655 			for (j = 0; j < BMP_LOGO_WIDTH; j++) {
656 				col16 = bmp_logo_palette[(bmap[j]-16)];
657 				fb16[j] =
658 					((col16 & 0x000F) << 1) |
659 					((col16 & 0x00F0) << 3) |
660 					((col16 & 0x0F00) << 4);
661 				}
662 			bmap += BMP_LOGO_WIDTH;
663 			fb16 += panel_info.vl_col;
664 		}
665 	}
666 
667 	WATCHDOG_RESET();
668 	lcd_sync();
669 }
670 #else
671 static inline void bitmap_plot(int x, int y) {}
672 #endif /* CONFIG_LCD_LOGO */
673 
674 /*----------------------------------------------------------------------*/
675 #if defined(CONFIG_CMD_BMP) || defined(CONFIG_SPLASH_SCREEN)
676 /*
677  * Display the BMP file located at address bmp_image.
678  * Only uncompressed.
679  */
680 
681 #ifdef CONFIG_SPLASH_SCREEN_ALIGN
682 #define BMP_ALIGN_CENTER	0x7FFF
683 
684 static void splash_align_axis(int *axis, unsigned long panel_size,
685 					unsigned long picture_size)
686 {
687 	unsigned long panel_picture_delta = panel_size - picture_size;
688 	unsigned long axis_alignment;
689 
690 	if (*axis == BMP_ALIGN_CENTER)
691 		axis_alignment = panel_picture_delta / 2;
692 	else if (*axis < 0)
693 		axis_alignment = panel_picture_delta + *axis + 1;
694 	else
695 		return;
696 
697 	*axis = max(0, axis_alignment);
698 }
699 #endif
700 
701 
702 #ifdef CONFIG_LCD_BMP_RLE8
703 
704 #define BMP_RLE8_ESCAPE		0
705 #define BMP_RLE8_EOL		0
706 #define BMP_RLE8_EOBMP		1
707 #define BMP_RLE8_DELTA		2
708 
709 static void draw_unencoded_bitmap(ushort **fbp, uchar *bmap, ushort *cmap,
710 				  int cnt)
711 {
712 	while (cnt > 0) {
713 		*(*fbp)++ = cmap[*bmap++];
714 		cnt--;
715 	}
716 }
717 
718 static void draw_encoded_bitmap(ushort **fbp, ushort c, int cnt)
719 {
720 	ushort *fb = *fbp;
721 	int cnt_8copy = cnt >> 3;
722 
723 	cnt -= cnt_8copy << 3;
724 	while (cnt_8copy > 0) {
725 		*fb++ = c;
726 		*fb++ = c;
727 		*fb++ = c;
728 		*fb++ = c;
729 		*fb++ = c;
730 		*fb++ = c;
731 		*fb++ = c;
732 		*fb++ = c;
733 		cnt_8copy--;
734 	}
735 	while (cnt > 0) {
736 		*fb++ = c;
737 		cnt--;
738 	}
739 	(*fbp) = fb;
740 }
741 
742 /*
743  * Do not call this function directly, must be called from
744  * lcd_display_bitmap.
745  */
746 static void lcd_display_rle8_bitmap(bmp_image_t *bmp, ushort *cmap, uchar *fb,
747 				    int x_off, int y_off)
748 {
749 	uchar *bmap;
750 	ulong width, height;
751 	ulong cnt, runlen;
752 	int x, y;
753 	int decode = 1;
754 
755 	width = le32_to_cpu(bmp->header.width);
756 	height = le32_to_cpu(bmp->header.height);
757 	bmap = (uchar *)bmp + le32_to_cpu(bmp->header.data_offset);
758 
759 	x = 0;
760 	y = height - 1;
761 
762 	while (decode) {
763 		if (bmap[0] == BMP_RLE8_ESCAPE) {
764 			switch (bmap[1]) {
765 			case BMP_RLE8_EOL:
766 				/* end of line */
767 				bmap += 2;
768 				x = 0;
769 				y--;
770 				/* 16bpix, 2-byte per pixel, width should *2 */
771 				fb -= (width * 2 + lcd_line_length);
772 				break;
773 			case BMP_RLE8_EOBMP:
774 				/* end of bitmap */
775 				decode = 0;
776 				break;
777 			case BMP_RLE8_DELTA:
778 				/* delta run */
779 				x += bmap[2];
780 				y -= bmap[3];
781 				/* 16bpix, 2-byte per pixel, x should *2 */
782 				fb = (uchar *) (lcd_base + (y + y_off - 1)
783 					* lcd_line_length + (x + x_off) * 2);
784 				bmap += 4;
785 				break;
786 			default:
787 				/* unencoded run */
788 				runlen = bmap[1];
789 				bmap += 2;
790 				if (y < height) {
791 					if (x < width) {
792 						if (x + runlen > width)
793 							cnt = width - x;
794 						else
795 							cnt = runlen;
796 						draw_unencoded_bitmap(
797 							(ushort **)&fb,
798 							bmap, cmap, cnt);
799 					}
800 					x += runlen;
801 				}
802 				bmap += runlen;
803 				if (runlen & 1)
804 					bmap++;
805 			}
806 		} else {
807 			/* encoded run */
808 			if (y < height) {
809 				runlen = bmap[0];
810 				if (x < width) {
811 					/* aggregate the same code */
812 					while (bmap[0] == 0xff &&
813 					       bmap[2] != BMP_RLE8_ESCAPE &&
814 					       bmap[1] == bmap[3]) {
815 						runlen += bmap[2];
816 						bmap += 2;
817 					}
818 					if (x + runlen > width)
819 						cnt = width - x;
820 					else
821 						cnt = runlen;
822 					draw_encoded_bitmap((ushort **)&fb,
823 						cmap[bmap[1]], cnt);
824 				}
825 				x += runlen;
826 			}
827 			bmap += 2;
828 		}
829 	}
830 }
831 #endif
832 
833 #if defined(CONFIG_MPC823) || defined(CONFIG_MCC200)
834 #define FB_PUT_BYTE(fb, from) *(fb)++ = (255 - *(from)++)
835 #else
836 #define FB_PUT_BYTE(fb, from) *(fb)++ = *(from)++
837 #endif
838 
839 #if defined(CONFIG_BMP_16BPP)
840 #if defined(CONFIG_ATMEL_LCD_BGR555)
841 static inline void fb_put_word(uchar **fb, uchar **from)
842 {
843 	*(*fb)++ = (((*from)[0] & 0x1f) << 2) | ((*from)[1] & 0x03);
844 	*(*fb)++ = ((*from)[0] & 0xe0) | (((*from)[1] & 0x7c) >> 2);
845 	*from += 2;
846 }
847 #else
848 static inline void fb_put_word(uchar **fb, uchar **from)
849 {
850 	*(*fb)++ = *(*from)++;
851 	*(*fb)++ = *(*from)++;
852 }
853 #endif
854 #endif /* CONFIG_BMP_16BPP */
855 
856 int lcd_display_bitmap(ulong bmp_image, int x, int y)
857 {
858 #if !defined(CONFIG_MCC200)
859 	ushort *cmap = NULL;
860 #endif
861 	ushort *cmap_base = NULL;
862 	ushort i, j;
863 	uchar *fb;
864 	bmp_image_t *bmp=(bmp_image_t *)bmp_image;
865 	uchar *bmap;
866 	ushort padded_width;
867 	unsigned long width, height, byte_width;
868 	unsigned long pwidth = panel_info.vl_col;
869 	unsigned colors, bpix, bmp_bpix;
870 
871 	if (!bmp || !((bmp->header.signature[0] == 'B') &&
872 		(bmp->header.signature[1] == 'M'))) {
873 		printf("Error: no valid bmp image at %lx\n", bmp_image);
874 
875 		return 1;
876 	}
877 
878 	width = le32_to_cpu(bmp->header.width);
879 	height = le32_to_cpu(bmp->header.height);
880 	bmp_bpix = le16_to_cpu(bmp->header.bit_count);
881 	colors = 1 << bmp_bpix;
882 
883 	bpix = NBITS(panel_info.vl_bpix);
884 
885 	if ((bpix != 1) && (bpix != 8) && (bpix != 16) && (bpix != 32)) {
886 		printf ("Error: %d bit/pixel mode, but BMP has %d bit/pixel\n",
887 			bpix, bmp_bpix);
888 
889 		return 1;
890 	}
891 
892 	/* We support displaying 8bpp BMPs on 16bpp LCDs */
893 	if (bpix != bmp_bpix && !(bmp_bpix == 8 && bpix == 16)) {
894 		printf ("Error: %d bit/pixel mode, but BMP has %d bit/pixel\n",
895 			bpix,
896 			le16_to_cpu(bmp->header.bit_count));
897 
898 		return 1;
899 	}
900 
901 	debug("Display-bmp: %d x %d  with %d colors\n",
902 		(int)width, (int)height, (int)colors);
903 
904 #if !defined(CONFIG_MCC200)
905 	/* MCC200 LCD doesn't need CMAP, supports 1bpp b&w only */
906 	if (bmp_bpix == 8) {
907 		cmap = configuration_get_cmap();
908 		cmap_base = cmap;
909 
910 		/* Set color map */
911 		for (i = 0; i < colors; ++i) {
912 			bmp_color_table_entry_t cte = bmp->color_table[i];
913 #if !defined(CONFIG_ATMEL_LCD)
914 			ushort colreg =
915 				( ((cte.red)   << 8) & 0xf800) |
916 				( ((cte.green) << 3) & 0x07e0) |
917 				( ((cte.blue)  >> 3) & 0x001f) ;
918 #ifdef CONFIG_SYS_INVERT_COLORS
919 			*cmap = 0xffff - colreg;
920 #else
921 			*cmap = colreg;
922 #endif
923 #if defined(CONFIG_MPC823)
924 			cmap--;
925 #else
926 			cmap++;
927 #endif
928 #else /* CONFIG_ATMEL_LCD */
929 			lcd_setcolreg(i, cte.red, cte.green, cte.blue);
930 #endif
931 		}
932 	}
933 #endif
934 
935 	/*
936 	 *  BMP format for Monochrome assumes that the state of a
937 	 * pixel is described on a per Bit basis, not per Byte.
938 	 *  So, in case of Monochrome BMP we should align widths
939 	 * on a byte boundary and convert them from Bit to Byte
940 	 * units.
941 	 *  Probably, PXA250 and MPC823 process 1bpp BMP images in
942 	 * their own ways, so make the converting to be MCC200
943 	 * specific.
944 	 */
945 #if defined(CONFIG_MCC200)
946 	if (bpix == 1) {
947 		width = ((width + 7) & ~7) >> 3;
948 		x     = ((x + 7) & ~7) >> 3;
949 		pwidth= ((pwidth + 7) & ~7) >> 3;
950 	}
951 #endif
952 
953 	padded_width = (width&0x3) ? ((width&~0x3)+4) : (width);
954 
955 #ifdef CONFIG_SPLASH_SCREEN_ALIGN
956 	splash_align_axis(&x, pwidth, width);
957 	splash_align_axis(&y, panel_info.vl_row, height);
958 #endif /* CONFIG_SPLASH_SCREEN_ALIGN */
959 
960 	if ((x + width) > pwidth)
961 		width = pwidth - x;
962 	if ((y + height) > panel_info.vl_row)
963 		height = panel_info.vl_row - y;
964 
965 	bmap = (uchar *)bmp + le32_to_cpu(bmp->header.data_offset);
966 	fb   = (uchar *) (lcd_base +
967 		(y + height - 1) * lcd_line_length + x * bpix / 8);
968 
969 	switch (bmp_bpix) {
970 	case 1: /* pass through */
971 	case 8:
972 #ifdef CONFIG_LCD_BMP_RLE8
973 		if (le32_to_cpu(bmp->header.compression) == BMP_BI_RLE8) {
974 			if (bpix != 16) {
975 				/* TODO implement render code for bpix != 16 */
976 				printf("Error: only support 16 bpix");
977 				return 1;
978 			}
979 			lcd_display_rle8_bitmap(bmp, cmap_base, fb, x, y);
980 			break;
981 		}
982 #endif
983 
984 		if (bpix != 16)
985 			byte_width = width;
986 		else
987 			byte_width = width * 2;
988 
989 		for (i = 0; i < height; ++i) {
990 			WATCHDOG_RESET();
991 			for (j = 0; j < width; j++) {
992 				if (bpix != 16) {
993 					FB_PUT_BYTE(fb, bmap);
994 				} else {
995 					*(uint16_t *)fb = cmap_base[*(bmap++)];
996 					fb += sizeof(uint16_t) / sizeof(*fb);
997 				}
998 			}
999 			bmap += (padded_width - width);
1000 			fb   -= (byte_width + lcd_line_length);
1001 		}
1002 		break;
1003 
1004 #if defined(CONFIG_BMP_16BPP)
1005 	case 16:
1006 		for (i = 0; i < height; ++i) {
1007 			WATCHDOG_RESET();
1008 			for (j = 0; j < width; j++)
1009 				fb_put_word(&fb, &bmap);
1010 
1011 			bmap += (padded_width - width) * 2;
1012 			fb   -= (width * 2 + lcd_line_length);
1013 		}
1014 		break;
1015 #endif /* CONFIG_BMP_16BPP */
1016 
1017 #if defined(CONFIG_BMP_32BPP)
1018 	case 32:
1019 		for (i = 0; i < height; ++i) {
1020 			for (j = 0; j < width; j++) {
1021 				*(fb++) = *(bmap++);
1022 				*(fb++) = *(bmap++);
1023 				*(fb++) = *(bmap++);
1024 				*(fb++) = *(bmap++);
1025 			}
1026 			fb  -= (lcd_line_length + width * (bpix / 8));
1027 		}
1028 		break;
1029 #endif /* CONFIG_BMP_32BPP */
1030 	default:
1031 		break;
1032 	};
1033 
1034 	lcd_sync();
1035 	return 0;
1036 }
1037 #endif
1038 
1039 #ifdef CONFIG_SPLASH_SCREEN_PREPARE
1040 static inline int splash_screen_prepare(void)
1041 {
1042 	return board_splash_screen_prepare();
1043 }
1044 #else
1045 static inline int splash_screen_prepare(void)
1046 {
1047 	return 0;
1048 }
1049 #endif
1050 
1051 static void *lcd_logo(void)
1052 {
1053 #ifdef CONFIG_SPLASH_SCREEN
1054 	char *s;
1055 	ulong addr;
1056 	static int do_splash = 1;
1057 
1058 	if (do_splash && (s = getenv("splashimage")) != NULL) {
1059 		int x = 0, y = 0;
1060 		do_splash = 0;
1061 
1062 		if (splash_screen_prepare())
1063 			return (void *)gd->fb_base;
1064 
1065 		addr = simple_strtoul (s, NULL, 16);
1066 #ifdef CONFIG_SPLASH_SCREEN_ALIGN
1067 		s = getenv("splashpos");
1068 		if (s != NULL) {
1069 			if (s[0] == 'm')
1070 				x = BMP_ALIGN_CENTER;
1071 			else
1072 				x = simple_strtol(s, NULL, 0);
1073 
1074 			s = strchr(s + 1, ',');
1075 			if (s != NULL) {
1076 				if (s[1] == 'm')
1077 					y = BMP_ALIGN_CENTER;
1078 				else
1079 					y = simple_strtol (s + 1, NULL, 0);
1080 			}
1081 		}
1082 #endif /* CONFIG_SPLASH_SCREEN_ALIGN */
1083 
1084 		if (bmp_display(addr, x, y) == 0)
1085 			return (void *)lcd_base;
1086 	}
1087 #endif /* CONFIG_SPLASH_SCREEN */
1088 
1089 	bitmap_plot(0, 0);
1090 
1091 #ifdef CONFIG_LCD_INFO
1092 	console_col = LCD_INFO_X / VIDEO_FONT_WIDTH;
1093 	console_row = LCD_INFO_Y / VIDEO_FONT_HEIGHT;
1094 	lcd_show_board_info();
1095 #endif /* CONFIG_LCD_INFO */
1096 
1097 #if defined(CONFIG_LCD_LOGO) && !defined(CONFIG_LCD_INFO_BELOW_LOGO)
1098 	return (void *)((ulong)lcd_base + BMP_LOGO_HEIGHT * lcd_line_length);
1099 #else
1100 	return (void *)lcd_base;
1101 #endif /* CONFIG_LCD_LOGO && !CONFIG_LCD_INFO_BELOW_LOGO */
1102 }
1103 
1104 #ifdef CONFIG_SPLASHIMAGE_GUARD
1105 static int on_splashimage(const char *name, const char *value, enum env_op op,
1106 	int flags)
1107 {
1108 	ulong addr;
1109 	int aligned;
1110 
1111 	if (op == env_op_delete)
1112 		return 0;
1113 
1114 	addr = simple_strtoul(value, NULL, 16);
1115 	/* See README.displaying-bmps */
1116 	aligned = (addr % 4 == 2);
1117 	if (!aligned) {
1118 		printf("Invalid splashimage value. Value must be 16 bit aligned, but not 32 bit aligned\n");
1119 		return -1;
1120 	}
1121 
1122 	return 0;
1123 }
1124 
1125 U_BOOT_ENV_CALLBACK(splashimage, on_splashimage);
1126 #endif
1127 
1128 void lcd_position_cursor(unsigned col, unsigned row)
1129 {
1130 	console_col = min(col, CONSOLE_COLS - 1);
1131 	console_row = min(row, CONSOLE_ROWS - 1);
1132 }
1133 
1134 int lcd_get_pixel_width(void)
1135 {
1136 	return panel_info.vl_col;
1137 }
1138 
1139 int lcd_get_pixel_height(void)
1140 {
1141 	return panel_info.vl_row;
1142 }
1143 
1144 int lcd_get_screen_rows(void)
1145 {
1146 	return CONSOLE_ROWS;
1147 }
1148 
1149 int lcd_get_screen_columns(void)
1150 {
1151 	return CONSOLE_COLS;
1152 }
1153 
1154 /************************************************************************/
1155 /************************************************************************/
1156