246 lines
6.0 KiB
C
246 lines
6.0 KiB
C
/* Public Domain Curses */
|
|
/* This file is BSD licensed, Copyright 2011 secunet AG */
|
|
|
|
#include "lppdc.h"
|
|
#include <libpayload.h>
|
|
|
|
/* ACS definitions originally by jshumate@wrdis01.robins.af.mil -- these
|
|
match code page 437 and compatible pages (CP850, CP852, etc.) */
|
|
|
|
#ifdef CHTYPE_LONG
|
|
|
|
# define A(x) ((chtype)x | A_ALTCHARSET)
|
|
|
|
chtype acs_map[128] =
|
|
{
|
|
A(0), A(1), A(2), A(3), A(4), A(5), A(6), A(7), A(8), A(9), A(10),
|
|
A(11), A(12), A(13), A(14), A(15), A(16), A(17), A(18), A(19),
|
|
A(20), A(21), A(22), A(23), A(24), A(25), A(26), A(27), A(28),
|
|
A(29), A(30), A(31), ' ', '!', '"', '#', '$', '%', '&', '\'', '(',
|
|
')', '*',
|
|
|
|
A(0x1a), A(0x1b), A(0x18), A(0x19),
|
|
|
|
'/',
|
|
|
|
0xdb,
|
|
|
|
'1', '2', '3', '4', '5', '6', '7', '8', '9', ':', ';', '<', '=',
|
|
'>', '?', '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J',
|
|
'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
|
|
'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
|
|
|
|
A(0x04), 0xb1,
|
|
|
|
'b', 'c', 'd', 'e',
|
|
|
|
0xf8, 0xf1, 0xb0, A(0x0f), 0xd9, 0xbf, 0xda, 0xc0, 0xc5, 0x2d, 0x2d,
|
|
0xc4, 0x2d, 0x5f, 0xc3, 0xb4, 0xc1, 0xc2, 0xb3, 0xf3, 0xf2, 0xe3,
|
|
0xd8, 0x9c, 0xf9,
|
|
|
|
A(127)
|
|
};
|
|
|
|
# undef A
|
|
|
|
#endif
|
|
|
|
/* See terminfo(5). */
|
|
chtype fallback_acs_map[128] =
|
|
{
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', '>', '<', '^', 'v', ' ',
|
|
'#', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
' ', ' ', ' ', ' ', ' ', ' ', ' ', ' ',
|
|
'+', ':', ' ', ' ', ' ', ' ', '\\', '#',
|
|
'#', '#', '+', '+', '+', '+', '+', '~',
|
|
'-', '-', '-', '_', '+', '+', '+', '+',
|
|
'|', '<', '>', '*', '!', 'f', 'o', ' ',
|
|
};
|
|
|
|
#if CONFIG(LP_SERIAL_CONSOLE)
|
|
#if CONFIG(LP_SERIAL_ACS_FALLBACK)
|
|
chtype serial_acs_map[128];
|
|
#else
|
|
/* See acsc of vt100. */
|
|
chtype serial_acs_map[128] =
|
|
{
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
'`', 'a', 0, 0, 0, 0, 'f', 'g',
|
|
0, 0, 'j', 'k', 'l', 'm', 'n', 'o',
|
|
'p', 'q', 'r', 's', 't', 'u', 'v', 'w',
|
|
'x', 'y', 'z', '{', '|', '}', '~', 0,
|
|
};
|
|
#endif
|
|
#endif
|
|
|
|
#if CONFIG(LP_VIDEO_CONSOLE)
|
|
/* See acsc of linux. */
|
|
chtype console_acs_map[128] =
|
|
{
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, '\020', '\021', '\030', '\031', 0,
|
|
'\333', 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
0, 0, 0, 0, 0, 0, 0, 0,
|
|
'\004', '\261', 0, 0, 0, 0, '\370', '\361',
|
|
'\260', '\316', '\331', '\277', '\332', '\300', '\305', '~',
|
|
'\304', '\304', '\304', '_', '\303', '\264', '\301', '\302',
|
|
'\263', '\363', '\362', '\343', '\330', '\234', '\376', 0,
|
|
};
|
|
#endif
|
|
|
|
/* position hardware cursor at (y, x) */
|
|
|
|
void PDC_gotoyx(int row, int col)
|
|
{
|
|
PDC_LOG(("PDC_gotoyx() - called: row %d col %d\n", row, col));
|
|
|
|
#if CONFIG(LP_SERIAL_CONSOLE)
|
|
serial_set_cursor(col, row);
|
|
#endif
|
|
#if CONFIG(LP_VIDEO_CONSOLE)
|
|
video_console_set_cursor(col, row);
|
|
#endif
|
|
}
|
|
|
|
/* update the given physical line to look like the corresponding line in
|
|
curscr */
|
|
|
|
void PDC_transform_line(int lineno, int x, int len, const chtype *srcp)
|
|
{
|
|
int j, ch, attr;
|
|
|
|
PDC_LOG(("PDC_transform_line() - called: line %d, len %d, curses_flags %d\n", lineno, len, curses_flags));
|
|
|
|
#if CONFIG(LP_SERIAL_CONSOLE)
|
|
int serial_is_bold = 0;
|
|
int serial_is_reverse = 0;
|
|
int serial_is_altcharset = 0;
|
|
int serial_cur_pair = 0;
|
|
int need_altcharset;
|
|
|
|
if (curses_flags & F_ENABLE_SERIAL) {
|
|
serial_end_bold();
|
|
serial_end_altcharset();
|
|
serial_set_cursor(lineno, x);
|
|
}
|
|
#endif
|
|
|
|
for (j = 0; j < len; j++)
|
|
{
|
|
ch = srcp[j];
|
|
attr = ch;
|
|
#if CONFIG(LP_SERIAL_CONSOLE)
|
|
if (curses_flags & F_ENABLE_SERIAL) {
|
|
if (attr & A_BOLD) {
|
|
if (!serial_is_bold) {
|
|
serial_start_bold();
|
|
serial_is_bold = 1;
|
|
}
|
|
} else {
|
|
if (serial_is_bold) {
|
|
serial_end_bold();
|
|
serial_is_bold = 0;
|
|
/* work around serial.c
|
|
* shortcoming:
|
|
*/
|
|
serial_is_reverse = 0;
|
|
serial_cur_pair = 0;
|
|
}
|
|
}
|
|
|
|
if (attr & A_REVERSE) {
|
|
if (!serial_is_reverse) {
|
|
serial_start_reverse();
|
|
serial_is_reverse = 1;
|
|
}
|
|
} else {
|
|
if (serial_is_reverse) {
|
|
serial_end_reverse();
|
|
serial_is_reverse = 0;
|
|
/* work around serial.c
|
|
* shortcoming:
|
|
*/
|
|
serial_is_bold = 0;
|
|
serial_cur_pair = 0;
|
|
}
|
|
}
|
|
|
|
need_altcharset = 0;
|
|
if (attr & A_ALTCHARSET) {
|
|
if (serial_acs_map[ch & 0x7f]) {
|
|
ch = serial_acs_map[ch & 0x7f];
|
|
need_altcharset = 1;
|
|
} else
|
|
ch = fallback_acs_map[ch & 0x7f];
|
|
}
|
|
if (need_altcharset && !serial_is_altcharset) {
|
|
serial_start_altcharset();
|
|
serial_is_altcharset = 1;
|
|
}
|
|
if (!need_altcharset && serial_is_altcharset) {
|
|
serial_end_altcharset();
|
|
serial_is_altcharset = 0;
|
|
}
|
|
|
|
if (serial_cur_pair != PAIR_NUMBER(attr)) {
|
|
short int fg, bg;
|
|
if (pair_content(PAIR_NUMBER(attr), &fg, &bg) == OK)
|
|
serial_set_color(fg, bg);
|
|
serial_cur_pair = PAIR_NUMBER(attr);
|
|
}
|
|
|
|
serial_putchar(ch & 0xff);
|
|
|
|
}
|
|
#endif
|
|
#if CONFIG(LP_VIDEO_CONSOLE)
|
|
unsigned char c = pdc_atrtab[srcp[j] >> PDC_ATTR_SHIFT];
|
|
|
|
if (curses_flags & F_ENABLE_CONSOLE) {
|
|
if (attr & A_ALTCHARSET) {
|
|
if (console_acs_map[ch & 0x7f])
|
|
ch = console_acs_map[ch & 0x7f];
|
|
else
|
|
ch = fallback_acs_map[ch & 0x7f];
|
|
}
|
|
|
|
/*
|
|
* FIXME: Somewhere along the line, the
|
|
* character value is getting sign-extented.
|
|
* For now grab just the 8 bit character,
|
|
* but this will break wide characters!
|
|
*/
|
|
video_console_putc(lineno, x + j, (c << 8) | ( ch & 0xff));
|
|
}
|
|
#endif
|
|
}
|
|
}
|