Code

store, frontend: Add sdb_store_query_execute use it instead of sdb_fe_exec.
[sysdb.git] / src / frontend / query.c
index fa493a6dd04be5a8139c0cae0485d2bea43703c6..149750b05782dc80311278f495fc994ad1b9cf1f 100644 (file)
@@ -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
 
 #include "sysdb.h"
 
-#include "core/error.h"
 #include "core/store.h"
 #include "frontend/connection-private.h"
+#include "parser/ast.h"
+#include "parser/parser.h"
+#include "utils/error.h"
+#include "utils/proto.h"
 #include "utils/strbuf.h"
 
 #include <errno.h>
+#include <string.h>
+
+/*
+ * private helper functions
+ */
+
+static int
+list_tojson(sdb_store_obj_t *obj,
+               sdb_store_matcher_t __attribute__((unused)) *filter,
+               void *user_data)
+{
+       sdb_store_json_formatter_t *f = user_data;
+       return sdb_store_json_emit(f, obj);
+} /* list_tojson */
+
+static int
+lookup_tojson(sdb_store_obj_t *obj, sdb_store_matcher_t *filter,
+               void *user_data)
+{
+       sdb_store_json_formatter_t *f = user_data;
+       return sdb_store_json_emit_full(f, obj, filter);
+} /* lookup_tojson */
 
 /*
  * public API
  */
 
+int
+sdb_fe_query(sdb_conn_t *conn)
+{
+       sdb_llist_t *parsetree;
+       sdb_ast_node_t *ast = NULL;
+
+       sdb_store_matcher_t *q;
+       sdb_strbuf_t *buf = NULL;
+       int status = 0;
+
+       if ((! conn) || (conn->cmd != SDB_CONNECTION_QUERY))
+               return -1;
+
+       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': %s",
+                               query, sdb_strbuf_string(conn->errbuf));
+               return -1;
+       }
+
+       switch (sdb_llist_len(parsetree)) {
+               case 0:
+                       /* skipping empty command; send back an empty reply */
+                       sdb_connection_send(conn, SDB_CONNECTION_DATA, 0, NULL);
+                       break;
+               case 1:
+                       ast = SDB_AST_NODE(sdb_llist_get(parsetree, 0));
+                       break;
+
+               default:
+                       {
+                               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 %zu command%s "
+                                               "in multi-statement query '%s'",
+                                               sdb_llist_len(parsetree) - 1,
+                                               sdb_llist_len(parsetree) == 2 ? "" : "s",
+                                               query);
+                               ast = SDB_AST_NODE(sdb_llist_get(parsetree, 0));
+                       }
+       }
+
+       q = sdb_store_query_prepare(ast);
+       if (! q) {
+               /* this shouldn't happen */
+               sdb_strbuf_sprintf(conn->errbuf, "failed to compile AST");
+               sdb_log(SDB_LOG_ERR, "frontend: failed to compile AST");
+               status = -1;
+       } else {
+               buf = sdb_strbuf_create(1024);
+               if (! buf) {
+                       sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+                       sdb_object_deref(SDB_OBJ(q));
+                       return -1;
+               }
+               status = sdb_store_query_execute(q, 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);
+               }
+       }
+       sdb_object_deref(SDB_OBJ(ast));
+       sdb_llist_destroy(parsetree);
+
+       if (status < 0) {
+               sdb_object_deref(SDB_OBJ(q));
+               sdb_strbuf_destroy(buf);
+               return status;
+       }
+
+       assert(buf);
+       sdb_connection_send(conn, status,
+                       (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
+
+       sdb_strbuf_destroy(buf);
+       sdb_object_deref(SDB_OBJ(q));
+       return 0;
+} /* sdb_fe_query */
+
+int
+sdb_fe_fetch(sdb_conn_t *conn)
+{
+       char name[conn->cmd_len + 1];
+       uint32_t type;
+
+       if ((! conn) || (conn->cmd != SDB_CONNECTION_FETCH))
+               return -1;
+
+       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;
+       }
+
+       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';
+       /* TODO: support other types besides hosts */
+       return sdb_fe_exec_fetch(conn, (int)type, name, NULL, /* filter = */ NULL);
+} /* sdb_fe_fetch */
+
 int
 sdb_fe_list(sdb_conn_t *conn)
 {
+       uint32_t type = SDB_HOST;
+
+       if ((! conn) || (conn->cmd != SDB_CONNECTION_LIST))
+               return -1;
+
+       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;
+       }
+       return sdb_fe_exec_list(conn, (int)type, /* filter = */ NULL);
+} /* sdb_fe_list */
+
+int
+sdb_fe_lookup(sdb_conn_t *conn)
+{
+       sdb_store_matcher_t *m;
+       const char *matcher;
+       size_t matcher_len;
+
+       uint32_t type;
+       int status;
+
+       conn_matcher_t m_node = {
+               { SDB_OBJECT_INIT, SDB_CONNECTION_MATCHER }, NULL
+       };
+       conn_lookup_t node = {
+               { SDB_OBJECT_INIT, SDB_CONNECTION_LOOKUP },
+               -1, &m_node, NULL
+       };
+
+       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);
+
+       matcher = sdb_strbuf_string(conn->buf) + sizeof(uint32_t);
+       matcher_len = conn->cmd_len - sizeof(uint32_t);
+       m = sdb_fe_parse_matcher(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;
+       }
+
+       node.type = (int)type;
+       m_node.matcher = m;
+
+       /* run analyzer separately; parse_matcher is missing
+        * the right context to do so */
+       if (sdb_fe_analyze(SDB_CONN_NODE(&node), 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 = sdb_fe_exec_lookup(conn, (int)type, m, /* filter = */ NULL);
+       sdb_object_deref(SDB_OBJ(m));
+       return status;
+} /* sdb_fe_lookup */
+
+/*
+ * TODO: let the functions above build an AST; then drop sdb_fe_exec_*.
+ */
+
+int
+sdb_fe_exec_fetch(sdb_conn_t *conn, int type,
+               const char *hostname, const char *name, sdb_store_matcher_t *filter)
+{
+       uint32_t res_type = htonl(SDB_CONNECTION_FETCH);
+
+       sdb_store_obj_t *host;
+       sdb_store_obj_t *obj;
+
+       sdb_store_json_formatter_t *f;
+       sdb_strbuf_t *buf;
+
+       if ((! hostname) || ((type == SDB_HOST) && name)
+                       || ((type != SDB_HOST) && (! name))) {
+               /* This is a programming error, not something the client did wrong */
+               sdb_strbuf_sprintf(conn->errbuf, "INTERNAL ERROR: invalid "
+                               "arguments to sdb_fe_exec_fetch(%s, %s, %s)",
+                               SDB_STORE_TYPE_TO_NAME(type), hostname, name);
+               return -1;
+       }
+       if (type == SDB_HOST)
+               name = hostname;
+
+       host = sdb_store_get_host(hostname);
+       if ((! host) || (filter
+                               && (! sdb_store_matcher_matches(filter, host, NULL)))) {
+               sdb_strbuf_sprintf(conn->errbuf, "Failed to fetch %s %s: "
+                               "host %s not found", SDB_STORE_TYPE_TO_NAME(type),
+                               name, hostname);
+               sdb_object_deref(SDB_OBJ(host));
+               return -1;
+       }
+       if (type == SDB_HOST) {
+               obj = host;
+       }
+       else {
+               obj = sdb_store_get_child(host, type, name);
+               if ((! obj) || (filter
+                                       && (! sdb_store_matcher_matches(filter, obj, NULL)))) {
+                       sdb_strbuf_sprintf(conn->errbuf, "Failed to fetch %s %s.%s: "
+                                       "%s not found", SDB_STORE_TYPE_TO_NAME(type),
+                                       hostname, name, name);
+                       if (obj)
+                               sdb_object_deref(SDB_OBJ(obj));
+                       sdb_object_deref(SDB_OBJ(host));
+                       return -1;
+               }
+               sdb_object_deref(SDB_OBJ(host));
+       }
+       host = NULL;
+
+       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_strbuf_sprintf(conn->errbuf, "Out of memory");
+               sdb_strbuf_destroy(buf);
+               sdb_object_deref(SDB_OBJ(obj));
+               return -1;
+       }
+       f = sdb_store_json_formatter(buf, type, /* flags = */ 0);
+       if (! f) {
+               char errbuf[1024];
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
+                               "JSON formatter to handle FETCH command: %s",
+                               sdb_strerror(errno, errbuf, sizeof(errbuf)));
+
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               sdb_strbuf_destroy(buf);
+               sdb_object_deref(SDB_OBJ(obj));
+               return -1;
+       }
+
+       sdb_strbuf_memcpy(buf, &res_type, sizeof(uint32_t));
+       if (sdb_store_json_emit_full(f, obj, filter)) {
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
+                               "%s %s.%s to JSON", SDB_STORE_TYPE_TO_NAME(type),
+                               hostname, name);
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               sdb_strbuf_destroy(buf);
+               free(f);
+               sdb_object_deref(SDB_OBJ(obj));
+               return -1;
+       }
+       sdb_store_json_finish(f);
+
+       sdb_connection_send(conn, SDB_CONNECTION_DATA,
+                       (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
+       sdb_strbuf_destroy(buf);
+       free(f);
+       sdb_object_deref(SDB_OBJ(obj));
+       return 0;
+} /* sdb_fe_exec_fetch */
+
+int
+sdb_fe_exec_list(sdb_conn_t *conn, int type, sdb_store_matcher_t *filter)
+{
+       uint32_t res_type = htonl(SDB_CONNECTION_LIST);
+
+       sdb_store_json_formatter_t *f;
        sdb_strbuf_t *buf;
 
        buf = sdb_strbuf_create(1024);
@@ -54,20 +379,119 @@ sdb_fe_list(sdb_conn_t *conn)
                sdb_strbuf_destroy(buf);
                return -1;
        }
+       f = sdb_store_json_formatter(buf, type, SDB_WANT_ARRAY);
+       if (! f) {
+               char errbuf[1024];
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
+                               "JSON formatter to handle LIST command: %s",
+                               sdb_strerror(errno, errbuf, sizeof(errbuf)));
 
-       if (sdb_store_tojson(buf)) {
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               sdb_strbuf_destroy(buf);
+               return -1;
+       }
+
+       sdb_strbuf_memcpy(buf, &res_type, sizeof(uint32_t));
+       if (sdb_store_scan(type, /* m = */ NULL, filter, list_tojson, f)) {
                sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
                                "store to JSON");
                sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
                sdb_strbuf_destroy(buf);
+               free(f);
+               return -1;
+       }
+       sdb_store_json_finish(f);
+
+       sdb_connection_send(conn, SDB_CONNECTION_DATA,
+                       (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
+       sdb_strbuf_destroy(buf);
+       free(f);
+       return 0;
+} /* sdb_fe_exec_list */
+
+int
+sdb_fe_exec_lookup(sdb_conn_t *conn, int type,
+               sdb_store_matcher_t *m, sdb_store_matcher_t *filter)
+{
+       uint32_t res_type = htonl(SDB_CONNECTION_LOOKUP);
+
+       sdb_store_json_formatter_t *f;
+       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 LOOKUP command: %s",
+                               sdb_strerror(errno, errbuf, sizeof(errbuf)));
+
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               return -1;
+       }
+       f = sdb_store_json_formatter(buf, type, SDB_WANT_ARRAY);
+       if (! f) {
+               char errbuf[1024];
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
+                               "JSON formatter to handle LOOKUP command: %s",
+                               sdb_strerror(errno, errbuf, sizeof(errbuf)));
+
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               sdb_strbuf_destroy(buf);
+               return -1;
+       }
+
+       sdb_strbuf_memcpy(buf, &res_type, sizeof(uint32_t));
+
+       if (sdb_store_scan(type, m, filter, lookup_tojson, f)) {
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to lookup %ss",
+                               SDB_STORE_TYPE_TO_NAME(type));
+               sdb_strbuf_sprintf(conn->errbuf, "Failed to lookup %ss",
+                               SDB_STORE_TYPE_TO_NAME(type));
+               sdb_strbuf_destroy(buf);
+               free(f);
+               return -1;
+       }
+       sdb_store_json_finish(f);
+
+       sdb_connection_send(conn, SDB_CONNECTION_DATA,
+                       (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
+       sdb_strbuf_destroy(buf);
+       free(f);
+       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;
+       uint32_t res_type = htonl(SDB_CONNECTION_TIMESERIES);
+
+       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)));
+
+               sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
+               return -1;
+       }
+
+       sdb_strbuf_memcpy(buf, &res_type, sizeof(uint32_t));
+       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);
                return -1;
        }
 
-       sdb_connection_send(conn, CONNECTION_OK,
+       sdb_connection_send(conn, SDB_CONNECTION_DATA,
                        (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
        sdb_strbuf_destroy(buf);
        return 0;
-} /* session_start */
+} /* sdb_fe_exec_timeseries */
 
 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */