diff --git a/src/frontend/parser.c b/src/frontend/parser.c
index 037550fbddd731bf4bd84c51c8d126d50466ff16..785b7e40b59caecc3f34d5e8660f7d04f918e397 100644 (file)
--- a/src/frontend/parser.c
+++ b/src/frontend/parser.c
#include "frontend/parser.h"
#include "frontend/grammar.h"
+#include "core/store.h"
+
#include "utils/llist.h"
#include <string.h>
+/*
+ * private helper functions
+ */
+
+static int
+scanner_init(const char *input, int len,
+ sdb_fe_yyscan_t *scanner, sdb_fe_yyextra_t *extra)
+{
+ if (! input)
+ return -1;
+
+ memset(extra, 0, sizeof(*extra));
+ extra->parsetree = sdb_llist_create();
+ extra->mode = SDB_PARSE_DEFAULT;
+
+ if (! extra->parsetree)
+ return -1;
+
+ *scanner = sdb_fe_scanner_init(input, len, extra);
+ if (! scanner) {
+ sdb_llist_destroy(extra->parsetree);
+ return -1;
+ }
+ return 0;
+} /* scanner_init */
+
/*
* public API
*/
sdb_llist_t *
-sdb_fe_parse(const char *query)
+sdb_fe_parse(const char *query, int len)
{
sdb_fe_yyscan_t scanner;
sdb_fe_yyextra_t yyextra;
int yyres;
- if (! query)
+ if (scanner_init(query, len, &scanner, &yyextra))
return NULL;
- memset(&yyextra, 0, sizeof(yyextra));
- yyextra.parsetree = sdb_llist_create();
+ yyres = sdb_fe_yyparse(scanner);
+ sdb_fe_scanner_destroy(scanner);
- scanner = sdb_fe_scanner_init(query, &yyextra);
- if (! scanner) {
+ if (yyres) {
sdb_llist_destroy(yyextra.parsetree);
return NULL;
}
+ return yyextra.parsetree;
+} /* sdb_fe_parse */
+
+sdb_store_matcher_t *
+sdb_fe_parse_matcher(const char *cond, int len)
+{
+ sdb_fe_yyscan_t scanner;
+ sdb_fe_yyextra_t yyextra;
+
+ sdb_conn_node_t *node;
+ sdb_store_matcher_t *m;
+
+ int yyres;
+
+ if (scanner_init(cond, len, &scanner, &yyextra))
+ return NULL;
+
+ yyextra.mode = SDB_PARSE_COND;
yyres = sdb_fe_yyparse(scanner);
sdb_fe_scanner_destroy(scanner);
sdb_llist_destroy(yyextra.parsetree);
return NULL;
}
- return yyextra.parsetree;
-} /* sdb_fe_parse */
+
+ node = SDB_CONN_NODE(sdb_llist_get(yyextra.parsetree, 0));
+ if (! node) {
+ sdb_llist_destroy(yyextra.parsetree);
+ return NULL;
+ }
+
+ if (node->cmd == CONNECTION_MATCHER) {
+ m = CONN_MATCHER(node)->matcher;
+ CONN_MATCHER(node)->matcher = NULL;
+ }
+ else
+ m = NULL;
+
+ sdb_llist_destroy(yyextra.parsetree);
+ sdb_object_deref(SDB_OBJ(node));
+ return m;
+} /* sdb_fe_parse_matcher */
+
+sdb_store_expr_t *
+sdb_fe_parse_expr(const char *expr, int len)
+{
+ sdb_fe_yyscan_t scanner;
+ sdb_fe_yyextra_t yyextra;
+
+ sdb_conn_node_t *node;
+ sdb_store_expr_t *e;
+
+ int yyres;
+
+ if (scanner_init(expr, len, &scanner, &yyextra))
+ return NULL;
+
+ yyextra.mode = SDB_PARSE_EXPR;
+
+ yyres = sdb_fe_yyparse(scanner);
+ sdb_fe_scanner_destroy(scanner);
+
+ if (yyres) {
+ sdb_llist_destroy(yyextra.parsetree);
+ return NULL;
+ }
+
+ node = SDB_CONN_NODE(sdb_llist_get(yyextra.parsetree, 0));
+ if (! node) {
+ sdb_llist_destroy(yyextra.parsetree);
+ return NULL;
+ }
+
+ if (node->cmd == CONNECTION_EXPR) {
+ e = CONN_EXPR(node)->expr;
+ CONN_EXPR(node)->expr = NULL;
+ }
+ else
+ e = NULL;
+
+ sdb_llist_destroy(yyextra.parsetree);
+ sdb_object_deref(SDB_OBJ(node));
+ return e;
+} /* sdb_fe_parse_expr */
/* vim: set tw=78 sw=4 ts=4 noexpandtab : */