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
|
if arg[1] == '--help' then
print('Usage: gen_events.lua src/nvim enum_file event_names_file')
os.exit(0)
end
local nvimsrcdir = arg[1]
local fileio_enum_file = arg[2]
local names_file = arg[3]
package.path = nvimsrcdir .. '/?.lua;' .. package.path
local auevents = require('auevents')
local events = auevents.events
local aliases = auevents.aliases
enum_tgt = io.open(fileio_enum_file, 'w')
names_tgt = io.open(names_file, 'w')
enum_tgt:write('typedef enum auto_event {')
names_tgt:write([[
static const struct event_name {
size_t len;
char *name;
event_T event;
} event_names[] = {]])
for i, event in ipairs(events) do
if i > 1 then
comma = ',\n'
else
comma = '\n'
end
enum_tgt:write(('%s EVENT_%s = %u'):format(comma, event:upper(), i - 1))
names_tgt:write(('%s {%u, "%s", EVENT_%s}'):format(comma, #event, event, event:upper()))
end
for alias, event in pairs(aliases) do
names_tgt:write((',\n {%u, "%s", EVENT_%s}'):format(#alias, alias, event:upper()))
end
names_tgt:write(',\n {0, NULL, (event_T)0}')
enum_tgt:write('\n} event_T;\n')
names_tgt:write('\n};\n')
enum_tgt:write(('\n#define NUM_EVENTS %u\n'):format(#events))
names_tgt:write('\nstatic AutoPat *first_autopat[NUM_EVENTS] = {\n ')
line_len = 1
for i = 1,((#events) - 1) do
line_len = line_len + #(' NULL,')
if line_len > 80 then
names_tgt:write('\n ')
line_len = 1 + #(' NULL,')
end
names_tgt:write(' NULL,')
end
if line_len + #(' NULL') > 80 then
names_tgt:write('\n NULL')
else
names_tgt:write(' NULL')
end
names_tgt:write('\n};\n')
enum_tgt:close()
names_tgt:close()
|
