Subversion Repositories HelenOS

Rev

Rev 3618 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. /*
  2.  * Copyright (c) 2006 Ondrej Palkovsky
  3.  * All rights reserved.
  4.  *
  5.  * Redistribution and use in source and binary forms, with or without
  6.  * modification, are permitted provided that the following conditions
  7.  * are met:
  8.  *
  9.  * - Redistributions of source code must retain the above copyright
  10.  *   notice, this list of conditions and the following disclaimer.
  11.  * - Redistributions in binary form must reproduce the above copyright
  12.  *   notice, this list of conditions and the following disclaimer in the
  13.  *   documentation and/or other materials provided with the distribution.
  14.  * - The name of the author may not be used to endorse or promote products
  15.  *   derived from this software without specific prior written permission.
  16.  *
  17.  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18.  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19.  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20.  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21.  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22.  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23.  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24.  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25.  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26.  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27.  */
  28.  
  29. /** @addtogroup genarch
  30.  * @{
  31.  */
  32. /** @file
  33.  */
  34.  
  35. #include <genarch/fb/font-8x16.h>
  36. #include <genarch/fb/visuals.h>
  37. #include <genarch/fb/fb.h>
  38. #include <console/chardev.h>
  39. #include <console/console.h>
  40. #include <sysinfo/sysinfo.h>
  41. #include <mm/slab.h>
  42. #include <panic.h>
  43. #include <memstr.h>
  44. #include <config.h>
  45. #include <bitops.h>
  46. #include <print.h>
  47. #include <ddi/ddi.h>
  48. #include <arch/types.h>
  49.  
  50. #include "helenos.xbm"
  51.  
  52. static parea_t fb_parea;        /**< Physical memory area for fb. */
  53.  
  54. SPINLOCK_INITIALIZE(fb_lock);
  55.  
  56. static uint8_t *fbaddress = NULL;
  57.  
  58. static uint8_t *blankline = NULL;
  59. static uint8_t *dbbuffer = NULL;    /* Buffer for fast scrolling console */
  60. static index_t dboffset;
  61.  
  62. static unsigned int xres = 0;
  63. static unsigned int yres = 0;
  64. static unsigned int scanline = 0;
  65. static unsigned int pixelbytes = 0;
  66. #ifdef FB_INVERT_COLORS
  67. static bool invert_colors = true;
  68. #else
  69. static bool invert_colors = false;
  70. #endif
  71.  
  72. static unsigned int position = 0;
  73. static unsigned int columns = 0;
  74. static unsigned int rows = 0;
  75.  
  76. #define COL_WIDTH   8
  77. #define ROW_BYTES   (scanline * FONT_SCANLINES)
  78.  
  79. #define BGCOLOR     0x000080
  80. #define FGCOLOR     0xffff00
  81. #define LOGOCOLOR   0x2020b0
  82.  
  83. #define RED(x, bits)    ((x >> (8 + 8 + 8 - bits)) & ((1 << bits) - 1))
  84. #define GREEN(x, bits)  ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))
  85. #define BLUE(x, bits)   ((x >> (8 - bits)) & ((1 << bits) - 1))
  86.  
  87. #define POINTPOS(x, y)  ((y) * scanline + (x) * pixelbytes)
  88.  
  89. /***************************************************************/
  90. /* Pixel specific fuctions */
  91.  
  92. static void (*rgb2scr)(void *, int);
  93. static int (*scr2rgb)(void *);
  94.  
  95. static inline int COLOR(int color)
  96. {
  97.     return invert_colors ? ~color : color;
  98. }
  99.  
  100. /* Conversion routines between different color representations */
  101. static void rgb_byte0888(void *dst, int rgb)
  102. {
  103.     *((int *) dst) = rgb;
  104. }
  105.  
  106. static int byte0888_rgb(void *src)
  107. {
  108.     return (*((int *) src)) & 0xffffff;
  109. }
  110.  
  111. static void bgr_byte0888(void *dst, int rgb)
  112. {
  113.     *((uint32_t *) dst) = BLUE(rgb, 8) << 16 | GREEN(rgb, 8) << 8 |
  114.         RED(rgb, 8);
  115. }
  116.  
  117. static int byte0888_bgr(void *src)
  118. {
  119.     int color = *(uint32_t *)(src);
  120.     return ((color & 0xff) << 16) | (((color >> 8) & 0xff) << 8) |
  121.         ((color >> 16) & 0xff);
  122. }
  123.  
  124. static void rgb_byte888(void *dst, int rgb)
  125. {
  126.     uint8_t *scr = (uint8_t *) dst;
  127. #if defined(FB_INVERT_ENDIAN)
  128.     scr[0] = RED(rgb, 8);
  129.     scr[1] = GREEN(rgb, 8);
  130.     scr[2] = BLUE(rgb, 8);
  131. #else
  132.     scr[2] = RED(rgb, 8);
  133.     scr[1] = GREEN(rgb, 8);
  134.     scr[0] = BLUE(rgb, 8);
  135. #endif
  136. }
  137.  
  138. static int byte888_rgb(void *src)
  139. {
  140.     uint8_t *scr = (uint8_t *) src;
  141. #if defined(FB_INVERT_ENDIAN)
  142.     return scr[0] << 16 | scr[1] << 8 | scr[2];
  143. #else
  144.     return scr[2] << 16 | scr[1] << 8 | scr[0];
  145. #endif 
  146. }
  147.  
  148. /**  16-bit depth (5:5:5) */
  149. static void rgb_byte555(void *dst, int rgb)
  150. {
  151.     /* 5-bit, 5-bits, 5-bits */
  152.     *((uint16_t *) dst) = RED(rgb, 5) << 10 | GREEN(rgb, 5) << 5 |
  153.         BLUE(rgb, 5);
  154. }
  155.  
  156. /** 16-bit depth (5:5:5) */
  157. static int byte555_rgb(void *src)
  158. {
  159.     int color = *(uint16_t *)(src);
  160.     return (((color >> 10) & 0x1f) << (16 + 3)) |
  161.         (((color >> 5) & 0x1f) << (8 + 3)) | ((color & 0x1f) << 3);
  162. }
  163.  
  164. /**  16-bit depth (5:6:5) */
  165. static void rgb_byte565(void *dst, int rgb)
  166. {
  167.     /* 5-bit, 6-bits, 5-bits */
  168.     *((uint16_t *) dst) = RED(rgb, 5) << 11 | GREEN(rgb, 6) << 5 |
  169.         BLUE(rgb, 5);
  170. }
  171.  
  172. /** 16-bit depth (5:6:5) */
  173. static int byte565_rgb(void *src)
  174. {
  175.     int color = *(uint16_t *)(src);
  176.     return (((color >> 11) & 0x1f) << (16 + 3)) |
  177.         (((color >> 5) & 0x3f) << (8 + 2)) | ((color & 0x1f) << 3);
  178. }
  179.  
  180. /** Put pixel - 8-bit depth (color palette/3:2:3)
  181.  *
  182.  * Even though we try 3:2:3 color scheme here, an 8-bit framebuffer
  183.  * will most likely use a color palette. The color appearance
  184.  * will be pretty random and depend on the default installed
  185.  * palette. This could be fixed by supporting custom palette
  186.  * and setting it to simulate the 8-bit truecolor.
  187.  */
  188. static void rgb_byte8(void *dst, int rgb)
  189. {
  190.     *((uint8_t *) dst) = RED(rgb, 3) << 5 | GREEN(rgb, 2) << 3 |
  191.         BLUE(rgb, 3);
  192. }
  193.  
  194. static void sb1500rgb_byte8(void *dst, int rgb)
  195. {
  196.     if (RED(rgb, 1) && GREEN(rgb, 1) && BLUE(rgb, 1))
  197.         *((uint8_t *) dst) = 255;
  198.     else if (RED(rgb, 1) && GREEN(rgb, 1))
  199.         *((uint8_t *) dst) = 150;
  200.     else if (GREEN(rgb, 1) && BLUE(rgb, 1))
  201.         *((uint8_t *) dst) = 47;
  202.     else if (RED(rgb, 1) && BLUE(rgb, 1))
  203.         *((uint8_t *) dst) = 48;
  204.     else if (RED(rgb, 1))
  205.         *((uint8_t *) dst) = 32;
  206.     else if (GREEN(rgb, 1))
  207.         *((uint8_t *) dst) = 47;
  208.     else if (BLUE(rgb, 1))
  209.         *((uint8_t *) dst) = 2;
  210.     else
  211.         *((uint8_t *) dst) = 1;
  212. }
  213.  
  214. /** Return pixel color - 8-bit depth (color palette/3:2:3)
  215.  *
  216.  * See the comment for rgb_byte().
  217.  */
  218. static int byte8_rgb(void *src)
  219. {
  220.     int color = *(uint8_t *)src;
  221.     return (((color >> 5) & 0x7) << (16 + 5)) |
  222.         (((color >> 3) & 0x3) << (8 + 6)) | ((color & 0x7) << 5);
  223. }
  224.  
  225. static void putpixel(unsigned int x, unsigned int y, int color)
  226. {
  227.     (*rgb2scr)(&fbaddress[POINTPOS(x, y)], COLOR(color));
  228.  
  229.     if (dbbuffer) {
  230.         int dline = (y + dboffset) % yres;
  231.         (*rgb2scr)(&dbbuffer[POINTPOS(x, dline)], COLOR(color));
  232.     }
  233. }
  234.  
  235. /** Get pixel from viewport */
  236. static int getpixel(unsigned int x, unsigned int y)
  237. {
  238.     if (dbbuffer) {
  239.         int dline = (y + dboffset) % yres;
  240.         return COLOR((*scr2rgb)(&dbbuffer[POINTPOS(x, dline)]));
  241.     }
  242.     return COLOR((*scr2rgb)(&fbaddress[POINTPOS(x, y)]));
  243. }
  244.  
  245.  
  246. /** Fill screen with background color */
  247. static void clear_screen(void)
  248. {
  249.     unsigned int y;
  250.  
  251.     for (y = 0; y < yres; y++) {
  252.         memcpy(&fbaddress[scanline * y], blankline, xres * pixelbytes);
  253.         if (dbbuffer)
  254.             memcpy(&dbbuffer[scanline * y], blankline,
  255.                 xres * pixelbytes);
  256.     }
  257. }
  258.  
  259.  
  260. /** Scroll screen one row up */
  261. static void scroll_screen(void)
  262. {
  263.     if (dbbuffer) {
  264.         count_t first;
  265.        
  266.         /* Clear the last row */
  267.         memcpy(&dbbuffer[dboffset * scanline], blankline, ROW_BYTES);
  268.        
  269.         dboffset = (dboffset + FONT_SCANLINES) % yres;
  270.         first = yres - dboffset;
  271.        
  272.         /* Move all rows one row up */
  273.         if (xres * pixelbytes == scanline) {
  274.             memcpy(fbaddress, &dbbuffer[dboffset * scanline],
  275.                 first * scanline);
  276.             memcpy(&fbaddress[first * scanline], dbbuffer,
  277.                 dboffset * scanline);
  278.         } else {
  279.             /*
  280.              * When the scanline is bigger than number of bytes
  281.              * in the X-resolution, chances are that the
  282.              * frame buffer memory past the X-resolution is special
  283.              * in some way. For example, the SUNW,ffb framebuffer
  284.              * wraps this area around the beginning of the same
  285.              * line. To avoid troubles, copy only memory as
  286.              * specified by the resolution.
  287.              */
  288.             unsigned int i;
  289.  
  290.             for (i = 0; i < first; i++)
  291.                 memcpy(&fbaddress[i * scanline],
  292.                     &dbbuffer[(dboffset + i) * scanline],
  293.                     xres * pixelbytes);
  294.             for (i = 0; i < dboffset; i++)
  295.                 memcpy(&fbaddress[(first + i) * scanline],
  296.                     &dbbuffer[i * scanline], xres * pixelbytes);
  297.         }
  298.     } else {
  299.         uint8_t *lastline = &fbaddress[(rows - 1) * ROW_BYTES];
  300.        
  301.         if (xres * pixelbytes == scanline) {
  302.             /* Move all rows one row up */
  303.             memcpy((void *) fbaddress,
  304.                 (void *) &fbaddress[ROW_BYTES],
  305.                 scanline * yres - ROW_BYTES);
  306.             /* Clear the last row */
  307.             memcpy((void *) lastline, (void *) blankline,
  308.                 ROW_BYTES);
  309.         } else {
  310.             /*
  311.              * See the comment in the dbbuffer case.
  312.              */
  313.             unsigned int i;
  314.  
  315.             /* Move all rows one row up */
  316.             for (i = 0; i < yres - FONT_SCANLINES; i++)
  317.                 memcpy(&fbaddress[i * scanline],
  318.                     &fbaddress[(i + FONT_SCANLINES) * scanline],
  319.                     xres * pixelbytes);
  320.             /* Clear the last row */
  321.             for (i = 0; i < FONT_SCANLINES; i++)
  322.                 memcpy(&lastline[i * scanline],
  323.                     &blankline[i * scanline],
  324.                     xres * pixelbytes);
  325.         }
  326.     }
  327. }
  328.  
  329.  
  330. static void invert_pixel(unsigned int x, unsigned int y)
  331. {
  332.     putpixel(x, y, ~getpixel(x, y));
  333. }
  334.  
  335.  
  336. /** Draw one line of glyph at a given position */
  337. static void draw_glyph_line(unsigned int glline, unsigned int x, unsigned int y)
  338. {
  339.     unsigned int i;
  340.  
  341.     for (i = 0; i < 8; i++)
  342.         if (glline & (1 << (7 - i))) {
  343.             putpixel(x + i, y, FGCOLOR);
  344.         } else
  345.             putpixel(x + i, y, BGCOLOR);
  346. }
  347.  
  348. /***************************************************************/
  349. /* Character-console functions */
  350.  
  351. /** Draw character at given position */
  352. static void draw_glyph(uint8_t glyph, unsigned int col, unsigned int row)
  353. {
  354.     unsigned int y;
  355.  
  356.     for (y = 0; y < FONT_SCANLINES; y++)
  357.         draw_glyph_line(fb_font[glyph * FONT_SCANLINES + y],
  358.             col * COL_WIDTH, row * FONT_SCANLINES + y);
  359. }
  360.  
  361. /** Invert character at given position */
  362. static void invert_char(unsigned int col, unsigned int row)
  363. {
  364.     unsigned int x;
  365.     unsigned int y;
  366.  
  367.     for (x = 0; x < COL_WIDTH; x++)
  368.         for (y = 0; y < FONT_SCANLINES; y++)
  369.             invert_pixel(col * COL_WIDTH + x,
  370.                 row * FONT_SCANLINES + y);
  371. }
  372.  
  373. /** Draw character at default position */
  374. static void draw_char(char chr)
  375. {
  376.     draw_glyph(chr, position % columns, position / columns);
  377. }
  378.  
  379. static void draw_logo(unsigned int startx, unsigned int starty)
  380. {
  381.     unsigned int x;
  382.     unsigned int y;
  383.     unsigned int byte;
  384.     unsigned int rowbytes;
  385.  
  386.     rowbytes = (helenos_width - 1) / 8 + 1;
  387.  
  388.     for (y = 0; y < helenos_height; y++)
  389.         for (x = 0; x < helenos_width; x++) {
  390.             byte = helenos_bits[rowbytes * y + x / 8];
  391.             byte >>= x % 8;
  392.             if (byte & 1)
  393.                 putpixel(startx + x, starty + y,
  394.                     COLOR(LOGOCOLOR));
  395.         }
  396. }
  397.  
  398. /***************************************************************/
  399. /* Stdout specific functions */
  400.  
  401. static void invert_cursor(void)
  402. {
  403.     invert_char(position % columns, position / columns);
  404. }
  405.  
  406. /** Print character to screen
  407.  *
  408.  *  Emulate basic terminal commands
  409.  */
  410. static void fb_putchar(chardev_t *dev, char ch)
  411. {
  412.     spinlock_lock(&fb_lock);
  413.    
  414.     switch (ch) {
  415.     case '\n':
  416.         invert_cursor();
  417.         position += columns;
  418.         position -= position % columns;
  419.         break;
  420.     case '\r':
  421.         invert_cursor();
  422.         position -= position % columns;
  423.         break;
  424.     case '\b':
  425.         invert_cursor();
  426.         if (position % columns)
  427.             position--;
  428.         break;
  429.     case '\t':
  430.         invert_cursor();
  431.         do {
  432.             draw_char(' ');
  433.             position++;
  434.         } while ((position % 8) && position < columns * rows);
  435.         break;
  436.     default:
  437.         draw_char(ch);
  438.         position++;
  439.     }
  440.    
  441.     if (position >= columns * rows) {
  442.         position -= columns;
  443.         scroll_screen();
  444.     }
  445.    
  446.     invert_cursor();
  447.    
  448.     spinlock_unlock(&fb_lock);
  449. }
  450.  
  451. static chardev_t framebuffer;
  452. static chardev_operations_t fb_ops = {
  453.     .write = fb_putchar,
  454. };
  455.  
  456.  
  457. /** Initialize framebuffer as a chardev output device
  458.  *
  459.  * @param props   properties of the framebuffer device
  460.  *
  461.  */
  462. void fb_init(fb_properties_t *props)
  463. {
  464.     switch (props->visual) {
  465.     case VISUAL_INDIRECT_8:
  466.         rgb2scr = rgb_byte8;
  467.         scr2rgb = byte8_rgb;
  468.         pixelbytes = 1;
  469.         break;
  470.     case VISUAL_SB1500_PALETTE:
  471.         rgb2scr = sb1500rgb_byte8;
  472.         scr2rgb = byte8_rgb;
  473.         pixelbytes = 1;
  474.         break;
  475.     case VISUAL_RGB_5_5_5:
  476.         rgb2scr = rgb_byte555;
  477.         scr2rgb = byte555_rgb;
  478.         pixelbytes = 2;
  479.         break;
  480.     case VISUAL_RGB_5_6_5:
  481.         rgb2scr = rgb_byte565;
  482.         scr2rgb = byte565_rgb;
  483.         pixelbytes = 2;
  484.         break;
  485.     case VISUAL_RGB_8_8_8:
  486.         rgb2scr = rgb_byte888;
  487.         scr2rgb = byte888_rgb;
  488.         pixelbytes = 3;
  489.         break;
  490.     case VISUAL_RGB_8_8_8_0:
  491.         rgb2scr = rgb_byte888;
  492.         scr2rgb = byte888_rgb;
  493.         pixelbytes = 4;
  494.         break;
  495.     case VISUAL_RGB_0_8_8_8:
  496.         rgb2scr = rgb_byte0888;
  497.         scr2rgb = byte0888_rgb;
  498.         pixelbytes = 4;
  499.         break;
  500.     case VISUAL_BGR_0_8_8_8:
  501.         rgb2scr = bgr_byte0888;
  502.         scr2rgb = byte0888_bgr;
  503.         pixelbytes = 4;
  504.         break;
  505.     default:
  506.         panic("Unsupported visual.\n");
  507.     }
  508.    
  509.     unsigned int fbsize = (props->scan) * (props->y) + (props->fb_start);
  510.    
  511.     /* Map the framebuffer */
  512.     fbaddress = (uint8_t *) hw_map((uintptr_t) (props->addr), fbsize);
  513.     fbaddress += props->fb_start;
  514.    
  515.     xres = props->x;
  516.     yres = props->y;
  517.     scanline = props->scan;
  518.    
  519.     rows = (props->y) / FONT_SCANLINES;
  520.     columns = (props->x) / COL_WIDTH;
  521.  
  522.     fb_parea.pbase = (uintptr_t) (props->addr);
  523.     fb_parea.vbase = (uintptr_t) fbaddress;
  524.     fb_parea.frames = SIZE2FRAMES(fbsize);
  525.     fb_parea.cacheable = false;
  526.     ddi_parea_register(&fb_parea);
  527.  
  528.     sysinfo_set_item_val("fb", NULL, true);
  529.     sysinfo_set_item_val("fb.kind", NULL, 1);
  530.     sysinfo_set_item_val("fb.width", NULL, xres);
  531.     sysinfo_set_item_val("fb.height", NULL, yres);
  532.     sysinfo_set_item_val("fb.scanline", NULL, (props->scan));
  533.     sysinfo_set_item_val("fb.visual", NULL, (props->visual));
  534.     sysinfo_set_item_val("fb.address.physical", NULL, (props->addr));
  535.     sysinfo_set_item_val("fb.invert-colors", NULL, invert_colors);
  536.  
  537.     /* Allocate double buffer */
  538.     unsigned int order = fnzb(SIZE2FRAMES(fbsize) - 1) + 1;
  539.     dbbuffer = (uint8_t *) frame_alloc(order, FRAME_ATOMIC | FRAME_KA);
  540.     if (!dbbuffer)
  541.         printf("Failed to allocate scroll buffer.\n");
  542.     dboffset = 0;
  543.  
  544.     /* Initialized blank line */
  545.     blankline = (uint8_t *) malloc(ROW_BYTES, FRAME_ATOMIC);
  546.     if (!blankline)
  547.         panic("Failed to allocate blank line for framebuffer.");
  548.     unsigned int x, y;
  549.     for (y = 0; y < FONT_SCANLINES; y++)
  550.         for (x = 0; x < xres; x++)
  551.             (*rgb2scr)(&blankline[POINTPOS(x, y)], COLOR(BGCOLOR));
  552.    
  553.     clear_screen();
  554.  
  555.     /* Update size of screen to match text area */
  556.     yres = rows * FONT_SCANLINES;
  557.  
  558.     draw_logo(xres - helenos_width, 0);
  559.     invert_cursor();
  560.  
  561.     chardev_initialize("fb", &framebuffer, &fb_ops);
  562.     stdout = &framebuffer;
  563. }
  564.  
  565. /** @}
  566.  */
  567.