From 5692f32bcfa049fc2b5555b5a883045b217349b9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?P=C5=99emysl=20Janouch?= Date: Thu, 9 Oct 2014 23:47:24 +0200 Subject: CMake-ify, rename to termkey2 for the time being --- t/01base.c | 29 --------- t/02getkey.c | 92 --------------------------- t/03utf8.c | 188 ------------------------------------------------------- t/04flags.c | 40 ------------ t/05read.c | 85 ------------------------- t/06buffer.c | 38 ----------- t/10keyname.c | 40 ------------ t/11strfkey.c | 151 -------------------------------------------- t/12strpkey.c | 157 ---------------------------------------------- t/13cmpkey.c | 72 --------------------- t/20canon.c | 74 ---------------------- t/30mouse.c | 174 -------------------------------------------------- t/31position.c | 38 ----------- t/32modereport.c | 45 ------------- t/39csi.c | 52 --------------- t/taplib.c | 79 ----------------------- t/taplib.h | 7 --- 17 files changed, 1361 deletions(-) delete mode 100644 t/01base.c delete mode 100644 t/02getkey.c delete mode 100644 t/03utf8.c delete mode 100644 t/04flags.c delete mode 100644 t/05read.c delete mode 100644 t/06buffer.c delete mode 100644 t/10keyname.c delete mode 100644 t/11strfkey.c delete mode 100644 t/12strpkey.c delete mode 100644 t/13cmpkey.c delete mode 100644 t/20canon.c delete mode 100644 t/30mouse.c delete mode 100644 t/31position.c delete mode 100644 t/32modereport.c delete mode 100644 t/39csi.c delete mode 100644 t/taplib.c delete mode 100644 t/taplib.h (limited to 't') diff --git a/t/01base.c b/t/01base.c deleted file mode 100644 index 39e0e39..0000000 --- a/t/01base.c +++ /dev/null @@ -1,29 +0,0 @@ -#include -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - - plan_tests (6); - - tk = termkey_new_abstract ("vt100", NULL, 0); - ok (!!tk, "termkey_new_abstract"); - is_int (termkey_get_buffer_size (tk), 256, "termkey_get_buffer_size"); - ok (termkey_is_started (tk), "termkey_is_started true after construction"); - - termkey_stop (tk); - ok (!termkey_is_started (tk), - "termkey_is_started false after termkey_stop()"); - - termkey_start (tk); - ok (termkey_is_started (tk), - "termkey_is_started true after termkey_start()"); - - termkey_destroy (tk); - - ok (1, "termkey_free"); - return exit_status (); -} diff --git a/t/02getkey.c b/t/02getkey.c deleted file mode 100644 index 8cba991..0000000 --- a/t/02getkey.c +++ /dev/null @@ -1,92 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - - plan_tests (31); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - is_int (termkey_get_buffer_remaining (tk), - 256, "buffer free initially 256"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_NONE, - "getkey yields RES_NONE when empty"); - - is_int (termkey_push_bytes (tk, "h", 1), 1, "push_bytes returns 1"); - - is_int (termkey_get_buffer_remaining (tk), 255, - "buffer free 255 after push_bytes"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after h"); - - is_int (key.type, TERMKEY_TYPE_KEY, "key.type after h"); - is_int (key.code.codepoint, 'h', "key.code.codepoint after h"); - is_int (key.modifiers, 0, "key.modifiers after h"); - is_str (key.multibyte, "h", "key.multibyte after h"); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free 256 after getkey"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_NONE, - "getkey yields RES_NONE a second time"); - - termkey_push_bytes (tk, "\x01", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after C-a"); - - is_int (key.type, TERMKEY_TYPE_KEY, "key.type after C-a"); - is_int (key.code.codepoint, 'a', "key.code.codepoint after C-a"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, "key.modifiers after C-a"); - - termkey_push_bytes (tk, "\033OA", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after Up"); - - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type after Up"); - is_int (key.code.sym, TERMKEY_SYM_UP, "key.code.sym after Up"); - is_int (key.modifiers, 0, "key.modifiers after Up"); - - is_int (termkey_push_bytes (tk, "\033O", 2), 2, "push_bytes returns 2"); - - is_int (termkey_get_buffer_remaining (tk), 254, - "buffer free 254 after partial write"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN after partial write"); - - termkey_push_bytes (tk, "C", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after Right completion"); - - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type after Right"); - is_int (key.code.sym, TERMKEY_SYM_RIGHT, "key.code.sym after Right"); - is_int (key.modifiers, 0, "key.modifiers after Right"); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free 256 after completion"); - - termkey_push_bytes (tk, "\033[27;5u", 7); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after Ctrl-Escape"); - - is_int (key.type, TERMKEY_TYPE_KEYSYM, - "key.type after Ctrl-Escape"); - is_int (key.code.sym, TERMKEY_SYM_ESCAPE, - "key.code.sym after Ctrl-Escape"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, - "key.modifiers after Ctrl-Escape"); - - termkey_destroy (tk); - - return exit_status (); -} diff --git a/t/03utf8.c b/t/03utf8.c deleted file mode 100644 index 9b06e2e..0000000 --- a/t/03utf8.c +++ /dev/null @@ -1,188 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - - plan_tests (33 /* 57 */); - - tk = termkey_new_abstract ("vt100", "UTF-8", 0); - - termkey_push_bytes (tk, "a", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY low ASCII"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type low ASCII"); - is_int (key.code.codepoint, 'a', "key.code.codepoint low ASCII"); - - /* 2-byte UTF-8 range is U+0080 to U+07FF (0xDF 0xBF) */ - /* However, we'd best avoid the C1 range, so we'll start at U+00A0 (0xC2 0xA0) */ - - termkey_push_bytes (tk, "\xC2\xA0", 2); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 2 low"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 2 low"); - is_int (key.code.codepoint, 0x00A0, "key.code.codepoint UTF-8 2 low"); - - termkey_push_bytes (tk, "\xDF\xBF", 2); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 2 high"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 2 high"); - is_int (key.code.codepoint, 0x07FF, "key.code.codepoint UTF-8 2 high"); - - /* 3-byte UTF-8 range is U+0800 (0xE0 0xA0 0x80) to U+FFFD (0xEF 0xBF 0xBD) */ - - termkey_push_bytes (tk, "\xE0\xA0\x80", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 low"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 3 low"); - is_int (key.code.codepoint, 0x0800, "key.code.codepoint UTF-8 3 low"); - - termkey_push_bytes (tk, "\xEF\xBF\xBD", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 high"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 3 high"); - is_int (key.code.codepoint, 0xFFFD, "key.code.codepoint UTF-8 3 high"); - - /* 4-byte UTF-8 range is U+10000 (0xF0 0x90 0x80 0x80) to U+10FFFF (0xF4 0x8F 0xBF 0xBF) */ - - termkey_push_bytes (tk, "\xF0\x90\x80\x80", 4); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 low"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 4 low"); - is_int (key.code.codepoint, 0x10000, "key.code.codepoint UTF-8 4 low"); - - termkey_push_bytes (tk, "\xF4\x8F\xBF\xBF", 4); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 high"); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type UTF-8 4 high"); - is_int (key.code.codepoint, 0x10FFFF, "key.code.codepoint UTF-8 4 high"); - -#if 0 - /* XXX: With the move to iconv, this has changed significantly. */ - - /* Invalid continuations */ - - termkey_push_bytes (tk, "\xC2!", 2); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 2 invalid cont"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 2 invalid cont"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 2 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 2 invalid after"); - - termkey_push_bytes (tk, "\xE0!", 2); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 invalid cont"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 3 invalid cont"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 3 invalid after"); - - termkey_push_bytes (tk, "\xE0\xA0!", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 invalid cont 2"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 3 invalid cont 2"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 3 invalid after"); - - termkey_push_bytes (tk, "\xF0!", 2); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid cont"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 4 invalid cont"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 4 invalid after"); - - termkey_push_bytes (tk, "\xF0\x90!", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid cont 2"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 4 invalid cont 2"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 4 invalid after"); - - termkey_push_bytes (tk, "\xF0\x90\x80!", 4); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid cont 3"); - is_int (key.code.codepoint, 0xFFFD, - "key.code.codepoint UTF-8 4 invalid cont 3"); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 invalid after"); - is_int (key.code.codepoint, '!', - "key.code.codepoint UTF-8 4 invalid after"); -#endif - - /* Partials */ - - termkey_push_bytes (tk, "\xC2", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 2 partial"); - - termkey_push_bytes (tk, "\xA0", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 2 partial"); - is_int (key.code.codepoint, 0x00A0, - "key.code.codepoint UTF-8 2 partial"); - - termkey_push_bytes (tk, "\xE0", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 3 partial"); - - termkey_push_bytes (tk, "\xA0", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 3 partial"); - - termkey_push_bytes (tk, "\x80", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 3 partial"); - is_int (key.code.codepoint, 0x0800, - "key.code.codepoint UTF-8 3 partial"); - - termkey_push_bytes (tk, "\xF0", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 4 partial"); - - termkey_push_bytes (tk, "\x90", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 4 partial"); - - termkey_push_bytes (tk, "\x80", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN UTF-8 4 partial"); - - termkey_push_bytes (tk, "\x80", 1); - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY UTF-8 4 partial"); - is_int (key.code.codepoint, 0x10000, - "key.code.codepoint UTF-8 4 partial"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/04flags.c b/t/04flags.c deleted file mode 100644 index eb6e20b..0000000 --- a/t/04flags.c +++ /dev/null @@ -1,40 +0,0 @@ -#include -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - - plan_tests (8); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - termkey_push_bytes (tk, " ", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after space"); - - is_int (key.type, TERMKEY_TYPE_KEY, "key.type after space"); - is_int (key.code.codepoint, ' ', "key.code.codepoint after space"); - is_int (key.modifiers, 0, "key.modifiers after space"); - - termkey_set_flags (tk, TERMKEY_FLAG_SPACESYMBOL); - - termkey_push_bytes (tk, " ", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after space"); - - is_int (key.type, TERMKEY_TYPE_KEYSYM, - "key.type after space with FLAG_SPACESYMBOL"); - is_int (key.code.sym, TERMKEY_SYM_SPACE, - "key.code.sym after space with FLAG_SPACESYMBOL"); - is_int (key.modifiers, 0, - "key.modifiers after space with FLAG_SPACESYMBOL"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/05read.c b/t/05read.c deleted file mode 100644 index 2a5530a..0000000 --- a/t/05read.c +++ /dev/null @@ -1,85 +0,0 @@ -#include -#include -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - int fd[2]; - termkey_t *tk; - termkey_key_t key; - - plan_tests (21); - - /* We'll need a real filehandle we can write/read. - * pipe () can make us one */ - pipe (fd); - - /* Sanitise this just in case */ - putenv ("TERM=vt100"); - - tk = termkey_new (fd[0], NULL, TERMKEY_FLAG_NOTERMIOS); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free initially 256"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_NONE, - "getkey yields RES_NONE when empty"); - - write (fd[1], "h", 1); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_NONE, - "getkey yields RES_NONE before advisereadable"); - - is_int (termkey_advisereadable (tk), TERMKEY_RES_AGAIN, - "advisereadable yields RES_AGAIN after h"); - - is_int (termkey_get_buffer_remaining (tk), 255, - "buffer free 255 after advisereadable"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after h"); - - is_int (key.type, TERMKEY_TYPE_KEY, "key.type after h"); - is_int (key.code.codepoint, 'h', "key.code.codepoint after h"); - is_int (key.modifiers, 0, "key.modifiers after h"); - is_str (key.multibyte, "h", "key.multibyte after h"); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free 256 after getkey"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_NONE, - "getkey yields RES_NONE a second time"); - - write (fd[1], "\033O", 2); - termkey_advisereadable (tk); - - is_int (termkey_get_buffer_remaining (tk), 254, - "buffer free 254 after partial write"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_AGAIN, - "getkey yields RES_AGAIN after partial write"); - - write (fd[1], "C", 1); - termkey_advisereadable (tk); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY after Right completion"); - - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type after Right"); - is_int (key.code.sym, TERMKEY_SYM_RIGHT, "key.code.sym after Right"); - is_int (key.modifiers, 0, "key.modifiers after Right"); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free 256 after completion"); - - termkey_stop (tk); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_ERROR, - "getkey yields RES_ERROR after termkey_stop ()"); - is_int (errno, EINVAL, "getkey error is EINVAL"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/06buffer.c b/t/06buffer.c deleted file mode 100644 index af415b6..0000000 --- a/t/06buffer.c +++ /dev/null @@ -1,38 +0,0 @@ -#include -#include "../termkey.h" -#include "taplib.h" - -int main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - - plan_tests (9); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - is_int (termkey_get_buffer_remaining (tk), 256, - "buffer free initially 256"); - is_int (termkey_get_buffer_size (tk), 256, - "buffer size initially 256"); - - is_int (termkey_push_bytes (tk, "h", 1), 1, "push_bytes returns 1"); - - is_int (termkey_get_buffer_remaining (tk), 255, - "buffer free 255 after push_bytes"); - is_int (termkey_get_buffer_size (tk), 256, - "buffer size 256 after push_bytes"); - - ok (!!termkey_set_buffer_size (tk, 512), "buffer set size OK"); - - is_int (termkey_get_buffer_remaining (tk), 511, - "buffer free 511 after push_bytes"); - is_int (termkey_get_buffer_size (tk), 512, - "buffer size 512 after push_bytes"); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "buffered key still useable after resize"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/10keyname.c b/t/10keyname.c deleted file mode 100644 index 20ac000..0000000 --- a/t/10keyname.c +++ /dev/null @@ -1,40 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_sym_t sym; - const char *end; - - plan_tests (10); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - sym = termkey_keyname2sym (tk, "Space"); - is_int (sym, TERMKEY_SYM_SPACE, "keyname2sym Space"); - - sym = termkey_keyname2sym (tk, "SomeUnknownKey"); - is_int (sym, TERMKEY_SYM_UNKNOWN, "keyname2sym SomeUnknownKey"); - - end = termkey_lookup_keyname (tk, "Up", &sym); - ok (!!end, "termkey_get_keyname Up returns non-NULL"); - is_str (end, "", "termkey_get_keyname Up return points at endofstring"); - is_int (sym, TERMKEY_SYM_UP, "termkey_get_keyname Up yields Up symbol"); - - end = termkey_lookup_keyname (tk, "DownMore", &sym); - ok (!!end, "termkey_get_keyname DownMore returns non-NULL"); - is_str (end, "More", "termkey_get_keyname DownMore return points at More"); - is_int (sym, TERMKEY_SYM_DOWN, - "termkey_get_keyname DownMore yields Down symbol"); - - end = termkey_lookup_keyname (tk, "SomeUnknownKey", &sym); - ok (!end, "termkey_get_keyname SomeUnknownKey returns NULL"); - - is_str (termkey_get_keyname (tk, TERMKEY_SYM_SPACE), "Space", - "get_keyname SPACE"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/11strfkey.c b/t/11strfkey.c deleted file mode 100644 index 4c77bdf..0000000 --- a/t/11strfkey.c +++ /dev/null @@ -1,151 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - char buffer[16]; - size_t len; - - plan_tests (44); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - key.type = TERMKEY_TYPE_KEY; - key.code.codepoint = 'A'; - key.modifiers = 0; - key.multibyte[0] = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 1, "length for unicode/A/0"); - is_str (buffer, "A", "buffer for unicode/A/0"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_WRAPBRACKET); - is_int (len, 1, "length for unicode/A/0 wrapbracket"); - is_str (buffer, "A", "buffer for unicode/A/0 wrapbracket"); - - key.type = TERMKEY_TYPE_KEY; - key.code.codepoint = 'b'; - key.modifiers = TERMKEY_KEYMOD_CTRL; - key.multibyte[0] = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 3, "length for unicode/b/CTRL"); - is_str (buffer, "C-b", "buffer for unicode/b/CTRL"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD); - is_int (len, 6, "length for unicode/b/CTRL longmod"); - is_str (buffer, "Ctrl-b", "buffer for unicode/b/CTRL longmod"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD | TERMKEY_FORMAT_SPACEMOD); - is_int (len, 6, "length for unicode/b/CTRL longmod|spacemod"); - is_str (buffer, "Ctrl b", "buffer for unicode/b/CTRL longmod|spacemod"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD | TERMKEY_FORMAT_LOWERMOD); - is_int (len, 6, "length for unicode/b/CTRL longmod|lowermod"); - is_str (buffer, "ctrl-b", "buffer for unicode/b/CTRL longmod|lowermod"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD | TERMKEY_FORMAT_SPACEMOD - | TERMKEY_FORMAT_LOWERMOD); - is_int (len, 6, "length for unicode/b/CTRL longmod|spacemod|lowermode"); - is_str (buffer, "ctrl b", - "buffer for unicode/b/CTRL longmod|spacemod|lowermode"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_CARETCTRL); - is_int (len, 2, "length for unicode/b/CTRL caretctrl"); - is_str (buffer, "^B", "buffer for unicode/b/CTRL caretctrl"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_WRAPBRACKET); - is_int (len, 5, "length for unicode/b/CTRL wrapbracket"); - is_str (buffer, "", "buffer for unicode/b/CTRL wrapbracket"); - - key.type = TERMKEY_TYPE_KEY; - key.code.codepoint = 'c'; - key.modifiers = TERMKEY_KEYMOD_ALT; - key.multibyte[0] = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 3, "length for unicode/c/ALT"); - is_str (buffer, "A-c", "buffer for unicode/c/ALT"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD); - is_int (len, 5, "length for unicode/c/ALT longmod"); - is_str (buffer, "Alt-c", "buffer for unicode/c/ALT longmod"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_ALTISMETA); - is_int (len, 3, "length for unicode/c/ALT altismeta"); - is_str (buffer, "M-c", "buffer for unicode/c/ALT altismeta"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LONGMOD|TERMKEY_FORMAT_ALTISMETA); - is_int (len, 6, "length for unicode/c/ALT longmod|altismeta"); - is_str (buffer, "Meta-c", "buffer for unicode/c/ALT longmod|altismeta"); - - key.type = TERMKEY_TYPE_KEYSYM; - key.code.sym = TERMKEY_SYM_UP; - key.modifiers = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 2, "length for sym/Up/0"); - is_str (buffer, "Up", "buffer for sym/Up/0"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_WRAPBRACKET); - is_int (len, 4, "length for sym/Up/0 wrapbracket"); - is_str (buffer, "", "buffer for sym/Up/0 wrapbracket"); - - key.type = TERMKEY_TYPE_KEYSYM; - key.code.sym = TERMKEY_SYM_PAGEUP; - key.modifiers = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 6, "length for sym/PageUp/0"); - is_str (buffer, "PageUp", "buffer for sym/PageUp/0"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LOWERSPACE); - is_int (len, 7, "length for sym/PageUp/0 lowerspace"); - is_str (buffer, "page up", "buffer for sym/PageUp/0 lowerspace"); - - /* If size of buffer is too small, - * strfkey should return something consistent */ - len = termkey_strfkey (tk, buffer, 4, &key, 0); - is_int (len, 6, "length for sym/PageUp/0"); - is_str (buffer, "Pag", "buffer of len 4 for sym/PageUp/0"); - - len = termkey_strfkey (tk, buffer, 4, &key, TERMKEY_FORMAT_LOWERSPACE); - is_int (len, 7, "length for sym/PageUp/0 lowerspace"); - is_str (buffer, "pag", "buffer of len 4 for sym/PageUp/0 lowerspace"); - - key.type = TERMKEY_TYPE_FUNCTION; - key.code.number = 5; - key.modifiers = 0; - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 2, "length for func/5/0"); - is_str (buffer, "F5", "buffer for func/5/0"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_WRAPBRACKET); - is_int (len, 4, "length for func/5/0 wrapbracket"); - is_str (buffer, "", "buffer for func/5/0 wrapbracket"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, - TERMKEY_FORMAT_LOWERSPACE); - is_int (len, 2, "length for func/5/0 lowerspace"); - is_str (buffer, "f5", "buffer for func/5/0 lowerspace"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/12strpkey.c b/t/12strpkey.c deleted file mode 100644 index f67b67a..0000000 --- a/t/12strpkey.c +++ /dev/null @@ -1,157 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - const char *endp; - -#define CLEAR_KEY do { key.type = -1; key.code.codepoint = -1; \ - key.modifiers = -1; key.multibyte[0] = 0; } while (0) - - plan_tests (62); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "A", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type for unicode/A/0"); - is_int (key.code.codepoint, 'A', "key.code.codepoint for unicode/A/0"); - is_int (key.modifiers, 0, "key.modifiers for unicode/A/0"); - is_str (key.multibyte, "A", "key.multibyte for unicode/A/0"); - is_str (endp, "", "consumed entire input for unicode/A/0"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "A and more", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/A/0 trailing"); - is_int (key.code.codepoint, 'A', - "key.code.codepoint for unicode/A/0 trailing"); - is_int (key.modifiers, 0, "key.modifiers for unicode/A/0 trailing"); - is_str (key.multibyte, "A", "key.multibyte for unicode/A/0 trailing"); - is_str (endp, " and more", - "points at string tail for unicode/A/0 trailing"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "C-b", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type for unicode/b/CTRL"); - is_int (key.code.codepoint, 'b', "key.code.codepoint for unicode/b/CTRL"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, - "key.modifiers for unicode/b/CTRL"); - is_str (key.multibyte, "b", "key.multibyte for unicode/b/CTRL"); - is_str (endp, "", "consumed entire input for unicode/b/CTRL"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Ctrl-b", &key, TERMKEY_FORMAT_LONGMOD); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/b/CTRL longmod"); - is_int (key.code.codepoint, 'b', - "key.code.codepoint for unicode/b/CTRL longmod"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, - "key.modifiers for unicode/b/CTRL longmod"); - is_str (key.multibyte, "b", "key.multibyte for unicode/b/CTRL longmod"); - is_str (endp, "", "consumed entire input for unicode/b/CTRL longmod"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "^B", &key, TERMKEY_FORMAT_CARETCTRL); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/b/CTRL caretctrl"); - is_int (key.code.codepoint, 'b', - "key.code.codepoint for unicode/b/CTRL caretctrl"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, - "key.modifiers for unicode/b/CTRL caretctrl"); - is_str (key.multibyte, "b", "key.multibyte for unicode/b/CTRL caretctrl"); - is_str (endp, "", "consumed entire input for unicode/b/CTRL caretctrl"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "A-c", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type for unicode/c/ALT"); - is_int (key.code.codepoint, 'c', "key.code.codepoint for unicode/c/ALT"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT, - "key.modifiers for unicode/c/ALT"); - is_str (key.multibyte, "c", "key.multibyte for unicode/c/ALT"); - is_str (endp, "", "consumed entire input for unicode/c/ALT"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Alt-c", &key, TERMKEY_FORMAT_LONGMOD); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/c/ALT longmod"); - is_int (key.code.codepoint, 'c', - "key.code.codepoint for unicode/c/ALT longmod"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT, - "key.modifiers for unicode/c/ALT longmod"); - is_str (key.multibyte, "c", "key.multibyte for unicode/c/ALT longmod"); - is_str (endp, "", "consumed entire input for unicode/c/ALT longmod"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "M-c", &key, TERMKEY_FORMAT_ALTISMETA); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/c/ALT altismeta"); - is_int (key.code.codepoint, 'c', - "key.code.codepoint for unicode/c/ALT altismeta"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT, - "key.modifiers for unicode/c/ALT altismeta"); - is_str (key.multibyte, "c", "key.multibyte for unicode/c/ALT altismeta"); - is_str (endp, "", "consumed entire input for unicode/c/ALT altismeta"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Meta-c", &key, - TERMKEY_FORMAT_ALTISMETA | TERMKEY_FORMAT_LONGMOD); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/c/ALT altismeta+longmod"); - is_int (key.code.codepoint, 'c', - "key.code.codepoint for unicode/c/ALT altismeta+longmod"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT, - "key.modifiers for unicode/c/ALT altismeta+longmod"); - is_str (key.multibyte, "c", "key.multibyte for unicode/c/ALT altismeta+longmod"); - is_str (endp, "", - "consumed entire input for unicode/c/ALT altismeta+longmod"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "meta c", &key, - TERMKEY_FORMAT_ALTISMETA | TERMKEY_FORMAT_LONGMOD - | TERMKEY_FORMAT_SPACEMOD | TERMKEY_FORMAT_LOWERMOD); - is_int (key.type, TERMKEY_TYPE_KEY, - "key.type for unicode/c/ALT altismeta+long/space+lowermod"); - is_int (key.code.codepoint, 'c', - "key.code.codepoint for unicode/c/ALT altismeta+long/space+lowermod"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT, - "key.modifiers for unicode/c/ALT altismeta+long/space+lowermod"); - is_str (key.multibyte, "c", - "key.multibyte for unicode/c/ALT altismeta+long/space_lowermod"); - is_str (endp, "", - "consumed entire input for unicode/c/ALT altismeta+long/space+lowermod"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "ctrl alt page up", &key, - TERMKEY_FORMAT_LONGMOD | TERMKEY_FORMAT_SPACEMOD - | TERMKEY_FORMAT_LOWERMOD | TERMKEY_FORMAT_LOWERSPACE); - is_int (key.type, TERMKEY_TYPE_KEYSYM, - "key.type for sym/PageUp/CTRL+ALT long/space/lowermod+lowerspace"); - is_int (key.code.sym, TERMKEY_SYM_PAGEUP, - "key.code.codepoint for sym/PageUp/CTRL+ALT long/space/lowermod+lowerspace"); - is_int (key.modifiers, TERMKEY_KEYMOD_ALT | TERMKEY_KEYMOD_CTRL, - "key.modifiers for sym/PageUp/CTRL+ALT long/space/lowermod+lowerspace"); - is_str (endp, "", - "consumed entire input for sym/PageUp/CTRL+ALT" - " long/space/lowermod+lowerspace"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Up", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type for sym/Up/0"); - is_int (key.code.sym, TERMKEY_SYM_UP, "key.code.codepoint for sym/Up/0"); - is_int (key.modifiers, 0, "key.modifiers for sym/Up/0"); - is_str (endp, "", "consumed entire input for sym/Up/0"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "F5", &key, 0); - is_int (key.type, TERMKEY_TYPE_FUNCTION, "key.type for func/5/0"); - is_int (key.code.number, 5, "key.code.number for func/5/0"); - is_int (key.modifiers, 0, "key.modifiers for func/5/0"); - is_str (endp, "", "consumed entire input for func/5/0"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/13cmpkey.c b/t/13cmpkey.c deleted file mode 100644 index 1e12b5c..0000000 --- a/t/13cmpkey.c +++ /dev/null @@ -1,72 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key1, key2; - - plan_tests (12); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - key1.type = TERMKEY_TYPE_KEY; - key1.code.codepoint = 'A'; - key1.modifiers = 0; - - is_int (termkey_keycmp (tk, &key1, &key1), 0, "cmpkey same structure"); - - key2.type = TERMKEY_TYPE_KEY; - key2.code.codepoint = 'A'; - key2.modifiers = 0; - - is_int (termkey_keycmp (tk, &key1, &key2), 0, "cmpkey identical structure"); - - key2.modifiers = TERMKEY_KEYMOD_CTRL; - - ok (termkey_keycmp (tk, &key1, &key2) < 0, - "cmpkey orders CTRL after nomod"); - ok (termkey_keycmp (tk, &key2, &key1) > 0, - "cmpkey orders nomod before CTRL"); - - key2.code.codepoint = 'B'; - key2.modifiers = 0; - - ok (termkey_keycmp (tk, &key1, &key2) < 0, "cmpkey orders 'B' after 'A'"); - ok (termkey_keycmp (tk, &key2, &key1) > 0, "cmpkey orders 'A' before 'B'"); - - key1.modifiers = TERMKEY_KEYMOD_CTRL; - - ok (termkey_keycmp (tk, &key1, &key2) < 0, - "cmpkey orders nomod 'B' after CTRL 'A'"); - ok (termkey_keycmp (tk, &key2, &key1) > 0, - "cmpkey orders CTRL 'A' before nomod 'B'"); - - key2.type = TERMKEY_TYPE_KEYSYM; - key2.code.sym = TERMKEY_SYM_UP; - - ok (termkey_keycmp (tk, &key1, &key2) < 0, - "cmpkey orders KEYSYM after KEY"); - ok (termkey_keycmp (tk, &key2, &key1) > 0, - "cmpkey orders KEY before KEYSYM"); - - key1.type = TERMKEY_TYPE_KEYSYM; - key1.code.sym = TERMKEY_SYM_SPACE; - key1.modifiers = 0; - key2.type = TERMKEY_TYPE_KEY; - key2.code.codepoint = ' '; - key2.modifiers = 0; - - is_int (termkey_keycmp (tk, &key1, &key2), 0, - "cmpkey considers KEYSYM/SPACE and KEY/SP identical"); - - termkey_set_canonflags (tk, - termkey_get_canonflags (tk) | TERMKEY_CANON_SPACESYMBOL); - is_int (termkey_keycmp (tk, &key1, &key2), 0, - "cmpkey considers KEYSYM/SPACE and KEY/SP" - " identical under SPACESYMBOL"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/20canon.c b/t/20canon.c deleted file mode 100644 index a60c2ef..0000000 --- a/t/20canon.c +++ /dev/null @@ -1,74 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - const char *endp; - -#define CLEAR_KEY do { key.type = -1; key.code.codepoint = -1; \ - key.modifiers = -1; key.multibyte[0] = 0; } while (0) - - plan_tests (26); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - CLEAR_KEY; - endp = termkey_strpkey (tk, " ", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type for SP/unicode"); - is_int (key.code.codepoint, ' ', "key.code.codepoint for SP/unicode"); - is_int (key.modifiers, 0, "key.modifiers for SP/unicode"); - is_str (key.multibyte, " ", "key.multibyte for SP/unicode"); - is_str (endp, "", "consumed entire input for SP/unicode"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Space", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEY, "key.type for Space/unicode"); - is_int (key.code.codepoint, ' ', "key.code.codepoint for Space/unicode"); - is_int (key.modifiers, 0, "key.modifiers for Space/unicode"); - is_str (key.multibyte, " ", "key.multibyte for Space/unicode"); - is_str (endp, "", "consumed entire input for Space/unicode"); - - termkey_set_canonflags (tk, - termkey_get_canonflags (tk) | TERMKEY_CANON_SPACESYMBOL); - - CLEAR_KEY; - endp = termkey_strpkey (tk, " ", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type for SP/symbol"); - is_int (key.code.sym, TERMKEY_SYM_SPACE, - "key.code.codepoint for SP/symbol"); - is_int (key.modifiers, 0, "key.modifiers for SP/symbol"); - is_str (endp, "", "consumed entire input for SP/symbol"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "Space", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type for Space/symbol"); - is_int (key.code.sym, TERMKEY_SYM_SPACE, - "key.code.codepoint for Space/symbol"); - is_int (key.modifiers, 0, "key.modifiers for Space/symbol"); - is_str (endp, "", "consumed entire input for Space/symbol"); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "DEL", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type for Del/unconverted"); - is_int (key.code.sym, TERMKEY_SYM_DEL, - "key.code.codepoint for Del/unconverted"); - is_int (key.modifiers, 0, "key.modifiers for Del/unconverted"); - is_str (endp, "", "consumed entire input for Del/unconverted"); - - termkey_set_canonflags (tk, - termkey_get_canonflags (tk) | TERMKEY_CANON_DELBS); - - CLEAR_KEY; - endp = termkey_strpkey (tk, "DEL", &key, 0); - is_int (key.type, TERMKEY_TYPE_KEYSYM, "key.type for Del/as-backspace"); - is_int (key.code.sym, TERMKEY_SYM_BACKSPACE, - "key.code.codepoint for Del/as-backspace"); - is_int (key.modifiers, 0, "key.modifiers for Del/as-backspace"); - is_str (endp, "", "consumed entire input for Del/as-backspace"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/30mouse.c b/t/30mouse.c deleted file mode 100644 index e4f4b27..0000000 --- a/t/30mouse.c +++ /dev/null @@ -1,174 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - termkey_mouse_event_t ev; - int button, line, col; - char buffer[32]; - size_t len; - - plan_tests (60); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - termkey_push_bytes (tk, "\e[M !!", 6); - - key.type = -1; - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mouse press"); - - is_int (key.type, TERMKEY_TYPE_MOUSE, "key.type for mouse press"); - - ev = -1; button = -1; line = -1; col = -1; - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_PRESS, "mouse event for press"); - is_int (button, 1, "mouse button for press"); - is_int (line, 1, "mouse line for press"); - is_int (col, 1, "mouse column for press"); - is_int (key.modifiers, 0, "modifiers for press"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 13, "string length for press"); - is_str (buffer, "MousePress(1)", "string buffer for press"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, - &key, TERMKEY_FORMAT_MOUSE_POS); - is_int (len, 21, "string length for press"); - is_str (buffer, "MousePress(1) @ (1,1)", "string buffer for press"); - - termkey_push_bytes (tk, "\e[M@\"!", 6); - - key.type = -1; - ev = -1; button = -1; line = -1; col = -1; - termkey_getkey (tk, &key); - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_DRAG, "mouse event for drag"); - is_int (button, 1, "mouse button for drag"); - is_int (line, 1, "mouse line for drag"); - is_int (col, 2, "mouse column for drag"); - is_int (key.modifiers, 0, "modifiers for press"); - - termkey_push_bytes (tk, "\e[M##!", 6); - - key.type = -1; - ev = -1; button = -1; line = -1; col = -1; - termkey_getkey (tk, &key); - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_RELEASE, "mouse event for release"); - is_int (line, 1, "mouse line for release"); - is_int (col, 3, "mouse column for release"); - is_int (key.modifiers, 0, "modifiers for press"); - - termkey_push_bytes (tk, "\e[M0++", 6); - - key.type = -1; - ev = -1; button = -1; line = -1; col = -1; - termkey_getkey (tk, &key); - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_PRESS, "mouse event for Ctrl-press"); - is_int (button, 1, "mouse button for Ctrl-press"); - is_int (line, 11, "mouse line for Ctrl-press"); - is_int (col, 11, "mouse column for Ctrl-press"); - is_int (key.modifiers, TERMKEY_KEYMOD_CTRL, "modifiers for Ctrl-press"); - - len = termkey_strfkey (tk, buffer, sizeof buffer, &key, 0); - is_int (len, 15, "string length for Ctrl-press"); - is_str (buffer, "C-MousePress(1)", "string buffer for Ctrl-press"); - - // rxvt protocol - termkey_push_bytes (tk, "\e[0;20;20M", 10); - - key.type = -1; - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mouse press rxvt protocol"); - - is_int (key.type, TERMKEY_TYPE_MOUSE, - "key.type for mouse press rxvt protocol"); - - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_PRESS, "mouse event for press rxvt protocol"); - is_int (button, 1, "mouse button for press rxvt protocol"); - is_int (line, 20, "mouse line for press rxvt protocol"); - is_int (col, 20, "mouse column for press rxvt protocol"); - is_int (key.modifiers, 0, "modifiers for press rxvt protocol"); - - termkey_push_bytes (tk, "\e[3;20;20M", 10); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mouse release rxvt protocol"); - - is_int (key.type, TERMKEY_TYPE_MOUSE, - "key.type for mouse release rxvt protocol"); - - ev = -1; button = -1; line = -1; col = -1; - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_RELEASE, "mouse event for release rxvt protocol"); - is_int (line, 20, "mouse line for release rxvt protocol"); - is_int (col, 20, "mouse column for release rxvt protocol"); - is_int (key.modifiers, 0, "modifiers for release rxvt protocol"); - - // SGR protocol - termkey_push_bytes (tk, "\e[<0;30;30M", 11); - - key.type = -1; - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mouse press SGR encoding"); - - is_int (key.type, TERMKEY_TYPE_MOUSE, - "key.type for mouse press SGR encoding"); - - ev = -1; button = -1; line = -1; col = -1; - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_PRESS, "mouse event for press SGR"); - is_int (button, 1, "mouse button for press SGR"); - is_int (line, 30, "mouse line for press SGR"); - is_int (col, 30, "mouse column for press SGR"); - is_int (key.modifiers, 0, "modifiers for press SGR"); - - termkey_push_bytes (tk, "\e[<0;30;30m", 11); - - key.type = -1; - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mouse release SGR encoding"); - - is_int (key.type, TERMKEY_TYPE_MOUSE, - "key.type for mouse release SGR encoding"); - - ev = -1; button = -1; line = -1; col = -1; - is_int (termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col), - TERMKEY_RES_KEY, "interpret_mouse yields RES_KEY"); - - is_int (ev, TERMKEY_MOUSE_RELEASE, "mouse event for release SGR"); - - termkey_push_bytes (tk, "\e[<0;500;300M", 13); - - key.type = -1; - ev = -1; button = -1; line = -1; col = -1; - termkey_getkey (tk, &key); - termkey_interpret_mouse (tk, &key, &ev, &button, &line, &col); - - is_int (line, 300, "mouse line for press SGR wide"); - is_int (col, 500, "mouse column for press SGR wide"); - - termkey_destroy (tk); - - return exit_status (); -} diff --git a/t/31position.c b/t/31position.c deleted file mode 100644 index a62be7a..0000000 --- a/t/31position.c +++ /dev/null @@ -1,38 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - int line, col; - - plan_tests (8); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - termkey_push_bytes (tk, "\e[?15;7R", 8); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for position report"); - - is_int (key.type, TERMKEY_TYPE_POSITION, "key.type for position report"); - - is_int (termkey_interpret_position (tk, &key, &line, &col), TERMKEY_RES_KEY, - "interpret_position yields RES_KEY"); - - is_int (line, 15, "line for position report"); - is_int (col, 7, "column for position report"); - - /* A plain CSI R is likely to be though. This is tricky :/ */ - termkey_push_bytes (tk, "\e[R", 3); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for "); - - is_int (key.type, TERMKEY_TYPE_FUNCTION, "key.type for "); - is_int (key.code.number, 3, "key.code.number for "); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/32modereport.c b/t/32modereport.c deleted file mode 100644 index 5d79725..0000000 --- a/t/32modereport.c +++ /dev/null @@ -1,45 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - int initial, mode, value; - - plan_tests (12); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - termkey_push_bytes (tk, "\e[?1;2$y", 8); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mode report"); - - is_int (key.type, TERMKEY_TYPE_MODEREPORT, "key.type for mode report"); - - is_int (termkey_interpret_modereport (tk, &key, &initial, &mode, &value), - TERMKEY_RES_KEY, "interpret_modereoprt yields RES_KEY"); - - is_int (initial, '?', "initial indicator from mode report"); - is_int (mode, 1, "mode number from mode report"); - is_int (value, 2, "mode value from mode report"); - - termkey_push_bytes (tk, "\e[4;1$y", 7); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for mode report"); - - is_int (key.type, TERMKEY_TYPE_MODEREPORT, "key.type for mode report"); - - is_int (termkey_interpret_modereport (tk, &key, &initial, &mode, &value), - TERMKEY_RES_KEY, "interpret_modereoprt yields RES_KEY"); - - is_int (initial, 0, "initial indicator from mode report"); - is_int (mode, 4, "mode number from mode report"); - is_int (value, 1, "mode value from mode report"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/39csi.c b/t/39csi.c deleted file mode 100644 index 32a15b0..0000000 --- a/t/39csi.c +++ /dev/null @@ -1,52 +0,0 @@ -#include "../termkey.h" -#include "taplib.h" - -int -main (int argc, char *argv[]) -{ - termkey_t *tk; - termkey_key_t key; - long args[16]; - size_t nargs = 16; - unsigned long command; - - plan_tests (15); - - tk = termkey_new_abstract ("vt100", NULL, 0); - - termkey_push_bytes (tk, "\e[5;25v", 7); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for CSI v"); - - is_int (key.type, TERMKEY_TYPE_UNKNOWN_CSI, "key.type for unknown CSI"); - - is_int (termkey_interpret_csi (tk, &key, args, &nargs, &command), - TERMKEY_RES_KEY, "interpret_csi yields RES_KEY"); - - is_int (nargs, 2, "nargs for unknown CSI"); - is_int (args[0], 5, "args[0] for unknown CSI"); - is_int (args[1], 25, "args[1] for unknown CSI"); - is_int (command, 'v', "command for unknown CSI"); - - termkey_push_bytes (tk, "\e[?w", 4); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for CSI ? w"); - is_int (key.type, TERMKEY_TYPE_UNKNOWN_CSI, "key.type for unknown CSI"); - is_int (termkey_interpret_csi (tk, &key, args, &nargs, &command), - TERMKEY_RES_KEY, "interpret_csi yields RES_KEY"); - is_int (command, ('?' << 8) | 'w', "command for unknown CSI"); - - termkey_push_bytes (tk, "\e[?$x", 5); - - is_int (termkey_getkey (tk, &key), TERMKEY_RES_KEY, - "getkey yields RES_KEY for CSI ? $x"); - is_int (key.type, TERMKEY_TYPE_UNKNOWN_CSI, "key.type for unknown CSI"); - is_int (termkey_interpret_csi (tk, &key, args, &nargs, &command), - TERMKEY_RES_KEY, "interpret_csi yields RES_KEY"); - is_int (command, ('$' << 16) | ('?' << 8) | 'x', "command for unknown CSI"); - - termkey_destroy (tk); - return exit_status (); -} diff --git a/t/taplib.c b/t/taplib.c deleted file mode 100644 index bfb70f8..0000000 --- a/t/taplib.c +++ /dev/null @@ -1,79 +0,0 @@ -#include "taplib.h" - -#include -#include -#include - -static int g_nexttest = 1; -static int g_exit_status = 0; - -void -plan_tests (int n) -{ - printf ("1..%d\n", n); -} - -void -pass (char *name) -{ - printf ("ok %d - %s\n", g_nexttest++, name); -} - -void -fail (char *name) -{ - printf ("not ok %d - %s\n", g_nexttest++, name); - g_exit_status = 1; -} - -void -ok (int cmp, char *name) -{ - if (cmp) - pass (name); - else - fail (name); -} - -void -diag (char *fmt, ...) -{ - va_list args; - va_start (args, fmt); - - fprintf (stderr, "# "); - vfprintf (stderr, fmt, args); - fprintf (stderr, "\n"); - - va_end (args); -} - -void -is_int (int got, int expect, char *name) -{ - if (got == expect) - ok (1, name); - else - { - ok (0, name); - diag ("got %d expected %d", got, expect); - } -} - -void -is_str (const char *got, const char *expect, char *name) -{ - if (strcmp (got, expect) == 0) - ok (1, name); - else - { - ok (0, name); - diag ("got '%s' expected '%s'", got, expect); - } -} - -int -exit_status(void) -{ - return g_exit_status; -} diff --git a/t/taplib.h b/t/taplib.h deleted file mode 100644 index 9045c32..0000000 --- a/t/taplib.h +++ /dev/null @@ -1,7 +0,0 @@ -void plan_tests (int n); -void ok (int cmp, char *name); -void pass (char *name); -void fail (char *name); -void is_int (int got, int expect, char *name); -void is_str (const char *got, const char *expect, char *name); -int exit_status (void); -- cgit v1.2.3