// Custom includes
#include <vector>
-#include <boost/regex.hpp>
#include <boost/spirit.hpp>
#include <boost/spirit/utility/grammar_def.hpp>
-#include <boost/spirit/actor.hpp>
-#include <boost/bind.hpp>
-#include <boost/function.hpp>
-#include <boost/ref.hpp>
+#include <boost/spirit/dynamic.hpp>
+#include <boost/spirit/phoenix.hpp>
+#include "../Utils/Phoenix.hh"
///////////////////////////////ih.p////////////////////////////////////////
#ifndef DOXYGEN
///////////////////////////////////////////////////////////////////////////
- // append_a
-
- struct append_action
- {
- template <class T, class Value>
- void act(T & ref, Value const & value) const
- { ref += T(1, value); }
-
- template <class T, class Iterator>
- void act(T & ref, Iterator const & f, Iterator const & l) const
- { ref += T(f,l); }
- };
-
- template <class T>
- inline boost::spirit::ref_value_actor<T, append_action>
- append_a(T & ref)
- { return boost::spirit::ref_value_actor<T, append_action>(ref); }
-
- template <class T, class Value>
- inline boost::spirit::ref_const_ref_actor<T, Value, append_action>
- append_a(T & ref, Value const & value)
- { return boost::spirit::ref_const_ref_actor<T, Value, append_action>(ref, value); }
-
- ///////////////////////////////////////////////////////////////////////////
// Grammar
template <class ParseDispatcher>
///////////////////////////////////////////////////////////////////////////
// Start rules
- enum { CommandParser, SkipParser };
+ enum { CommandParser, SkipParser, ArgumentsParser };
///////////////////////////////////////////////////////////////////////////
// The parse context (variables needed while parsing)
std::vector<Token> path;
char ch;
Token token;
-
- // OUCH ... This is sooooo stupid .. push_back_a and assign_a take their
- // arguments by const-reference and STORE the REFERENCE ... they do NOT accept
- // literal values !!!!!!
- static const Token EmptyToken;
};
Context & context;
///////////////////////////////////////////////////////////////////////////
- // Dispatching semantic actions
-
- ParseDispatcher & dispatcher;
-
- struct Dispatch_actor
- {
- Dispatch_actor(boost::function<void ()> fn_) : fn (fn_) {}
-
- template <class Value>
- void operator()(Value const & value) const
- { fn(); }
-
- template <class Iterator>
- void operator()(Iterator const & f, Iterator const & l) const
- { fn(); }
-
- boost::function<void ()> fn;
- };
-
- template <class Callback>
- Dispatch_actor dispatch(Callback cb) const
- { return Dispatch_actor(boost::bind(cb, boost::ref(dispatcher))); }
-
- template <class Callback, class Arg>
- Dispatch_actor dispatch(Callback cb, Arg const & arg) const
- { return Dispatch_actor(boost::bind(cb, boost::ref(dispatcher), arg)); }
-
- template <class Callback, class Arg1, class Arg2>
- Dispatch_actor dispatch(Callback cb, Arg1 const & arg1, Arg2 const & arg2) const
- { return Dispatch_actor(boost::bind(cb, boost::ref(dispatcher), arg1, arg2)); }
-
- struct TokenSetter_actor
- {
- TokenSetter_actor(Context & c, TokenType t) : c_ (c), t_ (t) {}
-
- void operator()(std::string const & value) const
- { c_.token = Token(t_, value); }
- void operator()(char value) const
- { c_.token = Token(t_, std::string(1,value)); }
- template <class Iterator> void operator()(Iterator const & f, Iterator const & l) const
- { c_.token = Token(t_, std::string(f,l)); }
-
- Context & c_;
- TokenType t_;
- };
+ // Configuration
- struct TokenSetter_value_actor
- : public TokenSetter_actor
- {
- TokenSetter_value_actor(Context & c, TokenType t, std::string & v)
- : TokenSetter_actor(c,t), v_ (v) {}
-
- template <class Value> void operator()(Value const &) const
- { TokenSetter_actor::operator()(v_); }
-
- template <class Iterator> void operator()(Iterator const &, Iterator const &) const
- { TokenSetter_actor::operator()(v_); }
+ bool incremental;
- std::string & v_;
- };
-
- TokenSetter_actor set_token_a(TokenType t) const
- { return TokenSetter_actor(context, t); }
+ ///////////////////////////////////////////////////////////////////////////
+ // Dispatching semantic actions
- TokenSetter_value_actor set_token_a(TokenType t, std::string & arg) const
- { return TokenSetter_value_actor(context, t, arg); }
+ ParseDispatcher & dispatcher;
///////////////////////////////////////////////////////////////////////////
CommandGrammar(ParseDispatcher & d, Context & c)
- : context(c), dispatcher(d) {}
+ : context(c), incremental(false), dispatcher(d) {}
template <class Scanner>
struct definition
: public boost::spirit::grammar_def< boost::spirit::rule<Scanner>,
+ boost::spirit::rule<Scanner>,
boost::spirit::rule<Scanner> >
{
boost::spirit::rule<Scanner> command, path, argument, word, string, hexstring, token,
punctuation, hexbyte, balanced_tokens, simple_argument, complex_argument, builtin,
- skip, commands, block, statement, relpath, abspath;
+ skip, statement, relpath, abspath, arguments, group_start, group_close,
+ statement_end;
boost::spirit::chset<> special_p, punctuation_p, space_p, invalid_p, word_p;
boost::spirit::distinct_parser<> keyword_p;
{
using namespace boost::spirit;
+ using namespace ::phoenix;
+ using namespace senf::phoenix;
typedef ParseDispatcher PD;
- typedef Token AT;
+
+ actor< variable< char > > ch_ (self.context.ch);
+ actor< variable< std::string > > str_ (self.context.str);
+ actor< variable< std::vector<Token> > > path_ (self.context.path);
+ actor< variable< Token > > token_ (self.context.token);
+ actor< variable< ParseDispatcher > > d_ (self.dispatcher);
///////////////////////////////////////////////////////////////////
// Spirit grammar
// Syntax summary:
// This is EBNF with some minor tweaks to accommodate C++ syntax
//
- // * and + like EBNF but they precede their argument
- // >> is followed by
- // ! optional
- // a % b match any number of a's separated by b
- // a - b match a but not b
+ // * a any number of a's
+ // + a at least one a
+ // ! a an optional a
+ // a >> b a followed by b
+ // a | b a or b
+ // a % b any number of a's separated by b's
+ // a - b a but not b
//
// Beside this, we use some special parsers (ch_p, eps_p, confix_p, lex_escape_ch_p,
// keyword_p, comment_p) and directives (lexeme_d), however, the parser should be
//
// More info is in the Boost.Spirit documentation
- commands
- = * command
- ;
-
command
- = builtin >> (ch_p(';') | end_p)
- | path >> ( block | statement )
+ = builtin >> statement_end
+ | path >> ( group_start | statement )
+ | group_close
| ch_p(';') // Ignore empty commands
;
builtin
= keyword_p("cd")
>> path
- >> eps_p [ self.dispatch(&PD::builtin_cd,
- boost::ref(self.context.path)) ]
+ >> eps_p [ bind(&PD::builtin_cd)(d_, path_) ]
| keyword_p("ls")
>> ! path
- >> eps_p [ self.dispatch(&PD::builtin_ls,
- boost::ref(self.context.path)) ]
- | keyword_p("exit") [ self.dispatch(&PD::builtin_exit) ]
+ >> eps_p [ bind(&PD::builtin_ls)(d_, path_) ]
+ | keyword_p("exit") [ bind(&PD::builtin_exit)(d_) ]
| keyword_p("help")
>> ! path
- >> eps_p [ self.dispatch(&PD::builtin_help,
- boost::ref(self.context.path)) ]
+ >> eps_p [ bind(&PD::builtin_help)(d_, path_) ]
;
- block
- = ch_p('{') [ self.dispatch(&PD::pushDirectory,
- boost::ref(self.context.path)) ]
- >> * command
- >> ch_p('}') [ self.dispatch(&PD::popDirectory) ]
+ group_start
+ = ch_p('{') [ bind(&PD::pushDirectory)(d_, path_) ]
+ ;
+
+ group_close
+ = ch_p('}') [ bind(&PD::popDirectory)(d_) ]
;
statement
- = eps_p [ self.dispatch(&PD::beginCommand,
- boost::ref(self.context.path)) ]
- >> * argument
- >> (ch_p(';') | end_p)
- >> eps_p [ self.dispatch(&PD::endCommand) ]
+ = eps_p [ bind(&PD::beginCommand)(d_, path_) ]
+ >> arguments
+ >> statement_end [ bind(&PD::endCommand)(d_) ]
+ ;
+
+ arguments
+ = * argument
;
argument
- = simple_argument [ self.dispatch(&PD::pushToken,
- boost::ref(self.context.token)) ]
+ = simple_argument [ bind(&PD::pushToken)(d_, token_) ]
| balanced_tokens
;
;
string // Returns value in context.token
- = eps_p [ clear_a(self.context.str) ]
+ = eps_p [ clear(str_) ]
>> lexeme_d
[
ch_p('"')
- >> * ( ( lex_escape_ch_p[ assign_a(self.context.ch) ]
+ >> * ( ( lex_escape_ch_p[ ch_ = arg1 ]
- '"'
- ) [ append_a(self.context.str,
- self.context.ch) ]
+ ) [ str_ += ch_ ]
)
- >> ch_p('"') [ self.set_token_a(AT::BasicString,
- self.context.str) ]
+ >> ch_p('"') [ token_ = construct_<Token>(Token::BasicString,
+ str_) ]
]
;
hexstring // Returns value in context.token
- = eps_p [ clear_a(self.context.str) ]
+ = eps_p [ clear(str_) ]
>> confix_p( "x\"", * hexbyte, '"' )
- [ self.set_token_a(AT::HexString,
- self.context.str) ]
+ [ token_ = construct_<Token>(Token::HexString,
+ str_) ]
;
path // Returns value in context.path
- = eps_p [ clear_a(self.context.path) ]
+ = eps_p [ clear(path_) ]
>> relpath | abspath
;
relpath
- = ( word [ push_back_a(self.context.path,
- self.context.token) ]
+ = ( word [ push_back(path_, token_) ]
% ch_p('/') )
- >> ( ! ch_p('/') [ push_back_a(self.context.path,
- self.context.EmptyToken) ] )
+ >> ( ! ch_p('/') [ push_back(path_, construct_<Token>()) ] )
;
abspath
- = ch_p('/') [ push_back_a(self.context.path,
- self.context.EmptyToken) ]
+ = ch_p('/') [ push_back(path_, construct_<Token>()) ]
>> ( relpath
- | eps_p [ push_back_a(self.context.path,
- self.context.EmptyToken) ] )
+ | eps_p [ push_back(path_, construct_<Token>()) ] )
;
balanced_tokens
- = ch_p('(') [ self.set_token_a(AT::ArgumentGroupOpen) ]
- [ self.dispatch(&PD::pushToken,
- boost::ref(self.context.token)) ]
+ = ch_p('(') [ token_ = construct_<Token>(
+ Token::ArgumentGroupOpen,
+ "(") ]
+ [ bind(&PD::pushToken)(d_, token_) ]
>> * token
- >> ch_p(')') [ self.set_token_a(AT::ArgumentGroupClose) ]
- [ self.dispatch(&PD::pushToken,
- boost::ref(self.context.token)) ]
+ >> ch_p(')') [ token_ = construct_<Token>(
+ Token::ArgumentGroupClose,
+ ")") ]
+ [ bind(&PD::pushToken)(d_, token_) ]
;
token
- = simple_argument [ self.dispatch(&PD::pushToken,
- boost::ref(self.context.token)) ]
- | punctuation [ self.dispatch(&PD::pushToken,
- boost::ref(self.context.token)) ]
+ = simple_argument [ bind(&PD::pushToken)(d_, token_) ]
+ | punctuation [ bind(&PD::pushToken)(d_, token_) ]
| balanced_tokens
;
punctuation // Returns value in context.str
- = ch_p('/') [ self.set_token_a(AT::PathSeparator) ]
- | ch_p('{') [ self.set_token_a(AT::DirectoryGroupOpen) ]
- | ch_p('}') [ self.set_token_a(AT::DirectoryGroupClose) ]
- | ch_p(';') [ self.set_token_a(AT::CommandTerminator) ]
- | punctuation_p [ self.set_token_a(AT::OtherPunctuation) ]
+ = ch_p('/') [ token_ = construct_<Token>(
+ Token::PathSeparator,
+ "/") ]
+ | ch_p('{') [ token_ = construct_<Token>(
+ Token::DirectoryGroupOpen,
+ "{") ]
+ | ch_p('}') [ token_ = construct_<Token>(
+ Token::DirectoryGroupClose,
+ "}") ]
+ | ch_p(';') [ token_ = construct_<Token>(
+ Token::CommandTerminator,
+ ";") ]
+ | punctuation_p [ token_ = construct_<Token>(
+ Token::OtherPunctuation,
+ construct_<std::string>(1u, arg1)) ]
;
word // Returns value in context.token
= lexeme_d
[
- eps_p
- >> (+ word_p) [ assign_a(self.context.str) ]
+ (+ word_p) [ str_ = construct_<std::string>(arg1, arg2) ]
]
- >> eps_p [ self.set_token_a(AT::Word, self.context.str) ]
+ >> eps_p [ token_ = construct_<Token>(
+ Token::Word,
+ str_) ]
;
hexbyte
= uint_parser<char, 16, 2, 2>()
- [ append_a(self.context.str) ]
+ [ push_back(str_, arg1) ]
+ ;
+
+ statement_end
+ = if_p(var(self.incremental)) [
+ ch_p(';')
+ ]
+ .else_p [
+ ch_p(';')
+ | end_p
+ ]
;
skip
///////////////////////////////////////////////////////////////////
start_parsers(
- commands, // CommandParser
- skip // SkipParser
+ command, // CommandParser
+ skip, // SkipParser
+ arguments // ArgumentsParser
);
BOOST_SPIRIT_DEBUG_TRACE_RULE(command,1);
};
};
- template <class ParseDispatcher>
- Token const CommandGrammar<ParseDispatcher>::Context::EmptyToken;
-
#endif
}}}
projects / senf.git / blobdiff