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

Subversion Repositories HelenOS

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