p/termo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

CMake-ify, rename to termkey2 for the time being

Browse Source
This commit is contained in:
Přemysl Eric Janouch
2014-10-09 23:47:24 +02:00
parent 3465d5553f
commit 5692f32bcf
33 changed files with 258 additions and 206 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
tests/01base.c Normal file
View File

@@ -0,0 +1,29 @@
#include <stdio.h>
#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 ();
}

92
tests/02getkey.c Normal file
View File

@@ -0,0 +1,92 @@
#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 ();
}

188
tests/03utf8.c Normal file
View File

@@ -0,0 +1,188 @@
#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 ();
}

40
tests/04flags.c Normal file
View File

@@ -0,0 +1,40 @@
#include <stdio.h>
#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 ();
}

85
tests/05read.c Normal file
View File

@@ -0,0 +1,85 @@
#include <stdio.h>
#include <errno.h>
#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 ();
}

38
tests/06buffer.c Normal file
View File

@@ -0,0 +1,38 @@
#include <stdio.h>
#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 ();
}

40
tests/10keyname.c Normal file
View File

@@ -0,0 +1,40 @@
#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 ();
}

151
tests/11strfkey.c Normal file
View File

@@ -0,0 +1,151 @@
#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, "<C-b>", "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, "<Up>", "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, "<F5>", "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 ();
}

157
tests/12strpkey.c Normal file
View File

@@ -0,0 +1,157 @@
#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 ();
}

72
tests/13cmpkey.c Normal file
View File

@@ -0,0 +1,72 @@
#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 ();
}

74
tests/20canon.c Normal file
View File

@@ -0,0 +1,74 @@
#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 ();
}

174
tests/30mouse.c Normal file
View File

@@ -0,0 +1,174 @@
#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 ();
}

38
tests/31position.c Normal file
View File

@@ -0,0 +1,38 @@
#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 <F3> 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 <F3>");
is_int (key.type, TERMKEY_TYPE_FUNCTION, "key.type for <F3>");
is_int (key.code.number, 3, "key.code.number for <F3>");
termkey_destroy (tk);
return exit_status ();
}

45
tests/32modereport.c Normal file
View File

@@ -0,0 +1,45 @@
#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 ();
}

52
tests/39csi.c Normal file
View File

@@ -0,0 +1,52 @@
#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 ();
}

79
tests/taplib.c Normal file
View File

@@ -0,0 +1,79 @@
#include "taplib.h"
#include <stdio.h>
#include <stdarg.h>
#include <string.h>
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;
}

7
tests/taplib.h Normal file
View File

@@ -0,0 +1,7 @@
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);