src/tools/sysdb/input.c

   1 /*
   2  * SysDB - src/tools/sysdb/input.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  */
  27
  28 /*
  29  * This module implements the core of the command line tool. It handles all
  30  * input from the user and the remote server, interacting with the scanner and
  31  * command handling as needed.
  32  *
  33  * The main loop is managed by the flex scanner which parses the user input.
  34  * It will call into this module (using sdb_input_readline()) whenever it
  35  * needs further input to continue parsing. Whenever it finds a full query
  36  * (terminated by a semicolon), it will hand the query back to this module
  37  * (using sdb_input_exec_query()) which will then execute it.
  38  *
  39  * Most of the process life-time will be spend waiting for input. User input
  40  * and (asynchronous) server replies are handled at the same time.
  41  */
  42
  43 #if HAVE_CONFIG_H
  44 #       include "config.h"
  45 #endif /* HAVE_CONFIG_H */
  46
  47 #include "tools/sysdb/input.h"
  48 #include "tools/sysdb/command.h"
  49
  50 #include "utils/error.h"
  51 #include "utils/strbuf.h"
  52
  53 #include <errno.h>
  54
  55 #include <sys/select.h>
  56
  57 #include <stdio.h>
  58 #include <stdlib.h>
  59
  60 #include <string.h>
  61
  62 #include <termios.h>
  63 #include <unistd.h>
  64
  65 #if HAVE_EDITLINE_READLINE_H
  66 #       include <editline/readline.h>
  67 #       if HAVE_EDITLINE_HISTORY_H
  68 #               include <editline/history.h>
  69 #       endif
  70 #elif HAVE_READLINE_READLINE_H
  71 #       include <readline/readline.h>
  72 #       if HAVE_READLINE_HISTORY_H
  73 #               include <readline/history.h>
  74 #       endif
  75 #elif HAVE_READLINE_H
  76 #       include <readline.h>
  77 #       if HAVE_HISTORY_H
  78 #               include <history.h>
  79 #       endif
  80 #endif /* READLINEs */
  81
  82 extern int yylex(void);
  83
  84 /*
  85  * public variables
  86  */
  87
  88 sdb_input_t *sysdb_input = NULL;
  89
  90 /*
  91  * private variables
  92  */
  93
  94 static struct termios orig_term_attrs;
  95 static bool have_orig_term_attrs;
  96
  97 /*
  98  * private helper functions
  99  */
 100
 101 static void
 102 reset_term_attrs(void)
 103 {
 104         tcsetattr(STDIN_FILENO, TCSANOW, &orig_term_attrs);
 105 } /* reset_term_attrs */
 106
 107 static void
 108 term_rawmode(void)
 109 {
 110         struct termios attrs;
 111
 112         if (! have_orig_term_attrs) {
 113                 memset(&orig_term_attrs, 0, sizeof(orig_term_attrs));
 114                 tcgetattr(STDIN_FILENO, &orig_term_attrs);
 115                 atexit(reset_term_attrs);
 116                 have_orig_term_attrs = 1;
 117         }
 118
 119         /* setup terminal to operate in non-canonical mode
 120          * and single character input */
 121         memset(&attrs, 0, sizeof(attrs));
 122         tcgetattr(STDIN_FILENO, &attrs);
 123         attrs.c_lflag &= (tcflag_t)(~ICANON);
 124         attrs.c_cc[VMIN] = 1;
 125         tcsetattr(STDIN_FILENO, TCSANOW, &attrs);
 126 } /* term_rawmode */
 127
 128 static void
 129 handle_input(char *line)
 130 {
 131         if (! line) {
 132                 sysdb_input->eof = 1;
 133                 return;
 134         }
 135
 136         sdb_strbuf_append(sysdb_input->input, "%s\n", line);
 137         free(line);
 138
 139         if (sysdb_input->interactive)
 140                 rl_callback_handler_remove();
 141 } /* handle_input */
 142
 143 /* wait for a new line of data to be available */
 144 static ssize_t
 145 input_readline(void)
 146 {
 147         size_t len;
 148
 149         fd_set fds;
 150         int client_fd;
 151
 152         const char *prompt = "sysdb=> ";
 153
 154         len = sdb_strbuf_len(sysdb_input->input);
 155
 156         if (! sysdb_input->interactive) {
 157                 char *line = readline("");
 158                 handle_input(line);
 159                 return (ssize_t)(sdb_strbuf_len(sysdb_input->input) - len);
 160         }
 161
 162         if (sysdb_input->have_input)
 163                 prompt = "sysdb-> ";
 164         if (sdb_client_eof(sysdb_input->client))
 165                 prompt = "!-> ";
 166
 167         rl_callback_handler_install(prompt, handle_input);
 168         client_fd = sdb_client_sockfd(sysdb_input->client);
 169         while ((sdb_strbuf_len(sysdb_input->input) == len)
 170                         && (! sysdb_input->eof)) {
 171                 bool connected = !sdb_client_eof(sysdb_input->client);
 172                 int max_fd, n;
 173
 174                 /* XXX: some versions of libedit don't properly reset the terminal in
 175                  * rl_callback_read_char(); detect those versions */
 176                 term_rawmode();
 177
 178                 FD_ZERO(&fds);
 179                 FD_SET(STDIN_FILENO, &fds);
 180                 max_fd = STDIN_FILENO;
 181
 182                 if (connected) {
 183                         FD_SET(client_fd, &fds);
 184                         if (client_fd > max_fd)
 185                                 max_fd = client_fd;
 186                 }
 187
 188                 n = select(max_fd + 1, &fds, NULL, NULL, /* timeout = */ NULL);
 189                 if (n < 0)
 190                         return (ssize_t)n;
 191                 else if (! n)
 192                         continue;
 193
 194                 /* handle user input with highest priority */
 195                 if (FD_ISSET(STDIN_FILENO, &fds)) {
 196                         rl_callback_read_char();
 197                         continue;
 198                 }
 199
 200                 if ((! connected) || (! FD_ISSET(client_fd, &fds)))
 201                         continue;
 202
 203                 /* some response / error message from the server pending */
 204                 /* XXX: clear current line */
 205                 printf("\n");
 206                 sdb_command_print_reply(sysdb_input->client);
 207
 208                 if (sdb_client_eof(sysdb_input->client)) {
 209                         rl_callback_handler_remove();
 210                         /* XXX */
 211                         printf("Remote side closed the connection.\n");
 212                         /* return EOF -> restart scanner */
 213                         return 0;
 214                 }
 215                 else
 216                         rl_forced_update_display();
 217         }
 218
 219         /* new data available */
 220         return (ssize_t)(sdb_strbuf_len(sysdb_input->input) - len);
 221 } /* input_readline */
 222
 223 /*
 224  * public API
 225  */
 226
 227 int
 228 sdb_input_init(sdb_input_t *input)
 229 {
 230         /* register input handler */
 231         sysdb_input = input;
 232
 233         input->interactive = isatty(STDIN_FILENO) != 0;
 234         errno = 0;
 235         if (input->interactive)
 236                 term_rawmode();
 237         return 0;
 238 } /* sdb_input_init */
 239
 240 int
 241 sdb_input_mainloop(void)
 242 {
 243         while (! sysdb_input->eof)
 244                 yylex();
 245         return 0;
 246 } /* sdb_input_mainloop */
 247
 248 ssize_t
 249 sdb_input_readline(char *buf, size_t *n_chars, size_t max_chars)
 250 {
 251         const char *data;
 252         size_t len;
 253
 254         len = sdb_strbuf_len(sysdb_input->input) - sysdb_input->tokenizer_pos;
 255
 256         if (! len) {
 257                 ssize_t n = input_readline();
 258                 if (n <= 0) {
 259                         *n_chars = 0; /* YY_NULL */
 260                         return n;
 261                 }
 262                 len += (size_t)n;
 263         }
 264
 265         len = (len < max_chars) ? len : max_chars;
 266         data = sdb_strbuf_string(sysdb_input->input);
 267         data += sysdb_input->tokenizer_pos;
 268         strncpy(buf, data, len);
 269
 270         sysdb_input->tokenizer_pos += len;
 271         *n_chars = (int)len;
 272         return (ssize_t)len;
 273 } /* sdb_input_readline */
 274
 275 int
 276 sdb_input_exec_query(void)
 277 {
 278         char *query = NULL;
 279
 280         HIST_ENTRY *hist;
 281         const char *prev = NULL;
 282
 283         if (! sysdb_input->have_input) {
 284                 /* empty line */
 285                 if (sdb_client_eof(sysdb_input->client))
 286                         sdb_input_reconnect();
 287                 return 0;
 288         }
 289
 290         query = sdb_command_exec(sysdb_input);
 291         if (! query)
 292                 return -1;
 293
 294         hist = history_get(history_length);
 295         if (hist)
 296                 prev = hist->line;
 297
 298         if (*query != ' ')
 299                 if ((! prev) || strcmp(prev, query))
 300                         add_history(query);
 301         free(query);
 302         return 0;
 303 } /* sdb_input_exec_query */
 304
 305 int
 306 sdb_input_reconnect(void)
 307 {
 308         sdb_client_close(sysdb_input->client);
 309         if (sdb_client_connect(sysdb_input->client, sysdb_input->user)) {
 310                 printf("Failed to reconnect to SysDBd.\n");
 311                 return -1;
 312         }
 313         printf("Successfully reconnected to SysDBd.\n");
 314         return 0;
 315 } /* sdb_input_reconnect */
 316
 317 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 318