1 /*
2 * SysDB - src/frontend/query.c
3 * Copyright (C) 2013 Sebastian 'tokkee' Harl <sh@tokkee.org>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
16 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
17 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
18 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
19 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
28 #include "sysdb.h"
30 #include "core/store.h"
31 #include "frontend/connection-private.h"
32 #include "frontend/parser.h"
33 #include "utils/error.h"
34 #include "utils/strbuf.h"
36 #include <errno.h>
37 #include <string.h>
39 /*
40 * private helper functions
41 */
43 typedef struct {
44 sdb_strbuf_t *buf;
45 sdb_store_matcher_t *filter;
47 size_t last_len;
48 } tojson_data_t;
50 static int
51 lookup_tojson(sdb_store_obj_t *obj, void *user_data)
52 {
53 tojson_data_t *data = user_data;
54 int status;
56 if (data->filter && (! sdb_store_matcher_matches(data->filter, obj, NULL)))
57 return 0;
59 if (sdb_strbuf_len(data->buf) > data->last_len)
60 sdb_strbuf_append(data->buf, ",");
61 data->last_len = sdb_strbuf_len(data->buf);
62 status = sdb_store_host_tojson(obj, data->buf,
63 data->filter, /* flags = */ 0);
64 return status;
65 } /* lookup_tojson */
67 /*
68 * public API
69 */
71 int
72 sdb_fe_query(sdb_conn_t *conn)
73 {
74 sdb_llist_t *parsetree;
75 sdb_conn_node_t *node = NULL;
76 int status = 0;
78 if ((! conn) || (conn->cmd != CONNECTION_QUERY))
79 return -1;
81 parsetree = sdb_fe_parse(sdb_strbuf_string(conn->buf),
82 (int)conn->cmd_len);
83 if (! parsetree) {
84 char query[conn->cmd_len + 1];
85 strncpy(query, sdb_strbuf_string(conn->buf), conn->cmd_len);
86 query[sizeof(query) - 1] = '\0';
87 sdb_log(SDB_LOG_ERR, "frontend: Failed to parse query '%s'",
88 query);
89 return -1;
90 }
92 switch (sdb_llist_len(parsetree)) {
93 case 0:
94 /* skipping empty command */
95 break;
96 case 1:
97 node = SDB_CONN_NODE(sdb_llist_get(parsetree, 0));
98 break;
100 default:
101 {
102 char query[conn->cmd_len + 1];
103 strncpy(query, sdb_strbuf_string(conn->buf), conn->cmd_len);
104 query[sizeof(query) - 1] = '\0';
105 sdb_log(SDB_LOG_WARNING, "frontend: Ignoring %zu command%s "
106 "in multi-statement query '%s'",
107 sdb_llist_len(parsetree) - 1,
108 sdb_llist_len(parsetree) == 2 ? "" : "s",
109 query);
110 node = SDB_CONN_NODE(sdb_llist_get(parsetree, 0));
111 }
112 }
114 if (node) {
115 status = sdb_fe_exec(conn, node);
116 sdb_object_deref(SDB_OBJ(node));
117 }
119 sdb_llist_destroy(parsetree);
120 return status;
121 } /* sdb_fe_query */
123 int
124 sdb_fe_fetch(sdb_conn_t *conn)
125 {
126 char hostname[conn->cmd_len + 1];
127 if ((! conn) || (conn->cmd != CONNECTION_FETCH))
128 return -1;
129 strncpy(hostname, sdb_strbuf_string(conn->buf), conn->cmd_len);
130 hostname[sizeof(hostname) - 1] = '\0';
131 return sdb_fe_exec_fetch(conn, hostname, /* filter = */ NULL);
132 } /* sdb_fe_fetch */
134 int
135 sdb_fe_list(sdb_conn_t *conn)
136 {
137 if ((! conn) || (conn->cmd != CONNECTION_LIST))
138 return -1;
139 return sdb_fe_exec_list(conn, /* filter = */ NULL);
140 } /* sdb_fe_list */
142 int
143 sdb_fe_lookup(sdb_conn_t *conn)
144 {
145 sdb_store_matcher_t *m;
146 int status;
148 if ((! conn) || (conn->cmd != CONNECTION_LOOKUP))
149 return -1;
151 m = sdb_fe_parse_matcher(sdb_strbuf_string(conn->buf),
152 (int)conn->cmd_len);
153 if (! m) {
154 char expr[conn->cmd_len + 1];
155 strncpy(expr, sdb_strbuf_string(conn->buf), conn->cmd_len);
156 expr[sizeof(expr) - 1] = '\0';
157 sdb_log(SDB_LOG_ERR, "frontend: Failed to parse "
158 "lookup condition '%s'", expr);
159 return -1;
160 }
162 status = sdb_fe_exec_lookup(conn, m, /* filter = */ NULL);
163 sdb_object_deref(SDB_OBJ(m));
164 return status;
165 } /* sdb_fe_lookup */
167 int
168 sdb_fe_exec(sdb_conn_t *conn, sdb_conn_node_t *node)
169 {
170 sdb_store_matcher_t *m = NULL, *filter = NULL;
172 if (! node)
173 return -1;
175 switch (node->cmd) {
176 case CONNECTION_FETCH:
177 if (CONN_FETCH(node)->filter)
178 filter = CONN_FETCH(node)->filter->matcher;
179 return sdb_fe_exec_fetch(conn, CONN_FETCH(node)->name, filter);
180 case CONNECTION_LIST:
181 if (CONN_LIST(node)->filter)
182 filter = CONN_LIST(node)->filter->matcher;
183 return sdb_fe_exec_list(conn, filter);
184 case CONNECTION_LOOKUP:
185 if (CONN_LOOKUP(node)->matcher)
186 m = CONN_LOOKUP(node)->matcher->matcher;
187 if (CONN_LOOKUP(node)->filter)
188 filter = CONN_LOOKUP(node)->filter->matcher;
189 return sdb_fe_exec_lookup(conn, m, filter);
190 case CONNECTION_TIMESERIES:
191 return sdb_fe_exec_timeseries(conn,
192 CONN_TS(node)->hostname, CONN_TS(node)->metric,
193 &CONN_TS(node)->opts);
195 default:
196 sdb_log(SDB_LOG_ERR, "frontend: Unknown command %i", node->cmd);
197 return -1;
198 }
199 return -1;
200 } /* sdb_fe_exec */
202 int
203 sdb_fe_exec_fetch(sdb_conn_t *conn, const char *name,
204 sdb_store_matcher_t *filter)
205 {
206 sdb_strbuf_t *buf;
207 sdb_store_obj_t *host;
209 host = sdb_store_get_host(name);
210 if (! host) {
211 sdb_log(SDB_LOG_DEBUG, "frontend: Failed to fetch host '%s': "
212 "not found", name);
214 sdb_strbuf_sprintf(conn->errbuf, "Host %s not found", name);
215 return -1;
216 }
218 buf = sdb_strbuf_create(1024);
219 if (! buf) {
220 char errbuf[1024];
221 sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
222 "buffer to handle FETCH command: %s",
223 sdb_strerror(errno, errbuf, sizeof(errbuf)));
225 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
226 sdb_strbuf_destroy(buf);
227 sdb_object_deref(SDB_OBJ(host));
228 return -1;
229 }
231 if (sdb_store_host_tojson(host, buf, filter, /* flags = */ 0)) {
232 sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
233 "host '%s' to JSON", name);
234 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
235 sdb_strbuf_destroy(buf);
236 sdb_object_deref(SDB_OBJ(host));
237 return -1;
238 }
240 sdb_connection_send(conn, CONNECTION_OK,
241 (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
242 sdb_strbuf_destroy(buf);
243 sdb_object_deref(SDB_OBJ(host));
244 return 0;
245 } /* sdb_fe_exec_fetch */
247 int
248 sdb_fe_exec_list(sdb_conn_t *conn, sdb_store_matcher_t *filter)
249 {
250 sdb_strbuf_t *buf;
252 buf = sdb_strbuf_create(1024);
253 if (! buf) {
254 char errbuf[1024];
255 sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
256 "buffer to handle LIST command: %s",
257 sdb_strerror(errno, errbuf, sizeof(errbuf)));
259 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
260 sdb_strbuf_destroy(buf);
261 return -1;
262 }
264 if (sdb_store_tojson(buf, filter, /* flags = */ SDB_SKIP_ALL)) {
265 sdb_log(SDB_LOG_ERR, "frontend: Failed to serialize "
266 "store to JSON");
267 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
268 sdb_strbuf_destroy(buf);
269 return -1;
270 }
272 sdb_connection_send(conn, CONNECTION_OK,
273 (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
274 sdb_strbuf_destroy(buf);
275 return 0;
276 } /* sdb_fe_exec_list */
278 int
279 sdb_fe_exec_lookup(sdb_conn_t *conn, sdb_store_matcher_t *m,
280 sdb_store_matcher_t *filter)
281 {
282 tojson_data_t data = { NULL, filter, 0 };
284 data.buf = sdb_strbuf_create(1024);
285 if (! data.buf) {
286 char errbuf[1024];
287 sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
288 "buffer to handle LOOKUP command: %s",
289 sdb_strerror(errno, errbuf, sizeof(errbuf)));
291 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
292 sdb_strbuf_destroy(data.buf);
293 return -1;
294 }
296 sdb_strbuf_append(data.buf, "[");
298 /* Let the JSON serializer handle the filter instead of the scanner. Else,
299 * we'd have to filter twice -- once in the scanner and then again in the
300 * serializer. */
301 data.last_len = sdb_strbuf_len(data.buf);
302 if (sdb_store_scan(m, /* filter */ NULL, lookup_tojson, &data)) {
303 sdb_log(SDB_LOG_ERR, "frontend: Failed to lookup hosts");
304 sdb_strbuf_sprintf(conn->errbuf, "Failed to lookup hosts");
305 sdb_strbuf_destroy(data.buf);
306 return -1;
307 }
309 sdb_strbuf_append(data.buf, "]");
311 sdb_connection_send(conn, CONNECTION_OK,
312 (uint32_t)sdb_strbuf_len(data.buf), sdb_strbuf_string(data.buf));
313 sdb_strbuf_destroy(data.buf);
314 return 0;
315 } /* sdb_fe_exec_lookup */
317 int
318 sdb_fe_exec_timeseries(sdb_conn_t *conn,
319 const char *hostname, const char *metric,
320 sdb_timeseries_opts_t *opts)
321 {
322 sdb_strbuf_t *buf;
324 buf = sdb_strbuf_create(1024);
325 if (! buf) {
326 char errbuf[1024];
327 sdb_log(SDB_LOG_ERR, "frontend: Failed to create "
328 "buffer to handle TIMESERIES command: %s",
329 sdb_strerror(errno, errbuf, sizeof(errbuf)));
331 sdb_strbuf_sprintf(conn->errbuf, "Out of memory");
332 return -1;
333 }
335 if (sdb_store_fetch_timeseries(hostname, metric, opts, buf)) {
336 sdb_log(SDB_LOG_ERR, "frontend: Failed to fetch time-series");
337 sdb_strbuf_sprintf(conn->errbuf, "Failed to fetch time-series");
338 sdb_strbuf_destroy(buf);
339 return -1;
340 }
342 sdb_connection_send(conn, CONNECTION_OK,
343 (uint32_t)sdb_strbuf_len(buf), sdb_strbuf_string(buf));
344 sdb_strbuf_destroy(buf);
345 return 0;
346 } /* sdb_fe_exec_timeseries */
348 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */