mirror of
https://github.com/EQEmu/Server.git
synced 2026-02-01 10:23:53 +00:00
106 lines
2.6 KiB
C++
106 lines
2.6 KiB
C++
// Copyright Daniel Wallin 2009. Use, modification and distribution is
|
|
// subject to 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)
|
|
|
|
#ifndef LUABIND_DETAIL_MAKE_INSTANCE_090310_HPP
|
|
# define LUABIND_DETAIL_MAKE_INSTANCE_090310_HPP
|
|
|
|
# include <boost/type_traits/is_polymorphic.hpp>
|
|
# include <luabind/detail/inheritance.hpp>
|
|
# include <luabind/detail/object_rep.hpp>
|
|
|
|
namespace luabind { namespace detail {
|
|
|
|
template <class T>
|
|
std::pair<class_id, void*> get_dynamic_class_aux(
|
|
lua_State* L, T const* p, mpl::true_)
|
|
{
|
|
lua_pushliteral(L, "__luabind_class_id_map");
|
|
lua_rawget(L, LUA_REGISTRYINDEX);
|
|
|
|
class_id_map& class_ids = *static_cast<class_id_map*>(
|
|
lua_touserdata(L, -1));
|
|
|
|
lua_pop(L, 1);
|
|
|
|
return std::make_pair(
|
|
class_ids.get_local(typeid(*p))
|
|
, dynamic_cast<void*>(const_cast<T*>(p))
|
|
);
|
|
}
|
|
|
|
template <class T>
|
|
std::pair<class_id, void*> get_dynamic_class_aux(
|
|
lua_State*, T const* p, mpl::false_)
|
|
{
|
|
return std::make_pair(registered_class<T>::id, (void*)p);
|
|
}
|
|
|
|
template <class T>
|
|
std::pair<class_id, void*> get_dynamic_class(lua_State* L, T* p)
|
|
{
|
|
return get_dynamic_class_aux(L, p, boost::is_polymorphic<T>());
|
|
}
|
|
|
|
template <class T>
|
|
class_rep* get_pointee_class(class_map const& classes, T*)
|
|
{
|
|
return classes.get(registered_class<T>::id);
|
|
}
|
|
|
|
template <class P>
|
|
class_rep* get_pointee_class(lua_State* L, P const& p, class_id dynamic_id)
|
|
{
|
|
lua_pushliteral(L, "__luabind_class_map");
|
|
lua_rawget(L, LUA_REGISTRYINDEX);
|
|
|
|
class_map const& classes = *static_cast<class_map*>(
|
|
lua_touserdata(L, -1));
|
|
|
|
lua_pop(L, 1);
|
|
|
|
class_rep* cls = classes.get(dynamic_id);
|
|
|
|
if (!cls)
|
|
cls = get_pointee_class(classes, get_pointer(p));
|
|
|
|
return cls;
|
|
}
|
|
|
|
// Create an appropriate instance holder for the given pointer like object.
|
|
template <class P>
|
|
void make_instance(lua_State* L, P p)
|
|
{
|
|
std::pair<class_id, void*> dynamic = get_dynamic_class(L, get_pointer(p));
|
|
|
|
class_rep* cls = get_pointee_class(L, p, dynamic.first);
|
|
|
|
if (!cls)
|
|
{
|
|
throw std::runtime_error("Trying to use unregistered class");
|
|
}
|
|
|
|
object_rep* instance = push_new_instance(L, cls);
|
|
|
|
typedef pointer_holder<P> holder_type;
|
|
|
|
void* storage = instance->allocate(sizeof(holder_type));
|
|
|
|
try
|
|
{
|
|
new (storage) holder_type(p, dynamic.first, dynamic.second, cls);
|
|
}
|
|
catch (...)
|
|
{
|
|
instance->deallocate(storage);
|
|
lua_pop(L, 1);
|
|
throw;
|
|
}
|
|
|
|
instance->set_instance(static_cast<holder_type*>(storage));
|
|
}
|
|
|
|
}} // namespace luabind::detail
|
|
|
|
#endif // LUABIND_DETAIL_MAKE_INSTANCE_090310_HPP
|