StarMirror/sol2
1
0
Fork 0
mirror of https://github.com/ThePhD/sol2.git synced 2024-03-22 13:10:44 +08:00
Code Issues Projects Releases Wiki Activity
be98a4fdd4
sol2/sol/stack.hpp

189 lines
5.6 KiB
C++
Raw Normal View History

Initial commit
2013-11-25 17:56:27 +08:00
// The MIT License (MIT)
// Copyright (c) 2013 Danny Y., Rapptz
// 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 SOL_STACK_HPP
#define SOL_STACK_HPP
#include "reference.hpp"
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
#include "tuple.hpp"
Initial commit
2013-11-25 17:56:27 +08:00
#include <utility>
#include <type_traits>
namespace sol {
Add using statements for basic EnableIf and DisableIf
2013-11-30 06:57:46 +08:00
template<typename T, typename R = void>
using EnableIf = typename std::enable_if<T::value, R>::type;
template<typename T, typename R = void>
using DisableIf = typename std::enable_if<!T::value, R>::type;
Initial commit
2013-11-25 17:56:27 +08:00
namespace stack {
namespace detail {
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
template<class T, class F, class... Vs>
Reformatted to look like Rapptz's style. The following code sample work without error in VS 2013: http://pastebin.com/s4Jbjnht It'll be up to @Rapptz's to make further changes to make sure GCC compiles, but the core of the functionality is there and my work is essentially done. Class bindings are up next, but really I don't want to even touch those. :c
2013-12-03 04:42:03 +08:00
auto ltr_pop(T&& extra, F f, types<>, Vs&&... vs)
-> decltype(f(std::forward<Vs>(vs)...)) {
return f(std::forward<Vs>(vs)...);
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
}
// take head, produce value from it, pass after other values
template<class F, class Head, class... Tail, class... Vs>
Reformatted to look like Rapptz's style. The following code sample work without error in VS 2013: http://pastebin.com/s4Jbjnht It'll be up to @Rapptz's to make further changes to make sure GCC compiles, but the core of the functionality is there and my work is essentially done. Class bindings are up next, but really I don't want to even touch those. :c
2013-12-03 04:42:03 +08:00
auto ltr_pop(lua_State* L, F f, types<Head, Tail...>, Vs&&... vs)
-> decltype(ltr_pop(L, f, types<Tail...>{}, std::forward<Vs>(vs)..., stack::pop<Head>(L))) {
return ltr_pop(L, f, types<Tail...>{}, std::forward<Vs>(vs)..., stack::pop<Head>(L));
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
}
Initial commit
2013-11-25 17:56:27 +08:00
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_unsigned(lua_State* L, std::true_type, int index = -1) {
return lua_tounsigned(L, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_unsigned(lua_State* L, std::false_type, int index = -1) {
return lua_tointeger(L, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_arithmetic(lua_State* L, std::false_type, int index = -1) {
Initial commit
2013-11-25 17:56:27 +08:00
// T is a floating point
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
return lua_tonumber(L, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_arithmetic(lua_State* L, std::true_type, int index = -1) {
Initial commit
2013-11-25 17:56:27 +08:00
// T is an integral
Add polymorphic lua object type
2013-12-01 10:12:50 +08:00
return get_unsigned<T>(L, std::is_unsigned<T>{}, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_helper(lua_State* L, std::true_type, int index = -1) {
Initial commit
2013-11-25 17:56:27 +08:00
// T is a class type
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
return T(L, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get_helper(lua_State* L, std::false_type, int index = -1) {
Initial commit
2013-11-25 17:56:27 +08:00
// T is a fundamental type
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
return get_arithmetic<T>(L, std::is_integral<T>{}, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
inline void push_unsigned(lua_State* L, T x, std::true_type) {
lua_pushunsigned(L, x);
}
template<typename T>
inline void push_unsigned(lua_State* L, T x, std::false_type) {
lua_pushinteger(L, x);
}
template<typename T>
inline void push_arithmetic(lua_State* L, T x, std::true_type) {
// T is an integral type
push_unsigned(L, x, std::is_unsigned<T>{});
}
template<typename T>
inline void push_arithmetic(lua_State* L, T x, std::false_type) {
// T is an floating point type
lua_pushnumber(L, x);
}
} // detail
template<typename T>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline T get(lua_State* L, int index = -1) {
return detail::get_helper<T>(L, std::is_class<T>{}, index);
Initial commit
2013-11-25 17:56:27 +08:00
}
template<>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline bool get<bool>(lua_State* L, int index) {
return lua_toboolean(L, index) != 0;
Initial commit
2013-11-25 17:56:27 +08:00
}
template<>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline std::string get<std::string>(lua_State* L, int index) {
Initial commit
2013-11-25 17:56:27 +08:00
std::string::size_type len;
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
auto str = lua_tolstring(L, index, &len);
Initial commit
2013-11-25 17:56:27 +08:00
return { str, len };
}
template<>
Allow specification of index in get<T> function
2013-11-29 11:51:51 +08:00
inline const char* get<const char*>(lua_State* L, int index) {
return lua_tostring(L, index);
Switched pop to get and wrote a new pop<T> function
2013-11-29 07:27:27 +08:00
}
template<typename T>
inline T pop(lua_State* L) {
auto r = get<T>(L);
Initial commit
2013-11-25 17:56:27 +08:00
lua_pop(L, 1);
Switched pop to get and wrote a new pop<T> function
2013-11-29 07:27:27 +08:00
return r;
Initial commit
2013-11-25 17:56:27 +08:00
}
template<typename T>
Add using statements for basic EnableIf and DisableIf
2013-11-30 06:57:46 +08:00
inline EnableIf<std::is_arithmetic<T>> push(lua_State* L, T arithmetic) {
Revert "Allow push to work with types that inherit from reference" This reverts commit f2d72f7bb23c2c2d0e9b9d8b924e574907e5fd52.
2013-11-26 14:21:53 +08:00
detail::push_arithmetic(L, arithmetic, std::is_integral<T>{});
Initial commit
2013-11-25 17:56:27 +08:00
}
Make reference pushing take an actual reference to the object instead of by value
2013-11-26 18:07:10 +08:00
inline void push(lua_State*, reference& ref) {
Readd support for types that inherit from reference
2013-11-26 17:05:04 +08:00
ref.push();
}
Initial commit
2013-11-25 17:56:27 +08:00
inline void push(lua_State* L, bool boolean) {
lua_pushboolean(L, boolean);
}
inline void push(lua_State* L, const nil_t&) {
lua_pushnil(L);
}
inline void push(lua_State* L, lua_CFunction func) {
lua_pushcfunction(L, func);
}
template<size_t N>
inline void push(lua_State* L, const char (&str)[N]) {
lua_pushlstring(L, str, N - 1);
}
inline void push(lua_State* L, const std::string& str) {
lua_pushlstring(L, str.c_str(), str.size());
}
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
namespace detail {
template<typename T, std::size_t... I>
Reformatted to look like Rapptz's style. The following code sample work without error in VS 2013: http://pastebin.com/s4Jbjnht It'll be up to @Rapptz's to make further changes to make sure GCC compiles, but the core of the functionality is there and my work is essentially done. Class bindings are up next, but really I don't want to even touch those. :c
2013-12-03 04:42:03 +08:00
inline void push(lua_State* L, indices<I...>, const T& tuplen) {
using swallow = char [];
void(swallow{ '\0', (sol::stack::push(L, std::get<I>(tuplen)), '\0')... });
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
}
} // detail
template<typename... Args>
inline void push(lua_State* L, const std::tuple<Args...>& tuplen) {
Reformatted to look like Rapptz's style. The following code sample work without error in VS 2013: http://pastebin.com/s4Jbjnht It'll be up to @Rapptz's to make further changes to make sure GCC compiles, but the core of the functionality is there and my work is essentially done. Class bindings are up next, but really I don't want to even touch those. :c
2013-12-03 04:42:03 +08:00
detail::push(L, build_indices<sizeof...(Args)>(), tuplen);
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
}
template<typename... Args, typename TFx>
Reformatted to look like Rapptz's style. The following code sample work without error in VS 2013: http://pastebin.com/s4Jbjnht It'll be up to @Rapptz's to make further changes to make sure GCC compiles, but the core of the functionality is there and my work is essentially done. Class bindings are up next, but really I don't want to even touch those. :c
2013-12-03 04:42:03 +08:00
inline auto pop_call(lua_State* L, TFx&& fx, types<Args...> t)->decltype(detail::ltr_pop(L, fx, t)) {
return detail::ltr_pop(L, fx, t);
The solution technically works, but there's some stack corruption going on somewhere that I can quite track down, even when calling a void function with no parameters. I'll have to look into it...
2013-12-03 03:22:51 +08:00
}
Initial commit
2013-11-25 17:56:27 +08:00
} // stack
} // sol
#endif // SOL_STACK_HPP
Reference in New Issue Copy Permalink