diff options
author | 2008-03-04 01:39:09 -0500 | |
---|---|---|
committer | 2008-03-04 01:39:09 -0500 | |
commit | 72e36a2282824ba14eb21cf632d4e958516b7463 (patch) | |
tree | df63e5520a4df3a0c147c821f85c7a99d1df8bc6 /scripts/gen_iface.lua | |
parent | bdc82eaee1c444bb79e5c926bd9f2a2c1ee816a3 (diff) |
Added scripts/ directory.
Diffstat (limited to 'scripts/gen_iface.lua')
-rwxr-xr-x | scripts/gen_iface.lua | 85 |
1 files changed, 85 insertions, 0 deletions
diff --git a/scripts/gen_iface.lua b/scripts/gen_iface.lua new file mode 100755 index 00000000..9c42c097 --- /dev/null +++ b/scripts/gen_iface.lua @@ -0,0 +1,85 @@ +#!/usr/bin/lua +-- Copyright 2007-2008 Mitchell mitchell<att>caladbolg.net. See LICENSE. + +local f = io.open('/usr/share/scite-st/src/scite/src/IFaceTable.cxx') +local contents = f:read('*all') +f:close() + +local constants = contents:match('ifaceConstants%[%] = (%b{})') +local functions = contents:match('ifaceFunctions%[%] = (%b{})') +local properties = contents:match('ifaceProperties%[%] = (%b{})') + +local out = '' + +local types = { + void = 0, int = 1, length = 2, position = 3, colour = 4, bool = 5, + keymod = 6, string = 7, stringresult = 8, cells = 9, textrange = 10, + findtext = 11, formatrange = 12 +} + +out = out..'textadept.constants = {\n' +-- {"constant", value} +for item in constants:sub(2, -2):gmatch('%b{}') do + local name, value = item:match('^{"(.-)",(.-)}') + local line = (" %s = %s,\n"):format(name, value) + out = out..line +end +out = out..[[ + SCN_STYLENEEDED = 2000, + SCN_CHARADDED = 2001, + SCN_SAVEPOINTREACHED = 2002, + SCN_SAVEPOINTLEFT = 2003, + SCN_MODIFYATTEMPTRO = 2004, + SCN_KEY = 2005, + SCN_DOUBLECLICK =2006, + SCN_UPDATEUI = 2007, + SCN_MODIFIED = 2008, + SCN_MACRORECORD = 2009, + SCN_MARGINCLICK = 2010, + SCN_NEEDSHOWN = 2011, + SCN_PAINTED = 2013, + SCN_USERLISTSELECTION = 2014, + SCN_URIDROPPED = 2015, + SCN_DWELLSTART = 2016, + SCN_DWELLEND = 2017, + SCN_ZOOM = 2018, + SCN_HOTSPOTCLICK = 2019, + SCN_HOTSPOTDOUBLECLICK = 2020, + SCN_CALLTIPCLICK = 2021, + SCN_AUTOCSELECTION = 2022, + SCN_INDICATORCLICK = 2023, + SCN_INDICATORRELEASE = 2024, +]] +out = out..'}\n\n' + +out = out..'textadept.buffer_functions = {\n' +-- {"function", msg_id, iface_*, {iface_*, iface_*}} +for item in functions:sub(2, -2):gmatch('%b{}') do + local name, msg_id, rt_type, p1_type, p2_type = + item:match('^{"(.-)"%D+(%d+)%A+iface_(%a+)%A+iface_(%a+)%A+iface_(%a+)') + name = name:gsub('([a-z])([A-Z])', '%1_%2') + name = name:gsub('([A-Z])([A-Z][a-z])', '%1_%2') + name = name:lower() + local line = (" %s = {%d, %d, %d, %d},\n"):format( + name, msg_id, types[rt_type], types[p1_type], types[p2_type]) + out = out..line +end +out = out..'}\n\n' + +out = out..'textadept.buffer_properties = {\n' +-- {"property", get_id, set_id, rt_type, p1_type} +for item in properties:sub(2, -2):gmatch('%b{}') do + local name, get_id, set_id, rt_type, p1_type = + item:match('^{"(.-)"%D+(%d+)%D+(%d+)%A+iface_(%a+)%A+iface_(%a+)') + name = name:gsub('([a-z])([A-Z])', '%1_%2') + name = name:gsub('([A-Z])([A-Z][a-z])', '%1_%2') + name = name:lower() + local line = (" %s = {%d, %d, %d, %d},\n"):format( + name, get_id, set_id, types[rt_type], types[p1_type]) + out = out..line +end +out = out..'}\n' + +f = io.open('/usr/share/textadept/core/iface.lua', 'w') +f:write(out) +f:close() |