tty-keys.c - tmux - Rivoreo Source Code Repositories

 /* $Id: tty-keys.c,v 1.20 2009-01-12 22:48:00 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/time.h>

 #include <string.h>

 #include "tmux.h"

 void	tty_keys_add(struct tty *, const char *, int, int);
 int	tty_keys_parse_xterm(struct tty *, char *, size_t, size_t *);

 struct tty_key_ent {
 	enum tty_code_code	code;
 	const char	       *string;

 	int	 	 	key;
 	int		 	flags;
 };

 struct tty_key_ent tty_keys[] = {
 	/* Function keys. */
 	{ TTYC_KF1,   NULL,     KEYC_F1,    TTYKEY_CTRL },
 	{ TTYC_KF2,   NULL,     KEYC_F2,    TTYKEY_CTRL },
 	{ TTYC_KF3,   NULL,     KEYC_F3,    TTYKEY_CTRL },
 	{ TTYC_KF4,   NULL,     KEYC_F4,    TTYKEY_CTRL },
 	{ TTYC_KF5,   NULL,     KEYC_F5,    TTYKEY_CTRL },
 	{ TTYC_KF6,   NULL,     KEYC_F6,    TTYKEY_CTRL },
 	{ TTYC_KF7,   NULL,     KEYC_F7,    TTYKEY_CTRL },
 	{ TTYC_KF8,   NULL,     KEYC_F8,    TTYKEY_CTRL },
 	{ TTYC_KF9,   NULL,     KEYC_F9,    TTYKEY_CTRL },
 	{ TTYC_KF10,  NULL,     KEYC_F10,   TTYKEY_CTRL },
 	{ TTYC_KF11,  NULL,     KEYC_F11,   TTYKEY_CTRL },
 	{ TTYC_KF12,  NULL,     KEYC_F12,   TTYKEY_CTRL },
 	{ TTYC_KICH1, NULL,     KEYC_IC,    TTYKEY_CTRL },
 	{ TTYC_KDCH1, NULL,     KEYC_DC,    TTYKEY_CTRL },
 	{ TTYC_KHOME, NULL,     KEYC_HOME,  TTYKEY_CTRL },
 	{ TTYC_KEND,  NULL,     KEYC_END,   TTYKEY_CTRL },
 	{ TTYC_KNP,   NULL,     KEYC_NPAGE, TTYKEY_CTRL },
 	{ TTYC_KPP,   NULL,     KEYC_PPAGE, TTYKEY_CTRL },
 	{ TTYC_KCBT,  NULL,	KEYC_BTAB,  TTYKEY_CTRL },

 	/* Arrow keys. */
 	{ 0,          "\033OA", KEYC_UP,    TTYKEY_RAW },
 	{ 0,          "\033OB", KEYC_DOWN,  TTYKEY_RAW },
 	{ 0,          "\033OC", KEYC_RIGHT, TTYKEY_RAW },
 	{ 0,          "\033OD", KEYC_LEFT,  TTYKEY_RAW },

 	{ 0,          "\033[A", KEYC_UP,    TTYKEY_RAW },
 	{ 0,          "\033[B", KEYC_DOWN,  TTYKEY_RAW },
 	{ 0,          "\033[C", KEYC_RIGHT, TTYKEY_RAW },
 	{ 0,          "\033[D", KEYC_LEFT,  TTYKEY_RAW },

 	{ 0,          "\033Oa", KEYC_ADDCTL(KEYC_UP),    TTYKEY_RAW },
 	{ 0,          "\033Ob", KEYC_ADDCTL(KEYC_DOWN),  TTYKEY_RAW },
 	{ 0,          "\033Oc", KEYC_ADDCTL(KEYC_RIGHT), TTYKEY_RAW },
 	{ 0,          "\033Od", KEYC_ADDCTL(KEYC_LEFT),  TTYKEY_RAW },
 	{ 0,          "\033[a", KEYC_ADDSFT(KEYC_UP),    TTYKEY_RAW },
 	{ 0,          "\033[b", KEYC_ADDSFT(KEYC_DOWN),  TTYKEY_RAW },
 	{ 0,          "\033[c", KEYC_ADDSFT(KEYC_RIGHT), TTYKEY_RAW },
 	{ 0,          "\033[d", KEYC_ADDSFT(KEYC_LEFT),  TTYKEY_RAW },

 	{ TTYC_KCUU1, NULL,     KEYC_UP,    TTYKEY_CTRL },
 	{ TTYC_KCUD1, NULL,     KEYC_DOWN,  TTYKEY_CTRL },
 	{ TTYC_KCUB1, NULL,     KEYC_LEFT,  TTYKEY_CTRL },
 	{ TTYC_KCUF1, NULL,     KEYC_RIGHT, TTYKEY_CTRL },

 	/*
 	 * Numeric keypad. termcap and terminfo are totally confusing for this.
 	 * There are definitions for some keypad keys and for function keys,
 	 * but these seem to now be used for the real function keys rather than
 	 * for the keypad keys in application mode (which is different from
 	 * what it says in the termcap file). So, we just hardcode the vt100
 	 * escape sequences here and always put the terminal into keypad_xmit
 	 * mode. Translation of numbers mode/applications mode is done in
 	 * input-keys.c.
 	 */
 	{ 0,          "\033Oo", KEYC_KP0_1, TTYKEY_RAW },
 	{ 0,          "\033Oj", KEYC_KP0_2, TTYKEY_RAW },
 	{ 0,          "\033Om", KEYC_KP0_3, TTYKEY_RAW },
 	{ 0,          "\033Ow", KEYC_KP1_0, TTYKEY_RAW },
 	{ 0,          "\033Ox", KEYC_KP1_1, TTYKEY_RAW },
 	{ 0,          "\033Oy", KEYC_KP1_2, TTYKEY_RAW },
 	{ 0,          "\033Ok", KEYC_KP1_3, TTYKEY_RAW },
 	{ 0,          "\033Ot", KEYC_KP2_0, TTYKEY_RAW },
 	{ 0,          "\033Ou", KEYC_KP2_1, TTYKEY_RAW },
 	{ 0,          "\033Ov", KEYC_KP2_2, TTYKEY_RAW },
 	{ 0,          "\033Oq", KEYC_KP3_0, TTYKEY_RAW },
 	{ 0,          "\033Or", KEYC_KP3_1, TTYKEY_RAW },
 	{ 0,          "\033Os", KEYC_KP3_2, TTYKEY_RAW },
 	{ 0,          "\033OM", KEYC_KP3_3, TTYKEY_RAW },
 	{ 0,          "\033Op", KEYC_KP4_0, TTYKEY_RAW },
 	{ 0,          "\033On", KEYC_KP4_2, TTYKEY_RAW },
 };

 RB_GENERATE(tty_keys, tty_key, entry, tty_keys_cmp);

 struct tty_key *tty_keys_find(struct tty *, char *, size_t, size_t *);

 int
 tty_keys_cmp(struct tty_key *k1, struct tty_key *k2)
 {
 	return (strcmp(k1->string, k2->string));
 }

 void
 tty_keys_add(struct tty *tty, const char *s, int key, int flags)
 {
 	struct tty_key	*tk;

 	tk = xmalloc(sizeof *tk);
 	tk->string = xstrdup(s);
 	tk->key = key;
 	tk->flags = flags;

 	if (strlen(tk->string) > tty->ksize)
 		tty->ksize = strlen(tk->string);
 	RB_INSERT(tty_keys, &tty->ktree, tk);

 	log_debug("new key %x: size now %zu (%s)", key, tty->ksize, tk->string);
 }

 void
 tty_keys_init(struct tty *tty)
 {
 	struct tty_key_ent	*tke;
 	u_int		 	 i;
 	const char		*s;
 	char			 tmp[64];

 	RB_INIT(&tty->ktree);

 	tty->ksize = 0;
 	for (i = 0; i < nitems(tty_keys); i++) {
 		tke = &tty_keys[i];

 		if (tke->flags & TTYKEY_RAW)
 			s = tke->string;
 		else {
 			if (!tty_term_has(tty->term, tke->code))
 				continue;
 			s = tty_term_string(tty->term, tke->code);
 			if (s[0] != '\033' || s[1] == '\0')
 				continue;
 		}

 		tty_keys_add(tty, s + 1, tke->key, tke->flags);
 		if (tke->flags & TTYKEY_CTRL) {
 			if (strlcpy(tmp, s, sizeof tmp) >= sizeof tmp)
 				continue;
 			tmp[strlen(tmp) - 1] ^= 0x20;
 			tty_keys_add(tty, tmp + 1, KEYC_ADDCTL(tke->key), 0);
 		}
 	}
 }

 void
 tty_keys_free(struct tty *tty)
 {
 	struct tty_key	*tk, *tl;

 	for (tk = RB_MIN(tty_keys, &tty->ktree); tk != NULL; tk = tl) {
 		tl = RB_NEXT(tty_keys, &tty->ktree, tk);
 		RB_REMOVE(tty_keys, &tty->ktree, tk);
 		xfree(tk->string);
 		xfree(tk);
 	}
 }

 struct tty_key *
 tty_keys_find(struct tty *tty, char *buf, size_t len, size_t *size)
 {
 	struct tty_key	*tk, tl;
 	char		*s;

 	if (len == 0)
 		return (NULL);

 	s = xmalloc(tty->ksize + 1);
 	for (*size = tty->ksize; (*size) > 0; (*size)--) {
 		if ((*size) > len)
 			continue;
 		memcpy(s, buf, *size);
 		s[*size] = '\0';

 		log_debug2("looking for key: %s", s);

 		tl.string = s;
 		tk = RB_FIND(tty_keys, &tty->ktree, &tl);
 		if (tk != NULL) {
 			log_debug2("got key: 0x%x", tk->key);
 			xfree(s);
 			return (tk);
 		}
 	}
 	xfree(s);

 	return (NULL);
 }

 int
 tty_keys_next(struct tty *tty, int *key)
 {
 	struct tty_key	*tk;
 	struct timeval	 tv;
 	char		*buf;
 	size_t		 len, size;

 	buf = BUFFER_OUT(tty->in);
 	len = BUFFER_USED(tty->in);
 	if (len == 0)
 		return (1);
 	log_debug("keys are %zu (%.*s)", len, (int) len, buf);

 	/* If a normal key, return it. */
 	if (*buf != '\033') {
 		*key = buffer_read8(tty->in);
 		return (0);
 	}

 	/* Look for matching key string and return if found. */
 	tk = tty_keys_find(tty, buf + 1, len - 1, &size);
 	if (tk != NULL) {
 		*key = tk->key;
 		buffer_remove(tty->in, size + 1);

 		tty->flags &= ~TTY_ESCAPE;
 		return (0);
 	}

 	/* Not found. Try to parse xterm-type arguments. */
 	if ((*key = tty_keys_parse_xterm(tty, buf, len, &size)) != KEYC_NONE) {
 		buffer_remove(tty->in, size);
 		tty->flags &= ~TTY_ESCAPE;
 		return (0);
 	}

 	/* Escape but no key string. If the timer isn't started, start it. */
 	if (!(tty->flags & TTY_ESCAPE)) {
 		tv.tv_sec = 0;
 		tv.tv_usec = 500 * 1000L;
 		if (gettimeofday(&tty->key_timer, NULL) != 0)
 			fatal("gettimeofday");
 		timeradd(&tty->key_timer, &tv, &tty->key_timer);

 		tty->flags |= TTY_ESCAPE;
 		return (1);
 	}

 	/* Otherwise, if the timer hasn't expired, wait. */
 	if (gettimeofday(&tv, NULL) != 0)
 		fatal("gettimeofday");
 	if (!timercmp(&tty->key_timer, &tv, >))
 		return (1);
 	tty->flags &= ~TTY_ESCAPE;

 	/* Remove the leading escape. */
 	buffer_remove(tty->in, 1);
 	buf = BUFFER_OUT(tty->in);
 	len = BUFFER_USED(tty->in);

 	/* If we have no following data, return escape. */
 	if (len == 0) {
 		*key = '\033';
 		return (0);
 	}

 	/* If a normal key follows, return it. */
 	if (*buf != '\033') {
 		*key = KEYC_ADDESC(buffer_read8(tty->in));
 		return (0);
 	}

 	/* Try to look up the key. */
 	tk = tty_keys_find(tty, buf + 1, len - 1, &size);
 	if (tk != NULL) {
 		*key = KEYC_ADDESC(tk->key);
  		buffer_remove(tty->in, size + 1);
 		return (0);
 	}

 	/* If not found, return escape-escape. */
 	*key = KEYC_ADDESC('\033');
 	buffer_remove(tty->in, 1);
 	return (0);
 }

 int
 tty_keys_parse_xterm(struct tty *tty, char *buf, size_t len, size_t *size)
 {
 	struct tty_key	*tk;
 	char		 tmp[5];
 	size_t		 tmplen;
 	int		 key;

 	/*
 	 * xterm sequences with modifier keys are of the form:
 	 *
 	 * ^[[1;xD becomes ^[[D
 	 * ^[[5;x~ becomes ^[[5~
 	 *
 	 * This function is a bit of a hack. Need to figure out what exact
 	 * format and meaning xterm outputs and fix it. XXX
 	 */

 	log_debug("xterm input is: %.*s", (int) len, buf);
 	if (len != 6 || memcmp(buf, "\033[1;", 4) != 0)
 		return (KEYC_NONE);
 	*size = 6;

 	tmplen = 0;
 	tmp[tmplen++] = '[';
 	if (buf[5] == '~') {
 		tmp[tmplen++] = buf[2];
 		tmp[tmplen++] = '~';
 	} else
 		tmp[tmplen++] = buf[5];
 	log_debug("xterm output is: %.*s", (int) tmplen, tmp);

 	tk = tty_keys_find(tty, tmp, tmplen, size);
 	if (tk == NULL)
 		return (KEYC_NONE);
 	key = tk->key;

 	switch (buf[4]) {
 	case '8':
 		key = KEYC_ADDSFT(key);
 		key = KEYC_ADDESC(key);
 		key = KEYC_ADDCTL(key);
 		break;
 	case '7':
 		key = KEYC_ADDESC(key);
 		key = KEYC_ADDCTL(key);
 		break;
 	case '6':
 		key = KEYC_ADDSFT(key);
 		key = KEYC_ADDCTL(key);
 		break;
 	case '5':
 		key = KEYC_ADDCTL(key);
 		break;
 	case '4':
 		key = KEYC_ADDSFT(key);
 		key = KEYC_ADDESC(key);
 		break;
 	case '3':
 		key = KEYC_ADDESC(key);
 		break;
 	case '2':
 	key = KEYC_ADDSFT(key);
 		break;
 	}

 	*size = 6;
 	return (key);
 }
	/* $Id: tty-keys.c,v 1.20 2009-01-12 22:48:00 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/time.h>

	#include <string.h>

	#include "tmux.h"

	void tty_keys_add(struct tty , const char , int, int);
	int tty_keys_parse_xterm(struct tty , char , size_t, size_t *);

	struct tty_key_ent {
	enum tty_code_code code;
	const char *string;

	int key;
	int flags;
	};

	struct tty_key_ent tty_keys[] = {
	/* Function keys. */
	{ TTYC_KF1, NULL, KEYC_F1, TTYKEY_CTRL },
	{ TTYC_KF2, NULL, KEYC_F2, TTYKEY_CTRL },
	{ TTYC_KF3, NULL, KEYC_F3, TTYKEY_CTRL },
	{ TTYC_KF4, NULL, KEYC_F4, TTYKEY_CTRL },
	{ TTYC_KF5, NULL, KEYC_F5, TTYKEY_CTRL },
	{ TTYC_KF6, NULL, KEYC_F6, TTYKEY_CTRL },
	{ TTYC_KF7, NULL, KEYC_F7, TTYKEY_CTRL },
	{ TTYC_KF8, NULL, KEYC_F8, TTYKEY_CTRL },
	{ TTYC_KF9, NULL, KEYC_F9, TTYKEY_CTRL },
	{ TTYC_KF10, NULL, KEYC_F10, TTYKEY_CTRL },
	{ TTYC_KF11, NULL, KEYC_F11, TTYKEY_CTRL },
	{ TTYC_KF12, NULL, KEYC_F12, TTYKEY_CTRL },
	{ TTYC_KICH1, NULL, KEYC_IC, TTYKEY_CTRL },
	{ TTYC_KDCH1, NULL, KEYC_DC, TTYKEY_CTRL },
	{ TTYC_KHOME, NULL, KEYC_HOME, TTYKEY_CTRL },
	{ TTYC_KEND, NULL, KEYC_END, TTYKEY_CTRL },
	{ TTYC_KNP, NULL, KEYC_NPAGE, TTYKEY_CTRL },
	{ TTYC_KPP, NULL, KEYC_PPAGE, TTYKEY_CTRL },
	{ TTYC_KCBT, NULL, KEYC_BTAB, TTYKEY_CTRL },

	/* Arrow keys. */
	{ 0, "\033OA", KEYC_UP, TTYKEY_RAW },
	{ 0, "\033OB", KEYC_DOWN, TTYKEY_RAW },
	{ 0, "\033OC", KEYC_RIGHT, TTYKEY_RAW },
	{ 0, "\033OD", KEYC_LEFT, TTYKEY_RAW },

	{ 0, "\033[A", KEYC_UP, TTYKEY_RAW },
	{ 0, "\033[B", KEYC_DOWN, TTYKEY_RAW },
	{ 0, "\033[C", KEYC_RIGHT, TTYKEY_RAW },
	{ 0, "\033[D", KEYC_LEFT, TTYKEY_RAW },

	{ 0, "\033Oa", KEYC_ADDCTL(KEYC_UP), TTYKEY_RAW },
	{ 0, "\033Ob", KEYC_ADDCTL(KEYC_DOWN), TTYKEY_RAW },
	{ 0, "\033Oc", KEYC_ADDCTL(KEYC_RIGHT), TTYKEY_RAW },
	{ 0, "\033Od", KEYC_ADDCTL(KEYC_LEFT), TTYKEY_RAW },
	{ 0, "\033[a", KEYC_ADDSFT(KEYC_UP), TTYKEY_RAW },
	{ 0, "\033[b", KEYC_ADDSFT(KEYC_DOWN), TTYKEY_RAW },
	{ 0, "\033[c", KEYC_ADDSFT(KEYC_RIGHT), TTYKEY_RAW },
	{ 0, "\033[d", KEYC_ADDSFT(KEYC_LEFT), TTYKEY_RAW },

	{ TTYC_KCUU1, NULL, KEYC_UP, TTYKEY_CTRL },
	{ TTYC_KCUD1, NULL, KEYC_DOWN, TTYKEY_CTRL },
	{ TTYC_KCUB1, NULL, KEYC_LEFT, TTYKEY_CTRL },
	{ TTYC_KCUF1, NULL, KEYC_RIGHT, TTYKEY_CTRL },

	/*
	* Numeric keypad. termcap and terminfo are totally confusing for this.
	* There are definitions for some keypad keys and for function keys,
	* but these seem to now be used for the real function keys rather than
	* for the keypad keys in application mode (which is different from
	* what it says in the termcap file). So, we just hardcode the vt100
	* escape sequences here and always put the terminal into keypad_xmit
	* mode. Translation of numbers mode/applications mode is done in
	* input-keys.c.
	*/
	{ 0, "\033Oo", KEYC_KP0_1, TTYKEY_RAW },
	{ 0, "\033Oj", KEYC_KP0_2, TTYKEY_RAW },
	{ 0, "\033Om", KEYC_KP0_3, TTYKEY_RAW },
	{ 0, "\033Ow", KEYC_KP1_0, TTYKEY_RAW },
	{ 0, "\033Ox", KEYC_KP1_1, TTYKEY_RAW },
	{ 0, "\033Oy", KEYC_KP1_2, TTYKEY_RAW },
	{ 0, "\033Ok", KEYC_KP1_3, TTYKEY_RAW },
	{ 0, "\033Ot", KEYC_KP2_0, TTYKEY_RAW },
	{ 0, "\033Ou", KEYC_KP2_1, TTYKEY_RAW },
	{ 0, "\033Ov", KEYC_KP2_2, TTYKEY_RAW },
	{ 0, "\033Oq", KEYC_KP3_0, TTYKEY_RAW },
	{ 0, "\033Or", KEYC_KP3_1, TTYKEY_RAW },
	{ 0, "\033Os", KEYC_KP3_2, TTYKEY_RAW },
	{ 0, "\033OM", KEYC_KP3_3, TTYKEY_RAW },
	{ 0, "\033Op", KEYC_KP4_0, TTYKEY_RAW },
	{ 0, "\033On", KEYC_KP4_2, TTYKEY_RAW },
	};

	RB_GENERATE(tty_keys, tty_key, entry, tty_keys_cmp);

	struct tty_key tty_keys_find(struct tty , char , size_t, size_t );

	int
	tty_keys_cmp(struct tty_key k1, struct tty_key k2)
	{
	return (strcmp(k1->string, k2->string));
	}

	void
	tty_keys_add(struct tty tty, const char s, int key, int flags)
	{
	struct tty_key *tk;

	tk = xmalloc(sizeof *tk);
	tk->string = xstrdup(s);
	tk->key = key;
	tk->flags = flags;

	if (strlen(tk->string) > tty->ksize)
	tty->ksize = strlen(tk->string);
	RB_INSERT(tty_keys, &tty->ktree, tk);

	log_debug("new key %x: size now %zu (%s)", key, tty->ksize, tk->string);
	}

	void
	tty_keys_init(struct tty *tty)
	{
	struct tty_key_ent *tke;
	u_int i;
	const char *s;
	char tmp[64];

	RB_INIT(&tty->ktree);

	tty->ksize = 0;
	for (i = 0; i < nitems(tty_keys); i++) {
	tke = &tty_keys[i];

	if (tke->flags & TTYKEY_RAW)
	s = tke->string;
	else {
	if (!tty_term_has(tty->term, tke->code))
	continue;
	s = tty_term_string(tty->term, tke->code);
	if (s[0] != '\033' \|\| s[1] == '\0')
	continue;
	}

	tty_keys_add(tty, s + 1, tke->key, tke->flags);
	if (tke->flags & TTYKEY_CTRL) {
	if (strlcpy(tmp, s, sizeof tmp) >= sizeof tmp)
	continue;
	tmp[strlen(tmp) - 1] ^= 0x20;
	tty_keys_add(tty, tmp + 1, KEYC_ADDCTL(tke->key), 0);
	}
	}
	}

	void
	tty_keys_free(struct tty *tty)
	{
	struct tty_key tk, tl;

	for (tk = RB_MIN(tty_keys, &tty->ktree); tk != NULL; tk = tl) {
	tl = RB_NEXT(tty_keys, &tty->ktree, tk);
	RB_REMOVE(tty_keys, &tty->ktree, tk);
	xfree(tk->string);
	xfree(tk);
	}
	}

	struct tty_key *
	tty_keys_find(struct tty tty, char buf, size_t len, size_t *size)
	{
	struct tty_key *tk, tl;
	char *s;

	if (len == 0)
	return (NULL);

	s = xmalloc(tty->ksize + 1);
	for (size = tty->ksize; (size) > 0; (*size)--) {
	if ((*size) > len)
	continue;
	memcpy(s, buf, *size);
	s[*size] = '\0';

	log_debug2("looking for key: %s", s);

	tl.string = s;
	tk = RB_FIND(tty_keys, &tty->ktree, &tl);
	if (tk != NULL) {
	log_debug2("got key: 0x%x", tk->key);
	xfree(s);
	return (tk);
	}
	}
	xfree(s);

	return (NULL);
	}

	int
	tty_keys_next(struct tty tty, int key)
	{
	struct tty_key *tk;
	struct timeval tv;
	char *buf;
	size_t len, size;

	buf = BUFFER_OUT(tty->in);
	len = BUFFER_USED(tty->in);
	if (len == 0)
	return (1);
	log_debug("keys are %zu (%.*s)", len, (int) len, buf);

	/* If a normal key, return it. */
	if (*buf != '\033') {
	*key = buffer_read8(tty->in);
	return (0);
	}

	/* Look for matching key string and return if found. */
	tk = tty_keys_find(tty, buf + 1, len - 1, &size);
	if (tk != NULL) {
	*key = tk->key;
	buffer_remove(tty->in, size + 1);

	tty->flags &= ~TTY_ESCAPE;
	return (0);
	}

	/* Not found. Try to parse xterm-type arguments. */
	if ((*key = tty_keys_parse_xterm(tty, buf, len, &size)) != KEYC_NONE) {
	buffer_remove(tty->in, size);
	tty->flags &= ~TTY_ESCAPE;
	return (0);
	}

	/* Escape but no key string. If the timer isn't started, start it. */
	if (!(tty->flags & TTY_ESCAPE)) {
	tv.tv_sec = 0;
	tv.tv_usec = 500 * 1000L;
	if (gettimeofday(&tty->key_timer, NULL) != 0)
	fatal("gettimeofday");
	timeradd(&tty->key_timer, &tv, &tty->key_timer);

	tty->flags \|= TTY_ESCAPE;
	return (1);
	}

	/* Otherwise, if the timer hasn't expired, wait. */
	if (gettimeofday(&tv, NULL) != 0)
	fatal("gettimeofday");
	if (!timercmp(&tty->key_timer, &tv, >))
	return (1);
	tty->flags &= ~TTY_ESCAPE;

	/* Remove the leading escape. */
	buffer_remove(tty->in, 1);
	buf = BUFFER_OUT(tty->in);
	len = BUFFER_USED(tty->in);

	/* If we have no following data, return escape. */
	if (len == 0) {
	*key = '\033';
	return (0);
	}

	/* If a normal key follows, return it. */
	if (*buf != '\033') {
	*key = KEYC_ADDESC(buffer_read8(tty->in));
	return (0);
	}

	/* Try to look up the key. */
	tk = tty_keys_find(tty, buf + 1, len - 1, &size);
	if (tk != NULL) {
	*key = KEYC_ADDESC(tk->key);
	buffer_remove(tty->in, size + 1);
	return (0);
	}

	/* If not found, return escape-escape. */
	*key = KEYC_ADDESC('\033');
	buffer_remove(tty->in, 1);
	return (0);
	}

	int
	tty_keys_parse_xterm(struct tty tty, char buf, size_t len, size_t *size)
	{
	struct tty_key *tk;
	char tmp[5];
	size_t tmplen;
	int key;

	/*
	* xterm sequences with modifier keys are of the form:
	*
	* ^[[1;xD becomes ^[[D
	* ^[[5;x~ becomes ^[[5~
	*
	* This function is a bit of a hack. Need to figure out what exact
	* format and meaning xterm outputs and fix it. XXX
	*/

	log_debug("xterm input is: %.*s", (int) len, buf);
	if (len != 6 \|\| memcmp(buf, "\033[1;", 4) != 0)
	return (KEYC_NONE);
	*size = 6;

	tmplen = 0;
	tmp[tmplen++] = '[';
	if (buf[5] == '~') {
	tmp[tmplen++] = buf[2];
	tmp[tmplen++] = '~';
	} else
	tmp[tmplen++] = buf[5];
	log_debug("xterm output is: %.*s", (int) tmplen, tmp);

	tk = tty_keys_find(tty, tmp, tmplen, size);
	if (tk == NULL)
	return (KEYC_NONE);
	key = tk->key;

	switch (buf[4]) {
	case '8':
	key = KEYC_ADDSFT(key);
	key = KEYC_ADDESC(key);
	key = KEYC_ADDCTL(key);
	break;
	case '7':
	key = KEYC_ADDESC(key);
	key = KEYC_ADDCTL(key);
	break;
	case '6':
	key = KEYC_ADDSFT(key);
	key = KEYC_ADDCTL(key);
	break;
	case '5':
	key = KEYC_ADDCTL(key);
	break;
	case '4':
	key = KEYC_ADDSFT(key);
	key = KEYC_ADDESC(key);
	break;
	case '3':
	key = KEYC_ADDESC(key);
	break;
	case '2':
	key = KEYC_ADDSFT(key);
	break;
	}

	*size = 6;
	return (key);
	}