WebSVN – HelenOS-historic – Diff – /uspace/trunk/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.
 */
#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 "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_ADDRESS 0x3d4
#define EGA_IO_SIZE 2
 
typedef unsigned char u8;
typedef unsigned short u16;
typedef unsigned int u32;
 
 
/* Allow only 1 connection */
static int client_connected = 0;
 
static unsigned int scr_width;
static unsigned int scr_height;
static char *scr_addr;
 
static unsigned int style = 0x1e;
 
static inline void outb(u16 port, u8 b)
{
    asm volatile ("outb %0, %1\n" :: "a" (b), "d" (port));
}
 
static inline void outw(u16 port, u16 w)
{
    asm volatile ("outw %0, %1\n" :: "a" (w), "d" (port));
}
 
static inline void outl(u16 port, u32 l)
{
    asm volatile ("outl %0, %1\n" :: "a" (l), "d" (port));
}
 
static inline u8 inb(u16 port)
{
    u8 val;
 
    asm volatile ("inb %1, %0 \n" : "=a" (val) : "d"(port));
    return val;
}
 
static inline u16 inw(u16 port)
{
    u16 val;
 
    asm volatile ("inw %1, %0 \n" : "=a" (val) : "d"(port));
    return val;
}
 
static inline u32 inl(u16 port)
{
    u32 val;
 
    asm volatile ("inl %1, %0 \n" : "=a" (val) : "d"(port));
    return val;
}
 
 
 
 
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;
   
    outb(EGA_IO_ADDRESS    , 0xe);
    outb(EGA_IO_ADDRESS + 1, (ega_cursor >>8) & 0xff);
    outb(EGA_IO_ADDRESS    , 0xf);
    outb(EGA_IO_ADDRESS + 1, ega_cursor & 0xff);
}
 
static void cursor_disable(void)
{
    u8 stat;
    outb(EGA_IO_ADDRESS , 0xa);
    stat=inb(EGA_IO_ADDRESS + 1);
    outb(EGA_IO_ADDRESS , 0xa);
    outb(EGA_IO_ADDRESS +1 ,stat | (1<<5) );
}
 
static void cursor_enable(void)
{
    u8 stat;
    outb(EGA_IO_ADDRESS , 0xa);
    stat=inb(EGA_IO_ADDRESS + 1);
    outb(EGA_IO_ADDRESS , 0xa);
    outb(EGA_IO_ADDRESS +1 ,stat & (~(1<<5)) );
}
 
static void scroll(int rows)
{
    int i;
    if (rows > 0) {
        memcpy (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) {
 
        memcpy (((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(char c, unsigned int row, unsigned int col)
{
    scr_addr[(row*scr_width + col)*2] = c;
    scr_addr[(row*scr_width + col)*2+1] = style;
   
    cursor_goto(row,col+1);
}
 
static void draw_text_data(keyfield_t *data)
{
    int i;
 
    for (i=0; i < scr_width*scr_height; i++) {
        scr_addr[i*2] = data[i].character;
        if (data[i].style.fg_color > data[i].style.bg_color)
            scr_addr[i*2+1] = 0x1e;
        else
            scr_addr[i*2+1] = 0xe1;
    }
}
 
static int save_screen(void)
{
    int i;
    short *mem;
    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 void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)
{
    int retval;
    ipc_callid_t callid;
    ipc_call_t call;
    char c;
    unsigned int row, col;
    int bgcolor,fgcolor;
    keyfield_t *interbuf = NULL;
    size_t intersize = 0;
    int i;
 
    if (client_connected) {
        ipc_answer_fast(iid, ELIMIT, 0,0);
        return;
    }
    client_connected = 1;
    ipc_answer_fast(iid, 0, 0, 0); /* Accept connection */
 
    while (1) {
        callid = async_get_call(&call);
        switch (IPC_GET_METHOD(call)) {
        case IPC_M_PHONE_HUNGUP:
            client_connected = 0;
            ipc_answer_fast(callid,0,0,0);
            return; /* Exit thread */
        case IPC_M_AS_AREA_SEND:
            /* 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:
            if (!interbuf) {
                retval = EINVAL;
                break;
            }
            draw_text_data(interbuf);
            retval = 0;
            break;
        case FB_GET_CSIZE:
            ipc_answer_fast(callid, 0, 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:
            fgcolor = IPC_GET_ARG1(call);
            bgcolor = IPC_GET_ARG2(call);
            if (fgcolor > bgcolor)
                style = 0x1e;
            else
                style = 0xe1;
 
        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;
            }
            break;
 
        default:
            retval = ENOENT;
        }
        ipc_answer_fast(callid,retval,0,0);
    }
}
 
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");
    iospace_enable(task_get_id(),(void *)EGA_IO_ADDRESS,2);
 
    sz = scr_width*scr_height*2;
    scr_addr = as_get_mappable_page(sz);
 
    map_physmem(ega_ph_addr, scr_addr, ALIGN_UP(sz,PAGE_SIZE)>>PAGE_WIDTH,
            AS_AREA_READ | AS_AREA_WRITE);
 
    async_set_client_connection(ega_client_connection);
 
    return 0;
}
 
 

Rev 1564	Rev 1565
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	#include <stdlib.h>	28	#include <stdlib.h>
29	#include <unistd.h>	29	#include <unistd.h>
30	#include <align.h>	30	#include <align.h>
31	#include <async.h>	31	#include <async.h>
32	#include <ipc/ipc.h>	32	#include <ipc/ipc.h>
33	#include <errno.h>	33	#include <errno.h>
34	#include <stdio.h>	34	#include <stdio.h>
35	#include <ddi.h>	35	#include <ddi.h>
36	#include <sysinfo.h>	36	#include <sysinfo.h>
37	#include <as.h>	37	#include <as.h>
38	#include <ipc/fb.h>	38	#include <ipc/fb.h>
39	#include <ipc/ipc.h>	39	#include <ipc/ipc.h>
40	#include <ipc/ns.h>	40	#include <ipc/ns.h>
41	#include <ipc/services.h>	41	#include <ipc/services.h>
42		42
43	#include "ega.h"	43	#include "ega.h"
44	#include "../console/screenbuffer.h"	44	#include "../console/screenbuffer.h"
45	#include "main.h"	45	#include "main.h"
46		46
47	#define MAX_SAVED_SCREENS 256	47	#define MAX_SAVED_SCREENS 256
48	typedef struct saved_screen {	48	typedef struct saved_screen {
49	short *data;	49	short *data;
50	} saved_screen;	50	} saved_screen;
51		51
52	saved_screen saved_screens[MAX_SAVED_SCREENS];	52	saved_screen saved_screens[MAX_SAVED_SCREENS];
53		53
54		54
55	#define EGA_IO_ADDRESS 0x3d4	55	#define EGA_IO_ADDRESS 0x3d4
56	#define EGA_IO_SIZE 2	56	#define EGA_IO_SIZE 2
57		57
58	typedef unsigned char u8;	58	typedef unsigned char u8;
59	typedef unsigned short u16;	59	typedef unsigned short u16;
60	typedef unsigned int u32;	60	typedef unsigned int u32;
61		61
62		62
63	/* Allow only 1 connection */	63	/* Allow only 1 connection */
64	static int client_connected = 0;	64	static int client_connected = 0;
65		65
66	static unsigned int scr_width;	66	static unsigned int scr_width;
67	static unsigned int scr_height;	67	static unsigned int scr_height;
68	static char *scr_addr;	68	static char *scr_addr;
69		69
70	static unsigned int style = 0x1e;	70	static unsigned int style = 0x1e;
71		71
72	static inline void outb(u16 port, u8 b)	72	static inline void outb(u16 port, u8 b)
73	{	73	{
74	asm volatile ("outb %0, %1\n" :: "a" (b), "d" (port));	74	asm volatile ("outb %0, %1\n" :: "a" (b), "d" (port));
75	}	75	}
76		76
77	static inline void outw(u16 port, u16 w)	77	static inline void outw(u16 port, u16 w)
78	{	78	{
79	asm volatile ("outw %0, %1\n" :: "a" (w), "d" (port));	79	asm volatile ("outw %0, %1\n" :: "a" (w), "d" (port));
80	}	80	}
81		81
82	static inline void outl(u16 port, u32 l)	82	static inline void outl(u16 port, u32 l)
83	{	83	{
84	asm volatile ("outl %0, %1\n" :: "a" (l), "d" (port));	84	asm volatile ("outl %0, %1\n" :: "a" (l), "d" (port));
85	}	85	}
86		86
87	static inline u8 inb(u16 port)	87	static inline u8 inb(u16 port)
88	{	88	{
89	u8 val;	89	u8 val;
90		90
91	asm volatile ("inb %1, %0 \n" : "=a" (val) : "d"(port));	91	asm volatile ("inb %1, %0 \n" : "=a" (val) : "d"(port));
92	return val;	92	return val;
93	}	93	}
94		94
95	static inline u16 inw(u16 port)	95	static inline u16 inw(u16 port)
96	{	96	{
97	u16 val;	97	u16 val;
98		98
99	asm volatile ("inw %1, %0 \n" : "=a" (val) : "d"(port));	99	asm volatile ("inw %1, %0 \n" : "=a" (val) : "d"(port));
100	return val;	100	return val;
101	}	101	}
102		102
103	static inline u32 inl(u16 port)	103	static inline u32 inl(u16 port)
104	{	104	{
105	u32 val;	105	u32 val;
106		106
107	asm volatile ("inl %1, %0 \n" : "=a" (val) : "d"(port));	107	asm volatile ("inl %1, %0 \n" : "=a" (val) : "d"(port));
108	return val;	108	return val;
109	}	109	}
110		110
111		111
112		112
113		113
114	static void clrscr(void)	114	static void clrscr(void)
115	{	115	{
116	int i;	116	int i;
117		117
118	for (i=0; i < scr_width*scr_height; i++) {	118	for (i=0; i < scr_width*scr_height; i++) {
119	scr_addr[i*2] = ' ';	119	scr_addr[i*2] = ' ';
120	scr_addr[i*2+1] = style;	120	scr_addr[i*2+1] = style;
121	}	121	}
122	}	122	}
123		123
124	static void cursor_goto(unsigned int row, unsigned int col)	124	static void cursor_goto(unsigned int row, unsigned int col)
125	{	125	{
126	int ega_cursor;	126	int ega_cursor;
127		127
128	ega_cursor=col+scr_width*row;	128	ega_cursor=col+scr_width*row;
129		129
130	outb(EGA_IO_ADDRESS , 0xe);	130	outb(EGA_IO_ADDRESS , 0xe);
131	outb(EGA_IO_ADDRESS + 1, (ega_cursor >>8) & 0xff);	131	outb(EGA_IO_ADDRESS + 1, (ega_cursor >>8) & 0xff);
132	outb(EGA_IO_ADDRESS , 0xf);	132	outb(EGA_IO_ADDRESS , 0xf);
133	outb(EGA_IO_ADDRESS + 1, ega_cursor & 0xff);	133	outb(EGA_IO_ADDRESS + 1, ega_cursor & 0xff);
134	}	134	}
135		135
136	static void cursor_disable(void)	136	static void cursor_disable(void)
137	{	137	{
138	u8 stat;	138	u8 stat;
139	outb(EGA_IO_ADDRESS , 0xa);	139	outb(EGA_IO_ADDRESS , 0xa);
140	stat=inb(EGA_IO_ADDRESS + 1);	140	stat=inb(EGA_IO_ADDRESS + 1);
141	outb(EGA_IO_ADDRESS , 0xa);	141	outb(EGA_IO_ADDRESS , 0xa);
142	outb(EGA_IO_ADDRESS +1 ,stat \| (1<<5) );	142	outb(EGA_IO_ADDRESS +1 ,stat \| (1<<5) );
143	}	143	}
144		144
145	static void cursor_enable(void)	145	static void cursor_enable(void)
146	{	146	{
147	u8 stat;	147	u8 stat;
148	outb(EGA_IO_ADDRESS , 0xa);	148	outb(EGA_IO_ADDRESS , 0xa);
149	stat=inb(EGA_IO_ADDRESS + 1);	149	stat=inb(EGA_IO_ADDRESS + 1);
150	outb(EGA_IO_ADDRESS , 0xa);	150	outb(EGA_IO_ADDRESS , 0xa);
151	outb(EGA_IO_ADDRESS +1 ,stat & (~(1<<5)) );	151	outb(EGA_IO_ADDRESS +1 ,stat & (~(1<<5)) );
152	}	152	}
153		153
154	static void scroll(int rows)	154	static void scroll(int rows)
155	{	155	{
156	int i;	156	int i;
157	if (rows > 0) {	157	if (rows > 0) {
158	memcpy(scr_addr,((char )scr_addr) + rows scr_width * 2, scr_width * scr_height * 2 - rows * scr_width * 2);	158	memcpy (scr_addr,((char )scr_addr) + rows scr_width * 2, scr_width * scr_height * 2 - rows * scr_width * 2);
159	for(i = 0; i < rows * scr_width ; i ++)	159	for (i = 0; i < rows * scr_width ; i ++)
160	(((short )scr_addr) + scr_width scr_height - rows * scr_width) [i] = ((style << 8) + ' ');	160	(((short )scr_addr) + scr_width scr_height - rows * scr_width) [i] = ((style << 8) + ' ');
161	} else if (rows < 0) {	161	} else if (rows < 0) {
162		162
163	memcpy(((char )scr_addr) - rows scr_width * 2 ,scr_addr ,scr_width * scr_height * 2 + rows * scr_width * 2);	163	memcpy (((char )scr_addr) - rows scr_width * 2 ,scr_addr ,scr_width * scr_height * 2 + rows * scr_width * 2);
164	for( i = 0; i < - rows * scr_width ; i++)	164	for (i = 0; i < - rows * scr_width ; i++)
165	((short *)scr_addr) [i] = ((style << 8 ) + ' ');	165	((short *)scr_addr) [i] = ((style << 8 ) + ' ');
166	}	166	}
167	}	167	}
168		168
169	static void printchar(char c, unsigned int row, unsigned int col)	169	static void printchar(char c, unsigned int row, unsigned int col)
170	{	170	{
171	scr_addr[(rowscr_width + col)2] = c;	171	scr_addr[(rowscr_width + col)2] = c;
172	scr_addr[(rowscr_width + col)2+1] = style;	172	scr_addr[(rowscr_width + col)2+1] = style;
173		173
174	cursor_goto(row,col+1);	174	cursor_goto(row,col+1);
175	}	175	}
176		176
177	static void draw_text_data(keyfield_t *data)	177	static void draw_text_data(keyfield_t *data)
178	{	178	{
179	int i;	179	int i;
180		180
181	for (i=0; i < scr_width*scr_height; i++) {	181	for (i=0; i < scr_width*scr_height; i++) {
182	scr_addr[i*2] = data[i].character;	182	scr_addr[i*2] = data[i].character;
183	if (data[i].style.fg_color > data[i].style.bg_color)	183	if (data[i].style.fg_color > data[i].style.bg_color)
184	scr_addr[i*2+1] = 0x1e;	184	scr_addr[i*2+1] = 0x1e;
185	else	185	else
186	scr_addr[i*2+1] = 0xe1;	186	scr_addr[i*2+1] = 0xe1;
187	}	187	}
188	}	188	}
189		189
190	static int save_screen(void)	190	static int save_screen(void)
191	{	191	{
192	int i;	192	int i;
193	short *mem;	193	short *mem;
194	for( i=0 ;( i < MAX_SAVED_SCREENS ) && (saved_screens[i].data); i++);	194	for (i=0 ;( i < MAX_SAVED_SCREENS ) && (saved_screens[i].data); i++);
195	if( i == MAX_SAVED_SCREENS)	195	if (i == MAX_SAVED_SCREENS)
196	return EINVAL;	196	return EINVAL;
197	if(!(saved_screens[i].data=malloc( 2 * scr_width*scr_height )))	197	if (!(saved_screens[i].data=malloc( 2 * scr_width*scr_height )))
198	return ENOMEM;	198	return ENOMEM;
199	memcpy(saved_screens[i].data,scr_addr, 2 * scr_width * scr_height )	199	memcpy (saved_screens[i].data ,scr_addr ,2 * scr_width * scr_height)
200	;	200	;
201	return i;	201	return i;
202	}	202	}
203		203
204	static int print_screen(int i)	204	static int print_screen(int i)
205	{	205	{
206	if(saved_screens[i].data)	206	if (saved_screens[i].data)
207	memcpy(scr_addr,saved_screens[i].data,2scr_widthscr_height);	207	memcpy (scr_addr,saved_screens[i].data, 2 * scr_width * scr_height);
208	else return EINVAL;	208	else return EINVAL;
209	return i;	209	return i;
210	}	210	}
211		211
212		212
213	static void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)	213	static void ega_client_connection(ipc_callid_t iid, ipc_call_t *icall)
214	{	214	{
215	int retval;	215	int retval;
216	ipc_callid_t callid;	216	ipc_callid_t callid;
217	ipc_call_t call;	217	ipc_call_t call;
218	char c;	218	char c;
219	unsigned int row, col;	219	unsigned int row, col;
220	int bgcolor,fgcolor;	220	int bgcolor,fgcolor;
221	keyfield_t *interbuf = NULL;	221	keyfield_t *interbuf = NULL;
222	size_t intersize = 0;	222	size_t intersize = 0;
223	int i;	223	int i;
224		224
225	if (client_connected) {	225	if (client_connected) {
226	ipc_answer_fast(iid, ELIMIT, 0,0);	226	ipc_answer_fast(iid, ELIMIT, 0,0);
227	return;	227	return;
228	}	228	}
229	client_connected = 1;	229	client_connected = 1;
230	ipc_answer_fast(iid, 0, 0, 0); /* Accept connection */	230	ipc_answer_fast(iid, 0, 0, 0); /* Accept connection */
231		231
232	while (1) {	232	while (1) {
233	callid = async_get_call(&call);	233	callid = async_get_call(&call);
234	switch (IPC_GET_METHOD(call)) {	234	switch (IPC_GET_METHOD(call)) {
235	case IPC_M_PHONE_HUNGUP:	235	case IPC_M_PHONE_HUNGUP:
236	client_connected = 0;	236	client_connected = 0;
237	ipc_answer_fast(callid,0,0,0);	237	ipc_answer_fast(callid,0,0,0);
238	return; /* Exit thread */	238	return; /* Exit thread */
239	case IPC_M_AS_AREA_SEND:	239	case IPC_M_AS_AREA_SEND:
240	/* We accept one area for data interchange */	240	/* We accept one area for data interchange */
241	intersize = IPC_GET_ARG2(call);	241	intersize = IPC_GET_ARG2(call);
242	if (intersize >= scr_widthscr_heightsizeof(*interbuf)) {	242	if (intersize >= scr_widthscr_heightsizeof(*interbuf)) {
243	receive_comm_area(callid,&call,(void **)&interbuf);	243	receive_comm_area(callid,&call,(void **)&interbuf);
244	continue;	244	continue;
245	}	245	}
246	retval = EINVAL;	246	retval = EINVAL;
247	break;	247	break;
248	case FB_DRAW_TEXT_DATA:	248	case FB_DRAW_TEXT_DATA:
249	if (!interbuf) {	249	if (!interbuf) {
250	retval = EINVAL;	250	retval = EINVAL;
251	break;	251	break;
252	}	252	}
253	draw_text_data(interbuf);	253	draw_text_data(interbuf);
254	retval = 0;	254	retval = 0;
255	break;	255	break;
256	case FB_GET_CSIZE:	256	case FB_GET_CSIZE:
257	ipc_answer_fast(callid, 0, scr_height, scr_width);	257	ipc_answer_fast(callid, 0, scr_height, scr_width);
258	continue;	258	continue;
259	case FB_CLEAR:	259	case FB_CLEAR:
260	clrscr();	260	clrscr();
261	retval = 0;	261	retval = 0;
262	break;	262	break;
263	case FB_PUTCHAR:	263	case FB_PUTCHAR:
264	c = IPC_GET_ARG1(call);	264	c = IPC_GET_ARG1(call);
265	row = IPC_GET_ARG2(call);	265	row = IPC_GET_ARG2(call);
266	col = IPC_GET_ARG3(call);	266	col = IPC_GET_ARG3(call);
267	if (col >= scr_width \|\| row >= scr_height) {	267	if (col >= scr_width \|\| row >= scr_height) {
268	retval = EINVAL;	268	retval = EINVAL;
269	break;	269	break;
270	}	270	}
271	printchar(c,row,col);	271	printchar(c,row,col);
272	retval = 0;	272	retval = 0;
273	break;	273	break;
274	case FB_CURSOR_GOTO:	274	case FB_CURSOR_GOTO:
275	row = IPC_GET_ARG1(call);	275	row = IPC_GET_ARG1(call);
276	col = IPC_GET_ARG2(call);	276	col = IPC_GET_ARG2(call);
277	if (row >= scr_height \|\| col >= scr_width) {	277	if (row >= scr_height \|\| col >= scr_width) {
278	retval = EINVAL;	278	retval = EINVAL;
279	break;	279	break;
280	}	280	}
281	cursor_goto(row,col);	281	cursor_goto(row,col);
282	retval = 0;	282	retval = 0;
283	break;	283	break;
284	case FB_SCROLL:	284	case FB_SCROLL:
285	i = IPC_GET_ARG1(call);	285	i = IPC_GET_ARG1(call);
286	if (i > scr_height \|\| i < (- (int)scr_height)) {	286	if (i > scr_height \|\| i < (- (int)scr_height)) {
287	retval = EINVAL;	287	retval = EINVAL;
288	break;	288	break;
289	}	289	}
290	scroll(i);	290	scroll(i);
291	retval = 0;	291	retval = 0;
292	break;	292	break;
293	case FB_CURSOR_VISIBILITY:	293	case FB_CURSOR_VISIBILITY:
294	if(IPC_GET_ARG1(call))	294	if(IPC_GET_ARG1(call))
295	cursor_enable();	295	cursor_enable();
296	else	296	else
297	cursor_disable();	297	cursor_disable();
298	retval = 0;	298	retval = 0;
299	break;	299	break;
300	case FB_SET_STYLE:	300	case FB_SET_STYLE:
301	fgcolor = IPC_GET_ARG1(call);	301	fgcolor = IPC_GET_ARG1(call);
302	bgcolor = IPC_GET_ARG2(call);	302	bgcolor = IPC_GET_ARG2(call);
303	if (fgcolor > bgcolor)	303	if (fgcolor > bgcolor)
304	style = 0x1e;	304	style = 0x1e;
305	else	305	else
306	style = 0xe1;	306	style = 0xe1;
307		307
308	case FB_VP_DRAW_PIXMAP:	308	case FB_VP_DRAW_PIXMAP:
309	i = IPC_GET_ARG2(call);	309	i = IPC_GET_ARG2(call);
310	retval = print_screen(i);	310	retval = print_screen(i);
311	break;	311	break;
312	case FB_VP2PIXMAP:	312	case FB_VP2PIXMAP:
313	retval = save_screen();	313	retval = save_screen();
314	break;	314	break;
315	case FB_DROP_PIXMAP:	315	case FB_DROP_PIXMAP:
316	i = IPC_GET_ARG1(call);	316	i = IPC_GET_ARG1(call);
317	if (i >= MAX_SAVED_SCREENS) {	317	if (i >= MAX_SAVED_SCREENS) {
318	retval = EINVAL;	318	retval = EINVAL;
319	break;	319	break;
320	}	320	}
321	if (saved_screens[i].data) {	321	if (saved_screens[i].data) {
322	free(saved_screens[i].data);	322	free(saved_screens[i].data);
323	saved_screens[i].data = NULL;	323	saved_screens[i].data = NULL;
324	}	324	}
325	break;	325	break;
326		326
327	default:	327	default:
328	retval = ENOENT;	328	retval = ENOENT;
329	}	329	}
330	ipc_answer_fast(callid,retval,0,0);	330	ipc_answer_fast(callid,retval,0,0);
331	}	331	}
332	}	332	}
333		333
334	int ega_init(void)	334	int ega_init(void)
335	{	335	{
336	void *ega_ph_addr;	336	void *ega_ph_addr;
337	size_t sz;	337	size_t sz;
338		338
339		339
340	ega_ph_addr=(void *)sysinfo_value("fb.address.physical");	340	ega_ph_addr=(void *)sysinfo_value("fb.address.physical");
341	scr_width=sysinfo_value("fb.width");	341	scr_width=sysinfo_value("fb.width");
342	scr_height=sysinfo_value("fb.height");	342	scr_height=sysinfo_value("fb.height");
343	iospace_enable(task_get_id(),(void *)EGA_IO_ADDRESS,2);	343	iospace_enable(task_get_id(),(void *)EGA_IO_ADDRESS,2);
344		344
345	sz = scr_widthscr_height2;	345	sz = scr_widthscr_height2;
346	scr_addr = as_get_mappable_page(sz);	346	scr_addr = as_get_mappable_page(sz);
347		347
348	map_physmem(ega_ph_addr, scr_addr, ALIGN_UP(sz,PAGE_SIZE)>>PAGE_WIDTH,	348	map_physmem(ega_ph_addr, scr_addr, ALIGN_UP(sz,PAGE_SIZE)>>PAGE_WIDTH,
349	AS_AREA_READ \| AS_AREA_WRITE);	349	AS_AREA_READ \| AS_AREA_WRITE);
350		350
351	async_set_client_connection(ega_client_connection);	351	async_set_client_connection(ega_client_connection);
352		352
353	return 0;	353	return 0;
354	}	354	}
355		355
356		356

Subversion Repositories HelenOS-historic

(root)/uspace/trunk/fb/ega.c – Rev 1564 → 1565