mirror of
https://github.com/EQEmu/Server.git
synced 2026-02-06 02:53:53 +00:00
97 lines
2.2 KiB
C++
97 lines
2.2 KiB
C++
// Copyright Daniel Wallin 2005. 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)
|
|
|
|
#define LUABIND_BUILDING
|
|
|
|
#include <luabind/lua_include.hpp>
|
|
|
|
#include <luabind/config.hpp> // for LUABIND_API
|
|
|
|
#ifndef LUABIND_NO_EXCEPTIONS
|
|
#include <luabind/error.hpp> // for error
|
|
#include <luabind/exception_handler.hpp> // for exception_handler_base
|
|
|
|
#include <exception> // for exception
|
|
#include <stdexcept> // for logic_error, runtime_error
|
|
|
|
namespace luabind {
|
|
namespace detail {
|
|
|
|
namespace {
|
|
|
|
exception_handler_base* handler_chain = 0;
|
|
|
|
void push_exception_string(lua_State* L, char const* exception, char const* what)
|
|
{
|
|
lua_pushstring(L, exception);
|
|
lua_pushstring(L, ": '");
|
|
lua_pushstring(L, what);
|
|
lua_pushstring(L, "'");
|
|
lua_concat(L, 4);
|
|
}
|
|
}
|
|
|
|
void exception_handler_base::try_next(lua_State* L) const
|
|
{
|
|
if(next)
|
|
next->handle(L);
|
|
else
|
|
throw;
|
|
}
|
|
|
|
LUABIND_API void handle_exception_aux(lua_State* L)
|
|
{
|
|
try
|
|
{
|
|
if(handler_chain)
|
|
handler_chain->handle(L);
|
|
else
|
|
throw;
|
|
}
|
|
catch(error const&)
|
|
{
|
|
// is always thrown in the context where an error message was already pushed to the lua stack.
|
|
}
|
|
catch(std::logic_error const& e)
|
|
{
|
|
push_exception_string(L, "std::logic_error", e.what());
|
|
}
|
|
catch(std::runtime_error const& e)
|
|
{
|
|
push_exception_string(L, "std::runtime_error", e.what());
|
|
}
|
|
catch(std::exception const& e)
|
|
{
|
|
push_exception_string(L, "std::exception", e.what());
|
|
}
|
|
catch(char const* str)
|
|
{
|
|
push_exception_string(L, "c-string", str);
|
|
}
|
|
catch(...)
|
|
{
|
|
lua_pushstring(L, "Unknown C++ exception");
|
|
}
|
|
}
|
|
|
|
LUABIND_API void register_exception_handler(exception_handler_base* handler)
|
|
{
|
|
if(!handler_chain) handler_chain = handler;
|
|
else
|
|
{
|
|
exception_handler_base* p = handler_chain;
|
|
|
|
for(; p->next; p = p->next);
|
|
|
|
handler->next = 0;
|
|
p->next = handler;
|
|
}
|
|
}
|
|
|
|
} // namespace detail
|
|
} // namespace luabind
|
|
|
|
#endif // LUABIND_NO_EXCEPTIONS
|
|
|