Robin Gareus
520dcf8cdf
Since lua functions are closures, C++ methods that pass arguments by reference cannot be used directly. The previous approach (boost::ref) failed with clang. Assume the following: void foo (float&) { } static inline float& bar () { boost::reference_wrapper<float> r (42); return r.get (); } foo ( bar () ); With gcc, "r" goes out of scope after foo's arguments are processed and all is well. But with clang, "r" already leave scope when *inlined* bar() returns. Solution: allocate some user-data on the lua-stack to hold the reference. There is no reference to this user-data so lua will eventually garbage collect it. (theoretically, creating the table which holds the return-values could trigger an emergency garbage collection when memory is low and free the reference just while they're being pushed to the table, then gain FuncArgs<Params> already dereferenced them all as variable on the C stack -- probably again compiler specific)
198 lines
4.5 KiB
C++
198 lines
4.5 KiB
C++
//------------------------------------------------------------------------------
|
|
/*
|
|
https://github.com/vinniefalco/LuaBridge
|
|
|
|
Copyright 2016, Robin Gareus <robin@gareus.org>
|
|
Copyright 2012, Vinnie Falco <vinnie.falco@gmail.com>
|
|
Copyright 2007, Nathan Reed
|
|
|
|
License: The MIT License (http://www.opensource.org/licenses/mit-license.php)
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
of this software and associated documentation files (the "Software"), to deal
|
|
in the Software without restriction, including without limitation the rights
|
|
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
copies of the Software, and to permit persons to whom the Software is
|
|
furnished to do so, subject to the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included in all
|
|
copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
SOFTWARE.
|
|
*/
|
|
//==============================================================================
|
|
|
|
#ifndef LUABRIDGE_LUABRIDGE_HEADER
|
|
#define LUABRIDGE_LUABRIDGE_HEADER
|
|
|
|
// All #include dependencies are listed here
|
|
// instead of in the individual header files.
|
|
//
|
|
#include <cassert>
|
|
#include <sstream>
|
|
#include <stdexcept>
|
|
#include <string>
|
|
#include <typeinfo>
|
|
|
|
#include <bitset>
|
|
#include <list>
|
|
#include <map>
|
|
#include <set>
|
|
#include <vector>
|
|
|
|
#include <inttypes.h>
|
|
#include <boost/type_traits.hpp>
|
|
#include <boost/shared_ptr.hpp>
|
|
|
|
#include "lua/luastate.h"
|
|
|
|
#define LUABRIDGE_MAJOR_VERSION 2
|
|
#define LUABRIDGE_MINOR_VERSION 0
|
|
#define LUABRIDGE_VERSION 200
|
|
|
|
namespace luabridge
|
|
{
|
|
|
|
// Forward declaration
|
|
//
|
|
template <class T>
|
|
struct Stack;
|
|
|
|
#include "detail/LuaHelpers.h"
|
|
|
|
#include "detail/TypeTraits.h"
|
|
#include "detail/TypeList.h"
|
|
#include "detail/FuncTraits.h"
|
|
#include "detail/Constructor.h"
|
|
#include "detail/Stack.h"
|
|
#include "detail/ClassInfo.h"
|
|
|
|
class LuaRef;
|
|
|
|
#include "detail/LuaException.h"
|
|
#include "detail/LuaRef.h"
|
|
#include "detail/Iterator.h"
|
|
#include "detail/FuncArgs.h"
|
|
|
|
//------------------------------------------------------------------------------
|
|
/**
|
|
security options.
|
|
*/
|
|
class Security
|
|
{
|
|
public:
|
|
static bool hideMetatables ()
|
|
{
|
|
return getSettings().hideMetatables;
|
|
}
|
|
|
|
static void setHideMetatables (bool shouldHide)
|
|
{
|
|
getSettings().hideMetatables = shouldHide;
|
|
}
|
|
|
|
private:
|
|
struct Settings
|
|
{
|
|
Settings () : hideMetatables (true)
|
|
{
|
|
}
|
|
|
|
bool hideMetatables;
|
|
};
|
|
|
|
static Settings& getSettings ()
|
|
{
|
|
static Settings settings;
|
|
return settings;
|
|
}
|
|
};
|
|
|
|
//------------------------------------------------------------------------------
|
|
|
|
#ifdef LUABINDINGDOC
|
|
class LuaBindingDoc
|
|
{
|
|
public:
|
|
static bool printBindings ()
|
|
{
|
|
return getSettings().print_bindings;
|
|
}
|
|
|
|
static void setPrintBindings (bool en)
|
|
{
|
|
getSettings().print_bindings = en;
|
|
}
|
|
|
|
private:
|
|
struct Settings
|
|
{
|
|
Settings () : print_bindings (false) { }
|
|
bool print_bindings;
|
|
};
|
|
|
|
static Settings& getSettings ()
|
|
{
|
|
static Settings settings;
|
|
return settings;
|
|
}
|
|
};
|
|
#endif
|
|
|
|
//------------------------------------------------------------------------------
|
|
|
|
|
|
#include "detail/Userdata.h"
|
|
#include "detail/CFunctions.h"
|
|
#include "detail/Namespace.h"
|
|
|
|
//------------------------------------------------------------------------------
|
|
/**
|
|
Push an object onto the Lua stack.
|
|
*/
|
|
template <class T>
|
|
inline void push (lua_State* L, T t)
|
|
{
|
|
Stack <T>::push (L, t);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
/**
|
|
Set a global value in the lua_State.
|
|
|
|
@note This works on any type specialized by `Stack`, including `LuaRef` and
|
|
its table proxies.
|
|
*/
|
|
template <class T>
|
|
inline void setGlobal (lua_State* L, T t, char const* name)
|
|
{
|
|
push (L, t);
|
|
lua_setglobal (L, name);
|
|
}
|
|
|
|
//------------------------------------------------------------------------------
|
|
/**
|
|
Change whether or not metatables are hidden (on by default).
|
|
*/
|
|
inline void setHideMetatables (bool shouldHide)
|
|
{
|
|
Security::setHideMetatables (shouldHide);
|
|
}
|
|
|
|
#ifdef LUABINDINGDOC
|
|
inline void setPrintBindings (bool en)
|
|
{
|
|
LuaBindingDoc::setPrintBindings (en);
|
|
}
|
|
#endif
|
|
|
|
} // end Namespace
|
|
|
|
#endif
|