53e69c0c2a
Right now if applications want to use the mouse on the command line, they use sysmouse(4) and install a signal handler in the kernel to deliver signals when mouse events arrive. This conflicts with my plan to change to TERM=xterm, so implement proper VT200-style mouse input. Because mouse input is now streamed through the TTY, it means you can now SSH to another system on the console and use the mouse there as well. The disadvantage of the VT200 mouse protocol, is that it doesn't seem to generate events when moving the cursor. Only when pressing and releasing mouse buttons. There are different protocols as well, but this one seems to be most commonly supported. Reported by: Paul B. Mahol <onemda gmail com> Tested with: vim(1)
660 lines
18 KiB
C
660 lines
18 KiB
C
/*-
|
|
* Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
|
|
* All rights reserved.
|
|
*
|
|
* Copyright (c) 2008-2009 Ed Schouten <ed@FreeBSD.org>
|
|
* All rights reserved.
|
|
*
|
|
* 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 as
|
|
* the first lines of this file unmodified.
|
|
* 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 AUTHORS ``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 AUTHORS 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/cdefs.h>
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#include "opt_syscons.h"
|
|
#include "opt_teken.h"
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/module.h>
|
|
#include <sys/consio.h>
|
|
|
|
#if defined(__sparc64__) || defined(__powerpc__)
|
|
#include <machine/sc_machdep.h>
|
|
#else
|
|
#include <machine/pc/display.h>
|
|
#endif
|
|
|
|
#include <dev/syscons/syscons.h>
|
|
|
|
#include <teken/teken.h>
|
|
|
|
static void scteken_revattr(unsigned char, teken_attr_t *);
|
|
static unsigned int scteken_attr(const teken_attr_t *);
|
|
|
|
static sc_term_init_t scteken_init;
|
|
static sc_term_term_t scteken_term;
|
|
static sc_term_puts_t scteken_puts;
|
|
static sc_term_ioctl_t scteken_ioctl;
|
|
static sc_term_default_attr_t scteken_default_attr;
|
|
static sc_term_clear_t scteken_clear;
|
|
static sc_term_input_t scteken_input;
|
|
static void scteken_nop(void);
|
|
|
|
typedef struct {
|
|
teken_t ts_teken;
|
|
int ts_busy;
|
|
} teken_stat;
|
|
|
|
static teken_stat reserved_teken_stat;
|
|
|
|
static sc_term_sw_t sc_term_scteken = {
|
|
{ NULL, NULL },
|
|
"scteken", /* emulator name */
|
|
"teken terminal", /* description */
|
|
"*", /* matching renderer */
|
|
sizeof(teken_stat), /* softc size */
|
|
0,
|
|
scteken_init,
|
|
scteken_term,
|
|
scteken_puts,
|
|
scteken_ioctl,
|
|
(sc_term_reset_t *)scteken_nop,
|
|
scteken_default_attr,
|
|
scteken_clear,
|
|
(sc_term_notify_t *)scteken_nop,
|
|
scteken_input,
|
|
};
|
|
|
|
SCTERM_MODULE(scteken, sc_term_scteken);
|
|
|
|
static tf_bell_t scteken_bell;
|
|
static tf_cursor_t scteken_cursor;
|
|
static tf_putchar_t scteken_putchar;
|
|
static tf_fill_t scteken_fill;
|
|
static tf_copy_t scteken_copy;
|
|
static tf_param_t scteken_param;
|
|
static tf_respond_t scteken_respond;
|
|
|
|
static const teken_funcs_t scteken_funcs = {
|
|
.tf_bell = scteken_bell,
|
|
.tf_cursor = scteken_cursor,
|
|
.tf_putchar = scteken_putchar,
|
|
.tf_fill = scteken_fill,
|
|
.tf_copy = scteken_copy,
|
|
.tf_param = scteken_param,
|
|
.tf_respond = scteken_respond,
|
|
};
|
|
|
|
static int
|
|
scteken_init(scr_stat *scp, void **softc, int code)
|
|
{
|
|
teken_stat *ts;
|
|
teken_pos_t tp;
|
|
|
|
if (*softc == NULL) {
|
|
if (reserved_teken_stat.ts_busy)
|
|
return (EINVAL);
|
|
*softc = &reserved_teken_stat;
|
|
}
|
|
ts = *softc;
|
|
|
|
switch (code) {
|
|
case SC_TE_COLD_INIT:
|
|
++sc_term_scteken.te_refcount;
|
|
ts->ts_busy = 1;
|
|
/* FALLTHROUGH */
|
|
case SC_TE_WARM_INIT:
|
|
teken_init(&ts->ts_teken, &scteken_funcs, scp);
|
|
#ifndef TEKEN_UTF8
|
|
teken_set_8bit(&ts->ts_teken);
|
|
#endif /* !TEKEN_UTF8 */
|
|
#ifndef TEKEN_XTERM
|
|
teken_set_cons25(&ts->ts_teken);
|
|
#endif /* !TEKEN_XTERM */
|
|
|
|
tp.tp_row = scp->ysize;
|
|
tp.tp_col = scp->xsize;
|
|
teken_set_winsize(&ts->ts_teken, &tp);
|
|
|
|
if (scp->cursor_pos < scp->ysize * scp->xsize) {
|
|
/* Valid old cursor position. */
|
|
tp.tp_row = scp->cursor_pos / scp->xsize;
|
|
tp.tp_col = scp->cursor_pos % scp->xsize;
|
|
teken_set_cursor(&ts->ts_teken, &tp);
|
|
}
|
|
break;
|
|
}
|
|
|
|
return (0);
|
|
}
|
|
|
|
static int
|
|
scteken_term(scr_stat *scp, void **softc)
|
|
{
|
|
|
|
if (*softc == &reserved_teken_stat) {
|
|
*softc = NULL;
|
|
reserved_teken_stat.ts_busy = 0;
|
|
}
|
|
--sc_term_scteken.te_refcount;
|
|
|
|
return (0);
|
|
}
|
|
|
|
static void
|
|
scteken_puts(scr_stat *scp, u_char *buf, int len, int kernel)
|
|
{
|
|
teken_stat *ts = scp->ts;
|
|
teken_attr_t backup, kattr;
|
|
|
|
scp->sc->write_in_progress++;
|
|
if (kernel) {
|
|
/* Use special colors for kernel messages. */
|
|
backup = *teken_get_curattr(&ts->ts_teken);
|
|
scteken_revattr(SC_KERNEL_CONS_ATTR, &kattr);
|
|
teken_set_curattr(&ts->ts_teken, &kattr);
|
|
teken_input(&ts->ts_teken, buf, len);
|
|
teken_set_curattr(&ts->ts_teken, &backup);
|
|
} else {
|
|
/* Print user messages with regular colors. */
|
|
teken_input(&ts->ts_teken, buf, len);
|
|
}
|
|
scp->sc->write_in_progress--;
|
|
}
|
|
|
|
static int
|
|
scteken_ioctl(scr_stat *scp, struct tty *tp, u_long cmd, caddr_t data,
|
|
struct thread *td)
|
|
{
|
|
teken_stat *ts = scp->ts;
|
|
vid_info_t *vi;
|
|
unsigned int attr;
|
|
|
|
switch (cmd) {
|
|
case GIO_ATTR: /* get current attributes */
|
|
*(int*)data =
|
|
scteken_attr(teken_get_curattr(&ts->ts_teken));
|
|
return (0);
|
|
case CONS_GETINFO: /* get current (virtual) console info */
|
|
vi = (vid_info_t *)data;
|
|
if (vi->size != sizeof(struct vid_info))
|
|
return EINVAL;
|
|
|
|
attr = scteken_attr(teken_get_defattr(&ts->ts_teken));
|
|
vi->mv_norm.fore = attr & 0x0f;
|
|
vi->mv_norm.back = (attr >> 4) & 0x0f;
|
|
vi->mv_rev.fore = vi->mv_norm.back;
|
|
vi->mv_rev.back = vi->mv_norm.fore;
|
|
/*
|
|
* The other fields are filled by the upper routine. XXX
|
|
*/
|
|
return (ENOIOCTL);
|
|
}
|
|
|
|
return (ENOIOCTL);
|
|
}
|
|
|
|
static void
|
|
scteken_default_attr(scr_stat *scp, int color, int rev_color)
|
|
{
|
|
teken_stat *ts = scp->ts;
|
|
teken_attr_t ta;
|
|
|
|
scteken_revattr(color, &ta);
|
|
teken_set_defattr(&ts->ts_teken, &ta);
|
|
}
|
|
|
|
static void
|
|
scteken_clear(scr_stat *scp)
|
|
{
|
|
|
|
sc_move_cursor(scp, 0, 0);
|
|
sc_vtb_clear(&scp->vtb, scp->sc->scr_map[0x20], SC_NORM_ATTR << 8);
|
|
mark_all(scp);
|
|
}
|
|
|
|
static int
|
|
scteken_input(scr_stat *scp, int c, struct tty *tp)
|
|
{
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
static void
|
|
scteken_nop(void)
|
|
{
|
|
|
|
}
|
|
|
|
/*
|
|
* libteken routines.
|
|
*/
|
|
|
|
static const unsigned char fgcolors_normal[TC_NCOLORS] = {
|
|
FG_BLACK, FG_RED, FG_GREEN, FG_BROWN,
|
|
FG_BLUE, FG_MAGENTA, FG_CYAN, FG_LIGHTGREY,
|
|
};
|
|
|
|
static const unsigned char fgcolors_bold[TC_NCOLORS] = {
|
|
FG_DARKGREY, FG_LIGHTRED, FG_LIGHTGREEN, FG_YELLOW,
|
|
FG_LIGHTBLUE, FG_LIGHTMAGENTA, FG_LIGHTCYAN, FG_WHITE,
|
|
};
|
|
|
|
static const unsigned char bgcolors[TC_NCOLORS] = {
|
|
BG_BLACK, BG_RED, BG_GREEN, BG_BROWN,
|
|
BG_BLUE, BG_MAGENTA, BG_CYAN, BG_LIGHTGREY,
|
|
};
|
|
|
|
static void
|
|
scteken_revattr(unsigned char color, teken_attr_t *a)
|
|
{
|
|
teken_color_t fg, bg;
|
|
|
|
/*
|
|
* XXX: Reverse conversion of syscons to teken attributes. Not
|
|
* realiable. Maybe we should turn it into a 1:1 mapping one of
|
|
* these days?
|
|
*/
|
|
|
|
a->ta_format = 0;
|
|
a->ta_fgcolor = TC_WHITE;
|
|
a->ta_bgcolor = TC_BLACK;
|
|
|
|
#ifdef FG_BLINK
|
|
if (color & FG_BLINK) {
|
|
a->ta_format |= TF_BLINK;
|
|
color &= ~FG_BLINK;
|
|
}
|
|
#endif /* FG_BLINK */
|
|
|
|
for (fg = 0; fg < TC_NCOLORS; fg++) {
|
|
for (bg = 0; bg < TC_NCOLORS; bg++) {
|
|
if ((fgcolors_normal[fg] | bgcolors[bg]) == color) {
|
|
a->ta_fgcolor = fg;
|
|
a->ta_bgcolor = bg;
|
|
return;
|
|
}
|
|
|
|
if ((fgcolors_bold[fg] | bgcolors[bg]) == color) {
|
|
a->ta_fgcolor = fg;
|
|
a->ta_bgcolor = bg;
|
|
a->ta_format |= TF_BOLD;
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
static unsigned int
|
|
scteken_attr(const teken_attr_t *a)
|
|
{
|
|
unsigned int attr = 0;
|
|
teken_color_t fg, bg;
|
|
|
|
if (a->ta_format & TF_REVERSE) {
|
|
fg = teken_256to8(a->ta_bgcolor);
|
|
bg = teken_256to8(a->ta_fgcolor);
|
|
} else {
|
|
fg = teken_256to8(a->ta_fgcolor);
|
|
bg = teken_256to8(a->ta_bgcolor);
|
|
}
|
|
if (a->ta_format & TF_BOLD)
|
|
attr |= fgcolors_bold[fg];
|
|
else
|
|
attr |= fgcolors_normal[fg];
|
|
attr |= bgcolors[bg];
|
|
|
|
#ifdef FG_UNDERLINE
|
|
if (a->ta_format & TF_UNDERLINE)
|
|
attr |= FG_UNDERLINE;
|
|
#endif /* FG_UNDERLINE */
|
|
#ifdef FG_BLINK
|
|
if (a->ta_format & TF_BLINK)
|
|
attr |= FG_BLINK;
|
|
#endif /* FG_BLINK */
|
|
|
|
return (attr);
|
|
}
|
|
|
|
static void
|
|
scteken_bell(void *arg)
|
|
{
|
|
scr_stat *scp = arg;
|
|
|
|
sc_bell(scp, scp->bell_pitch, scp->bell_duration);
|
|
}
|
|
|
|
static void
|
|
scteken_cursor(void *arg, const teken_pos_t *p)
|
|
{
|
|
scr_stat *scp = arg;
|
|
|
|
sc_move_cursor(scp, p->tp_col, p->tp_row);
|
|
}
|
|
|
|
#ifdef TEKEN_UTF8
|
|
struct unicp437 {
|
|
uint16_t unicode_base;
|
|
uint8_t cp437_base;
|
|
uint8_t length;
|
|
};
|
|
|
|
static const struct unicp437 cp437table[] = {
|
|
{ 0x0020, 0x20, 0x5e }, { 0x00a0, 0x20, 0x00 },
|
|
{ 0x00a1, 0xad, 0x00 }, { 0x00a2, 0x9b, 0x00 },
|
|
{ 0x00a3, 0x9c, 0x00 }, { 0x00a5, 0x9d, 0x00 },
|
|
{ 0x00a7, 0x15, 0x00 }, { 0x00aa, 0xa6, 0x00 },
|
|
{ 0x00ab, 0xae, 0x00 }, { 0x00ac, 0xaa, 0x00 },
|
|
{ 0x00b0, 0xf8, 0x00 }, { 0x00b1, 0xf1, 0x00 },
|
|
{ 0x00b2, 0xfd, 0x00 }, { 0x00b5, 0xe6, 0x00 },
|
|
{ 0x00b6, 0x14, 0x00 }, { 0x00b7, 0xfa, 0x00 },
|
|
{ 0x00ba, 0xa7, 0x00 }, { 0x00bb, 0xaf, 0x00 },
|
|
{ 0x00bc, 0xac, 0x00 }, { 0x00bd, 0xab, 0x00 },
|
|
{ 0x00bf, 0xa8, 0x00 }, { 0x00c4, 0x8e, 0x01 },
|
|
{ 0x00c6, 0x92, 0x00 }, { 0x00c7, 0x80, 0x00 },
|
|
{ 0x00c9, 0x90, 0x00 }, { 0x00d1, 0xa5, 0x00 },
|
|
{ 0x00d6, 0x99, 0x00 }, { 0x00dc, 0x9a, 0x00 },
|
|
{ 0x00df, 0xe1, 0x00 }, { 0x00e0, 0x85, 0x00 },
|
|
{ 0x00e1, 0xa0, 0x00 }, { 0x00e2, 0x83, 0x00 },
|
|
{ 0x00e4, 0x84, 0x00 }, { 0x00e5, 0x86, 0x00 },
|
|
{ 0x00e6, 0x91, 0x00 }, { 0x00e7, 0x87, 0x00 },
|
|
{ 0x00e8, 0x8a, 0x00 }, { 0x00e9, 0x82, 0x00 },
|
|
{ 0x00ea, 0x88, 0x01 }, { 0x00ec, 0x8d, 0x00 },
|
|
{ 0x00ed, 0xa1, 0x00 }, { 0x00ee, 0x8c, 0x00 },
|
|
{ 0x00ef, 0x8b, 0x00 }, { 0x00f0, 0xeb, 0x00 },
|
|
{ 0x00f1, 0xa4, 0x00 }, { 0x00f2, 0x95, 0x00 },
|
|
{ 0x00f3, 0xa2, 0x00 }, { 0x00f4, 0x93, 0x00 },
|
|
{ 0x00f6, 0x94, 0x00 }, { 0x00f7, 0xf6, 0x00 },
|
|
{ 0x00f8, 0xed, 0x00 }, { 0x00f9, 0x97, 0x00 },
|
|
{ 0x00fa, 0xa3, 0x00 }, { 0x00fb, 0x96, 0x00 },
|
|
{ 0x00fc, 0x81, 0x00 }, { 0x00ff, 0x98, 0x00 },
|
|
{ 0x0192, 0x9f, 0x00 }, { 0x0393, 0xe2, 0x00 },
|
|
{ 0x0398, 0xe9, 0x00 }, { 0x03a3, 0xe4, 0x00 },
|
|
{ 0x03a6, 0xe8, 0x00 }, { 0x03a9, 0xea, 0x00 },
|
|
{ 0x03b1, 0xe0, 0x01 }, { 0x03b4, 0xeb, 0x00 },
|
|
{ 0x03b5, 0xee, 0x00 }, { 0x03bc, 0xe6, 0x00 },
|
|
{ 0x03c0, 0xe3, 0x00 }, { 0x03c3, 0xe5, 0x00 },
|
|
{ 0x03c4, 0xe7, 0x00 }, { 0x03c6, 0xed, 0x00 },
|
|
{ 0x03d5, 0xed, 0x00 }, { 0x2010, 0x2d, 0x00 },
|
|
{ 0x2014, 0x2d, 0x00 }, { 0x2018, 0x60, 0x00 },
|
|
{ 0x2019, 0x27, 0x00 }, { 0x201c, 0x22, 0x00 },
|
|
{ 0x201d, 0x22, 0x00 }, { 0x2022, 0x07, 0x00 },
|
|
{ 0x203c, 0x13, 0x00 }, { 0x207f, 0xfc, 0x00 },
|
|
{ 0x20a7, 0x9e, 0x00 }, { 0x20ac, 0xee, 0x00 },
|
|
{ 0x2126, 0xea, 0x00 }, { 0x2190, 0x1b, 0x00 },
|
|
{ 0x2191, 0x18, 0x00 }, { 0x2192, 0x1a, 0x00 },
|
|
{ 0x2193, 0x19, 0x00 }, { 0x2194, 0x1d, 0x00 },
|
|
{ 0x2195, 0x12, 0x00 }, { 0x21a8, 0x17, 0x00 },
|
|
{ 0x2202, 0xeb, 0x00 }, { 0x2208, 0xee, 0x00 },
|
|
{ 0x2211, 0xe4, 0x00 }, { 0x2212, 0x2d, 0x00 },
|
|
{ 0x2219, 0xf9, 0x00 }, { 0x221a, 0xfb, 0x00 },
|
|
{ 0x221e, 0xec, 0x00 }, { 0x221f, 0x1c, 0x00 },
|
|
{ 0x2229, 0xef, 0x00 }, { 0x2248, 0xf7, 0x00 },
|
|
{ 0x2261, 0xf0, 0x00 }, { 0x2264, 0xf3, 0x00 },
|
|
{ 0x2265, 0xf2, 0x00 }, { 0x2302, 0x7f, 0x00 },
|
|
{ 0x2310, 0xa9, 0x00 }, { 0x2320, 0xf4, 0x00 },
|
|
{ 0x2321, 0xf5, 0x00 }, { 0x2500, 0xc4, 0x00 },
|
|
{ 0x2502, 0xb3, 0x00 }, { 0x250c, 0xda, 0x00 },
|
|
{ 0x2510, 0xbf, 0x00 }, { 0x2514, 0xc0, 0x00 },
|
|
{ 0x2518, 0xd9, 0x00 }, { 0x251c, 0xc3, 0x00 },
|
|
{ 0x2524, 0xb4, 0x00 }, { 0x252c, 0xc2, 0x00 },
|
|
{ 0x2534, 0xc1, 0x00 }, { 0x253c, 0xc5, 0x00 },
|
|
{ 0x2550, 0xcd, 0x00 }, { 0x2551, 0xba, 0x00 },
|
|
{ 0x2552, 0xd5, 0x00 }, { 0x2553, 0xd6, 0x00 },
|
|
{ 0x2554, 0xc9, 0x00 }, { 0x2555, 0xb8, 0x00 },
|
|
{ 0x2556, 0xb7, 0x00 }, { 0x2557, 0xbb, 0x00 },
|
|
{ 0x2558, 0xd4, 0x00 }, { 0x2559, 0xd3, 0x00 },
|
|
{ 0x255a, 0xc8, 0x00 }, { 0x255b, 0xbe, 0x00 },
|
|
{ 0x255c, 0xbd, 0x00 }, { 0x255d, 0xbc, 0x00 },
|
|
{ 0x255e, 0xc6, 0x01 }, { 0x2560, 0xcc, 0x00 },
|
|
{ 0x2561, 0xb5, 0x00 }, { 0x2562, 0xb6, 0x00 },
|
|
{ 0x2563, 0xb9, 0x00 }, { 0x2564, 0xd1, 0x01 },
|
|
{ 0x2566, 0xcb, 0x00 }, { 0x2567, 0xcf, 0x00 },
|
|
{ 0x2568, 0xd0, 0x00 }, { 0x2569, 0xca, 0x00 },
|
|
{ 0x256a, 0xd8, 0x00 }, { 0x256b, 0xd7, 0x00 },
|
|
{ 0x256c, 0xce, 0x00 }, { 0x2580, 0xdf, 0x00 },
|
|
{ 0x2584, 0xdc, 0x00 }, { 0x2588, 0xdb, 0x00 },
|
|
{ 0x258c, 0xdd, 0x00 }, { 0x2590, 0xde, 0x00 },
|
|
{ 0x2591, 0xb0, 0x02 }, { 0x25a0, 0xfe, 0x00 },
|
|
{ 0x25ac, 0x16, 0x00 }, { 0x25b2, 0x1e, 0x00 },
|
|
{ 0x25ba, 0x10, 0x00 }, { 0x25bc, 0x1f, 0x00 },
|
|
{ 0x25c4, 0x11, 0x00 }, { 0x25cb, 0x09, 0x00 },
|
|
{ 0x25d8, 0x08, 0x00 }, { 0x25d9, 0x0a, 0x00 },
|
|
{ 0x263a, 0x01, 0x01 }, { 0x263c, 0x0f, 0x00 },
|
|
{ 0x2640, 0x0c, 0x00 }, { 0x2642, 0x0b, 0x00 },
|
|
{ 0x2660, 0x06, 0x00 }, { 0x2663, 0x05, 0x00 },
|
|
{ 0x2665, 0x03, 0x01 }, { 0x266a, 0x0d, 0x01 },
|
|
};
|
|
|
|
static void
|
|
scteken_get_cp437(teken_char_t *c, int *attr)
|
|
{
|
|
int min, mid, max;
|
|
|
|
min = 0;
|
|
max = (sizeof(cp437table) / sizeof(struct unicp437)) - 1;
|
|
|
|
if (*c < cp437table[0].unicode_base ||
|
|
*c > cp437table[max].unicode_base + cp437table[max].length)
|
|
goto bad;
|
|
|
|
while (max >= min) {
|
|
mid = (min + max) / 2;
|
|
if (*c < cp437table[mid].unicode_base) {
|
|
max = mid - 1;
|
|
} else if (*c > cp437table[mid].unicode_base +
|
|
cp437table[mid].length) {
|
|
min = mid + 1;
|
|
} else {
|
|
*c -= cp437table[mid].unicode_base;
|
|
*c += cp437table[mid].cp437_base;
|
|
return;
|
|
}
|
|
}
|
|
bad:
|
|
/* Character not present in CP437. */
|
|
*attr = (FG_RED|BG_BLACK) << 8;
|
|
*c = '?';
|
|
}
|
|
#endif /* TEKEN_UTF8 */
|
|
|
|
static void
|
|
scteken_putchar(void *arg, const teken_pos_t *tp, teken_char_t c,
|
|
const teken_attr_t *a)
|
|
{
|
|
scr_stat *scp = arg;
|
|
u_char *map;
|
|
u_char ch;
|
|
vm_offset_t p;
|
|
int cursor, attr;
|
|
|
|
attr = scteken_attr(a) << 8;
|
|
#ifdef TEKEN_UTF8
|
|
scteken_get_cp437(&c, &attr);
|
|
#endif /* TEKEN_UTF8 */
|
|
ch = c;
|
|
|
|
map = scp->sc->scr_map;
|
|
|
|
cursor = tp->tp_row * scp->xsize + tp->tp_col;
|
|
p = sc_vtb_pointer(&scp->vtb, cursor);
|
|
sc_vtb_putchar(&scp->vtb, p, map[ch], attr);
|
|
|
|
mark_for_update(scp, cursor);
|
|
/*
|
|
* XXX: Why do we need this? Only marking `cursor' should be
|
|
* enough. Without this line, we get artifacts.
|
|
*/
|
|
mark_for_update(scp, imin(cursor + 1, scp->xsize * scp->ysize - 1));
|
|
}
|
|
|
|
static void
|
|
scteken_fill(void *arg, const teken_rect_t *r, teken_char_t c,
|
|
const teken_attr_t *a)
|
|
{
|
|
scr_stat *scp = arg;
|
|
u_char *map;
|
|
u_char ch;
|
|
unsigned int width;
|
|
int attr, row;
|
|
|
|
attr = scteken_attr(a) << 8;
|
|
#ifdef TEKEN_UTF8
|
|
scteken_get_cp437(&c, &attr);
|
|
#endif /* TEKEN_UTF8 */
|
|
ch = c;
|
|
|
|
map = scp->sc->scr_map;
|
|
|
|
if (r->tr_begin.tp_col == 0 && r->tr_end.tp_col == scp->xsize) {
|
|
/* Single contiguous region to fill. */
|
|
sc_vtb_erase(&scp->vtb, r->tr_begin.tp_row * scp->xsize,
|
|
(r->tr_end.tp_row - r->tr_begin.tp_row) * scp->xsize,
|
|
map[ch], attr);
|
|
} else {
|
|
/* Fill display line by line. */
|
|
width = r->tr_end.tp_col - r->tr_begin.tp_col;
|
|
|
|
for (row = r->tr_begin.tp_row; row < r->tr_end.tp_row; row++) {
|
|
sc_vtb_erase(&scp->vtb, r->tr_begin.tp_row *
|
|
scp->xsize + r->tr_begin.tp_col,
|
|
width, map[ch], attr);
|
|
}
|
|
}
|
|
|
|
/* Mark begin and end positions to be refreshed. */
|
|
mark_for_update(scp,
|
|
r->tr_begin.tp_row * scp->xsize + r->tr_begin.tp_col);
|
|
mark_for_update(scp,
|
|
(r->tr_end.tp_row - 1) * scp->xsize + (r->tr_end.tp_col - 1));
|
|
sc_remove_cutmarking(scp);
|
|
}
|
|
|
|
static void
|
|
scteken_copy(void *arg, const teken_rect_t *r, const teken_pos_t *p)
|
|
{
|
|
scr_stat *scp = arg;
|
|
unsigned int width;
|
|
int src, dst, end;
|
|
|
|
#ifndef SC_NO_HISTORY
|
|
/*
|
|
* We count a line of input as history if we perform a copy of
|
|
* one whole line upward. In other words: if a line of text gets
|
|
* overwritten by a rectangle that's right below it.
|
|
*/
|
|
if (scp->history != NULL &&
|
|
r->tr_begin.tp_col == 0 && r->tr_end.tp_col == scp->xsize &&
|
|
r->tr_begin.tp_row == p->tp_row + 1) {
|
|
sc_hist_save_one_line(scp, p->tp_row);
|
|
}
|
|
#endif
|
|
|
|
if (r->tr_begin.tp_col == 0 && r->tr_end.tp_col == scp->xsize) {
|
|
/* Single contiguous region to copy. */
|
|
sc_vtb_move(&scp->vtb, r->tr_begin.tp_row * scp->xsize,
|
|
p->tp_row * scp->xsize,
|
|
(r->tr_end.tp_row - r->tr_begin.tp_row) * scp->xsize);
|
|
} else {
|
|
/* Copy line by line. */
|
|
width = r->tr_end.tp_col - r->tr_begin.tp_col;
|
|
|
|
if (p->tp_row < r->tr_begin.tp_row) {
|
|
/* Copy from top to bottom. */
|
|
src = r->tr_begin.tp_row * scp->xsize +
|
|
r->tr_begin.tp_col;
|
|
end = r->tr_end.tp_row * scp->xsize +
|
|
r->tr_end.tp_col;
|
|
dst = p->tp_row * scp->xsize + p->tp_col;
|
|
|
|
while (src < end) {
|
|
sc_vtb_move(&scp->vtb, src, dst, width);
|
|
|
|
src += scp->xsize;
|
|
dst += scp->xsize;
|
|
}
|
|
} else {
|
|
/* Copy from bottom to top. */
|
|
src = (r->tr_end.tp_row - 1) * scp->xsize +
|
|
r->tr_begin.tp_col;
|
|
end = r->tr_begin.tp_row * scp->xsize +
|
|
r->tr_begin.tp_col;
|
|
dst = (p->tp_row + r->tr_end.tp_row -
|
|
r->tr_begin.tp_row - 1) * scp->xsize + p->tp_col;
|
|
|
|
while (src >= end) {
|
|
sc_vtb_move(&scp->vtb, src, dst, width);
|
|
|
|
src -= scp->xsize;
|
|
dst -= scp->xsize;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* Mark begin and end positions to be refreshed. */
|
|
mark_for_update(scp,
|
|
p->tp_row * scp->xsize + p->tp_col);
|
|
mark_for_update(scp,
|
|
(p->tp_row + r->tr_end.tp_row - r->tr_begin.tp_row - 1) *
|
|
scp->xsize +
|
|
(p->tp_col + r->tr_end.tp_col - r->tr_begin.tp_col - 1));
|
|
sc_remove_cutmarking(scp);
|
|
}
|
|
|
|
static void
|
|
scteken_param(void *arg, int cmd, unsigned int value)
|
|
{
|
|
scr_stat *scp = arg;
|
|
|
|
switch (cmd) {
|
|
case TP_SHOWCURSOR:
|
|
if (value) {
|
|
sc_change_cursor_shape(scp,
|
|
CONS_RESET_CURSOR|CONS_LOCAL_CURSOR, -1, -1);
|
|
} else {
|
|
sc_change_cursor_shape(scp,
|
|
CONS_HIDDEN_CURSOR|CONS_LOCAL_CURSOR, -1, -1);
|
|
}
|
|
break;
|
|
case TP_SWITCHVT:
|
|
sc_switch_scr(scp->sc, value);
|
|
break;
|
|
case TP_SETBELLPD:
|
|
scp->bell_pitch = TP_SETBELLPD_PITCH(value);
|
|
scp->bell_duration = TP_SETBELLPD_DURATION(value);
|
|
break;
|
|
case TP_MOUSE:
|
|
scp->mouse_level = value;
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void
|
|
scteken_respond(void *arg, const void *buf, size_t len)
|
|
{
|
|
scr_stat *scp = arg;
|
|
|
|
sc_respond(scp, buf, len, 0);
|
|
}
|