X-Git-Url: https://git.tokkee.org/?p=sysdb.git;a=blobdiff_plain;f=src%2Ffrontend%2Fquery.c;h=724144aafb91a63369efb98cd0c97a55b5a7f8a9;hp=e0b7181161cde74bbf9ba50d96c49022444ec31e;hb=ef3a4a955deddc45d5f381ce20653cac3ca51656;hpb=baeea2369e2feabf67121ffc771d7c29b5ae43f9

diff --git a/src/frontend/query.c b/src/frontend/query.c
index e0b7181..724144a 100644
--- a/src/frontend/query.c
+++ b/src/frontend/query.c
@@ -1,6 +1,6 @@
 /*
  * SysDB - src/frontend/query.c
- * Copyright (C) 2013 Sebastian 'tokkee' Harl <sh@tokkee.org>
+ * Copyright (C) 2013-2014 Sebastian 'tokkee' Harl <sh@tokkee.org>
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
@@ -25,12 +25,18 @@
  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */
 
+#ifdef HAVE_CONFIG_H
+#	include "config.h"
+#endif
+
 #include "sysdb.h"
 
-#include "core/store.h"
+#include "core/plugin.h"
 #include "frontend/connection-private.h"
-#include "frontend/parser.h"
+#include "parser/ast.h"
+#include "parser/parser.h"
 #include "utils/error.h"
+#include "utils/proto.h"
 #include "utils/strbuf.h"
 
 #include <errno.h>
@@ -40,61 +46,75 @@
  * private helper functions
  */
 
-typedef struct {
-	sdb_strbuf_t *buf;
-	sdb_store_matcher_t *filter;
-
-	size_t last_len;
-} tojson_data_t;
+static char *
+sstrdup(const char *s)
+{
+	return s ? strdup(s) : NULL;
+} /* sstrdup */
 
 static int
-lookup_tojson(sdb_store_obj_t *obj, void *user_data)
+query_exec(sdb_conn_t *conn, sdb_ast_node_t *ast)
 {
-	tojson_data_t *data = user_data;
+	sdb_strbuf_t *buf;
 	int status;
 
-	if (data->filter && (! sdb_store_matcher_matches(data->filter, obj, NULL)))
-		return 0;
+	if (! ast) {
+		sdb_strbuf_sprintf(conn->errbuf, "out of memory");
+		return -1;
+	}
 
-	if (sdb_strbuf_len(data->buf) > data->last_len)
-		sdb_strbuf_append(data->buf, ",");
-	data->last_len = sdb_strbuf_len(data->buf);
-	status = sdb_store_host_tojson(obj, data->buf,
-			data->filter, /* flags = */ 0);
-	return status;
-} /* lookup_tojson */
+	buf = sdb_strbuf_create(1024);
+	if (! buf) {
+		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+		return -1;
+	}
+	status = sdb_plugin_query(ast, buf, conn->errbuf);
+	if (status < 0) {
+		char query[conn->cmd_len + 1];
+		strncpy(query, sdb_strbuf_string(conn->buf), conn->cmd_len);
+		query[sizeof(query) - 1] = '\0';
+		sdb_log(SDB_LOG_ERR, "frontend: failed to execute query '%s'", query);
+	}
+	else
+		sdb_connection_send(conn, status,
+				(uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
+
+	sdb_strbuf_destroy(buf);
+	return status < 0 ? status : 0;
+} /* query_exec */
 
 /*
  * public API
  */
 
 int
-sdb_fe_query(sdb_conn_t *conn)
+sdb_conn_query(sdb_conn_t *conn)
 {
 	sdb_llist_t *parsetree;
-	sdb_conn_node_t *node = NULL;
+	sdb_ast_node_t *ast = NULL;
 	int status = 0;
 
-	if ((! conn) || (conn->cmd != CONNECTION_QUERY))
+	if ((! conn) || (conn->cmd != SDB_CONNECTION_QUERY))
 		return -1;
 
-	parsetree = sdb_fe_parse(sdb_strbuf_string(conn->buf),
-			(int)conn->cmd_len);
+	parsetree = sdb_parser_parse(sdb_strbuf_string(conn->buf),
+			(int)conn->cmd_len, conn->errbuf);
 	if (! parsetree) {
 		char query[conn->cmd_len + 1];
 		strncpy(query, sdb_strbuf_string(conn->buf), conn->cmd_len);
 		query[sizeof(query) - 1] = '\0';
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to parse query '%s'",
-				query);
+		sdb_log(SDB_LOG_ERR, "frontend: Failed to parse query '%s': %s",
+				query, sdb_strbuf_string(conn->errbuf));
 		return -1;
 	}
 
 	switch (sdb_llist_len(parsetree)) {
 		case 0:
-			/* skipping empty command */
+			/* skipping empty command; send back an empty reply */
+			sdb_connection_send(conn, SDB_CONNECTION_DATA, 0, NULL);
 			break;
 		case 1:
-			node = SDB_CONN_NODE(sdb_llist_get(parsetree, 0));
+			ast = SDB_AST_NODE(sdb_llist_get(parsetree, 0));
 			break;
 
 		default:
@@ -102,248 +122,244 @@ sdb_fe_query(sdb_conn_t *conn)
 				char query[conn->cmd_len + 1];
 				strncpy(query, sdb_strbuf_string(conn->buf), conn->cmd_len);
 				query[sizeof(query) - 1] = '\0';
-				sdb_log(SDB_LOG_WARNING, "frontend: Ignoring %d command%s "
+				sdb_log(SDB_LOG_WARNING, "frontend: Ignoring %zu command%s "
 						"in multi-statement query '%s'",
 						sdb_llist_len(parsetree) - 1,
 						sdb_llist_len(parsetree) == 2 ? "" : "s",
 						query);
-				node = SDB_CONN_NODE(sdb_llist_get(parsetree, 0));
+				ast = SDB_AST_NODE(sdb_llist_get(parsetree, 0));
 			}
 	}
 
-	if (node) {
-		status = sdb_fe_exec(conn, node);
-		sdb_object_deref(SDB_OBJ(node));
+	if (ast) {
+		status = query_exec(conn, ast);
+		sdb_object_deref(SDB_OBJ(ast));
 	}
-
 	sdb_llist_destroy(parsetree);
 	return status;
-} /* sdb_fe_query */
+} /* sdb_conn_query */
 
 int
-sdb_fe_fetch(sdb_conn_t *conn)
+sdb_conn_fetch(sdb_conn_t *conn)
 {
+	sdb_ast_node_t *ast;
 	char hostname[conn->cmd_len + 1];
-	if ((! conn) || (conn->cmd != CONNECTION_FETCH))
-		return -1;
-	strncpy(hostname, sdb_strbuf_string(conn->buf), conn->cmd_len);
-	hostname[sizeof(hostname) - 1] = '\0';
-	return sdb_fe_exec_fetch(conn, hostname, /* filter = */ NULL);
-} /* sdb_fe_fetch */
-
-int
-sdb_fe_list(sdb_conn_t *conn)
-{
-	if ((! conn) || (conn->cmd != CONNECTION_LIST))
-		return -1;
-	return sdb_fe_exec_list(conn, /* filter = */ NULL);
-} /* sdb_fe_list */
-
-int
-sdb_fe_lookup(sdb_conn_t *conn)
-{
-	sdb_store_matcher_t *m;
+	char name[conn->cmd_len + 1];
+	uint32_t type;
 	int status;
 
-	if ((! conn) || (conn->cmd != CONNECTION_LOOKUP))
+	if ((! conn) || (conn->cmd != SDB_CONNECTION_FETCH))
 		return -1;
 
-	m = sdb_fe_parse_matcher(sdb_strbuf_string(conn->buf),
-			(int)conn->cmd_len);
-	if (! m) {
-		char expr[conn->cmd_len + 1];
-		strncpy(expr, sdb_strbuf_string(conn->buf), conn->cmd_len);
-		expr[sizeof(expr) - 1] = '\0';
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to parse "
-				"lookup condition '%s'", expr);
+	if (conn->cmd_len < sizeof(uint32_t)) {
+		sdb_log(SDB_LOG_ERR, "frontend: Invalid command length %d for "
+				"FETCH command", conn->cmd_len);
+		sdb_strbuf_sprintf(conn->errbuf, "FETCH: Invalid command length %d",
+				conn->cmd_len);
 		return -1;
 	}
 
-	status = sdb_fe_exec_lookup(conn, m, /* filter = */ NULL);
-	sdb_object_deref(SDB_OBJ(m));
-	return status;
-} /* sdb_fe_lookup */
-
-int
-sdb_fe_exec(sdb_conn_t *conn, sdb_conn_node_t *node)
-{
-	sdb_store_matcher_t *m = NULL, *filter = NULL;
-
-	if (! node)
-		return -1;
+	/* TODO: support other types besides hosts */
+	hostname[0] = '\0';
 
-	switch (node->cmd) {
-		case CONNECTION_FETCH:
-			if (CONN_FETCH(node)->filter)
-				filter = CONN_FETCH(node)->filter->matcher;
-			return sdb_fe_exec_fetch(conn, CONN_FETCH(node)->name, filter);
-		case CONNECTION_LIST:
-			if (CONN_LIST(node)->filter)
-				filter = CONN_LIST(node)->filter->matcher;
-			return sdb_fe_exec_list(conn, filter);
-		case CONNECTION_LOOKUP:
-			if (CONN_LOOKUP(node)->matcher)
-				m = CONN_LOOKUP(node)->matcher->matcher;
-			if (CONN_LOOKUP(node)->filter)
-				filter = CONN_LOOKUP(node)->filter->matcher;
-			return sdb_fe_exec_lookup(conn, m, filter);
-		case CONNECTION_TIMESERIES:
-			return sdb_fe_exec_timeseries(conn,
-					CONN_TS(node)->hostname, CONN_TS(node)->metric,
-					&CONN_TS(node)->opts);
+	sdb_proto_unmarshal_int32(SDB_STRBUF_STR(conn->buf), &type);
+	strncpy(name, sdb_strbuf_string(conn->buf) + sizeof(uint32_t),
+			conn->cmd_len - sizeof(uint32_t));
+	name[sizeof(name) - 1] = '\0';
 
-		default:
-			sdb_log(SDB_LOG_ERR, "frontend: Unknown command %i", node->cmd);
-			return -1;
-	}
-	return -1;
-} /* sdb_fe_exec */
+	ast = sdb_ast_fetch_create((int)type,
+			hostname[0] ? strdup(hostname) : NULL,
+			name[0] ? strdup(name) : NULL,
+			/* filter = */ NULL);
+	status = query_exec(conn, ast);
+	sdb_object_deref(SDB_OBJ(ast));
+	return status;
+} /* sdb_conn_fetch */
 
 int
-sdb_fe_exec_fetch(sdb_conn_t *conn, const char *name,
-		sdb_store_matcher_t *filter)
+sdb_conn_list(sdb_conn_t *conn)
 {
-	sdb_strbuf_t *buf;
-	sdb_store_obj_t *host;
-
-	host = sdb_store_get_host(name);
-	if (! host) {
-		sdb_log(SDB_LOG_DEBUG, "frontend: Failed to fetch host '%s': "
-				"not found", name);
-
-		sdb_strbuf_sprintf(conn->errbuf, "Host %s not found", name);
-		return -1;
-	}
-
-	buf = sdb_strbuf_create(1024);
-	if (! buf) {
-		char errbuf[1024];
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
-				"buffer to handle FETCH command: %s",
-				sdb_strerror(errno, errbuf, sizeof(errbuf)));
+	sdb_ast_node_t *ast;
+	uint32_t type = SDB_HOST;
+	int status;
 
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		sdb_strbuf_destroy(buf);
-		sdb_object_deref(SDB_OBJ(host));
+	if ((! conn) || (conn->cmd != SDB_CONNECTION_LIST))
 		return -1;
-	}
 
-	if (sdb_store_host_tojson(host, buf, filter, /* flags = */ 0)) {
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
-				"host '%s' to JSON", name);
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		sdb_strbuf_destroy(buf);
-		sdb_object_deref(SDB_OBJ(host));
+	if (conn->cmd_len == sizeof(uint32_t))
+		sdb_proto_unmarshal_int32(SDB_STRBUF_STR(conn->buf), &type);
+	else if (conn->cmd_len) {
+		sdb_log(SDB_LOG_ERR, "frontend: Invalid command length %d for "
+				"LIST command", conn->cmd_len);
+		sdb_strbuf_sprintf(conn->errbuf, "LIST: Invalid command length %d",
+				conn->cmd_len);
 		return -1;
 	}
 
-	sdb_connection_send(conn, CONNECTION_OK,
-			(uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
-	sdb_strbuf_destroy(buf);
-	sdb_object_deref(SDB_OBJ(host));
-	return 0;
-} /* sdb_fe_exec_fetch */
+	ast = sdb_ast_list_create((int)type, /* filter = */ NULL);
+	status = query_exec(conn, ast);
+	sdb_object_deref(SDB_OBJ(ast));
+	return status;
+} /* sdb_conn_list */
 
 int
-sdb_fe_exec_list(sdb_conn_t *conn, sdb_store_matcher_t *filter)
+sdb_conn_lookup(sdb_conn_t *conn)
 {
-	sdb_strbuf_t *buf;
+	sdb_ast_node_t *ast, *m;
+	const char *matcher;
+	size_t matcher_len;
 
-	buf = sdb_strbuf_create(1024);
-	if (! buf) {
-		char errbuf[1024];
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
-				"buffer to handle LIST command: %s",
-				sdb_strerror(errno, errbuf, sizeof(errbuf)));
+	uint32_t type;
+	int status;
 
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		sdb_strbuf_destroy(buf);
+	if ((! conn) || (conn->cmd != SDB_CONNECTION_LOOKUP))
+		return -1;
+
+	if (conn->cmd_len < sizeof(uint32_t)) {
+		sdb_log(SDB_LOG_ERR, "frontend: Invalid command length %d for "
+				"LOOKUP command", conn->cmd_len);
+		sdb_strbuf_sprintf(conn->errbuf, "LOOKUP: Invalid command length %d",
+				conn->cmd_len);
 		return -1;
 	}
+	sdb_proto_unmarshal_int32(SDB_STRBUF_STR(conn->buf), &type);
 
-	if (sdb_store_tojson(buf, filter, /* flags = */ SDB_SKIP_ALL)) {
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
-				"store to JSON");
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		sdb_strbuf_destroy(buf);
+	matcher = sdb_strbuf_string(conn->buf) + sizeof(uint32_t);
+	matcher_len = conn->cmd_len - sizeof(uint32_t);
+	m = sdb_parser_parse_conditional(matcher, (int)matcher_len, conn->errbuf);
+	if (! m) {
+		char expr[matcher_len + 1];
+		strncpy(expr, matcher, sizeof(expr));
+		expr[sizeof(expr) - 1] = '\0';
+		sdb_log(SDB_LOG_ERR, "frontend: Failed to parse lookup condition '%s': %s",
+				expr, sdb_strbuf_string(conn->errbuf));
 		return -1;
 	}
 
-	sdb_connection_send(conn, CONNECTION_OK,
-			(uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
-	sdb_strbuf_destroy(buf);
-	return 0;
-} /* sdb_fe_exec_list */
+	ast = sdb_ast_lookup_create((int)type, m, /* filter = */ NULL);
+	/* run analyzer using the full context */
+	if (ast && sdb_parser_analyze(ast, conn->errbuf)) {
+		char expr[matcher_len + 1];
+		char err[sdb_strbuf_len(conn->errbuf) + sizeof(expr) + 64];
+		strncpy(expr, matcher, sizeof(expr));
+		expr[sizeof(expr) - 1] = '\0';
+		snprintf(err, sizeof(err), "Failed to parse lookup condition '%s': %s",
+				expr, sdb_strbuf_string(conn->errbuf));
+		sdb_strbuf_sprintf(conn->errbuf, "%s", err);
+		status = -1;
+	}
+	else
+		status = query_exec(conn, ast);
+	if (! ast)
+		sdb_object_deref(SDB_OBJ(m));
+	sdb_object_deref(SDB_OBJ(ast));
+	return status;
+} /* sdb_conn_lookup */
 
 int
-sdb_fe_exec_lookup(sdb_conn_t *conn, sdb_store_matcher_t *m,
-		sdb_store_matcher_t *filter)
+sdb_conn_store(sdb_conn_t *conn)
 {
-	tojson_data_t data = { NULL, filter, 0 };
-
-	data.buf = sdb_strbuf_create(1024);
-	if (! data.buf) {
-		char errbuf[1024];
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
-				"buffer to handle LOOKUP command: %s",
-				sdb_strerror(errno, errbuf, sizeof(errbuf)));
+	sdb_ast_node_t *ast;
+	const char *buf = sdb_strbuf_string(conn->buf);
+	size_t len = conn->cmd_len;
+	uint32_t type;
+	ssize_t n;
+	int status;
 
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		sdb_strbuf_destroy(data.buf);
+	if ((! conn) || (conn->cmd != SDB_CONNECTION_STORE))
 		return -1;
-	}
-
-	sdb_strbuf_append(data.buf, "[");
 
-	/* Let the JSON serializer handle the filter instead of the scanner. Else,
-	 * we'd have to filter twice -- once in the scanner and then again in the
-	 * serializer. */
-	data.last_len = sdb_strbuf_len(data.buf);
-	if (sdb_store_scan(m, /* filter */ NULL, lookup_tojson, &data)) {
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to lookup hosts");
-		sdb_strbuf_sprintf(conn->errbuf, "Failed to lookup hosts");
-		sdb_strbuf_destroy(data.buf);
+	if ((n = sdb_proto_unmarshal_int32(buf, len, &type)) < 0) {
+		sdb_log(SDB_LOG_ERR, "frontend: Invalid command length %zu for "
+				"STORE command", len);
+		sdb_strbuf_sprintf(conn->errbuf,
+				"STORE: Invalid command length %zu", len);
 		return -1;
 	}
 
-	sdb_strbuf_append(data.buf, "]");
-
-	sdb_connection_send(conn, CONNECTION_OK,
-			(uint32_t)sdb_strbuf_len(data.buf), sdb_strbuf_string(data.buf));
-	sdb_strbuf_destroy(data.buf);
-	return 0;
-} /* sdb_fe_exec_lookup */
-
-int
-sdb_fe_exec_timeseries(sdb_conn_t *conn,
-		const char *hostname, const char *metric,
-		sdb_timeseries_opts_t *opts)
-{
-	sdb_strbuf_t *buf;
-
-	buf = sdb_strbuf_create(1024);
-	if (! buf) {
-		char errbuf[1024];
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
-				"buffer to handle TIMESERIES command: %s",
-				sdb_strerror(errno, errbuf, sizeof(errbuf)));
+	switch (type) {
+		case SDB_HOST:
+		{
+			sdb_proto_host_t host;
+			if (sdb_proto_unmarshal_host(buf, len, &host) < 0) {
+				sdb_strbuf_sprintf(conn->errbuf,
+						"STORE: Failed to unmarshal host object");
+				return -1;
+			}
+			ast = sdb_ast_store_create(SDB_HOST, /* host */ NULL,
+					/* parent */ 0, NULL, sstrdup(host.name), host.last_update,
+					/* metric store */ NULL, NULL, SDB_DATA_NULL);
+		}
+		break;
+
+		case SDB_SERVICE:
+		{
+			sdb_proto_service_t svc;
+			if (sdb_proto_unmarshal_service(buf, len, &svc) < 0) {
+				sdb_strbuf_sprintf(conn->errbuf,
+						"STORE: Failed to unmarshal service object");
+				return -1;
+			}
+			ast = sdb_ast_store_create(SDB_SERVICE, sstrdup(svc.hostname),
+					/* parent */ 0, NULL, sstrdup(svc.name), svc.last_update,
+					/* metric store */ NULL, NULL, SDB_DATA_NULL);
+		}
+		break;
+
+		case SDB_METRIC:
+		{
+			sdb_proto_metric_t metric;
+			if (sdb_proto_unmarshal_metric(buf, len, &metric) < 0) {
+				sdb_strbuf_sprintf(conn->errbuf,
+						"STORE: Failed to unmarshal metric object");
+				return -1;
+			}
+			ast = sdb_ast_store_create(SDB_METRIC, sstrdup(metric.hostname),
+					/* parent */ 0, NULL, sstrdup(metric.name), metric.last_update,
+					sstrdup(metric.store_type), sstrdup(metric.store_id),
+					SDB_DATA_NULL);
+		}
+		break;
+	}
 
-		sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
-		return -1;
+	if (type & SDB_ATTRIBUTE) {
+		sdb_proto_attribute_t attr;
+		const char *hostname, *parent;
+		int parent_type;
+		if (sdb_proto_unmarshal_attribute(buf, len, &attr) < 0) {
+			sdb_strbuf_sprintf(conn->errbuf,
+					"STORE: Failed to unmarshal attribute object");
+			return -1;
+		}
+		if (attr.parent_type == SDB_HOST) {
+			hostname = attr.parent;
+			parent_type = 0;
+			parent = NULL;
+		}
+		else {
+			hostname = attr.hostname;
+			parent_type = attr.parent_type;
+			parent = attr.parent;
+		}
+		ast = sdb_ast_store_create(SDB_ATTRIBUTE, sstrdup(hostname),
+				parent_type, sstrdup(parent), sstrdup(attr.key),
+				attr.last_update, /* metric store */ NULL, NULL,
+				attr.value);
 	}
 
-	if (sdb_store_fetch_timeseries(hostname, metric, opts, buf)) {
-		sdb_log(SDB_LOG_ERR, "frontend: Failed to fetch time-series");
-		sdb_strbuf_sprintf(conn->errbuf, "Failed to fetch time-series");
-		sdb_strbuf_destroy(buf);
+	if (! ast) {
+		sdb_log(SDB_LOG_ERR, "frontend: Invalid object type %d for "
+				"STORE COMMAND", type);
+		sdb_strbuf_sprintf(conn->errbuf, "STORE: Invalid object type %d", type);
 		return -1;
 	}
 
-	sdb_connection_send(conn, CONNECTION_OK,
-			(uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
-	sdb_strbuf_destroy(buf);
-	return 0;
-} /* sdb_fe_exec_timeseries */
+	status = sdb_parser_analyze(ast, conn->errbuf);
+	if (! status)
+		status = query_exec(conn, ast);
+	sdb_object_deref(SDB_OBJ(ast));
+	return status;
+} /* sdb_conn_store */
 
 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */