WebSVN – HelenOS – Diff – /branches/dd/kernel/genarch/src/fb/fb.c


/*
 * Copyright (C) 2006 Ondrej Palkovsky
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup genarch
 * @{
 */
/** @file
 */
 
#include <genarch/fb/font-8x16.h>
#include <genarch/fb/fb.h>
#include <console/chardev.h>
#include <console/console.h>
#include <sysinfo/sysinfo.h>
#include <mm/slab.h>
#include <align.h>
#include <panic.h>
#include <memstr.h>
#include <config.h>
#include <bitops.h>
#include <print.h>
 
#include "helenos.xbm"
 
SPINLOCK_INITIALIZE(fb_lock);
 
static uint8_t *fbaddress = NULL;
 
static uint8_t *blankline = NULL;
static uint8_t *dbbuffer = NULL; /* Buffer for fast scrolling console */
static int dboffset;
 
static unsigned int xres = 0;
static unsigned int yres = 0;
static unsigned int scanline = 0;
static unsigned int bitspp = 0;
static unsigned int pixelbytes = 0;
#ifdef FB_INVERT_COLORS
static bool invert_colors = true;
#else
static bool invert_colors = false;
#endif
 
static unsigned int position = 0;
static unsigned int columns = 0;
static unsigned int rows = 0;
 
#define COL_WIDTH   8
#define ROW_BYTES   (scanline * FONT_SCANLINES)
 
#define BGCOLOR     0x000080
#define FGCOLOR     0xffff00
#define LOGOCOLOR   0x2020b0
 
#define RED(x, bits)    ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))
#define GREEN(x, bits)  ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))
#define BLUE(x, bits)   ((x >> (8 - bits)) & ((1 << bits) - 1))
 
#define POINTPOS(x, y)  ((y) * scanline + (x) * pixelbytes)
 
/***************************************************************/
/* Pixel specific fuctions */
 
static void (*rgb2scr)(void *, int);
static int (*scr2rgb)(void *);
 
static inline int COLOR(int color)
{
    return invert_colors ? ~color : color;
}
 
/* Conversion routines between different color representations */
static void rgb_4byte(void *dst, int rgb)
{
    *(int *)dst = rgb;
}
 
static int byte4_rgb(void *src)
{
    return (*(int *)src) & 0xffffff;
}
 
static void rgb_3byte(void *dst, int rgb)
{
    uint8_t *scr = dst;
#if defined(FB_INVERT_ENDIAN)
    scr[0] = RED(rgb, 8);
    scr[1] = GREEN(rgb, 8);
    scr[2] = BLUE(rgb, 8);
#else
    scr[2] = RED(rgb, 8);
    scr[1] = GREEN(rgb, 8);
    scr[0] = BLUE(rgb, 8);
#endif
}
 
static int byte3_rgb(void *src)
{
    uint8_t *scr = src;
#if defined(FB_INVERT_ENDIAN)
    return scr[0] << 16 | scr[1] << 8 | scr[2];
#else
    return scr[2] << 16 | scr[1] << 8 | scr[0];
#endif  
}
 
/**  16-bit depth (5:6:5) */
static void rgb_2byte(void *dst, int rgb)
{
    /* 5-bit, 6-bits, 5-bits */
    *((uint16_t *)(dst)) = RED(rgb, 5) << 11 | GREEN(rgb, 6) << 5 | BLUE(rgb, 5);
}
 
/** 16-bit depth (5:6:5) */
static int byte2_rgb(void *src)
{
    int color = *(uint16_t *)(src);
    return (((color >> 11) & 0x1f) << (16 + 3)) | (((color >> 5) & 0x3f) << (8 + 2)) | ((color & 0x1f) << 3);
}
 
/** Put pixel - 8-bit depth (color palette/3:2:3)
 *
 * Even though we try 3:2:3 color scheme here, an 8-bit framebuffer
 * will most likely use a color palette. The color appearance
 * will be pretty random and depend on the default installed
 * palette. This could be fixed by supporting custom palette
 * and setting it to simulate the 8-bit truecolor.
 */
static void rgb_1byte(void *dst, int rgb)
{
    *(uint8_t *)dst = RED(rgb, 3) << 5 | GREEN(rgb, 2) << 3 | BLUE(rgb, 3);
}
 
/** Return pixel color - 8-bit depth (color palette/3:2:3)
 *
 * See the comment for rgb_1byte().
 */
static int byte1_rgb(void *src)
{
    int color = *(uint8_t *)src;
    return (((color >> 5) & 0x7) << (16 + 5)) | (((color >> 3) & 0x3) << (8 + 6)) | ((color & 0x7) << 5);
}
 
static void putpixel(unsigned int x, unsigned int y, int color)
{
    (*rgb2scr)(&fbaddress[POINTPOS(x,y)], COLOR(color));
 
    if (dbbuffer) {
        int dline = (y + dboffset) % yres;
        (*rgb2scr)(&dbbuffer[POINTPOS(x,dline)], COLOR(color));
    }
}
 
/** Get pixel from viewport */
static int getpixel(unsigned int x, unsigned int y)
{
    if (dbbuffer) {
        int dline = (y + dboffset) % yres;
        return COLOR((*scr2rgb)(&dbbuffer[POINTPOS(x,dline)]));
    }
    return COLOR((*scr2rgb)(&fbaddress[POINTPOS(x,y)]));
}
 
 
/** Fill screen with background color */
static void clear_screen(void)
{
    unsigned int y;
 
    for (y = 0; y < yres; y++) {
        memcpy(&fbaddress[scanline*y], blankline, xres*pixelbytes);
        if (dbbuffer)
            memcpy(&dbbuffer[scanline*y], blankline, xres*pixelbytes);
    }
}
 
 
/** Scroll screen one row up */
static void scroll_screen(void)
{
    uint8_t *lastline = &fbaddress[(rows - 1) * ROW_BYTES];
    int firstsz;
 
    if (dbbuffer) {
        memcpy(&dbbuffer[dboffset*scanline], blankline, FONT_SCANLINES*scanline);
       
        dboffset = (dboffset + FONT_SCANLINES) % yres;
        firstsz = yres-dboffset;
 
        memcpy(fbaddress, &dbbuffer[scanline*dboffset], firstsz*scanline);
        memcpy(&fbaddress[firstsz*scanline], dbbuffer, dboffset*scanline);
    } else {
        memcpy((void *) fbaddress, (void *) &fbaddress[ROW_BYTES], scanline * yres - ROW_BYTES);
        /* Clear last row */
        memcpy((void *) lastline, (void *) blankline, ROW_BYTES);
    }
}
 
 
static void invert_pixel(unsigned int x, unsigned int y)
{
    putpixel(x, y, ~getpixel(x, y));
}
 
 
/** Draw one line of glyph at a given position */
static void draw_glyph_line(unsigned int glline, unsigned int x, unsigned int y)
{
    unsigned int i;
 
    for (i = 0; i < 8; i++)
        if (glline & (1 << (7 - i))) {
            putpixel(x + i, y, FGCOLOR);
        } else
            putpixel(x + i, y, BGCOLOR);
}
 
/***************************************************************/
/* Character-console functions */
 
/** Draw character at given position */
static void draw_glyph(uint8_t glyph, unsigned int col, unsigned int row)
{
    unsigned int y;
 
    for (y = 0; y < FONT_SCANLINES; y++)
        draw_glyph_line(fb_font[glyph * FONT_SCANLINES + y], col * COL_WIDTH, row * FONT_SCANLINES + y);
}
 
/** Invert character at given position */
static void invert_char(unsigned int col, unsigned int row)
{
    unsigned int x;
    unsigned int y;
 
    for (x = 0; x < COL_WIDTH; x++)
        for (y = 0; y < FONT_SCANLINES; y++)
            invert_pixel(col * COL_WIDTH + x, row * FONT_SCANLINES + y);
}
 
/** Draw character at default position */
static void draw_char(char chr)
{
    draw_glyph(chr, position % columns, position / columns);
}
 
static void draw_logo(unsigned int startx, unsigned int starty)
{
    unsigned int x;
    unsigned int y;
    unsigned int byte;
    unsigned int rowbytes;
 
    rowbytes = (helenos_width - 1) / 8 + 1;
 
    for (y = 0; y < helenos_height; y++)
        for (x = 0; x < helenos_width; x++) {
            byte = helenos_bits[rowbytes * y + x / 8];
            byte >>= x % 8;
            if (byte & 1)
                putpixel(startx + x, starty + y, COLOR(LOGOCOLOR));
        }
}
 
/***************************************************************/
/* Stdout specific functions */
 
static void invert_cursor(void)
{
    invert_char(position % columns, position / columns);
}
 
/** Print character to screen
 *
 *  Emulate basic terminal commands
 */
static void fb_putchar(chardev_t *dev, char ch)
{
    spinlock_lock(&fb_lock);
   
    switch (ch) {
    case '\n':
        invert_cursor();
        position += columns;
        position -= position % columns;
        break;
    case '\r':
        invert_cursor();
        position -= position % columns;
        break;
    case '\b':
        invert_cursor();
        if (position % columns)
            position--;
        break;
    case '\t':
        invert_cursor();
        do {
            draw_char(' ');
 
 
 
 
 
            position++;
        } while ((position % 8) && position < columns * rows);
        break;
    default:
        draw_char(ch);
        position++;
    }
   
    if (position >= columns * rows) {
        position -= columns;
        scroll_screen();
    }
   
    invert_cursor();
   
    spinlock_unlock(&fb_lock);
}
 
static chardev_t framebuffer;
static chardev_operations_t fb_ops = {
    .write = fb_putchar,
};
 
 
/** Initialize framebuffer as a chardev output device
 *
 * @param addr  Physical address of the framebuffer
 * @param x     Screen width in pixels
 * @param y     Screen height in pixels
 * @param bpp   Bits per pixel (8, 16, 24, 32)
 * @param scan  Bytes per one scanline
 * @param align Request alignment for 24bpp mode.
 */
void fb_init(uintptr_t addr, unsigned int x, unsigned int y, unsigned int bpp, unsigned int scan, bool align)
{
    switch (bpp) {
    case 8:
        rgb2scr = rgb_1byte;
        scr2rgb = byte1_rgb;
        pixelbytes = 1;
        break;
    case 16:
        rgb2scr = rgb_2byte;
        scr2rgb = byte2_rgb;
        pixelbytes = 2;
        break;
    case 24:
        rgb2scr = rgb_3byte;
        scr2rgb = byte3_rgb;
        if (align)
 
 
 
 
 
 
 
            pixelbytes = 4;
        else
            pixelbytes = 3;
        break;
    case 32:
        rgb2scr = rgb_4byte;
        scr2rgb = byte4_rgb;
        pixelbytes = 4;
        break;
    default:
        panic("Unsupported bpp");
    }
   
    unsigned int fbsize = scan * y;
   
    /* Map the framebuffer */
    fbaddress = (uint8_t *) hw_map((uintptr_t) addr, fbsize);
   
    xres = x;
    yres = y;
    bitspp = bpp;
    scanline = scan;
   
    rows = y / FONT_SCANLINES;
    columns = x / COL_WIDTH;
 
    sysinfo_set_item_val("fb", NULL, true);
    sysinfo_set_item_val("fb.kind", NULL, 1);
    sysinfo_set_item_val("fb.width", NULL, xres);
    sysinfo_set_item_val("fb.height", NULL, yres);
    sysinfo_set_item_val("fb.bpp", NULL, bpp);
    sysinfo_set_item_val("fb.bpp-align", NULL, align);
    sysinfo_set_item_val("fb.scanline", NULL, scan);
    sysinfo_set_item_val("fb.address.physical", NULL, addr);
    sysinfo_set_item_val("fb.invert-colors", NULL, invert_colors);
 
    /* Allocate double buffer */
    int totsize = scanline * yres;
    int pages = SIZE2FRAMES(totsize);
    int order;
    if (pages == 1)
        order = 0;
    else
        order = fnzb(pages-1)+1;
 
    dbbuffer = frame_alloc(order,FRAME_ATOMIC | FRAME_KA);
    if (!dbbuffer)
        printf("Failed to allocate scroll buffer.\n");
    dboffset = 0;
 
    /* Initialized blank line */
    blankline = (uint8_t *) malloc(ROW_BYTES, FRAME_ATOMIC);
    if (!blankline)
        panic("Failed to allocate blank line for framebuffer.");
    for (y=0; y < FONT_SCANLINES; y++) {
        for (x=0; x < xres; x++) {
            (*rgb2scr)(&blankline[POINTPOS(x,y)], COLOR(BGCOLOR));
        }
    }
 
    clear_screen();
 
    /* Update size of screen to match text area */
    yres = rows * FONT_SCANLINES;
 
    draw_logo(xres - helenos_width, 0);
    invert_cursor();
 
    chardev_initialize("fb", &framebuffer, &fb_ops);
    stdout = &framebuffer;
   
}
 
/** @}
 */
 

Rev 1875	Rev 1888
1	/*	1	/*
2	* Copyright (C) 2006 Ondrej Palkovsky	2	* Copyright (C) 2006 Ondrej Palkovsky
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	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	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.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	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	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	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	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	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	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.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/** @addtogroup genarch	29	/** @addtogroup genarch
30	* @{	30	* @{
31	*/	31	*/
32	/** @file	32	/** @file
33	*/	33	*/
34		34
35	#include <genarch/fb/font-8x16.h>	35	#include <genarch/fb/font-8x16.h>
36	#include <genarch/fb/fb.h>	36	#include <genarch/fb/fb.h>
37	#include <console/chardev.h>	37	#include <console/chardev.h>
38	#include <console/console.h>	38	#include <console/console.h>
39	#include <sysinfo/sysinfo.h>	39	#include <sysinfo/sysinfo.h>
40	#include <mm/slab.h>	40	#include <mm/slab.h>
41	#include <align.h>	41	#include <align.h>
42	#include <panic.h>	42	#include <panic.h>
43	#include <memstr.h>	43	#include <memstr.h>
44	#include <config.h>	44	#include <config.h>
45	#include <bitops.h>	45	#include <bitops.h>
46	#include <print.h>	46	#include <print.h>
47		47
48	#include "helenos.xbm"	48	#include "helenos.xbm"
49		49
50	SPINLOCK_INITIALIZE(fb_lock);	50	SPINLOCK_INITIALIZE(fb_lock);
51		51
52	static uint8_t *fbaddress = NULL;	52	static uint8_t *fbaddress = NULL;
53		53
54	static uint8_t *blankline = NULL;	54	static uint8_t *blankline = NULL;
55	static uint8_t dbbuffer = NULL; / Buffer for fast scrolling console */	55	static uint8_t dbbuffer = NULL; / Buffer for fast scrolling console */
56	static int dboffset;	56	static int dboffset;
57		57
58	static unsigned int xres = 0;	58	static unsigned int xres = 0;
59	static unsigned int yres = 0;	59	static unsigned int yres = 0;
60	static unsigned int scanline = 0;	60	static unsigned int scanline = 0;
61	static unsigned int bitspp = 0;	61	static unsigned int bitspp = 0;
62	static unsigned int pixelbytes = 0;	62	static unsigned int pixelbytes = 0;
63	#ifdef FB_INVERT_COLORS	63	#ifdef FB_INVERT_COLORS
64	static bool invert_colors = true;	64	static bool invert_colors = true;
65	#else	65	#else
66	static bool invert_colors = false;	66	static bool invert_colors = false;
67	#endif	67	#endif
68		68
69	static unsigned int position = 0;	69	static unsigned int position = 0;
70	static unsigned int columns = 0;	70	static unsigned int columns = 0;
71	static unsigned int rows = 0;	71	static unsigned int rows = 0;
72		72
73	#define COL_WIDTH 8	73	#define COL_WIDTH 8
74	#define ROW_BYTES (scanline * FONT_SCANLINES)	74	#define ROW_BYTES (scanline * FONT_SCANLINES)
75		75
76	#define BGCOLOR 0x000080	76	#define BGCOLOR 0x000080
77	#define FGCOLOR 0xffff00	77	#define FGCOLOR 0xffff00
78	#define LOGOCOLOR 0x2020b0	78	#define LOGOCOLOR 0x2020b0
79		79
80	#define RED(x, bits) ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))	80	#define RED(x, bits) ((x >> (16 + 8 - bits)) & ((1 << bits) - 1))
81	#define GREEN(x, bits) ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))	81	#define GREEN(x, bits) ((x >> (8 + 8 - bits)) & ((1 << bits) - 1))
82	#define BLUE(x, bits) ((x >> (8 - bits)) & ((1 << bits) - 1))	82	#define BLUE(x, bits) ((x >> (8 - bits)) & ((1 << bits) - 1))
83		83
84	#define POINTPOS(x, y) ((y) * scanline + (x) * pixelbytes)	84	#define POINTPOS(x, y) ((y) * scanline + (x) * pixelbytes)
85		85
86	/***************************************************************/	86	/***************************************************************/
87	/* Pixel specific fuctions */	87	/* Pixel specific fuctions */
88		88
89	static void (rgb2scr)(void , int);	89	static void (rgb2scr)(void , int);
90	static int (scr2rgb)(void );	90	static int (scr2rgb)(void );
91		91
92	static inline int COLOR(int color)	92	static inline int COLOR(int color)
93	{	93	{
94	return invert_colors ? ~color : color;	94	return invert_colors ? ~color : color;
95	}	95	}
96		96
97	/* Conversion routines between different color representations */	97	/* Conversion routines between different color representations */
98	static void rgb_4byte(void *dst, int rgb)	98	static void rgb_4byte(void *dst, int rgb)
99	{	99	{
100	(int )dst = rgb;	100	(int )dst = rgb;
101	}	101	}
102		102
103	static int byte4_rgb(void *src)	103	static int byte4_rgb(void *src)
104	{	104	{
105	return ((int )src) & 0xffffff;	105	return ((int )src) & 0xffffff;
106	}	106	}
107		107
108	static void rgb_3byte(void *dst, int rgb)	108	static void rgb_3byte(void *dst, int rgb)
109	{	109	{
110	uint8_t *scr = dst;	110	uint8_t *scr = dst;
111	#if defined(FB_INVERT_ENDIAN)	111	#if defined(FB_INVERT_ENDIAN)
112	scr[0] = RED(rgb, 8);	112	scr[0] = RED(rgb, 8);
113	scr[1] = GREEN(rgb, 8);	113	scr[1] = GREEN(rgb, 8);
114	scr[2] = BLUE(rgb, 8);	114	scr[2] = BLUE(rgb, 8);
115	#else	115	#else
116	scr[2] = RED(rgb, 8);	116	scr[2] = RED(rgb, 8);
117	scr[1] = GREEN(rgb, 8);	117	scr[1] = GREEN(rgb, 8);
118	scr[0] = BLUE(rgb, 8);	118	scr[0] = BLUE(rgb, 8);
119	#endif	119	#endif
120	}	120	}
121		121
122	static int byte3_rgb(void *src)	122	static int byte3_rgb(void *src)
123	{	123	{
124	uint8_t *scr = src;	124	uint8_t *scr = src;
125	#if defined(FB_INVERT_ENDIAN)	125	#if defined(FB_INVERT_ENDIAN)
126	return scr[0] << 16 \| scr[1] << 8 \| scr[2];	126	return scr[0] << 16 \| scr[1] << 8 \| scr[2];
127	#else	127	#else
128	return scr[2] << 16 \| scr[1] << 8 \| scr[0];	128	return scr[2] << 16 \| scr[1] << 8 \| scr[0];
129	#endif	129	#endif
130	}	130	}
131		131
132	/** 16-bit depth (5:6:5) */	132	/** 16-bit depth (5:6:5) */
133	static void rgb_2byte(void *dst, int rgb)	133	static void rgb_2byte(void *dst, int rgb)
134	{	134	{
135	/* 5-bit, 6-bits, 5-bits */	135	/* 5-bit, 6-bits, 5-bits */
136	((uint16_t )(dst)) = RED(rgb, 5) << 11 \| GREEN(rgb, 6) << 5 \| BLUE(rgb, 5);	136	((uint16_t )(dst)) = RED(rgb, 5) << 11 \| GREEN(rgb, 6) << 5 \| BLUE(rgb, 5);
137	}	137	}
138		138
139	/** 16-bit depth (5:6:5) */	139	/** 16-bit depth (5:6:5) */
140	static int byte2_rgb(void *src)	140	static int byte2_rgb(void *src)
141	{	141	{
142	int color = (uint16_t )(src);	142	int color = (uint16_t )(src);
143	return (((color >> 11) & 0x1f) << (16 + 3)) \| (((color >> 5) & 0x3f) << (8 + 2)) \| ((color & 0x1f) << 3);	143	return (((color >> 11) & 0x1f) << (16 + 3)) \| (((color >> 5) & 0x3f) << (8 + 2)) \| ((color & 0x1f) << 3);
144	}	144	}
145		145
146	/** Put pixel - 8-bit depth (color palette/3:2:3)	146	/** Put pixel - 8-bit depth (color palette/3:2:3)
147	*	147	*
148	* Even though we try 3:2:3 color scheme here, an 8-bit framebuffer	148	* Even though we try 3:2:3 color scheme here, an 8-bit framebuffer
149	* will most likely use a color palette. The color appearance	149	* will most likely use a color palette. The color appearance
150	* will be pretty random and depend on the default installed	150	* will be pretty random and depend on the default installed
151	* palette. This could be fixed by supporting custom palette	151	* palette. This could be fixed by supporting custom palette
152	* and setting it to simulate the 8-bit truecolor.	152	* and setting it to simulate the 8-bit truecolor.
153	*/	153	*/
154	static void rgb_1byte(void *dst, int rgb)	154	static void rgb_1byte(void *dst, int rgb)
155	{	155	{
156	(uint8_t )dst = RED(rgb, 3) << 5 \| GREEN(rgb, 2) << 3 \| BLUE(rgb, 3);	156	(uint8_t )dst = RED(rgb, 3) << 5 \| GREEN(rgb, 2) << 3 \| BLUE(rgb, 3);
157	}	157	}
158		158
159	/** Return pixel color - 8-bit depth (color palette/3:2:3)	159	/** Return pixel color - 8-bit depth (color palette/3:2:3)
160	*	160	*
161	* See the comment for rgb_1byte().	161	* See the comment for rgb_1byte().
162	*/	162	*/
163	static int byte1_rgb(void *src)	163	static int byte1_rgb(void *src)
164	{	164	{
165	int color = (uint8_t )src;	165	int color = (uint8_t )src;
166	return (((color >> 5) & 0x7) << (16 + 5)) \| (((color >> 3) & 0x3) << (8 + 6)) \| ((color & 0x7) << 5);	166	return (((color >> 5) & 0x7) << (16 + 5)) \| (((color >> 3) & 0x3) << (8 + 6)) \| ((color & 0x7) << 5);
167	}	167	}
168		168
169	static void putpixel(unsigned int x, unsigned int y, int color)	169	static void putpixel(unsigned int x, unsigned int y, int color)
170	{	170	{
171	(*rgb2scr)(&fbaddress[POINTPOS(x,y)], COLOR(color));	171	(*rgb2scr)(&fbaddress[POINTPOS(x,y)], COLOR(color));
172		172
173	if (dbbuffer) {	173	if (dbbuffer) {
174	int dline = (y + dboffset) % yres;	174	int dline = (y + dboffset) % yres;
175	(*rgb2scr)(&dbbuffer[POINTPOS(x,dline)], COLOR(color));	175	(*rgb2scr)(&dbbuffer[POINTPOS(x,dline)], COLOR(color));
176	}	176	}
177	}	177	}
178		178
179	/** Get pixel from viewport */	179	/** Get pixel from viewport */
180	static int getpixel(unsigned int x, unsigned int y)	180	static int getpixel(unsigned int x, unsigned int y)
181	{	181	{
182	if (dbbuffer) {	182	if (dbbuffer) {
183	int dline = (y + dboffset) % yres;	183	int dline = (y + dboffset) % yres;
184	return COLOR((*scr2rgb)(&dbbuffer[POINTPOS(x,dline)]));	184	return COLOR((*scr2rgb)(&dbbuffer[POINTPOS(x,dline)]));
185	}	185	}
186	return COLOR((*scr2rgb)(&fbaddress[POINTPOS(x,y)]));	186	return COLOR((*scr2rgb)(&fbaddress[POINTPOS(x,y)]));
187	}	187	}
188		188
189		189
190	/** Fill screen with background color */	190	/** Fill screen with background color */
191	static void clear_screen(void)	191	static void clear_screen(void)
192	{	192	{
193	unsigned int y;	193	unsigned int y;
194		194
195	for (y = 0; y < yres; y++) {	195	for (y = 0; y < yres; y++) {
196	memcpy(&fbaddress[scanliney], blankline, xrespixelbytes);	196	memcpy(&fbaddress[scanliney], blankline, xrespixelbytes);
197	if (dbbuffer)	197	if (dbbuffer)
198	memcpy(&dbbuffer[scanliney], blankline, xrespixelbytes);	198	memcpy(&dbbuffer[scanliney], blankline, xrespixelbytes);
199	}	199	}
200	}	200	}
201		201
202		202
203	/** Scroll screen one row up */	203	/** Scroll screen one row up */
204	static void scroll_screen(void)	204	static void scroll_screen(void)
205	{	205	{
206	uint8_t lastline = &fbaddress[(rows - 1) ROW_BYTES];	206	uint8_t lastline = &fbaddress[(rows - 1) ROW_BYTES];
207	int firstsz;	207	int firstsz;
208		208
209	if (dbbuffer) {	209	if (dbbuffer) {
210	memcpy(&dbbuffer[dboffsetscanline], blankline, FONT_SCANLINESscanline);	210	memcpy(&dbbuffer[dboffsetscanline], blankline, FONT_SCANLINESscanline);
211		211
212	dboffset = (dboffset + FONT_SCANLINES) % yres;	212	dboffset = (dboffset + FONT_SCANLINES) % yres;
213	firstsz = yres-dboffset;	213	firstsz = yres-dboffset;
214		214
215	memcpy(fbaddress, &dbbuffer[scanlinedboffset], firstszscanline);	215	memcpy(fbaddress, &dbbuffer[scanlinedboffset], firstszscanline);
216	memcpy(&fbaddress[firstszscanline], dbbuffer, dboffsetscanline);	216	memcpy(&fbaddress[firstszscanline], dbbuffer, dboffsetscanline);
217	} else {	217	} else {
218	memcpy((void ) fbaddress, (void ) &fbaddress[ROW_BYTES], scanline * yres - ROW_BYTES);	218	memcpy((void ) fbaddress, (void ) &fbaddress[ROW_BYTES], scanline * yres - ROW_BYTES);
219	/* Clear last row */	219	/* Clear last row */
220	memcpy((void ) lastline, (void ) blankline, ROW_BYTES);	220	memcpy((void ) lastline, (void ) blankline, ROW_BYTES);
221	}	221	}
222	}	222	}
223		223
224		224
225	static void invert_pixel(unsigned int x, unsigned int y)	225	static void invert_pixel(unsigned int x, unsigned int y)
226	{	226	{
227	putpixel(x, y, ~getpixel(x, y));	227	putpixel(x, y, ~getpixel(x, y));
228	}	228	}
229		229
230		230
231	/** Draw one line of glyph at a given position */	231	/** Draw one line of glyph at a given position */
232	static void draw_glyph_line(unsigned int glline, unsigned int x, unsigned int y)	232	static void draw_glyph_line(unsigned int glline, unsigned int x, unsigned int y)
233	{	233	{
234	unsigned int i;	234	unsigned int i;
235		235
236	for (i = 0; i < 8; i++)	236	for (i = 0; i < 8; i++)
237	if (glline & (1 << (7 - i))) {	237	if (glline & (1 << (7 - i))) {
238	putpixel(x + i, y, FGCOLOR);	238	putpixel(x + i, y, FGCOLOR);
239	} else	239	} else
240	putpixel(x + i, y, BGCOLOR);	240	putpixel(x + i, y, BGCOLOR);
241	}	241	}
242		242
243	/***************************************************************/	243	/***************************************************************/
244	/* Character-console functions */	244	/* Character-console functions */
245		245
246	/** Draw character at given position */	246	/** Draw character at given position */
247	static void draw_glyph(uint8_t glyph, unsigned int col, unsigned int row)	247	static void draw_glyph(uint8_t glyph, unsigned int col, unsigned int row)
248	{	248	{
249	unsigned int y;	249	unsigned int y;
250		250
251	for (y = 0; y < FONT_SCANLINES; y++)	251	for (y = 0; y < FONT_SCANLINES; y++)
252	draw_glyph_line(fb_font[glyph * FONT_SCANLINES + y], col * COL_WIDTH, row * FONT_SCANLINES + y);	252	draw_glyph_line(fb_font[glyph * FONT_SCANLINES + y], col * COL_WIDTH, row * FONT_SCANLINES + y);
253	}	253	}
254		254
255	/** Invert character at given position */	255	/** Invert character at given position */
256	static void invert_char(unsigned int col, unsigned int row)	256	static void invert_char(unsigned int col, unsigned int row)
257	{	257	{
258	unsigned int x;	258	unsigned int x;
259	unsigned int y;	259	unsigned int y;
260		260
261	for (x = 0; x < COL_WIDTH; x++)	261	for (x = 0; x < COL_WIDTH; x++)
262	for (y = 0; y < FONT_SCANLINES; y++)	262	for (y = 0; y < FONT_SCANLINES; y++)
263	invert_pixel(col * COL_WIDTH + x, row * FONT_SCANLINES + y);	263	invert_pixel(col * COL_WIDTH + x, row * FONT_SCANLINES + y);
264	}	264	}
265		265
266	/** Draw character at default position */	266	/** Draw character at default position */
267	static void draw_char(char chr)	267	static void draw_char(char chr)
268	{	268	{
269	draw_glyph(chr, position % columns, position / columns);	269	draw_glyph(chr, position % columns, position / columns);
270	}	270	}
271		271
272	static void draw_logo(unsigned int startx, unsigned int starty)	272	static void draw_logo(unsigned int startx, unsigned int starty)
273	{	273	{
274	unsigned int x;	274	unsigned int x;
275	unsigned int y;	275	unsigned int y;
276	unsigned int byte;	276	unsigned int byte;
277	unsigned int rowbytes;	277	unsigned int rowbytes;
278		278
279	rowbytes = (helenos_width - 1) / 8 + 1;	279	rowbytes = (helenos_width - 1) / 8 + 1;
280		280
281	for (y = 0; y < helenos_height; y++)	281	for (y = 0; y < helenos_height; y++)
282	for (x = 0; x < helenos_width; x++) {	282	for (x = 0; x < helenos_width; x++) {
283	byte = helenos_bits[rowbytes * y + x / 8];	283	byte = helenos_bits[rowbytes * y + x / 8];
284	byte >>= x % 8;	284	byte >>= x % 8;
285	if (byte & 1)	285	if (byte & 1)
286	putpixel(startx + x, starty + y, COLOR(LOGOCOLOR));	286	putpixel(startx + x, starty + y, COLOR(LOGOCOLOR));
287	}	287	}
288	}	288	}
289		289
290	/***************************************************************/	290	/***************************************************************/
291	/* Stdout specific functions */	291	/* Stdout specific functions */
292		292
293	static void invert_cursor(void)	293	static void invert_cursor(void)
294	{	294	{
295	invert_char(position % columns, position / columns);	295	invert_char(position % columns, position / columns);
296	}	296	}
297		297
298	/** Print character to screen	298	/** Print character to screen
299	*	299	*
300	* Emulate basic terminal commands	300	* Emulate basic terminal commands
301	*/	301	*/
302	static void fb_putchar(chardev_t *dev, char ch)	302	static void fb_putchar(chardev_t *dev, char ch)
303	{	303	{
304	spinlock_lock(&fb_lock);	304	spinlock_lock(&fb_lock);
305		305
306	switch (ch) {	306	switch (ch) {
307	case '\n':	307	case '\n':
308	invert_cursor();	308	invert_cursor();
309	position += columns;	309	position += columns;
310	position -= position % columns;	310	position -= position % columns;
311	break;	311	break;
312	case '\r':	312	case '\r':
313	invert_cursor();	313	invert_cursor();
314	position -= position % columns;	314	position -= position % columns;
315	break;	315	break;
316	case '\b':	316	case '\b':
317	invert_cursor();	317	invert_cursor();
318	if (position % columns)	318	if (position % columns)
319	position--;	319	position--;
320	break;	320	break;
321	case '\t':	321	case '\t':
322	invert_cursor();	322	invert_cursor();
323	do {	323	do {
324	draw_char(' ');	324	draw_char(' ');
325	position++;	-
326	} while ((position % 8) && position < columns * rows);	-
327	break;	-
328	default:	-
329	draw_char(ch);	-
330	position++;	325	position++;
-		326	} while ((position % 8) && position < columns * rows);
-		327	break;
-		328	default:
-		329	draw_char(ch);
-		330	position++;
331	}	331	}
332		332
333	if (position >= columns * rows) {	333	if (position >= columns * rows) {
334	position -= columns;	334	position -= columns;
335	scroll_screen();	335	scroll_screen();
336	}	336	}
337		337
338	invert_cursor();	338	invert_cursor();
339		339
340	spinlock_unlock(&fb_lock);	340	spinlock_unlock(&fb_lock);
341	}	341	}
342		342
343	static chardev_t framebuffer;	343	static chardev_t framebuffer;
344	static chardev_operations_t fb_ops = {	344	static chardev_operations_t fb_ops = {
345	.write = fb_putchar,	345	.write = fb_putchar,
346	};	346	};
347		347
348		348
349	/** Initialize framebuffer as a chardev output device	349	/** Initialize framebuffer as a chardev output device
350	*	350	*
351	* @param addr Physical address of the framebuffer	351	* @param addr Physical address of the framebuffer
352	* @param x Screen width in pixels	352	* @param x Screen width in pixels
353	* @param y Screen height in pixels	353	* @param y Screen height in pixels
354	* @param bpp Bits per pixel (8, 16, 24, 32)	354	* @param bpp Bits per pixel (8, 16, 24, 32)
355	* @param scan Bytes per one scanline	355	* @param scan Bytes per one scanline
356	* @param align Request alignment for 24bpp mode.	356	* @param align Request alignment for 24bpp mode.
357	*/	357	*/
358	void fb_init(uintptr_t addr, unsigned int x, unsigned int y, unsigned int bpp, unsigned int scan, bool align)	358	void fb_init(uintptr_t addr, unsigned int x, unsigned int y, unsigned int bpp, unsigned int scan, bool align)
359	{	359	{
360	switch (bpp) {	360	switch (bpp) {
361	case 8:	361	case 8:
362	rgb2scr = rgb_1byte;	362	rgb2scr = rgb_1byte;
363	scr2rgb = byte1_rgb;	363	scr2rgb = byte1_rgb;
364	pixelbytes = 1;	364	pixelbytes = 1;
365	break;	365	break;
366	case 16:	366	case 16:
367	rgb2scr = rgb_2byte;	367	rgb2scr = rgb_2byte;
368	scr2rgb = byte2_rgb;	368	scr2rgb = byte2_rgb;
369	pixelbytes = 2;	369	pixelbytes = 2;
370	break;	370	break;
371	case 24:	371	case 24:
372	rgb2scr = rgb_3byte;	372	rgb2scr = rgb_3byte;
373	scr2rgb = byte3_rgb;	373	scr2rgb = byte3_rgb;
374	if (align)	374	if (align)
375	pixelbytes = 4;	-
376	else	-
377	pixelbytes = 3;	-
378	break;	-
379	case 32:	-
380	rgb2scr = rgb_4byte;	-
381	scr2rgb = byte4_rgb;	-
382	pixelbytes = 4;	375	pixelbytes = 4;
-		376	else
-		377	pixelbytes = 3;
383	break;	378	break;
-		379	case 32:
-		380	rgb2scr = rgb_4byte;
-		381	scr2rgb = byte4_rgb;
-		382	pixelbytes = 4;
-		383	break;
384	default:	384	default:
385	panic("Unsupported bpp");	385	panic("Unsupported bpp");
386	}	386	}
387		387
388	unsigned int fbsize = scan * y;	388	unsigned int fbsize = scan * y;
389		389
390	/* Map the framebuffer */	390	/* Map the framebuffer */
391	fbaddress = (uint8_t *) hw_map((uintptr_t) addr, fbsize);	391	fbaddress = (uint8_t *) hw_map((uintptr_t) addr, fbsize);
392		392
393	xres = x;	393	xres = x;
394	yres = y;	394	yres = y;
395	bitspp = bpp;	395	bitspp = bpp;
396	scanline = scan;	396	scanline = scan;
397		397
398	rows = y / FONT_SCANLINES;	398	rows = y / FONT_SCANLINES;
399	columns = x / COL_WIDTH;	399	columns = x / COL_WIDTH;
400		400
401	sysinfo_set_item_val("fb", NULL, true);	401	sysinfo_set_item_val("fb", NULL, true);
402	sysinfo_set_item_val("fb.kind", NULL, 1);	402	sysinfo_set_item_val("fb.kind", NULL, 1);
403	sysinfo_set_item_val("fb.width", NULL, xres);	403	sysinfo_set_item_val("fb.width", NULL, xres);
404	sysinfo_set_item_val("fb.height", NULL, yres);	404	sysinfo_set_item_val("fb.height", NULL, yres);
405	sysinfo_set_item_val("fb.bpp", NULL, bpp);	405	sysinfo_set_item_val("fb.bpp", NULL, bpp);
406	sysinfo_set_item_val("fb.bpp-align", NULL, align);	406	sysinfo_set_item_val("fb.bpp-align", NULL, align);
407	sysinfo_set_item_val("fb.scanline", NULL, scan);	407	sysinfo_set_item_val("fb.scanline", NULL, scan);
408	sysinfo_set_item_val("fb.address.physical", NULL, addr);	408	sysinfo_set_item_val("fb.address.physical", NULL, addr);
409	sysinfo_set_item_val("fb.invert-colors", NULL, invert_colors);	409	sysinfo_set_item_val("fb.invert-colors", NULL, invert_colors);
410		410
411	/* Allocate double buffer */	411	/* Allocate double buffer */
412	int totsize = scanline * yres;	412	int totsize = scanline * yres;
413	int pages = SIZE2FRAMES(totsize);	413	int pages = SIZE2FRAMES(totsize);
414	int order;	414	int order;
415	if (pages == 1)	415	if (pages == 1)
416	order = 0;	416	order = 0;
417	else	417	else
418	order = fnzb(pages-1)+1;	418	order = fnzb(pages-1)+1;
419		419
420	dbbuffer = frame_alloc(order,FRAME_ATOMIC \| FRAME_KA);	420	dbbuffer = frame_alloc(order,FRAME_ATOMIC \| FRAME_KA);
421	if (!dbbuffer)	421	if (!dbbuffer)
422	printf("Failed to allocate scroll buffer.\n");	422	printf("Failed to allocate scroll buffer.\n");
423	dboffset = 0;	423	dboffset = 0;
424		424
425	/* Initialized blank line */	425	/* Initialized blank line */
426	blankline = (uint8_t *) malloc(ROW_BYTES, FRAME_ATOMIC);	426	blankline = (uint8_t *) malloc(ROW_BYTES, FRAME_ATOMIC);
427	if (!blankline)	427	if (!blankline)
428	panic("Failed to allocate blank line for framebuffer.");	428	panic("Failed to allocate blank line for framebuffer.");
429	for (y=0; y < FONT_SCANLINES; y++) {	429	for (y=0; y < FONT_SCANLINES; y++) {
430	for (x=0; x < xres; x++) {	430	for (x=0; x < xres; x++) {
431	(*rgb2scr)(&blankline[POINTPOS(x,y)], COLOR(BGCOLOR));	431	(*rgb2scr)(&blankline[POINTPOS(x,y)], COLOR(BGCOLOR));
432	}	432	}
433	}	433	}
434		434
435	clear_screen();	435	clear_screen();
436		436
437	/* Update size of screen to match text area */	437	/* Update size of screen to match text area */
438	yres = rows * FONT_SCANLINES;	438	yres = rows * FONT_SCANLINES;
439		439
440	draw_logo(xres - helenos_width, 0);	440	draw_logo(xres - helenos_width, 0);
441	invert_cursor();	441	invert_cursor();
442		442
443	chardev_initialize("fb", &framebuffer, &fb_ops);	443	chardev_initialize("fb", &framebuffer, &fb_ops);
444	stdout = &framebuffer;	444	stdout = &framebuffer;
445		445
446	}	446	}
447		447
448	/** @}	448	/** @}
449	*/	449	*/
450		450

Subversion Repositories HelenOS

(root)/branches/dd/kernel/genarch/src/fb/fb.c @ 4688 – Rev 1875 → 1888