Big internal reorganisation to move tty control into parent.

1 files changed, 401 insertions, 0 deletions

diff --git a/tty.c b/tty.c
new file mode 100644
index 00000000..636c738c
--- /dev/null
+++ b/tty.c
@@ -0,0 +1,401 @@
+/* $Id: tty.c,v 1.1 2007-11-27 19:23:34 nicm Exp $ */
+
+/*
+ * Copyright (c) 2007 Nicholas Marriott <nicm@users.sourceforge.net>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
+ * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
+ * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ */
+
+#include <sys/types.h>
+#include <sys/ioctl.h>
+
+#include <curses.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <string.h>
+#define TTYDEFCHARS
+/* glibc requires unistd.h before termios.h for TTYDEFCHARS. */
+#include <unistd.h>	
+#include <termios.h>
+
+#include "tmux.h"
+
+void	tty_fill_acs(struct tty *);
+u_char	tty_get_acs(struct tty *, u_char);
+
+void	tty_raw(struct tty *, const char *);
+void	tty_puts(struct tty *, const char *);
+void	tty_putc(struct tty *, char);
+
+void	tty_attributes(struct tty *, u_char, u_char);
+char	tty_translate(char);
+
+void
+tty_init(struct tty *tty, char *path, char *term)
+{
+	tty->path = xstrdup(path);
+	tty->term = xstrdup(term);
+}
+
+int
+tty_open(struct tty *tty, char **cause)
+{
+	struct termios	 tio;
+	int		 error;
+
+	tty->fd = open(tty->path, O_RDWR|O_NONBLOCK);
+	if (tty->fd == -1) {
+		xasprintf(cause, "%s: %s", tty->path, strerror(errno));
+		return (-1);
+	}
+
+	if (tty->term == NULL)
+		tty->term = xstrdup("unknown");
+	if (setupterm(tty->term, tty->fd, &error) != OK) {
+		switch (error) {
+		case 0:
+			xasprintf(cause, "can't use hardcopy terminal");
+			break;
+		case 1:
+			xasprintf(cause, "missing or unsuitable terminal");
+			break;
+		case 2:
+			xasprintf(cause, "can't find terminfo database");
+			break;
+		default:
+			xasprintf(cause, "unknown error");
+		}
+		return (-1);
+	}
+	tty->termp = cur_term;
+
+	tty->in = buffer_create(BUFSIZ);
+	tty->out = buffer_create(BUFSIZ);
+
+	tty->attr = SCREEN_DEFATTR;
+	tty->colr = SCREEN_DEFCOLR;
+
+	tty_keys_init(tty);
+	
+	tty_fill_acs(tty);
+
+	if (tcgetattr(tty->fd, &tty->tio) != 0)
+		fatal("tcgetattr failed");
+	memset(&tio, 0, sizeof tio);
+	tio.c_iflag = TTYDEF_IFLAG & ~(IXON|IXOFF|ICRNL|INLCR);
+	tio.c_oflag = TTYDEF_OFLAG & ~(OPOST|ONLCR|OCRNL|ONLRET);
+	tio.c_lflag = 
+	    TTYDEF_LFLAG & ~(IEXTEN|ICANON|ECHO|ECHOE|ECHOKE|ECHOCTL|ISIG);
+	tio.c_cflag = TTYDEF_CFLAG;
+	memcpy(&tio.c_cc, ttydefchars, sizeof tio.c_cc);
+	cfsetspeed(&tio, TTYDEF_SPEED);
+	if (tcsetattr(tty->fd, TCSANOW, &tio) != 0)
+		fatal("tcsetattr failed");
+
+	if (enter_ca_mode != NULL)
+		tty_puts(tty, enter_ca_mode);
+	if (keypad_xmit != NULL)
+		tty_puts(tty, keypad_xmit);
+	if (ena_acs != NULL)
+		tty_puts(tty, ena_acs);
+	tty_puts(tty, clear_screen);
+
+	return (0);
+}
+
+void
+tty_close(struct tty *tty)
+{
+	struct winsize	ws;
+
+	if (ioctl(tty->fd, TIOCGWINSZ, &ws) == -1)
+		fatal("ioctl(TIOCGWINSZ)");
+
+	if (keypad_local != NULL)
+		tty_raw(tty, keypad_local);
+	if (exit_ca_mode != NULL)
+		tty_raw(tty, exit_ca_mode);
+	tty_raw(tty, clear_screen);
+	if (cursor_normal != NULL)
+		tty_raw(tty, cursor_normal);
+	if (exit_attribute_mode != NULL)
+		tty_raw(tty, exit_attribute_mode);
+	if (change_scroll_region != NULL)
+		tty_raw(tty, tparm(change_scroll_region, 0, ws.ws_row - 1));
+
+	if (tcsetattr(tty->fd, TCSANOW, &tty->tio) != 0)
+		fatal("tcsetattr failed");
+	del_curterm(tty->termp);
+
+	tty_keys_free(tty);
+
+	close(tty->fd);
+	buffer_destroy(tty->in);
+	buffer_destroy(tty->out);
+}
+
+void
+tty_free(struct tty *tty)
+{
+	if (tty->fd != -1)
+		tty_close(tty);
+
+	if (tty->path != NULL)
+		xfree(tty->path);
+	if (tty->term != NULL)
+		xfree(tty->term);
+}
+
+void
+tty_fill_acs(struct tty *tty)
+{
+	char	*ptr;
+
+	memset(tty->acs, 0, sizeof tty->acs);
+	if (acs_chars == NULL || (strlen(acs_chars) % 2) != 0)
+		return;
+	for (ptr = acs_chars; *ptr != '\0'; ptr += 2)
+		tty->acs[(u_char) ptr[0]] = ptr[1];
+}
+
+u_char
+tty_get_acs(struct tty *tty, u_char ch)
+{
+	if (tty->acs[ch] != '\0')
+		return (tty->acs[ch]);
+	return (ch);
+}
+
+void
+tty_raw(struct tty *tty, const char *s)
+{
+	write(tty->fd, s, strlen(s));
+}
+
+void
+tty_puts(struct tty *tty, const char *s)
+{
+	buffer_write(tty->out, s, strlen(s));
+}
+
+void
+tty_putc(struct tty *tty, char ch)
+{
+	if (tty->attr & ATTR_DRAWING)
+		ch = tty_get_acs(tty, ch);
+	buffer_write8(tty->out, ch);
+}
+
+void
+tty_vwrite(struct tty *tty, int cmd, va_list ap)
+{
+	char	ch;
+	u_int	ua, ub;
+
+	set_curterm(tty->termp);
+
+	switch (cmd) {
+	case TTY_CHARACTER:
+		ch = va_arg(ap, int);
+		switch (ch) {
+		case '\n':	/* LF */
+			tty_puts(tty, cursor_down);
+			break;
+		case '\r':	/* CR */
+			tty_puts(tty, carriage_return);
+			break;
+		case '\007':	/* BEL */
+			if (bell != NULL)
+				tty_puts(tty, bell);
+			break;
+		case '\010':	/* BS */
+			tty_puts(tty, cursor_left);
+			break;
+		default:
+			tty_putc(tty, ch);
+			break;
+		}
+		break;
+	case TTY_CURSORUP:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_up_cursor, ua));
+		break;
+	case TTY_CURSORDOWN:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_down_cursor, ua));
+		break;
+	case TTY_CURSORRIGHT:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_right_cursor, ua));
+		break;
+	case TTY_CURSORLEFT:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_left_cursor, ua));
+		break;
+	case TTY_CURSORMOVE:
+		ua = va_arg(ap, u_int);
+		ub = va_arg(ap, u_int);
+		tty_puts(tty, tparm(cursor_address, ua, ub));
+		break;
+	case TTY_CLEARENDOFLINE:
+		tty_puts(tty, clr_eol);
+		break;
+	case TTY_CLEARSTARTOFLINE:
+		tty_puts(tty, clr_bol);
+		break;
+	case TTY_CLEARLINE:
+		tty_puts(tty, clr_eol);	/* XXX */
+		break;
+	case TTY_INSERTLINE:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_insert_line, ua));
+		break;
+	case TTY_DELETELINE:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_delete_line, ua));
+		break;
+	case TTY_INSERTCHARACTER:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_ich, ua));
+		break;
+	case TTY_DELETECHARACTER:
+		ua = va_arg(ap, u_int);
+		tty_puts(tty, tparm(parm_dch, ua));
+		break;
+	case TTY_CURSORON:
+		if (cursor_normal != NULL)
+			tty_puts(tty, cursor_normal);
+		break;
+	case TTY_CURSOROFF:
+		if (cursor_invisible != NULL)
+			tty_puts(tty, cursor_invisible);
+		break;
+	case TTY_REVERSEINDEX:
+		tty_puts(tty, scroll_reverse);
+		break;
+	case TTY_SCROLLREGION:
+		ua = va_arg(ap, u_int);
+		ub = va_arg(ap, u_int);
+		tty_puts(tty, tparm(change_scroll_region, ua, ub));
+		break;
+	case TTY_INSERTON:
+		if (enter_insert_mode != NULL)
+			tty_puts(tty, enter_insert_mode);
+		break;
+	case TTY_INSERTOFF:
+		if (exit_insert_mode != NULL)
+			tty_puts(tty, exit_insert_mode);
+		break;
+#if 0
+	case TTY_KCURSOROFF:
+		t = tigetstr("CE");
+		if (t != (char *) 0 && t != (char *) -1)
+			tty_puts(tty, t);
+		break;
+	case TTY_KCURSORON:
+		t = tigetstr("CS");
+		if (t != (char *) 0 && t != (char *) -1)
+			tty_puts(tty, t);
+		break;
+	case TTY_KKEYPADOFF:
+		if (keypad_local != NULL)
+			tty_puts(tty, keypad_local);
+		break;
+	case TTY_KKEYPADON:
+		if (keypad_xmit != NULL)
+			tty_puts(tty, keypad_xmit);
+#endif
+		break;
+	case TTY_TITLE:
+		break;
+	case TTY_ATTRIBUTES:
+		ua = va_arg(ap, u_int);
+		ub = va_arg(ap, u_int);
+		tty_attributes(tty, ua, ub);
+		break;
+	}
+}
+
+void
+tty_attributes(struct tty *tty, u_char attr, u_char colr)
+{
+	u_char	fg, bg;
+
+	if (attr == tty->attr && colr == tty->colr)
+		return;
+
+	/* If any bits are being cleared, reset everything. */
+	if (tty->attr & ~attr) {
+		if ((tty->attr & ATTR_DRAWING) &&
+		    exit_alt_charset_mode != NULL)
+			tty_puts(tty, exit_alt_charset_mode);
+		tty_puts(tty, exit_attribute_mode);
+		tty->colr = 0x88;
+		tty->attr = 0;
+	}
+
+	/* Filter out bits already set. */
+	attr &= ~tty->attr;
+	tty->attr |= attr;
+
+	if ((attr & ATTR_BRIGHT) && enter_bold_mode != NULL)
+		tty_puts(tty, enter_bold_mode);
+	if ((attr & ATTR_DIM) && enter_dim_mode != NULL)
+		tty_puts(tty, enter_dim_mode);
+	if ((attr & ATTR_ITALICS) && enter_standout_mode != NULL)
+		tty_puts(tty, enter_standout_mode);
+	if ((attr & ATTR_UNDERSCORE) && enter_underline_mode != NULL)
+		tty_puts(tty, enter_underline_mode);
+	if ((attr & ATTR_BLINK) && enter_blink_mode != NULL)
+		tty_puts(tty, enter_blink_mode);
+	if ((attr & ATTR_REVERSE) && enter_reverse_mode != NULL)
+		tty_puts(tty, enter_reverse_mode);
+	if ((attr & ATTR_HIDDEN) && enter_secure_mode != NULL)
+		tty_puts(tty, enter_secure_mode);
+	if ((attr & ATTR_DRAWING) && enter_alt_charset_mode != NULL)
+		tty_puts(tty, enter_alt_charset_mode);
+
+	fg = (colr >> 4) & 0xf;
+	if (fg != ((tty->colr >> 4) & 0xf)) {
+		if (tigetflag("AX") == TRUE) {
+			if (fg == 7)
+				fg = 8;
+		} else {
+			if (fg == 8)
+				fg = 7;
+		}
+		
+		if (fg == 8)
+			tty_puts(tty, "\e[39m");
+		else if (set_a_foreground != NULL)
+			tty_puts(tty, tparm(set_a_foreground, fg));
+	}
+	
+	bg = colr & 0xf;
+	if (bg != (tty->colr & 0xf)) {
+		if (tigetflag("AX") == TRUE) {
+			if (bg == 0)
+				bg = 8;
+		} else {
+			if (bg == 8)
+				bg = 0;
+		}
+
+		if (bg == 8)
+			tty_puts(tty, "\e[49m");
+		else if (set_a_background != NULL)
+			tty_puts(tty, tparm(set_a_background, bg));
+	}
+
+	tty->colr = colr;
+}