src/tools/sysdb/command.c

   1 /*
   2  * SysDB - src/tools/sysdb/command.c
   3  * Copyright (C) 2014 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  */
  27
  28 #if HAVE_CONFIG_H
  29 #       include "config.h"
  30 #endif /* HAVE_CONFIG_H */
  31
  32 #include "sysdb.h"
  33
  34 #include "tools/sysdb/command.h"
  35 #include "tools/sysdb/input.h"
  36
  37 #include "frontend/proto.h"
  38 #include "utils/error.h"
  39 #include "utils/proto.h"
  40 #include "utils/strbuf.h"
  41
  42 #include <errno.h>
  43
  44 #include <assert.h>
  45 #include <ctype.h>
  46 #include <stdlib.h>
  47 #include <string.h>
  48
  49 static void
  50 log_printer(sdb_strbuf_t *buf)
  51 {
  52         uint32_t prio = sdb_proto_get_int(buf, 0);
  53
  54         if (prio == UINT32_MAX) {
  55                 sdb_log(SDB_LOG_WARNING, "Received a LOG message with invalid "
  56                                 "or missing priority");
  57                 prio = (uint32_t)SDB_LOG_ERR;
  58         }
  59         sdb_strbuf_skip(buf, 0, sizeof(prio));
  60
  61         sdb_log((int)prio, "%s", sdb_strbuf_string(buf));
  62 } /* log_printer */
  63
  64 static void
  65 data_printer(sdb_strbuf_t *buf)
  66 {
  67         size_t len = sdb_strbuf_len(buf);
  68
  69         if ((! len) || (len == sizeof(uint32_t))) {
  70                 /* empty command or empty reply */
  71                 return;
  72         }
  73         else if (len < sizeof(uint32_t)) {
  74                 sdb_log(SDB_LOG_ERR, "Received a DATA message with invalid "
  75                                 "or missing data-type");
  76                 return;
  77         }
  78
  79         /* At the moment, we don't care about the result type. We simply print the
  80          * result without further parsing it. */
  81         sdb_strbuf_skip(buf, 0, sizeof(uint32_t));
  82         printf("%s\n", sdb_strbuf_string(buf));
  83 } /* data_printer */
  84
  85 static struct {
  86         int status;
  87         void (*printer)(sdb_strbuf_t *);
  88 } response_printers[] = {
  89         { SDB_CONNECTION_LOG,  log_printer },
  90         { SDB_CONNECTION_DATA, data_printer },
  91 };
  92
  93 static void
  94 clear_query(sdb_input_t *input)
  95 {
  96         sdb_strbuf_skip(input->input, 0, input->query_len);
  97         input->tokenizer_pos -= input->query_len;
  98         input->query_len = 0;
  99         input->have_input = 0;
 100 } /* clear_query */
 101
 102 /*
 103  * public API
 104  */
 105
 106 int
 107 sdb_command_print_reply(sdb_client_t *client)
 108 {
 109         sdb_strbuf_t *recv_buf;
 110         const char *result;
 111         uint32_t rcode = 0;
 112
 113         int status = -1;
 114         size_t i;
 115
 116         recv_buf = sdb_strbuf_create(1024);
 117         if (! recv_buf)
 118                 return -1;
 119
 120         if (sdb_client_recv(client, &rcode, recv_buf) < 0)
 121                 rcode = UINT32_MAX;
 122
 123         if (sdb_client_eof(client)) {
 124                 sdb_strbuf_destroy(recv_buf);
 125                 return -1;
 126         }
 127
 128         if (rcode != UINT32_MAX)
 129                 status = (int)rcode;
 130
 131         for (i = 0; i < SDB_STATIC_ARRAY_LEN(response_printers); ++i) {
 132                 if (status == response_printers[i].status) {
 133                         response_printers[i].printer(recv_buf);
 134                         sdb_strbuf_destroy(recv_buf);
 135                         return status;
 136                 }
 137         }
 138
 139         result = sdb_strbuf_string(recv_buf);
 140         if (result && *result)
 141                 sdb_log(SDB_LOG_ERR, "%s", result);
 142         else if (rcode == UINT32_MAX) {
 143                 char errbuf[1024];
 144                 sdb_log(SDB_LOG_ERR, "%s",
 145                                 sdb_strerror(errno, errbuf, sizeof(errbuf)));
 146         }
 147
 148         sdb_strbuf_destroy(recv_buf);
 149         return status;
 150 } /* sdb_command_print_reply */
 151
 152 char *
 153 sdb_command_exec(sdb_input_t *input)
 154 {
 155         const char *query;
 156         uint32_t query_len;
 157
 158         char *data = NULL;
 159
 160         query = sdb_strbuf_string(input->input);
 161         query_len = (uint32_t)input->query_len;
 162
 163         assert(input->query_len <= input->tokenizer_pos);
 164
 165         /* removing leading and trailing newlines */
 166         while (query_len && (*query == '\n')) {
 167                 ++query;
 168                 --query_len;
 169         }
 170         while (query_len && (query[query_len - 1]) == '\n')
 171                 --query_len;
 172
 173         if (query_len) {
 174                 data = strndup(query, query_len);
 175                 /* ignore errors; we'll only hide the command from the caller */
 176         }
 177
 178         if (sdb_client_eof(input->client)) {
 179                 if (sdb_input_reconnect()) {
 180                         clear_query(input);
 181                         return data;
 182                 }
 183         }
 184         else if (! query_len)
 185                 return NULL;
 186
 187         sdb_client_send(input->client, SDB_CONNECTION_QUERY, query_len, query);
 188
 189         /* The server may send back log messages but will eventually reply to the
 190          * query, which is either DATA or ERROR. */
 191         while (42) {
 192                 int status = sdb_command_print_reply(input->client);
 193                 if (status < 0) {
 194                         sdb_log(SDB_LOG_ERR, "Failed to read reply from server");
 195                         break;
 196                 }
 197
 198                 if ((status == SDB_CONNECTION_DATA)
 199                                 || (status == SDB_CONNECTION_ERROR))
 200                         break;
 201         }
 202         clear_query(input);
 203         return data;
 204 } /* sdb_command_exec */
 205
 206 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 207