Edit: /usr/include/luabind/adopt_policy.hpp (5091B)
// Copyright (c) 2003 Daniel Wallin and Arvid Norberg
// 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 LUABIND_ADOPT_POLICY_HPP_INCLUDED
#define LUABIND_ADOPT_POLICY_HPP_INCLUDED
#include
#include
#include
#include
#include
namespace luabind { namespace detail
{
template
void adjust_backref_ownership(T* ptr, mpl::true_)
{
if (wrap_base* p = dynamic_cast(ptr))
{
wrapped_self_t& wrapper = wrap_access::ref(*p);
wrapper.get(wrapper.state());
wrapper.m_strong_ref.pop(wrapper.state());
}
}
inline void adjust_backref_ownership(void*, mpl::false_)
{}
template
struct adopt_pointer : pointer_converter
{
typedef adopt_pointer type;
int consumed_args() const
{
return 1;
}
template
T* apply(lua_State* L, by_pointer, int index)
{
T* ptr = pointer_converter::apply(
L, LUABIND_DECORATE_TYPE(T*), index);
object_rep* obj = static_cast(
lua_touserdata(L, index));
if (obj)
{
obj->release();
}
adjust_backref_ownership(ptr, boost::is_polymorphic());
return ptr;
}
template
int match(lua_State* L, by_pointer, int index)
{
return pointer_converter::match(
L, LUABIND_DECORATE_TYPE(T*), index);
}
template
void converter_postcall(lua_State*, T, int) {}
};
template
struct pointer_or_default
{
typedef Pointer type;
};
template
struct pointer_or_default
{
#ifdef LUABIND_USE_CXX11
typedef std::unique_ptr type;
#else
typedef std::auto_ptr type;
#endif
};
template
struct adopt_pointer
{
typedef adopt_pointer type;
template
void apply(lua_State* L, T* ptr)
{
if (ptr == 0)
{
lua_pushnil(L);
return;
}
// if there is a back_reference, then the
// ownership will be removed from the
// back reference and put on the lua stack.
if (luabind::move_back_reference(L, ptr))
return;
typedef typename pointer_or_default::type
pointer_type;
make_instance(L, pointer_type(ptr));
}
};
template
struct adopt_policy : conversion_policy
{
// BOOST_STATIC_CONSTANT(int, index = N);
static void precall(lua_State*, const index_map&) {}
static void postcall(lua_State*, const index_map&) {}
struct only_accepts_nonconst_pointers {};
template
struct apply
{
typedef luabind::detail::is_nonconst_pointer is_nonconst_p;
typedef typename boost::mpl::if_<
is_nonconst_p
, adopt_pointer
, only_accepts_nonconst_pointers
>::type type;
};
};
}}
namespace luabind
{
template
detail::policy_cons, detail::null_type>
adopt(LUABIND_PLACEHOLDER_ARG(N))
{
return detail::policy_cons, detail::null_type>();
}
template
detail::policy_cons, detail::null_type>
adopt(LUABIND_PLACEHOLDER_ARG(N))
{
return detail::policy_cons, detail::null_type>();
}
}
#endif // LUABIND_ADOPT_POLICY_HPP_INCLUDE