Anselm R Garbe
16 years ago
parent
802f1922f9
commit
d58dd3b8bc
9 changed files with 1278 additions and 426 deletions
@ -1,22 +1,25 @@ |
||||
MIT/X Consortium License |
||||
Copyright (c) 2009, Aurélien APTEL <aurelien dot aptel at gmail dot com> |
||||
Copyright (c) 2009, Anselm R Garbe <garbeam at gmail dot com> |
||||
|
||||
© 2007-2008 Anselm R Garbe <garbeam at gmail dot com> |
||||
© 2008 Matthias Christian Ott <ott at enolink dot de> |
||||
Redistribution and use in source and binary forms, with or without |
||||
modification, are permitted provided that the following conditions are met: |
||||
* Redistributions of source code must retain the above copyright |
||||
notice, this list of conditions and the following disclaimer. |
||||
* 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. |
||||
* Neither the name of the copyright holder nor the names of its |
||||
contributors may be used to endorse or promote products derived |
||||
from this software without specific prior written permission. |
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a |
||||
copy of this software and associated documentation files (the "Software"), |
||||
to deal in the Software without restriction, including without limitation |
||||
the rights to use, copy, modify, merge, publish, distribute, sublicense, |
||||
and/or sell copies of the Software, and to permit persons to whom the |
||||
Software is furnished to do so, subject to the following conditions: |
||||
|
||||
The above copyright notice and this permission notice shall be included in |
||||
all copies or substantial portions of the Software. |
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
||||
THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
||||
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
||||
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
||||
DEALINGS IN THE SOFTWARE. |
||||
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
||||
"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 COPYRIGHT |
||||
HOLDER OR CONTRIBUTORS 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. |
||||
|
||||
@ -1,45 +1,50 @@ |
||||
# st - simple terminal
|
||||
# See LICENSE file for copyright and license details.
|
||||
|
||||
VERSION = 0.0
|
||||
include config.mk |
||||
|
||||
PREFIX = /usr/local
|
||||
MANDIR = $(PREFIX)/share/man
|
||||
SRC = st.c
|
||||
OBJ = ${SRC:.c=.o}
|
||||
|
||||
CFLAGS = -DVERSION=\"0.0\" -D_GNU_SOURCE
|
||||
all: options st |
||||
|
||||
all: st std |
||||
options: |
||||
@echo st build options:
|
||||
@echo "CFLAGS = ${CFLAGS}"
|
||||
@echo "LDFLAGS = ${LDFLAGS}"
|
||||
@echo "CC = ${CC}"
|
||||
|
||||
.c.o: |
||||
@echo CC $<
|
||||
@${CC} -c ${CFLAGS} $<
|
||||
|
||||
${OBJ}: config.mk |
||||
|
||||
st: ${OBJ} |
||||
@echo CC -o $@
|
||||
@${CC} -o $@ ${OBJ} ${LDFLAGS}
|
||||
|
||||
clean: |
||||
rm -f st std
|
||||
rm -f st.o std.o
|
||||
rm -f st-$(VERSION).tar.gz
|
||||
@echo cleaning
|
||||
@rm -f st ${OBJ} st-${VERSION}.tar.gz
|
||||
|
||||
dist: clean |
||||
mkdir st-$(VERSION)
|
||||
cp -f LICENSE README st-$(VERSION)
|
||||
cp -f Makefile config.mk st-$(VERSION)
|
||||
cp -f st.1 std.1 st-$(VERSION)
|
||||
cp -f st.c std.c st-$(VERSION)
|
||||
tar -czf st-$(VERSION).tar st-$(VERSION)
|
||||
rm -rf st-$(VERSION)
|
||||
|
||||
install: |
||||
mkdir -p $(DESTDIR)$(PREFIX)/bin
|
||||
cp -f st $(DESTDIR)$(PREFIX)/bin
|
||||
cp -f std $(DESTDIR)$(PREFIX)/bin
|
||||
chmod 755 $(DESTDIR)$(PREFIX)/bin/st
|
||||
chmod 755 $(DESTDIR)$(PREFIX)/bin/std
|
||||
mkdir -p $(DESTDIR)$(MANDIR)/man1
|
||||
sed 's/VERSION/$(VERSION)/g' < st.1 > $(DESTDIR)$(MANDIR)/man1/st.1
|
||||
chmod 644 $(DESTDIR)$(MANDIR)/man1/st.1
|
||||
sed 's/VERSION/$(VERSION)/g' < std.1 > $(DESTDIR)$(MANDIR)/man1/std.1
|
||||
chmod 644 $(DESTDIR)$(MANDIR)/man1/std.1
|
||||
@echo creating dist tarball
|
||||
@mkdir -p st-${VERSION}
|
||||
@cp -R LICENSE Makefile README config.mk st.h ${SRC} st-${VERSION}
|
||||
@tar -cf st-${VERSION}.tar st-${VERSION}
|
||||
@gzip st-${VERSION}.tar
|
||||
@rm -rf st-${VERSION}
|
||||
|
||||
install: all |
||||
@echo installing executable file to ${DESTDIR}${PREFIX}/bin
|
||||
@mkdir -p ${DESTDIR}${PREFIX}/bin
|
||||
@cp -f st ${DESTDIR}${PREFIX}/bin
|
||||
@chmod 755 ${DESTDIR}${PREFIX}/bin/st
|
||||
@tic st.info
|
||||
|
||||
uninstall: |
||||
rm -f $(DESTDIR)$(PREFIX)/bin/st
|
||||
rm -f $(DESTDIR)$(PREFIX)/bin/std
|
||||
rm -f $(DESTDIR)$(MANDIR)/man1/st.1
|
||||
rm -f $(DESTDIR)$(MANDIR)/man1/std.1
|
||||
@echo removing executable file from ${DESTDIR}${PREFIX}/bin
|
||||
@rm -f ${DESTDIR}${PREFIX}/bin/st
|
||||
|
||||
.PHONY: all clean dist install uninstall |
||||
.PHONY: all options clean dist install uninstall |
||||
|
||||
@ -0,0 +1,28 @@ |
||||
st - simple terminal |
||||
-------------------- |
||||
st is a simple virtual terminal emulator for X which sucks less. |
||||
|
||||
|
||||
Requirements |
||||
------------ |
||||
In order to build st you need the Xlib header files. |
||||
|
||||
|
||||
Installation |
||||
------------ |
||||
Edit config.mk to match your local setup (st is installed into |
||||
the /usr/local namespace by default). |
||||
|
||||
Afterwards enter the following command to build and install st (if |
||||
necessary as root): |
||||
|
||||
make clean install |
||||
|
||||
|
||||
Running st |
||||
---------- |
||||
See the man page for details. |
||||
|
||||
Credits |
||||
------- |
||||
Based on Aurélien APTEL <aurelien dot aptel at gmail dot com> bt source code. |
||||
@ -0,0 +1,9 @@ |
||||
- write a clean terminfo entry |
||||
- write global "setup" func |
||||
- try to split more logic/gfx |
||||
- optimize drawing |
||||
- handle copy/paste |
||||
- fix fork/child exit problem |
||||
- fix resize (shrinking should move last line up) |
||||
- handle utf8 |
||||
- refactor/clean code |
||||
@ -0,0 +1,31 @@ |
||||
# st version
|
||||
VERSION = 0.0
|
||||
|
||||
# Customize below to fit your system
|
||||
|
||||
# paths
|
||||
PREFIX = /usr/local
|
||||
MANPREFIX = ${PREFIX}/share/man
|
||||
|
||||
X11INC = /usr/X11R6/include
|
||||
X11LIB = /usr/X11R6/lib
|
||||
|
||||
# Xinerama, comment if you don't want it
|
||||
#XINERAMALIBS = -L${X11LIB} -lXinerama
|
||||
#XINERAMAFLAGS = -DXINERAMA
|
||||
|
||||
# includes and libs
|
||||
INCS = -I. -I/usr/include -I${X11INC}
|
||||
LIBS = -L/usr/lib -lc -L${X11LIB} -lX11 ${XINERAMALIBS}
|
||||
|
||||
# flags
|
||||
CPPFLAGS = -DVERSION=\"${VERSION}\" ${XINERAMAFLAGS}
|
||||
CFLAGS = -std=c99 -pedantic -Wall -Os ${INCS} ${CPPFLAGS}
|
||||
LDFLAGS = -s ${LIBS}
|
||||
|
||||
# Solaris
|
||||
#CFLAGS = -fast ${INCS} -DVERSION=\"${VERSION}\"
|
||||
#LDFLAGS = ${LIBS}
|
||||
|
||||
# compiler and linker
|
||||
CC = cc
|
||||
@ -1,17 +1,921 @@ |
||||
/* See LICENSE file for copyright and license details. */ |
||||
#include <stdio.h> |
||||
#include <stdlib.h> |
||||
#include <string.h> |
||||
/* See LICENSE for licence details. */ |
||||
#include "st.h" |
||||
|
||||
/* Globals */ |
||||
DC dc; |
||||
XWindow xw; |
||||
Term term; |
||||
Escseq escseq; |
||||
int cmdfd; |
||||
int running; |
||||
|
||||
void |
||||
die(const char *errstr, ...) { |
||||
va_list ap; |
||||
|
||||
va_start(ap, errstr); |
||||
vfprintf(stderr, errstr, ap); |
||||
va_end(ap); |
||||
exit(EXIT_FAILURE); |
||||
} |
||||
|
||||
void |
||||
execsh(void) { |
||||
char *args[3] = {SHELL, "-i", NULL}; |
||||
putenv("TERM=" TNAME); |
||||
execvp(SHELL, args); |
||||
} |
||||
|
||||
void |
||||
xbell(void) { /* visual bell */ |
||||
XRectangle r = { 0, 0, xw.w, xw.h }; |
||||
XSetForeground(xw.dis, dc.gc, dc.col[BellCol]); |
||||
XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1); |
||||
XFlush(xw.dis); |
||||
usleep(30000); |
||||
draw(SCredraw); |
||||
} |
||||
|
||||
void |
||||
ttynew(void) { |
||||
int m, s; |
||||
pid_t pid; |
||||
char *pts; |
||||
|
||||
if((m = posix_openpt(O_RDWR | O_NOCTTY)) < 0) |
||||
die("openpt"); |
||||
if(grantpt(m) == -1) |
||||
die("grandpt"); |
||||
if(unlockpt(m) == -1) |
||||
die("unlockpt"); |
||||
if((pts = ptsname(m)) == NULL) |
||||
die("ptsname"); |
||||
if((s = open(pts, O_RDWR | O_NOCTTY)) < 0) |
||||
die("slave open"); |
||||
fcntl(s, F_SETFL, O_NDELAY); |
||||
switch(pid = fork()) { |
||||
case -1: |
||||
die("fork"); |
||||
break; |
||||
case 0: |
||||
setsid(); /* create a new process group */ |
||||
dup2(s, STDIN_FILENO); |
||||
dup2(s, STDOUT_FILENO); |
||||
dup2(s, STDERR_FILENO); |
||||
if(ioctl(s, TIOCSCTTY, NULL) < 0) |
||||
die("slave TTIOCSTTY"); |
||||
execsh(); |
||||
break; |
||||
default: |
||||
close(s); |
||||
cmdfd = m; |
||||
} |
||||
} |
||||
|
||||
void |
||||
dump(char c) { |
||||
static int col; |
||||
fprintf(stderr, " %02x %c ", c, isprint(c)?c:'.'); |
||||
if(++col % 10 == 0) |
||||
fprintf(stderr, "\n"); |
||||
} |
||||
|
||||
void |
||||
ttyread(void) { |
||||
char buf[BUFSIZ] = {0}; |
||||
int ret; |
||||
|
||||
switch(ret = read(cmdfd, buf, BUFSIZ)) { |
||||
case -1: /* error or exit */ |
||||
/* XXX: be more precise */ |
||||
running = 0; |
||||
break; |
||||
default: |
||||
tputs(buf, ret); |
||||
} |
||||
} |
||||
|
||||
void |
||||
ttywrite(char *s, size_t n) { |
||||
if(write(cmdfd, s, n) == -1) |
||||
die("write error on tty."); |
||||
} |
||||
|
||||
void |
||||
ttyresize(int x, int y) { |
||||
struct winsize w; |
||||
|
||||
w.ws_row = term.row; |
||||
w.ws_col = term.col; |
||||
w.ws_xpixel = w.ws_ypixel = 0; |
||||
if(ioctl(cmdfd, TIOCSWINSZ, &w) < 0) |
||||
fprintf(stderr, "Couldn't set window size: %m\n"); |
||||
} |
||||
|
||||
int |
||||
main(int argc, char *argv[]) { |
||||
if(argc == 2 && !strcmp("-v", argv[1])) { |
||||
fprintf(stderr, "st-"VERSION", © 2007-2008 st engineers, see LICENSE for details\n"); |
||||
exit(EXIT_SUCCESS); |
||||
escfinal(char c) { |
||||
if(escseq.len == 1) |
||||
switch(c) { |
||||
case '[': |
||||
case ']': |
||||
case '(': |
||||
return 0; |
||||
case '=': |
||||
case '>': |
||||
default: |
||||
return 1; |
||||
} |
||||
else if(BETWEEN(c, 0x40, 0x7E)) |
||||
return 1; |
||||
return 0;
|
||||
} |
||||
|
||||
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); |
||||
} |
||||
|
||||
void |
||||
tnew(int col, int row) { /* screen size */ |
||||
term.row = row, term.col = col; |
||||
term.top = 0, term.bot = term.row - 1; |
||||
/* mode */ |
||||
term.mode = TMwrap; |
||||
/* cursor */ |
||||
term.c.attr.mode = ATnone; |
||||
term.c.attr.fg = DefaultFG; |
||||
term.c.attr.bg = DefaultBG; |
||||
term.c.x = term.c.y = 0; |
||||
term.c.hidden = 0; |
||||
/* allocate screen */ |
||||
term.line = calloc(term.row, sizeof(Line)); |
||||
for(row = 0 ; row < term.row; row++) |
||||
term.line[row] = calloc(term.col, sizeof(Glyph)); |
||||
} |
||||
|
||||
void |
||||
tscroll(void) { |
||||
Line temp = term.line[term.top]; |
||||
int i; |
||||
|
||||
for(i = term.top; i < term.bot; i++) |
||||
term.line[i] = term.line[i+1]; |
||||
memset(temp, 0, sizeof(Glyph) * term.col); |
||||
term.line[term.bot] = temp; |
||||
xscroll();
|
||||
} |
||||
|
||||
void |
||||
tnewline(void) { |
||||
int y = term.c.y + 1; |
||||
|
||||
if(y > term.bot) { |
||||
tscroll(), y = term.bot; |
||||
} |
||||
tmoveto(0, y); |
||||
} |
||||
|
||||
int |
||||
escaddc(char c) { |
||||
escseq.buf[escseq.len++] = c; |
||||
if(escfinal(c) || escseq.len >= ESCSIZ) { |
||||
escparse(), eschandle(); |
||||
return 0; |
||||
} |
||||
return 1; |
||||
} |
||||
|
||||
void |
||||
escparse(void) { |
||||
/* int noarg = 1; */ |
||||
char *p = escseq.buf; |
||||
|
||||
escseq.narg = 0; |
||||
switch(escseq.pre = *p++) { |
||||
case '[': /* CSI */ |
||||
if(*p == '?') |
||||
escseq.priv = 1, p++; |
||||
|
||||
while(p < escseq.buf+escseq.len) { |
||||
while(isdigit(*p)) { |
||||
escseq.arg[escseq.narg] *= 10; |
||||
escseq.arg[escseq.narg] += *(p++) - '0'/*, noarg = 0 */; |
||||
} |
||||
if(*p == ';') |
||||
escseq.narg++, p++; |
||||
else { |
||||
escseq.mode = *p; |
||||
escseq.narg++; |
||||
return; |
||||
} |
||||
} |
||||
break; |
||||
case '(': |
||||
/* humf charset stuff */ |
||||
break; |
||||
} |
||||
else if(argc != 1) { |
||||
fprintf(stderr, "usage: st [-v]\n"); |
||||
exit(EXIT_FAILURE); |
||||
} |
||||
|
||||
void |
||||
tmoveto(int x, int y) { |
||||
term.c.x = x < 0 ? 0 : x >= term.col ? term.col-1 : x; |
||||
term.c.y = y < 0 ? 0 : y >= term.row ? term.row-1 : y; |
||||
} |
||||
|
||||
void |
||||
tcursor(int dir) { |
||||
int xi = term.c.x, yi = term.c.y; |
||||
int xf = xi, yf = yi; |
||||
|
||||
switch(dir) { |
||||
case CSup: |
||||
yf--; |
||||
break; |
||||
case CSdown: |
||||
yf++; |
||||
break; |
||||
case CSleft: |
||||
xf--; |
||||
if(xf < 0) { |
||||
xf = term.col-1, yf--; |
||||
if(yf < term.top) |
||||
yf = term.top, xf = 0; |
||||
} |
||||
break; |
||||
case CSright: |
||||
xf++; |
||||
if(xf >= term.col) { |
||||
xf = 0, yf++; |
||||
if(yf > term.bot) |
||||
yf = term.bot, tscroll(); |
||||
} |
||||
break; |
||||
} |
||||
tmoveto(xf, yf); |
||||
} |
||||
|
||||
void |
||||
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; |
||||
} |
||||
|
||||
void |
||||
tclearregion(int x1, int y1, int x2, int y2) { |
||||
int x, y; |
||||
|
||||
LIMIT(x1, 0, term.col-1); |
||||
LIMIT(x2, 0, term.col-1); |
||||
LIMIT(y1, 0, term.row-1); |
||||
LIMIT(y2, 0, term.row-1); |
||||
|
||||
/* XXX: could be optimized */ |
||||
for(x = x1; x <= x2; x++) |
||||
for(y = y1; y <= y2; y++) |
||||
memset(&term.line[y][x], 0, sizeof(Glyph)); |
||||
|
||||
xclear(x1, y1, x2, y2); |
||||
} |
||||
|
||||
void |
||||
tdeletechar(int n) { |
||||
int src = term.c.x + n; |
||||
int dst = term.c.x; |
||||
int size = term.col - src; |
||||
|
||||
if(src >= term.col) { |
||||
tclearregion(term.c.x, term.c.y, term.col-1, term.c.y); |
||||
return; |
||||
} |
||||
memmove(&term.line[term.c.y][dst], &term.line[term.c.y][src], size * sizeof(Glyph)); |
||||
tclearregion(term.col-size, term.c.y, term.col-1, term.c.y); |
||||
} |
||||
|
||||
void |
||||
tinsertblank(int n) { |
||||
int src = term.c.x; |
||||
int dst = src + n; |
||||
int size = term.col - n - src; |
||||
|
||||
if(dst >= term.col) { |
||||
tclearregion(term.c.x, term.c.y, term.col-1, term.c.y); |
||||
return; |
||||
} |
||||
memmove(&term.line[term.c.y][dst], &term.line[term.c.y][src], size * sizeof(Glyph)); |
||||
tclearregion(src, term.c.y, dst, term.c.y); |
||||
} |
||||
|
||||
void |
||||
tinsertblankline (int n) { |
||||
int i; |
||||
Line blank; |
||||
int bot = term.bot; |
||||
|
||||
if(term.c.y > term.bot) |
||||
bot = term.row - 1; |
||||
else if(term.c.y < term.top) |
||||
bot = term.top - 1; |
||||
if(term.c.y + n >= bot) { |
||||
tclearregion(0, term.c.y, term.col-1, bot); |
||||
return; |
||||
} |
||||
for(i = bot; i >= term.c.y+n; i--) { |
||||
/* swap deleted line <-> blanked line */ |
||||
blank = term.line[i]; |
||||
term.line[i] = term.line[i-n]; |
||||
term.line[i-n] = blank; |
||||
/* blank it */ |
||||
memset(blank, 0, term.col * sizeof(Glyph)); |
||||
} |
||||
} |
||||
|
||||
|
||||
void |
||||
tdeleteline(int n) { |
||||
int i; |
||||
Line blank; |
||||
int bot = term.bot; |
||||
|
||||
if(term.c.y > term.bot) |
||||
bot = term.row - 1; |
||||
else if(term.c.y < term.top) |
||||
bot = term.top - 1; |
||||
if(term.c.y + n >= bot) { |
||||
tclearregion(0, term.c.y, term.col-1, bot); |
||||
return; |
||||
} |
||||
for(i = term.c.y; i <= bot-n; i++) { |
||||
/* swap deleted line <-> blanked line */ |
||||
blank = term.line[i]; |
||||
term.line[i] = term.line[i+n]; |
||||
term.line[i+n] = blank; |
||||
/* blank it */ |
||||
memset(blank, 0, term.col * sizeof(Glyph)); |
||||
} |
||||
} |
||||
|
||||
void |
||||
tsetattr(int *attr, int l) { |
||||
int i; |
||||
|
||||
#ifdef TRUECOLOR /* ESC [ ? <fg/bg> ; <r> ; <g> ; <b> m */ |
||||
Color col; |
||||
if(escseq.priv && escseq.len == 4) { /* True color extension :) */ |
||||
col = (escseq.arg[1]<<16) + (escseq.arg[2]<<8) + escseq.arg[3]; |
||||
switch(escseq.arg[0]) { |
||||
case 3: /* foreground */ |
||||
term.c.attr.fg = col; |
||||
break; |
||||
case 4: /* background */ |
||||
term.c.attr.bg = col; |
||||
break; |
||||
} |
||||
} |
||||
else |
||||
#endif |
||||
for(i = 0; i < l; i++) { |
||||
switch(attr[i]) { |
||||
case 0: |
||||
memset(&term.c.attr, 0, sizeof(term.c.attr)); |
||||
term.c.attr.fg = DefaultFG; |
||||
term.c.attr.bg = DefaultBG; |
||||
break; |
||||
case 1: |
||||
term.c.attr.mode |= ATbold;
|
||||
break; |
||||
case 4:
|
||||
term.c.attr.mode |= ATunderline; |
||||
break; |
||||
case 7:
|
||||
term.c.attr.mode |= ATreverse;
|
||||
break; |
||||
case 8: |
||||
term.c.hidden = CShide; |
||||
break; |
||||
case 22:
|
||||
term.c.attr.mode &= ~ATbold;
|
||||
break; |
||||
case 24:
|
||||
term.c.attr.mode &= ~ATunderline; |
||||
break; |
||||
case 27:
|
||||
term.c.attr.mode &= ~ATreverse;
|
||||
break; |
||||
case 39: |
||||
term.c.attr.fg = DefaultFG; |
||||
break; |
||||
case 49: |
||||
term.c.attr.fg = DefaultBG; |
||||
break; |
||||
default: |
||||
if(BETWEEN(attr[i], 30, 37)) |
||||
term.c.attr.fg = attr[i] - 30; |
||||
else if(BETWEEN(attr[i], 40, 47)) |
||||
term.c.attr.bg = attr[i] - 40; |
||||
break; |
||||
} |
||||
} |
||||
} |
||||
|
||||
void |
||||
tsetscroll(int t, int b) { |
||||
int temp; |
||||
|
||||
LIMIT(t, 0, term.row-1); |
||||
LIMIT(b, 0, term.row-1); |
||||
if(t > b) { |
||||
temp = t; |
||||
t = b; |
||||
b = temp; |
||||
} |
||||
term.top = t; |
||||
term.bot = b;
|
||||
} |
||||
|
||||
|
||||
void |
||||
eschandle(void) {
|
||||
/* escdump(); */ |
||||
switch(escseq.pre) { |
||||
case '[': |
||||
switch(escseq.mode) { |
||||
case '@': /* Insert <n> blank char */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tinsertblank(escseq.arg[0]); |
||||
break; |
||||
case 'A': /* 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 */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tmoveto(term.c.x, term.c.y+escseq.arg[0]); |
||||
break; |
||||
case 'C': /* 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 */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tmoveto(term.c.x-escseq.arg[0], term.c.y); |
||||
break; |
||||
case 'E': /* 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 */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tmoveto(0, term.c.y-escseq.arg[0]); |
||||
break; |
||||
case 'G': /* Move to <col> */ |
||||
case '`': |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tmoveto(escseq.arg[0]-1, term.c.y); |
||||
break; |
||||
case 'H': /* Move to <row> <col> */ |
||||
case 'f': |
||||
DEFAULT(escseq.arg[0], 1); |
||||
DEFAULT(escseq.arg[1], 1); |
||||
tmoveto(escseq.arg[1]-1, escseq.arg[0]-1); |
||||
break; |
||||
case 'J': /* Clear screen */ |
||||
switch(escseq.arg[0]) { |
||||
case 0: /* below */ |
||||
tclearregion(term.c.x, term.c.y, term.col-1, term.row-1); |
||||
break; |
||||
case 1: /* above */ |
||||
tclearregion(0, 0, term.c.x, term.c.y); |
||||
break; |
||||
case 2: /* all */ |
||||
tclearregion(0, 0, term.col-1, term.row-1); |
||||
break;
|
||||
} |
||||
break; |
||||
case 'K': /* Clear line */ |
||||
switch(escseq.arg[0]) { |
||||
case 0: /* right */ |
||||
tclearregion(term.c.x, term.c.y, term.col-1, term.c.y); |
||||
break; |
||||
case 1: /* left */ |
||||
tclearregion(0, term.c.y, term.c.x, term.c.y); |
||||
break; |
||||
case 2: /* all */ |
||||
tclearregion(0, term.c.y, term.col-1, term.c.y); |
||||
break; |
||||
} |
||||
break; |
||||
case 'L': /* Insert <n> blank lines */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tinsertblankline(escseq.arg[0]); |
||||
break; |
||||
case 'M': /* Delete <n> lines */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tdeleteline(escseq.arg[0]); |
||||
break; |
||||
case 'P': /* Delete <n> char */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tdeletechar(escseq.arg[0]); |
||||
break; |
||||
case 'd': /* Move to <row> */ |
||||
DEFAULT(escseq.arg[0], 1); |
||||
tmoveto(term.c.x, escseq.arg[0]-1); |
||||
break; |
||||
case 'h': /* Set terminal mode */ |
||||
break; |
||||
case 'm': /* Terminal attribute (color) */ |
||||
tsetattr(escseq.arg, escseq.narg); |
||||
break; |
||||
case 'r': |
||||
if(escseq.priv) |
||||
; |
||||
else { |
||||
DEFAULT(escseq.arg[0], 1); |
||||
DEFAULT(escseq.arg[1], term.row); |
||||
tsetscroll(escseq.arg[0]-1, escseq.arg[1]-1); |
||||
} |
||||
break; |
||||
case 's': /* Save cursor position */ |
||||
tcpos(CSsave); |
||||
break; |
||||
case 'u': /* Load cursor position */ |
||||
tcpos(CSload); |
||||
break; |
||||
} |
||||
break; |
||||
} |
||||
} |
||||
|
||||
void |
||||
escdump(void) {
|
||||
int i; |
||||
puts("------"); |
||||
printf("rawbuf : %s\n", escseq.buf); |
||||
printf("prechar : %c\n", escseq.pre); |
||||
printf("private : %c\n", escseq.priv ? '?' : ' '); |
||||
printf("narg : %d\n", escseq.narg); |
||||
if(escseq.narg) { |
||||
for(i = 0; i < escseq.narg; i++) |
||||
printf("\targ %d = %d\n", i, escseq.arg[i]); |
||||
} |
||||
printf("mode : %c\n", escseq.mode); |
||||
} |
||||
|
||||
void |
||||
escreset(void) { |
||||
memset(&escseq, 0, sizeof(escseq)); |
||||
} |
||||
|
||||
void |
||||
tputc(char c) { |
||||
static int inesc = 0; |
||||
|
||||
dump(c); |
||||
/* start of escseq */ |
||||
if(c == '\033') |
||||
escreset(), inesc = 1; |
||||
else if(inesc) { |
||||
inesc = escaddc(c); |
||||
} /* normal char */
|
||||
else switch(c) {
|
||||
default: |
||||
tsetchar(c); |
||||
tcursor(CSright); |
||||
break; |
||||
case '\b': |
||||
tcursor(CSleft); |
||||
break; |
||||
case '\r': |
||||
tmoveto(0, term.c.y); |
||||
break; |
||||
case '\n': |
||||
tnewline(); |
||||
break; |
||||
case '\a': |
||||
xbell(); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
void |
||||
tputs(char *s, int len) {
|
||||
for(; len > 0; len--) |
||||
tputc(*s++); |
||||
} |
||||
|
||||
void |
||||
tdump(void) { |
||||
int row, col; |
||||
Glyph c; |
||||
|
||||
for(row = 0; row < term.row; row++) { |
||||
for(col = 0; col < term.col; col++) { |
||||
if(col == term.c.x && row == term.c.y) |
||||
putchar('#'); |
||||
else { |
||||
c = term.line[row][col]; |
||||
putchar(c.state & CRset ? c.c : '.'); |
||||
} |
||||
} |
||||
putchar('\n'); |
||||
} |
||||
} |
||||
|
||||
void |
||||
tresize(int col, int row) { |
||||
int i; |
||||
Line *line; |
||||
int minrow = MIN(row, term.row); |
||||
int mincol = MIN(col, term.col); |
||||
|
||||
if(col < 1 || row < 1) |
||||
return; |
||||
line = calloc(row, sizeof(Line)); |
||||
for(i = 0 ; i < row; i++) |
||||
line[i] = calloc(col, sizeof(Glyph)); |
||||
for(i = 0 ; i < minrow; i++) { |
||||
memcpy(line[i], term.line[i], mincol * sizeof(Glyph)); |
||||
free(term.line[i]); |
||||
} |
||||
free(term.line); |
||||
LIMIT(term.c.x, 0, col-1); |
||||
LIMIT(term.c.y, 0, row-1); |
||||
LIMIT(term.top, 0, row-1); |
||||
LIMIT(term.bot, 0, row-1); |
||||
// if(term.bot == term.row-1)
|
||||
term.bot = row-1; |
||||
term.line = line; |
||||
term.col = col, term.row = row; |
||||
} |
||||
|
||||
unsigned long |
||||
xgetcol(const char *s) { |
||||
XColor color; |
||||
Colormap cmap = DefaultColormap(xw.dis, xw.scr); |
||||
|
||||
if(!XAllocNamedColor(xw.dis, cmap, s, &color, &color)) { |
||||
color.pixel = WhitePixel(xw.dis, xw.scr); |
||||
fprintf(stderr, "Could not allocate color '%s'\n", s); |
||||
} |
||||
return color.pixel; |
||||
} |
||||
|
||||
|
||||
void |
||||
xclear(int x1, int y1, int x2, int y2) { |
||||
XClearArea(xw.dis, xw.win,
|
||||
x1 * xw.cw, y1 * xw.ch,
|
||||
(x2-x1+1) * xw.cw, (y2-y1+1) * xw.ch,
|
||||
False); |
||||
} |
||||
|
||||
|
||||
void |
||||
xscroll(void) { |
||||
int srcy = (term.top+1) * xw.ch; |
||||
int dsty = term.top * xw.ch; |
||||
int height = (term.bot-term.top) * xw.ch; |
||||
|
||||
xcursor(CShide); |
||||
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); |
||||
} |
||||
|
||||
|
||||
|
||||
|
||||
void |
||||
xinit(void) { |
||||
XGCValues values; |
||||
unsigned long valuemask; |
||||
XClassHint chint; |
||||
XWMHints wmhint; |
||||
XSizeHints shint; |
||||
char *args[] = {NULL}; |
||||
int i; |
||||
|
||||
xw.dis = XOpenDisplay(NULL); |
||||
xw.scr = XDefaultScreen(xw.dis); |
||||
/* font */ |
||||
dc.font = XLoadQueryFont(xw.dis, FONT); |
||||
xw.cw = dc.font->max_bounds.rbearing - dc.font->min_bounds.lbearing; |
||||
xw.ch = dc.font->ascent + dc.font->descent + LINESPACE; |
||||
/* colors */ |
||||
for(i = 0; i < LEN(colorname); i++) |
||||
dc.col[i] = xgetcol(colorname[i]); |
||||
term.c.attr.fg = DefaultFG; |
||||
term.c.attr.bg = DefaultBG; |
||||
term.c.attr.mode = ATnone; |
||||
/* windows */ |
||||
xw.h = term.row * xw.ch; |
||||
xw.w = term.col * xw.cw; |
||||
/* XXX: this BORDER is useless after the first resize, handle it in xdraws() */ |
||||
xw.win = XCreateSimpleWindow(xw.dis, XRootWindow(xw.dis, xw.scr), 0, 0, |
||||
xw.w, xw.h, BORDER,
|
||||
dc.col[DefaultBG], |
||||
dc.col[DefaultBG]); |
||||
/* gc */ |
||||
values.foreground = XWhitePixel(xw.dis, xw.scr); |
||||
values.font = dc.font->fid; |
||||
valuemask = GCForeground | GCFont; |
||||
dc.gc = XCreateGC(xw.dis, xw.win, valuemask, &values); |
||||
XMapWindow(xw.dis, xw.win); |
||||
/* wm stuff */ |
||||
chint.res_name = TNAME, chint.res_class = TNAME; |
||||
wmhint.input = 1, wmhint.flags = InputHint; |
||||
shint.height_inc = xw.ch, shint.width_inc = xw.cw; |
||||
shint.height = xw.h, shint.width = xw.w; |
||||
shint.flags = PSize | PResizeInc; |
||||
XSetWMProperties(xw.dis, xw.win, NULL, NULL, &args[0], 0, &shint, &wmhint, &chint); |
||||
XStoreName(xw.dis, xw.win, TNAME); |
||||
XSync(xw.dis, 0); |
||||
} |
||||
|
||||
void |
||||
xdrawc(int x, int y, Glyph g) { |
||||
XRectangle r = { x * xw.cw, y * xw.ch, xw.cw, xw.ch }; |
||||
unsigned long xfg, xbg; |
||||
|
||||
/* reverse video */ |
||||
if(g.mode & ATreverse) |
||||
xfg = dc.col[g.bg], xbg = dc.col[g.fg]; |
||||
else |
||||
xfg = dc.col[g.fg], xbg = dc.col[g.bg]; |
||||
/* background */ |
||||
XSetForeground(xw.dis, dc.gc, xbg); |
||||
XFillRectangles(xw.dis, xw.win, dc.gc, &r, 1); |
||||
/* string */ |
||||
XSetForeground(xw.dis, dc.gc, xfg); |
||||
XDrawString(xw.dis, xw.win, dc.gc, r.x, r.y+dc.font->ascent, &(g.c), 1); |
||||
if(g.mode & ATbold) /* XXX: bold hack (draw again at x+1) */ |
||||
XDrawString(xw.dis, xw.win, dc.gc, r.x+1, r.y+dc.font->ascent, &(g.c), 1); |
||||
/* underline */ |
||||
if(g.mode & ATunderline) { |
||||
r.y += dc.font->ascent + 1; |
||||
XDrawLine(xw.dis, xw.win, dc.gc, r.x, r.y, r.x+r.width-1, r.y); |
||||
} |
||||
} |
||||
|
||||
void |
||||
xcursor(int mode) { |
||||
static int oldx = 0; |
||||
static int oldy = 0; |
||||
Glyph g = {' ', ATnone, DefaultBG, DefaultCS, 0}; |
||||
|
||||
if(term.line[term.c.y][term.c.x].state & CRset) |
||||
g.c = term.line[term.c.y][term.c.x].c; |
||||
/* remove the old cursor */ |
||||
if(term.line[oldy][oldx].state & CRset) |
||||
xdrawc(oldx, oldy, term.line[oldy][oldx]); |
||||
else xclear(oldx, oldy, oldx, oldy); /* XXX: maybe a bug */ |
||||
if(mode == CSdraw && !term.c.hidden) { |
||||
xdrawc(term.c.x, term.c.y, g); |
||||
oldx = term.c.x, oldy = term.c.y; |
||||
} |
||||
} |
||||
|
||||
|
||||
void |
||||
draw(int redraw_all) { |
||||
int x, y; |
||||
int changed, set; |
||||
|
||||
if(redraw_all) |
||||
XClearWindow(xw.dis, xw.win); |
||||
/* XXX: drawing could be optimised */ |
||||
for(y = 0; y < term.row; y++) { |
||||
for(x = 0; x < term.col; x++) { |
||||
changed = term.line[y][x].state & CRupdate; |
||||
set = term.line[y][x].state & CRset; |
||||
if((changed && set) || (redraw_all && set)) { |
||||
term.line[y][x].state &= ~CRupdate; |
||||
xdrawc(x, y, term.line[y][x]); |
||||
} |
||||
} |
||||
} |
||||
xcursor(CSdraw); |
||||
} |
||||
|
||||
void |
||||
kpress(XKeyEvent *e) { |
||||
KeySym ksym; |
||||
char buf[32]; |
||||
int len; |
||||
int meta; |
||||
int shift; |
||||
|
||||
meta = e->state & Mod4Mask; |
||||
shift = e->state & ShiftMask; |
||||
len = XLookupString(e, buf, sizeof(buf), &ksym, NULL); |
||||
if(len > 0) { |
||||
buf[sizeof(buf)-1] = '\0'; |
||||
if(meta && len == 1) |
||||
ttywrite("\033", 1); |
||||
ttywrite(buf, len); |
||||
return; |
||||
} |
||||
switch(ksym) { |
||||
#ifdef DEBUG1 |
||||
default: |
||||
printf("errkey: %d\n", (int)ksym); |
||||
break; |
||||
#endif |
||||
case XK_Up: |
||||
case XK_Down: |
||||
case XK_Left: |
||||
case XK_Right: |
||||
sprintf(buf, "\033[%c", "DACB"[ksym - XK_Left]); |
||||
ttywrite(buf, 3); |
||||
break; |
||||
case XK_Delete: ttywrite(KEYDELETE, sizeof(KEYDELETE)-1); break; |
||||
case XK_Home: ttywrite( KEYHOME, sizeof( KEYHOME)-1); break; |
||||
case XK_End: ttywrite( KEYEND, sizeof( KEYEND)-1); break; |
||||
case XK_Prior: ttywrite( KEYPREV, sizeof( KEYPREV)-1); break; |
||||
case XK_Next: ttywrite( KEYNEXT, sizeof( KEYNEXT)-1); break; |
||||
case XK_Insert: |
||||
/* XXX: paste X clipboard */ |
||||
if(shift); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
void |
||||
resize(XEvent *e) { |
||||
int col, row; |
||||
col = e->xconfigure.width / xw.cw; |
||||
row = e->xconfigure.height / xw.ch; |
||||
|
||||
if(term.col != col && term.row != row) { |
||||
tresize(col, row); |
||||
ttyresize(col, row); |
||||
xw.w = e->xconfigure.width; |
||||
xw.h = e->xconfigure.height; |
||||
draw(SCredraw); |
||||
} |
||||
} |
||||
|
||||
|
||||
void |
||||
run(void) { |
||||
int ret; |
||||
XEvent ev; |
||||
fd_set rfd; |
||||
struct timeval tv = {0, 10000}; |
||||
|
||||
running = 1; |
||||
XSelectInput(xw.dis, xw.win, ExposureMask | KeyPressMask | StructureNotifyMask); |
||||
XResizeWindow(xw.dis, xw.win, xw.w , xw.h); /* seems to fix the resize bug in wmii */ |
||||
while(running) { |
||||
while(XPending(xw.dis)) { |
||||
XNextEvent(xw.dis, &ev); |
||||
switch (ev.type) { |
||||
default: |
||||
break; |
||||
case KeyPress: |
||||
kpress(&ev.xkey); |
||||
break; |
||||
case Expose: |
||||
draw(SCredraw); |
||||
break; |
||||
case ConfigureNotify: |
||||
resize(&ev); |
||||
break; |
||||
} |
||||
} |
||||
FD_ZERO(&rfd); |
||||
FD_SET(cmdfd, &rfd); |
||||
ret = select(cmdfd+1, &rfd, NULL, NULL, &tv); |
||||
if(ret < 0) { |
||||
fprintf(stderr, "select: %m\n"); |
||||
running = 0; |
||||
} |
||||
if(!ret) |
||||
continue; |
||||
if(FD_ISSET(cmdfd, &rfd)) { |
||||
ttyread(); |
||||
draw(SCupdate); |
||||
} |
||||
} |
||||
} |
||||
|
||||
int |
||||
main(int argc, char *argv[]) { |
||||
if(argc == 2 && !strncmp("-v", argv[1], 3)) |
||||
die("st-"VERSION", © 2009 st engineers\n"); |
||||
else if(argc != 1) |
||||
die("usage: st [-v]\n"); |
||||
setlocale(LC_CTYPE, ""); |
||||
tnew(80, 24); |
||||
ttynew(); |
||||
xinit(); |
||||
run(); |
||||
return 0; |
||||
} |
||||
|
||||
@ -0,0 +1,181 @@ |
||||
/* See LICENSE for licence details. */ |
||||
|
||||
#define _XOPEN_SOURCE |
||||
#include <ctype.h> |
||||
#include <fcntl.h> |
||||
#include <locale.h> |
||||
#include <stdarg.h> |
||||
#include <stdio.h> |
||||
#include <stdlib.h> |
||||
#include <string.h> |
||||
#include <unistd.h> |
||||
#include <sys/types.h> |
||||
#include <sys/stat.h> |
||||
#include <sys/select.h> |
||||
#include <sys/ioctl.h> |
||||
#include <X11/Xlib.h> |
||||
#include <X11/keysym.h> |
||||
#include <X11/Xutil.h> |
||||
|
||||
/* special keys */ |
||||
#define KEYDELETE "\033[3~" |
||||
#define KEYHOME "\033[1~" |
||||
#define KEYEND "\033[4~" |
||||
#define KEYPREV "\033[5~" |
||||
#define KEYNEXT "\033[6~" |
||||
|
||||
#define TNAME "st" |
||||
#define SHELL "/bin/bash" |
||||
#define TAB 8 |
||||
|
||||
#define FONT "-*-terminus-medium-r-normal-*-14-*-*-*-*-*-*-*" |
||||
#define BORDER 3 |
||||
#define LINESPACE 1 /* additional pixel between each line */ |
||||
|
||||
/* Default colors */ |
||||
#define DefaultFG 7 |
||||
#define DefaultBG 0 |
||||
#define DefaultCS 1 |
||||
#define BellCol DefaultFG /* visual bell color */ |
||||
|
||||
static char* colorname[] = { |
||||
"black", |
||||
"red", |
||||
"green", |
||||
"yellow", |
||||
"blue", |
||||
"magenta", |
||||
"cyan", |
||||
"white", |
||||
}; |
||||
|
||||
|
||||
/* Arbitrary sizes */ |
||||
#define ESCSIZ 256 |
||||
#define ESCARG 16 |
||||
|
||||
#define MIN(a, b) ((a) < (b) ? (a) : (b)) |
||||
#define MAX(a, b) ((a) < (b) ? (b) : (a)) |
||||
#define LEN(a) (sizeof(a) / sizeof(a[0])) |
||||
#define DEFAULT(a, b) (a) = (a) ? (a) : (b) |
||||
#define BETWEEN(x, a, b) ((a) <= (x) && (x) <= (b)) |
||||
#define LIMIT(x, a, b) (x) = (x) < (a) ? (a) : (x) > (b) ? (b) : (x) |
||||
|
||||
|
||||
enum { ATnone=0 , ATreverse=1 , ATunderline=2, ATbold=4 }; /* Attribute */ |
||||
enum { CSup, CSdown, CSright, CSleft, CShide, CSdraw, CSwrap, CSsave, CSload }; /* Cursor */ |
||||
enum { CRset=1 , CRupdate=2 }; /* Character state */ |
||||
enum { TMwrap=1 , TMinsert=2 }; /* Terminal mode */ |
||||
enum { SCupdate, SCredraw }; /* screen draw mode */ |
||||
|
||||
#ifdef TRUECOLOR |
||||
#error Truecolor not implemented yet |
||||
typedef int Color; |
||||
#else |
||||
typedef char Color; |
||||
#endif |
||||
|
||||
|
||||
typedef struct { |
||||
char c; /* character code */ |
||||
char mode; /* attribute flags */ |
||||
Color fg; /* foreground */ |
||||
Color bg; /* background */ |
||||
char state; /* state flag */ |
||||
} Glyph; |
||||
|
||||
typedef Glyph* Line; |
||||
|
||||
typedef struct { |
||||
Glyph attr; /* current char attributes */ |
||||
char hidden; |
||||
int x; |
||||
int y; |
||||
} TCursor; |
||||
|
||||
/* Escape sequence structs */ |
||||
typedef struct { |
||||
char buf[ESCSIZ+1]; /* raw string */ |
||||
int len; /* raw string length */ |
||||
/* ESC <pre> [[ [<priv>] <arg> [;]] <mode>] */ |
||||
char pre;
|
||||
char priv; |
||||
int arg[ESCARG+1]; |
||||
int narg; /* nb of args */ |
||||
char mode; |
||||
} Escseq; |
||||
|
||||
/* Internal representation of the screen */ |
||||
typedef struct { |
||||
int row; /* nb row */
|
||||
int col; /* nb col */ |
||||
Line* line; /* screen */ |
||||
TCursor c; /* cursor */ |
||||
int top; /* top scroll limit */ |
||||
int bot; /* bottom scroll limit */ |
||||
int mode; /* terminal mode */ |
||||
} Term; |
||||
|
||||
/* Purely graphic info */ |
||||
typedef struct { |
||||
Display* dis; |
||||
Window win; |
||||
int scr; |
||||
int w; /* window width */ |
||||
int h; /* window height */ |
||||
int ch; /* char height */ |
||||
int cw; /* char width */ |
||||
} XWindow;
|
||||
|
||||
/* Drawing Context */ |
||||
typedef struct { |
||||
unsigned long col[LEN(colorname)]; |
||||
XFontStruct* font; |
||||
GC gc; |
||||
} DC; |
||||
|
||||
|
||||
void die(const char *errstr, ...); |
||||
void draw(int); |
||||
void execsh(void); |
||||
void kpress(XKeyEvent *); |
||||
void resize(XEvent *); |
||||
void run(void); |
||||
|
||||
int escaddc(char); |
||||
int escfinal(char); |
||||
void escdump(void); |
||||
void eschandle(void); |
||||
void escparse(void); |
||||
void escreset(void); |
||||
|
||||
void tclearregion(int, int, int, int); |
||||
void tcpos(int); |
||||
void tcursor(int); |
||||
void tdeletechar(int); |
||||
void tdeleteline(int); |
||||
void tdump(void); |
||||
void tinsertblank(int); |
||||
void tinsertblankline(int); |
||||
void tmoveto(int, int); |
||||
void tnew(int, int); |
||||
void tnewline(void); |
||||
void tputc(char); |
||||
void tputs(char*, int); |
||||
void tresize(int, int); |
||||
void tscroll(void); |
||||
void tsetattr(int*, int); |
||||
void tsetchar(char); |
||||
void tsetscroll(int, int); |
||||
|
||||
void ttynew(void); |
||||
void ttyread(void); |
||||
void ttyresize(int, int); |
||||
void ttywrite(char *, size_t); |
||||
|
||||
unsigned long xgetcol(const char *); |
||||
void xclear(int, int, int, int); |
||||
void xcursor(int); |
||||
void xdrawc(int, int, Glyph); |
||||
void xinit(void); |
||||
void xscroll(void); |
||||
@ -0,0 +1,54 @@ |
||||
# Reconstructed via infocmp from file: /lib/terminfo/p/pcansi |
||||
st| simpleterm, |
||||
am, |
||||
ul, |
||||
mir, |
||||
msgr, |
||||
colors#8, |
||||
cols#80, |
||||
it#8, |
||||
lines#24, |
||||
ncv#3, |
||||
pairs#64, |
||||
acsc=*`#aof+g+j+k+l+m+n-o-p-q-r-s+t+u+v+w|x<y>z{{||}}-~, |
||||
bel=^G, |
||||
bold=\E[1m, |
||||
cbt=\E[Z, |
||||
clear=\E[H\E[2J, |
||||
cr=^M, |
||||
cub1=\E[D, |
||||
cud1=\E[B, |
||||
cuf1=\E[C, |
||||
cup=\E[%i%p1%d;%p2%dH, |
||||
cuu1=\E[A, |
||||
dch1=\E[P, |
||||
dl1=\E[M, |
||||
ed=\E[J, |
||||
el=\E[K, |
||||
home=\E[H, |
||||
ht=^I, |
||||
hts=\EH, |
||||
il1=\E[L, |
||||
ind=^J, |
||||
invis=\E[8m, |
||||
kbs=^H, |
||||
kcub1=\E[D, |
||||
kcud1=\E[B, |
||||
kcuf1=\E[C, |
||||
kcuu1=\E[A, |
||||
khome=\E[1~, |
||||
knp=\E[6~, |
||||
kpp=\E[5~, |
||||
op=\E[37;40m, |
||||
rev=\E[7m, |
||||
rmacs=\E[10m, |
||||
rmso=\E[m, |
||||
rmul=\E[m, |
||||
setab=\E[4%p1%dm, |
||||
setaf=\E[3%p1%dm, |
||||
# sgr=\E[0;10%?%p1%t;7%;%?%p2%t;4%;%?%p3%t;7%;%?%p4%t;5%;%?%p6%t;1%;%?%p7%t;8%;%?%p9%t;12%;m, |
||||
sgr0=\E[0m, |
||||
smacs=\E[12m, |
||||
smso=\E[7m, |
||||
smul=\E[4m, |
||||
tbc=\E[2g, |
||||
@ -1,363 +0,0 @@ |
||||
/* See LICENSE file for copyright and license details.
|
||||
* |
||||
* Simple terminal daemon is a terminal emulator. It can be used in |
||||
* combination with simple terminal to emulate a mostly VT100-compatible |
||||
* terminal. |
||||
*
|
||||
* In this process std works like a filter. It reads data from a |
||||
* pseudo-terminal and parses the escape sequences and transforms them |
||||
* into an ed(1)-like language. The resulting data is buffered and |
||||
* written to stdout. |
||||
* Parallely it reads data from stdin and parses and executes the |
||||
* commands. The resulting data is written to the pseudo-terminal. |
||||
*/ |
||||
#include <sys/types.h> |
||||
#include <sys/wait.h> |
||||
#include <ctype.h> |
||||
#include <err.h> |
||||
#include <errno.h> |
||||
#include <fcntl.h> |
||||
#if !(_POSIX_C_SOURCE >= 200112L || _XOPEN_SOURCE >= 600) |
||||
#include <pty.h> |
||||
#endif |
||||
#include <signal.h> |
||||
#include <stdarg.h> |
||||
#include <stdio.h> |
||||
#include <stdlib.h> |
||||
#include <string.h> |
||||
#include <unistd.h> |
||||
|
||||
#define LENGTH(x) (sizeof(x) / sizeof((x)[0])) |
||||
#define MAX(a,b) (((a) > (b)) ? (a) : (b)) |
||||
#define MIN(a,b) (((a) < (b)) ? (a) : (b)) |
||||
|
||||
typedef struct { |
||||
unsigned char data[BUFSIZ]; |
||||
int s, e; |
||||
int n; |
||||
} RingBuffer; |
||||
|
||||
static void buffer(char c); |
||||
static void cmd(const char *cmdstr, ...); |
||||
static void getpty(void); |
||||
static void movea(int x, int y); |
||||
static void mover(int x, int y); |
||||
static void parsecmd(void); |
||||
static void parseesc(void); |
||||
static void scroll(int l); |
||||
static void shell(void); |
||||
static void sigchld(int n); |
||||
static char unbuffer(void); |
||||
|
||||
static int cols = 80, lines = 25; |
||||
static int cx = 0, cy = 0; |
||||
static int c; |
||||
static int ptm, pts; |
||||
static _Bool bold, digit, qmark; |
||||
static pid_t pid; |
||||
static RingBuffer buf; |
||||
static FILE *fptm; |
||||
|
||||
void |
||||
buffer(char c) { |
||||
if(buf.n < LENGTH(buf.data)) |
||||
buf.n++; |
||||
else |
||||
buf.s = (buf.s + 1) % LENGTH(buf.data); |
||||
buf.data[buf.e++] = c; |
||||
buf.e %= LENGTH(buf.data); |
||||
} |
||||
|
||||
void |
||||
cmd(const char *cmdstr, ...) { |
||||
va_list ap; |
||||
|
||||
putchar('\n'); |
||||
putchar(':'); |
||||
va_start(ap, cmdstr); |
||||
vfprintf(stdout, cmdstr, ap); |
||||
va_end(ap); |
||||
} |
||||
|
||||
void |
||||
movea(int x, int y) { |
||||
x = MAX(x, cols); |
||||
y = MAX(y, lines); |
||||
cx = x; |
||||
cy = y; |
||||
cmd("seek(%d,%d)", x, y); |
||||
} |
||||
|
||||
void |
||||
mover(int x, int y) { |
||||
movea(cx + x, cy + y); |
||||
} |
||||
|
||||
void |
||||
parsecmd(void) { |
||||
} |
||||
|
||||
void |
||||
parseesc(void) { |
||||
int i, j; |
||||
int arg[16]; |
||||
|
||||
memset(arg, 0, LENGTH(arg)); |
||||
c = getc(fptm); |
||||
switch(c) { |
||||
case '[': |
||||
c = getc(fptm); |
||||
for(j = 0; j < LENGTH(arg);) { |
||||
if(isdigit(c)) { |
||||
digit = 1; |
||||
arg[j] *= 10; |
||||
arg[j] += c - '0'; |
||||
} |
||||
else if(c == '?') |
||||
qmark = 1; |
||||
else if(c == ';') { |
||||
if(!digit) |
||||
errx(EXIT_FAILURE, "syntax error"); |
||||
digit = 0; |
||||
j++; |
||||
} |
||||
else { |
||||
if(digit) { |
||||
digit = 0; |
||||
j++; |
||||
} |
||||
break; |
||||
} |
||||
c = getc(fptm); |
||||
} |
||||
switch(c) { |
||||
case '@': |
||||
break; |
||||
case 'A': |
||||
mover(0, j ? arg[0] : 1); |
||||
break; |
||||
case 'B': |
||||
mover(0, j ? -arg[0] : -1); |
||||
break; |
||||
case 'C': |
||||
mover(j ? arg[0] : 1, 0); |
||||
break; |
||||
case 'D': |
||||
mover(j ? -arg[0] : -1, 0); |
||||
break; |
||||
case 'E': |
||||
/* movel(j ? arg[0] : 1); */ |
||||
break; |
||||
case 'F': |
||||
/* movel(j ? -arg[0] : -1); */ |
||||
break; |
||||
case '`': |
||||
case 'G': |
||||
movea(j ? arg[0] : 1, cy); |
||||
break; |
||||
case 'f': |
||||
case 'H': |
||||
movea(arg[1] ? arg[1] : 1, arg[0] ? arg[0] : 1); |
||||
case 'L': |
||||
/* insline(j ? arg[0] : 1); */ |
||||
break; |
||||
case 'M': |
||||
/* delline(j ? arg[0] : 1); */ |
||||
break; |
||||
case 'P': |
||||
break; |
||||
case 'S': |
||||
scroll(j ? arg[0] : 1); |
||||
break; |
||||
case 'T': |
||||
scroll(j ? -arg[0] : -1); |
||||
break; |
||||
case 'd': |
||||
movea(cx, j ? arg[0] : 1); |
||||
break; |
||||
case 'm': |
||||
for(i = 0; i < j; i++) { |
||||
if(arg[i] >= 30 && arg[i] <= 37) |
||||
cmd("#%d", arg[i] - 30); |
||||
if(arg[i] >= 40 && arg[i] <= 47) |
||||
cmd("|%d", arg[i] - 40); |
||||
/* xterm bright colors */ |
||||
if(arg[i] >= 90 && arg[i] <= 97) |
||||
cmd("#%d", arg[i] - 90); |
||||
if(arg[i] >= 100 && arg[i] <= 107) |
||||
cmd("|%d", arg[i] - 100); |
||||
switch(arg[i]) { |
||||
case 0: |
||||
case 22: |
||||
if(bold) |
||||
cmd("bold"); |
||||
case 1: |
||||
if(!bold) |
||||
cmd("bold"); |
||||
break; |
||||
} |
||||
} |
||||
break; |
||||
} |
||||
break; |
||||
default: |
||||
putchar('\033'); |
||||
ungetc(c, fptm); |
||||
} |
||||
} |
||||
|
||||
void |
||||
scroll(int l) { |
||||
cmd("seek(%d,%d)", cx, cy + l); |
||||
} |
||||
|
||||
void |
||||
getpty(void) { |
||||
char *ptsdev; |
||||
|
||||
#if defined(_GNU_SOURCE) |
||||
ptm = getpt(); |
||||
#elif _POSIX_C_SOURCE >= 200112L || _XOPEN_SOURCE >= 600 |
||||
ptm = posix_openpt(O_RDWR); |
||||
#else |
||||
ptm = open("/dev/ptmx", O_RDWR); |
||||
if(ptm == -1) |
||||
if(openpty(&ptm, &pts, NULL, NULL, NULL) == -1) |
||||
err(EXIT_FAILURE, "cannot open pty"); |
||||
#endif |
||||
#if defined(_XOPEN_SOURCE) |
||||
if(ptm != -1) { |
||||
if(grantpt(ptm) == -1) |
||||
err(EXIT_FAILURE, "cannot grant access to pty"); |
||||
if(unlockpt(ptm) == -1) |
||||
err(EXIT_FAILURE, "cannot unlock pty"); |
||||
ptsdev = ptsname(ptm); |
||||
if(!ptsdev) |
||||
err(EXIT_FAILURE, "slave pty name undefined"); |
||||
pts = open(ptsdev, O_RDWR); |
||||
if(pts == -1) |
||||
err(EXIT_FAILURE, "cannot open slave pty"); |
||||
} |
||||
else |
||||
err(EXIT_FAILURE, "cannot open pty"); |
||||
#endif |
||||
} |
||||
|
||||
void |
||||
shell(void) { |
||||
static char *shell = NULL; |
||||
|
||||
if(!shell && !(shell = getenv("SHELL"))) |
||||
shell = "/bin/sh"; |
||||
pid = fork(); |
||||
switch(pid) { |
||||
case -1: |
||||
err(EXIT_FAILURE, "cannot fork"); |
||||
case 0: |
||||
setsid(); |
||||
dup2(pts, STDIN_FILENO); |
||||
dup2(pts, STDOUT_FILENO); |
||||
dup2(pts, STDERR_FILENO); |
||||
close(ptm); |
||||
putenv("TERM=vt102"); |
||||
execvp(shell, NULL); |
||||
break; |
||||
default: |
||||
close(pts); |
||||
signal(SIGCHLD, sigchld); |
||||
} |
||||
} |
||||
|
||||
void |
||||
sigchld(int n) { |
||||
int ret; |
||||
|
||||
if(waitpid(pid, &ret, 0) == -1) |
||||
err(EXIT_FAILURE, "waiting for child failed"); |
||||
if(WIFEXITED(ret)) |
||||
exit(WEXITSTATUS(ret)); |
||||
else |
||||
exit(EXIT_SUCCESS); |
||||
} |
||||
|
||||
char |
||||
unbuffer(void) { |
||||
char c; |
||||
|
||||
c = buf.data[buf.s++]; |
||||
buf.s %= LENGTH(buf.data); |
||||
buf.n--; |
||||
return c; |
||||
} |
||||
|
||||
int |
||||
main(int argc, char *argv[]) { |
||||
fd_set rfds; |
||||
|
||||
if(argc == 2 && !strcmp("-v", argv[1])) |
||||
errx(EXIT_SUCCESS, "std-"VERSION", © 2008 Matthias-Christian Ott"); |
||||
else if(argc == 1) |
||||
errx(EXIT_FAILURE, "usage: std [-v]"); |
||||
getpty(); |
||||
shell(); |
||||
FD_ZERO(&rfds); |
||||
FD_SET(STDIN_FILENO, &rfds); |
||||
FD_SET(ptm, &rfds); |
||||
if(!(fptm = fdopen(ptm, "r+"))) |
||||
err(EXIT_FAILURE, "cannot open pty"); |
||||
if(fcntl(ptm, F_SETFL, O_NONBLOCK) == -1) |
||||
err(EXIT_FAILURE, "cannot set pty to non-blocking mode"); |
||||
if(fcntl(STDIN_FILENO, F_SETFL, O_NONBLOCK) == -1) |
||||
err(EXIT_FAILURE, "cannot set stdin to non-blocking mode"); |
||||
for(;;) { |
||||
if(select(MAX(ptm, STDIN_FILENO) + 1, &rfds, NULL, NULL, NULL) == -1) |
||||
err(EXIT_FAILURE, "cannot select"); |
||||
if(FD_ISSET(ptm, &rfds)) { |
||||
for(;;) { |
||||
if((c = getc(fptm)) == EOF) { |
||||
if(feof(fptm)) { |
||||
FD_CLR(ptm, &rfds); |
||||
fflush(fptm); |
||||
break; |
||||
} |
||||
if(errno != EAGAIN) |
||||
err(EXIT_FAILURE, "cannot read from pty"); |
||||
fflush(stdout); |
||||
break; |
||||
} |
||||
switch(c) { |
||||
case '\033': |
||||
parseesc(); |
||||
break; |
||||
default: |
||||
putchar(c); |
||||
} |
||||
} |
||||
fflush(stdout); |
||||
} |
||||
if(FD_ISSET(STDIN_FILENO, &rfds)) { |
||||
for(;;) { |
||||
if((c = getchar()) == EOF) { |
||||
if(feof(stdin)) { |
||||
FD_CLR(STDIN_FILENO, &rfds); |
||||
fflush(fptm); |
||||
break; |
||||
} |
||||
if(errno != EAGAIN) |
||||
err(EXIT_FAILURE, "cannot read from stdin"); |
||||
fflush(fptm); |
||||
break; |
||||
} |
||||
switch(c) { |
||||
case ':': |
||||
parsecmd(); |
||||
break; |
||||
default: |
||||
putc(c, fptm); |
||||
} |
||||
} |
||||
fflush(fptm); |
||||
} |
||||
} |
||||
return 0; |
||||
} |
||||
Loading…
Reference in new issue