/shark/trunk/drivers/cons/cons1.c |
---|
0,0 → 1,198 |
/* Project: OSLib |
* Description: The OS Construction Kit |
* Date: 1.6.2000 |
* Idea by: Luca Abeni & Gerardo Lamastra |
* |
* OSLib is an SO project aimed at developing a common, easy-to-use |
* low-level infrastructure for developing OS kernels and Embedded |
* Applications; it partially derives from the HARTIK project but it |
* currently is independently developed. |
* |
* OSLib is distributed under GPL License, and some of its code has |
* been derived from the Linux kernel source; also some important |
* ideas come from studying the DJGPP go32 extender. |
* |
* We acknowledge the Linux Community, Free Software Foundation, |
* D.J. Delorie and all the other developers who believe in the |
* freedom of software and ideas. |
* |
* For legalese, check out the included GPL license. |
*/ |
/* Console output functions */ |
#include <ll/i386/hw-data.h> |
#include <ll/i386/hw-instr.h> |
#include <ll/i386/cons.h> |
/* #include <xsys.h>*/ |
#include <ll/i386/string.h> |
#include <ll/i386/stdlib.h> |
#include <ll/i386/stdio.h> |
#include <ll/stdarg.h> |
FILE(Cons1); |
/* CGA compatible registers value */ |
#define CURSOR_POS_MSB 0x0E |
#define CURSOR_POS_LSB 0x0F |
#define CURSOR_START 0x0A |
#define CURSOR_END 0x0B |
/* CGA compatible registers */ |
#define CGA_INDEX_REG 0x3D4 |
#define CGA_DATA_REG 0x3D5 |
/* Standard tab size */ |
#define TAB_SIZE 8 |
/* Store bios settings */ |
static unsigned char bios_start,bios_end; |
BYTE bios_x, bios_y, bios_attr; |
/* MG */ |
extern int cons_columns; /* number of screen columns */ |
extern int cons_rows; /* number of screen rows */ |
/* Access directly to video & BIOS memory through linear addressing */ |
/* Active video page-buffer */ |
#define PAGE_SIZE 2048 |
int active_page = 0; |
int visual_page = 0; |
void bios_save(void) |
{ |
/* This function must be called to init CONSole output */ |
#if 1 |
/* MG */ |
cons_columns=lmempeekw((LIN_ADDR)0x0044a); |
cons_rows=lmempeekb((LIN_ADDR)0x00484)+1; |
bios_attr = lmempeekb((LIN_ADDR)0xB8000 + cons_columns * 2 -1); |
bios_x = lmempeekb((LIN_ADDR)0x00450); |
bios_y = lmempeekb((LIN_ADDR)0x00451); |
bios_end = lmempeekb((LIN_ADDR)0x00460); |
bios_start = lmempeekb((LIN_ADDR)0x00461); |
active_page = visual_page = 0; |
#else |
LIN_ADDR p; |
p = (LIN_ADDR)(0xB8000 + 159); |
bios_attr = *p; |
p = (LIN_ADDR)0x00450; |
bios_x = *p; |
p = (LIN_ADDR)0x00451; |
bios_y = *p; |
p = (LIN_ADDR)0x00460; |
bios_end = *p; |
p = (LIN_ADDR)0x00461; |
bios_start = *p; |
active_page = visual_page = 0; |
#endif |
} |
void cursor(int start,int end) |
{ |
/* Same thing as above; Set cursor scan line */ |
outp(CGA_INDEX_REG, CURSOR_START); |
outp(CGA_DATA_REG, start); |
outp(CGA_INDEX_REG, CURSOR_END); |
outp(CGA_DATA_REG, end); |
} |
void bios_restore(void) |
{ |
lmempokeb((LIN_ADDR)0x00450,bios_x); |
lmempokeb((LIN_ADDR)0x00451,bios_y); |
place(bios_x,bios_y); |
cursor(bios_start, bios_end); |
} |
void place(int x,int y) |
{ |
unsigned short cursor_word = x + y*cons_columns + active_page*PAGE_SIZE; |
/* Set cursor position */ |
/* CGA is programmed writing first the Index register */ |
/* to specify what internal register we are accessing */ |
/* Then we load the Data register with the wanted val */ |
outp(CGA_INDEX_REG,CURSOR_POS_LSB); |
outp(CGA_DATA_REG,cursor_word & 0xFF); |
outp(CGA_INDEX_REG,CURSOR_POS_MSB); |
outp(CGA_DATA_REG,(cursor_word >> 8) & 0xFF); |
/* Adjust temporary cursor bios position */ |
bios_x = x; |
bios_y = y; |
} |
void _scroll(char attr,int x1,int y1,int x2,int y2) |
{ |
register int x,y; |
WORD xattr = attr << 8,w; |
LIN_ADDR v = (LIN_ADDR)(0xB8000 + active_page*(2*PAGE_SIZE)); |
for (y = y1+1; y <= y2; y++) |
for (x = x1; x <= x2; x++) { |
w = lmempeekw((LIN_ADDR)(v + 2*(y*cons_columns+x))); |
lmempokew((LIN_ADDR)(v + 2*((y-1)*cons_columns+x)),w); |
} |
for (x = x1; x <= x2; x++) |
lmempokew((LIN_ADDR)(v + 2*((y-1)*cons_columns+x)),xattr); |
} |
void scroll(void) |
{ |
_scroll(bios_attr,0,0,(cons_columns-1),(cons_rows-1)); |
} |
void cputc(char c) |
{ |
static unsigned short scan_x,x,y; |
LIN_ADDR v = (LIN_ADDR)(0xB8000 + active_page*(2*PAGE_SIZE)); |
x = bios_x; |
y = bios_y; |
switch (c) { |
case '\t' : x += 8; |
if (x >= cons_columns) { |
x = 0; |
if (y == (cons_rows-1)) scroll(); |
else y++; |
} else { |
scan_x = 0; |
while ((scan_x+8) < x) scan_x += 8; |
x = scan_x; |
} |
break; |
case '\n' : x = 0; |
if (y == (cons_rows-1)) scroll(); |
else y++; |
break; |
case '\b' : x--; |
lmempokeb((LIN_ADDR)(v + 2*(x + y*cons_columns)),' '); |
x++; |
break; |
default : lmempokeb((LIN_ADDR)(v + 2*(x + y*cons_columns)),c); |
x++; |
if (x > cons_columns) { |
x = 0; |
if (y == (cons_rows-1)) scroll(); |
else y++; |
} |
} |
place(x,y); |
} |
void cputs(char *s) |
{ |
char c; |
while (*s != '\0') { |
c = *s++; |
cputc(c); |
} |
} |
/shark/trunk/drivers/cons/cons2.c |
---|
0,0 → 1,134 |
/* Project: OSLib |
* Description: The OS Construction Kit |
* Date: 1.6.2000 |
* Idea by: Luca Abeni & Gerardo Lamastra |
* |
* OSLib is an SO project aimed at developing a common, easy-to-use |
* low-level infrastructure for developing OS kernels and Embedded |
* Applications; it partially derives from the HARTIK project but it |
* currently is independently developed. |
* |
* OSLib is distributed under GPL License, and some of its code has |
* been derived from the Linux kernel source; also some important |
* ideas come from studying the DJGPP go32 extender. |
* |
* We acknowledge the Linux Community, Free Software Foundation, |
* D.J. Delorie and all the other developers who believe in the |
* freedom of software and ideas. |
* |
* For legalese, check out the included GPL license. |
*/ |
/* Console output functions - part 2 */ |
#include <ll/i386/hw-data.h> |
#include <ll/i386/hw-instr.h> |
#include <ll/i386/cons.h> |
/* #include <xsys.h>*/ |
#include <ll/i386/string.h> |
#include <ll/i386/stdlib.h> |
#include <ll/i386/stdio.h> |
#include <ll/stdarg.h> |
FILE(Cons2); |
#define PAGE_SIZE 2048 |
#define PAGE_MAX 8 |
/* CGA compatible registers */ |
#define CGA_INDEX_REG 0x3D4 |
#define CGA_DATA_REG 0x3D5 |
#define VIDEO_ADDRESS_MSB 0x0C |
#define VIDEO_ADDRESS_LSB 0x0D |
extern int active_page; |
extern int visual_page; |
static int curs_x[PAGE_MAX]; |
static int curs_y[PAGE_MAX]; |
extern BYTE bios_x, bios_y, bios_attr; |
/* MG */ |
int cons_columns; /* number of screen columns */ |
int cons_rows; /* number of screen rows */ |
void set_visual_page(int page) |
{ |
unsigned short page_offset; |
page_offset = page * PAGE_SIZE; |
visual_page = page; |
outp(CGA_INDEX_REG, VIDEO_ADDRESS_LSB); |
outp(CGA_DATA_REG, page_offset & 0xFF); |
outp(CGA_INDEX_REG, VIDEO_ADDRESS_MSB); |
outp(CGA_DATA_REG, (page_offset >> 8) & 0xFF); |
} |
void set_active_page(int page) |
{ |
curs_x[active_page] = bios_x; |
curs_y[active_page] = bios_y; |
bios_x = curs_x[page]; |
bios_y = curs_y[page]; |
active_page = page; |
} |
int get_visual_page(void) |
{ |
return(visual_page); |
} |
int get_active_page(void) |
{ |
return(active_page); |
} |
void _clear(char c,char attr,int x1,int y1,int x2,int y2) |
{ |
register int i,j; |
WORD w = attr; |
w <<= 8; w |= c; |
for (i = x1; i <= x2; i++) |
for (j = y1; j <= y2; j++) |
lmempokew((LIN_ADDR)(0xB8000 + 2*i+cons_columns*2*j + 2*active_page*PAGE_SIZE),w); |
place(x1,y1); |
bios_y = y1; |
bios_x = x1; |
} |
void clear() |
{ |
_clear(' ',bios_attr,0,0,(cons_columns-1),(cons_rows-1)); |
} |
void puts_xy(int x,int y,char attr,char *s) |
{ |
LIN_ADDR v = (LIN_ADDR)(0xB8000 + (cons_columns*y+x)*2 + active_page*(2*PAGE_SIZE)); |
while (*s != 0) { |
/* REMEMBER! This is a macro! v++ is out to prevent side-effects */ |
lmempokeb(v,*s); s++; v++; |
lmempokeb(v,attr); v++; |
} |
} |
void putc_xy(int x,int y,char attr,char c) |
{ |
LIN_ADDR v = (LIN_ADDR)(0xB8000 + (cons_columns*y+x)*2 + active_page*(2*PAGE_SIZE)); |
/* REMEMBER! This is a macro! v++ is out to prevent side-effects */ |
lmempokeb(v,c); v++; |
lmempokeb(v,attr); |
} |
char getc_xy(int x,int y,char *attr,char *c) |
{ |
LIN_ADDR v = (LIN_ADDR)(0xB8000 + (cons_columns*y+x)*2 + active_page*(2*PAGE_SIZE)); |
char r; |
r = lmempeekb(v); v++; |
if (c != NULL) *c = r; |
r = lmempeekb(v); |
if (attr != NULL) *attr = r; |
return(r); |
} |
/shark/trunk/drivers/cons/message.c |
---|
0,0 → 1,45 |
/* Project: OSLib |
* Description: The OS Construction Kit |
* Date: 1.6.2000 |
* Idea by: Luca Abeni & Gerardo Lamastra |
* |
* OSLib is an SO project aimed at developing a common, easy-to-use |
* low-level infrastructure for developing OS kernels and Embedded |
* Applications; it partially derives from the HARTIK project but it |
* currently is independently developed. |
* |
* OSLib is distributed under GPL License, and some of its code has |
* been derived from the Linux kernel source; also some important |
* ideas come from studying the DJGPP go32 extender. |
* |
* We acknowledge the Linux Community, Free Software Foundation, |
* D.J. Delorie and all the other developers who believe in the |
* freedom of software and ideas. |
* |
* For legalese, check out the included GPL license. |
*/ |
/* Console output functions */ |
#include <ll/i386/hw-data.h> |
#include <ll/i386/hw-instr.h> |
#include <ll/i386/cons.h> |
#include <ll/i386/string.h> |
#include <ll/i386/stdlib.h> |
#include <ll/i386/stdio.h> |
#include <ll/stdarg.h> |
FILE(message); |
int message(const char *fmt,...) |
{ |
static char cbuf[500]; |
va_list parms; |
int result; |
va_start(parms,fmt); |
result = vksprintf(cbuf,(char *)fmt,parms); |
va_end(parms); |
cputs(cbuf); |
return(result); |
} |
/shark/trunk/drivers/cons/cprintf.c |
---|
0,0 → 1,57 |
/* Project: OSLib |
* Description: The OS Construction Kit |
* Date: 1.6.2000 |
* Idea by: Luca Abeni & Gerardo Lamastra |
* |
* OSLib is an SO project aimed at developing a common, easy-to-use |
* low-level infrastructure for developing OS kernels and Embedded |
* Applications; it partially derives from the HARTIK project but it |
* currently is independently developed. |
* |
* OSLib is distributed under GPL License, and some of its code has |
* been derived from the Linux kernel source; also some important |
* ideas come from studying the DJGPP go32 extender. |
* |
* We acknowledge the Linux Community, Free Software Foundation, |
* D.J. Delorie and all the other developers who believe in the |
* freedom of software and ideas. |
* |
* For legalese, check out the included GPL license. |
*/ |
/* Console output functions */ |
#include <ll/i386/hw-data.h> |
#include <ll/i386/hw-instr.h> |
#include <ll/i386/cons.h> |
#include <ll/i386/string.h> |
#include <ll/i386/stdlib.h> |
#include <ll/i386/stdio.h> |
#include <ll/stdarg.h> |
FILE(cprintf); |
int cprintf(char *fmt,...) |
{ |
static char cbuf[500]; |
va_list parms; |
int result; |
va_start(parms,fmt); |
result = vsprintf(cbuf,fmt,parms); |
va_end(parms); |
cputs(cbuf); |
return(result); |
} |
int printf_xy(int x,int y,char attr,char *fmt,...) |
{ |
char cbuf[200]; |
va_list parms; |
int result; |
va_start(parms,fmt); |
result = vsprintf(cbuf,fmt,parms); |
va_end(parms); |
puts_xy(x,y,attr,cbuf); |
return(result); |
} |
/shark/trunk/drivers/cons/makefile |
---|
0,0 → 1,17 |
# The console Devices (console) |
ifndef BASE |
BASE=../.. |
endif |
OSLIB=$(BASE)/oslib |
include $(BASE)/config/config.mk |
LIBRARY = cons |
OBJS_PATH = $(BASE)/drivers/cons |
OBJS = cons1.o cons2.o message.o cprintf.o |
include $(BASE)/config/lib.mk |