me.fier.engine/lua_translate

89 lines
2.4 KiB
Python
Executable File

#!/usr/bin/env python3
import toml
typesIn = {
"__unknown": "lua_touserdata",
"char": "luaL_checkinteger",
"int": "luaL_checkinteger",
"long long": "luaL_checkinteger",
"unsigned char": "luaL_checkinteger",
"char *": "(char *)luaL_checkstring"
}
typesOut = {
"__unknown": "lua_pushlightuserdata",
"char": "lua_pushinteger",
"int": "lua_pushinteger",
"long long": "lua_pushinteger",
"unsigned char": "lua_pushinteger",
"char *": "lua_pushstring"
}
statics = toml.loads(open("src/values/statics.toml").read())
functions = toml.loads(open("src/values/functions.toml").read())
ofile = open("src/lua.c","w")
ofile.write('''\
#include <lua5.3/lua.h>
#include <lua5.3/lualib.h>
#include <lua5.3/lauxlib.h>
lua_State * engine_lua_state;
#include "lua_manual.c"
''')
for func in functions:
if "lua" in functions[func]:
if functions[func]["lua"] in ["no","manual"]: continue
invarCount = 1
funcnew = "engine_luaf_" +func.replace("engine_","",1)
ofile.write('int ' +funcnew+ '(lua_State *L) {\n')
for arg in functions[func]["arguments"]:
if not arg in typesIn:
checkfunc = typesIn["__unknown"]
else:
checkfunc = typesIn[arg]
ofile.write("\t" +arg+ ' ' +functions[func]["argNames"][invarCount - 1]+ ' = ' +checkfunc+ '(L,' +str(invarCount)+ ');\n')
invarCount += 1
argstring = "(" +",".join(functions[func]["argNames"])+ ")"
outtype = functions[func]["type"]
if outtype == "void":
ofile.write('\t' + func + argstring + ";")
ofile.write('\n\treturn 0;')
else:
if not outtype in typesOut:
pushfunc = typesOut["__unknown"]
else:
pushfunc = typesOut[arg]
ofile.write('\t' +outtype+ ' outvar = ' +func + argstring + ";")
ofile.write("\n\t" +pushfunc+ '(L,outvar);')
ofile.write('\n\treturn 1;')
ofile.write('\n}\n\n')
ofile.write('''\
void engine_lua_init() {
engine_lua_state = luaL_newstate();
luaL_openlibs(engine_lua_state);
''')
for static in statics:
ofile.write('\tlua_pushinteger(engine_lua_state,' +static+ ');\n')
ofile.write('\tlua_setglobal(engine_lua_state,"' +static+ '");\n')
for func in functions:
if "lua" in functions[func]:
if functions[func]["lua"] in ["no","manual"]: continue
funcnew = "engine_luaf_" +func.replace("engine_","",1)
ofile.write('\tlua_pushcfunction(engine_lua_state,' +funcnew+ ');\n')
ofile.write('\tlua_setglobal (engine_lua_state,"' +func+ '");\n')
ofile.write('''\
engine_lua_init_manual();
luaL_loadfile(engine_lua_state,"mods/main/script/main.lua");
lua_call(engine_lua_state,0,0);
}''')