more escapes & more compability:

cursor keys are handled in kpress according to the Application Mode (DECPAM).
define & enum were renamed.
tcursor() is now tmovecursor() which is more correct.
tcpos() is now tcursor(), as DECSC is also supposed to save attributes.
capnames are indicated whenever possible.

Currently:
alsamixer looks fine, totally usable.
ncmpc is almost ok.
emacs looks like shit.
master
Aurélien Aptel 2010-02-08 23:16:55 +01:00
parent e6b3f5c755
commit eff05c7b90
2 changed files with 177 additions and 144 deletions

View File

@ -31,10 +31,6 @@ static Key key[] = {
{ XK_End, "\033[4~" }, { XK_End, "\033[4~" },
{ XK_Prior, "\033[5~" }, { XK_Prior, "\033[5~" },
{ XK_Next, "\033[6~" }, { XK_Next, "\033[6~" },
{ XK_Left, "\033[D" },
{ XK_Right, "\033[C" },
{ XK_Up, "\033[A" },
{ XK_Down, "\033[B" },
}; };
static char gfx[] = { static char gfx[] = {
@ -70,4 +66,5 @@ static char gfx[] = {
['l'] = '+', ['l'] = '+',
['k'] = '+', ['k'] = '+',
['x'] = '|', ['x'] = '|',
[255] = 0,
}; };

316
st.c
View File

@ -23,10 +23,10 @@
#define TNAME "xterm" #define TNAME "xterm"
/* Arbitrary sizes */ /* Arbitrary sizes */
#define TITLESIZ 256 #define ESC_TITLE_SIZ 256
#define ESCSIZ 256 #define ESC_BUF_SIZ 256
#define ESCARGSIZ 16 #define ESC_ARG_SIZ 16
#define MAXDRAWBUF 1024 #define DRAW_BUF_SIZ 1024
#define SERRNO strerror(errno) #define SERRNO strerror(errno)
#define MIN(a, b) ((a) < (b) ? (a) : (b)) #define MIN(a, b) ((a) < (b) ? (a) : (b))
@ -38,21 +38,19 @@
#define ATTRCMP(a, b) ((a).mode != (b).mode || (a).fg != (b).fg || (a).bg != (b).bg) #define ATTRCMP(a, b) ((a).mode != (b).mode || (a).fg != (b).fg || (a).bg != (b).bg)
/* Attribute, Cursor, Character state, Terminal mode, Screen draw mode */ /* Attribute, Cursor, Character state, Terminal mode, Screen draw mode */
enum { ATnone=0 , ATreverse=1 , ATunderline=2, ATbold=4, ATgfx=8 }; enum { ATTR_NULL=0 , ATTR_REVERSE=1 , ATTR_UNDERLINE=2, ATTR_BOLD=4, ATTR_GFX=8 };
enum { CSup, CSdown, CSright, CSleft, CShide, CSdraw, CSsave, CSload }; enum { CURSOR_UP, CURSOR_DOWN, CURSOR_LEFT, CURSOR_RIGHT, CURSOR_HIDE, CURSOR_DRAW, CURSOR_SAVE, CURSOR_LOAD };
enum { CRset=1, CRupdate=2 }; enum { GLYPH_SET=1, GLYPH_DIRTY=2 };
enum { TMwrap=1, TMinsert=2 }; enum { MODE_WRAP=1, MODE_INSERT=2, MODE_APPKEYPAD=4 };
enum { ESCin=1, ESCcsi=2, ESCosc=4, ESCtitle=8, ESCcharset=16 }; enum { ESC_START=1, ESC_CSI=2, ESC_OSC=4, ESC_TITLE=8, ESC_ALTCHARSET=16 };
enum { SCupdate, SCredraw }; enum { SCREEN_UPDATE, SCREEN_REDRAW };
typedef int Color;
typedef struct { typedef struct {
char c; /* character code */ char c; /* character code */
char mode; /* attribute flags */ char mode; /* attribute flags */
Color fg; /* foreground */ int fg; /* foreground */
Color bg; /* background */ int bg; /* background */
char state; /* state flag */ char state; /* state flags */
} Glyph; } Glyph;
typedef Glyph* Line; typedef Glyph* Line;
@ -67,11 +65,11 @@ typedef struct {
/* CSI Escape sequence structs */ /* CSI Escape sequence structs */
/* ESC '[' [[ [<priv>] <arg> [;]] <mode>] */ /* ESC '[' [[ [<priv>] <arg> [;]] <mode>] */
typedef struct { typedef struct {
char buf[ESCSIZ]; /* raw string */ char buf[ESC_BUF_SIZ]; /* raw string */
int len; /* raw string length */ int len; /* raw string length */
char priv; char priv;
int arg[ESCARGSIZ]; int arg[ESC_ARG_SIZ];
int narg; /* nb of args */ int narg; /* nb of args */
char mode; char mode;
} CSIEscape; } CSIEscape;
@ -83,9 +81,9 @@ typedef struct {
TCursor c; /* cursor */ TCursor c; /* cursor */
int top; /* top scroll limit */ int top; /* top scroll limit */
int bot; /* bottom scroll limit */ int bot; /* bottom scroll limit */
int mode; /* terminal mode */ int mode; /* terminal mode flags */
int esc; int esc; /* escape state flags */
char title[TITLESIZ]; char title[ESC_TITLE_SIZ];
int titlelen; int titlelen;
} Term; } Term;
@ -102,7 +100,7 @@ typedef struct {
typedef struct { typedef struct {
KeySym k; KeySym k;
char s[ESCSIZ]; char s[ESC_BUF_SIZ];
} Key; } Key;
#include "config.h" #include "config.h"
@ -126,8 +124,8 @@ static void csiparse(void);
static void csireset(void); static void csireset(void);
static void tclearregion(int, int, int, int); static void tclearregion(int, int, int, int);
static void tcpos(int);
static void tcursor(int); static void tcursor(int);
static void tmovecursor(int);
static void tdeletechar(int); static void tdeletechar(int);
static void tdeleteline(int); static void tdeleteline(int);
static void tinsertblank(int); static void tinsertblank(int);
@ -187,7 +185,7 @@ tdump(void) {
putchar('#'); putchar('#');
else { else {
c = term.line[row][col]; c = term.line[row][col];
putchar(c.state & CRset ? c.c : '.'); putchar(c.state & GLYPH_SET ? c.c : '.');
} }
} }
putchar('\n'); putchar('\n');
@ -218,7 +216,7 @@ xbell(void) { /* visual bell */
XSetForeground(xw.dis, dc.gc, dc.col[BellCol]); XSetForeground(xw.dis, dc.gc, dc.col[BellCol]);
XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1); XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1);
/* usleep(30000); */ /* usleep(30000); */
draw(SCredraw); draw(SCREEN_REDRAW);
} }
void void
@ -281,13 +279,10 @@ ttyread(void) {
char buf[BUFSIZ] = {0}; char buf[BUFSIZ] = {0};
int ret; int ret;
switch(ret = read(cmdfd, buf, BUFSIZ)) { if((ret = read(cmdfd, buf, BUFSIZ)) < 0)
case -1:
die("Couldn't read from shell: %s\n", SERRNO); die("Couldn't read from shell: %s\n", SERRNO);
break; else
default:
tputs(buf, ret); tputs(buf, ret);
}
} }
void void
@ -308,14 +303,13 @@ ttyresize(int x, int y) {
} }
void void
tcpos(int mode) { tcursor(int mode) {
static int x = 0; static TCursor c;
static int y = 0;
if(mode == CSsave) if(mode == CURSOR_SAVE)
x = term.c.x, y = term.c.y; c = term.c;
else if(mode == CSload) else if(mode == CURSOR_LOAD)
tmoveto(x, y); term.c = c, tmoveto(c.x, c.y);
} }
void void
@ -323,9 +317,9 @@ tnew(int col, int row) { /* screen size */
term.row = row, term.col = col; term.row = row, term.col = col;
term.top = 0, term.bot = term.row - 1; term.top = 0, term.bot = term.row - 1;
/* mode */ /* mode */
term.mode = TMwrap; term.mode = MODE_WRAP;
/* cursor */ /* cursor */
term.c.attr.mode = ATnone; term.c.attr.mode = ATTR_NULL;
term.c.attr.fg = DefaultFG; term.c.attr.fg = DefaultFG;
term.c.attr.bg = DefaultBG; term.c.attr.bg = DefaultBG;
term.c.x = term.c.y = 0; term.c.x = term.c.y = 0;
@ -370,7 +364,7 @@ csiparse(void) {
escseq.arg[escseq.narg] *= 10; escseq.arg[escseq.narg] *= 10;
escseq.arg[escseq.narg] += *p++ - '0'/*, noarg = 0 */; escseq.arg[escseq.narg] += *p++ - '0'/*, noarg = 0 */;
} }
if(*p == ';' && escseq.narg+1 < ESCARGSIZ) if(*p == ';' && escseq.narg+1 < ESC_ARG_SIZ)
escseq.narg++, p++; escseq.narg++, p++;
else { else {
escseq.mode = *p; escseq.mode = *p;
@ -387,27 +381,27 @@ tmoveto(int x, int y) {
} }
void void
tcursor(int dir) { tmovecursor(int dir) {
int xf = term.c.x, yf = term.c.y; int xf = term.c.x, yf = term.c.y;
switch(dir) { switch(dir) {
case CSup: case CURSOR_UP:
yf--; yf--;
break; break;
case CSdown: case CURSOR_DOWN:
yf++; yf++;
break; break;
case CSleft: case CURSOR_LEFT:
xf--; xf--;
if(term.mode & TMwrap && xf < 0) { if(term.mode & MODE_WRAP && xf < 0) {
xf = term.col-1, yf--; xf = term.col-1, yf--;
if(yf < term.top) if(yf < term.top)
yf = term.top, xf = 0; yf = term.top, xf = 0;
} }
break; break;
case CSright: case CURSOR_RIGHT:
xf++; xf++;
if(term.mode & TMwrap && xf >= term.col) { if(term.mode & MODE_WRAP && xf >= term.col) {
xf = 0, yf++; xf = 0, yf++;
if(yf > term.bot) if(yf > term.bot)
yf = term.bot, tscroll(); yf = term.bot, tscroll();
@ -421,7 +415,7 @@ void
tsetchar(char c) { tsetchar(char c) {
term.line[term.c.y][term.c.x] = term.c.attr; term.line[term.c.y][term.c.x] = term.c.attr;
term.line[term.c.y][term.c.x].c = c; term.line[term.c.y][term.c.x].c = c;
term.line[term.c.y][term.c.x].state |= CRset | CRupdate; term.line[term.c.y][term.c.x].state |= GLYPH_SET | GLYPH_DIRTY;
} }
void void
@ -477,7 +471,7 @@ tsetlinestate(int n, int state) {
} }
void void
tinsertblankline (int n) { tinsertblankline(int n) {
int i; int i;
Line blank; Line blank;
int bot = term.bot; int bot = term.bot;
@ -497,8 +491,8 @@ tinsertblankline (int n) {
term.line[i-n] = blank; term.line[i-n] = blank;
/* blank it */ /* blank it */
memset(blank, 0, term.col * sizeof(Glyph)); memset(blank, 0, term.col * sizeof(Glyph));
tsetlinestate(i, CRupdate); tsetlinestate(i, GLYPH_DIRTY);
tsetlinestate(i-n, CRupdate); tsetlinestate(i-n, GLYPH_DIRTY);
} }
} }
@ -523,8 +517,8 @@ tdeleteline(int n) {
term.line[i+n] = blank; term.line[i+n] = blank;
/* blank it */ /* blank it */
memset(blank, 0, term.col * sizeof(Glyph)); memset(blank, 0, term.col * sizeof(Glyph));
tsetlinestate(i, CRupdate); tsetlinestate(i, GLYPH_DIRTY);
tsetlinestate(i-n, CRupdate); tsetlinestate(i-n, GLYPH_DIRTY);
} }
} }
@ -535,30 +529,30 @@ tsetattr(int *attr, int l) {
for(i = 0; i < l; i++) { for(i = 0; i < l; i++) {
switch(attr[i]) { switch(attr[i]) {
case 0: case 0:
term.c.attr.mode &= ~(ATreverse | ATunderline | ATbold); term.c.attr.mode &= ~(ATTR_REVERSE | ATTR_UNDERLINE | ATTR_BOLD);
term.c.attr.fg = DefaultFG; term.c.attr.fg = DefaultFG;
term.c.attr.bg = DefaultBG; term.c.attr.bg = DefaultBG;
break; break;
case 1: case 1:
term.c.attr.mode |= ATbold; term.c.attr.mode |= ATTR_BOLD;
break; break;
case 4: case 4:
term.c.attr.mode |= ATunderline; term.c.attr.mode |= ATTR_UNDERLINE;
break; break;
case 7: case 7:
term.c.attr.mode |= ATreverse; term.c.attr.mode |= ATTR_REVERSE;
break; break;
case 8: case 8:
term.c.hidden = CShide; term.c.hidden = CURSOR_HIDE;
break; break;
case 22: case 22:
term.c.attr.mode &= ~ATbold; term.c.attr.mode &= ~ATTR_BOLD;
break; break;
case 24: case 24:
term.c.attr.mode &= ~ATunderline; term.c.attr.mode &= ~ATTR_UNDERLINE;
break; break;
case 27: case 27:
term.c.attr.mode &= ~ATreverse; term.c.attr.mode &= ~ATTR_REVERSE;
break; break;
case 39: case 39:
term.c.attr.fg = DefaultFG; term.c.attr.fg = DefaultFG;
@ -593,57 +587,56 @@ tsetscroll(int t, int b) {
void void
csihandle(void) { csihandle(void) {
if(escseq.priv)
csidump();
switch(escseq.mode) { switch(escseq.mode) {
unknown:
default: default:
fprintf(stderr, "erresc: unknown sequence\n"); unknown:
printf("erresc: unknown sequence -- ");
csidump(); csidump();
/* die(""); */ /* die(""); */
break; break;
case '@': /* Insert <n> blank char */ case '@': /* ICH -- Insert <n> blank char */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tinsertblank(escseq.arg[0]); tinsertblank(escseq.arg[0]);
break; break;
case 'A': /* Cursor <n> Up */ case 'A': /* CUU -- Cursor <n> Up */
case 'e': case 'e':
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x, term.c.y-escseq.arg[0]); tmoveto(term.c.x, term.c.y-escseq.arg[0]);
break; break;
case 'B': /* Cursor <n> Down */ case 'B': /* CUD -- Cursor <n> Down */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x, term.c.y+escseq.arg[0]); tmoveto(term.c.x, term.c.y+escseq.arg[0]);
break; break;
case 'C': /* Cursor <n> Forward */ case 'C': /* CUF -- Cursor <n> Forward */
case 'a': case 'a':
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x+escseq.arg[0], term.c.y); tmoveto(term.c.x+escseq.arg[0], term.c.y);
break; break;
case 'D': /* Cursor <n> Backward */ case 'D': /* CUB -- Cursor <n> Backward */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x-escseq.arg[0], term.c.y); tmoveto(term.c.x-escseq.arg[0], term.c.y);
break; break;
case 'E': /* Cursor <n> Down and first col */ case 'E': /* CNL -- Cursor <n> Down and first col */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(0, term.c.y+escseq.arg[0]); tmoveto(0, term.c.y+escseq.arg[0]);
break; break;
case 'F': /* Cursor <n> Up and first col */ case 'F': /* CPL -- Cursor <n> Up and first col */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(0, term.c.y-escseq.arg[0]); tmoveto(0, term.c.y-escseq.arg[0]);
break; break;
case 'G': /* Move to <col> */ case 'G': /* CHA -- Move to <col> */
case '`': case '`': /* XXX: HPA -- same? */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(escseq.arg[0]-1, term.c.y); tmoveto(escseq.arg[0]-1, term.c.y);
break; break;
case 'H': /* Move to <row> <col> */ case 'H': /* CUP -- Move to <row> <col> */
case 'f': case 'f': /* XXX: HVP -- same? */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
DEFAULT(escseq.arg[1], 1); DEFAULT(escseq.arg[1], 1);
tmoveto(escseq.arg[1]-1, escseq.arg[0]-1); tmoveto(escseq.arg[1]-1, escseq.arg[0]-1);
break; break;
case 'J': /* Clear screen */ /* XXX: (CSI n I) CHT -- Cursor Forward Tabulation <n> tab stops */
case 'J': /* ED -- Clear screen */
switch(escseq.arg[0]) { switch(escseq.arg[0]) {
case 0: /* below */ case 0: /* below */
tclearregion(term.c.x, term.c.y, term.col-1, term.row-1); tclearregion(term.c.x, term.c.y, term.col-1, term.row-1);
@ -653,10 +646,13 @@ csihandle(void) {
break; break;
case 2: /* all */ case 2: /* all */
tclearregion(0, 0, term.col-1, term.row-1); tclearregion(0, 0, term.col-1, term.row-1);
break; break;
case 3: /* XXX: erase saved lines (xterm) */
default:
goto unknown;
} }
break; break;
case 'K': /* Clear line */ case 'K': /* EL -- Clear line */
switch(escseq.arg[0]) { switch(escseq.arg[0]) {
case 0: /* right */ case 0: /* right */
tclearregion(term.c.x, term.c.y, term.col-1, term.c.y); tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
@ -669,54 +665,77 @@ csihandle(void) {
break; break;
} }
break; break;
case 'S': case 'S': /* XXX: SU -- Scroll <n> line up (faked) */
case 'L': /* Insert <n> blank lines */ case 'L': /* IL -- Insert <n> blank lines */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tinsertblankline(escseq.arg[0]); tinsertblankline(escseq.arg[0]);
break; break;
case 'l': case 'l': /* RM -- Reset Mode */
if(escseq.priv) { if(escseq.priv) {
switch(escseq.arg[0]) { switch(escseq.arg[0]) {
case 1:
term.mode &= ~MODE_APPKEYPAD;
break;
case 7: case 7:
term.mode &= ~TMwrap; term.mode &= ~MODE_WRAP;
break;
case 12: /* att610 -- Stop blinking cursor (IGNORED) */
break; break;
case 25: case 25:
term.c.hidden = 1; term.c.hidden = 1;
break; break;
case 1048: /* XXX: no alt. screen to erase/save */
case 1049:
tcursor(CURSOR_LOAD);
tclearregion(0, 0, term.col-1, term.row-1);
break;
default:
goto unknown;
} }
} } else goto unknown;
break; break;
case 'M': /* Delete <n> lines */ case 'M': /* DL -- Delete <n> lines */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tdeleteline(escseq.arg[0]); tdeleteline(escseq.arg[0]);
break; break;
case 'X': case 'X': /* ECH -- Erase <n> char XXX: same? */
case 'P': /* Delete <n> char */ case 'P': /* DCH -- Delete <n> char */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tdeletechar(escseq.arg[0]); tdeletechar(escseq.arg[0]);
break; break;
case 'd': /* Move to <row> */ /* XXX: (CSI n Z) CBT -- Cursor Backward Tabulation <n> tab stops */
case 'd': /* VPA -- Move to <row> */
DEFAULT(escseq.arg[0], 1); DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x, escseq.arg[0]-1); tmoveto(term.c.x, escseq.arg[0]-1);
break; break;
case 'h': /* Set terminal mode */ case 'h': /* SM -- Set terminal mode */
if(escseq.priv) if(escseq.priv) {
switch(escseq.arg[0]) { switch(escseq.arg[0]) {
case 1:
term.mode |= MODE_APPKEYPAD;
break;
case 7: case 7:
term.mode |= TMwrap; term.mode |= MODE_WRAP;
break;
case 12: /* att610 -- Start blinking cursor (IGNORED) */
break; break;
case 25: case 25:
term.c.hidden = 0; term.c.hidden = 0;
break; break;
case 1034: case 1048:
/* XXX: Interpret "meta" key, sets eighth bit. */ case 1049: /* XXX: no alt. screen to erase/save */
tcursor(CURSOR_SAVE);
tclearregion(0, 0, term.col-1, term.row-1);
break; break;
default:
goto unknown;
} }
} else goto unknown;
break; break;
case 'm': /* Terminal attribute (color) */ case 'm': /* SGR -- Terminal attribute (color) */
tsetattr(escseq.arg, escseq.narg); tsetattr(escseq.arg, escseq.narg);
break; break;
case 'r': case 'r': /* DECSTBM -- Set Scrolling Region */
if(escseq.priv) if(escseq.priv)
goto unknown; goto unknown;
else { else {
@ -725,11 +744,11 @@ csihandle(void) {
tsetscroll(escseq.arg[0]-1, escseq.arg[1]-1); tsetscroll(escseq.arg[0]-1, escseq.arg[1]-1);
} }
break; break;
case 's': /* Save cursor position */ case 's': /* DECSC -- Save cursor position (ANSI.SYS) */
tcpos(CSsave); tcursor(CURSOR_SAVE);
break; break;
case 'u': /* Load cursor position */ case 'u': /* DECRC -- Restore cursor position (ANSI.SYS) */
tcpos(CSload); tcursor(CURSOR_LOAD);
break; break;
} }
} }
@ -759,70 +778,82 @@ tputtab(void) {
space--; space--;
for(; space > 0; space--) for(; space > 0; space--)
tcursor(CSright); tmovecursor(CURSOR_RIGHT);
} }
void void
tputc(char c) { tputc(char c) {
#if 0 /* dump(c); */
dump(c); if(term.esc & ESC_START) {
#endif if(term.esc & ESC_CSI) {
if(term.esc & ESCin) {
if(term.esc & ESCcsi) {
escseq.buf[escseq.len++] = c; escseq.buf[escseq.len++] = c;
if(BETWEEN(c, 0x40, 0x7E) || escseq.len >= ESCSIZ) { if(BETWEEN(c, 0x40, 0x7E) || escseq.len >= ESC_BUF_SIZ) {
term.esc = 0; term.esc = 0;
csiparse(), csihandle(); csiparse(), csihandle();
} }
} else if (term.esc & ESCosc) { } else if(term.esc & ESC_OSC) {
if(c == ';') { if(c == ';') {
term.titlelen = 0; term.titlelen = 0;
term.esc = ESCin | ESCtitle; term.esc = ESC_START | ESC_TITLE;
} }
} else if(term.esc & ESCtitle) { } else if(term.esc & ESC_TITLE) {
if(c == '\a' || term.titlelen+1 >= TITLESIZ) { if(c == '\a' || term.titlelen+1 >= ESC_TITLE_SIZ) {
term.esc = 0; term.esc = 0;
term.title[term.titlelen] = '\0'; term.title[term.titlelen] = '\0';
XStoreName(xw.dis, xw.win, term.title); XStoreName(xw.dis, xw.win, term.title);
} else { } else {
term.title[term.titlelen++] = c; term.title[term.titlelen++] = c;
} }
} else if(term.esc & ESCcharset) { } else if(term.esc & ESC_ALTCHARSET) {
printf("ESC ( %c\n", c);
switch(c) { switch(c) {
case '0': /* Line drawing crap */ case '0': /* Line drawing crap */
term.c.attr.mode |= ATgfx; term.c.attr.mode |= ATTR_GFX;
break; break;
case 'B': /* Back to regular text */ case 'B': /* Back to regular text */
term.c.attr.mode &= ~ATgfx; term.c.attr.mode &= ~ATTR_GFX;
break; break;
default:
printf("esc unhandled charset: ESC ( %c\n", c);
} }
term.esc = 0; term.esc = 0;
} else { } else {
switch(c) { switch(c) {
case '[': case '[':
term.esc |= ESCcsi; term.esc |= ESC_CSI;
break; break;
case ']': case ']':
term.esc |= ESCosc; term.esc |= ESC_OSC;
break; break;
case '(': case '(':
term.esc |= ESCcharset; term.esc |= ESC_ALTCHARSET;
break; break;
case 'A': case 'A':
tmoveto(term.c.x, term.c.y-1); tmoveto(term.c.x, term.c.y-1);
term.esc = 0;
break; break;
case 'B': case 'B':
tmoveto(term.c.x, term.c.y+1); tmoveto(term.c.x, term.c.y+1);
term.esc = 0;
break; break;
case 'C': case 'C':
tmoveto(term.c.x+1, term.c.y); tmoveto(term.c.x+1, term.c.y);
term.esc = 0;
break; break;
case 'D': case 'D':
tmoveto(term.c.x-1, term.c.y); tmoveto(term.c.x-1, term.c.y);
term.esc = 0;
break;
case '=': /* DECPAM */
term.mode |= MODE_APPKEYPAD;
term.esc = 0;
break;
case '>': /* DECPNM */
term.mode &= ~MODE_APPKEYPAD;
term.esc = 0;
break; break;
default: default:
fprintf(stderr, "erresc: unknown sequence ESC %02X '%c'\n", c, isprint(c)?c:'.'); fprintf(stderr, "erresc: unknown sequence ESC %02X '%c'\n", c, isprint(c)?c:'.');
term.esc = 0;
} }
} }
} else { } else {
@ -831,7 +862,7 @@ tputc(char c) {
tputtab(); tputtab();
break; break;
case '\b': case '\b':
tcursor(CSleft); tmovecursor(CURSOR_LEFT);
break; break;
case '\r': case '\r':
tmoveto(0, term.c.y); tmoveto(0, term.c.y);
@ -844,11 +875,11 @@ tputc(char c) {
break; break;
case '\033': case '\033':
csireset(); csireset();
term.esc = ESCin; term.esc = ESC_START;
break; break;
default: default:
tsetchar(c); tsetchar(c);
tcursor(CSright); tmovecursor(CURSOR_RIGHT);
break; break;
} }
} }
@ -917,7 +948,7 @@ xscroll(void) {
int dsty = term.top * xw.ch; int dsty = term.top * xw.ch;
int height = (term.bot-term.top) * xw.ch; int height = (term.bot-term.top) * xw.ch;
xcursor(CShide); xcursor(CURSOR_HIDE);
XCopyArea(xw.dis, xw.win, xw.win, dc.gc, 0, srcy, xw.w, height, 0, dsty); XCopyArea(xw.dis, xw.win, xw.win, dc.gc, 0, srcy, xw.w, height, 0, dsty);
xclear(0, term.bot, term.col-1, term.bot); xclear(0, term.bot, term.col-1, term.bot);
} }
@ -950,7 +981,7 @@ xinit(void) {
term.c.attr.fg = DefaultFG; term.c.attr.fg = DefaultFG;
term.c.attr.bg = DefaultBG; term.c.attr.bg = DefaultBG;
term.c.attr.mode = ATnone; term.c.attr.mode = ATTR_NULL;
/* windows */ /* windows */
xw.h = term.row * xw.ch; xw.h = term.row * xw.ch;
xw.w = term.col * xw.cw; xw.w = term.col * xw.cw;
@ -977,12 +1008,12 @@ xinit(void) {
} }
void void
xdraws (char *s, Glyph base, int x, int y, int len) { xdraws(char *s, Glyph base, int x, int y, int len) {
unsigned long xfg, xbg; unsigned long xfg, xbg;
int winx = x*xw.cw, winy = y*xw.ch + dc.font->ascent, width = len*xw.cw; int winx = x*xw.cw, winy = y*xw.ch + dc.font->ascent, width = len*xw.cw;
int i; int i;
if(base.mode & ATreverse) if(base.mode & ATTR_REVERSE)
xfg = dc.col[base.bg], xbg = dc.col[base.fg]; xfg = dc.col[base.bg], xbg = dc.col[base.fg];
else else
xfg = dc.col[base.fg], xbg = dc.col[base.bg]; xfg = dc.col[base.fg], xbg = dc.col[base.bg];
@ -990,15 +1021,13 @@ xdraws (char *s, Glyph base, int x, int y, int len) {
XSetBackground(xw.dis, dc.gc, xbg); XSetBackground(xw.dis, dc.gc, xbg);
XSetForeground(xw.dis, dc.gc, xfg); XSetForeground(xw.dis, dc.gc, xfg);
if(base.mode & ATgfx) { if(base.mode & ATTR_GFX)
for(i = 0; i < len; i++) for(i = 0; i < len; i++)
s[i] = gfx[s[i]]; s[i] = gfx[s[i]];
}
XDrawImageString(xw.dis, xw.win, dc.gc, winx, winy, s, len); XDrawImageString(xw.dis, xw.win, dc.gc, winx, winy, s, len);
if(base.mode & ATunderline) if(base.mode & ATTR_UNDERLINE)
XDrawLine(xw.dis, xw.win, dc.gc, winx, winy+1, winx+width-1, winy+1); XDrawLine(xw.dis, xw.win, dc.gc, winx, winy+1, winx+width-1, winy+1);
} }
@ -1008,7 +1037,7 @@ xdrawc(int x, int y, Glyph g) {
unsigned long xfg, xbg; unsigned long xfg, xbg;
/* reverse video */ /* reverse video */
if(g.mode & ATreverse) if(g.mode & ATTR_REVERSE)
xfg = dc.col[g.bg], xbg = dc.col[g.fg]; xfg = dc.col[g.bg], xbg = dc.col[g.fg];
else else
xfg = dc.col[g.fg], xbg = dc.col[g.bg]; xfg = dc.col[g.fg], xbg = dc.col[g.bg];
@ -1022,20 +1051,20 @@ void
xcursor(int mode) { xcursor(int mode) {
static int oldx = 0; static int oldx = 0;
static int oldy = 0; static int oldy = 0;
Glyph g = {' ', ATnone, DefaultBG, DefaultCS, 0}; Glyph g = {' ', ATTR_NULL, DefaultBG, DefaultCS, 0};
LIMIT(oldx, 0, term.col-1); LIMIT(oldx, 0, term.col-1);
LIMIT(oldy, 0, term.row-1); LIMIT(oldy, 0, term.row-1);
if(term.line[term.c.y][term.c.x].state & CRset) if(term.line[term.c.y][term.c.x].state & GLYPH_SET)
g.c = term.line[term.c.y][term.c.x].c; g.c = term.line[term.c.y][term.c.x].c;
/* remove the old cursor */ /* remove the old cursor */
if(term.line[oldy][oldx].state & CRset) if(term.line[oldy][oldx].state & GLYPH_SET)
xdrawc(oldx, oldy, term.line[oldy][oldx]); xdrawc(oldx, oldy, term.line[oldy][oldx]);
else else
xclear(oldx, oldy, oldx, oldy); xclear(oldx, oldy, oldx, oldy);
/* draw the new one */ /* draw the new one */
if(mode == CSdraw) { if(mode == CURSOR_DRAW) {
xdrawc(term.c.x, term.c.y, g); xdrawc(term.c.x, term.c.y, g);
oldx = term.c.x, oldy = term.c.y; oldx = term.c.x, oldy = term.c.y;
} }
@ -1045,14 +1074,14 @@ void
draw(int redraw_all) { draw(int redraw_all) {
int i, x, y, ox; int i, x, y, ox;
Glyph base, new; Glyph base, new;
char buf[MAXDRAWBUF]; char buf[DRAW_BUF_SIZ];
for(y = 0; y < term.row; y++) { for(y = 0; y < term.row; y++) {
base = term.line[y][0]; base = term.line[y][0];
i = ox = 0; i = ox = 0;
for(x = 0; x < term.col; x++) { for(x = 0; x < term.col; x++) {
new = term.line[y][x]; new = term.line[y][x];
if(!ATTRCMP(base, new) && i < MAXDRAWBUF) if(!ATTRCMP(base, new) && i < DRAW_BUF_SIZ)
buf[i++] = new.c; buf[i++] = new.c;
else { else {
xdraws(buf, base, ox, y, i); xdraws(buf, base, ox, y, i);
@ -1065,12 +1094,12 @@ draw(int redraw_all) {
xdraws(buf, base, ox, y, i); xdraws(buf, base, ox, y, i);
} }
if(!term.c.hidden) if(!term.c.hidden)
xcursor(CSdraw); xcursor(CURSOR_DRAW);
} }
void void
expose(XEvent *ev) { expose(XEvent *ev) {
draw(SCredraw); draw(SCREEN_REDRAW);
} }
char* char*
@ -1105,6 +1134,13 @@ kpress(XEvent *ev) {
ttywrite(buf, len); ttywrite(buf, len);
} else } else
switch(ksym) { switch(ksym) {
case XK_Up:
case XK_Down:
case XK_Left:
case XK_Right:
sprintf(buf, "\033%c%c", term.mode & MODE_APPKEYPAD ? 'O' : '[', "DACB"[ksym - XK_Left]);
ttywrite(buf, 3);
break;
case XK_Insert: case XK_Insert:
if(shift) if(shift)
/* XXX: paste X clipboard */; /* XXX: paste X clipboard */;
@ -1126,7 +1162,7 @@ resize(XEvent *e) {
ttyresize(col, row); ttyresize(col, row);
xw.w = e->xconfigure.width; xw.w = e->xconfigure.width;
xw.h = e->xconfigure.height; xw.h = e->xconfigure.height;
draw(SCredraw); draw(SCREEN_REDRAW);
} }
} }
@ -1151,7 +1187,7 @@ run(void) {
} }
if(FD_ISSET(cmdfd, &rfd)) { if(FD_ISSET(cmdfd, &rfd)) {
ttyread(); ttyread();
draw(SCupdate); draw(SCREEN_UPDATE);
} }
while(XPending(xw.dis)) { while(XPending(xw.dis)) {
XNextEvent(xw.dis, &ev); XNextEvent(xw.dis, &ev);