/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * $Id$ * * Rockbox driver for iPod LCDs * * Based on code from the ipodlinux project - http://ipodlinux.org/ * Adapted for Rockbox in November 2005 * * Original file: linux/arch/armnommu/mach-ipod/fb.c * * Copyright (c) 2003-2005 Bernard Leach (leachbj@bouncycastle.org) * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License * as published by the Free Software Foundation; either version 2 * of the License, or (at your option) any later version. * * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY * KIND, either express or implied. * ****************************************************************************/ #include "config.h" #include "cpu.h" #include "lcd.h" #include "kernel.h" #include "system.h" #include "hwcompat.h" /* LCD command codes for HD66789R */ #define LCD_CNTL_RAM_ADDR_SET 0x21 #define LCD_CNTL_WRITE_TO_GRAM 0x22 #define LCD_CNTL_HORIZ_RAM_ADDR_POS 0x44 #define LCD_CNTL_VERT_RAM_ADDR_POS 0x45 /*** globals ***/ int lcd_type = 1; /* 0 = "old" Color/Photo, 1 = "new" Color & Nano */ static inline void lcd_wait_write(void) { while (LCD2_PORT & LCD2_BUSY_MASK); } static void lcd_cmd_data(unsigned cmd, unsigned data) { if (lcd_type == 0) { /* 16 bit transfers */ lcd_wait_write(); LCD2_PORT = LCD2_CMD_MASK | cmd; lcd_wait_write(); LCD2_PORT = LCD2_CMD_MASK | data; } else { lcd_wait_write(); LCD2_PORT = LCD2_CMD_MASK; LCD2_PORT = LCD2_CMD_MASK | cmd; lcd_wait_write(); LCD2_PORT = LCD2_DATA_MASK | (data >> 8); LCD2_PORT = LCD2_DATA_MASK | (data & 0xff); } } /*** hardware configuration ***/ void lcd_set_contrast(int val) { /* TODO: Implement lcd_set_contrast() */ (void)val; } void lcd_set_invert_display(bool yesno) { /* TODO: Implement lcd_set_invert_display() */ (void)yesno; } /* turn the display upside down (call lcd_update() afterwards) */ void lcd_set_flip(bool yesno) { /* TODO: Implement lcd_set_flip() */ (void)yesno; } /* LCD init */ void lcd_init_device(void) { #if CONFIG_LCD == LCD_IPODCOLOR if (IPOD_HW_REVISION == 0x60000) { lcd_type = 0; } else { int gpio_a01, gpio_a04; /* A01 */ gpio_a01 = (GPIOA_INPUT_VAL & 0x2) >> 1; /* A04 */ gpio_a04 = (GPIOA_INPUT_VAL & 0x10) >> 4; if (((gpio_a01 << 1) | gpio_a04) == 0 || ((gpio_a01 << 1) | gpio_a04) == 2) { lcd_type = 0; } else { lcd_type = 1; } } if (lcd_type == 0) { lcd_cmd_data(0xef, 0x0); lcd_cmd_data(0x1, 0x0); lcd_cmd_data(0x80, 0x1); lcd_cmd_data(0x10, 0xc); lcd_cmd_data(0x18, 0x6); lcd_cmd_data(0x7e, 0x4); lcd_cmd_data(0x7e, 0x5); lcd_cmd_data(0x7f, 0x1); } #elif CONFIG_LCD == LCD_IPODNANO /* iPodLinux doesn't appear have any LCD init code for the Nano */ #endif } /*** update functions ***/ #define CSUB_X 2 #define CSUB_Y 2 /* YUV- > RGB565 conversion * |R| |1.000000 -0.000001 1.402000| |Y'| * |G| = |1.000000 -0.334136 -0.714136| |Pb| * |B| |1.000000 1.772000 0.000000| |Pr| * Scaled, normalized, rounded and tweaked to yield RGB 565: * |R| |74 0 101| |Y' - 16| >> 9 * |G| = |74 -24 -51| |Cb - 128| >> 8 * |B| |74 128 0| |Cr - 128| >> 9 */ #define RGBYFAC 74 /* 1.0 */ #define RVFAC 101 /* 1.402 */ #define GVFAC (-51) /* -0.714136 */ #define GUFAC (-24) /* -0.334136 */ #define BUFAC 128 /* 1.772 */ /* ROUNDOFFS contain constant for correct round-offs as well as constant parts of the conversion matrix (e.g. (Y'-16)*RGBYFAC -> constant part = -16*RGBYFAC). Through extraction of these constant parts we save at leat 4 substractions in the conversion loop */ #define ROUNDOFFSR (256 - 16*RGBYFAC - 128*RVFAC) #define ROUNDOFFSG (128 - 16*RGBYFAC - 128*GVFAC - 128*GUFAC) #define ROUNDOFFSB (256 - 16*RGBYFAC - 128*BUFAC) #define MAX_5BIT 0x1f #define MAX_6BIT 0x3f /* Performance function to blit a YUV bitmap directly to the LCD */ void lcd_blit_yuv(unsigned char * const src[3], int src_x, int src_y, int stride, int x, int y, int width, int height) { int h; int y0, x0, y1, x1; width = (width + 1) & ~1; /* calculate the drawing region */ #if CONFIG_LCD == LCD_IPODNANO y0 = x; /* start horiz */ x0 = y; /* start vert */ y1 = (x + width) - 1; /* max horiz */ x1 = (y + height) - 1; /* max vert */ #elif CONFIG_LCD == LCD_IPODCOLOR y0 = y; /* start vert */ x0 = (LCD_WIDTH - 1) - x; /* start horiz */ y1 = (y + height) - 1; /* end vert */ x1 = (x0 - width) + 1; /* end horiz */ #endif /* setup the drawing region */ if (lcd_type == 0) { lcd_cmd_data(0x12, y0); /* start vert */ lcd_cmd_data(0x13, x0); /* start horiz */ lcd_cmd_data(0x15, y1); /* end vert */ lcd_cmd_data(0x16, x1); /* end horiz */ } else { /* swap max horiz < start horiz */ if (y1 < y0) { int t; t = y0; y0 = y1; y1 = t; } /* swap max vert < start vert */ if (x1 < x0) { int t; t = x0; x0 = x1; x1 = t; } /* max horiz << 8 | start horiz */ lcd_cmd_data(LCD_CNTL_HORIZ_RAM_ADDR_POS, (y1 << 8) | y0); /* max vert << 8 | start vert */ lcd_cmd_data(LCD_CNTL_VERT_RAM_ADDR_POS, (x1 << 8) | x0); /* start vert = max vert */ #if CONFIG_LCD == LCD_IPODCOLOR x0 = x1; #endif /* position cursor (set AD0-AD15) */ /* start vert << 8 | start horiz */ lcd_cmd_data(LCD_CNTL_RAM_ADDR_SET, ((x0 << 8) | y0)); /* start drawing */ lcd_wait_write(); LCD2_PORT = LCD2_CMD_MASK; LCD2_PORT = (LCD2_CMD_MASK|LCD_CNTL_WRITE_TO_GRAM); } const int stride_div_csub_x = stride/CSUB_X; h=0; while (1) { /* upsampling, YUV->RGB conversion and reduction to RGB565 in one go */ const unsigned char *ysrc = src[0] + stride * src_y + src_x; const int uvoffset = stride_div_csub_x * (src_y/CSUB_Y) + (src_x/CSUB_X); const unsigned char *usrc = src[1] + uvoffset; const unsigned char *vsrc = src[2] + uvoffset; const unsigned char *row_end = ysrc + width; int yp, up, vp; int red1, green1, blue1; int red2, green2, blue2; int rc, gc, bc; int pixels_to_write; fb_data pixel1,pixel2; if (h==0) { while (!(LCD2_BLOCK_CTRL & LCD2_BLOCK_READY)); LCD2_BLOCK_CONFIG = 0; if (height == 0) break; pixels_to_write = (width * height) * 2; h = height; /* calculate how much we can do in one go */ if (pixels_to_write > 0x10000) { h = (0x10000/2) / width; pixels_to_write = (width * h) * 2; } height -= h; LCD2_BLOCK_CTRL = 0x10000080; LCD2_BLOCK_CONFIG = 0xc0010000 | (pixels_to_write - 1); LCD2_BLOCK_CTRL = 0x34000000; } do { up = *usrc++; vp = *vsrc++; rc = RVFAC * vp + ROUNDOFFSR; gc = GVFAC * vp + GUFAC * up + ROUNDOFFSG; bc = BUFAC * up + ROUNDOFFSB; /* Pixel 1 -> RGB565 */ yp = *ysrc++ * RGBYFAC; red1 = (yp + rc) >> 9; green1 = (yp + gc) >> 8; blue1 = (yp + bc) >> 9; /* Pixel 2 -> RGB565 */ yp = *ysrc++ * RGBYFAC; red2 = (yp + rc) >> 9; green2 = (yp + gc) >> 8; blue2 = (yp + bc) >> 9; /* Since out of bounds errors are relatively rare, we check two pixels at once to see if any components are out of bounds, and then fix whichever is broken. This works due to high values and negative values both being !=0 when bitmasking them. We first check for red and blue components (5bit range). */ if ((red1 | blue1 | red2 | blue2) & ~MAX_5BIT) { if (red1 & ~MAX_5BIT) red1 = (red1 >> 31) ? 0 : MAX_5BIT; if (blue1 & ~MAX_5BIT) blue1 = (blue1 >> 31) ? 0 : MAX_5BIT; if (red2 & ~MAX_5BIT) red2 = (red2 >> 31) ? 0 : MAX_5BIT; if (blue2 & ~MAX_5BIT) blue2 = (blue2 >> 31) ? 0 : MAX_5BIT; } /* We second check for green component (6bit range) */ if ((green1 | green2) & ~MAX_6BIT) { if (green1 & ~MAX_6BIT) green1 = (green1 >> 31) ? 0 : MAX_6BIT; if (green2 & ~MAX_6BIT) green2 = (green2 >> 31) ? 0 : MAX_6BIT; } pixel1 = swap16((red1 << 11) | (green1 << 5) | blue1); pixel2 = swap16((red2 << 11) | (green2 << 5) | blue2); while (!(LCD2_BLOCK_CTRL & LCD2_BLOCK_TXOK)); /* output 2 pixels */ LCD2_BLOCK_DATA = (pixel2 << 16) | pixel1; } while (ysrc < row_end); src_y++; h--; } while (!(LCD2_BLOCK_CTRL & LCD2_BLOCK_READY)); LCD2_BLOCK_CONFIG = 0; } /* Update a fraction of the display. */ void lcd_update_rect(int x, int y, int width, int height) { int y0, x0, y1, x1; int newx,newwidth; unsigned long *addr; /* Ensure x and width are both even - so we can read 32-bit aligned data from lcd_framebuffer */ newx=x&~1; newwidth=width&~1; if (newx+newwidth < x+width) { newwidth+=2; } x=newx; width=newwidth; /* calculate the drawing region */ #if CONFIG_LCD == LCD_IPODNANO y0 = x; /* start horiz */ x0 = y; /* start vert */ y1 = (x + width) - 1; /* max horiz */ x1 = (y + height) - 1; /* max vert */ #elif CONFIG_LCD == LCD_IPODCOLOR y0 = y; /* start vert */ x0 = (LCD_WIDTH - 1) - x; /* start horiz */ y1 = (y + height) - 1; /* end vert */ x1 = (x0 - width) + 1; /* end horiz */ #endif /* setup the drawing region */ if (lcd_type == 0) { lcd_cmd_data(0x12, y0); /* start vert */ lcd_cmd_data(0x13, x0); /* start horiz */ lcd_cmd_data(0x15, y1); /* end vert */ lcd_cmd_data(0x16, x1); /* end horiz */ } else { /* swap max horiz < start horiz */ if (y1 < y0) { int t; t = y0; y0 = y1; y1 = t; } /* swap max vert < start vert */ if (x1 < x0) { int t; t = x0; x0 = x1; x1 = t; } /* max horiz << 8 | start horiz */ lcd_cmd_data(LCD_CNTL_HORIZ_RAM_ADDR_POS, (y1 << 8) | y0); /* max vert << 8 | start vert */ lcd_cmd_data(LCD_CNTL_VERT_RAM_ADDR_POS, (x1 << 8) | x0); /* start vert = max vert */ #if CONFIG_LCD == LCD_IPODCOLOR x0 = x1; #endif /* position cursor (set AD0-AD15) */ /* start vert << 8 | start horiz */ lcd_cmd_data(LCD_CNTL_RAM_ADDR_SET, ((x0 << 8) | y0)); /* start drawing */ lcd_wait_write(); LCD2_PORT = LCD2_CMD_MASK; LCD2_PORT = (LCD2_CMD_MASK|LCD_CNTL_WRITE_TO_GRAM); } addr = (unsigned long*)&lcd_framebuffer[y][x]; while (height > 0) { int c, r; int h, pixels_to_write; pixels_to_write = (width * height) * 2; h = height; /* calculate how much we can do in one go */ if (pixels_to_write > 0x10000) { h = (0x10000/2) / width; pixels_to_write = (width * h) * 2; } LCD2_BLOCK_CTRL = 0x10000080; LCD2_BLOCK_CONFIG = 0xc0010000 | (pixels_to_write - 1); LCD2_BLOCK_CTRL = 0x34000000; /* for each row */ for (r = 0; r < h; r++) { /* for each column */ for (c = 0; c < width; c += 2) { while (!(LCD2_BLOCK_CTRL & LCD2_BLOCK_TXOK)); /* output 2 pixels */ LCD2_BLOCK_DATA = *addr++; } addr += (LCD_WIDTH - width)/2; } while (!(LCD2_BLOCK_CTRL & LCD2_BLOCK_READY)); LCD2_BLOCK_CONFIG = 0; height -= h; } } /* Update the display. This must be called after all other LCD functions that change the display. */ void lcd_update(void) { lcd_update_rect(0, 0, LCD_WIDTH, LCD_HEIGHT); }