#define TNAME "xterm"
/* Arbitrary sizes */
-#define TITLESIZ 256
-#define ESCSIZ 256
-#define ESCARGSIZ 16
-#define MAXDRAWBUF 1024
+#define ESC_TITLE_SIZ 256
+#define ESC_BUF_SIZ 256
+#define ESC_ARG_SIZ 16
+#define DRAW_BUF_SIZ 1024
#define SERRNO strerror(errno)
#define MIN(a, b) ((a) < (b) ? (a) : (b))
#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 */
-enum { ATnone=0 , ATreverse=1 , ATunderline=2, ATbold=4, ATgfx=8 };
-enum { CSup, CSdown, CSright, CSleft, CShide, CSdraw, CSsave, CSload };
-enum { CRset=1, CRupdate=2 };
-enum { TMwrap=1, TMinsert=2 };
-enum { ESCin=1, ESCcsi=2, ESCosc=4, ESCtitle=8, ESCcharset=16 };
-enum { SCupdate, SCredraw };
-
-typedef int Color;
+enum { ATTR_NULL=0 , ATTR_REVERSE=1 , ATTR_UNDERLINE=2, ATTR_BOLD=4, ATTR_GFX=8 };
+enum { CURSOR_UP, CURSOR_DOWN, CURSOR_LEFT, CURSOR_RIGHT, CURSOR_HIDE, CURSOR_DRAW, CURSOR_SAVE, CURSOR_LOAD };
+enum { GLYPH_SET=1, GLYPH_DIRTY=2 };
+enum { MODE_WRAP=1, MODE_INSERT=2, MODE_APPKEYPAD=4 };
+enum { ESC_START=1, ESC_CSI=2, ESC_OSC=4, ESC_TITLE=8, ESC_ALTCHARSET=16 };
+enum { SCREEN_UPDATE, SCREEN_REDRAW };
typedef struct {
char c; /* character code */
char mode; /* attribute flags */
- Color fg; /* foreground */
- Color bg; /* background */
- char state; /* state flag */
+ int fg; /* foreground */
+ int bg; /* background */
+ char state; /* state flags */
} Glyph;
typedef Glyph* Line;
/* CSI Escape sequence structs */
/* ESC '[' [[ [<priv>] <arg> [;]] <mode>] */
typedef struct {
- char buf[ESCSIZ]; /* raw string */
- int len; /* raw string length */
+ char buf[ESC_BUF_SIZ]; /* raw string */
+ int len; /* raw string length */
char priv;
- int arg[ESCARGSIZ];
- int narg; /* nb of args */
+ int arg[ESC_ARG_SIZ];
+ int narg; /* nb of args */
char mode;
} CSIEscape;
TCursor c; /* cursor */
int top; /* top scroll limit */
int bot; /* bottom scroll limit */
- int mode; /* terminal mode */
- int esc;
- char title[TITLESIZ];
+ int mode; /* terminal mode flags */
+ int esc; /* escape state flags */
+ char title[ESC_TITLE_SIZ];
int titlelen;
} Term;
typedef struct {
KeySym k;
- char s[ESCSIZ];
+ char s[ESC_BUF_SIZ];
} Key;
#include "config.h"
static void csireset(void);
static void tclearregion(int, int, int, int);
-static void tcpos(int);
static void tcursor(int);
+static void tmovecursor(int);
static void tdeletechar(int);
static void tdeleteline(int);
static void tinsertblank(int);
putchar('#');
else {
c = term.line[row][col];
- putchar(c.state & CRset ? c.c : '.');
+ putchar(c.state & GLYPH_SET ? c.c : '.');
}
}
putchar('\n');
XSetForeground(xw.dis, dc.gc, dc.col[BellCol]);
XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1);
/* usleep(30000); */
- draw(SCredraw);
+ draw(SCREEN_REDRAW);
}
void
char buf[BUFSIZ] = {0};
int ret;
- switch(ret = read(cmdfd, buf, BUFSIZ)) {
- case -1:
+ if((ret = read(cmdfd, buf, BUFSIZ)) < 0)
die("Couldn't read from shell: %s\n", SERRNO);
- break;
- default:
+ else
tputs(buf, ret);
- }
}
void
}
void
-tcpos(int mode) {
- static int x = 0;
- static int y = 0;
-
- if(mode == CSsave)
- x = term.c.x, y = term.c.y;
- else if(mode == CSload)
- tmoveto(x, y);
+tcursor(int mode) {
+ static TCursor c;
+
+ if(mode == CURSOR_SAVE)
+ c = term.c;
+ else if(mode == CURSOR_LOAD)
+ term.c = c, tmoveto(c.x, c.y);
}
void
term.row = row, term.col = col;
term.top = 0, term.bot = term.row - 1;
/* mode */
- term.mode = TMwrap;
+ term.mode = MODE_WRAP;
/* cursor */
- term.c.attr.mode = ATnone;
+ term.c.attr.mode = ATTR_NULL;
term.c.attr.fg = DefaultFG;
term.c.attr.bg = DefaultBG;
term.c.x = term.c.y = 0;
escseq.arg[escseq.narg] *= 10;
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++;
else {
escseq.mode = *p;
}
void
-tcursor(int dir) {
+tmovecursor(int dir) {
int xf = term.c.x, yf = term.c.y;
switch(dir) {
- case CSup:
+ case CURSOR_UP:
yf--;
break;
- case CSdown:
+ case CURSOR_DOWN:
yf++;
break;
- case CSleft:
+ case CURSOR_LEFT:
xf--;
- if(term.mode & TMwrap && xf < 0) {
+ if(term.mode & MODE_WRAP && xf < 0) {
xf = term.col-1, yf--;
if(yf < term.top)
yf = term.top, xf = 0;
}
break;
- case CSright:
+ case CURSOR_RIGHT:
xf++;
- if(term.mode & TMwrap && xf >= term.col) {
+ if(term.mode & MODE_WRAP && xf >= term.col) {
xf = 0, yf++;
if(yf > term.bot)
yf = term.bot, tscroll();
tsetchar(char c) {
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].state |= CRset | CRupdate;
+ term.line[term.c.y][term.c.x].state |= GLYPH_SET | GLYPH_DIRTY;
}
void
}
void
-tinsertblankline (int n) {
+tinsertblankline(int n) {
int i;
Line blank;
int bot = term.bot;
term.line[i-n] = blank;
/* blank it */
memset(blank, 0, term.col * sizeof(Glyph));
- tsetlinestate(i, CRupdate);
- tsetlinestate(i-n, CRupdate);
+ tsetlinestate(i, GLYPH_DIRTY);
+ tsetlinestate(i-n, GLYPH_DIRTY);
}
}
term.line[i+n] = blank;
/* blank it */
memset(blank, 0, term.col * sizeof(Glyph));
- tsetlinestate(i, CRupdate);
- tsetlinestate(i-n, CRupdate);
+ tsetlinestate(i, GLYPH_DIRTY);
+ tsetlinestate(i-n, GLYPH_DIRTY);
}
}
for(i = 0; i < l; i++) {
switch(attr[i]) {
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.bg = DefaultBG;
break;
case 1:
- term.c.attr.mode |= ATbold;
+ term.c.attr.mode |= ATTR_BOLD;
break;
case 4:
- term.c.attr.mode |= ATunderline;
+ term.c.attr.mode |= ATTR_UNDERLINE;
break;
case 7:
- term.c.attr.mode |= ATreverse;
+ term.c.attr.mode |= ATTR_REVERSE;
break;
case 8:
- term.c.hidden = CShide;
+ term.c.hidden = CURSOR_HIDE;
break;
case 22:
- term.c.attr.mode &= ~ATbold;
+ term.c.attr.mode &= ~ATTR_BOLD;
break;
case 24:
- term.c.attr.mode &= ~ATunderline;
+ term.c.attr.mode &= ~ATTR_UNDERLINE;
break;
case 27:
- term.c.attr.mode &= ~ATreverse;
+ term.c.attr.mode &= ~ATTR_REVERSE;
break;
case 39:
term.c.attr.fg = DefaultFG;
void
csihandle(void) {
- if(escseq.priv)
- csidump();
switch(escseq.mode) {
- unknown:
default:
- fprintf(stderr, "erresc: unknown sequence\n");
+ unknown:
+ printf("erresc: unknown sequence -- ");
csidump();
/* die(""); */
break;
- case '@': /* Insert <n> blank char */
+ case '@': /* ICH -- Insert <n> blank char */
DEFAULT(escseq.arg[0], 1);
tinsertblank(escseq.arg[0]);
break;
- case 'A': /* Cursor <n> Up */
+ case 'A': /* CUU -- Cursor <n> Up */
case 'e':
DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x, term.c.y-escseq.arg[0]);
break;
- case 'B': /* Cursor <n> Down */
+ case 'B': /* CUD -- Cursor <n> Down */
DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x, term.c.y+escseq.arg[0]);
break;
- case 'C': /* Cursor <n> Forward */
+ case 'C': /* CUF -- Cursor <n> Forward */
case 'a':
DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x+escseq.arg[0], term.c.y);
break;
- case 'D': /* Cursor <n> Backward */
+ case 'D': /* CUB -- Cursor <n> Backward */
DEFAULT(escseq.arg[0], 1);
tmoveto(term.c.x-escseq.arg[0], term.c.y);
break;
- case 'E': /* Cursor <n> Down and first col */
+ case 'E': /* CNL -- Cursor <n> Down and first col */
DEFAULT(escseq.arg[0], 1);
tmoveto(0, term.c.y+escseq.arg[0]);
break;
- case 'F': /* Cursor <n> Up and first col */
+ case 'F': /* CPL -- Cursor <n> Up and first col */
DEFAULT(escseq.arg[0], 1);
tmoveto(0, term.c.y-escseq.arg[0]);
break;
- case 'G': /* Move to <col> */
- case '`':
+ case 'G': /* CHA -- Move to <col> */
+ case '`': /* XXX: HPA -- same? */
DEFAULT(escseq.arg[0], 1);
tmoveto(escseq.arg[0]-1, term.c.y);
break;
- case 'H': /* Move to <row> <col> */
- case 'f':
+ case 'H': /* CUP -- Move to <row> <col> */
+ case 'f': /* XXX: HVP -- same? */
DEFAULT(escseq.arg[0], 1);
DEFAULT(escseq.arg[1], 1);
tmoveto(escseq.arg[1]-1, escseq.arg[0]-1);
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]) {
case 0: /* below */
tclearregion(term.c.x, term.c.y, term.col-1, term.row-1);
break;
case 2: /* all */
tclearregion(0, 0, term.col-1, term.row-1);
- break;
+ break;
+ case 3: /* XXX: erase saved lines (xterm) */
+ default:
+ goto unknown;
}
break;
- case 'K': /* Clear line */
+ case 'K': /* EL -- Clear line */
switch(escseq.arg[0]) {
case 0: /* right */
tclearregion(term.c.x, term.c.y, term.col-1, term.c.y);
break;
}
break;
- case 'S':
- case 'L': /* Insert <n> blank lines */
+ case 'S': /* XXX: SU -- Scroll <n> line up (faked) */
+ case 'L': /* IL -- Insert <n> blank lines */
DEFAULT(escseq.arg[0], 1);
tinsertblankline(escseq.arg[0]);
break;
- case 'l':
+ case 'l': /* RM -- Reset Mode */
if(escseq.priv) {
switch(escseq.arg[0]) {
+ case 1:
+ term.mode &= ~MODE_APPKEYPAD;
+ break;
case 7:
- term.mode &= ~TMwrap;
+ term.mode &= ~MODE_WRAP;
+ break;
+ case 12: /* att610 -- Stop blinking cursor (IGNORED) */
break;
case 25:
term.c.hidden = 1;
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;
- case 'M': /* Delete <n> lines */
+ case 'M': /* DL -- Delete <n> lines */
DEFAULT(escseq.arg[0], 1);
tdeleteline(escseq.arg[0]);
break;
- case 'X':
- case 'P': /* Delete <n> char */
+ case 'X': /* ECH -- Erase <n> char XXX: same? */
+ case 'P': /* DCH -- Delete <n> char */
DEFAULT(escseq.arg[0], 1);
tdeletechar(escseq.arg[0]);
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);
tmoveto(term.c.x, escseq.arg[0]-1);
break;
- case 'h': /* Set terminal mode */
- if(escseq.priv)
+ case 'h': /* SM -- Set terminal mode */
+ if(escseq.priv) {
switch(escseq.arg[0]) {
+ case 1:
+ term.mode |= MODE_APPKEYPAD;
+ break;
case 7:
- term.mode |= TMwrap;
+ term.mode |= MODE_WRAP;
+ break;
+ case 12: /* att610 -- Start blinking cursor (IGNORED) */
break;
case 25:
term.c.hidden = 0;
break;
- case 1034:
- /* XXX: Interpret "meta" key, sets eighth bit. */
+ case 1048:
+ case 1049: /* XXX: no alt. screen to erase/save */
+ tcursor(CURSOR_SAVE);
+ tclearregion(0, 0, term.col-1, term.row-1);
break;
+ default:
+ goto unknown;
}
+ } else goto unknown;
break;
- case 'm': /* Terminal attribute (color) */
+ case 'm': /* SGR -- Terminal attribute (color) */
tsetattr(escseq.arg, escseq.narg);
break;
- case 'r':
+ case 'r': /* DECSTBM -- Set Scrolling Region */
if(escseq.priv)
goto unknown;
else {
tsetscroll(escseq.arg[0]-1, escseq.arg[1]-1);
}
break;
- case 's': /* Save cursor position */
- tcpos(CSsave);
+ case 's': /* DECSC -- Save cursor position (ANSI.SYS) */
+ tcursor(CURSOR_SAVE);
break;
- case 'u': /* Load cursor position */
- tcpos(CSload);
+ case 'u': /* DECRC -- Restore cursor position (ANSI.SYS) */
+ tcursor(CURSOR_LOAD);
break;
}
}
space--;
for(; space > 0; space--)
- tcursor(CSright);
+ tmovecursor(CURSOR_RIGHT);
}
void
tputc(char c) {
-#if 0
- dump(c);
-#endif
- if(term.esc & ESCin) {
- if(term.esc & ESCcsi) {
+ /* dump(c); */
+ if(term.esc & ESC_START) {
+ if(term.esc & ESC_CSI) {
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;
csiparse(), csihandle();
}
- } else if (term.esc & ESCosc) {
+ } else if(term.esc & ESC_OSC) {
if(c == ';') {
term.titlelen = 0;
- term.esc = ESCin | ESCtitle;
+ term.esc = ESC_START | ESC_TITLE;
}
- } else if(term.esc & ESCtitle) {
- if(c == '\a' || term.titlelen+1 >= TITLESIZ) {
+ } else if(term.esc & ESC_TITLE) {
+ if(c == '\a' || term.titlelen+1 >= ESC_TITLE_SIZ) {
term.esc = 0;
term.title[term.titlelen] = '\0';
XStoreName(xw.dis, xw.win, term.title);
} else {
term.title[term.titlelen++] = c;
}
- } else if(term.esc & ESCcharset) {
- printf("ESC ( %c\n", c);
+ } else if(term.esc & ESC_ALTCHARSET) {
switch(c) {
case '0': /* Line drawing crap */
- term.c.attr.mode |= ATgfx;
+ term.c.attr.mode |= ATTR_GFX;
break;
case 'B': /* Back to regular text */
- term.c.attr.mode &= ~ATgfx;
+ term.c.attr.mode &= ~ATTR_GFX;
break;
+ default:
+ printf("esc unhandled charset: ESC ( %c\n", c);
}
term.esc = 0;
} else {
switch(c) {
case '[':
- term.esc |= ESCcsi;
+ term.esc |= ESC_CSI;
break;
case ']':
- term.esc |= ESCosc;
+ term.esc |= ESC_OSC;
break;
case '(':
- term.esc |= ESCcharset;
+ term.esc |= ESC_ALTCHARSET;
break;
case 'A':
tmoveto(term.c.x, term.c.y-1);
+ term.esc = 0;
break;
case 'B':
tmoveto(term.c.x, term.c.y+1);
+ term.esc = 0;
break;
case 'C':
tmoveto(term.c.x+1, term.c.y);
+ term.esc = 0;
break;
case 'D':
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;
default:
fprintf(stderr, "erresc: unknown sequence ESC %02X '%c'\n", c, isprint(c)?c:'.');
+ term.esc = 0;
}
}
} else {
tputtab();
break;
case '\b':
- tcursor(CSleft);
+ tmovecursor(CURSOR_LEFT);
break;
case '\r':
tmoveto(0, term.c.y);
break;
case '\033':
csireset();
- term.esc = ESCin;
+ term.esc = ESC_START;
break;
default:
tsetchar(c);
- tcursor(CSright);
+ tmovecursor(CURSOR_RIGHT);
break;
}
}
int dsty = 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);
xclear(0, term.bot, term.col-1, term.bot);
}
term.c.attr.fg = DefaultFG;
term.c.attr.bg = DefaultBG;
- term.c.attr.mode = ATnone;
+ term.c.attr.mode = ATTR_NULL;
/* windows */
xw.h = term.row * xw.ch;
xw.w = term.col * xw.cw;
}
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;
int winx = x*xw.cw, winy = y*xw.ch + dc.font->ascent, width = len*xw.cw;
int i;
- if(base.mode & ATreverse)
+ if(base.mode & ATTR_REVERSE)
xfg = dc.col[base.bg], xbg = dc.col[base.fg];
else
xfg = dc.col[base.fg], xbg = dc.col[base.bg];
XSetBackground(xw.dis, dc.gc, xbg);
XSetForeground(xw.dis, dc.gc, xfg);
- if(base.mode & ATgfx) {
-
+ if(base.mode & ATTR_GFX)
for(i = 0; i < len; i++)
s[i] = gfx[s[i]];
- }
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);
}
unsigned long xfg, xbg;
/* reverse video */
- if(g.mode & ATreverse)
+ if(g.mode & ATTR_REVERSE)
xfg = dc.col[g.bg], xbg = dc.col[g.fg];
else
xfg = dc.col[g.fg], xbg = dc.col[g.bg];
xcursor(int mode) {
static int oldx = 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(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;
/* 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]);
else
xclear(oldx, oldy, oldx, oldy);
/* draw the new one */
- if(mode == CSdraw) {
+ if(mode == CURSOR_DRAW) {
xdrawc(term.c.x, term.c.y, g);
oldx = term.c.x, oldy = term.c.y;
}
draw(int redraw_all) {
int i, x, y, ox;
Glyph base, new;
- char buf[MAXDRAWBUF];
+ char buf[DRAW_BUF_SIZ];
for(y = 0; y < term.row; y++) {
base = term.line[y][0];
i = ox = 0;
for(x = 0; x < term.col; x++) {
new = term.line[y][x];
- if(!ATTRCMP(base, new) && i < MAXDRAWBUF)
+ if(!ATTRCMP(base, new) && i < DRAW_BUF_SIZ)
buf[i++] = new.c;
else {
xdraws(buf, base, ox, y, i);
xdraws(buf, base, ox, y, i);
}
if(!term.c.hidden)
- xcursor(CSdraw);
+ xcursor(CURSOR_DRAW);
}
void
expose(XEvent *ev) {
- draw(SCredraw);
+ draw(SCREEN_REDRAW);
}
char*
ttywrite(buf, len);
} else
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:
if(shift)
/* XXX: paste X clipboard */;
ttyresize(col, row);
xw.w = e->xconfigure.width;
xw.h = e->xconfigure.height;
- draw(SCredraw);
+ draw(SCREEN_REDRAW);
}
}
}
if(FD_ISSET(cmdfd, &rfd)) {
ttyread();
- draw(SCupdate);
+ draw(SCREEN_UPDATE);
}
while(XPending(xw.dis)) {
XNextEvent(xw.dis, &ev);
