bindbc-lua/source/bindbc/lua/v54/binddynamic.d

//          Copyright 2019 - 2021 Michael D. Parker
// Distributed under the Boost Software License, Version 1.0.
//    (See accompanying file LICENSE_1_0.txt or copy at
//          http://www.boost.org/LICENSE_1_0.txt)

module bindbc.lua.v54.binddynamic;

version(BindBC_Static) version = BindLua_Static;
version(BindLua_Static) {}
else version = BindLua_Dynamic;

version(LUA_54) {
    version(BindLua_Dynamic) version = LUA_54_DYNAMIC;
}

version(LUA_54_DYNAMIC):

import core.stdc.stdarg : va_list;
import bindbc.loader;
import bindbc.lua.config;
import bindbc.lua.v54.types;

extern(C) @nogc nothrow {
    // lauxlib.h
    alias pluaL_checkversion_ = void function(lua_State* L, lua_Number ver, size_t sz);
    alias pluaL_getmetafield = int function(lua_State* L, int obj, const(char)* e);
    alias pluaL_callmeta = int function(lua_State* L,  int obj, const(char)* e);
    alias pluaL_tolstring = const(char)* function(lua_State* L, int idx, size_t* len);
    alias pluaL_argerror = int function(lua_State* L, int arg, const(char)* extramsg);
    alias pluaL_typeerror = int function(lua_State *L, int arg, const(char)* tname);
    alias pluaL_checklstring = const(char)* function(lua_State* L, int arg, size_t* l);
    alias pluaL_optlstring = const(char)* function(lua_State* L, int arg, const(char)* def, size_t* l);
    alias pluaL_checknumber = lua_Number function(lua_State* L, int arg);
    alias pluaL_optnumber = lua_Number function(lua_State* L, int arg, lua_Number def);
    alias pluaL_checkinteger = lua_Integer function(lua_State* L, int arg);
    alias pluaL_optinteger = lua_Integer function(lua_State* L, int arg, lua_Integer def);
    alias pluaL_checkstack = void function(lua_State* L, int sz, const(char)* msg);
    alias pluaL_checktype = void function(lua_State* L, int arg, int t);
    alias pluaL_checkany = void function(lua_State* L, int arg);
    alias pluaL_newmetatable = int function(lua_State* L, const(char)* tname);
    alias pluaL_setmetatable = void function(lua_State* L, const(char)* tname);
    alias pluaL_testudata = void* function(lua_State* L, int ud, const(char)* tname);
    alias pluaL_checkudata = void* function(lua_State* L, int id, const(char)* tname);
    alias pluaL_where = void function(lua_State* L, int lvl);
    alias pluaL_error = int function(lua_State* L, const(char)* fmt, ...);
    alias pluaL_checkoption = int function(lua_State* L, int arg, const(char)* def, const(char)** lst);
    alias pluaL_fileresult = int function(lua_State* L, int stat, const(char)* fname);
    alias pluaL_execresult = int function(lua_State* L, int stat);
    alias pluaL_ref = int function(lua_State* L, int t);
    alias pluaL_unref = void function(lua_State* L, int t, int ref_);
    alias pluaL_loadfilex = int function(lua_State* L, const(char)* filename, const(char)* mode);
    alias pluaL_loadbufferx = int function(lua_State* L, const(char)* buff, size_t sz, const(char)* name, const(char)* mode);
    alias pluaL_loadstring = int function(lua_State* L, const(char)* s);
    alias pluaL_newstate = lua_State* function();
    alias pluaL_len = int function(lua_State* L, int idx);
    alias pluaL_addgsub = void function(luaL_Buffer *b, const(char)* s, const(char)* p, const(char)* r);
    alias pluaL_gsub = const(char)* function(lua_State* L, const(char)* s, const(char)* p, const(char)* r);
    alias pluaL_setfuncs = void function(lua_State* L, const(luaL_Reg)* l, int nup);
    alias pluaL_getsubtable = int function(lua_State* L, int idx, const(char)* fname);
    alias pluaL_traceback = void function(lua_State* L, lua_State* L1, const(char)* msg, int level);
    alias pluaL_requiref = void function(lua_State* L, const(char)* modname, lua_CFunction openf, int glb);
    alias pluaL_buffinit = void function(lua_State* L, luaL_Buffer* B);
    alias pluaL_prepbuffsize = char* function(luaL_Buffer* B, size_t sz);
    alias pluaL_addlstring = void function(luaL_Buffer* B, const(char)* s, size_t l);
    alias pluaL_addstring = void function(luaL_Buffer* B,  const(char)* s);
    alias pluaL_addvalue = void function(luaL_Buffer* B);
    alias pluaL_pushresult = void function(luaL_Buffer* B);
    alias pluaL_pushresultsize = void function(luaL_Buffer* B, size_t sz);
    alias pluaL_buffinitsize = char* function(lua_State* L, luaL_Buffer*, size_t sz);

    // lua.h
    alias plua_newstate = lua_State* function(lua_Alloc f, void* ud);
    alias plua_close = void function(lua_State* L);
    alias plua_newthread = lua_State* function(lua_State* L);
    alias plua_atpanic = lua_CFunction function(lua_State* L, lua_CFunction panicf);
    alias plua_version = lua_Number function(lua_State* L);
    alias plua_absindex = int function(lua_State* L, int idx);
    alias plua_gettop = int function(lua_State* L);
    alias plua_settop = void function(lua_State* L, int idx);
    alias plua_pushvalue = void function(lua_State* L, int idx);
    alias plua_rotate = void function(lua_State* L, int idx, int n);
    alias plua_copy = void function(lua_State* L, int fromidx, int toidx);
    alias plua_checkstack = int function(lua_State* L, int n);
    alias plua_xmove = void function(lua_State* L, lua_State* to, int n);
    alias plua_isnumber = int function(lua_State* L, int idx);
    alias plua_isstring = int function(lua_State* L, int idx);
    alias plua_iscfunction = int function(lua_State* L, int idx);
    alias plua_isinteger = int function(lua_State* L, int idx);
    alias plua_isuserdata = int function(lua_State* L, int idx);
    alias plua_type = int function(lua_State* L, int idx);
    alias plua_typename = const(char)* function(lua_State* L, int tp);
    alias plua_tonumberx = lua_Number function(lua_State* L, int idx, int* isnum);
    alias plua_tointegerx = lua_Integer function(lua_State* L, int idx, int* isnum);
    alias plua_toboolean = int function(lua_State* L, int idx);
    alias plua_tolstring = const(char)* function(lua_State* L, int idx, size_t* len);
    alias plua_rawlen = lua_Unsigned function(lua_State* L, int idx);
    alias plua_tocfunction = lua_CFunction function(lua_State* L, int idx);
    alias plua_touserdata = void* function(lua_State* L, int idx);
    alias plua_tothread = lua_State* function(lua_State* L, int idx);
    alias plua_topointer = const(void)* function(lua_State* L, int idx);
    alias plua_arith = void function(lua_State* L, int op);
    alias plua_rawequal = int function(lua_State* L, int idx1, int idx2);
    alias plua_compare = int function(lua_State* L, int idx1, int idx2, int op);
    alias plua_pushnil = void function(lua_State* L);
    alias plua_pushnumber = void function(lua_State* L, lua_Number n);
    alias plua_pushinteger = void function(lua_State* L, lua_Integer n);
    alias plua_pushlstring = const(char)* function(lua_State* L, const(char)* s, size_t len);
    alias plua_pushstring = const(char)* function(lua_State* L, const(char)* s);
    alias plua_pushvfstring = const(char)* function(lua_State* L, const(char)* fmt, va_list argp);
    alias plua_pushfstring = const(char)* function(lua_State* L, const(char)* fmt, ...);
    alias plua_pushcclosure = void function(lua_State* L, lua_CFunction fn, int n);
    alias plua_pushboolean = void function(lua_State* L, int b);
    alias plua_pushlightuserdata = void function(lua_State* L, void* p);
    alias plua_pushthread = int function(lua_State* L);
    alias plua_getglobal = int function(lua_State* L, const(char)* name);
    alias plua_gettable = int function(lua_State* L, int idx);
    alias plua_getfield = int function(lua_State* L, int idx, const(char)* k);
    alias plua_geti = int function(lua_State* L, int idx, lua_Integer n);
    alias plua_rawget = int function(lua_State* L, int idx);
    alias plua_rawgeti = int function(lua_State* L, int idx, int b);
    alias plua_rawgetp = int function(lua_State* L, int idx, const(void)* p);
    alias plua_createtable = void function(lua_State* L, int narr, int nrecs);
    alias plua_newuserdatauv = void* function(lua_State* L, size_t sz, int nuvalue);
    alias plua_getmetatable = int function(lua_State* L, int objindex);
    alias plua_getiuservalue = int function(lua_State* L, int idx, int n);
    alias plua_setglobal = void function(lua_State* L, const(char)* name);
    alias plua_settable = void function(lua_State* L, int idx);
    alias plua_setfield = void function(lua_State* L, int idx, const(char)* k);
    alias plua_seti = void function(lua_State* L, int idx, lua_Integer n);
    alias plua_rawset = void function(lua_State* L, int idx);
    alias plua_rawseti = void function(lua_State* L, int idx, lua_Integer n);
    alias plua_rawsetp = void function(lua_State* L, int idx, const(void)* p);
    alias plua_setmetatable = int function(lua_State* L, int objindex);
    alias plua_setiuservalue = int function(lua_State* L, int idx, int n);
    alias plua_callk = void function(lua_State* L, int nargs, int nresults, lua_KContext ctx, lua_KFunction k);
    alias plua_pcallk = int function(lua_State* L, int nargs, int nresults, int errfunc, lua_KContext ctx, lua_KFunction k);
    alias plua_load = int function(lua_State* L, lua_Reader reader, void* dt, const(char)* chunkname, const(char)* mode);
    alias plua_dump = int function(lua_State* L, lua_Writer writer, void* data, int strip);
    alias plua_yieldk = int function(lua_State* L, int nresults, lua_KContext ctx, lua_KFunction k);
    alias plua_resume = int function(lua_State* L, lua_State* from, int narg, int* nres);
    alias plua_status = int function(lua_State* L);
    alias plua_isyieldable = int function(lua_State* L);
    alias plua_setwarnf = void function(lua_State *L, lua_WarnFunction f, void *ud);
    alias plua_warning = void function(lua_State *L, const char *msg, int tocont);
    alias plua_gc = int function(lua_State* L, int what, ...);
    alias plua_error = int function(lua_State* L);
    alias plua_next = int function(lua_State* L, int idx);
    alias plua_concat = void function(lua_State* L, int n);
    alias plua_len = void function(lua_State* L, int idx);
    alias plua_stringtonumber = size_t function(lua_State* L, const(char)* s);
    alias plua_getallocf = lua_Alloc function(lua_State* L, void** ud);
    alias plua_setallocf = void function(lua_State* L, lua_Alloc f, void* ud);
    alias plua_toclose = void function(lua_State *L, int idx);
    alias plua_getstack = int function(lua_State* L, int, lua_Debug* ar);
    alias plua_getinfo = int function(lua_State* L, const(char)* what, lua_Debug* ar);
    alias plua_getlocal = const(char)* function(lua_State* L, const(lua_Debug)* ar, int n);
    alias plua_setlocal = const(char)* function(lua_State* L, const(lua_Debug)* ar, int n);
    alias plua_getupvalue = const(char)* function(lua_State* L, int funcindex, int n);
    alias plua_setupvalue = const(char)* function(lua_State* L, int funcindex, int n);
    alias plua_upvalueid = void* function(lua_State* L, int fidx,  int n);
    alias plua_upvaluejoin = void function(lua_State* L, int fidx1,  int n1,  int fidx2,  int n2);
    alias plua_sethook = int function(lua_State* L, lua_Hook func, int mask, int count);
    alias plua_gethook = lua_Hook function(lua_State* L);
    alias plua_gethookmask = int function(lua_State* L);
    alias plua_gethookcount = int function(lua_State* L);

    // lualib.h
    alias pluaopen_base = int function(lua_State* L);
    alias pluaopen_coroutine = int function(lua_State* L);
    alias pluaopen_table = int function(lua_State* L);
    alias pluaopen_io = int function(lua_State* L);
    alias pluaopen_os = int function(lua_State* L);
    alias pluaopen_string = int function(lua_State* L);
    alias pluaopen_utf8 = int function(lua_State* L);
    alias pluaopen_math = int function(lua_State* L);
    alias pluaopen_debug = int function(lua_State* L);
    alias pluaopen_package = int function(lua_State* L);
    alias pluaL_openlibs = void function(lua_State* L);
}

__gshared {
    // lauxlib.h
    pluaL_checkversion_ luaL_checkversion_;
    pluaL_getmetafield luaL_getmetafield;
    pluaL_callmeta luaL_callmeta;
    pluaL_tolstring luaL_tolstring;
    pluaL_argerror luaL_argerror;
    pluaL_typeerror luaL_typeerror;
    pluaL_checklstring luaL_checklstring;
    pluaL_optlstring luaL_optlstring;
    pluaL_checknumber luaL_checknumber;
    pluaL_optnumber luaL_optnumber;
    pluaL_checkinteger luaL_checkinteger;
    pluaL_optinteger luaL_optinteger;
    pluaL_checkstack luaL_checkstack;
    pluaL_checktype luaL_checktype;
    pluaL_checkany luaL_checkany;
    pluaL_newmetatable luaL_newmetatable;
    pluaL_setmetatable luaL_setmetatable;
    pluaL_testudata luaL_testudata;
    pluaL_checkudata luaL_checkudata;
    pluaL_where luaL_where;
    pluaL_error luaL_error;
    pluaL_checkoption luaL_checkoption;
    pluaL_fileresult luaL_fileresult;
    pluaL_execresult luaL_execresult;
    pluaL_ref luaL_ref;
    pluaL_unref luaL_unref;
    pluaL_loadfilex luaL_loadfilex;
    pluaL_loadbufferx luaL_loadbufferx;
    pluaL_loadstring luaL_loadstring;
    pluaL_newstate luaL_newstate;
    pluaL_len luaL_len;
    pluaL_addgsub luaL_addgsub;
    pluaL_gsub luaL_gsub;
    pluaL_setfuncs luaL_setfuncs;
    pluaL_getsubtable luaL_getsubtable;
    pluaL_traceback luaL_traceback;
    pluaL_requiref luaL_requiref;
    pluaL_buffinit luaL_buffinit;
    pluaL_prepbuffsize luaL_prepbuffsize;
    pluaL_addlstring luaL_addlstring;
    pluaL_addstring luaL_addstring;
    pluaL_addvalue luaL_addvalue;
    pluaL_pushresult luaL_pushresult;
    pluaL_pushresultsize luaL_pushresultsize;
    pluaL_buffinitsize luaL_buffinitsize;

    // lua.h
    plua_newstate lua_newstate;
    plua_close lua_close;
    plua_newthread lua_newthread;
    plua_atpanic lua_atpanic;
    plua_version lua_version;
    plua_absindex lua_absindex;
    plua_gettop lua_gettop;
    plua_settop lua_settop;
    plua_pushvalue lua_pushvalue;
    plua_rotate lua_rotate;
    plua_copy lua_copy;
    plua_checkstack lua_checkstack;
    plua_xmove lua_xmove;
    plua_isnumber lua_isnumber;
    plua_isstring lua_isstring;
    plua_iscfunction lua_iscfunction;
    plua_isinteger lua_isinteger;
    plua_isuserdata lua_isuserdata;
    plua_type lua_type;
    plua_typename lua_typename;
    plua_tonumberx lua_tonumberx;
    plua_tointegerx lua_tointegerx;
    plua_toboolean lua_toboolean;
    plua_tolstring lua_tolstring;
    plua_rawlen lua_rawlen;
    plua_tocfunction lua_tocfunction;
    plua_touserdata lua_touserdata;
    plua_tothread lua_tothread;
    plua_topointer lua_topointer;
    plua_arith lua_arith;
    plua_rawequal lua_rawequal;
    plua_compare lua_compare;
    plua_pushnil lua_pushnil;
    plua_pushnumber lua_pushnumber;
    plua_pushinteger lua_pushinteger;
    plua_pushlstring lua_pushlstring;
    plua_pushstring lua_pushstring;
    plua_pushvfstring lua_pushvfstring;
    plua_pushfstring lua_pushfstring;
    plua_pushcclosure lua_pushcclosure;
    plua_pushboolean lua_pushboolean;
    plua_pushlightuserdata lua_pushlightuserdata;
    plua_pushthread lua_pushthread;
    plua_getglobal lua_getglobal;
    plua_gettable lua_gettable;
    plua_getfield lua_getfield;
    plua_geti lua_geti;
    plua_rawget lua_rawget;
    plua_rawgeti lua_rawgeti;
    plua_rawgetp lua_rawgetp;
    plua_createtable lua_createtable;
    plua_newuserdatauv lua_newuserdatauv;
    plua_getmetatable lua_getmetatable;
    plua_getiuservalue lua_getiuservalue;
    plua_setglobal lua_setglobal;
    plua_settable lua_settable;
    plua_setfield lua_setfield;
    plua_seti lua_seti;
    plua_rawset lua_rawset;
    plua_rawseti lua_rawseti;
    plua_rawsetp lua_rawsetp;
    plua_setmetatable lua_setmetatable;
    plua_setiuservalue lua_setiuservalue;
    plua_callk lua_callk;
    plua_pcallk lua_pcallk;
    plua_load lua_load;
    plua_dump lua_dump;
    plua_yieldk lua_yieldk;
    plua_resume lua_resume;
    plua_status lua_status;
    plua_isyieldable lua_isyieldable;
    plua_setwarnf lua_setwarnf;
    plua_warning lua_warning;
    plua_gc lua_gc;
    plua_error lua_error;
    plua_next lua_next;
    plua_concat lua_concat;
    plua_len lua_len;
    plua_stringtonumber lua_stringtonumber;
    plua_getallocf lua_getallocf;
    plua_setallocf lua_setallocf;
    plua_toclose lua_toclose;
    plua_getstack lua_getstack;
    plua_getinfo lua_getinfo;
    plua_getlocal lua_getlocal;
    plua_setlocal lua_setlocal;
    plua_getupvalue lua_getupvalue;
    plua_setupvalue lua_setupvalue;
    plua_upvalueid lua_upvalueid;
    plua_upvaluejoin lua_upvaluejoin;
    plua_sethook lua_sethook;
    plua_gethook lua_gethook;
    plua_gethookmask lua_gethookmask;
    plua_gethookcount lua_gethookcount;

    // lualib.h
    pluaopen_base luaopen_base;
    pluaopen_coroutine luaopen_coroutine;
    pluaopen_table luaopen_table;
    pluaopen_io luaopen_io;
    pluaopen_os luaopen_os;
    pluaopen_string luaopen_string;
    pluaopen_utf8 luaopen_utf8;
    pluaopen_math luaopen_math;
    pluaopen_debug luaopen_debug;
    pluaopen_package luaopen_package;
    pluaL_openlibs luaL_openlibs;
}

private {
    SharedLib lib;
    LuaSupport loadedVersion;
}

@nogc nothrow:

void unloadLua()
{
    if(lib != invalidHandle) {
        lib.unload;
    }
}

LuaSupport loadedLuaVersion() @safe { return loadedVersion; }
bool isLuaLoaded() @safe { return lib != invalidHandle; }

LuaSupport loadLua()
{
    version(Windows) {
        const(char)[][3] libNames = ["lua5.4.dll", "lua54.dll", "lua5.4.2.dll"];
    }
    else version(OSX) {
        const(char)[][1] libNames = "liblua.5.4.dylib";
    }
    else version(Posix) {
        const(char)[][3] libNames = ["liblua.so.5.4", "liblua5.4.so", "liblua-5.4.so"];
    }
    else static assert(0, "bindbc-lua support for Lua 5.4 is not implemented on this platform.");

    LuaSupport ret;
    foreach(name; libNames) {
        ret = loadLua(name.ptr);
        if(ret != LuaSupport.noLibrary) break;
    }
    return ret;
}

LuaSupport loadLua(const(char)* libName)
{
    lib = load(libName);
    if(lib == invalidHandle) {
        return LuaSupport.noLibrary;
    }

    auto errCount = errorCount();
    loadedVersion = LuaSupport.badLibrary;

    // lauxlib.h
    lib.bindSymbol(cast(void**)&luaL_checkversion_, "luaL_checkversion_");
    lib.bindSymbol(cast(void**)&luaL_getmetafield,"luaL_getmetafield");
    lib.bindSymbol(cast(void**)&luaL_callmeta, "luaL_callmeta");
    lib.bindSymbol(cast(void**)&luaL_tolstring, "luaL_tolstring");
    lib.bindSymbol(cast(void**)&luaL_argerror, "luaL_argerror");
    lib.bindSymbol(cast(void**)&luaL_typeerror, "luaL_typeerror");
    lib.bindSymbol(cast(void**)&luaL_checklstring, "luaL_checklstring");
    lib.bindSymbol(cast(void**)&luaL_optlstring, "luaL_optlstring");
    lib.bindSymbol(cast(void**)&luaL_checknumber, "luaL_checknumber");
    lib.bindSymbol(cast(void**)&luaL_optnumber, "luaL_optnumber");
    lib.bindSymbol(cast(void**)&luaL_checkinteger, "luaL_checkinteger");
    lib.bindSymbol(cast(void**)&luaL_optinteger, "luaL_optinteger");
    lib.bindSymbol(cast(void**)&luaL_checkstack, "luaL_checkstack");
    lib.bindSymbol(cast(void**)&luaL_checktype, "luaL_checktype");
    lib.bindSymbol(cast(void**)&luaL_checkany, "luaL_checkany");
    lib.bindSymbol(cast(void**)&luaL_newmetatable, "luaL_newmetatable");
    lib.bindSymbol(cast(void**)&luaL_setmetatable, "luaL_setmetatable");
    lib.bindSymbol(cast(void**)&luaL_testudata, "luaL_testudata");
    lib.bindSymbol(cast(void**)&luaL_checkudata, "luaL_checkudata");
    lib.bindSymbol(cast(void**)&luaL_where, "luaL_where");
    lib.bindSymbol(cast(void**)&luaL_error, "luaL_error");
    lib.bindSymbol(cast(void**)&luaL_checkoption, "luaL_checkoption");
    lib.bindSymbol(cast(void**)&luaL_fileresult, "luaL_fileresult");
    lib.bindSymbol(cast(void**)&luaL_execresult, "luaL_execresult");
    lib.bindSymbol(cast(void**)&luaL_ref, "luaL_ref");
    lib.bindSymbol(cast(void**)&luaL_unref, "luaL_unref");
    lib.bindSymbol(cast(void**)&luaL_loadfilex, "luaL_loadfilex");
    lib.bindSymbol(cast(void**)&luaL_loadbufferx, "luaL_loadbufferx");
    lib.bindSymbol(cast(void**)&luaL_loadstring, "luaL_loadstring");
    lib.bindSymbol(cast(void**)&luaL_newstate, "luaL_newstate");
    lib.bindSymbol(cast(void**)&luaL_len, "luaL_len");
    lib.bindSymbol(cast(void**)&luaL_addgsub, "luaL_addgsub");
    lib.bindSymbol(cast(void**)&luaL_gsub, "luaL_gsub");
    lib.bindSymbol(cast(void**)&luaL_setfuncs, "luaL_setfuncs");
    lib.bindSymbol(cast(void**)&luaL_getsubtable, "luaL_getsubtable");
    lib.bindSymbol(cast(void**)&luaL_traceback, "luaL_traceback");
    lib.bindSymbol(cast(void**)&luaL_requiref, "luaL_requiref");
    lib.bindSymbol(cast(void**)&luaL_buffinit, "luaL_buffinit");
    lib.bindSymbol(cast(void**)&luaL_prepbuffsize, "luaL_prepbuffsize");
    lib.bindSymbol(cast(void**)&luaL_addlstring, "luaL_addlstring");
    lib.bindSymbol(cast(void**)&luaL_addstring, "luaL_addstring");
    lib.bindSymbol(cast(void**)&luaL_addvalue, "luaL_addvalue");
    lib.bindSymbol(cast(void**)&luaL_pushresult, "luaL_pushresult");
    lib.bindSymbol(cast(void**)&luaL_pushresultsize, "luaL_pushresultsize");
    lib.bindSymbol(cast(void**)&luaL_buffinitsize, "luaL_buffinitsize");

    // lua.h
    lib.bindSymbol(cast(void**)&lua_newstate, "lua_newstate");
    lib.bindSymbol(cast(void**)&lua_close, "lua_close");
    lib.bindSymbol(cast(void**)&lua_newthread, "lua_newthread");
    lib.bindSymbol(cast(void**)&lua_atpanic, "lua_atpanic");
    lib.bindSymbol(cast(void**)&lua_version, "lua_version");
    lib.bindSymbol(cast(void**)&lua_absindex, "lua_absindex");
    lib.bindSymbol(cast(void**)&lua_gettop, "lua_gettop");
    lib.bindSymbol(cast(void**)&lua_settop, "lua_settop");
    lib.bindSymbol(cast(void**)&lua_pushvalue, "lua_pushvalue");
    lib.bindSymbol(cast(void**)&lua_rotate, "lua_rotate");
    lib.bindSymbol(cast(void**)&lua_copy, "lua_copy");
    lib.bindSymbol(cast(void**)&lua_checkstack, "lua_checkstack");
    lib.bindSymbol(cast(void**)&lua_xmove, "lua_xmove");
    lib.bindSymbol(cast(void**)&lua_isnumber, "lua_isnumber");
    lib.bindSymbol(cast(void**)&lua_isstring, "lua_isstring");
    lib.bindSymbol(cast(void**)&lua_iscfunction, "lua_iscfunction");
    lib.bindSymbol(cast(void**)&lua_isinteger, "lua_isinteger");
    lib.bindSymbol(cast(void**)&lua_isuserdata, "lua_isuserdata");
    lib.bindSymbol(cast(void**)&lua_type, "lua_type");
    lib.bindSymbol(cast(void**)&lua_typename, "lua_typename");
    lib.bindSymbol(cast(void**)&lua_tonumberx, "lua_tonumberx");
    lib.bindSymbol(cast(void**)&lua_tointegerx, "lua_tointegerx");
    lib.bindSymbol(cast(void**)&lua_toboolean, "lua_toboolean");
    lib.bindSymbol(cast(void**)&lua_tolstring, "lua_tolstring");
    lib.bindSymbol(cast(void**)&lua_rawlen, "lua_rawlen");
    lib.bindSymbol(cast(void**)&lua_tocfunction, "lua_tocfunction");
    lib.bindSymbol(cast(void**)&lua_touserdata, "lua_touserdata");
    lib.bindSymbol(cast(void**)&lua_tothread, "lua_tothread");
    lib.bindSymbol(cast(void**)&lua_topointer, "lua_topointer");
    lib.bindSymbol(cast(void**)&lua_arith, "lua_arith");
    lib.bindSymbol(cast(void**)&lua_rawequal, "lua_rawequal");
    lib.bindSymbol(cast(void**)&lua_compare, "lua_compare");
    lib.bindSymbol(cast(void**)&lua_pushnil, "lua_pushnil");
    lib.bindSymbol(cast(void**)&lua_pushnumber, "lua_pushnumber");
    lib.bindSymbol(cast(void**)&lua_pushinteger, "lua_pushinteger");
    lib.bindSymbol(cast(void**)&lua_pushlstring, "lua_pushlstring");
    lib.bindSymbol(cast(void**)&lua_pushstring, "lua_pushstring");
    lib.bindSymbol(cast(void**)&lua_pushvfstring, "lua_pushvfstring");
    lib.bindSymbol(cast(void**)&lua_pushfstring, "lua_pushfstring");
    lib.bindSymbol(cast(void**)&lua_pushcclosure, "lua_pushcclosure");
    lib.bindSymbol(cast(void**)&lua_pushboolean, "lua_pushboolean");
    lib.bindSymbol(cast(void**)&lua_pushlightuserdata, "lua_pushlightuserdata");
    lib.bindSymbol(cast(void**)&lua_pushthread, "lua_pushthread");
    lib.bindSymbol(cast(void**)&lua_getglobal, "lua_getglobal");
    lib.bindSymbol(cast(void**)&lua_gettable, "lua_gettable");
    lib.bindSymbol(cast(void**)&lua_getfield, "lua_getfield");
    lib.bindSymbol(cast(void**)&lua_geti, "lua_geti");
    lib.bindSymbol(cast(void**)&lua_rawget, "lua_rawget");
    lib.bindSymbol(cast(void**)&lua_rawgeti, "lua_rawgeti");
    lib.bindSymbol(cast(void**)&lua_rawgetp, "lua_rawgetp");
    lib.bindSymbol(cast(void**)&lua_createtable, "lua_createtable");
    lib.bindSymbol(cast(void**)&lua_newuserdatauv, "lua_newuserdatauv");
    lib.bindSymbol(cast(void**)&lua_getmetatable, "lua_getmetatable");
    lib.bindSymbol(cast(void**)&lua_getiuservalue, "lua_getiuservalue");
    lib.bindSymbol(cast(void**)&lua_setglobal, "lua_setglobal");
    lib.bindSymbol(cast(void**)&lua_settable, "lua_settable");
    lib.bindSymbol(cast(void**)&lua_setfield, "lua_setfield");
    lib.bindSymbol(cast(void**)&lua_seti, "lua_seti");
    lib.bindSymbol(cast(void**)&lua_rawset, "lua_rawset");
    lib.bindSymbol(cast(void**)&lua_rawseti, "lua_rawseti");
    lib.bindSymbol(cast(void**)&lua_rawsetp, "lua_rawsetp");
    lib.bindSymbol(cast(void**)&lua_setmetatable, "lua_setmetatable");
    lib.bindSymbol(cast(void**)&lua_setiuservalue, "lua_setiuservalue");
    lib.bindSymbol(cast(void**)&lua_callk, "lua_callk");
    lib.bindSymbol(cast(void**)&lua_pcallk, "lua_pcallk");
    lib.bindSymbol(cast(void**)&lua_load, "lua_load");
    lib.bindSymbol(cast(void**)&lua_dump, "lua_dump");
    lib.bindSymbol(cast(void**)&lua_yieldk, "lua_yieldk");
    lib.bindSymbol(cast(void**)&lua_resume, "lua_resume");
    lib.bindSymbol(cast(void**)&lua_status, "lua_status");
    lib.bindSymbol(cast(void**)&lua_isyieldable, "lua_isyieldable");
    lib.bindSymbol(cast(void**)&lua_setwarnf, "lua_setwarnf");
    lib.bindSymbol(cast(void**)&lua_warning, "lua_warning");
    lib.bindSymbol(cast(void**)&lua_gc, "lua_gc");
    lib.bindSymbol(cast(void**)&lua_error, "lua_error");
    lib.bindSymbol(cast(void**)&lua_next, "lua_next");
    lib.bindSymbol(cast(void**)&lua_concat, "lua_concat");
    lib.bindSymbol(cast(void**)&lua_len, "lua_len");
    lib.bindSymbol(cast(void**)&lua_stringtonumber, "lua_stringtonumber");
    lib.bindSymbol(cast(void**)&lua_getallocf, "lua_getallocf");
    lib.bindSymbol(cast(void**)&lua_setallocf, "lua_setallocf");
    lib.bindSymbol(cast(void**)&lua_toclose, "lua_toclose");
    lib.bindSymbol(cast(void**)&lua_getstack, "lua_getstack");
    lib.bindSymbol(cast(void**)&lua_getinfo, "lua_getinfo");
    lib.bindSymbol(cast(void**)&lua_getlocal, "lua_getlocal");
    lib.bindSymbol(cast(void**)&lua_setlocal, "lua_setlocal");
    lib.bindSymbol(cast(void**)&lua_getupvalue, "lua_getupvalue");
    lib.bindSymbol(cast(void**)&lua_setupvalue, "lua_setupvalue");
    lib.bindSymbol(cast(void**)&lua_upvalueid, "lua_upvalueid");
    lib.bindSymbol(cast(void**)&lua_upvaluejoin, "lua_upvaluejoin");
    lib.bindSymbol(cast(void**)&lua_sethook, "lua_sethook");
    lib.bindSymbol(cast(void**)&lua_gethook, "lua_gethook");
    lib.bindSymbol(cast(void**)&lua_gethookmask, "lua_gethookmask");
    lib.bindSymbol(cast(void**)&lua_gethookcount, "lua_gethookcount");

    // lualib.h
    lib.bindSymbol(cast(void**)&luaopen_base, "luaopen_base");
    lib.bindSymbol(cast(void**)&luaopen_coroutine, "luaopen_coroutine");
    lib.bindSymbol(cast(void**)&luaopen_table, "luaopen_table");
    lib.bindSymbol(cast(void**)&luaopen_io, "luaopen_io");
    lib.bindSymbol(cast(void**)&luaopen_os, "luaopen_os");
    lib.bindSymbol(cast(void**)&luaopen_string, "luaopen_string");
    lib.bindSymbol(cast(void**)&luaopen_utf8, "luaopen_utf8");
    lib.bindSymbol(cast(void**)&luaopen_math, "luaopen_math");
    lib.bindSymbol(cast(void**)&luaopen_debug, "luaopen_debug");
    lib.bindSymbol(cast(void**)&luaopen_package, "luaopen_package");
    lib.bindSymbol(cast(void**)&luaL_openlibs, "luaL_openlibs");

    return LuaSupport.lua54;
}