ceph/src/boost/libs/spirit/test/qi/omit.cpp

   1 /*=============================================================================
   2     Copyright (c) 2001-2011 Joel de Guzman
   3
   4     Distributed under the Boost Software License, Version 1.0. (See accompanying
   5     file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
   6 =============================================================================*/
   7 #include <boost/detail/lightweight_test.hpp>
   8 #include <boost/spirit/include/qi_operator.hpp>
   9 #include <boost/spirit/include/qi_char.hpp>
  10 #include <boost/spirit/include/qi_string.hpp>
  11 #include <boost/spirit/include/qi_directive.hpp>
  12 #include <boost/spirit/include/qi_numeric.hpp>
  13 #include <boost/spirit/include/qi_action.hpp>
  14 #include <boost/spirit/include/support_argument.hpp>
  15 #include <boost/spirit/include/phoenix_core.hpp>
  16 #include <boost/spirit/include/phoenix_operator.hpp>
  17
  18 #include <string>
  19 #include <iostream>
  20 #include "test.hpp"
  21
  22 int
  23 main()
  24 {
  25     using namespace boost::spirit::ascii;
  26     using boost::spirit::qi::omit;
  27     using boost::spirit::qi::unused_type;
  28     using boost::spirit::qi::unused;
  29     using boost::spirit::qi::int_;
  30     using boost::spirit::qi::_1;
  31
  32     using boost::fusion::vector;
  33     using boost::fusion::at_c;
  34
  35     using spirit_test::test;
  36     using spirit_test::test_attr;
  37
  38     {
  39         BOOST_TEST(test("a", omit['a']));
  40     }
  41
  42     {
  43         // omit[] means we don't receive the attribute
  44         char attr;
  45         BOOST_TEST((test_attr("abc", omit[char_] >> omit['b'] >> char_, attr)));
  46         BOOST_TEST((attr == 'c'));
  47     }
  48
  49     {
  50         // If all elements except 1 is omitted, the attribute is
  51         // a single-element sequence. For this case alone, we allow
  52         // naked attributes (unwrapped in a fusion sequence).
  53         char attr;
  54         BOOST_TEST((test_attr("abc", omit[char_] >> 'b' >> char_, attr)));
  55         BOOST_TEST((attr == 'c'));
  56     }
  57
  58     {
  59         // omit[] means we don't receive the attribute
  60         vector<> attr;
  61         BOOST_TEST((test_attr("abc", omit[char_] >> omit['b'] >> omit[char_], attr)));
  62     }
  63
  64     {
  65         // omit[] means we don't receive the attribute
  66         // this test is merely a compile test, because using a unused as the
  67         // explicit attribute doesn't make any sense
  68         unused_type attr;
  69         BOOST_TEST((test_attr("abc", omit[char_ >> 'b' >> char_], attr)));
  70     }
  71
  72     {
  73         // omit[] means we don't receive the attribute, if all elements of a
  74         // sequence have unused attributes, the whole sequence has an unused
  75         // attribute as well
  76         vector<char, char> attr;
  77         BOOST_TEST((test_attr("abcde",
  78             char_ >> (omit[char_] >> omit['c'] >> omit[char_]) >> char_, attr)));
  79         BOOST_TEST((at_c<0>(attr) == 'a'));
  80         BOOST_TEST((at_c<1>(attr) == 'e'));
  81     }
  82
  83     {
  84         // "hello" has an unused_type. unused attrubutes are not part of the sequence
  85         vector<char, char> attr;
  86         BOOST_TEST((test_attr("a hello c", char_ >> "hello" >> char_, attr, space)));
  87         BOOST_TEST((at_c<0>(attr) == 'a'));
  88         BOOST_TEST((at_c<1>(attr) == 'c'));
  89     }
  90
  91     {
  92         // if only one node in a sequence is left (all the others are omitted),
  93         // then we need "naked" attributes (not wraped in a tuple)
  94         int attr;
  95         BOOST_TEST((test_attr("a 123 c", omit['a'] >> int_ >> omit['c'], attr, space)));
  96         BOOST_TEST((attr == 123));
  97     }
  98
  99     {
 100         // unused means we don't care about the attribute
 101         BOOST_TEST((test_attr("abc", char_ >> 'b' >> char_, unused)));
 102     }
 103
 104     {   // test action with omitted attribute
 105         char c = 0;
 106
 107         using boost::phoenix::ref;
 108
 109         BOOST_TEST(test("x123\"a string\"", (char_ >> omit[int_] >> "\"a string\"")
 110             [ref(c) = _1]));
 111         BOOST_TEST(c == 'x');
 112     }
 113
 114
 115     {   // test action with omitted attribute
 116         int n = 0;
 117
 118         using boost::phoenix::ref;
 119
 120         BOOST_TEST(test("x 123 \"a string\"",
 121             (omit[char_] >> int_ >> "\"a string\"")[ref(n) = _1], space));
 122         BOOST_TEST(n == 123);
 123     }
 124
 125     return boost::report_errors();
 126 }
 127