Chris@16: //  Copyright (c) 2001-2011 Hartmut Kaiser
Chris@16: //  Copyright (c) 2001-2011 Joel de Guzman
Chris@16: //  Copyright (c) 2009 Carl Barron
Chris@16: // 
Chris@16: //  Distributed under the Boost Software License, Version 1.0. (See accompanying 
Chris@16: //  file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: 
Chris@16: #if !defined(BOOST_PP_IS_ITERATING)
Chris@16: 
Chris@16: #if !defined(BOOST_SPIRIT_PARSE_ATTR_APRIL_24_2009_1043AM)
Chris@16: #define BOOST_SPIRIT_PARSE_ATTR_APRIL_24_2009_1043AM
Chris@16: 
Chris@16: #include <boost/spirit/home/qi/parse.hpp>
Chris@16: 
Chris@16: #include <boost/fusion/include/vector.hpp>
Chris@16: #include <boost/preprocessor/cat.hpp>
Chris@16: #include <boost/preprocessor/iterate.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum_params.hpp>
Chris@16: #include <boost/preprocessor/repetition/enum_binary_params.hpp>
Chris@16: 
Chris@16: #define BOOST_PP_FILENAME_1 <boost/spirit/home/qi/parse_attr.hpp>
Chris@16: #define BOOST_PP_ITERATION_LIMITS (2, SPIRIT_ARGUMENTS_LIMIT)
Chris@16: #include BOOST_PP_ITERATE()
Chris@16: 
Chris@16: #endif
Chris@16: 
Chris@16: ///////////////////////////////////////////////////////////////////////////////
Chris@16: //
Chris@16: //  Preprocessor vertical repetition code
Chris@16: //
Chris@16: ///////////////////////////////////////////////////////////////////////////////
Chris@16: #else // defined(BOOST_PP_IS_ITERATING)
Chris@16: 
Chris@16: #define N BOOST_PP_ITERATION()
Chris@16: #define BOOST_SPIRIT_QI_ATTRIBUTE_REFERENCE(z, n, A) BOOST_PP_CAT(A, n)&
Chris@16: 
Chris@16: namespace boost { namespace spirit { namespace qi
Chris@16: {
Chris@16:     ///////////////////////////////////////////////////////////////////////////
Chris@16:     template <typename Iterator, typename Expr
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     parse(
Chris@16:         Iterator& first
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         // Make sure the iterator is at least a forward_iterator. If you got an 
Chris@16:         // compilation error here, then you are using an input_iterator while
Chris@16:         // calling this function, you need to supply at least a 
Chris@16:         // forward_iterator instead.
Chris@16:         BOOST_CONCEPT_ASSERT((ForwardIterator<Iterator>));
Chris@16: 
Chris@16:         // Report invalid expression error as early as possible.
Chris@16:         // If you got an error_invalid_expression error message here,
Chris@16:         // then the expression (expr) is not a valid spirit qi expression.
Chris@16:         BOOST_SPIRIT_ASSERT_MATCH(qi::domain, Expr);
Chris@16: 
Chris@16:         typedef fusion::vector<
Chris@16:             BOOST_PP_ENUM(N, BOOST_SPIRIT_QI_ATTRIBUTE_REFERENCE, A)
Chris@16:         > vector_type;
Chris@16: 
Chris@16:         vector_type lattr (BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:         return compile<qi::domain>(expr).parse(first, last, unused, unused, lattr);
Chris@16:     }
Chris@16: 
Chris@16:     template <typename Iterator, typename Expr
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     parse(
Chris@16:         Iterator const& first_
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         Iterator first = first_;
Chris@16:         return qi::parse(first, last, expr, BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:     }
Chris@16: 
Chris@16:     ///////////////////////////////////////////////////////////////////////////
Chris@16:     template <typename Iterator, typename Expr, typename Skipper
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     phrase_parse(
Chris@16:         Iterator& first
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , Skipper const& skipper
Chris@16:       , BOOST_SCOPED_ENUM(skip_flag) post_skip
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         // Make sure the iterator is at least a forward_iterator. If you got an 
Chris@16:         // compilation error here, then you are using an input_iterator while
Chris@16:         // calling this function, you need to supply at least a 
Chris@16:         // forward_iterator instead.
Chris@16:         BOOST_CONCEPT_ASSERT((ForwardIterator<Iterator>));
Chris@16: 
Chris@16:         // Report invalid expression error as early as possible.
Chris@16:         // If you got an error_invalid_expression error message here,
Chris@16:         // then either the expression (expr) or skipper is not a valid
Chris@16:         // spirit qi expression.
Chris@16:         BOOST_SPIRIT_ASSERT_MATCH(qi::domain, Expr);
Chris@16:         BOOST_SPIRIT_ASSERT_MATCH(qi::domain, Skipper);
Chris@16: 
Chris@16:         typedef
Chris@16:             typename result_of::compile<qi::domain, Skipper>::type
Chris@16:         skipper_type;
Chris@16:         skipper_type const skipper_ = compile<qi::domain>(skipper);
Chris@16: 
Chris@16:         typedef fusion::vector<
Chris@16:             BOOST_PP_ENUM(N, BOOST_SPIRIT_QI_ATTRIBUTE_REFERENCE, A)
Chris@16:         > vector_type;
Chris@16: 
Chris@16:         vector_type lattr (BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:         if (!compile<qi::domain>(expr).parse(
Chris@16:                 first, last, unused, skipper_, lattr))
Chris@16:             return false;
Chris@16: 
Chris@16:         if (post_skip == skip_flag::postskip)
Chris@16:             qi::skip_over(first, last, skipper_);
Chris@16:         return true;
Chris@16:     }
Chris@16: 
Chris@16:     template <typename Iterator, typename Expr, typename Skipper
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     phrase_parse(
Chris@16:         Iterator const& first_
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , Skipper const& skipper
Chris@16:       , BOOST_SCOPED_ENUM(skip_flag) post_skip
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         Iterator first = first_;
Chris@16:         return qi::phrase_parse(first, last, expr, skipper, post_skip
Chris@16:           , BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:     }
Chris@16: 
Chris@16:     ///////////////////////////////////////////////////////////////////////////
Chris@16:     template <typename Iterator, typename Expr, typename Skipper
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     phrase_parse(
Chris@16:         Iterator& first
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , Skipper const& skipper
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         return qi::phrase_parse(first, last, expr, skipper, skip_flag::postskip
Chris@16:           , BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:     }
Chris@16: 
Chris@16:     template <typename Iterator, typename Expr, typename Skipper
Chris@16:       , BOOST_PP_ENUM_PARAMS(N, typename A)>
Chris@16:     inline bool
Chris@16:     phrase_parse(
Chris@16:         Iterator const& first_
Chris@16:       , Iterator last
Chris@16:       , Expr const& expr
Chris@16:       , Skipper const& skipper
Chris@16:       , BOOST_PP_ENUM_BINARY_PARAMS(N, A, & attr))
Chris@16:     {
Chris@16:         Iterator first = first_;
Chris@16:         return qi::phrase_parse(first, last, expr, skipper, skip_flag::postskip
Chris@16:           , BOOST_PP_ENUM_PARAMS(N, attr));
Chris@16:     }
Chris@16: }}}
Chris@16: 
Chris@16: #undef BOOST_SPIRIT_QI_ATTRIBUTE_REFERENCE
Chris@16: #undef N
Chris@16: 
Chris@16: #endif
Chris@16: