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
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
#define _GNU_SOURCE
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <lua.h>
#include <lualib.h>
#include <lauxlib.h>
#include "lua-plugin.h"
void print_help(){
printf("Usage: lua_ext_console [SCRIPT_FILE] ...\n");
printf("Loads one or more script files then evaluates lua extension modes in an interactive shell.\n");
}
void print_interactive_help(){
printf("i \t\t\t - lists all commands.\n");
printf("i [COMMAND] \t\t - evaluates command without argument. \n");
printf("i [COMMAND] [ARGUMENT] \t evaluates command with argument. \n");
/* printf("g [TRIGGER_STRING] \t\t - tests a trigger string, fire trigger if hit.\n"); */
printf("quit \t\t\t - quit the shell.\n");
printf("help \t\t\t - show this message.\n");
}
void list_all_commands(IBusEnginePlugin * plugin){
const GArray * commands = ibus_engine_plugin_get_available_commands(plugin);
size_t i;
for ( i = 0; i < commands->len; ++i ){
lua_command_t * command = &g_array_index(commands, lua_command_t, i);
printf("%s.%s >\t", command->command_name,
command->description);
}
printf("\n");
}
int print_lua_call_result(IBusEnginePlugin * plugin, size_t num){
if ( 1 == num ) {
const lua_command_candidate_t * result = ibus_engine_plugin_get_retval(plugin);
if (result->content)
printf("result: %s.\n", result->content);
}
if ( num > 1) {
GArray * results = ibus_engine_plugin_get_retvals(plugin);
size_t i;
for ( i = 0; i < results->len; ++i) {
const lua_command_candidate_t * result = g_array_index(results, const lua_command_candidate_t *, i);
if (result->content)
printf("%d.%s >\t", (int)i, result->content);
else{
printf("%d. %s [%s]\t", (int)i, result->suggest, result->help);
}
}
printf("\n");
}
return 0;
}
int do_lua_call(IBusEnginePlugin * plugin, const char * command_name, const char * argument){
const lua_command_t * command;
size_t num;
g_return_val_if_fail(2 == strlen(command_name), 2);
command = ibus_engine_plugin_lookup_command(plugin, command_name);
if ( NULL == command) {
fprintf(stderr, "command %s doesn't exist.\n", command_name);
return 1;
}
num = ibus_engine_plugin_call(plugin, command->lua_function_name, argument);
print_lua_call_result(plugin, num);
return 0;
}
int main(int argc, char * argv[]){
char * line = NULL;
size_t len = 0;
ssize_t read;
int i;
if ( 1 == argc ){
print_help();
exit(1);
}
g_type_init();
IBusEnginePlugin * plugin = ibus_engine_plugin_new();
for ( i = 1; i < argc; ++i){
ibus_engine_plugin_load_lua_script(plugin, argv[i]);
}
printf("Lua Plugin Console for ibus-pinyin.\n");
printf("Type ? for more information.\n");
printf("> ");
while ((read = getline(&line, &len, stdin)) != -1) {
line[read - 1] = '\0';
gchar ** strs = g_strsplit_set(line, " \t", 0);
size_t len = g_strv_length(strs);
switch (len){
case 0:
print_interactive_help();
break;
case 1:
if ( 0 == strcmp("quit", strs[0]) )
exit(EXIT_SUCCESS);
if ( 0 == strcmp("help", strs[0]) || 0 == strcmp("?", strs[0]) )
print_interactive_help();
if ( 0 == strcmp("i", strs[0]) )
list_all_commands(plugin);
break;
case 2:
if ( 0 == strcmp("i", strs[0]))
do_lua_call(plugin, strs[1], NULL);
if ( 0 == strcmp("g", strs[0]))
fprintf(stderr, "ime trigger unimplemented.");
break;
case 3:
if ( 0 == strcmp("i", strs[0]))
do_lua_call(plugin, strs[1], strs[2]);
break;
default:
fprintf(stderr, "wrong arguments.");
break;
}
g_strfreev(strs);
printf("> ");
}
if (line)
free(line);
return EXIT_SUCCESS;
}
|
