2015-11-06 00:21:19 +00:00
|
|
|
#include <string>
|
|
|
|
#include <iostream>
|
|
|
|
|
|
|
|
#include <pegtl.hh>
|
2015-11-06 16:23:23 +00:00
|
|
|
#include <pegtl/analyze.hh>
|
|
|
|
#include <pegtl/trace.hh>
|
2015-11-06 00:21:19 +00:00
|
|
|
|
|
|
|
using namespace pegtl;
|
|
|
|
|
|
|
|
namespace query
|
|
|
|
{
|
|
|
|
// strings
|
|
|
|
struct unicode : list< seq< one< 'u' >, rep< 4, must< xdigit > > >, one< '\\' > > {};
|
|
|
|
struct escaped_char : one< '"', '\\', '/', 'b', 'f', 'n', 'r', 't' > {};
|
|
|
|
struct escaped : sor< escaped_char, unicode > {};
|
|
|
|
struct unescaped : utf8::range< 0x20, 0x10FFFF > {};
|
|
|
|
struct char_ : if_then_else< one< '\\' >, must< escaped >, unescaped > {};
|
|
|
|
|
|
|
|
struct string_content : until< at< one< '"' > >, must< char_ > > {};
|
|
|
|
struct string : seq< one< '"' >, must< string_content >, any >
|
|
|
|
{
|
|
|
|
using content = string_content;
|
|
|
|
};
|
|
|
|
|
|
|
|
// numbers
|
|
|
|
struct minus : opt< one< '-' > > {};
|
|
|
|
struct dot : one< '.' > {};
|
|
|
|
|
|
|
|
struct float_num : sor<
|
|
|
|
seq< plus< digit >, dot, star< digit > >,
|
|
|
|
seq< star< digit >, dot, plus< digit > >
|
|
|
|
> {};
|
|
|
|
struct hex_num : seq< one< '0' >, one< 'x', 'X' >, plus< xdigit > > {};
|
|
|
|
struct int_num : plus< digit > {};
|
|
|
|
|
|
|
|
struct number : seq< minus, sor< float_num, hex_num, int_num > > {};
|
|
|
|
|
|
|
|
// key paths
|
2015-11-06 16:23:23 +00:00
|
|
|
struct key_path : list< seq< sor< alpha, one< '_' > >, star< sor< alnum, one< '_', '-' > > > >, one< '.' > > {};
|
2015-11-06 00:21:19 +00:00
|
|
|
|
|
|
|
// expressions and operators
|
|
|
|
struct expr : sor< string, key_path, number > {};
|
2015-11-06 16:23:23 +00:00
|
|
|
struct oper : sor<
|
|
|
|
two< '=' >,
|
|
|
|
one< '=' >,
|
|
|
|
pegtl::string< '!', '=' >,
|
|
|
|
pegtl::string< '<', '=' >,
|
|
|
|
one< '<' >,
|
|
|
|
pegtl::string< '>', '=' >,
|
|
|
|
one< '>' >
|
|
|
|
> {};
|
2015-11-06 00:21:19 +00:00
|
|
|
|
|
|
|
// predicates
|
2015-11-06 16:23:23 +00:00
|
|
|
struct comparison_pred : seq< expr, pad< oper, blank >, expr > {};
|
|
|
|
|
|
|
|
struct pred;
|
|
|
|
struct group_pred : if_must< one< '(' >, pad< pred, blank >, one< ')' > > {};
|
|
|
|
|
|
|
|
struct single_pred : pad< sor< group_pred, comparison_pred >, blank > {};
|
|
|
|
struct not_pre : pegtl::string< 'N', 'O', 'T' > {};
|
|
|
|
struct atom_pred : seq< opt< not_pre >, single_pred > {};
|
|
|
|
|
|
|
|
struct or_ext : if_must< two< '|' >, atom_pred > {};
|
|
|
|
struct and_ext : if_must< two< '&' >, atom_pred > {};
|
|
|
|
|
|
|
|
struct pred : seq< atom_pred, star< sor< or_ext, and_ext > > > {};
|
2015-11-06 00:21:19 +00:00
|
|
|
|
|
|
|
// rules
|
|
|
|
template< typename Rule >
|
|
|
|
struct action : nothing< Rule > {};
|
2015-11-06 16:23:23 +00:00
|
|
|
template<> struct action< and_ext >
|
|
|
|
{
|
|
|
|
static void apply( const input & in, std::string & string_value )
|
|
|
|
{
|
|
|
|
std::cout << "<and>" << in.string() << std::endl;
|
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
template<> struct action< or_ext >
|
|
|
|
{
|
|
|
|
static void apply( const input & in, std::string & string_value )
|
|
|
|
{
|
|
|
|
std::cout << "<or>" << in.string() << std::endl;
|
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
template<> struct action< comparison_pred >
|
2015-11-06 00:21:19 +00:00
|
|
|
{
|
|
|
|
static void apply( const input & in, std::string & string_value )
|
|
|
|
{
|
|
|
|
std::cout << in.string() << std::endl;
|
|
|
|
}
|
|
|
|
};
|
2015-11-06 16:23:23 +00:00
|
|
|
|
|
|
|
template<> struct action< group_pred >
|
|
|
|
{
|
|
|
|
static void apply( const input & in, std::string & string_value )
|
|
|
|
{
|
|
|
|
std::cout << "<group>" << std::endl;
|
|
|
|
}
|
|
|
|
};
|
2015-11-06 00:21:19 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
int main( int argc, char ** argv )
|
|
|
|
{
|
|
|
|
if ( argc > 1 ) {
|
|
|
|
std::string intstring;
|
2015-11-06 16:23:23 +00:00
|
|
|
analyze< query::pred >();
|
|
|
|
parse< must< seq< query::pred, eof > >, query::action >( 1, argv, intstring);
|
2015-11-06 00:21:19 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|