| 1 | |
|---|
| 2 | #include <lua.hpp> |
|---|
| 3 | #include <iostream> |
|---|
| 4 | #include <type_traits> |
|---|
| 5 | #include "luatb_typed_stack.h" |
|---|
| 6 | |
|---|
| 7 | |
|---|
| 8 | // TODO Make free functions work |
|---|
| 9 | |
|---|
| 10 | // This class is only valid for function types. As a neat side-effect, having |
|---|
| 11 | // this specialization in the .ipp file, also hides all of the private members |
|---|
| 12 | // from the user (kind of). |
|---|
| 13 | template<typename ThisType, typename Ret, typename... Args> |
|---|
| 14 | class LuaTB<ThisType, Ret (ThisType::*)(Args...)> |
|---|
| 15 | { |
|---|
| 16 | public: |
|---|
| 17 | template<Ret (ThisType::*func)(Args...)> |
|---|
| 18 | static void registerFunction(ThisType *_this, lua_State *lua, std::string name) |
|---|
| 19 | { |
|---|
| 20 | // Store the 'this' pointer of the caller in the extraspace |
|---|
| 21 | LuaTB<ThisType, Ret (ThisType::*)(Args...)>::stateToClassMap[lua] = _this; |
|---|
| 22 | |
|---|
| 23 | // Make a function visible to lua that will call 'func' with the correct |
|---|
| 24 | // arguments |
|---|
| 25 | lua_register(lua, name.c_str(), toLuaSignature<func>); |
|---|
| 26 | } |
|---|
| 27 | |
|---|
| 28 | private: |
|---|
| 29 | static std::map<lua_State*, ThisType*> stateToClassMap; |
|---|
| 30 | |
|---|
| 31 | // Represents a function that can made visible to lua with the correct |
|---|
| 32 | // signature. It will call the corresponding C++ function with the |
|---|
| 33 | // correctly typed arguments |
|---|
| 34 | template<Ret (ThisType::*func)(Args...)> |
|---|
| 35 | static int toLuaSignature(lua_State *lua) |
|---|
| 36 | { |
|---|
| 37 | // The index of the topmost item on the stack equals the size of |
|---|
| 38 | // the stack, which also equals the number of arguments |
|---|
| 39 | int argc = lua_gettop(lua); |
|---|
| 40 | |
|---|
| 41 | // Check if the number of arguments match |
|---|
| 42 | if(argc != sizeof...(Args)) |
|---|
| 43 | { |
|---|
| 44 | std::cerr << "ERROR: LuaTB: Lua script called a function with wrong number of arguments (" << argc << " given, " << sizeof...(Args) << " expected)" << std::endl; |
|---|
| 45 | return LUA_ERRSYNTAX; |
|---|
| 46 | } |
|---|
| 47 | |
|---|
| 48 | // Call getArgument for every argument seperately to convert each argument |
|---|
| 49 | // to the correct type and call the function afterwards |
|---|
| 50 | ((*LuaTB<ThisType, Ret (ThisType::*)(Args...)>::stateToClassMap[lua]).*func)( (LuaTBTypedStack::getArgument<Args>(lua))... ); |
|---|
| 51 | |
|---|
| 52 | return 0; |
|---|
| 53 | } |
|---|
| 54 | }; |
|---|
| 55 | |
|---|
| 56 | // This needs to be here and not in a source file, because the compiler can't know |
|---|
| 57 | // the template types if it's in a separate module. |
|---|
| 58 | template<typename ThisType, typename Ret, typename... Args> |
|---|
| 59 | std::map<lua_State*, ThisType*> LuaTB<ThisType, Ret (ThisType::*)(Args...)>::stateToClassMap = std::map<lua_State*, ThisType*>(); |
|---|