WebSVN – HelenOS – Diff – /branches/network/uspace/srv/fb/ega.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.
 */
 
/** @defgroup egafb EGA framebuffer
 * @brief   HelenOS EGA framebuffer.
 * @ingroup fbs
 * @{
 */
/** @file
 */
 
#include <stdlib.h>
#include <unistd.h>
#include <align.h>
#include <async.h>
#include <ipc/ipc.h>
#include <errno.h>
#include <stdio.h>
#include <ddi.h>
#include <sysinfo.h>
#include <as.h>
#include <ipc/fb.h>
#include <ipc/ipc.h>
#include <ipc/ns.h>
#include <ipc/services.h>
#include <libarch/ddi.h>
#include <console/style.h>
#include <console/color.h>
#include <sys/types.h>
 
#include "ega.h"
#include "../console/screenbuffer.h"
#include "main.h"
 
#define MAX_SAVED_SCREENS 256
typedef struct saved_screen {
    short *data;
} saved_screen;
 
saved_screen saved_screens[MAX_SAVED_SCREENS];
 
#define EGA_IO_BASE ((ioport8_t *) 0x3d4)
#define EGA_IO_SIZE 2
 
int ega_normal_color = 0x0f;
int ega_inverted_color = 0xf0;
 
#define NORMAL_COLOR        ega_normal_color       
#define INVERTED_COLOR      ega_inverted_color
 
/* Allow only 1 connection */
static int client_connected = 0;
 
static unsigned int scr_width;
static unsigned int scr_height;
static uint8_t *scr_addr;
 
static unsigned int style;
 
static unsigned attr_to_ega_style(const attrs_t *a);
static uint8_t ega_glyph(wchar_t ch);
 
static void clrscr(void)
{
    int i;
   
    for (i = 0; i < scr_width * scr_height; i++) {
        scr_addr[i * 2] = ' ';
        scr_addr[i * 2 + 1] = style;
    }
}
 
static void cursor_goto(unsigned int row, unsigned int col)
{
    int ega_cursor;
 
    ega_cursor = col + scr_width * row;
   
    pio_write_8(EGA_IO_BASE, 0xe);
    pio_write_8(EGA_IO_BASE + 1, (ega_cursor >> 8) & 0xff);
    pio_write_8(EGA_IO_BASE, 0xf);
    pio_write_8(EGA_IO_BASE + 1, ega_cursor & 0xff);
}
 
static void cursor_disable(void)
{
    uint8_t stat;
 
    pio_write_8(EGA_IO_BASE, 0xa);
    stat = pio_read_8(EGA_IO_BASE + 1);
    pio_write_8(EGA_IO_BASE, 0xa);
    pio_write_8(EGA_IO_BASE + 1, stat | (1 << 5));
}
 
static void cursor_enable(void)
{
    uint8_t stat;
 
    pio_write_8(EGA_IO_BASE, 0xa);
    stat = pio_read_8(EGA_IO_BASE + 1);
    pio_write_8(EGA_IO_BASE, 0xa);
    pio_write_8(EGA_IO_BASE + 1, stat & (~(1 << 5)));
}
 
static void scroll(int rows)
{
    int i;
    if (rows > 0) {
        memmove(scr_addr, ((char *) scr_addr) + rows * scr_width * 2,
            scr_width * scr_height * 2 - rows * scr_width * 2);
        for (i = 0; i < rows * scr_width; i++)
            (((short *) scr_addr) + scr_width * scr_height - rows *
                scr_width)[i] = ((style << 8) + ' ');
    } else if (rows < 0) {
        memmove(((char *)scr_addr) - rows * scr_width * 2, scr_addr,
            scr_width * scr_height * 2 + rows * scr_width * 2);
        for (i = 0; i < -rows * scr_width; i++)
            ((short *)scr_addr)[i] = ((style << 8 ) + ' ');
    }
}
 
static void printchar(wchar_t c, unsigned int row, unsigned int col)
{
    scr_addr[(row * scr_width + col) * 2] = ega_glyph(c);
    scr_addr[(row * scr_width + col) * 2 + 1] = style;
   
    cursor_goto(row, col + 1);
}
 
/** Draw text data to viewport.
 *
 * @param vport Viewport id
 * @param data  Text data.
 * @param x Leftmost column of the area.
 * @param y Topmost row of the area.
 * @param w Number of rows.
 * @param h Number of columns.
 */
static void draw_text_data(keyfield_t *data, unsigned int x,
    unsigned int y, unsigned int w, unsigned int h)
{
    unsigned int i, j;
    keyfield_t *field;
    uint8_t *dp;
 
    for (j = 0; j < h; j++) {
        for (i = 0; i < w; i++) {
            field = &data[j * w + i];
            dp = &scr_addr[2 * ((y + j) * scr_width + (x + i))];
 
            dp[0] = ega_glyph(field->character);
            dp[1] = attr_to_ega_style(&field->attrs);
        }
    }
}
 
static int save_screen(void)
{
    int i;
 
    for (i = 0; (i < MAX_SAVED_SCREENS) && (saved_screens[i].data); i++)
        ;
    if (i == MAX_SAVED_SCREENS)
        return EINVAL;
    if (!(saved_screens[i].data = malloc(2 * scr_width * scr_height)))
        return ENOMEM;
    memcpy(saved_screens[i].data, scr_addr, 2 * scr_width * scr_height);
 
    return i;
}
 
static int print_screen(int i)
{
    if (saved_screens[i].data)
        memcpy(scr_addr, saved_screens[i].data, 2 * scr_width *
            scr_height);
    else
        return EINVAL;
    return i;
}
 
static int style_to_ega_style(int style)
{
    unsigned int ega_style;
 
    switch (style) {
    case STYLE_NORMAL:
        ega_style = INVERTED_COLOR;
        break;
    case STYLE_EMPHASIS:
        ega_style = INVERTED_COLOR | 4;
        break;
    default:
        return INVERTED_COLOR;
    }
 
    return ega_style;
}
 
static unsigned int color_to_ega_style(int fg_color, int bg_color, int attr)
{
    unsigned int style;
 
    style = (fg_color & 7) | ((bg_color & 7) << 4);
    if (attr & CATTR_BRIGHT)
        style = style | 0x08;
 
    return style;
}
 
static unsigned int rgb_to_ega_style(uint32_t fg, uint32_t bg)
{
    return (fg > bg) ? NORMAL_COLOR : INVERTED_COLOR;
}
 
static unsigned attr_to_ega_style(const attrs_t *a)
{
    switch (a->t) {
    case at_style: return style_to_ega_style(a->a.s.style);
    case at_rgb: return rgb_to_ega_style(a->a.r.fg_color, a->a.r.bg_color);
    case at_idx: return color_to_ega_style(a->a.i.fg_color,
        a->a.i.bg_color, a->a.i.flags);
    default: return INVERTED_COLOR;
    }
}
 
static uint8_t ega_glyph(wchar_t ch)
{
    if (ch >= 0 && ch < 128)
        return ch;
 
    return '?';
}
 
static void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)
{
    int retval;
    ipc_callid_t callid;
    ipc_call_t call;
    wchar_t c;
    unsigned int row, col, w, h;
    int bg_color, fg_color, attr;
    uint32_t bg_rgb, fg_rgb;
    keyfield_t *interbuf = NULL;
    size_t intersize = 0;
    int i;
 
    if (client_connected) {
        ipc_answer_0(iid, ELIMIT);
        return;
    }
    client_connected = 1;
    ipc_answer_0(iid, EOK); /* Accept connection */
 
    while (1) {
        callid = async_get_call(&call);
        switch (IPC_GET_METHOD(call)) {
        case IPC_M_PHONE_HUNGUP:
            client_connected = 0;
            ipc_answer_0(callid, EOK);
            return; /* Exit thread */
        case IPC_M_SHARE_OUT:
            /* We accept one area for data interchange */
            intersize = IPC_GET_ARG2(call);
            if (intersize >= scr_width * scr_height *
                sizeof(*interbuf)) {
                receive_comm_area(callid, &call,
                    (void *) &interbuf);
                continue;
            }
            retval = EINVAL;
            break;
        case FB_DRAW_TEXT_DATA:
            col = IPC_GET_ARG1(call);
            row = IPC_GET_ARG2(call);
            w = IPC_GET_ARG3(call);
            h = IPC_GET_ARG4(call);
            if (!interbuf) {
                retval = EINVAL;
                break;
            }
            if (col + w > scr_width || row + h > scr_height) {
                retval = EINVAL;
                break;
            }
            draw_text_data(interbuf, col, row, w, h);
            retval = 0;
            break;
        case FB_GET_CSIZE:
            ipc_answer_2(callid, EOK, scr_height, scr_width);
            continue;
        case FB_CLEAR:
            clrscr();
            retval = 0;
            break;
        case FB_PUTCHAR:
            c = IPC_GET_ARG1(call);
            row = IPC_GET_ARG2(call);
            col = IPC_GET_ARG3(call);
            if (col >= scr_width || row >= scr_height) {
                retval = EINVAL;
                break;
            }
            printchar(c, row, col);
            retval = 0;
            break;
        case FB_CURSOR_GOTO:
            row = IPC_GET_ARG1(call);
            col = IPC_GET_ARG2(call);
            if (row >= scr_height || col >= scr_width) {
                retval = EINVAL;
                break;
            }
            cursor_goto(row, col);
            retval = 0;
            break;
        case FB_SCROLL:
            i = IPC_GET_ARG1(call);
            if (i > scr_height || i < -((int) scr_height)) {
                retval = EINVAL;
                break;
            }
            scroll(i);
            retval = 0;
            break;
        case FB_CURSOR_VISIBILITY:
            if (IPC_GET_ARG1(call))
                cursor_enable();
            else
                cursor_disable();
            retval = 0;
            break;
        case FB_SET_STYLE:
            style = style_to_ega_style(IPC_GET_ARG1(call));
            retval = 0;
            break;
        case FB_SET_COLOR:
            fg_color = IPC_GET_ARG1(call);
            bg_color = IPC_GET_ARG2(call);
            attr = IPC_GET_ARG3(call);
            style = color_to_ega_style(fg_color, bg_color, attr);
            retval = 0;
            break;
        case FB_SET_RGB_COLOR:
            fg_rgb = IPC_GET_ARG1(call);
            bg_rgb = IPC_GET_ARG2(call);
            style = rgb_to_ega_style(fg_rgb, bg_rgb);
            retval = 0;
            break;
        case FB_VP_DRAW_PIXMAP:
            i = IPC_GET_ARG2(call);
            retval = print_screen(i);
            break;
        case FB_VP2PIXMAP:
            retval = save_screen();
            break;
        case FB_DROP_PIXMAP:
            i = IPC_GET_ARG1(call);
            if (i >= MAX_SAVED_SCREENS) {
                retval = EINVAL;
                break;
            }
            if (saved_screens[i].data) {
                free(saved_screens[i].data);
                saved_screens[i].data = NULL;
            }
            retval = 0;
            break;
        case FB_SCREEN_YIELD:
        case FB_SCREEN_RECLAIM:
            retval = EOK;
            break;
        default:
            retval = EINVAL;
        }
        ipc_answer_0(callid, retval);
    }
}
 
int ega_init(void)
{
    void *ega_ph_addr;
    size_t sz;
 
    ega_ph_addr = (void *) sysinfo_value("fb.address.physical");
    scr_width = sysinfo_value("fb.width");
    scr_height = sysinfo_value("fb.height");
 
    if (sysinfo_value("fb.blinking")) {
        ega_normal_color &= 0x77;
        ega_inverted_color &= 0x77;
    }
 
    style = NORMAL_COLOR;
 
    iospace_enable(task_get_id(), (void *) EGA_IO_BASE, 2);
 
    sz = scr_width * scr_height * 2;
    scr_addr = as_get_mappable_page(sz);
 
    if (physmem_map(ega_ph_addr, scr_addr, ALIGN_UP(sz, PAGE_SIZE) >>
        PAGE_WIDTH, AS_AREA_READ | AS_AREA_WRITE) != 0)
        return -1;
 
    async_set_client_connection(ega_client_connection);
 
    return 0;
}
 
 
/**
 * @}
 */
 

Rev 4263	Rev 4327
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	/** @defgroup egafb EGA framebuffer	29	/** @defgroup egafb EGA framebuffer
30	* @brief HelenOS EGA framebuffer.	30	* @brief HelenOS EGA framebuffer.
31	* @ingroup fbs	31	* @ingroup fbs
32	* @{	32	* @{
33	*/	33	*/
34	/** @file	34	/** @file
35	*/	35	*/
36		36
37	#include <stdlib.h>	37	#include <stdlib.h>
38	#include <unistd.h>	38	#include <unistd.h>
39	#include <align.h>	39	#include <align.h>
40	#include <async.h>	40	#include <async.h>
41	#include <ipc/ipc.h>	41	#include <ipc/ipc.h>
42	#include <errno.h>	42	#include <errno.h>
43	#include <stdio.h>	43	#include <stdio.h>
44	#include <ddi.h>	44	#include <ddi.h>
45	#include <sysinfo.h>	45	#include <sysinfo.h>
46	#include <as.h>	46	#include <as.h>
47	#include <ipc/fb.h>	47	#include <ipc/fb.h>
48	#include <ipc/ipc.h>	48	#include <ipc/ipc.h>
49	#include <ipc/ns.h>	49	#include <ipc/ns.h>
50	#include <ipc/services.h>	50	#include <ipc/services.h>
51	#include <libarch/ddi.h>	51	#include <libarch/ddi.h>
52	#include <console/style.h>	52	#include <console/style.h>
53	#include <console/color.h>	53	#include <console/color.h>
54	#include <sys/types.h>	54	#include <sys/types.h>
55		55
56	#include "ega.h"	56	#include "ega.h"
57	#include "../console/screenbuffer.h"	57	#include "../console/screenbuffer.h"
58	#include "main.h"	58	#include "main.h"
59		59
60	#define MAX_SAVED_SCREENS 256	60	#define MAX_SAVED_SCREENS 256
61	typedef struct saved_screen {	61	typedef struct saved_screen {
62	short *data;	62	short *data;
63	} saved_screen;	63	} saved_screen;
64		64
65	saved_screen saved_screens[MAX_SAVED_SCREENS];	65	saved_screen saved_screens[MAX_SAVED_SCREENS];
66		66
67	#define EGA_IO_BASE ((ioport8_t *) 0x3d4)	67	#define EGA_IO_BASE ((ioport8_t *) 0x3d4)
68	#define EGA_IO_SIZE 2	68	#define EGA_IO_SIZE 2
69		69
70	int ega_normal_color = 0x0f;	70	int ega_normal_color = 0x0f;
71	int ega_inverted_color = 0xf0;	71	int ega_inverted_color = 0xf0;
72		72
73	#define NORMAL_COLOR ega_normal_color	73	#define NORMAL_COLOR ega_normal_color
74	#define INVERTED_COLOR ega_inverted_color	74	#define INVERTED_COLOR ega_inverted_color
75		75
76	/* Allow only 1 connection */	76	/* Allow only 1 connection */
77	static int client_connected = 0;	77	static int client_connected = 0;
78		78
79	static unsigned int scr_width;	79	static unsigned int scr_width;
80	static unsigned int scr_height;	80	static unsigned int scr_height;
81	static uint8_t *scr_addr;	81	static uint8_t *scr_addr;
82		82
83	static unsigned int style;	83	static unsigned int style;
84		84
85	static unsigned attr_to_ega_style(const attrs_t *a);	85	static unsigned attr_to_ega_style(const attrs_t *a);
86	static uint8_t ega_glyph(wchar_t ch);	86	static uint8_t ega_glyph(wchar_t ch);
87		87
88	static void clrscr(void)	88	static void clrscr(void)
89	{	89	{
90	int i;	90	int i;
91		91
92	for (i = 0; i < scr_width * scr_height; i++) {	92	for (i = 0; i < scr_width * scr_height; i++) {
93	scr_addr[i * 2] = ' ';	93	scr_addr[i * 2] = ' ';
94	scr_addr[i * 2 + 1] = style;	94	scr_addr[i * 2 + 1] = style;
95	}	95	}
96	}	96	}
97		97
98	static void cursor_goto(unsigned int row, unsigned int col)	98	static void cursor_goto(unsigned int row, unsigned int col)
99	{	99	{
100	int ega_cursor;	100	int ega_cursor;
101		101
102	ega_cursor = col + scr_width * row;	102	ega_cursor = col + scr_width * row;
103		103
104	pio_write_8(EGA_IO_BASE, 0xe);	104	pio_write_8(EGA_IO_BASE, 0xe);
105	pio_write_8(EGA_IO_BASE + 1, (ega_cursor >> 8) & 0xff);	105	pio_write_8(EGA_IO_BASE + 1, (ega_cursor >> 8) & 0xff);
106	pio_write_8(EGA_IO_BASE, 0xf);	106	pio_write_8(EGA_IO_BASE, 0xf);
107	pio_write_8(EGA_IO_BASE + 1, ega_cursor & 0xff);	107	pio_write_8(EGA_IO_BASE + 1, ega_cursor & 0xff);
108	}	108	}
109		109
110	static void cursor_disable(void)	110	static void cursor_disable(void)
111	{	111	{
112	uint8_t stat;	112	uint8_t stat;
113		113
114	pio_write_8(EGA_IO_BASE, 0xa);	114	pio_write_8(EGA_IO_BASE, 0xa);
115	stat = pio_read_8(EGA_IO_BASE + 1);	115	stat = pio_read_8(EGA_IO_BASE + 1);
116	pio_write_8(EGA_IO_BASE, 0xa);	116	pio_write_8(EGA_IO_BASE, 0xa);
117	pio_write_8(EGA_IO_BASE + 1, stat \| (1 << 5));	117	pio_write_8(EGA_IO_BASE + 1, stat \| (1 << 5));
118	}	118	}
119		119
120	static void cursor_enable(void)	120	static void cursor_enable(void)
121	{	121	{
122	uint8_t stat;	122	uint8_t stat;
123		123
124	pio_write_8(EGA_IO_BASE, 0xa);	124	pio_write_8(EGA_IO_BASE, 0xa);
125	stat = pio_read_8(EGA_IO_BASE + 1);	125	stat = pio_read_8(EGA_IO_BASE + 1);
126	pio_write_8(EGA_IO_BASE, 0xa);	126	pio_write_8(EGA_IO_BASE, 0xa);
127	pio_write_8(EGA_IO_BASE + 1, stat & (~(1 << 5)));	127	pio_write_8(EGA_IO_BASE + 1, stat & (~(1 << 5)));
128	}	128	}
129		129
130	static void scroll(int rows)	130	static void scroll(int rows)
131	{	131	{
132	int i;	132	int i;
133	if (rows > 0) {	133	if (rows > 0) {
134	memmove(scr_addr, ((char ) scr_addr) + rows scr_width * 2,	134	memmove(scr_addr, ((char ) scr_addr) + rows scr_width * 2,
135	scr_width * scr_height * 2 - rows * scr_width * 2);	135	scr_width * scr_height * 2 - rows * scr_width * 2);
136	for (i = 0; i < rows * scr_width; i++)	136	for (i = 0; i < rows * scr_width; i++)
137	(((short ) scr_addr) + scr_width scr_height - rows *	137	(((short ) scr_addr) + scr_width scr_height - rows *
138	scr_width)[i] = ((style << 8) + ' ');	138	scr_width)[i] = ((style << 8) + ' ');
139	} else if (rows < 0) {	139	} else if (rows < 0) {
140	memmove(((char )scr_addr) - rows scr_width * 2, scr_addr,	140	memmove(((char )scr_addr) - rows scr_width * 2, scr_addr,
141	scr_width * scr_height * 2 + rows * scr_width * 2);	141	scr_width * scr_height * 2 + rows * scr_width * 2);
142	for (i = 0; i < -rows * scr_width; i++)	142	for (i = 0; i < -rows * scr_width; i++)
143	((short *)scr_addr)[i] = ((style << 8 ) + ' ');	143	((short *)scr_addr)[i] = ((style << 8 ) + ' ');
144	}	144	}
145	}	145	}
146		146
147	static void printchar(wchar_t c, unsigned int row, unsigned int col)	147	static void printchar(wchar_t c, unsigned int row, unsigned int col)
148	{	148	{
149	scr_addr[(row * scr_width + col) * 2] = ega_glyph(c);	149	scr_addr[(row * scr_width + col) * 2] = ega_glyph(c);
150	scr_addr[(row * scr_width + col) * 2 + 1] = style;	150	scr_addr[(row * scr_width + col) * 2 + 1] = style;
151		151
152	cursor_goto(row, col + 1);	152	cursor_goto(row, col + 1);
153	}	153	}
154		154
155	/** Draw text data to viewport.	155	/** Draw text data to viewport.
156	*	156	*
157	* @param vport Viewport id	157	* @param vport Viewport id
158	* @param data Text data.	158	* @param data Text data.
159	* @param x Leftmost column of the area.	159	* @param x Leftmost column of the area.
160	* @param y Topmost row of the area.	160	* @param y Topmost row of the area.
161	* @param w Number of rows.	161	* @param w Number of rows.
162	* @param h Number of columns.	162	* @param h Number of columns.
163	*/	163	*/
164	static void draw_text_data(keyfield_t *data, unsigned int x,	164	static void draw_text_data(keyfield_t *data, unsigned int x,
165	unsigned int y, unsigned int w, unsigned int h)	165	unsigned int y, unsigned int w, unsigned int h)
166	{	166	{
167	unsigned int i, j;	167	unsigned int i, j;
168	keyfield_t *field;	168	keyfield_t *field;
169	uint8_t *dp;	169	uint8_t *dp;
170		170
171	for (j = 0; j < h; j++) {	171	for (j = 0; j < h; j++) {
172	for (i = 0; i < w; i++) {	172	for (i = 0; i < w; i++) {
173	field = &data[j * w + i];	173	field = &data[j * w + i];
174	dp = &scr_addr[2 * ((y + j) * scr_width + (x + i))];	174	dp = &scr_addr[2 * ((y + j) * scr_width + (x + i))];
175		175
176	dp[0] = ega_glyph(field->character);	176	dp[0] = ega_glyph(field->character);
177	dp[1] = attr_to_ega_style(&field->attrs);	177	dp[1] = attr_to_ega_style(&field->attrs);
178	}	178	}
179	}	179	}
180	}	180	}
181		181
182	static int save_screen(void)	182	static int save_screen(void)
183	{	183	{
184	int i;	184	int i;
185		185
186	for (i = 0; (i < MAX_SAVED_SCREENS) && (saved_screens[i].data); i++)	186	for (i = 0; (i < MAX_SAVED_SCREENS) && (saved_screens[i].data); i++)
187	;	187	;
188	if (i == MAX_SAVED_SCREENS)	188	if (i == MAX_SAVED_SCREENS)
189	return EINVAL;	189	return EINVAL;
190	if (!(saved_screens[i].data = malloc(2 * scr_width * scr_height)))	190	if (!(saved_screens[i].data = malloc(2 * scr_width * scr_height)))
191	return ENOMEM;	191	return ENOMEM;
192	memcpy(saved_screens[i].data, scr_addr, 2 * scr_width * scr_height);	192	memcpy(saved_screens[i].data, scr_addr, 2 * scr_width * scr_height);
193		193
194	return i;	194	return i;
195	}	195	}
196		196
197	static int print_screen(int i)	197	static int print_screen(int i)
198	{	198	{
199	if (saved_screens[i].data)	199	if (saved_screens[i].data)
200	memcpy(scr_addr, saved_screens[i].data, 2 * scr_width *	200	memcpy(scr_addr, saved_screens[i].data, 2 * scr_width *
201	scr_height);	201	scr_height);
202	else	202	else
203	return EINVAL;	203	return EINVAL;
204	return i;	204	return i;
205	}	205	}
206		206
207	static int style_to_ega_style(int style)	207	static int style_to_ega_style(int style)
208	{	208	{
209	unsigned int ega_style;	209	unsigned int ega_style;
210		210
211	switch (style) {	211	switch (style) {
212	case STYLE_NORMAL:	212	case STYLE_NORMAL:
213	ega_style = INVERTED_COLOR;	213	ega_style = INVERTED_COLOR;
214	break;	214	break;
215	case STYLE_EMPHASIS:	215	case STYLE_EMPHASIS:
216	ega_style = INVERTED_COLOR \| 4;	216	ega_style = INVERTED_COLOR \| 4;
217	break;	217	break;
218	default:	218	default:
219	return INVERTED_COLOR;	219	return INVERTED_COLOR;
220	}	220	}
221		221
222	return ega_style;	222	return ega_style;
223	}	223	}
224		224
225	static unsigned int color_to_ega_style(int fg_color, int bg_color, int attr)	225	static unsigned int color_to_ega_style(int fg_color, int bg_color, int attr)
226	{	226	{
227	unsigned int style;	227	unsigned int style;
228		228
229	style = (fg_color & 7) \| ((bg_color & 7) << 4);	229	style = (fg_color & 7) \| ((bg_color & 7) << 4);
230	if (attr & CATTR_BRIGHT)	230	if (attr & CATTR_BRIGHT)
231	style = style \| 0x08;	231	style = style \| 0x08;
232		232
233	return style;	233	return style;
234	}	234	}
235		235
236	static unsigned int rgb_to_ega_style(uint32_t fg, uint32_t bg)	236	static unsigned int rgb_to_ega_style(uint32_t fg, uint32_t bg)
237	{	237	{
238	return (fg > bg) ? NORMAL_COLOR : INVERTED_COLOR;	238	return (fg > bg) ? NORMAL_COLOR : INVERTED_COLOR;
239	}	239	}
240		240
241	static unsigned attr_to_ega_style(const attrs_t *a)	241	static unsigned attr_to_ega_style(const attrs_t *a)
242	{	242	{
243	switch (a->t) {	243	switch (a->t) {
244	case at_style: return style_to_ega_style(a->a.s.style);	244	case at_style: return style_to_ega_style(a->a.s.style);
245	case at_rgb: return rgb_to_ega_style(a->a.r.fg_color, a->a.r.bg_color);	245	case at_rgb: return rgb_to_ega_style(a->a.r.fg_color, a->a.r.bg_color);
246	case at_idx: return color_to_ega_style(a->a.i.fg_color,	246	case at_idx: return color_to_ega_style(a->a.i.fg_color,
247	a->a.i.bg_color, a->a.i.flags);	247	a->a.i.bg_color, a->a.i.flags);
248	default: return INVERTED_COLOR;	248	default: return INVERTED_COLOR;
249	}	249	}
250	}	250	}
251		251
252	static uint8_t ega_glyph(wchar_t ch)	252	static uint8_t ega_glyph(wchar_t ch)
253	{	253	{
254	if (ch >= 0 && ch < 128)	254	if (ch >= 0 && ch < 128)
255	return ch;	255	return ch;
256		256
257	return '?';	257	return '?';
258	}	258	}
259		259
260	static void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)	260	static void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)
261	{	261	{
262	int retval;	262	int retval;
263	ipc_callid_t callid;	263	ipc_callid_t callid;
264	ipc_call_t call;	264	ipc_call_t call;
265	wchar_t c;	265	wchar_t c;
266	unsigned int row, col, w, h;	266	unsigned int row, col, w, h;
267	int bg_color, fg_color, attr;	267	int bg_color, fg_color, attr;
268	uint32_t bg_rgb, fg_rgb;	268	uint32_t bg_rgb, fg_rgb;
269	keyfield_t *interbuf = NULL;	269	keyfield_t *interbuf = NULL;
270	size_t intersize = 0;	270	size_t intersize = 0;
271	int i;	271	int i;
272		272
273	if (client_connected) {	273	if (client_connected) {
274	ipc_answer_0(iid, ELIMIT);	274	ipc_answer_0(iid, ELIMIT);
275	return;	275	return;
276	}	276	}
277	client_connected = 1;	277	client_connected = 1;
278	ipc_answer_0(iid, EOK); /* Accept connection */	278	ipc_answer_0(iid, EOK); /* Accept connection */
279		279
280	while (1) {	280	while (1) {
281	callid = async_get_call(&call);	281	callid = async_get_call(&call);
282	switch (IPC_GET_METHOD(call)) {	282	switch (IPC_GET_METHOD(call)) {
283	case IPC_M_PHONE_HUNGUP:	283	case IPC_M_PHONE_HUNGUP:
284	client_connected = 0;	284	client_connected = 0;
285	ipc_answer_0(callid, EOK);	285	ipc_answer_0(callid, EOK);
286	return; /* Exit thread */	286	return; /* Exit thread */
287	case IPC_M_SHARE_OUT:	287	case IPC_M_SHARE_OUT:
288	/* We accept one area for data interchange */	288	/* We accept one area for data interchange */
289	intersize = IPC_GET_ARG2(call);	289	intersize = IPC_GET_ARG2(call);
290	if (intersize >= scr_width * scr_height *	290	if (intersize >= scr_width * scr_height *
291	sizeof(*interbuf)) {	291	sizeof(*interbuf)) {
292	receive_comm_area(callid, &call,	292	receive_comm_area(callid, &call,
293	(void *) &interbuf);	293	(void *) &interbuf);
294	continue;	294	continue;
295	}	295	}
296	retval = EINVAL;	296	retval = EINVAL;
297	break;	297	break;
298	case FB_DRAW_TEXT_DATA:	298	case FB_DRAW_TEXT_DATA:
299	col = IPC_GET_ARG1(call);	299	col = IPC_GET_ARG1(call);
300	row = IPC_GET_ARG2(call);	300	row = IPC_GET_ARG2(call);
301	w = IPC_GET_ARG3(call);	301	w = IPC_GET_ARG3(call);
302	h = IPC_GET_ARG4(call);	302	h = IPC_GET_ARG4(call);
303	if (!interbuf) {	303	if (!interbuf) {
304	retval = EINVAL;	304	retval = EINVAL;
305	break;	305	break;
306	}	306	}
307	if (col + w > scr_width \|\| row + h > scr_height) {	307	if (col + w > scr_width \|\| row + h > scr_height) {
308	retval = EINVAL;	308	retval = EINVAL;
309	break;	309	break;
310	}	310	}
311	draw_text_data(interbuf, col, row, w, h);	311	draw_text_data(interbuf, col, row, w, h);
312	retval = 0;	312	retval = 0;
313	break;	313	break;
314	case FB_GET_CSIZE:	314	case FB_GET_CSIZE:
315	ipc_answer_2(callid, EOK, scr_height, scr_width);	315	ipc_answer_2(callid, EOK, scr_height, scr_width);
316	continue;	316	continue;
317	case FB_CLEAR:	317	case FB_CLEAR:
318	clrscr();	318	clrscr();
319	retval = 0;	319	retval = 0;
320	break;	320	break;
321	case FB_PUTCHAR:	321	case FB_PUTCHAR:
322	c = IPC_GET_ARG1(call);	322	c = IPC_GET_ARG1(call);
323	row = IPC_GET_ARG2(call);	323	row = IPC_GET_ARG2(call);
324	col = IPC_GET_ARG3(call);	324	col = IPC_GET_ARG3(call);
325	if (col >= scr_width \|\| row >= scr_height) {	325	if (col >= scr_width \|\| row >= scr_height) {
326	retval = EINVAL;	326	retval = EINVAL;
327	break;	327	break;
328	}	328	}
329	printchar(c, row, col);	329	printchar(c, row, col);
330	retval = 0;	330	retval = 0;
331	break;	331	break;
332	case FB_CURSOR_GOTO:	332	case FB_CURSOR_GOTO:
333	row = IPC_GET_ARG1(call);	333	row = IPC_GET_ARG1(call);
334	col = IPC_GET_ARG2(call);	334	col = IPC_GET_ARG2(call);
335	if (row >= scr_height \|\| col >= scr_width) {	335	if (row >= scr_height \|\| col >= scr_width) {
336	retval = EINVAL;	336	retval = EINVAL;
337	break;	337	break;
338	}	338	}
339	cursor_goto(row, col);	339	cursor_goto(row, col);
340	retval = 0;	340	retval = 0;
341	break;	341	break;
342	case FB_SCROLL:	342	case FB_SCROLL:
343	i = IPC_GET_ARG1(call);	343	i = IPC_GET_ARG1(call);
344	if (i > scr_height \|\| i < -((int) scr_height)) {	344	if (i > scr_height \|\| i < -((int) scr_height)) {
345	retval = EINVAL;	345	retval = EINVAL;
346	break;	346	break;
347	}	347	}
348	scroll(i);	348	scroll(i);
349	retval = 0;	349	retval = 0;
350	break;	350	break;
351	case FB_CURSOR_VISIBILITY:	351	case FB_CURSOR_VISIBILITY:
352	if (IPC_GET_ARG1(call))	352	if (IPC_GET_ARG1(call))
353	cursor_enable();	353	cursor_enable();
354	else	354	else
355	cursor_disable();	355	cursor_disable();
356	retval = 0;	356	retval = 0;
357	break;	357	break;
358	case FB_SET_STYLE:	358	case FB_SET_STYLE:
359	style = style_to_ega_style(IPC_GET_ARG1(call));	359	style = style_to_ega_style(IPC_GET_ARG1(call));
360	retval = 0;	360	retval = 0;
361	break;	361	break;
362	case FB_SET_COLOR:	362	case FB_SET_COLOR:
363	fg_color = IPC_GET_ARG1(call);	363	fg_color = IPC_GET_ARG1(call);
364	bg_color = IPC_GET_ARG2(call);	364	bg_color = IPC_GET_ARG2(call);
365	attr = IPC_GET_ARG3(call);	365	attr = IPC_GET_ARG3(call);
366	style = color_to_ega_style(fg_color, bg_color, attr);	366	style = color_to_ega_style(fg_color, bg_color, attr);
367	retval = 0;	367	retval = 0;
368	break;	368	break;
369	case FB_SET_RGB_COLOR:	369	case FB_SET_RGB_COLOR:
370	fg_rgb = IPC_GET_ARG1(call);	370	fg_rgb = IPC_GET_ARG1(call);
371	bg_rgb = IPC_GET_ARG2(call);	371	bg_rgb = IPC_GET_ARG2(call);
372	style = rgb_to_ega_style(fg_rgb, bg_rgb);	372	style = rgb_to_ega_style(fg_rgb, bg_rgb);
373	retval = 0;	373	retval = 0;
374	break;	374	break;
375	case FB_VP_DRAW_PIXMAP:	375	case FB_VP_DRAW_PIXMAP:
376	i = IPC_GET_ARG2(call);	376	i = IPC_GET_ARG2(call);
377	retval = print_screen(i);	377	retval = print_screen(i);
378	break;	378	break;
379	case FB_VP2PIXMAP:	379	case FB_VP2PIXMAP:
380	retval = save_screen();	380	retval = save_screen();
381	break;	381	break;
382	case FB_DROP_PIXMAP:	382	case FB_DROP_PIXMAP:
383	i = IPC_GET_ARG1(call);	383	i = IPC_GET_ARG1(call);
384	if (i >= MAX_SAVED_SCREENS) {	384	if (i >= MAX_SAVED_SCREENS) {
385	retval = EINVAL;	385	retval = EINVAL;
386	break;	386	break;
387	}	387	}
388	if (saved_screens[i].data) {	388	if (saved_screens[i].data) {
389	free(saved_screens[i].data);	389	free(saved_screens[i].data);
390	saved_screens[i].data = NULL;	390	saved_screens[i].data = NULL;
391	}	391	}
392	retval = 0;	392	retval = 0;
393	break;	393	break;
-		394	case FB_SCREEN_YIELD:
-		395	case FB_SCREEN_RECLAIM:
-		396	retval = EOK;
394		397	break;
395	default:	398	default:
396	retval = EINVAL;	399	retval = EINVAL;
397	}	400	}
398	ipc_answer_0(callid, retval);	401	ipc_answer_0(callid, retval);
399	}	402	}
400	}	403	}
401		404
402	int ega_init(void)	405	int ega_init(void)
403	{	406	{
404	void *ega_ph_addr;	407	void *ega_ph_addr;
405	size_t sz;	408	size_t sz;
406		409
407	ega_ph_addr = (void *) sysinfo_value("fb.address.physical");	410	ega_ph_addr = (void *) sysinfo_value("fb.address.physical");
408	scr_width = sysinfo_value("fb.width");	411	scr_width = sysinfo_value("fb.width");
409	scr_height = sysinfo_value("fb.height");	412	scr_height = sysinfo_value("fb.height");
410		413
411	if (sysinfo_value("fb.blinking")) {	414	if (sysinfo_value("fb.blinking")) {
412	ega_normal_color &= 0x77;	415	ega_normal_color &= 0x77;
413	ega_inverted_color &= 0x77;	416	ega_inverted_color &= 0x77;
414	}	417	}
415		418
416	style = NORMAL_COLOR;	419	style = NORMAL_COLOR;
417		420
418	iospace_enable(task_get_id(), (void *) EGA_IO_BASE, 2);	421	iospace_enable(task_get_id(), (void *) EGA_IO_BASE, 2);
419		422
420	sz = scr_width * scr_height * 2;	423	sz = scr_width * scr_height * 2;
421	scr_addr = as_get_mappable_page(sz);	424	scr_addr = as_get_mappable_page(sz);
422		425
423	if (physmem_map(ega_ph_addr, scr_addr, ALIGN_UP(sz, PAGE_SIZE) >>	426	if (physmem_map(ega_ph_addr, scr_addr, ALIGN_UP(sz, PAGE_SIZE) >>
424	PAGE_WIDTH, AS_AREA_READ \| AS_AREA_WRITE) != 0)	427	PAGE_WIDTH, AS_AREA_READ \| AS_AREA_WRITE) != 0)
425	return -1;	428	return -1;
426		429
427	async_set_client_connection(ega_client_connection);	430	async_set_client_connection(ega_client_connection);
428		431
429	return 0;	432	return 0;
430	}	433	}
431		434
432		435
433	/**	436	/**
434	* @}	437	* @}
435	*/	438	*/
436		439

Subversion Repositories HelenOS

(root)/branches/network/uspace/srv/fb/ega.c – Rev 4263 → 4327