freebsd-skq/sys/dev/syscons/sctermvar.h

443 lines
11 KiB
C
Raw Normal View History

/*-
* Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
* 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.
*
* $FreeBSD$
*/
#ifndef _DEV_SYSCONS_SCTERMVAR_H_
#define _DEV_SYSCONS_SCTERMVAR_H_
/*
* building blocks for terminal emulator modules.
*/
static __inline void sc_term_ins_line(scr_stat *scp, int y, int n, int ch,
int attr, int tail);
static __inline void sc_term_del_line(scr_stat *scp, int y, int n, int ch,
int attr, int tail);
static __inline void sc_term_ins_char(scr_stat *scp, int n, int ch,
int attr);
static __inline void sc_term_del_char(scr_stat *scp, int n, int ch,
int attr);
static __inline void sc_term_col(scr_stat *scp, int n);
static __inline void sc_term_row(scr_stat *scp, int n);
static __inline void sc_term_up(scr_stat *scp, int n, int head);
static __inline void sc_term_down(scr_stat *scp, int n, int tail);
static __inline void sc_term_left(scr_stat *scp, int n);
static __inline void sc_term_right(scr_stat *scp, int n);
static __inline void sc_term_up_scroll(scr_stat *scp, int n, int ch,
int attr, int head, int tail);
static __inline void sc_term_down_scroll(scr_stat *scp, int n, int ch,
int attr, int head, int tail);
static __inline void sc_term_clr_eos(scr_stat *scp, int n, int ch, int attr);
static __inline void sc_term_clr_eol(scr_stat *scp, int n, int ch, int attr);
static __inline void sc_term_tab(scr_stat *scp, int n);
static __inline void sc_term_backtab(scr_stat *scp, int n);
static __inline void sc_term_respond(scr_stat *scp, u_char *s);
static __inline void sc_term_gen_print(scr_stat *scp, u_char **buf, int *len,
int attr);
static __inline void sc_term_gen_scroll(scr_stat *scp, int ch, int attr);
static __inline void
sc_term_ins_line(scr_stat *scp, int y, int n, int ch, int attr, int tail)
{
if (tail <= 0)
tail = scp->ysize;
if (n < 1)
n = 1;
if (n > tail - y)
n = tail - y;
sc_vtb_ins(&scp->vtb, y*scp->xsize, n*scp->xsize, ch, attr);
mark_for_update(scp, y*scp->xsize);
mark_for_update(scp, scp->xsize*tail - 1);
}
static __inline void
sc_term_del_line(scr_stat *scp, int y, int n, int ch, int attr, int tail)
{
if (tail <= 0)
tail = scp->ysize;
if (n < 1)
n = 1;
if (n > tail - y)
n = tail - y;
sc_vtb_delete(&scp->vtb, y*scp->xsize, n*scp->xsize, ch, attr);
mark_for_update(scp, y*scp->xsize);
mark_for_update(scp, scp->xsize*tail - 1);
}
static __inline void
sc_term_ins_char(scr_stat *scp, int n, int ch, int attr)
{
int count;
if (n < 1)
n = 1;
if (n > scp->xsize - scp->xpos)
n = scp->xsize - scp->xpos;
count = scp->xsize - (scp->xpos + n);
sc_vtb_move(&scp->vtb, scp->cursor_pos, scp->cursor_pos + n, count);
sc_vtb_erase(&scp->vtb, scp->cursor_pos, n, ch, attr);
mark_for_update(scp, scp->cursor_pos);
mark_for_update(scp, scp->cursor_pos + n + count - 1);
}
static __inline void
sc_term_del_char(scr_stat *scp, int n, int ch, int attr)
{
int count;
if (n < 1)
n = 1;
if (n > scp->xsize - scp->xpos)
n = scp->xsize - scp->xpos;
count = scp->xsize - (scp->xpos + n);
sc_vtb_move(&scp->vtb, scp->cursor_pos + n, scp->cursor_pos, count);
sc_vtb_erase(&scp->vtb, scp->cursor_pos + count, n, ch, attr);
mark_for_update(scp, scp->cursor_pos);
mark_for_update(scp, scp->cursor_pos + n + count - 1);
}
static __inline void
sc_term_col(scr_stat *scp, int n)
{
if (n < 1)
n = 1;
sc_move_cursor(scp, n - 1, scp->ypos);
}
static __inline void
sc_term_row(scr_stat *scp, int n)
{
if (n < 1)
n = 1;
sc_move_cursor(scp, scp->xpos, n - 1);
}
static __inline void
sc_term_up(scr_stat *scp, int n, int head)
{
if (n < 1)
n = 1;
n = imin(n, scp->ypos - head);
if (n <= 0)
return;
sc_move_cursor(scp, scp->xpos, scp->ypos - n);
}
static __inline void
sc_term_down(scr_stat *scp, int n, int tail)
{
if (tail <= 0)
tail = scp->ysize;
if (n < 1)
n = 1;
n = imin(n, tail - scp->ypos - 1);
if (n <= 0)
return;
sc_move_cursor(scp, scp->xpos, scp->ypos + n);
}
static __inline void
sc_term_left(scr_stat *scp, int n)
{
if (n < 1)
n = 1;
sc_move_cursor(scp, scp->xpos - n, scp->ypos);
}
static __inline void
sc_term_right(scr_stat *scp, int n)
{
if (n < 1)
n = 1;
sc_move_cursor(scp, scp->xpos + n, scp->ypos);
}
static __inline void
sc_term_up_scroll(scr_stat *scp, int n, int ch, int attr, int head, int tail)
{
if (tail <= 0)
tail = scp->ysize;
if (n < 1)
n = 1;
if (n <= scp->ypos - head) {
sc_move_cursor(scp, scp->xpos, scp->ypos - n);
} else {
sc_term_ins_line(scp, head, n - (scp->ypos - head),
ch, attr, tail);
sc_move_cursor(scp, scp->xpos, head);
}
}
static __inline void
sc_term_down_scroll(scr_stat *scp, int n, int ch, int attr, int head, int tail)
{
if (tail <= 0)
tail = scp->ysize;
if (n < 1)
n = 1;
if (n < tail - scp->ypos) {
sc_move_cursor(scp, scp->xpos, scp->ypos + n);
} else {
sc_term_del_line(scp, head, n - (tail - scp->ypos) + 1,
ch, attr, tail);
sc_move_cursor(scp, scp->xpos, tail - 1);
}
}
static __inline void
sc_term_clr_eos(scr_stat *scp, int n, int ch, int attr)
{
switch (n) {
case 0: /* clear form cursor to end of display */
sc_vtb_erase(&scp->vtb, scp->cursor_pos,
scp->xsize*scp->ysize - scp->cursor_pos,
ch, attr);
mark_for_update(scp, scp->cursor_pos);
mark_for_update(scp, scp->xsize*scp->ysize - 1);
sc_remove_cutmarking(scp);
break;
case 1: /* clear from beginning of display to cursor */
sc_vtb_erase(&scp->vtb, 0, scp->cursor_pos, ch, attr);
mark_for_update(scp, 0);
mark_for_update(scp, scp->cursor_pos);
sc_remove_cutmarking(scp);
break;
case 2: /* clear entire display */
sc_vtb_erase(&scp->vtb, 0, scp->xsize*scp->ysize, ch, attr);
mark_for_update(scp, 0);
mark_for_update(scp, scp->xsize*scp->ysize - 1);
sc_remove_cutmarking(scp);
break;
}
}
static __inline void
sc_term_clr_eol(scr_stat *scp, int n, int ch, int attr)
{
switch (n) {
case 0: /* clear form cursor to end of line */
sc_vtb_erase(&scp->vtb, scp->cursor_pos,
scp->xsize - scp->xpos, ch, attr);
mark_for_update(scp, scp->cursor_pos);
mark_for_update(scp, scp->cursor_pos +
scp->xsize - 1 - scp->xpos);
break;
case 1: /* clear from beginning of line to cursor */
sc_vtb_erase(&scp->vtb, scp->cursor_pos - scp->xpos,
scp->xpos + 1, ch, attr);
mark_for_update(scp, scp->ypos*scp->xsize);
mark_for_update(scp, scp->cursor_pos);
break;
case 2: /* clear entire line */
sc_vtb_erase(&scp->vtb, scp->cursor_pos - scp->xpos,
scp->xsize, ch, attr);
mark_for_update(scp, scp->ypos*scp->xsize);
mark_for_update(scp, (scp->ypos + 1)*scp->xsize - 1);
break;
}
}
static __inline void
sc_term_tab(scr_stat *scp, int n)
{
int i;
if (n < 1)
n = 1;
i = (scp->xpos & ~7) + 8*n;
if (i >= scp->xsize) {
if (scp->ypos >= scp->ysize - 1) {
scp->xpos = 0;
scp->ypos++;
scp->cursor_pos = scp->ypos*scp->xsize;
} else
sc_move_cursor(scp, 0, scp->ypos + 1);
} else
sc_move_cursor(scp, i, scp->ypos);
}
static __inline void
sc_term_backtab(scr_stat *scp, int n)
{
int i;
if (n < 1)
n = 1;
if ((i = scp->xpos & ~7) == scp->xpos)
i -= 8*n;
else
i -= 8*(n - 1);
if (i < 0)
i = 0;
sc_move_cursor(scp, i, scp->ypos);
}
static __inline void
sc_term_respond(scr_stat *scp, u_char *s)
{
sc_paste(scp, s, strlen(s)); /* XXX: not correct, don't use rmap */
}
static __inline void
sc_term_gen_print(scr_stat *scp, u_char **buf, int *len, int attr)
{
vm_offset_t p;
u_char *ptr;
u_char *map;
int cnt;
int l;
int i;
ptr = *buf;
l = *len;
if (PRINTABLE(*ptr)) {
p = sc_vtb_pointer(&scp->vtb, scp->cursor_pos);
map = scp->sc->scr_map;
cnt = imin(l, scp->xsize - scp->xpos);
i = cnt;
do {
/*
* gcc-2.6.3 generates poor (un)sign extension code.
* Casting the pointers in the following to volatile
* should have no effect, but in fact speeds up this
* inner loop from 26 to 18 cycles (+ cache misses)
* on i486's.
* XXX: out of date?
*/
#define UCVP(ucp) ((u_char volatile *)(ucp))
p = sc_vtb_putchar(&scp->vtb, p,
UCVP(map)[*UCVP(ptr)], attr);
++ptr;
--i;
} while ((i > 0) && PRINTABLE(*ptr));
l -= cnt - i;
mark_for_update(scp, scp->cursor_pos);
scp->cursor_pos += cnt - i;
mark_for_update(scp, scp->cursor_pos - 1);
scp->xpos += cnt - i;
if (scp->xpos >= scp->xsize) {
scp->xpos = 0;
scp->ypos++;
/* we may have to scroll the screen */
}
} else {
switch(*ptr) {
case 0x07:
sc_bell(scp, scp->bell_pitch, scp->bell_duration);
break;
case 0x08: /* non-destructive backspace */
/* XXX */
if (scp->cursor_pos > 0) {
#if 0
mark_for_update(scp, scp->cursor_pos);
scp->cursor_pos--;
mark_for_update(scp, scp->cursor_pos);
#else
scp->cursor_pos--;
#endif
if (scp->xpos > 0) {
scp->xpos--;
} else {
scp->xpos += scp->xsize - 1;
scp->ypos--;
}
}
break;
case 0x09: /* non-destructive tab */
sc_term_tab(scp, 1);
/* we may have to scroll the screen */
#if 0
mark_for_update(scp, scp->cursor_pos);
scp->cursor_pos += (8 - scp->xpos % 8u);
mark_for_update(scp, scp->cursor_pos);
scp->xpos += (8 - scp->xpos % 8u);
if (scp->xpos >= scp->xsize) {
scp->xpos = 0;
scp->ypos++;
}
#endif
break;
case 0x0a: /* newline, same pos */
#if 0
mark_for_update(scp, scp->cursor_pos);
scp->cursor_pos += scp->xsize;
mark_for_update(scp, scp->cursor_pos);
#else
scp->cursor_pos += scp->xsize;
/* we may have to scroll the screen */
#endif
scp->ypos++;
break;
case 0x0c: /* form feed, clears screen */
sc_clear_screen(scp);
break;
case 0x0d: /* return, return to pos 0 */
#if 0
mark_for_update(scp, scp->cursor_pos);
scp->cursor_pos -= scp->xpos;
mark_for_update(scp, scp->cursor_pos);
#else
scp->cursor_pos -= scp->xpos;
#endif
scp->xpos = 0;
break;
}
ptr++; l--;
}
*buf = ptr;
*len = l;
}
static __inline void
sc_term_gen_scroll(scr_stat *scp, int ch, int attr)
{
/* do we have to scroll ?? */
if (scp->cursor_pos >= scp->ysize*scp->xsize) {
sc_remove_cutmarking(scp); /* XXX */
#ifndef SC_NO_HISTORY
if (scp->history != NULL)
sc_hist_save_one_line(scp, 0); /* XXX */
#endif
sc_vtb_delete(&scp->vtb, 0, scp->xsize, ch, attr);
scp->cursor_pos -= scp->xsize;
scp->ypos--;
mark_all(scp);
}
}
#endif /* _DEV_SYSCONS_SCTERMVAR_H_ */