317 lines
		
	
	
		
			10 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			317 lines
		
	
	
		
			10 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| //---------------------------------------------------------------------------//
 | |
| // Copyright (c) 2013 Kyle Lutz <kyle.r.lutz@gmail.com>
 | |
| //
 | |
| // Distributed under 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
 | |
| //
 | |
| // See http://boostorg.github.com/compute for more information.
 | |
| //---------------------------------------------------------------------------//
 | |
| 
 | |
| #ifndef BOOST_COMPUTE_ITERATOR_ZIP_ITERATOR_HPP
 | |
| #define BOOST_COMPUTE_ITERATOR_ZIP_ITERATOR_HPP
 | |
| 
 | |
| #include <cstddef>
 | |
| #include <iterator>
 | |
| 
 | |
| #include <boost/config.hpp>
 | |
| #include <boost/fusion/algorithm/iteration/for_each.hpp>
 | |
| #include <boost/iterator/iterator_facade.hpp>
 | |
| #include <boost/mpl/back_inserter.hpp>
 | |
| #include <boost/mpl/transform.hpp>
 | |
| #include <boost/mpl/vector.hpp>
 | |
| #include <boost/preprocessor/repetition.hpp>
 | |
| #include <boost/tuple/tuple.hpp>
 | |
| #include <boost/tuple/tuple_comparison.hpp>
 | |
| 
 | |
| #include <boost/compute/config.hpp>
 | |
| #include <boost/compute/functional.hpp>
 | |
| #include <boost/compute/detail/meta_kernel.hpp>
 | |
| #include <boost/compute/detail/mpl_vector_to_tuple.hpp>
 | |
| #include <boost/compute/types/tuple.hpp>
 | |
| #include <boost/compute/type_traits/is_device_iterator.hpp>
 | |
| #include <boost/compute/type_traits/type_name.hpp>
 | |
| 
 | |
| namespace boost {
 | |
| namespace compute {
 | |
| 
 | |
| // forward declaration for zip_iterator
 | |
| template<class IteratorTuple>
 | |
| class zip_iterator;
 | |
| 
 | |
| namespace detail {
 | |
| 
 | |
| namespace mpl = boost::mpl;
 | |
| 
 | |
| // meta-function returning the value_type for an iterator
 | |
| template<class Iterator>
 | |
| struct make_iterator_value_type
 | |
| {
 | |
|     typedef typename std::iterator_traits<Iterator>::value_type type;
 | |
| };
 | |
| 
 | |
| // meta-function returning the value_type for a zip_iterator
 | |
| template<class IteratorTuple>
 | |
| struct make_zip_iterator_value_type
 | |
| {
 | |
|     typedef typename
 | |
|         detail::mpl_vector_to_tuple<
 | |
|             typename mpl::transform<
 | |
|                 IteratorTuple,
 | |
|                 make_iterator_value_type<mpl::_1>,
 | |
|                 mpl::back_inserter<mpl::vector<> >
 | |
|             >::type
 | |
|         >::type type;
 | |
| };
 | |
| 
 | |
| // helper class which defines the iterator_facade super-class
 | |
| // type for zip_iterator
 | |
| template<class IteratorTuple>
 | |
| class zip_iterator_base
 | |
| {
 | |
| public:
 | |
|     typedef ::boost::iterator_facade<
 | |
|         ::boost::compute::zip_iterator<IteratorTuple>,
 | |
|         typename make_zip_iterator_value_type<IteratorTuple>::type,
 | |
|         ::std::random_access_iterator_tag,
 | |
|         typename make_zip_iterator_value_type<IteratorTuple>::type
 | |
|     > type;
 | |
| };
 | |
| 
 | |
| template<class IteratorTuple, class IndexExpr>
 | |
| struct zip_iterator_index_expr
 | |
| {
 | |
|     typedef typename
 | |
|         make_zip_iterator_value_type<IteratorTuple>::type
 | |
|         result_type;
 | |
| 
 | |
|     zip_iterator_index_expr(const IteratorTuple &iterators,
 | |
|                             const IndexExpr &index_expr)
 | |
|         : m_iterators(iterators),
 | |
|           m_index_expr(index_expr)
 | |
|     {
 | |
|     }
 | |
| 
 | |
|     IteratorTuple m_iterators;
 | |
|     IndexExpr m_index_expr;
 | |
| };
 | |
| 
 | |
| /// \internal_
 | |
| #define BOOST_COMPUTE_PRINT_ELEM(z, n, unused)                                 \
 | |
|         BOOST_PP_EXPR_IF(n, << ", ")                                           \
 | |
|         << boost::get<n>(expr.m_iterators)[expr.m_index_expr]
 | |
| 
 | |
| /// \internal_
 | |
| #define BOOST_COMPUTE_PRINT_ZIP_IDX(z, n, unused)                              \
 | |
| template<BOOST_PP_ENUM_PARAMS(n, class Iterator), class IndexExpr>             \
 | |
| inline meta_kernel& operator<<(                                                \
 | |
|         meta_kernel &kernel,                                                   \
 | |
|         const zip_iterator_index_expr<                                         \
 | |
|                   boost::tuple<BOOST_PP_ENUM_PARAMS(n, Iterator)>,             \
 | |
|                   IndexExpr                                                    \
 | |
|               > &expr)                                                         \
 | |
| {                                                                              \
 | |
|     typedef typename                                                           \
 | |
|         boost::tuple<BOOST_PP_ENUM_PARAMS(n, Iterator)>                        \
 | |
|         tuple_type;                                                            \
 | |
|     typedef typename                                                           \
 | |
|         make_zip_iterator_value_type<tuple_type>::type                         \
 | |
|         value_type;                                                            \
 | |
|     kernel.inject_type<value_type>();                                          \
 | |
|     return kernel                                                              \
 | |
|         << "(" << type_name<value_type>() << ")"                               \
 | |
|         << "{ "                                                                \
 | |
|         BOOST_PP_REPEAT(n, BOOST_COMPUTE_PRINT_ELEM, ~)                        \
 | |
|         << "}";                                                                \
 | |
| }
 | |
| 
 | |
| BOOST_PP_REPEAT_FROM_TO(1, BOOST_COMPUTE_MAX_ARITY, BOOST_COMPUTE_PRINT_ZIP_IDX, ~)
 | |
| 
 | |
| #undef BOOST_COMPUTE_PRINT_ZIP_IDX
 | |
| #undef BOOST_COMPUTE_PRINT_ELEM
 | |
| 
 | |
| struct iterator_advancer
 | |
| {
 | |
|     iterator_advancer(size_t n)
 | |
|         : m_distance(n)
 | |
|     {
 | |
|     }
 | |
| 
 | |
|     template<class Iterator>
 | |
|     void operator()(Iterator &i) const
 | |
|     {
 | |
|         std::advance(i, m_distance);
 | |
|     }
 | |
| 
 | |
|     size_t m_distance;
 | |
| };
 | |
| 
 | |
| template<class Iterator>
 | |
| void increment_iterator(Iterator &i)
 | |
| {
 | |
|     i++;
 | |
| }
 | |
| 
 | |
| template<class Iterator>
 | |
| void decrement_iterator(Iterator &i)
 | |
| {
 | |
|     i--;
 | |
| }
 | |
| 
 | |
| } // end detail namespace
 | |
| 
 | |
| /// \class zip_iterator
 | |
| /// \brief A zip iterator adaptor.
 | |
| ///
 | |
| /// The zip_iterator class combines values from multiple input iterators. When
 | |
| /// dereferenced it returns a tuple containing each value at the current
 | |
| /// position in each input range.
 | |
| ///
 | |
| /// \see make_zip_iterator()
 | |
| template<class IteratorTuple>
 | |
| class zip_iterator : public detail::zip_iterator_base<IteratorTuple>::type
 | |
| {
 | |
| public:
 | |
|     typedef typename
 | |
|         detail::zip_iterator_base<IteratorTuple>::type
 | |
|         super_type;
 | |
|     typedef typename super_type::value_type value_type;
 | |
|     typedef typename super_type::reference reference;
 | |
|     typedef typename super_type::difference_type difference_type;
 | |
|     typedef IteratorTuple iterator_tuple;
 | |
| 
 | |
|     zip_iterator(IteratorTuple iterators)
 | |
|         : m_iterators(iterators)
 | |
|     {
 | |
|     }
 | |
| 
 | |
|     zip_iterator(const zip_iterator<IteratorTuple> &other)
 | |
|         : m_iterators(other.m_iterators)
 | |
|     {
 | |
|     }
 | |
| 
 | |
|     zip_iterator<IteratorTuple>&
 | |
|     operator=(const zip_iterator<IteratorTuple> &other)
 | |
|     {
 | |
|         if(this != &other){
 | |
|             super_type::operator=(other);
 | |
| 
 | |
|             m_iterators = other.m_iterators;
 | |
|         }
 | |
| 
 | |
|         return *this;
 | |
|     }
 | |
| 
 | |
|     ~zip_iterator()
 | |
|     {
 | |
|     }
 | |
| 
 | |
|     const IteratorTuple& get_iterator_tuple() const
 | |
|     {
 | |
|         return m_iterators;
 | |
|     }
 | |
| 
 | |
|     template<class IndexExpression>
 | |
|     detail::zip_iterator_index_expr<IteratorTuple, IndexExpression>
 | |
|     operator[](const IndexExpression &expr) const
 | |
|     {
 | |
|         return detail::zip_iterator_index_expr<IteratorTuple,
 | |
|                                                IndexExpression>(m_iterators,
 | |
|                                                                 expr);
 | |
|     }
 | |
| 
 | |
| private:
 | |
|     friend class ::boost::iterator_core_access;
 | |
| 
 | |
|     reference dereference() const
 | |
|     {
 | |
|         return reference();
 | |
|     }
 | |
| 
 | |
|     bool equal(const zip_iterator<IteratorTuple> &other) const
 | |
|     {
 | |
|         return m_iterators == other.m_iterators;
 | |
|     }
 | |
| 
 | |
|     void increment()
 | |
|     {
 | |
|         boost::fusion::for_each(m_iterators, detail::increment_iterator);
 | |
|     }
 | |
| 
 | |
|     void decrement()
 | |
|     {
 | |
|         boost::fusion::for_each(m_iterators, detail::decrement_iterator);
 | |
|     }
 | |
| 
 | |
|     void advance(difference_type n)
 | |
|     {
 | |
|         boost::fusion::for_each(m_iterators, detail::iterator_advancer(n));
 | |
|     }
 | |
| 
 | |
|     difference_type distance_to(const zip_iterator<IteratorTuple> &other) const
 | |
|     {
 | |
|         return std::distance(boost::get<0>(m_iterators),
 | |
|                              boost::get<0>(other.m_iterators));
 | |
|     }
 | |
| 
 | |
| private:
 | |
|     IteratorTuple m_iterators;
 | |
| };
 | |
| 
 | |
| /// Creates a zip_iterator for \p iterators.
 | |
| ///
 | |
| /// \param iterators a tuple of input iterators to zip together
 | |
| ///
 | |
| /// \return a \c zip_iterator for \p iterators
 | |
| ///
 | |
| /// For example, to zip together iterators from three vectors (\c a, \c b, and
 | |
| /// \p c):
 | |
| /// \code
 | |
| /// auto zipped = boost::compute::make_zip_iterator(
 | |
| ///     boost::make_tuple(a.begin(), b.begin(), c.begin())
 | |
| /// );
 | |
| /// \endcode
 | |
| template<class IteratorTuple>
 | |
| inline zip_iterator<IteratorTuple>
 | |
| make_zip_iterator(IteratorTuple iterators)
 | |
| {
 | |
|     return zip_iterator<IteratorTuple>(iterators);
 | |
| }
 | |
| 
 | |
| /// \internal_ (is_device_iterator specialization for zip_iterator)
 | |
| template<class IteratorTuple>
 | |
| struct is_device_iterator<zip_iterator<IteratorTuple> > : boost::true_type {};
 | |
| 
 | |
| namespace detail {
 | |
| 
 | |
| // get<N>() specialization for zip_iterator
 | |
| /// \internal_
 | |
| #define BOOST_COMPUTE_ZIP_GET_N(z, n, unused)                                  \
 | |
| template<size_t N, class IteratorTuple, class IndexExpr,                       \
 | |
|     BOOST_PP_ENUM_PARAMS(n, class T)>                                          \
 | |
| inline meta_kernel&                                                            \
 | |
| operator<<(meta_kernel &kernel,                                                \
 | |
|            const invoked_get<                                                  \
 | |
|                N,                                                              \
 | |
|                zip_iterator_index_expr<IteratorTuple, IndexExpr>,              \
 | |
|                boost::tuple<BOOST_PP_ENUM_PARAMS(n, T)>                        \
 | |
|             > &expr)                                                           \
 | |
| {                                                                              \
 | |
|     typedef typename boost::tuple<BOOST_PP_ENUM_PARAMS(n, T)> Tuple;           \
 | |
|     typedef typename boost::tuples::element<N, Tuple>::type T;                 \
 | |
|     BOOST_STATIC_ASSERT(N < size_t(boost::tuples::length<Tuple>::value));      \
 | |
|     kernel.inject_type<T>();                                                   \
 | |
|     return kernel                                                              \
 | |
|         << boost::get<N>(expr.m_arg.m_iterators)[expr.m_arg.m_index_expr];     \
 | |
| }
 | |
| 
 | |
| BOOST_PP_REPEAT_FROM_TO(1, BOOST_COMPUTE_MAX_ARITY, BOOST_COMPUTE_ZIP_GET_N, ~)
 | |
| 
 | |
| #undef BOOST_COMPUTE_ZIP_GET_N
 | |
| 
 | |
| } // end detail namespace
 | |
| } // end compute namespace
 | |
| } // end boost namespace
 | |
| 
 | |
| #endif // BOOST_COMPUTE_ITERATOR_ZIP_ITERATOR_HPP
 | 
