| 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*>(); | 
|---|