chiark / gitweb /
serialmgr: Look for things in /usr, not /usr/local
[sympathy.git] / src / ansi.c
index 4113a36b773aa8aeff72dccd8a3d9f023d970026..91a80b667a4859a0f2ec12d9313339b9cd0c4235 100644 (file)
@@ -1,15 +1,60 @@
-/*
+/* 
  * ansi.c:
  *
- * Copyright (c) 2008 James McKenzie <james@fishsoup.dhs.org>,
+ * Copyright (c) 2008 James McKenzie <sympathy@madingley.org>,
  * All rights reserved.
  *
  */
 
-static char rcsid[] = "$Id$";
+static char rcsid[] = "$Id: ansi.c,v 1.50 2008/03/07 13:16:02 james Exp $";
 
-/*
- * $Log$
+/* 
+ * $Log: ansi.c,v $
+ * Revision 1.50  2008/03/07 13:16:02  james
+ * *** empty log message ***
+ *
+ * Revision 1.49  2008/03/07 12:37:04  james
+ * *** empty log message ***
+ *
+ * Revision 1.48  2008/03/06 22:51:39  james
+ * *** empty log message ***
+ *
+ * Revision 1.47  2008/03/06 21:34:09  james
+ * *** empty log message ***
+ *
+ * Revision 1.46  2008/03/06 21:33:02  james
+ * *** empty log message ***
+ *
+ * Revision 1.45  2008/03/06 17:21:41  james
+ * *** empty log message ***
+ *
+ * Revision 1.44  2008/03/06 16:49:05  james
+ * *** empty log message ***
+ *
+ * Revision 1.43  2008/03/06 01:41:48  james
+ * *** empty log message ***
+ *
+ * Revision 1.42  2008/03/03 06:04:42  james
+ * *** empty log message ***
+ *
+ * Revision 1.41  2008/03/02 12:30:54  staffcvs
+ * *** empty log message ***
+ *
+ * Revision 1.40  2008/03/02 10:50:32  staffcvs
+ * *** empty log message ***
+ *
+ * Revision 1.39  2008/03/02 10:37:56  james
+ * *** empty log message ***
+ *
+ * Revision 1.38  2008/03/02 10:27:24  james
+ * *** empty log message ***
+ *
+ * Revision 1.37  2008/02/29 22:50:29  james
+ * *** empty log message ***
+ *
+ * Revision 1.36  2008/02/28 22:00:42  james
+ * *** empty log message ***
+ *
  * Revision 1.35  2008/02/28 16:57:51  james
  * *** empty log message ***
  *
@@ -119,124 +164,133 @@ static char rcsid[] = "$Id$";
 #include "project.h"
 
 
-static void
+static int
 ansi_move (ANSI * a, CRT_Pos p)
 {
   char buf[16];
   int n;
   int dx = p.x - a->pos.x;
   int dy = p.y - a->pos.y;
-
-//  a->pos.x = ANSI_INVAL;
-
-  if (a->pos.x != ANSI_INVAL)
-    {
-
-      if ((!dx) && (!dy))
-        return;
-
-      if (!dy)
-        {
-          if (dx == 1)
-            {
-              a->terminal->xmit (a->terminal, "\033[C", 3);
-            }
-          else if (dx == -1)
-            {
-              a->terminal->xmit (a->terminal, "\033[D", 3);
-            }
-          else
-            {
-              n = snprintf (buf, sizeof (buf), "\033[%dG", p.x + 1);
-              a->terminal->xmit (a->terminal, buf, n);
-            }
-        }
-      else if (!dx)
-        {
-          if (dy == -1)
-            {
-              a->terminal->xmit (a->terminal, "\033[A", 3);
-            }
-          else if (dy == 1)
-            {
-              a->terminal->xmit (a->terminal, "\033[B", 3);
-            }
-          else if (dy < 0)
-            {
-              n = snprintf (buf, sizeof (buf), "\033[%dA", -dy);
-              a->terminal->xmit (a->terminal, buf, n);
-            }
-          else
-            {
-              n = snprintf (buf, sizeof (buf), "\033[%dB", dy);
-              a->terminal->xmit (a->terminal, buf, n);
-            }
-        }
-      else if (!p.x)
-        {
-          if (dy == 1)
-            {
-              a->terminal->xmit (a->terminal, "\033[E", 3);
-            }
-          else if (dy == -1)
-            {
-              a->terminal->xmit (a->terminal, "\033[F", 3);
-            }
-          else if (dy > 0)
-            {
-              n = snprintf (buf, sizeof (buf), "\033[%dE", dy);
-              a->terminal->xmit (a->terminal, buf, n);
-            }
-          else
-            {
-              n = snprintf (buf, sizeof (buf), "\033[%dF", -dy);
-              a->terminal->xmit (a->terminal, buf, n);
-            }
-        }
-      else
-        {
-          n = snprintf (buf, sizeof (buf), "\033[%d;%dH", p.y + 1, p.x + 1);
-          a->terminal->xmit (a->terminal, buf, n);
-        }
-    }
-  else
-    {
+  int err = 0;
+
+  // a->pos.x = ANSI_INVAL;
+
+  if (a->pos.x != ANSI_INVAL) {
+
+    if ((!dx) && (!dy))
+      return 0;
+
+    if (!dy) {
+      if (dx == 1) {
+        if (a->terminal->xmit (a->terminal, "\033[C", 3) != 3)
+          err++;
+      } else if (dx == -1) {
+        if (a->terminal->xmit (a->terminal, "\033[D", 3) != 3)
+          err++;
+      } else {
+        n = snprintf (buf, sizeof (buf), "\033[%dG", p.x + 1);
+        if (a->terminal->xmit (a->terminal, buf, n) != n)
+          err++;
+      }
+    } else if (!dx) {
+      if (dy == -1) {
+        if (a->terminal->xmit (a->terminal, "\033[A", 3) != 3)
+          err++;
+      } else if (dy == 1) {
+        if (a->terminal->xmit (a->terminal, "\033[B", 3) != 3)
+          err++;
+      } else if (dy < 0) {
+        n = snprintf (buf, sizeof (buf), "\033[%dA", -dy);
+        if (a->terminal->xmit (a->terminal, buf, n) != n)
+          err++;
+      } else {
+        n = snprintf (buf, sizeof (buf), "\033[%dB", dy);
+        if (a->terminal->xmit (a->terminal, buf, n) != n)
+          err++;
+      }
+    } else if (!p.x) {
+      if (dy == 1) {
+        if (a->terminal->xmit (a->terminal, "\033[E", 3) != 3)
+          err++;
+      } else if (dy == -1) {
+        if (a->terminal->xmit (a->terminal, "\033[F", 3) != 3)
+          err++;
+      } else if (dy > 0) {
+        n = snprintf (buf, sizeof (buf), "\033[%dE", dy);
+        if (a->terminal->xmit (a->terminal, buf, n) != n)
+          err++;
+      } else {
+        n = snprintf (buf, sizeof (buf), "\033[%dF", -dy);
+        if (a->terminal->xmit (a->terminal, buf, n) != n)
+          err++;
+      }
+    } else {
       n = snprintf (buf, sizeof (buf), "\033[%d;%dH", p.y + 1, p.x + 1);
-      a->terminal->xmit (a->terminal, buf, n);
+      if (a->terminal->xmit (a->terminal, buf, n) != n)
+        err++;
     }
+  } else {
+    n = snprintf (buf, sizeof (buf), "\033[%d;%dH", p.y + 1, p.x + 1);
+    if (a->terminal->xmit (a->terminal, buf, n) != n)
+      err++;
+  }
 
   a->pos = p;
+
+  return err;
 }
 
 
-static void
+static int
 ansi_showhide_cursor (ANSI * a, int hide)
 {
+  int err = 0;
   if (a->hide_cursor == hide)
-    return;
+    return err;
 
-  if (hide)
-    {
-      a->terminal->xmit (a->terminal, "\033[?25l", 6);
-    }
-  else
-    {
-      a->terminal->xmit (a->terminal, "\033[?25h", 6);
-    }
+  if (hide) {
+    if (a->terminal->xmit (a->terminal, "\033[?25l", 6) != 6)
+      err++;
+  } else {
+    if (a->terminal->xmit (a->terminal, "\033[?25h", 6) != 6)
+      err++;
+  }
 
   a->hide_cursor = hide;
+  return err;
 }
 
 
-static void
+static int
 ansi_force_attr_normal (ANSI * a)
 {
-  a->terminal->xmit (a->terminal, "\033[0m", 4);
+  if (a->terminal->xmit (a->terminal, "\033[0m", 4) != 4)
+    return 1;
   a->attr = CRT_ATTR_NORMAL;
   a->color = ANSI_INVAL;
+  return 0;
 }
 
-static void
+static int
+ansi_set_title (ANSI * a, char *t)
+{
+  char buf[1024];
+  int i;
+  char *term = getenv ("TERM");
+
+  if (!term)
+    return 0;
+  if (strncmp (term, "xterm", 5) && strncmp (term, "rxvt", 4))
+    return 0;
+
+  i = sprintf (buf, "\033]0;%s\007", t);
+
+  if (a->terminal->xmit (a->terminal, buf, i) != i)
+    return 1;
+  return 0;
+}
+
+static int
 ansi_set_color (ANSI * a, int color)
 {
   int dif;
@@ -244,141 +298,128 @@ ansi_set_color (ANSI * a, int color)
   int i;
   int fg, bg;
 
-  if ((a->color == ANSI_INVAL) || (color != a->color))
-    {
-      fg = CRT_COLOR_FG (color);
-      bg = CRT_COLOR_BG (color);
-
-      if (fg & CRT_COLOR_INTENSITY)
-        {
-          fg += 90;
-        }
-      else
-        {
-          fg += 30;
-        }
-
-      if (bg & CRT_COLOR_INTENSITY)
-        {
-          bg += 100;
-        }
-      else
-        {
-          bg += 40;
-        }
-
-      i = sprintf (buf, "\033[%d;%dm", fg, bg);
+  if ((a->color != ANSI_INVAL) && (color == a->color))
+    return 0;
+  fg = CRT_COLOR_FG (color);
+  bg = CRT_COLOR_BG (color);
+
+  if (fg & CRT_COLOR_INTENSITY) {
+    fg += 90;
+  } else {
+    fg += 30;
+  }
+
+  if (bg & CRT_COLOR_INTENSITY) {
+    bg += 100;
+  } else {
+    bg += 40;
+  }
+
+  i = sprintf (buf, "\033[%d;%dm", fg, bg);
 #if 0
-      fprintf (stderr, "Color set to %d %d %x\n", fg, bg, color);
+  fprintf (stderr, "Color set to %d %d %x\n", fg, bg, color);
 #endif
 
-      a->terminal->xmit (a->terminal, buf, i);
-      a->color = color;
-    }
+  if (a->terminal->xmit (a->terminal, buf, i) != i)
+    return 1;
+  a->color = color;
+
+  return 0;
 }
 
-static void
+static int
 ansi_set_attr (ANSI * a, int attr)
 {
   int dif;
+  int err = 0;
 
   dif = attr ^ a->attr;
 
   if (!dif)
-    return;
+    return 0;
 
   a->attr = attr;
 
 #if 0
-  if (attr == CRT_ATTR_NORMAL)
-    {
-      ansi_force_attr_normal (a);
-      return;
-    }
+  if (attr == CRT_ATTR_NORMAL) {
+    ansi_force_attr_normal (a);
+    return;
+  }
 #endif
 
-  if (dif & CRT_ATTR_UNDERLINE)
-    {
-      if (attr & CRT_ATTR_UNDERLINE)
-        {
-          a->terminal->xmit (a->terminal, "\033[4m", 4);
-        }
-      else
-        {
-          a->terminal->xmit (a->terminal, "\033[24m", 5);
-        }
-    }
-  if (dif & CRT_ATTR_REVERSE)
-    {
-      if (attr & CRT_ATTR_REVERSE)
-        {
-          a->terminal->xmit (a->terminal, "\033[7m", 4);
-        }
-      else
-        {
-          a->terminal->xmit (a->terminal, "\033[27m", 5);
-        }
-    }
-  if (dif & CRT_ATTR_BOLD)
-    {
-      if (attr & CRT_ATTR_BOLD)
-        {
-          a->terminal->xmit (a->terminal, "\033[1m", 4);
-        }
-      else
-        {
-          a->terminal->xmit (a->terminal, "\033[21m", 5);
-          a->terminal->xmit (a->terminal, "\033[22m", 5);
-        }
-    }
-
+  if (dif & CRT_ATTR_UNDERLINE) {
+    if (attr & CRT_ATTR_UNDERLINE) {
+      if (a->terminal->xmit (a->terminal, "\033[4m", 4) != 4)
+        err++;
+    } else {
+      if (a->terminal->xmit (a->terminal, "\033[24m", 5) != 5)
+        err++;
+    }
+  }
+  if (dif & CRT_ATTR_REVERSE) {
+    if (attr & CRT_ATTR_REVERSE) {
+      if (a->terminal->xmit (a->terminal, "\033[7m", 4) != 4)
+        err++;
+    } else {
+      if (a->terminal->xmit (a->terminal, "\033[27m", 5) != 5)
+        err++;
+    }
+  }
+  if (dif & CRT_ATTR_BOLD) {
+    if (attr & CRT_ATTR_BOLD) {
+      if (a->terminal->xmit (a->terminal, "\033[1m", 4) != 4)
+        err++;
+    } else {
+      if (a->terminal->xmit (a->terminal, "\033[21m", 5) != 5)
+        err++;
+      if (a->terminal->xmit (a->terminal, "\033[22m", 5) != 5)
+        err++;
+    }
+  }
+
+  return err;
 }
 
-static void
+static int
 ascii_emit (TTY * t, uint32_t ch)
 {
   int i;
 
-/*Some quick obvious subsititons for quotation marks*/
-  switch (ch)
-    {
-    case 0x2018:
-      ch = '`';
-      break;
-    case 0x2019:
-      ch = '\'';
-      break;
-    case 0x201c:
-    case 0x201d:
-      ch = '"';
-      break;
-    }
-
-/*Short cut the easy stuff*/
-  if (ch < 0x7f)
-    {
-      uint8_t c = ch;
-      t->xmit (t, &c, 1);
-      return;
-    }
-
-  for (i = 0; i < VT102_CHARSET_SIZE; ++i)
-    {
-      if (vt102_charset_gl[i] == ch)
-        {
-          uint8_t c[3] = { 016, i, 017 };
-          t->xmit (t, &c, 3);
-          return;
-        }
-    }
-
-  t->xmit (t, "?", 1);
+  /* Some quick obvious subsititons for quotation marks */
+  switch (ch) {
+  case 0x2018:
+    ch = '`';
+    break;
+  case 0x2019:
+    ch = '\'';
+    break;
+  case 0x201c:
+  case 0x201d:
+    ch = '"';
+    break;
+  }
+
+  /* Short cut the easy stuff */
+  if (ch < 0x7f) {
+    uint8_t c = ch;
+    return (t->xmit (t, &c, 1) == 1) ? 0 : -1;
+  }
+
+  for (i = 0; i < VT102_CHARSET_SIZE; ++i) {
+    if (vt102_charset_gl[i] == ch) {
+      uint8_t c[3] = { 016, i, 017 };
+      return (t->xmit (t, &c, 3) == 3) ? 0 : -1;
+    }
+  }
+
+  return (t->xmit (t, "?", 1) == 1) ? 0 : -1;
 
 }
 
-static void
+static int
 ansi_render (ANSI * a, CRT_CA ca)
 {
+  int err = 0;
   int dif;
 
   if ((ca.chr < VT102_CHARSET_SIZE) && (vt102_charset_c0[ca.chr]))
@@ -390,333 +431,274 @@ ansi_render (ANSI * a, CRT_CA ca)
   ansi_set_attr (a, ca.attr);
   ansi_set_color (a, ca.color);
 
-  if (a->utf8)
-    utf8_emit (a->terminal, ca.chr);
-  else
-    ascii_emit (a->terminal, ca.chr);
+  if (a->utf8) {
+    if (utf8_emit (a->terminal, ca.chr))
+      err++;
+  } else {
+    if (ascii_emit (a->terminal, ca.chr))
+      err++;
+  }
 
   a->pos.x++;
 
-/*Can't easily wrap round here as don't know size of destination screen*/
-/*so invalidate the cached cursor position*/
+  /* Can't easily wrap round here as don't know size of destination screen */
+  /* so invalidate the cached cursor position */
 
   if (a->pos.x >= a->size.x)
     a->pos.x = ANSI_INVAL;
 
+  return err;
 }
 
-static void
+static int
 ansi_cls (ANSI * a)
 {
   CRT_Pos p = { 0 };
+  int err;
 
   crt_cls (&a->crt);
 
-  ansi_set_attr (a, CRT_ATTR_NORMAL);
-  ansi_set_color (a, CRT_COLOR_NORMAL);
-  ansi_move (a, p);
-  a->terminal->xmit (a->terminal, "\033[2J", 4);
-/*different emulators leave cursor in different places after cls differently*/
+  err += ansi_set_attr (a, CRT_ATTR_NORMAL);
+  err += ansi_set_color (a, CRT_COLOR_NORMAL);
+  err += ansi_move (a, p);
+  if (a->terminal->xmit (a->terminal, "\033[2J", 4) != 4)
+    err++;
+  /* different emulators leave cursor in different places after cls
+     differently */
   a->pos.x = ANSI_INVAL;
-}
-
-#if 0
-int
-ansi_scroll_up (ANSI * a, CRT_Pos s, CRT_Pos e)
-{
-  char buf[16];
-  int i;
-  if (s.x)
-    return -1;
-  if (e.x != (CRT_COLS - 1))
-    return -1;
-  if (s.y)
-    return -1;
-  if (s.y >= a->size.y)
-    return -1;
-
-  ansi_showhide_cursor (a, 1);
-  i = sprintf (buf, "\033[%d;%dr", s.y + 1, e.y + 1);
-  a->terminal->xmit (a->terminal, buf, i);
-  i = sprintf (buf, "\033[%d;%dH", e.y + 1, 0);
-  a->terminal->xmit (a->terminal, buf, i);
-  a->terminal->xmit (a->terminal, "\033D", 2);
-  a->terminal->xmit (a->terminal, "\033[r", 3);
-
-  s.y = e.y;
-  crt_erase (&a->crt, s, e, 1);
-
-  a->pos.x = ANSI_INVAL;
-
-  return 0;
-}
-
-
-static void
-ansi_spot_scroll_up (ANSI * a, CRT * c)
-{
-  int l, n, p;
-
-  l = c->sh.e.x - c->sh.s.x;
-  l++;
-  l *= sizeof (CRT_CA);
-
-  n = c->sh.e.y - c->sh.s.y;
-  p = CRT_ADDR_POS (&c->sh.s);
-
-  while (n--)
-    {
-      if (memcmp (&c->screen[p], &a->crt.screen[p + CRT_COLS], l))
-        return;
-      p += CRT_COLS;
-    }
-
-  if (ansi_scroll_up (a, c->sh.s, c->sh.e))
-    return;
-
-  n = c->sh.e.y - c->sh.s.y;
-  p = CRT_ADDR_POS (&c->sh.s);
-
-  while (n--)
-    {
-      memcpy (&a->crt.screen[p], &a->crt.screen[p + CRT_COLS], l);
-      p += CRT_COLS;
-    }
-
-  c->sh.dir = 0;                //FIXME: horrid hack
 
+  return err;
 }
 
-static void
-ansi_spot_scroll (ANSI * a, CRT * c)
-{
-
-  switch (c->sh.dir)
-    {
-    case -1:
-/*we only care about up for the moment */
-      ansi_spot_scroll_up (a, c);
-      break;
-    }
-
-  return;
-}
-
-#endif
-
-
-static void
+static int
 ansi_draw_line (ANSI * a, CRT_CA * cap, int y)
 {
+  int err = 0;
+
   CRT_Pos p = { 0, y };
   CRT_CA *acap = &a->crt.screen[CRT_ADDR_POS (&p)];
 
-  for (p.x = 0; p.x < a->crt.size.x; ++p.x)
-    {
-      if (p.x >= a->size.x)
-        continue;
+  for (p.x = 0; p.x < a->crt.size.x; ++p.x) {
+    if (p.x >= a->size.x)
+      continue;
 
-      if (crt_ca_cmp (*acap, *cap))
-        {
-          ansi_showhide_cursor (a, 1);
-          *acap = *cap;
+    if (crt_ca_cmp (*acap, *cap)) {
+      err += ansi_showhide_cursor (a, 1);
 
-          ansi_move (a, p);
-          ansi_render (a, *acap);
-        }
+      *acap = *cap;
 
-      acap++;
-      cap++;
+      err += ansi_move (a, p);
+      err += ansi_render (a, *acap);
     }
+
+    acap++;
+    cap++;
+  }
+
+  return err;
 }
 
-static void
+static int
 ansi_resize_check (ANSI * a, CRT_Pos * size)
 {
+  int err = 0;
 
   if ((size && crt_pos_cmp (a->crt.size, *size))
-      || crt_pos_cmp (a->terminal->size, a->size))
-    {
-
-      terminal_getsize (a->terminal);
+      || crt_pos_cmp (a->terminal->size, a->size)) {
 
-      a->size = a->terminal->size;
+    terminal_getsize (a->terminal);
 
-      a->pos.x = ANSI_INVAL;
-      a->hide_cursor = ANSI_INVAL;
+    a->size = a->terminal->size;
 
-      crt_reset (&a->crt);
-
-      if (size)
-        a->crt.size = *size;
-
-// FIXME: -- echos back crap?
-//  a->terminal->xmit (a->terminal, "\033[c", 3);
-
-// maybe - issue 132 column command if we're 132?
-
-      ansi_cls (a);
-      a->terminal->xmit (a->terminal, "\033=", 2);
-      a->terminal->xmit (a->terminal, "\033[?6l", 5);
-      a->terminal->xmit (a->terminal, "\033[r", 3);
-      if (a->utf8)
-        {
-          a->terminal->xmit (a->terminal, "\033%G", 3);
-        }
-      else
-        {
-          a->terminal->xmit (a->terminal, "\033(B", 3);
-          a->terminal->xmit (a->terminal, "\033)0", 3);
-          a->terminal->xmit (a->terminal, "\017", 1);
-        }
-
-    }
+    a->pos.x = ANSI_INVAL;
+    a->hide_cursor = ANSI_INVAL;
+
+    crt_reset (&a->crt);
+
+    if (size)
+      a->crt.size = *size;
+
+    // a->terminal->xmit (a->terminal, "\033c", 3);
+    // maybe - issue 132 column command if we're 132?
+
+    ansi_cls (a);
+    if (a->terminal->xmit (a->terminal, "\033=", 2) != 2)
+      err++;
+    if (a->terminal->xmit (a->terminal, "\033[?6l", 5) != 5)
+      err++;
+    if (a->terminal->xmit (a->terminal, "\033[r", 3) != 3)
+      err++;
+    if (a->utf8) {
+      if (a->terminal->xmit (a->terminal, "\033%G", 3) != 3)
+        err++;
+    } else {
+      if (a->terminal->xmit (a->terminal, "\033(B", 3) != 3)
+        err++;
+      if (a->terminal->xmit (a->terminal, "\033)0", 3) != 3)
+        err++;
+      if (a->terminal->xmit (a->terminal, "\017", 1) != 3)
+        err++;
+    }
+
+  }
+  return err;
 }
 
-/*if they haven't then ansi_draw will patch it up*/
 
-static void
+static int
 ansi_history (ANSI * a, History * h)
 {
   char buf[32];
   int i;
   int guess_scroll;
-/*Do we need to catch up on history?*/
+  int err = 0;
+  /* Do we need to catch up on history? */
 
   if (a->history_ptr == h->wptr)
-    return;
-  ansi_resize_check (a, NULL);
+    return err;
+
+  err += ansi_resize_check (a, NULL);
 
   if ((a->size.x < a->crt.size.x) || (a->size.y < a->crt.size.y))
-    return;
+    return err;
 
-  guess_scroll = a->crt.size.y - 1; /*Bototm line should be a status line */
+  guess_scroll = a->crt.size.y - 1; /* Bototm line should be a status line */
 
 
-  ansi_force_attr_normal (a);
-  ansi_set_color (a, CRT_COLOR_NORMAL);
+  err += ansi_force_attr_normal (a);
+  err += ansi_set_color (a, CRT_COLOR_NORMAL);
 
   i = sprintf (buf, "\033[%d;%dr", 1, guess_scroll);
-  a->terminal->xmit (a->terminal, buf, i);
+  if (a->terminal->xmit (a->terminal, buf, i) != i)
+    err++;
 
 
-  while (a->history_ptr != h->wptr)
-    {
+  while (a->history_ptr != h->wptr) {
 
-      History_ent *e = &h->lines[a->history_ptr];
+    History_ent *e = &h->lines[a->history_ptr];
 
-      HISTORY_INC (h, a->history_ptr);
+    HISTORY_INC (h, a->history_ptr);
 
-      if (!e->valid)
-        continue;
+    if (!e->valid)
+      continue;
 
-      /*If so write the line ot the top of the screen */
-      ansi_draw_line (a, e->line, 0);
+    /* If so write the line ot the top of the screen */
+    err += ansi_draw_line (a, e->line, 0);
 
 
-      /*Roll guess_scroll lines up putting the top line into the xterm's history */
+    /* Roll guess_scroll lines up putting the top line into the xterm's
+       history */
 
 
-      /*Make extra lines a predictable colour */
-      ansi_set_color (a, CRT_COLOR_NORMAL);
+    /* Make extra lines a predictable colour */
+    err += ansi_set_color (a, CRT_COLOR_NORMAL);
 
-      ansi_showhide_cursor (a, 1);
-      i = sprintf (buf, "\033[%d;%dH", guess_scroll, 1);
-      a->terminal->xmit (a->terminal, buf, i);
-      a->terminal->xmit (a->terminal, "\033D", 2);
-      a->pos.x = ANSI_INVAL;
+    err += ansi_showhide_cursor (a, 1);
 
-      /*now do the same in our image of the screen */
+    i = sprintf (buf, "\033[%d;%dH", guess_scroll, 1);
+    if (a->terminal->xmit (a->terminal, buf, i) != i)
+      err++;
 
-      {
-        CRT_Pos s = { 0 }
-        , e =
-        {
-        0};
+    if (a->terminal->xmit (a->terminal, "\033D", 2) != 2)
+      err++;
+
+    a->pos.x = ANSI_INVAL;
 
-        /*scroll lines up */
-        for (s.y++; s.y < guess_scroll; s.y++, e.y++)
-          {
-            memcpy (&a->crt.screen[CRT_ADDR_POS (&e)],
-                    &a->crt.screen[CRT_ADDR_POS (&s)],
-                    sizeof (CRT_CA) * a->crt.size.x);
-          }
+    /* now do the same in our image of the screen */
 
-        /* erase new line */
-        s.y = e.y;
-        e.x = CRT_COLS - 1;
-        crt_erase (&a->crt, s, e, 1, CRT_COLOR_NORMAL);
+    {
+      CRT_Pos s = { 0 }
+      , e = {
+      0};
+
+      /* scroll lines up */
+      for (s.y++; s.y < guess_scroll; s.y++, e.y++) {
+        memcpy (&a->crt.screen[CRT_ADDR_POS (&e)],
+                &a->crt.screen[CRT_ADDR_POS (&s)],
+                sizeof (CRT_CA) * a->crt.size.x);
       }
 
+      /* erase new line */
+      s.y = e.y;
+      e.x = CRT_COLS - 1;
+      crt_erase (&a->crt, s, e, 1, CRT_COLOR_NORMAL);
     }
-/*reset margins*/
-  a->terminal->xmit (a->terminal, "\033[r", 3);
+
+  }
+  /* reset margins */
+  if (a->terminal->xmit (a->terminal, "\033[r", 3) != 3)
+    err++;
+
   a->pos.x = ANSI_INVAL;
 
+  return err;
 }
 
 
 
 
-static void
+static int
 ansi_draw (ANSI * a, CRT * c)
 {
   CRT_Pos p;
   int o;
   int hidden_cursor = 0;
+  int err = 0;
 
-  ansi_resize_check (a, &c->size);
+  err += ansi_resize_check (a, &c->size);
 
 
-  for (p.y = 0; p.y < a->crt.size.y; ++p.y)
-    {
-      if (p.y >= a->size.y)
-        continue;
+  for (p.y = 0; p.y < a->crt.size.y; ++p.y) {
+    if (p.y >= a->size.y)
+      continue;
 
-      ansi_draw_line (a, &c->screen[CRT_ADDR (p.y, 0)], p.y);
+    err += ansi_draw_line (a, &c->screen[CRT_ADDR (p.y, 0)], p.y);
 
-    }
+  }
 
 
-  if ((c->size.x > a->size.x) || (c->size.y > a->size.y))
-    {
-      char msg[1024];           // = "Window is too small";
-      int i;
-      p.x = 0;
-      p.y = 0;
+  if ((c->size.x > a->size.x) || (c->size.y > a->size.y)) {
+    char msg[1024];             // = "Window is too small";
+    int i;
+    p.x = 0;
+    p.y = 0;
 
-      i =
-        sprintf (msg, "Window too small (%dx%d need %dx%d)", a->size.x,
-                 a->size.y, c->size.x, c->size.y);
+    i =
+      sprintf (msg, "Window too small (%dx%d need %dx%d)", a->size.x,
+               a->size.y, c->size.x, c->size.y);
 
-      ansi_showhide_cursor (a, 1);
-      ansi_set_attr (a, CRT_ATTR_REVERSE);
+    err += ansi_showhide_cursor (a, 1);
+    err += ansi_set_attr (a, CRT_ATTR_REVERSE);
+    err +=
       ansi_set_color (a, CRT_MAKE_COLOR (CRT_COLOR_WHITE, CRT_COLOR_RED));
-      ansi_move (a, p);
+    err += ansi_move (a, p);
 
-      a->terminal->xmit (a->terminal, msg, i);
-      a->pos.x = ANSI_INVAL;
-    }
+    if (a->terminal->xmit (a->terminal, msg, i) != i)
+      err++;
 
+    a->pos.x = ANSI_INVAL;
+  }
 
-  if ((c->pos.x >= a->size.x) || (c->pos.y >= a->size.y))
-    {
-      ansi_showhide_cursor (a, 1);
-      return;
-    }
+
+  if ((c->pos.x >= a->size.x) || (c->pos.y >= a->size.y)) {
+    err += ansi_showhide_cursor (a, 1);
+    return err;
+  }
 
   a->crt.pos = c->pos;
-  ansi_move (a, a->crt.pos);
+  err += ansi_move (a, a->crt.pos);
 
   a->crt.hide_cursor = c->hide_cursor;
-  ansi_showhide_cursor (a, a->crt.hide_cursor);
+  err += ansi_showhide_cursor (a, a->crt.hide_cursor);
+
+  return err;
 }
 
-static void
+static int
 ansi_reset (ANSI * a, CRT * c)
 {
   a->size.x = -1;
-  ansi_draw (a, c ? c : &a->crt);
+  return ansi_draw (a, c ? c : &a->crt);
 }
 
 static void
@@ -728,16 +710,40 @@ ansi_terminal_reset (ANSI * a)
   ansi_move (a, p);
 }
 
+
+static int
+ansi_key (ANSI * a, Context * c, int key)
+{
+  if (!c->d)
+    return c->k->key (c->k, c, key);
+
+  cmd_show_status (c->d, c);
+
+  if (c->d->active) {
+    if (key == CMD_CANCEL_KEY) {
+      return cmd_deactivate (c->d, c);
+    } else if (key == CMD_KEY) {
+      cmd_deactivate (c->d, c);
+    } else {
+      return cmd_key (c->d, c, a, key);
+    }
+  } else if (key == CMD_KEY) {
+    return cmd_activate (c->d, c);
+  }
+
+  return c->k->key (c->k, c, key);
+}
+
+
 static void
 ansi_flush_escape (ANSI * a, Context * c)
 {
   ANSI_Parser *p = &a->parser;
   int i;
 
-  for (i = 0; i < p->escape_ptr; ++i)
-    {
-      keydis_key (c->k, c, p->escape_buf[i]);
-    }
+  for (i = 0; i < p->escape_ptr; ++i) {
+    ansi_key (a, c, p->escape_buf[i]);
+  }
 
   p->escape_ptr = 0;
   p->in_escape = 0;
@@ -747,25 +753,19 @@ static void
 ansi_parse_deckey (ANSI * a, Context * c)
 {
   ANSI_Parser *p = &a->parser;
-  if ((p->escape_buf[1] != '[') && (p->escape_buf[1] != 'O'))
-    {
-      ansi_flush_escape (a, c);
-      return;
-    }
+  if ((p->escape_buf[1] != '[') && (p->escape_buf[1] != 'O')) {
+    ansi_flush_escape (a, c);
+    return;
+  }
 
-  if ((p->escape_buf[2] >= 'A') || (p->escape_buf[2] <= 'Z'))
-    {
-      keydis_key (c->k, c, KEY_UP + (p->escape_buf[2] - 'A'));
-    }
-  else if ((p->escape_buf[2] >= 'a') || (p->escape_buf[2] <= 'z'))
-    {
-      keydis_key (c->k, c, KEY_154 + (p->escape_buf[2] - 'a'));
-    }
-  else
-    {
-      ansi_flush_escape (a, c);
-      return;
-    }
+  if ((p->escape_buf[2] >= 'A') || (p->escape_buf[2] <= 'Z')) {
+    ansi_key (a, c, KEY_UP + (p->escape_buf[2] - 'A'));
+  } else if ((p->escape_buf[2] >= 'a') || (p->escape_buf[2] <= 'z')) {
+    ansi_key (a, c, KEY_154 + (p->escape_buf[2] - 'a'));
+  } else {
+    ansi_flush_escape (a, c);
+    return;
+  }
   p->in_escape = 0;
   p->escape_ptr = 0;
 }
@@ -774,21 +774,23 @@ static void
 ansi_parse_ansikey (ANSI * a, Context * c)
 {
   ANSI_Parser *p = &a->parser;
+  int l = p->escape_ptr - 1;
+  char *end;
+  int k;
 
-  if ((p->escape_buf[1] != '[') || (p->escape_buf[3] != '~'))
-    {
-      ansi_flush_escape (a, c);
-      return;
-    }
-  if ((p->escape_buf[2] >= '0') || (p->escape_buf[2] <= '9'))
-    {
-      keydis_key (c->k, c, KEY_180 + (p->escape_buf[2] - '0'));
-    }
-  else
-    {
-      ansi_flush_escape (a, c);
-      return;
-    }
+  if ((p->escape_buf[1] != '[') || (p->escape_buf[l] != '~')) {
+    ansi_flush_escape (a, c);
+    return;
+  }
+
+  k = strtol (&p->escape_buf[2], &end, 10);
+
+  if (end != &p->escape_buf[l]) {
+    ansi_flush_escape (a, c);
+    return;
+  }
+
+  ansi_key (a, c, KEY_180 + k);
 
   p->in_escape = 0;
   p->escape_ptr = 0;
@@ -800,48 +802,42 @@ static void
 ansi_parse_escape (ANSI * a, Context * c)
 {
   ANSI_Parser *p = &a->parser;
-  switch (p->escape_ptr)
-    {
-    case 0:
-    case 1:
-      return;
-    case 2:
-      switch (p->escape_buf[1])
-        {
-        case '[':
-        case 'O':
-          break;
-        default:
-          ansi_flush_escape (a, c);
-        }
+  switch (p->escape_ptr) {
+  case 0:
+  case 1:
+    return;
+  case 2:
+    switch (p->escape_buf[1]) {
+    case '[':
+    case 'O':
       break;
-    case 3:
-      switch (p->escape_buf[1])
-        {
-        case 'O':
-          ansi_parse_deckey (a, c);
-          break;
-        case '[':
-          if ((p->escape_buf[2] >= 'A') && (p->escape_buf[2] <= 'Z'))
-            ansi_parse_deckey (a, c);
-          break;
-        default:
-          ansi_flush_escape (a, c);
-        }
+    default:
+      ansi_flush_escape (a, c);
+    }
+    break;
+  case 3:
+    switch (p->escape_buf[1]) {
+    case 'O':
+      ansi_parse_deckey (a, c);
       break;
-    case 4:
-      switch (p->escape_buf[1])
-        {
-        case '[':
-          ansi_parse_ansikey (a, c);
-          break;
-        default:
-          ansi_flush_escape (a, c);
-        }
+    case '[':
+      if ((p->escape_buf[2] >= 'A') && (p->escape_buf[2] <= 'Z'))
+        ansi_parse_deckey (a, c);
       break;
-    case 5:
+    default:
       ansi_flush_escape (a, c);
     }
+    break;
+  case 4:
+  case 5:
+  case 6:
+  case 7:
+    if (p->escape_buf[p->escape_ptr - 1] == '~')
+      ansi_parse_ansikey (a, c);
+    break;
+  default:
+    ansi_flush_escape (a, c);
+  }
 }
 
 
@@ -862,7 +858,7 @@ ansi_check_escape (ANSI * a, Context * c)
     return;
 
 
-  /*Time up? */
+  /* Time up? */
   if (diff.tv_sec || (diff.tv_usec > ANSI_ESCAPE_TIMEOUT))
     ansi_flush_escape (a, c);
 
@@ -875,28 +871,24 @@ ansi_parse_char (ANSI * a, Context * c, int ch)
   ANSI_Parser *p = &a->parser;
 
 
-/*See if it's time to flush the escape*/
+  /* See if it's time to flush the escape */
   ansi_check_escape (a, c);
 
-  if (ch == 033)
-    {
-      if (p->in_escape)
-        ansi_flush_escape (a, c);
+  if (ch == 033) {
+    if (p->in_escape)
+      ansi_flush_escape (a, c);
 
-      p->in_escape++;
-      p->escape_ptr = 0;
-      gettimeofday (&p->last_escape, NULL);
-    }
+    p->in_escape++;
+    p->escape_ptr = 0;
+    gettimeofday (&p->last_escape, NULL);
+  }
 
-  if (p->in_escape)
-    {
-      p->escape_buf[p->escape_ptr++] = ch;
-      ansi_parse_escape (a, c);
-    }
-  else
-    {
-      keydis_key (c->k, c, ch);
-    }
+  if (p->in_escape) {
+    p->escape_buf[p->escape_ptr++] = ch;
+    ansi_parse_escape (a, c);
+  } else {
+    ansi_key (a, c, ch);
+  }
 
 }
 
@@ -907,7 +899,7 @@ ansi_parse (ANSI * a, Context * c, char *buf, int len)
     ansi_parse_char (a, c, *(buf++));
 }
 
-int
+static int
 ansi_dispatch (ANSI * a, Context * c)
 {
   char buf[1024];
@@ -923,35 +915,22 @@ ansi_dispatch (ANSI * a, Context * c)
   if (red <= 0)
     return red;
 
-#if 0
-  if (*buf == 3)
-    return -1;
-#endif
-
-#if 0
-  if (*buf == 2)
-    {
-#if  0
-      a->history_ptr = c->h->wptr;
-      HISTORY_INC (c->h, a->history_ptr);
-#endif
-      return -1;
-    }
-#endif
-
-
   ansi_parse (a, c, buf, red);
 
   return 0;
 }
 
 
-static void
+
+static int
 ansi_update (ANSI * a, Context * c)
 {
-  ansi_history (a, c->h);
-  ansi_draw (a, &c->v->crt);
-  tty_length(a->terminal,c->v->crt.size.y);
+  int err = 0;
+
+  err += ansi_history (a, c->h);
+  err += ansi_draw (a, &c->v->crt);
+  tty_length (a->terminal, c->v->crt.size.y);
+  return err;
 }
 
 static void
@@ -962,7 +941,6 @@ ansi_free (ANSI * a)
     a->terminal->close (a->terminal);
 
   free (a);
-
 }
 
 ANSI *
@@ -970,7 +948,7 @@ ansi_new_from_terminal (TTY * t, int utf8)
 {
   ANSI *ret;
 
-  ret = malloc (sizeof (ANSI));
+  ret = xmalloc (sizeof (ANSI));
   memset (ret, 0, sizeof (ANSI));
 
   ret->terminal = t;
@@ -979,6 +957,7 @@ ansi_new_from_terminal (TTY * t, int utf8)
   ret->update = ansi_update;
   ret->reset = ansi_reset;
   ret->terminal_reset = ansi_terminal_reset;
+  ret->set_title = ansi_set_title;
   ret->close = ansi_free;
   ret->dispatch = ansi_dispatch;