EQStream abstraction layer

2026-06-20 22:08:22 +00:00 · 2016-09-25 15:10:34 -07:00
parent 751e61d6e5
commit 5cad3f62d0
714 changed files with 210643 additions and 18 deletions
@@ -0,0 +1,112 @@
+// Copyright Daniel Wallin 2007. 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_ITERATOR_POLICY__071111_HPP
+# define LUABIND_ITERATOR_POLICY__071111_HPP
+
+# include <luabind/config.hpp>
+# include <luabind/detail/policy.hpp>
+# include <luabind/detail/convert_to_lua.hpp>
+
+namespace luabind { namespace detail {
+
+template <class Iterator>
+struct iterator
+{
+    static int next(lua_State* L)
+    {
+        iterator* self = static_cast<iterator*>(
+            lua_touserdata(L, lua_upvalueindex(1)));
+
+        if (self->first != self->last)
+        {
+            convert_to_lua(L, *self->first);
+            ++self->first;
+        }
+        else
+        {
+            lua_pushnil(L);
+        }
+
+        return 1;
+    }
+
+    static int destroy(lua_State* L)
+    {
+        iterator* self = static_cast<iterator*>(lua_touserdata(L, 1));
+        self->~iterator();
+        return 0;
+    }
+
+    iterator(Iterator first, Iterator last)
+      : first(first)
+      , last(last)
+    {}
+
+    Iterator first;
+    Iterator last;
+};
+
+template <class Iterator>
+int make_range(lua_State* L, Iterator first, Iterator last)
+{
+    void* storage = lua_newuserdata(L, sizeof(iterator<Iterator>));
+    lua_newtable(L);
+    lua_pushcclosure(L, iterator<Iterator>::destroy, 0);
+    lua_setfield(L, -2, "__gc");
+    lua_setmetatable(L, -2);
+    lua_pushcclosure(L, iterator<Iterator>::next, 1);
+    new (storage) iterator<Iterator>(first, last);
+    return 1;
+}
+
+template <class Container>
+int make_range(lua_State* L, Container& container)
+{
+    return make_range(L, container.begin(), container.end());
+}
+
+struct iterator_converter
+{
+    typedef iterator_converter type;
+
+    template <class Container>
+    void apply(lua_State* L, Container& container)
+    {
+        make_range(L, container);
+    }
+
+    template <class Container>
+    void apply(lua_State* L, Container const& container)
+    {
+        make_range(L, container);
+    }
+};
+
+struct iterator_policy : conversion_policy<0>
+{
+    static void precall(lua_State*, index_map const&)
+    {}
+
+    static void postcall(lua_State*, index_map const&)
+    {}
+
+    template <class T, class Direction>
+    struct apply
+    {
+        typedef iterator_converter type;
+    };
+};
+
+}} // namespace luabind::detail
+
+namespace luabind { namespace {
+
+LUABIND_ANONYMOUS_FIX detail::policy_cons<
+    detail::iterator_policy, detail::null_type> return_stl_iterator;
+
+}} // namespace luabind::unnamed
+
+#endif // LUABIND_ITERATOR_POLICY__071111_HPP
+