comparison DEPENDENCIES/generic/include/boost/spirit/home/karma/directive/columns.hpp @ 16:2665513ce2d3

Add boost headers
author Chris Cannam
date Tue, 05 Aug 2014 11:11:38 +0100
parents
children c530137014c0
comparison
equal deleted inserted replaced
15:663ca0da4350 16:2665513ce2d3
1 // Copyright (c) 2001-2011 Hartmut Kaiser
2 //
3 // Distributed under the Boost Software License, Version 1.0. (See accompanying
4 // file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
5
6 #if !defined(BOOST_SPIRIT_KARMA_COLUMNS_DEC_03_2009_0736AM)
7 #define BOOST_SPIRIT_KARMA_COLUMNS_DEC_03_2009_0736AM
8
9 #if defined(_MSC_VER)
10 #pragma once
11 #endif
12
13 #include <boost/spirit/home/karma/meta_compiler.hpp>
14 #include <boost/spirit/home/karma/generator.hpp>
15 #include <boost/spirit/home/karma/domain.hpp>
16 #include <boost/spirit/home/karma/delimit_out.hpp>
17 #include <boost/spirit/home/karma/detail/default_width.hpp>
18 #include <boost/spirit/home/karma/auxiliary/eol.hpp>
19 #include <boost/spirit/home/karma/auxiliary/lazy.hpp>
20 #include <boost/spirit/home/support/unused.hpp>
21 #include <boost/spirit/home/support/common_terminals.hpp>
22 #include <boost/spirit/home/support/has_semantic_action.hpp>
23 #include <boost/spirit/home/support/handles_container.hpp>
24 #include <boost/spirit/home/karma/detail/attributes.hpp>
25 #include <boost/spirit/home/support/info.hpp>
26 #include <boost/fusion/include/at.hpp>
27 #include <boost/fusion/include/vector.hpp>
28
29 namespace boost { namespace spirit
30 {
31 ///////////////////////////////////////////////////////////////////////////
32 // Enablers
33 ///////////////////////////////////////////////////////////////////////////
34 template <>
35 struct use_directive<karma::domain, tag::columns> // enables columns[]
36 : mpl::true_ {};
37
38 // enables columns(c)[g], where c provides the number of require columns
39 template <typename T>
40 struct use_directive<karma::domain
41 , terminal_ex<tag::columns, fusion::vector1<T> > >
42 : mpl::true_ {};
43
44 // enables *lazy* columns(c)[g]
45 template <>
46 struct use_lazy_directive<karma::domain, tag::columns, 1>
47 : mpl::true_ {};
48
49 // enables columns(c, d)[g], where c provides the number of require columns
50 // and d is the custom column-delimiter (default is karma::endl)
51 template <typename T1, typename T2>
52 struct use_directive<karma::domain
53 , terminal_ex<tag::columns, fusion::vector2<T1, T2> > >
54 : boost::spirit::traits::matches<karma::domain, T2> {};
55
56 // enables *lazy* columns(c, d)[g]
57 template <>
58 struct use_lazy_directive<karma::domain, tag::columns, 2>
59 : mpl::true_ {};
60
61 }}
62
63 namespace boost { namespace spirit { namespace karma
64 {
65 #ifndef BOOST_SPIRIT_NO_PREDEFINED_TERMINALS
66 using spirit::columns;
67 #endif
68 using spirit::columns_type;
69
70 namespace detail
71 {
72 template <typename Delimiter, typename ColumnDelimiter>
73 struct columns_delimiter
74 {
75 columns_delimiter(Delimiter const& delim
76 , ColumnDelimiter const& cdelim, unsigned int const numcols)
77 : delimiter(delim), column_delimiter(cdelim)
78 , numcolumns(numcols), count(0) {}
79
80 template <typename OutputIterator, typename Context
81 , typename Delimiter_, typename Attribute>
82 bool generate(OutputIterator& sink, Context&, Delimiter_ const&
83 , Attribute const&) const
84 {
85 // first invoke the embedded delimiter
86 if (!karma::delimit_out(sink, delimiter))
87 return false;
88
89 // now we count the number of invocations and emit the column
90 // delimiter if needed
91 if ((++count % numcolumns) == 0)
92 return karma::delimit_out(sink, column_delimiter);
93 return true;
94 }
95
96 // generate a final column delimiter if the last invocation didn't
97 // emit one
98 template <typename OutputIterator>
99 bool delimit_out(OutputIterator& sink) const
100 {
101 if (count % numcolumns)
102 return karma::delimit_out(sink, column_delimiter);
103 return true;
104 }
105
106 Delimiter const& delimiter;
107 ColumnDelimiter const& column_delimiter;
108 unsigned int const numcolumns;
109 mutable unsigned int count;
110
111 private:
112 // silence MSVC warning C4512: assignment operator could not be generated
113 columns_delimiter& operator= (columns_delimiter const&);
114 };
115 }
116
117 ///////////////////////////////////////////////////////////////////////////
118 // The columns_generator is used for columns(c, d)[...] directives.
119 ///////////////////////////////////////////////////////////////////////////
120 template <typename Subject, typename NumColumns, typename ColumnsDelimiter>
121 struct columns_generator
122 : unary_generator<columns_generator<Subject, NumColumns, ColumnsDelimiter> >
123 {
124 typedef Subject subject_type;
125 typedef ColumnsDelimiter delimiter_type;
126
127 typedef mpl::int_<
128 subject_type::properties::value | delimiter_type::properties::value
129 > properties;
130
131 template <typename Context, typename Iterator>
132 struct attribute
133 : traits::attribute_of<subject_type, Context, Iterator>
134 {};
135
136 columns_generator(Subject const& subject, NumColumns const& cols
137 , ColumnsDelimiter const& cdelimiter)
138 : subject(subject), numcolumns(cols), column_delimiter(cdelimiter)
139 {
140 // having zero number of columns doesn't make any sense
141 BOOST_ASSERT(numcolumns > 0);
142 }
143
144 template <typename OutputIterator, typename Context
145 , typename Delimiter, typename Attribute>
146 bool generate(OutputIterator& sink, Context& ctx
147 , Delimiter const& delimiter, Attribute const& attr) const
148 {
149 // The columns generator dispatches to the embedded generator
150 // while supplying a new delimiter to use, wrapping the outer
151 // delimiter.
152 typedef detail::columns_delimiter<
153 Delimiter, ColumnsDelimiter
154 > columns_delimiter_type;
155
156 columns_delimiter_type d(delimiter, column_delimiter, numcolumns);
157 return subject.generate(sink, ctx, d, attr) && d.delimit_out(sink);
158 }
159
160 template <typename Context>
161 info what(Context& context) const
162 {
163 return info("columns", subject.what(context));
164 }
165
166 Subject subject;
167 NumColumns numcolumns;
168 ColumnsDelimiter column_delimiter;
169 };
170
171 ///////////////////////////////////////////////////////////////////////////
172 // Generator generators: make_xxx function (objects)
173 ///////////////////////////////////////////////////////////////////////////
174
175 // creates columns[] directive
176 template <typename Subject, typename Modifiers>
177 struct make_directive<tag::columns, Subject, Modifiers>
178 {
179 typedef typename
180 result_of::compile<karma::domain, eol_type, Modifiers>::type
181 columns_delimiter_type;
182 typedef columns_generator<
183 Subject, detail::default_columns, columns_delimiter_type>
184 result_type;
185
186 result_type operator()(unused_type, Subject const& subject
187 , unused_type) const
188 {
189 #if defined(BOOST_SPIRIT_NO_PREDEFINED_TERMINALS)
190 eol_type const eol = eol_type();
191 #endif
192 return result_type(subject, detail::default_columns()
193 , compile<karma::domain>(eol));
194 }
195 };
196
197 // creates columns(c)[] directive generator (c is the number of columns)
198 template <typename T, typename Subject, typename Modifiers>
199 struct make_directive<
200 terminal_ex<tag::columns, fusion::vector1<T> >
201 , Subject, Modifiers
202 , typename enable_if_c<integer_traits<T>::is_integral>::type>
203 {
204 typedef typename
205 result_of::compile<karma::domain, eol_type, Modifiers>::type
206 columns_delimiter_type;
207 typedef columns_generator<
208 Subject, T, columns_delimiter_type
209 > result_type;
210
211 template <typename Terminal>
212 result_type operator()(Terminal const& term, Subject const& subject
213 , unused_type) const
214 {
215 #if defined(BOOST_SPIRIT_NO_PREDEFINED_TERMINALS)
216 eol_type const eol = eol_type();
217 #endif
218 return result_type(subject, fusion::at_c<0>(term.args)
219 , compile<karma::domain>(eol));
220 }
221 };
222
223 // creates columns(d)[] directive generator (d is the column delimiter)
224 template <typename T, typename Subject, typename Modifiers>
225 struct make_directive<
226 terminal_ex<tag::columns, fusion::vector1<T> >
227 , Subject, Modifiers
228 , typename enable_if<
229 mpl::and_<
230 spirit::traits::matches<karma::domain, T>,
231 mpl::not_<mpl::bool_<integer_traits<T>::is_integral> >
232 >
233 >::type>
234 {
235 typedef typename
236 result_of::compile<karma::domain, T, Modifiers>::type
237 columns_delimiter_type;
238 typedef columns_generator<
239 Subject, detail::default_columns, columns_delimiter_type
240 > result_type;
241
242 template <typename Terminal>
243 result_type operator()(Terminal const& term, Subject const& subject
244 , unused_type) const
245 {
246 return result_type(subject, detail::default_columns()
247 , compile<karma::domain>(fusion::at_c<0>(term.args)));
248 }
249 };
250
251 // creates columns(c, d)[] directive generator (c is the number of columns
252 // and d is the column delimiter)
253 template <typename T1, typename T2, typename Subject, typename Modifiers>
254 struct make_directive<
255 terminal_ex<tag::columns, fusion::vector2<T1, T2> >
256 , Subject, Modifiers>
257 {
258 typedef typename
259 result_of::compile<karma::domain, T2, Modifiers>::type
260 columns_delimiter_type;
261 typedef columns_generator<
262 Subject, T1, columns_delimiter_type
263 > result_type;
264
265 template <typename Terminal>
266 result_type operator()(Terminal const& term, Subject const& subject
267 , unused_type) const
268 {
269 return result_type (subject, fusion::at_c<0>(term.args)
270 , compile<karma::domain>(fusion::at_c<1>(term.args)));
271 }
272 };
273
274 }}}
275
276 namespace boost { namespace spirit { namespace traits
277 {
278 ///////////////////////////////////////////////////////////////////////////
279 template <typename Subject, typename T1, typename T2>
280 struct has_semantic_action<karma::columns_generator<Subject, T1, T2> >
281 : unary_has_semantic_action<Subject> {};
282
283 ///////////////////////////////////////////////////////////////////////////
284 template <typename Subject, typename T1, typename T2, typename Attribute
285 , typename Context, typename Iterator>
286 struct handles_container<
287 karma::columns_generator<Subject, T1, T2>, Attribute
288 , Context, Iterator>
289 : unary_handles_container<Subject, Attribute, Context, Iterator> {};
290 }}}
291
292 #endif