/* $NetBSD: console.c,v 1.4 2008/04/28 20:23:18 martin Exp $ */
/*-
* Copyright (c) 2004, 2005 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by UCHIYAMA Yasushi.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. 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.
*
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``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 FOUNDATION OR CONTRIBUTORS
* 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 <sys/param.h>
#include <sys/systm.h>
#include <lib/libsa/stand.h>
#include "local.h"
void __putchar(int);
#define PUTCHAR __putchar /* "boot" hooks log staff. */
#include <machine/sbd.h>
#include "console.h"
struct cons cons;
void nullcursor(int, int);
void nullscroll(void);
void
console_init(void)
{
uint8_t nvsram_cons;
cons.cursor = nullcursor;
cons.scroll = nullscroll;
cons.cursor_enable = false;
cons.erace_previous_cursor = false;
switch (SBD_INFO->machine) {
case MACHINE_TR2:
/* untested */
nvsram_cons = *(volatile uint8_t *)0xbb023010;
switch (nvsram_cons) {
case 0x00:
cons.type = CONS_FB_KSEG2;
fb_set_addr(0xf0000000, 0x01000000, 0xbfc0ec00);
zskbd_set_addr(0xbb010000, 0xbb010004);
cons.init();
break;
case 0x01:
/* sio 1 (zs channel A) */
cons.type = CONS_SIO1;
zs_set_addr(0xbb011008, 0xbb01100c, 4915200);
cons.init();
break;
case 0x02:
/* sio 2 (zs channel B) */
cons.type = CONS_SIO2;
zs_set_addr(0xbb011000, 0xbb011004, 4915200);
cons.init();
break;
default:
goto rom_cons;
}
break;
case MACHINE_TR2A:
nvsram_cons = *(volatile uint8_t *)0xbe4932a0;
switch (nvsram_cons) {
case 0x80:
/* on-board FB on 360AD, 360ADII */
cons.type = CONS_FB_KSEG2;
fb_set_addr(0xf0000000, 0x01000000, 0xbfc0ec00);
zskbd_set_addr(0xbe480000, 0xbe480004);
cons.init();
break;
case 0x01:
/* sio 1 (zs channel A) */
cons.type = CONS_SIO1;
zs_set_addr(0xbe440008, 0xbe44000c, 4915200);
cons.init();
break;
case 0x02:
/* sio 2 (zs channel B) */
cons.type = CONS_SIO2;
zs_set_addr(0xbe440000, 0xbe440004, 4915200);
cons.init();
break;
default:
goto rom_cons;
}
break;
default:
rom_cons:
cons.getc = ROM_GETC;
cons.scan = rom_scan;
cons.putc = ROM_PUTC;
cons.init = cons_rom_init;
cons.scroll = cons_rom_scroll;
cons.type = CONS_ROM;
cons.init();
break;
}
}
void
console_cursor(bool on)
{
cons.cursor_enable = on;
}
enum console_type
console_type(void)
{
return cons.type;
}
void
PUTCHAR(int c)
{
int i;
if (cons.type == CONS_SIO1 || cons.type == CONS_SIO2) {
if (c == '\n')
cons.putc(0, 0, '\r');
cons.putc(0, 0, c);
return;
}
if (cons.cursor_enable && cons.erace_previous_cursor)
cons.cursor(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT);
switch (c) {
default:
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT, c);
if (++cons.x == CONS_WIDTH) {
cons.x = X_INIT;
cons.y++;
}
break;
case '\b':
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT, c);
cons.x = cons.x == X_INIT ? X_INIT : cons.x - 1;
if (cons.cursor_enable)
cons.putc(cons.x * ROM_FONT_WIDTH,
cons.y * ROM_FONT_HEIGHT, ' ');
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT, c);
break;
case '\t':
for (i = cons.x % 8; i < 8; i++) {
cons.putc(cons.x * ROM_FONT_WIDTH,
cons.y * ROM_FONT_HEIGHT, ' ');
if (++cons.x == CONS_WIDTH) {
cons.x = X_INIT;
if (++cons.y == CONS_HEIGHT)
cons.scroll();
}
}
break;
case '\r':
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT, c);
cons.x = X_INIT;
break;
case '\n':
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT,
'\r');
cons.putc(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT, c);
cons.x = X_INIT;
cons.y++;
break;
case 2: /* Ctrl-b */
if (--cons.x < X_INIT)
cons.x = X_INIT;
break;
case 6: /* Ctrl-f */
if (++cons.x >= CONS_WIDTH)
cons.x = CONS_WIDTH;
break;
case 11:/* Ctrl-k */
for (i = cons.x; i < CONS_WIDTH; i++)
cons.putc(i * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT,
' ');
break;
}
if (cons.y == CONS_HEIGHT)
cons.scroll();
if (cons.cursor_enable) {
cons.cursor(cons.x * ROM_FONT_WIDTH, cons.y * ROM_FONT_HEIGHT);
cons.erace_previous_cursor = true;
} else {
cons.erace_previous_cursor = false;
}
}
int
getchar(void)
{
return cons.getc();
}
int
cnscan(void)
{
return cons.scan();
}
void
nullcursor(int x, int y)
{
/* place holder */
}
void
nullscroll(void)
{
/* place holder */
}