You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and dots ('.'), can be up to 35 characters long. Letters must be lowercase.
318 lines
12 KiB
318 lines
12 KiB
// Copyright (c) 2001-2011 Hartmut Kaiser |
|
// |
|
// 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) |
|
|
|
#if !defined(BOOST_SPIRIT_KARMA_LEFT_ALIGNMENT_FEB_27_2007_1216PM) |
|
#define BOOST_SPIRIT_KARMA_LEFT_ALIGNMENT_FEB_27_2007_1216PM |
|
|
|
#if defined(_MSC_VER) |
|
#pragma once |
|
#endif |
|
|
|
#include <boost/spirit/home/karma/meta_compiler.hpp> |
|
#include <boost/spirit/home/karma/generator.hpp> |
|
#include <boost/spirit/home/karma/domain.hpp> |
|
#include <boost/spirit/home/karma/detail/output_iterator.hpp> |
|
#include <boost/spirit/home/karma/detail/default_width.hpp> |
|
#include <boost/spirit/home/karma/delimit_out.hpp> |
|
#include <boost/spirit/home/karma/auxiliary/lazy.hpp> |
|
#include <boost/spirit/home/support/unused.hpp> |
|
#include <boost/spirit/home/support/common_terminals.hpp> |
|
#include <boost/spirit/home/karma/detail/attributes.hpp> |
|
#include <boost/spirit/home/support/info.hpp> |
|
#include <boost/spirit/home/support/unused.hpp> |
|
#include <boost/spirit/home/support/has_semantic_action.hpp> |
|
#include <boost/spirit/home/support/handles_container.hpp> |
|
#include <boost/fusion/include/at.hpp> |
|
#include <boost/fusion/include/vector.hpp> |
|
#include <boost/lexical_cast.hpp> |
|
#include <boost/integer_traits.hpp> |
|
#include <boost/mpl/bool.hpp> |
|
#include <boost/utility/enable_if.hpp> |
|
#include <boost/detail/workaround.hpp> |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
namespace boost { namespace spirit |
|
{ |
|
/////////////////////////////////////////////////////////////////////////// |
|
// Enablers |
|
/////////////////////////////////////////////////////////////////////////// |
|
|
|
// enables left_align[] |
|
template <> |
|
struct use_directive<karma::domain, tag::left_align> |
|
: mpl::true_ {}; |
|
|
|
// enables left_align(d)[g] and left_align(w)[g], where d is a generator |
|
// and w is a maximum width |
|
template <typename T> |
|
struct use_directive<karma::domain |
|
, terminal_ex<tag::left_align, fusion::vector1<T> > > |
|
: mpl::true_ {}; |
|
|
|
// enables *lazy* left_align(d)[g], where d provides a generator |
|
template <> |
|
struct use_lazy_directive<karma::domain, tag::left_align, 1> |
|
: mpl::true_ {}; |
|
|
|
// enables left_align(w, d)[g], where d is a generator and w is a maximum |
|
// width |
|
template <typename Width, typename Padding> |
|
struct use_directive<karma::domain |
|
, terminal_ex<tag::left_align, fusion::vector2<Width, Padding> > > |
|
: spirit::traits::matches<karma::domain, Padding> {}; |
|
|
|
// enables *lazy* left_align(w, d)[g], where d provides a generator and w |
|
// is a maximum width |
|
template <> |
|
struct use_lazy_directive<karma::domain, tag::left_align, 2> |
|
: mpl::true_ {}; |
|
|
|
}} |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
namespace boost { namespace spirit { namespace karma |
|
{ |
|
#ifndef BOOST_SPIRIT_NO_PREDEFINED_TERMINALS |
|
using spirit::left_align; |
|
#endif |
|
using spirit::left_align_type; |
|
|
|
namespace detail |
|
{ |
|
/////////////////////////////////////////////////////////////////////// |
|
// The left_align_generate template function is used for all the |
|
// different flavors of the left_align[] directive. |
|
/////////////////////////////////////////////////////////////////////// |
|
template <typename OutputIterator, typename Context, typename Delimiter, |
|
typename Attribute, typename Embedded, typename Padding> |
|
inline static bool |
|
left_align_generate(OutputIterator& sink, Context& ctx, |
|
Delimiter const& d, Attribute const& attr, Embedded const& e, |
|
unsigned int const width, Padding const& p) |
|
{ |
|
#if BOOST_WORKAROUND(BOOST_MSVC, BOOST_TESTED_AT(1600)) |
|
e; // suppresses warning: C4100: 'e' : unreferenced formal parameter |
|
#endif |
|
// wrap the given output iterator to allow counting |
|
detail::enable_counting<OutputIterator> counting(sink); |
|
|
|
// first generate the underlying output |
|
bool r = e.generate(sink, ctx, d, attr); |
|
|
|
// pad the output until the max width is reached |
|
while(r && counting.count() < width) |
|
r = p.generate(sink, ctx, unused, unused); |
|
|
|
return r; |
|
} |
|
} |
|
|
|
/////////////////////////////////////////////////////////////////////////// |
|
// The simple left alignment directive is used for left_align[...] |
|
// generators. It uses default values for the generated width (defined via |
|
// the BOOST_KARMA_DEFAULT_FIELD_LENGTH constant) and for the padding |
|
// generator (always spaces). |
|
/////////////////////////////////////////////////////////////////////////// |
|
template <typename Subject, typename Width = detail::default_width> |
|
struct simple_left_alignment |
|
: unary_generator<simple_left_alignment<Subject, Width> > |
|
{ |
|
typedef Subject subject_type; |
|
|
|
typedef mpl::int_< |
|
generator_properties::counting | subject_type::properties::value |
|
> properties; |
|
|
|
template <typename Context, typename Iterator> |
|
struct attribute |
|
: traits::attribute_of<subject_type, Context, Iterator> |
|
{}; |
|
|
|
simple_left_alignment(Subject const& subject, Width width = Width()) |
|
: subject(subject), width(width) {} |
|
|
|
template <typename OutputIterator, typename Context, typename Delimiter |
|
, typename Attribute> |
|
bool generate(OutputIterator& sink, Context& ctx, Delimiter const& d |
|
, Attribute const& attr) const |
|
{ |
|
return detail::left_align_generate(sink, ctx, d, attr, |
|
subject, width, compile<karma::domain>(' ')); |
|
} |
|
|
|
template <typename Context> |
|
info what(Context& context) const |
|
{ |
|
return info("left_align", subject.what(context)); |
|
} |
|
|
|
Subject subject; |
|
Width width; |
|
}; |
|
|
|
/////////////////////////////////////////////////////////////////////////// |
|
// The left alignment directive with padding, is used for generators like |
|
// left_align(padding)[...], where padding is a arbitrary generator |
|
// expression. It uses a default value for the generated width (defined |
|
// via the BOOST_KARMA_DEFAULT_FIELD_LENGTH constant). |
|
/////////////////////////////////////////////////////////////////////////// |
|
template <typename Subject, typename Padding |
|
, typename Width = detail::default_width> |
|
struct padding_left_alignment |
|
: unary_generator<padding_left_alignment<Subject, Padding, Width> > |
|
{ |
|
typedef Subject subject_type; |
|
typedef Padding padding_type; |
|
|
|
typedef mpl::int_< |
|
generator_properties::counting | |
|
subject_type::properties::value | padding_type::properties::value |
|
> properties; |
|
|
|
template <typename Context, typename Iterator> |
|
struct attribute |
|
: traits::attribute_of<subject_type, Context, Iterator> |
|
{}; |
|
|
|
padding_left_alignment(Subject const& subject, Padding const& padding |
|
, Width width = Width()) |
|
: subject(subject), padding(padding), width(width) {} |
|
|
|
template <typename OutputIterator, typename Context, typename Delimiter |
|
, typename Attribute> |
|
bool generate(OutputIterator& sink, Context& ctx, Delimiter const& d |
|
, Attribute const& attr) const |
|
{ |
|
return detail::left_align_generate(sink, ctx, d, attr, |
|
subject, width, padding); |
|
} |
|
|
|
template <typename Context> |
|
info what(Context& context) const |
|
{ |
|
return info("left_align", subject.what(context)); |
|
} |
|
|
|
Subject subject; |
|
Padding padding; |
|
Width width; |
|
}; |
|
|
|
/////////////////////////////////////////////////////////////////////////// |
|
// Generator generators: make_xxx function (objects) |
|
/////////////////////////////////////////////////////////////////////////// |
|
|
|
// creates left_align[] directive generator |
|
template <typename Subject, typename Modifiers> |
|
struct make_directive<tag::left_align, Subject, Modifiers> |
|
{ |
|
typedef simple_left_alignment<Subject> result_type; |
|
result_type operator()(unused_type, Subject const& subject |
|
, unused_type) const |
|
{ |
|
return result_type(subject); |
|
} |
|
}; |
|
|
|
// creates left_align(width)[] directive generator |
|
template <typename Width, typename Subject, typename Modifiers> |
|
struct make_directive< |
|
terminal_ex<tag::left_align, fusion::vector1<Width> > |
|
, Subject, Modifiers |
|
, typename enable_if_c< integer_traits<Width>::is_integral >::type> |
|
{ |
|
typedef simple_left_alignment<Subject, Width> result_type; |
|
|
|
template <typename Terminal> |
|
result_type operator()(Terminal const& term, Subject const& subject |
|
, unused_type) const |
|
{ |
|
return result_type(subject, fusion::at_c<0>(term.args)); |
|
} |
|
}; |
|
|
|
// creates left_align(pad)[] directive generator |
|
template <typename Padding, typename Subject, typename Modifiers> |
|
struct make_directive< |
|
terminal_ex<tag::left_align, fusion::vector1<Padding> > |
|
, Subject, Modifiers |
|
, typename enable_if< |
|
mpl::and_< |
|
spirit::traits::matches<karma::domain, Padding>, |
|
mpl::not_<mpl::bool_<integer_traits<Padding>::is_integral> > |
|
> |
|
>::type> |
|
{ |
|
typedef typename |
|
result_of::compile<karma::domain, Padding, Modifiers>::type |
|
padding_type; |
|
|
|
typedef padding_left_alignment<Subject, padding_type> result_type; |
|
|
|
template <typename Terminal> |
|
result_type operator()(Terminal const& term, Subject const& subject |
|
, Modifiers const& modifiers) const |
|
{ |
|
return result_type(subject |
|
, compile<karma::domain>(fusion::at_c<0>(term.args), modifiers)); |
|
} |
|
}; |
|
|
|
// creates left_align(width, pad)[] directive generator |
|
template <typename Width, typename Padding, typename Subject |
|
, typename Modifiers> |
|
struct make_directive< |
|
terminal_ex<tag::left_align, fusion::vector2<Width, Padding> > |
|
, Subject, Modifiers> |
|
{ |
|
typedef typename |
|
result_of::compile<karma::domain, Padding, Modifiers>::type |
|
padding_type; |
|
|
|
typedef padding_left_alignment<Subject, padding_type, Width> result_type; |
|
|
|
template <typename Terminal> |
|
result_type operator()(Terminal const& term, Subject const& subject |
|
, unused_type) const |
|
{ |
|
return result_type(subject |
|
, compile<karma::domain>(fusion::at_c<1>(term.args)) |
|
, fusion::at_c<0>(term.args)); |
|
} |
|
}; |
|
|
|
}}} // namespace boost::spirit::karma |
|
|
|
namespace boost { namespace spirit { namespace traits |
|
{ |
|
/////////////////////////////////////////////////////////////////////////// |
|
template <typename Subject, typename Width> |
|
struct has_semantic_action<karma::simple_left_alignment<Subject, Width> > |
|
: unary_has_semantic_action<Subject> {}; |
|
|
|
template <typename Subject, typename Padding, typename Width> |
|
struct has_semantic_action< |
|
karma::padding_left_alignment<Subject, Padding, Width> > |
|
: unary_has_semantic_action<Subject> {}; |
|
|
|
/////////////////////////////////////////////////////////////////////////// |
|
template <typename Subject, typename Width, typename Attribute |
|
, typename Context, typename Iterator> |
|
struct handles_container< |
|
karma::simple_left_alignment<Subject, Width>, Attribute |
|
, Context, Iterator> |
|
: unary_handles_container<Subject, Attribute, Context, Iterator> {}; |
|
|
|
template <typename Subject, typename Padding, typename Width |
|
, typename Attribute, typename Context, typename Iterator> |
|
struct handles_container< |
|
karma::padding_left_alignment<Subject, Padding, Width> |
|
, Attribute, Context, Iterator> |
|
: unary_handles_container<Subject, Attribute, Context, Iterator> {}; |
|
}}} |
|
|
|
#endif |
|
|
|
|
|
|