diff options
| author | Anselm R Garbe <garbeam@gmail.com> | 2009-05-10 13:17:09 +0100 | 
|---|---|---|
| committer | Anselm R Garbe <garbeam@gmail.com> | 2009-05-10 13:17:09 +0100 | 
| commit | c740fb5be8be9f75e1ed69758d05773c96d079ee (patch) | |
| tree | dfe3362a600e9491a687cd765158b70d3328333d | |
| parent | ad4256295bb9edc8f33c95db2be6775765ee6314 (diff) | |
| download | st-c740fb5be8be9f75e1ed69758d05773c96d079ee.tar.gz st-c740fb5be8be9f75e1ed69758d05773c96d079ee.zip | |
backport of local changes
| -rw-r--r-- | LICENSE | 43 | ||||
| -rw-r--r-- | Makefile | 69 | ||||
| -rw-r--r-- | README | 28 | ||||
| -rw-r--r-- | TODO | 9 | ||||
| -rw-r--r-- | config.mk | 31 | ||||
| -rw-r--r-- | st.c | 926 | ||||
| -rw-r--r-- | st.h | 181 | ||||
| -rw-r--r-- | st.info | 54 | ||||
| -rw-r--r-- | std.c | 363 | 
9 files changed, 1278 insertions, 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 diff --git a/config.mk b/config.mk new file mode 100644 index 0000000..62eb48f --- /dev/null +++ b/config.mk @@ -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;  	} -	else if(argc != 1) { -		fprintf(stderr, "usage: st [-v]\n"); -		exit(EXIT_FAILURE); +	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; +	} +} + +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; -} | 
