generate tty_keys.h from xterm itself

Script gen_tty_keys.sh is heavily based on the script escapes.sh by Egmont
Koblinger.

Closes T1564

src/bin/Makefile.am

@@ -56,7 +56,8 @@ utils.c utils.h \
 dbus.c dbus.h \
 extns.c extns.h \
 app_server.c app_server.h \
-app_server_eet.c app_server_eet.h
+app_server_eet.c app_server_eet.h \
+tty_keys.h
 
 tybg_SOURCES = \
 tybg.c

src/bin/keyin.c

@@ -8,14 +8,30 @@
 #include "termcmd.h"
 #include "keyin.h"
 
-typedef struct _Keyout Keyout;
+typedef struct _Tty_Key Tty_Key;
+typedef struct _Key_Values Key_Values;
 
-struct _Keyout
+struct _s {
+    char *s;
+    ssize_t len;
+};
+
+struct _Key_Values {
+    struct _s plain;
+    struct _s alt;
+    struct _s ctrl;
+    struct _s ctrl_alt;
+    struct _s shift;
+    struct _s shift_alt;
+    struct _s shift_ctrl;
+    struct _s shift_ctrl_alt;
+};
+struct _Tty_Key
 {
-   const char *in;
-   const char *out;
-   int         inlen;
-   int         outlen;
+    char *key;
+    int key_len;
+    Key_Values default_mode;
+    Key_Values cursor;
 };
 
 typedef struct _Key_Binding Key_Binding;
@@ -36,386 +52,46 @@ static Eina_Hash *_key_bindings = NULL;
 
 /* {{{ Keys to TTY */
 
-#define KEY(in, out) {in, out, sizeof(in) - 1, sizeof(out) - 1}
-
-static const Keyout crlf_keyout[] =
-{
-   KEY("Return",       "\r\n"),
-   
-   KEY(NULL, "END")
-};
-
-static const Keyout nocrlf_keyout[] =
-{
-   KEY("Return",       "\r"),
-   
-   KEY(NULL, "END")
-};
-
-static const Keyout appcur_keyout[] =
-{
-   KEY("Left",         "\033OD"),
-   KEY("Right",        "\033OC"),
-   KEY("Up",           "\033OA"),
-   KEY("Down",         "\033OB"),
-   KEY("Home",         "\033OH"),
-   KEY("End",          "\033OF"),
-//// why did i change these?   
-//   KEY("Home",         "\033[7~"),
-//   KEY("End",          "\033[8~"),
-   KEY("F1",           "\033OP"),
-   KEY("F2",           "\033OQ"),
-   KEY("F3",           "\033OR"),
-   KEY("F4",           "\033OS"),
-   
-   KEY(NULL, "END")
-};
-
-static const Keyout ctrl_keyout[] =
-{
-   KEY("Left",         "\033[1;5D"),
-   KEY("Right",        "\033[1;5C"),
-   KEY("Up",           "\033[1;5A"),
-   KEY("Down",         "\033[1;5B"),
-   KEY("Home",         "\033[1;5H"),
-   KEY("End",          "\033[1;5F"),
-   KEY("Insert",       "\033[2;5~"),
-   KEY("Delete",       "\033[3;5~"),
-   KEY("Prior",        "\033[5;5~"),
-   KEY("Next",         "\033[6;5~"),
-   KEY("F1",           "\033[O5P"),
-   KEY("F2",           "\033[O5Q"),
-   KEY("F3",           "\033[O5R"),
-   KEY("F4",           "\033[O5S"),
-   KEY("F5",           "\033[15;5~"),
-   KEY("F6",           "\033[17;5~"),
-   KEY("F7",           "\033[18;5~"),
-   KEY("F8",           "\033[19;5~"),
-   KEY("F9",           "\033[20;5~"),
-   KEY("F10",          "\033[21;5~"),
-   KEY("F11",          "\033[23;5~"),
-   KEY("F12",          "\033[24;5~"),
-   KEY("F13",          "\033[25;5~"),
-   KEY("F14",          "\033[26;5~"),
-   KEY("F15",          "\033[28;5~"),
-   KEY("F16",          "\033[29;5~"),
-   KEY("F17",          "\033[31;5~"),
-   KEY("F18",          "\033[32;5~"),
-   KEY("F19",          "\033[33;5~"),
-   KEY("F20",          "\033[34;5~"),
-   KEY("F21",          "\033[35;5~"),
-   KEY("F22",          "\033[36;5~"),
-   KEY("F23",          "\033[37;5~"),
-   KEY("F24",          "\033[38;5~"),
-   KEY("F25",          "\033[39;5~"),
-   KEY("F26",          "\033[40;5~"),
-   KEY("F27",          "\033[41;5~"),
-   KEY("F28",          "\033[42;5~"),
-   KEY("F29",          "\033[43;5~"),
-   KEY("F30",          "\033[44;5~"),
-   KEY("F31",          "\033[45;5~"),
-   KEY("F32",          "\033[46;5~"),
-   KEY("F33",          "\033[47;5~"),
-   KEY("F34",          "\033[48;5~"),
-   KEY("F35",          "\033[49;5~"),
-
-   KEY(NULL, "END")
-};
-
-static const Keyout ctrl_shift_keyout[] =
-{
-   KEY("Left",         "\033[1;6D"),
-   KEY("Right",        "\033[1;6C"),
-   KEY("Up",           "\033[1;6A"),
-   KEY("Down",         "\033[1;6B"),
-   KEY("Home",         "\033[1;6H"),
-   KEY("End",          "\033[1;6F"),
-   KEY("Insert",       "\033[2;6~"),
-   KEY("Delete",       "\033[3;6~"),
-   KEY("Prior",        "\033[5;6~"),
-   KEY("Next",         "\033[6;6~"),
-
-   KEY("F1",           "\033[O6P"),
-   KEY("F2",           "\033[O6Q"),
-   KEY("F3",           "\033[O6R"),
-   KEY("F4",           "\033[O6S"),
-   KEY("F5",           "\033[15;6~"),
-   KEY("F6",           "\033[17;6~"),
-   KEY("F7",           "\033[18;6~"),
-   KEY("F8",           "\033[19;6~"),
-   KEY("F9",           "\033[20;6~"),
-   KEY("F10",          "\033[21;6~"),
-   KEY("F11",          "\033[23;6~"),
-   KEY("F12",          "\033[24;6~"),
-   KEY("F13",          "\033[25;6~"),
-   KEY("F14",          "\033[26;6~"),
-   KEY("F15",          "\033[28;6~"),
-   KEY("F16",          "\033[29;6~"),
-   KEY("F17",          "\033[31;6~"),
-   KEY("F18",          "\033[32;6~"),
-   KEY("F19",          "\033[33;6~"),
-   KEY("F20",          "\033[34;6~"),
-   KEY("F21",          "\033[35;6~"),
-   KEY("F22",          "\033[36;6~"),
-   KEY("F23",          "\033[37;6~"),
-   KEY("F24",          "\033[38;6~"),
-   KEY("F25",          "\033[39;6~"),
-   KEY("F26",          "\033[40;6~"),
-   KEY("F27",          "\033[41;6~"),
-   KEY("F28",          "\033[42;6~"),
-   KEY("F29",          "\033[43;6~"),
-   KEY("F30",          "\033[44;6~"),
-   KEY("F31",          "\033[45;6~"),
-   KEY("F32",          "\033[46;6~"),
-   KEY("F33",          "\033[47;6~"),
-   KEY("F34",          "\033[48;6~"),
-   KEY("F35",          "\033[49;6~"),
-
-   KEY(NULL, "END")
-};
-
-static const Keyout shift_keyout[] =
-{
-   KEY("Left",         "\033[1;2D"),
-   KEY("Right",        "\033[1;2C"),
-   KEY("Up",           "\033[1;2A"),
-   KEY("Down",         "\033[1;2B"),
-   KEY("Home",         "\033[1;2H"),
-   KEY("End",          "\033[1;2F"),
-   KEY("Insert",       "\033[2;2~"),
-   KEY("Delete",       "\033[3;2~"),
-   KEY("Prior",        "\033[5;2~"),
-   KEY("Next",         "\033[6;2~"),
-
-   KEY("Tab",          "\033[Z"),
-   KEY("ISO_Left_Tab", "\033[Z"),
-   KEY("F1",           "\033[1;2P"),
-   KEY("F2",           "\033[1;2Q"),
-   KEY("F3",           "\033[1;2R"),
-   KEY("F4",           "\033[1;2S"),
-   KEY("F5",           "\033[15;2~"),
-   KEY("F6",           "\033[17;2~"),
-   KEY("F7",           "\033[18;2~"),
-   KEY("F8",           "\033[19;2~"),
-   KEY("F9",           "\033[20;2~"),
-   KEY("F10",          "\033[21;2~"),
-   KEY("F11",          "\033[23;2~"),
-   KEY("F12",          "\033[24;2~"),
-   KEY("F13",          "\033[25;2~"),
-   KEY("F14",          "\033[26;2~"),
-   KEY("F15",          "\033[28;2~"),
-   KEY("F16",          "\033[29;2~"),
-   KEY("F17",          "\033[31;2~"),
-   KEY("F18",          "\033[32;2~"),
-   KEY("F19",          "\033[33;2~"),
-   KEY("F20",          "\033[34;2~"),
-   KEY("F21",          "\033[35;2~"),
-   KEY("F22",          "\033[36;2~"),
-   KEY("F23",          "\033[37;2~"),
-   KEY("F24",          "\033[38;2~"),
-   KEY("F25",          "\033[39;2~"),
-   KEY("F26",          "\033[40;2~"),
-   KEY("F27",          "\033[41;2~"),
-   KEY("F28",          "\033[42;2~"),
-   KEY("F29",          "\033[43;2~"),
-   KEY("F30",          "\033[44;2~"),
-   KEY("F31",          "\033[45;2~"),
-   KEY("F32",          "\033[46;2~"),
-   KEY("F33",          "\033[47;2~"),
-   KEY("F34",          "\033[48;2~"),
-   KEY("F35",          "\033[49;2~"),
-
-   KEY(NULL, "END")
-};
-
-static const Keyout alt_keyout[] =
-{
-   KEY("Left",         "\033[1;3D"),
-   KEY("Right",        "\033[1;3C"),
-   KEY("Up",           "\033[1;3A"),
-   KEY("Down",         "\033[1;3B"),
-   KEY("End",          "\033[1;3F"),
-   KEY("BackSpace",    "\033\b"),
-   KEY("Return",       "\033\015"),
-   KEY("space",        "\033\040"),
-   KEY("Home",         "\033[1;3H"),
-   KEY("End",          "\033[1;3F"),
-   KEY("Prior",        "\033[5;3~"),
-   KEY("Next",         "\033[6;3~"),
-   KEY("Insert",       "\033[2;3~"),
-   KEY("Delete",       "\033[3;3~"),
-   KEY("Menu",         "\033[29;3~"),
-   KEY("Find",         "\033[1;3~"),
-   KEY("Help",         "\033[28;3~"),
-   KEY("Execute",      "\033[3;3~"),
-   KEY("Select",       "\033[4;3~"),
-   KEY("F1",           "\033[O3P"),
-   KEY("F2",           "\033[O3Q"),
-   KEY("F3",           "\033[O3R"),
-   KEY("F4",           "\033[O3S"),
-   KEY("F5",           "\033[15;3~"),
-   KEY("F6",           "\033[17;3~"),
-   KEY("F7",           "\033[18;3~"),
-   KEY("F8",           "\033[19;3~"),
-   KEY("F9",           "\033[20;3~"),
-   KEY("F10",          "\033[21;3~"),
-   KEY("F11",          "\033[23;3~"),
-   KEY("F12",          "\033[24;3~"),
-   KEY("F13",          "\033[25;3~"),
-   KEY("F14",          "\033[26;3~"),
-   KEY("F15",          "\033[28;3~"),
-   KEY("F16",          "\033[29;3~"),
-   KEY("F17",          "\033[31;3~"),
-   KEY("F18",          "\033[32;3~"),
-   KEY("F19",          "\033[33;3~"),
-   KEY("F20",          "\033[34;3~"),
-   KEY("F21",          "\033[35;3~"),
-   KEY("F22",          "\033[36;3~"),
-   KEY("F23",          "\033[37;3~"),
-   KEY("F24",          "\033[38;3~"),
-   KEY("F25",          "\033[39;3~"),
-   KEY("F26",          "\033[40;3~"),
-   KEY("F27",          "\033[41;3~"),
-   KEY("F28",          "\033[42;3~"),
-   KEY("F29",          "\033[43;3~"),
-   KEY("F30",          "\033[44;3~"),
-   KEY("F31",          "\033[45;3~"),
-   KEY("F32",          "\033[46;3~"),
-   KEY("F33",          "\033[47;3~"),
-   KEY("F34",          "\033[48;3~"),
-   KEY("F35",          "\033[49;3~"),
-
-   KEY(NULL, "END")
-};
-
-static const Keyout keyout[] =
-{
-//   KEY("BackSpace",    "\177"),
-   KEY("BackSpace",    "\b"),
-   KEY("Left",         "\033[D"),
-   KEY("Right",        "\033[C"),
-   KEY("Up",           "\033[A"),
-   KEY("Down",         "\033[B"),
-//   KEY("Tab",          "\t"),
-//   KEY("ISO_Left_Tab", "\t"),
-   KEY("Home",         "\033[H"),
-   KEY("End",          "\033[F"),
-   KEY("Prior",        "\033[5~"),
-   KEY("Next",         "\033[6~"),
-   KEY("Insert",       "\033[2~"),
-   KEY("Delete",       "\033[3~"),
-   KEY("Menu",         "\033[29~"),
-   KEY("Find",         "\033[1~"),
-   KEY("Help",         "\033[28~"),
-   KEY("Execute",      "\033[3~"),
-   KEY("Select",       "\033[4~"),
-   KEY("F1",           "\033OP"),
-   KEY("F2",           "\033OQ"),
-   KEY("F3",           "\033OR"),
-   KEY("F4",           "\033OS"),
-   KEY("F5",           "\033[15~"),
-   KEY("F6",           "\033[17~"),
-   KEY("F7",           "\033[18~"),
-   KEY("F8",           "\033[19~"),
-   KEY("F9",           "\033[20~"),
-   KEY("F10",          "\033[21~"),
-   KEY("F11",          "\033[23~"),
-   KEY("F12",          "\033[24~"),
-   KEY("F13",          "\033[25~"),
-   KEY("F14",          "\033[26~"),
-   KEY("F15",          "\033[28~"),
-   KEY("F16",          "\033[29~"),
-   KEY("F17",          "\033[31~"),
-   KEY("F18",          "\033[32~"),
-   KEY("F19",          "\033[33~"),
-   KEY("F20",          "\033[34~"),
-   KEY("F21",          "\033[35~"),
-   KEY("F22",          "\033[36~"),
-   KEY("F23",          "\033[37~"),
-   KEY("F24",          "\033[38~"),
-   KEY("F25",          "\033[39~"),
-   KEY("F26",          "\033[40~"),
-   KEY("F27",          "\033[41~"),
-   KEY("F28",          "\033[42~"),
-   KEY("F29",          "\033[43~"),
-   KEY("F30",          "\033[44~"),
-   KEY("F31",          "\033[45~"),
-   KEY("F32",          "\033[46~"),
-   KEY("F33",          "\033[47~"),
-   KEY("F34",          "\033[48~"),
-   KEY("F35",          "\033[49~"),
-/*   
-   KEY("KP_F1",        "\033OP"),
-   KEY("KP_F2",        "\033OQ"),
-   KEY("KP_F3",        "\033OR"),
-   KEY("KP_F4",        "\033OS"),
-   KEY("KP_Begin",     "\033Ou"),
-   KEY("KP_Multiply",  "\033Oj"),
-   KEY("KP_Add",       "\033Ok"),
-   KEY("KP_Separator", "\033Ol"),
-   KEY("KP_Subtract",  "\033Om"),
-   KEY("KP_Decimal",   "\033On"),
-   KEY("KP_Divide",    "\033Oo"),
-   KEY("KP_0",         "\033Op"),
-   KEY("KP_1",         "\033Oq"),
-   KEY("KP_2",         "\033Or"),
-   KEY("KP_3",         "\033Os"),
-   KEY("KP_4",         "\033Ot"),
-   KEY("KP_5",         "\033Ou"),
-   KEY("KP_6",         "\033Ov"),
-   KEY("KP_7",         "\033Ow"),
-   KEY("KP_8",         "\033Ox"),
-   KEY("KP_9",         "\033Oy"),
- */
-   KEY(NULL, "END")
-};
-
-static const Keyout kp_keyout[] =
-{
-   KEY("KP_Left",         "\033[D"),
-   KEY("KP_Right",        "\033[C"),
-   KEY("KP_Up",           "\033[A"),
-   KEY("KP_Down",         "\033[B"),
-   KEY("KP_Home",         "\033[H"),
-   KEY("KP_End",          "\033[F"),
-   KEY("KP_Prior",        "\033[5~"),
-   KEY("KP_Next",         "\033[6~"),
-   KEY("KP_Insert",       "\033[2~"),
-   KEY("KP_Delete",       "\033[3~"),
-   KEY("KP_Enter",        "\r"),
-   KEY(NULL, "END")
-};
-
-static const Keyout kps_keyout[] =
-{
-   KEY("KP_Left",         "\033Ot"),
-   KEY("KP_Right",        "\033Ov"),
-   KEY("KP_Up",           "\033Ox"),
-   KEY("KP_Down",         "\033Or"),
-   KEY("KP_Home",         "\033Ow"),
-   KEY("KP_End",          "\033Oq"),
-   KEY("KP_Prior",        "\033Oy"),
-   KEY("KP_Next",         "\033Os"),
-   KEY("KP_Insert",       "\033Op"),
-   KEY("KP_Delete",       "\033On"),
-   KEY("KP_Enter",        "\033OM"),
-   
-   KEY(NULL, "END")
-};
-
 static Eina_Bool
-_key_try(Termpty *ty, const Keyout *map, const Evas_Event_Key_Down *ev)
+_key_try(Termpty *ty, const Tty_Key *map, int len, const Evas_Event_Key_Down *ev,
+         int alt, int shift, int ctrl)
 {
    int i, inlen;
 
-   if (!ev->key) return EINA_FALSE;
-
    inlen = strlen(ev->key);
-   for (i = 0; map[i].in; i++)
+   for (i = 0; i < len; i++)
      {
-        if ((inlen == map[i].inlen) && (!memcmp(ev->key, map[i].in, inlen)))
+        if ((inlen == map[i].key_len) && (!memcmp(ev->key, map[i].key, inlen)))
           {
-             termpty_write(ty, map[i].out, map[i].outlen);
+             const struct _s *s;
+             const Key_Values *kv;
+
+             if (!ty->state.appcursor)
+               {
+                  kv = &map[i].default_mode;
+               }
+             else
+               {
+                  kv = &map[i].cursor;
+               }
+             if (!alt && !ctrl && !shift)
+                  s = &kv->plain;
+             else if (alt && !ctrl && !shift)
+                  s = &kv->alt;
+             else if (!alt && ctrl && !shift)
+                  s = &kv->ctrl;
+             else if (alt && ctrl && !shift)
+                  s = &kv->ctrl_alt;
+             else if (!alt && !ctrl && shift)
+                  s = &kv->shift;
+             else if (!alt && !ctrl && shift)
+                  s = &kv->shift_alt;
+             else if (!alt && !ctrl && shift)
+                  s = &kv->shift_ctrl;
+             else if (alt && ctrl && shift)
+                  s = &kv->shift_ctrl_alt;
+
+             termpty_write(ty, s->s, s->len);
              return EINA_TRUE;
           }
      }
@@ -434,21 +110,75 @@ keyin_compose_seq_reset(Keys_Handler *khdl)
    khdl->composing = EINA_FALSE;
 }
 
+#include "tty_keys.h"
+
 static void
 _handle_key_to_pty(Termpty *ty, const Evas_Event_Key_Down *ev,
-             int alt, int shift, int ctrl)
+                   int alt, int shift, int ctrl)
 {
-   if (!alt)
+   if (!ev->key)
+     return;
+
+   if (!strcmp(ev->key, "BackSpace"))
+     {
+        if (ty->state.send_bs)
+          {
+             termpty_write(ty, "\b", 1);
+             return;
+          }
+        else
+          {
+             Config *cfg = termpty_config_get(ty);
+
+             if (cfg->erase_is_del)
+               {
+                  termpty_write(ty, "\177", sizeof("\177") - 1);
+               }
+             else
+               {
+                  termpty_write(ty, "\b", sizeof("\b") - 1);
+               }
+             return;
+        }
+     }
+   if (!strcmp(ev->key, "Return"))
      {
       if (ty->state.crlf)
         {
-           if (_key_try(ty, crlf_keyout, ev)) return;
+           termpty_write(ty, "\r\n", sizeof("\r\n") - 1);
+           return;
         }
       else
         {
-           if (_key_try(ty, nocrlf_keyout, ev)) return;
+           termpty_write(ty, "\r", sizeof("\r") - 1);
+           return;
         }
      }
+   if (ev->key && ev->key[0] == 'K' && ev->key[1] == 'k')
+     {
+        if (!evas_key_lock_is_set(ev->locks, "Num_Lock"))
+          {
+             if (ty->state.alt_kp)
+               {
+                  if (_key_try(ty, tty_keys,
+                               sizeof(tty_keys_kp_app)/sizeof(tty_keys_kp_app[0]),
+                               ev, alt, shift, ctrl))
+                    return;
+               }
+             else
+               {
+                  if (_key_try(ty, tty_keys,
+                               sizeof(tty_keys_kp_plain)/sizeof(tty_keys_kp_plain[0]),
+                               ev, alt, shift, ctrl))
+                    return;
+               }
+          }
+     }
+   else
+     if (_key_try(ty, tty_keys, sizeof(tty_keys)/sizeof(tty_keys[0]), ev,
+                  alt, shift, ctrl))
+       return;
+#if 0
    if (
        ((ty->state.alt_kp) && (shift))
 //       || ((!ty->state.alt_kp) &&
@@ -485,60 +215,8 @@ _handle_key_to_pty(Termpty *ty, const Evas_Event_Key_Down *ev,
              if (_key_try(ty, ctrl_shift_keyout, ev)) return;
           }
      }
-   else if (shift)
-     {
-        if (_key_try(ty, shift_keyout, ev)) return;
-     }
+#endif
 
-   else if (alt)
-     {
-        if (_key_try(ty, alt_keyout, ev)) return;
-        if (ev->key[0] > 0 && ev->key[1] == '\0')
-          {
-             char echo[2];
-             /* xterm and rxvt differ here about their default options: */
-             /* xterm, altSendsEscape off
-
-             echo[0] = ev->key[0] | 0x80;
-             termpty_write(ty, echo, 1);
-             */
-
-             /* rxvt, with meta8 off, chose it because of utf-8 */
-             echo[0] = 033;
-             echo[1] = ev->key[0];
-             termpty_write(ty, echo, 2);
-             return;
-          }
-     }
-
-   if (ty->state.appcursor)
-     {
-        if (_key_try(ty, appcur_keyout, ev)) return;
-     }
-
-   if (!strcmp(ev->key, "BackSpace"))
-     {
-        if (ty->state.send_bs)
-          {
-             termpty_write(ty, "\b", 1);
-             return;
-          }
-        else
-          {
-             Config *cfg = termpty_config_get(ty);
-
-             if (cfg->erase_is_del)
-               {
-                  termpty_write(ty, "\177", sizeof("\177") - 1);
-               }
-             else
-               {
-                  termpty_write(ty, "\b", sizeof("\b") - 1);
-               }
-             return;
-        }
-     }
-   if (_key_try(ty, keyout, ev)) return;
    if (ev->string)
      {
         if ((ev->string[0]) && (!ev->string[1]))

src/bin/keyin.h

@@ -36,5 +36,4 @@ int keyin_add_config(Config_Keys *cfg_key);
 int keyin_remove_config(Config_Keys *cfg_key);
 void key_bindings_shutdown(void);
 
-
 #endif

tools/gen_tty_keys.sh

@@ -0,0 +1,277 @@
+#!/bin/bash
+
+if [ -z "$(type -p xdotool)" ]; then
+	echo 'Install xdotool!' >&2
+	exit 1
+fi
+
+if [ -z "$(type -p numlockx)" ]; then
+	echo 'Install numlockx!' >&2
+	exit 1
+fi
+
+if [ -t 1 ]; then
+	echo 'Redirect the output to a file!' >&2
+	exit 1
+fi
+
+function do_reset {
+	echo -ne '\e[?1050l' >&2
+	echo -ne '\e[?1051l' >&2
+	echo -ne '\e[?1052l' >&2
+	echo -ne '\e[?1053l' >&2
+	echo -ne '\e[?1060l' >&2
+	echo -ne '\e[?1061l' >&2
+	echo -ne '\e[?1l' >&2  # normal cursor mode
+	echo -ne '\e>' >&2     # normal keypad mode
+}
+
+do_key() {
+   local key="$1"
+   local shift="$2"
+   local ctrl="$3"
+   local alt="$4"
+   local kind="$5"
+
+   local mod=""
+   local numlock=0
+
+   if [ "$shift" = "1" ]; then
+      mod="${mod}Shift+"
+   fi
+   if [ "$ctrl" = "1" ]; then
+      mod="${mod}Ctrl+"
+   fi
+   if [ "$alt" = "1" ]; then
+      mod="${mod}Alt+"
+   fi
+   if [ "$numlock" = "1" ]; then
+      numlockx on
+   else
+      numlockx off
+   fi
+
+   skip=0
+   if [[ $key =~ F && $alt = 1 ]]; then
+      # Alt+Fx are usually window manager actions
+      skip=1
+   elif [[ $key =~ Insert && ( $shift = 1 || $ctrl = 1 ) ]]; then
+      # {Shift,Ctrl}+Insert is about mouse selection
+      skip=1
+   elif [[ ( $key =~ Home || $key =~ End || $key =~ Page ) && $shift = 1 ]]; then
+      # Shift+{PgUp,PgDn,Home,End} effect the scrollbar
+      skip=1
+   elif [[ ( $key =~ Up || $key =~ Down ) && $shift = 1 && $ctrl = 1 ]]; then
+      # Ctrl+Shift+{Up,Dn} also effect the scrollbar
+      skip=1
+   elif [[ ( $key =~ Add || $key =~ Sub ) && ( $shift = 1) ]]; then
+      # Shift+{+,-} changes window size in xterm
+      skip=1
+   fi
+
+   echo "$kind $mod$key" >&2
+   if [ $skip = 0 ]; then
+      xdotool key $mod$key Return
+      if [ $? -eq 0 ]; then
+         IFS='' read -r esc
+         esc="${esc/$'\033'/\\033}"
+      else
+         echo "SEGV: $mod$key" >&2
+         skip=1
+      fi
+   else
+      skip=1
+   fi
+   if [ $skip = 0 ]; then
+      echo "    KH(\"$esc\"), // $kind $mod$key"
+   else
+      echo "    {NULL, 0}, // $kind $mod$key"
+   fi
+
+   sleep 0.1
+   # a bit of healthy paranoia
+   xdotool key at Return
+   IFS='' read -r esc
+   if [ "$esc" != '@' ]; then
+      echo 'Sync error!' >&2
+      exit 1
+   fi
+}
+
+do_keys_mode() {
+
+
+   local keys='F1 F2 F3 F4 F5 F6 F7 F8 F9 F10 F11 F12 Left Right Up Down Home End Insert Delete Prior Next Tab minus space Menu Find Help Select '
+
+   echo "#define KH(in) { in, sizeof(in) - 1 }"
+
+   echo "static const Tty_Key tty_keys[] = {"
+   for k in $keys; do
+      echo "{"
+      echo "  \"$k\","
+      echo "  sizeof(\"$k\") - 1,"
+      #default
+      echo "  {"
+      do_reset
+      do_key $k 0 0 0 "default"
+      do_key $k 0 0 1 "default"
+      do_key $k 0 1 0 "default"
+      do_key $k 0 1 1 "default"
+      do_key $k 1 0 0 "default"
+      do_key $k 1 0 1 "default"
+      do_key $k 1 1 0 "default"
+      do_key $k 1 1 1 "default"
+      echo "  },"
+
+      #cursor
+      echo "  {"
+      do_reset
+      echo -ne '\e[?1h' >&2  # application cursor mode
+      do_key $k 0 0 0 "cursor"
+      do_key $k 0 0 1 "cursor"
+      do_key $k 0 1 0 "cursor"
+      do_key $k 0 1 1 "cursor"
+      do_key $k 1 0 0 "cursor"
+      do_key $k 1 0 1 "cursor"
+      do_key $k 1 1 0 "cursor"
+      do_key $k 1 1 1 "cursor"
+      echo "  },"
+      echo "},"
+   done
+   echo "};"
+
+
+   # Kp_*
+
+   keys='KP_Up KP_Down KP_Right KP_Left KP_Insert KP_Delete KP_Home KP_Prior KP_Next KP_Begin KP_End'
+
+   echo "static const Tty_Key tty_keys_kp_plain[] = {"
+   for k in $keys; do
+      echo "{"
+      echo "  \"$k\","
+      echo "  sizeof(\"$k\") - 1,"
+      #default
+      echo "  {"
+      do_reset
+      do_key $k 0 0 0 "default"
+      do_key $k 0 0 1 "default"
+      do_key $k 0 1 0 "default"
+      do_key $k 0 1 1 "default"
+      do_key $k 1 0 0 "default"
+      do_key $k 1 0 1 "default"
+      do_key $k 1 1 0 "default"
+      do_key $k 1 1 1 "default"
+      echo "  },"
+
+      #cursor
+      echo "  {"
+      do_reset
+      echo -ne '\e[?1h' >&2  # application cursor mode
+      do_key $k 0 0 0 "cursor"
+      do_key $k 0 0 1 "cursor"
+      do_key $k 0 1 0 "cursor"
+      do_key $k 0 1 1 "cursor"
+      do_key $k 1 0 0 "cursor"
+      do_key $k 1 0 1 "cursor"
+      do_key $k 1 1 0 "cursor"
+      do_key $k 1 1 1 "cursor"
+      echo "  },"
+      echo "},"
+   done
+   echo "};"
+   echo "static const Tty_Key tty_keys_kp_app[] = {"
+   for k in $keys; do
+      echo "{"
+      echo "  \"$k\","
+      echo "  sizeof(\"$k\") - 1,"
+      #default
+      echo "  {"
+      do_reset
+      echo -ne '\e[?1l' >&2  # normal cursor mode
+      echo -ne '\e=' >&2     # application keypad
+      do_key $k 0 0 0 "default"
+      do_key $k 0 0 1 "default"
+      do_key $k 0 1 0 "default"
+      do_key $k 0 1 1 "default"
+      do_key $k 1 0 0 "default"
+      do_key $k 1 0 1 "default"
+      do_key $k 1 1 0 "default"
+      do_key $k 1 1 1 "default"
+      echo "  },"
+
+      #cursor
+      echo "  {"
+      do_reset
+      echo -ne '\e[?1h' >&2  # application cursor mode
+      echo -ne '\e=' >&2     # application keypad
+      do_key $k 0 0 0 "cursor"
+      do_key $k 0 0 1 "cursor"
+      do_key $k 0 1 0 "cursor"
+      do_key $k 0 1 1 "cursor"
+      do_key $k 1 0 0 "cursor"
+      do_key $k 1 0 1 "cursor"
+      do_key $k 1 1 0 "cursor"
+      do_key $k 1 1 1 "cursor"
+      echo "  },"
+      echo "},"
+   done
+   echo "};"
+   #
+   #echo '  normal'
+   #echo '###   normal' >&2
+   #do_one_cursor_and_keypad_mode
+
+   #echo -ne '\e[?1h' >&2  # application cursor mode
+   #echo '  cursor'
+   #echo '###   cursor' >&2
+   #do_one_cursor_and_keypad_mode
+
+   #echo -ne '\e[?1l' >&2  # normal cursor mode
+   #echo -ne '\e=' >&2     # application keypad
+   #echo '  keypad'
+   #echo '###   keypad' >&2
+   #do_one_cursor_and_keypad_mode
+
+   #echo -ne '\e[?1h' >&2  # application cursor mode
+   #echo '  cursor+keypad'
+   #echo '###   cursor+keypad' >&2
+   #do_one_cursor_and_keypad_mode
+
+   echo "#undef KH"
+}
+
+cat <<END >&2
+
+Don't do anything!
+Don't touch your keyboard!  Not even modifiers or numlock!
+Don't change window focus!
+Just leave it running!
+
+Make sure to have English keyboard layout.
+
+Press Ctrl+C if you really need to abort.
+
+END
+
+# Sometimes the first run of xdotool produces some garbage, no clue why.
+xdotool key T e s t space 1 Return
+read x
+xdotool key T e s t space 2 Return
+read x
+if [ "$x" != 'Test 2' ]; then
+	echo "Oops, xdotool doesn't seem to work!" >&2
+	exit 1
+fi
+
+# Let's go!
+
+trap 'do_reset; echo >&2; echo >&2; echo "If your keyboard is stuck, press and release the modifiers one by one" >&2' EXIT
+
+do_keys_mode DEFAULT 0
+
+do_reset
+
+echo >&2
+echo "Ready." >&2
+
+trap EXIT