|
|
|
|
/*
|
|
|
|
|
* (C) Copyright 2002
|
|
|
|
|
* Daniel Engstr<EFBFBD>m, Omicron Ceti AB, <daniel@omicron.se>
|
|
|
|
|
*
|
|
|
|
|
* See file CREDITS for list of people who contributed to this
|
|
|
|
|
* project.
|
|
|
|
|
*
|
|
|
|
|
* This program is free software; you can redistribute it and/or
|
|
|
|
|
* modify it under the terms of the GNU General Public License as
|
|
|
|
|
* published by the Free Software Foundation; either version 2 of
|
|
|
|
|
* the License, or (at your option) any later version.
|
|
|
|
|
*
|
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
|
*
|
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
|
|
|
|
|
* MA 02111-1307 USA
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#include <common.h>
|
|
|
|
|
#include <pci.h>
|
|
|
|
|
#include <stdio_dev.h>
|
|
|
|
|
#include <i8042.h>
|
|
|
|
|
#include <asm/ptrace.h>
|
|
|
|
|
#include <asm/realmode.h>
|
|
|
|
|
#include <asm/io.h>
|
|
|
|
|
#include <asm/pci.h>
|
|
|
|
|
|
|
|
|
|
/* basic textmode I/O from linux kernel */
|
|
|
|
|
static char *vidmem = (char *)0xb8000;
|
|
|
|
|
static int vidport;
|
|
|
|
|
static int lines, cols;
|
|
|
|
|
static int orig_x, orig_y;
|
|
|
|
|
|
|
|
|
|
static void beep(int dur)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
outb_p(3, 0x61);
|
|
|
|
|
for (i = 0; i < 10*dur; i++)
|
|
|
|
|
udelay(1000);
|
|
|
|
|
|
|
|
|
|
outb_p(0, 0x61);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void scroll(void)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
|
|
|
|
memcpy(vidmem, vidmem + cols * 2, (lines - 1) * cols * 2);
|
|
|
|
|
for (i = (lines - 1) * cols * 2; i < lines * cols * 2; i += 2)
|
|
|
|
|
vidmem[i] = ' ';
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void __video_putc(const char c, int *x, int *y)
|
|
|
|
|
{
|
|
|
|
|
if (c == '\n') {
|
|
|
|
|
(*x) = 0;
|
|
|
|
|
if (++(*y) >= lines) {
|
|
|
|
|
scroll();
|
|
|
|
|
(*y)--;
|
|
|
|
|
}
|
|
|
|
|
} else if (c == '\b') {
|
|
|
|
|
if ((*x) != 0) {
|
|
|
|
|
--(*x);
|
|
|
|
|
vidmem[((*x) + cols * (*y)) * 2] = ' ';
|
|
|
|
|
}
|
|
|
|
|
} else if (c == '\r') {
|
|
|
|
|
(*x) = 0;
|
|
|
|
|
|
|
|
|
|
} else if (c == '\a') {
|
|
|
|
|
beep(3);
|
|
|
|
|
|
|
|
|
|
} else if (c == '\t') {
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
} else if (c == '\v') {
|
|
|
|
|
switch ((*x) % 8) {
|
|
|
|
|
case 0:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 7:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 6:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 5:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 4:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 3:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 2:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
case 1:
|
|
|
|
|
__video_putc(' ', x, y);
|
|
|
|
|
}
|
|
|
|
|
} else if (c == '\f') {
|
|
|
|
|
int i;
|
|
|
|
|
for (i = 0; i < lines * cols * 2; i += 2)
|
|
|
|
|
vidmem[i] = 0;
|
|
|
|
|
(*x) = 0;
|
|
|
|
|
(*y) = 0;
|
|
|
|
|
} else {
|
|
|
|
|
vidmem[((*x) + cols * (*y)) * 2] = c;
|
|
|
|
|
if (++(*x) >= cols) {
|
|
|
|
|
(*x) = 0;
|
|
|
|
|
if (++(*y) >= lines) {
|
|
|
|
|
scroll();
|
|
|
|
|
(*y)--;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void video_putc(const char c)
|
|
|
|
|
{
|
|
|
|
|
int x,y,pos;
|
|
|
|
|
|
|
|
|
|
x = orig_x;
|
|
|
|
|
y = orig_y;
|
|
|
|
|
|
|
|
|
|
__video_putc(c, &x, &y);
|
|
|
|
|
|
|
|
|
|
orig_x = x;
|
|
|
|
|
orig_y = y;
|
|
|
|
|
|
|
|
|
|
pos = (x + cols * y) * 2; /* Update cursor position */
|
|
|
|
|
outb_p(14, vidport);
|
|
|
|
|
outb_p(0xff & (pos >> 9), vidport+1);
|
|
|
|
|
outb_p(15, vidport);
|
|
|
|
|
outb_p(0xff & (pos >> 1), vidport+1);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void video_puts(const char *s)
|
|
|
|
|
{
|
|
|
|
|
int x,y,pos;
|
|
|
|
|
char c;
|
|
|
|
|
|
|
|
|
|
x = orig_x;
|
|
|
|
|
y = orig_y;
|
|
|
|
|
|
|
|
|
|
while ((c = *s++) != '\0')
|
|
|
|
|
__video_putc(c, &x, &y);
|
|
|
|
|
|
|
|
|
|
orig_x = x;
|
|
|
|
|
orig_y = y;
|
|
|
|
|
|
|
|
|
|
pos = (x + cols * y) * 2; /* Update cursor position */
|
|
|
|
|
outb_p(14, vidport);
|
|
|
|
|
outb_p(0xff & (pos >> 9), vidport+1);
|
|
|
|
|
outb_p(15, vidport);
|
|
|
|
|
outb_p(0xff & (pos >> 1), vidport+1);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int video_init(void)
|
|
|
|
|
{
|
|
|
|
|
u16 pos;
|
|
|
|
|
|
|
|
|
|
static struct stdio_dev vga_dev;
|
|
|
|
|
static struct stdio_dev kbd_dev;
|
|
|
|
|
|
|
|
|
|
vidmem = (char *) 0xb8000;
|
|
|
|
|
vidport = 0x3d4;
|
|
|
|
|
|
|
|
|
|
lines = 25;
|
|
|
|
|
cols = 80;
|
|
|
|
|
|
|
|
|
|
outb_p(14, vidport);
|
|
|
|
|
pos = inb_p(vidport+1);
|
|
|
|
|
pos <<= 8;
|
|
|
|
|
outb_p(15, vidport);
|
|
|
|
|
pos |= inb_p(vidport+1);
|
|
|
|
|
|
|
|
|
|
orig_x = pos%cols;
|
|
|
|
|
orig_y = pos/cols;
|
|
|
|
|
|
|
|
|
|
#if 0
|
|
|
|
|
printf("pos %x %d %d\n", pos, orig_x, orig_y);
|
|
|
|
|
#endif
|
|
|
|
|
if (orig_y > lines)
|
|
|
|
|
orig_x = orig_y =0;
|
|
|
|
|
|
|
|
|
|
memset(&vga_dev, 0, sizeof(vga_dev));
|
|
|
|
|
strcpy(vga_dev.name, "vga");
|
|
|
|
|
vga_dev.ext = 0;
|
|
|
|
|
vga_dev.flags = DEV_FLAGS_OUTPUT | DEV_FLAGS_SYSTEM;
|
|
|
|
|
vga_dev.putc = video_putc; /* 'putc' function */
|
|
|
|
|
vga_dev.puts = video_puts; /* 'puts' function */
|
|
|
|
|
vga_dev.tstc = NULL; /* 'tstc' function */
|
|
|
|
|
vga_dev.getc = NULL; /* 'getc' function */
|
|
|
|
|
|
|
|
|
|
if (stdio_register(&vga_dev) == 0)
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
if (i8042_kbd_init())
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
memset(&kbd_dev, 0, sizeof(kbd_dev));
|
|
|
|
|
strcpy(kbd_dev.name, "kbd");
|
|
|
|
|
kbd_dev.ext = 0;
|
|
|
|
|
kbd_dev.flags = DEV_FLAGS_INPUT | DEV_FLAGS_SYSTEM;
|
|
|
|
|
kbd_dev.putc = NULL; /* 'putc' function */
|
|
|
|
|
kbd_dev.puts = NULL; /* 'puts' function */
|
|
|
|
|
kbd_dev.tstc = i8042_tstc; /* 'tstc' function */
|
|
|
|
|
kbd_dev.getc = i8042_getc; /* 'getc' function */
|
|
|
|
|
|
|
|
|
|
if (stdio_register(&kbd_dev) == 0)
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
int drv_video_init(void)
|
|
|
|
|
{
|
|
|
|
|
if (video_bios_init())
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
return video_init();
|
|
|
|
|
}
|