1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
#include "../termo.h"
#include "taplib.h"
int
main (int argc, char *argv[])
{
termo_t *tk;
termo_key_t key;
plan_tests (38);
tk = termo_new_abstract ("vt100", NULL, 0);
is_int (termo_get_buffer_remaining (tk),
256, "buffer free initially 256");
is_int (termo_getkey (tk, &key), TERMO_RES_NONE,
"getkey yields RES_NONE when empty");
is_int (termo_push_bytes (tk, "h", 1), 1, "push_bytes returns 1");
is_int (termo_get_buffer_remaining (tk), 255,
"buffer free 255 after push_bytes");
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"getkey yields RES_KEY after h");
is_int (key.type, TERMO_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 (termo_get_buffer_remaining (tk), 256,
"buffer free 256 after getkey");
is_int (termo_getkey (tk, &key), TERMO_RES_NONE,
"getkey yields RES_NONE a second time");
termo_push_bytes (tk, "\x01", 1);
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"getkey yields RES_KEY after C-a");
is_int (key.type, TERMO_TYPE_KEY, "key.type after C-a");
is_int (key.code.codepoint, 'a', "key.code.codepoint after C-a");
is_int (key.modifiers, TERMO_KEYMOD_CTRL, "key.modifiers after C-a");
termo_push_bytes (tk, "\033OA", 3);
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"getkey yields RES_KEY after Up");
is_int (key.type, TERMO_TYPE_KEYSYM, "key.type after Up");
is_int (key.code.sym, TERMO_SYM_UP, "key.code.sym after Up");
is_int (key.modifiers, 0, "key.modifiers after Up");
is_int (termo_push_bytes (tk, "\033O", 2), 2, "push_bytes returns 2");
is_int (termo_get_buffer_remaining (tk), 254,
"buffer free 254 after partial write");
is_int (termo_getkey (tk, &key), TERMO_RES_AGAIN,
"getkey yields RES_AGAIN after partial write");
termo_push_bytes (tk, "C", 1);
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"getkey yields RES_KEY after Right completion");
is_int (key.type, TERMO_TYPE_KEYSYM, "key.type after Right");
is_int (key.code.sym, TERMO_SYM_RIGHT, "key.code.sym after Right");
is_int (key.modifiers, 0, "key.modifiers after Right");
is_int (termo_get_buffer_remaining (tk), 256,
"buffer free 256 after completion");
termo_push_bytes (tk, "\033[27;5u", 7);
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"getkey yields RES_KEY after Ctrl-Escape");
is_int (key.type, TERMO_TYPE_KEYSYM,
"key.type after Ctrl-Escape");
is_int (key.code.sym, TERMO_SYM_ESCAPE,
"key.code.sym after Ctrl-Escape");
is_int (key.modifiers, TERMO_KEYMOD_CTRL,
"key.modifiers after Ctrl-Escape");
// Escape key in various amounts
termo_push_bytes (tk, "\x1b\x1b", 2);
is_int (termo_getkey (tk, &key), TERMO_RES_AGAIN,
"two Escapes don't yield anything");
is_int (termo_get_buffer_remaining (tk), 254,
"buffer free 254 after two Escapes");
termo_push_bytes (tk, "\x1b", 1);
is_int (termo_getkey (tk, &key), TERMO_RES_KEY,
"three Escapes yield Alt-Escape");
is_int (termo_get_buffer_remaining (tk), 255,
"buffer free 255 after three Escapes");
is_int (key.type, TERMO_TYPE_KEYSYM,
"key.type after three Escapes");
is_int (key.code.sym, TERMO_SYM_ESCAPE,
"key.code.sym after three Escapes");
is_int (key.modifiers, TERMO_KEYMOD_ALT,
"key.modifiers after three Escapes");
termo_destroy (tk);
return exit_status ();
}
|
