kopia lustrzana https://github.com/Hamlib/Hamlib
rigctl_parse.c: Implement readline interactive mode
Initial implementation of Readline input handling. Only if 'configure' finds Readline will it be enabled and when enabled it will only be used by rigctl in interactive mode. Passing rig commands from the rigctl command line and rigctld use the original input handling which has not been modified.Hamlib-3.0
Nate Bargmann
rodzic
96977e2f71
commit
d54d737ba5
|
|
@ -34,9 +34,21 @@
|
|||
#include <unistd.h>
|
||||
#include <ctype.h>
|
||||
#include <errno.h>
|
||||
|
||||
#include <getopt.h>
|
||||
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
# if defined(HAVE_READLINE_READLINE_H)
|
||||
# include <readline/readline.h>
|
||||
# elif defined(HAVE_READLINE_H) /* !defined(HAVE_READLINE_READLINE_H) */
|
||||
# include <readline.h>
|
||||
# else /* !defined(HAVE_READLINE_H) */
|
||||
extern char *readline ();
|
||||
# endif /* HAVE_READLINE_H */
|
||||
#else
|
||||
/* no readline */
|
||||
#endif /* HAVE_LIBREADLINE */
|
||||
|
||||
|
||||
#include <hamlib/rig.h>
|
||||
#include "misc.h"
|
||||
#include "iofunc.h"
|
||||
|
|
@ -83,6 +95,14 @@ static struct option long_options[] =
|
|||
|
||||
#define MAXCONFLEN 128
|
||||
|
||||
/* variable for readline support */
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
static const int have_rl = 1;
|
||||
#else /* no readline */
|
||||
static const int have_rl = 0;
|
||||
#endif
|
||||
|
||||
|
||||
int interactive = 1; /* if no cmd on command line, switch to interactive */
|
||||
int prompt = 1; /* Print prompt in rigctl */
|
||||
int vfo_mode = 0; /* vfo_mode = 0 means target VFO is 'currVFO' */
|
||||
|
|
@ -327,6 +347,14 @@ int main (int argc, char *argv[])
|
|||
|
||||
exitcode = 0;
|
||||
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
|
||||
if (interactive && prompt && have_rl) {
|
||||
rl_readline_name = "rigctl";
|
||||
}
|
||||
|
||||
#endif /* HAVE_LIBREADLINE */
|
||||
|
||||
do {
|
||||
retcode = rigctl_parse(my_rig, stdin, stdout, argv, argc);
|
||||
if (retcode == 2)
|
||||
|
|
|
|||
|
|
@ -36,7 +36,18 @@
|
|||
#include <ctype.h>
|
||||
#include <errno.h>
|
||||
|
||||
#include <getopt.h>
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
# if defined(HAVE_READLINE_READLINE_H)
|
||||
# include <readline/readline.h>
|
||||
# elif defined(HAVE_READLINE_H) /* !defined(HAVE_READLINE_READLINE_H) */
|
||||
# include <readline.h>
|
||||
# else /* !defined(HAVE_READLINE_H) */
|
||||
extern char *readline ();
|
||||
# endif /* HAVE_READLINE_H */
|
||||
#else
|
||||
/* no readline */
|
||||
#endif /* HAVE_LIBREADLINE */
|
||||
|
||||
|
||||
#include <hamlib/rig.h>
|
||||
#include "misc.h"
|
||||
|
|
@ -73,6 +84,16 @@ static pthread_mutex_t rig_mutex = PTHREAD_MUTEX_INITIALIZER;
|
|||
#define ARG_IN (ARG_IN1|ARG_IN2|ARG_IN3|ARG_IN4)
|
||||
#define ARG_OUT (ARG_OUT1|ARG_OUT2|ARG_OUT3|ARG_OUT4)
|
||||
|
||||
/* variables for readline support */
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
static char *input_line = (char *)NULL;
|
||||
static char *result = (char *)NULL;
|
||||
static char *parsed_input[sizeof(char) * 5];
|
||||
static const int have_rl = 1;
|
||||
#else /* no readline */
|
||||
static const int have_rl = 0;
|
||||
#endif
|
||||
|
||||
struct test_table {
|
||||
unsigned char cmd;
|
||||
const char *name;
|
||||
|
|
@ -308,6 +329,35 @@ void hash_delete_all() {
|
|||
}
|
||||
|
||||
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
/* Frees allocated memory and sets pointers to NULL before calling readline
|
||||
* and then parses the input into space separated tokens.
|
||||
*/
|
||||
static void rp_getline(const char *s)
|
||||
{
|
||||
int i;
|
||||
|
||||
/* free allocated memory and set pointers to NULL */
|
||||
if (input_line) {
|
||||
free(input_line);
|
||||
input_line = (char *)NULL;
|
||||
}
|
||||
|
||||
if (result) {
|
||||
result = (char *)NULL;
|
||||
}
|
||||
|
||||
for (i = 0; i < 5; i++)
|
||||
parsed_input[i] = NULL;
|
||||
|
||||
/* Action! Returns typed line with newline stripped. */
|
||||
input_line = readline(s);
|
||||
}
|
||||
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* TODO: use Lex?
|
||||
*/
|
||||
|
|
@ -348,6 +398,7 @@ static int scanfc(FILE *fin, const char *format, void *p)
|
|||
|
||||
#define MAXARGSZ 127
|
||||
|
||||
|
||||
extern int interactive;
|
||||
extern int prompt;
|
||||
extern int vfo_mode;
|
||||
|
|
@ -359,194 +410,548 @@ int rigctl_parse(RIG *my_rig, FILE *fin, FILE *fout, char *argv[], int argc)
|
|||
{
|
||||
int retcode; /* generic return code from functions */
|
||||
unsigned char cmd;
|
||||
struct test_table *cmd_entry;
|
||||
struct test_table *cmd_entry = NULL;
|
||||
|
||||
char arg1[MAXARGSZ+1], *p1;
|
||||
char arg2[MAXARGSZ+1], *p2;
|
||||
char arg3[MAXARGSZ+1], *p3;
|
||||
char arg1[MAXARGSZ+1], *p1 = NULL;
|
||||
char arg2[MAXARGSZ+1], *p2 = NULL;
|
||||
char arg3[MAXARGSZ+1], *p3 = NULL;
|
||||
static int last_was_ret = 1;
|
||||
vfo_t vfo = RIG_VFO_CURR;
|
||||
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "\nRig command: ");
|
||||
/* cmd, internal, rigctld */
|
||||
if (!(interactive && prompt && have_rl)) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "\nRig command: ");
|
||||
|
||||
do {
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
|
||||
/* Extended response protocol requested with leading '+' on command
|
||||
* string--rigctld only!
|
||||
*/
|
||||
if (cmd == '+' && !prompt) {
|
||||
ext_resp = 1;
|
||||
do {
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
} else if (cmd == '+' && prompt) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
if (cmd != '\\' && cmd != '_' && cmd != '#' && ispunct(cmd) && !prompt) {
|
||||
ext_resp = 1;
|
||||
resp_sep = cmd;
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
} else if (cmd != '\\' && cmd != '?' && cmd != '_' && cmd != '#' && ispunct(cmd) && prompt) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* command by name */
|
||||
if (cmd == '\\') {
|
||||
unsigned char cmd_name[MAXNAMSIZ], *pcmd = cmd_name;
|
||||
int c_len = MAXNAMSIZ;
|
||||
|
||||
if (scanfc(fin, "%c", pcmd) < 1)
|
||||
return -1;
|
||||
|
||||
while(c_len-- && (isalnum(*pcmd) || *pcmd == '_' ))
|
||||
if (scanfc(fin, "%c", ++pcmd) < 1)
|
||||
/* Extended response protocol requested with leading '+' on command
|
||||
* string--rigctld only!
|
||||
*/
|
||||
if (cmd == '+' && !prompt) {
|
||||
ext_resp = 1;
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
|
||||
*pcmd = '\0';
|
||||
cmd = parse_arg((char *)cmd_name);
|
||||
break;
|
||||
}
|
||||
|
||||
if (cmd == 0x0a || cmd == 0x0d) {
|
||||
if (last_was_ret) {
|
||||
if (prompt) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fprintf_flush(fout, "\nRig command: ");
|
||||
}
|
||||
} else if (cmd == '+' && prompt) {
|
||||
return 0;
|
||||
}
|
||||
last_was_ret = 1;
|
||||
|
||||
if (cmd != '\\' && cmd != '_' && cmd != '#' && ispunct(cmd) && !prompt) {
|
||||
ext_resp = 1;
|
||||
resp_sep = cmd;
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
} else if (cmd != '\\' && cmd != '?' && cmd != '_' && cmd != '#' && ispunct(cmd) && prompt) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* command by name */
|
||||
if (cmd == '\\') {
|
||||
unsigned char cmd_name[MAXNAMSIZ], *pcmd = cmd_name;
|
||||
int c_len = MAXNAMSIZ;
|
||||
|
||||
if (scanfc(fin, "%c", pcmd) < 1)
|
||||
return -1;
|
||||
|
||||
while(c_len-- && (isalnum(*pcmd) || *pcmd == '_' ))
|
||||
if (scanfc(fin, "%c", ++pcmd) < 1)
|
||||
return -1;
|
||||
|
||||
*pcmd = '\0';
|
||||
cmd = parse_arg((char *)cmd_name);
|
||||
break;
|
||||
}
|
||||
|
||||
if (cmd == 0x0a || cmd == 0x0d) {
|
||||
if (last_was_ret) {
|
||||
if (prompt) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fprintf_flush(fout, "\nRig command: ");
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
last_was_ret = 1;
|
||||
}
|
||||
} while (cmd == 0x0a || cmd == 0x0d);
|
||||
|
||||
last_was_ret = 0;
|
||||
|
||||
/* comment line */
|
||||
if (cmd == '#') {
|
||||
while( cmd != '\n' && cmd != '\r')
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
return 0;
|
||||
}
|
||||
} while (cmd == 0x0a || cmd == 0x0d);
|
||||
if (cmd == 'Q' || cmd == 'q')
|
||||
return 1;
|
||||
if (cmd == '?') {
|
||||
usage_rig(fout);
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
} else {
|
||||
/* parse rest of command line */
|
||||
if (optind >= argc)
|
||||
return 1;
|
||||
if (argv[optind][1] == '\0')
|
||||
cmd = argv[optind][0];
|
||||
else
|
||||
cmd = parse_arg(argv[optind]);
|
||||
optind++;
|
||||
}
|
||||
|
||||
last_was_ret = 0;
|
||||
|
||||
/* comment line */
|
||||
if (cmd == '#') {
|
||||
while( cmd != '\n' && cmd != '\r')
|
||||
if (scanfc(fin, "%c", &cmd) < 1)
|
||||
return -1;
|
||||
cmd_entry = find_cmd_entry(cmd);
|
||||
if (!cmd_entry) {
|
||||
fprintf(stderr, "Command '%c' not found!\n", cmd);
|
||||
return 0;
|
||||
}
|
||||
if (cmd == 'Q' || cmd == 'q')
|
||||
return 1;
|
||||
if (cmd == '?') {
|
||||
|
||||
if (!(cmd_entry->flags & ARG_NOVFO) && vfo_mode) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "VFO: ");
|
||||
if (scanfc(fin, "%s", arg1) < 1)
|
||||
return -1;
|
||||
vfo = rig_parse_vfo(arg1);
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
vfo = rig_parse_vfo(argv[optind++]);
|
||||
}
|
||||
}
|
||||
|
||||
if ((cmd_entry->flags & ARG_IN_LINE) &&
|
||||
(cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
if (interactive) {
|
||||
char *nl;
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg1);
|
||||
if (fgets(arg1, MAXARGSZ, fin) == NULL)
|
||||
return -1;
|
||||
if (arg1[0] == 0xa)
|
||||
if (fgets(arg1, MAXARGSZ, fin) == NULL)
|
||||
return -1;
|
||||
nl = strchr(arg1, 0xa);
|
||||
if (nl) *nl = '\0'; /* chomp */
|
||||
p1 = arg1[0] == ' ' ? arg1 + 1 : arg1;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p1 = argv[optind++];
|
||||
}
|
||||
} else
|
||||
if ((cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg1);
|
||||
if (scanfc(fin, "%s", arg1) < 1)
|
||||
return -1;
|
||||
p1 = arg1;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p1 = argv[optind++];
|
||||
}
|
||||
}
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN2) && cmd_entry->arg2) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg2);
|
||||
if (scanfc(fin, "%s", arg2) < 1)
|
||||
return -1;
|
||||
p2 = arg2;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p2 = argv[optind++];
|
||||
}
|
||||
}
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN3) && cmd_entry->arg3) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg3);
|
||||
if (scanfc(fin, "%s", arg3) < 1)
|
||||
return -1;
|
||||
p3 = arg3;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p3 = argv[optind++];
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
#ifdef HAVE_LIBREADLINE
|
||||
|
||||
if (interactive && prompt && have_rl) {
|
||||
int j, x;
|
||||
|
||||
rl_instream = fin;
|
||||
rl_outstream = fout;
|
||||
|
||||
rp_getline("\nRig command: ");
|
||||
|
||||
/* EOF (Ctl-D) received on empty input line, bail out gracefully. */
|
||||
if (!input_line) {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
|
||||
/* Q or q to quit */
|
||||
if (!(strncasecmp(input_line, "q", 1)))
|
||||
return 1;
|
||||
|
||||
/* '?' for help */
|
||||
if (!(strncmp(input_line, "?", 1))) {
|
||||
usage_rig(fout);
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
} else {
|
||||
/* parse rest of command line */
|
||||
if (optind >= argc)
|
||||
|
||||
/* '#' for comment */
|
||||
if (!(strncmp(input_line, "#", 1)))
|
||||
return 0;
|
||||
|
||||
/* Blank line entered */
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
rig_debug(RIG_DEBUG_BUG, "%s: input_line: %s\n", __func__, input_line);
|
||||
|
||||
/* Split input_line on any number of spaces to get the command token
|
||||
* Tabs are intercepted by readline for completion and a newline
|
||||
* causes readline to return the typed text. If more than one
|
||||
* argument is given, it will be parsed out later.
|
||||
*/
|
||||
result = strtok(input_line, " ");
|
||||
|
||||
/* parsed_input stores pointers into input_line where the token strings
|
||||
* start.
|
||||
*/
|
||||
if (result) {
|
||||
parsed_input[0] = result;
|
||||
} else {
|
||||
/* Oops! Invoke GDB!! */
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
if (argv[optind][1] == '\0')
|
||||
cmd = argv[optind][0];
|
||||
else
|
||||
cmd = parse_arg(argv[optind]);
|
||||
optind++;
|
||||
}
|
||||
|
||||
cmd_entry = find_cmd_entry(cmd);
|
||||
if (!cmd_entry) {
|
||||
fprintf(stderr, "Command '%c' not found!\n", cmd);
|
||||
return 0;
|
||||
}
|
||||
|
||||
p1 = p2 = p3 = NULL;
|
||||
if (!(cmd_entry->flags & ARG_NOVFO) && vfo_mode) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "VFO: ");
|
||||
if (scanfc(fin, "%s", arg1) < 1)
|
||||
return -1;
|
||||
vfo = rig_parse_vfo(arg1);
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
vfo = rig_parse_vfo(argv[optind++]);
|
||||
}
|
||||
}
|
||||
|
||||
if ((cmd_entry->flags & ARG_IN_LINE) &&
|
||||
(cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
if (interactive) {
|
||||
char *nl;
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg1);
|
||||
if (fgets(arg1, MAXARGSZ, fin) == NULL)
|
||||
return -1;
|
||||
if (arg1[0] == 0xa)
|
||||
if (fgets(arg1, MAXARGSZ, fin) == NULL)
|
||||
return -1;
|
||||
nl = strchr(arg1, 0xa);
|
||||
if (nl) *nl = '\0'; /* chomp */
|
||||
p1 = arg1[0] == ' ' ? arg1 + 1 : arg1;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p1 = argv[optind++];
|
||||
/* At this point parsed_input contains the typed text of the command
|
||||
* with surrounding space characters removed.
|
||||
*/
|
||||
|
||||
/* Single character command */
|
||||
if ((strlen(parsed_input[0]) == 1) && (*parsed_input[0] != '\\')) {
|
||||
cmd = *parsed_input[0];
|
||||
}
|
||||
} else
|
||||
if ((cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg1);
|
||||
if (scanfc(fin, "%s", arg1) < 1)
|
||||
return -1;
|
||||
/* Test the command token, parsed_input[0] */
|
||||
else if ((*parsed_input[0] == '\\') && (strlen(parsed_input[0]) > 1)) {
|
||||
char cmd_name[MAXNAMSIZ];
|
||||
|
||||
/* if there is no terminating '\0' character in the source string,
|
||||
* srncpy() doesn't add one even if the supplied length is less
|
||||
* than the destination array. Truncate the source string here.
|
||||
*/
|
||||
if (strlen(parsed_input[0] + 1) >= MAXNAMSIZ)
|
||||
*(parsed_input[0] + MAXNAMSIZ) = '\0';
|
||||
|
||||
/* The starting position of the source string is the first
|
||||
* character past the initial '\'. Using MAXNAMSIZ for the
|
||||
* length leaves enough space for the '\0' string terminator in the
|
||||
* cmd_name array.
|
||||
*/
|
||||
strncpy(cmd_name, parsed_input[0] + 1, MAXNAMSIZ);
|
||||
|
||||
/* Sanity check as valid multiple character commands consist of
|
||||
* alpha-numeric characters and the underscore ('_') character.
|
||||
*/
|
||||
for (j = 0; cmd_name[j] != '\0'; j++) {
|
||||
if (!(isalnum(cmd_name[j]) || cmd_name[j] == '_')) {
|
||||
fprintf(stderr, "Valid multiple character command names contain alpha-numeric characters plus '_'\n");
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
||||
cmd = parse_arg(cmd_name);
|
||||
}
|
||||
/* Single '\' entered, prompt again */
|
||||
else if ((*parsed_input[0] == '\\') && (strlen(parsed_input[0]) == 1)) {
|
||||
return 0;
|
||||
}
|
||||
/* Multiple characters but no leading '\' */
|
||||
else {
|
||||
fprintf(stderr, "Precede multiple character command names with '\\'\n");
|
||||
return 0;
|
||||
}
|
||||
|
||||
cmd_entry = find_cmd_entry(cmd);
|
||||
if (!cmd_entry) {
|
||||
if (cmd == '\0')
|
||||
fprintf(stderr, "Command '%s' not found!\n", parsed_input[0]);
|
||||
else
|
||||
fprintf(stderr, "Command '%c' not found!\n", cmd);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* If vfo_mode is enabled (-o|--vfo) check if already given
|
||||
* or prompt for it.
|
||||
*/
|
||||
if (!(cmd_entry->flags & ARG_NOVFO) && vfo_mode) {
|
||||
/* Check if VFO was given with command. */
|
||||
result = strtok(NULL, " ");
|
||||
|
||||
if (result) {
|
||||
x = 1;
|
||||
parsed_input[x] = result;
|
||||
}
|
||||
/* Need to prompt if a VFO string was not given. */
|
||||
else {
|
||||
x = 0;
|
||||
rp_getline("VFO: ");
|
||||
|
||||
if (!input_line) {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
|
||||
/* Blank line entered */
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* Get the first token of input, the rest, if any, will be
|
||||
* used later.
|
||||
*/
|
||||
result = strtok(input_line, " ");
|
||||
|
||||
if (result) {
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
/* VFO name tokens are presently quite short. Truncate excessively
|
||||
* long strings.
|
||||
*/
|
||||
if (strlen(parsed_input[x]) >= MAXNAMSIZ)
|
||||
*(parsed_input[x] + (MAXNAMSIZ - 1)) = '\0';
|
||||
|
||||
/* Sanity check, VFO names are alpha only. */
|
||||
for (j = 0; j < MAXNAMSIZ && parsed_input[x][j] != '\0'; j++) {
|
||||
if (!(isalpha(parsed_input[x][j]))) {
|
||||
parsed_input[x][j] = '\0';
|
||||
|
||||
break;
|
||||
}
|
||||
}
|
||||
vfo = rig_parse_vfo(parsed_input[x]);
|
||||
|
||||
if (vfo == RIG_VFO_NONE) {
|
||||
fprintf(stderr, "Warning: VFO '%s' unrecognized, using 'currVFO' instead.\n",
|
||||
parsed_input[x]);
|
||||
vfo = RIG_VFO_CURR;
|
||||
}
|
||||
}
|
||||
|
||||
/* \send_cmd, \send_morse */
|
||||
if ((cmd_entry->flags & ARG_IN_LINE) &&
|
||||
(cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
/* Check for a non-existent delimiter so as to not break up
|
||||
* remaining line into separate tokens (spaces OK).
|
||||
*/
|
||||
result = strtok(NULL, "\0");
|
||||
|
||||
if (vfo_mode && result) {
|
||||
x = 2;
|
||||
parsed_input[x] = result;
|
||||
} else if (result) {
|
||||
x = 1;
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
x = 0;
|
||||
char pmptstr[(strlen(cmd_entry->arg1) + 3)];
|
||||
|
||||
strcpy(pmptstr, cmd_entry->arg1);
|
||||
strcat(pmptstr, ": ");
|
||||
|
||||
rp_getline(pmptstr);
|
||||
|
||||
/* Blank line entered */
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
if (input_line)
|
||||
parsed_input[x] = input_line;
|
||||
else {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
/* The arg1 array size is MAXARGSZ + 1 so truncate it to fit if larger. */
|
||||
if (strlen(parsed_input[x]) > MAXARGSZ)
|
||||
parsed_input[x][MAXARGSZ] = '\0';
|
||||
|
||||
strcpy(arg1, parsed_input[x]);
|
||||
p1 = arg1;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p1 = argv[optind++];
|
||||
}
|
||||
}
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN2) && cmd_entry->arg2) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg2);
|
||||
if (scanfc(fin, "%s", arg2) < 1)
|
||||
return -1;
|
||||
|
||||
/* Normal argument parsing. */
|
||||
else if ((cmd_entry->flags & ARG_IN1) && cmd_entry->arg1) {
|
||||
result = strtok(NULL, " ");
|
||||
|
||||
if (vfo_mode && result) {
|
||||
x = 2;
|
||||
parsed_input[x] = result;
|
||||
} else if (result) {
|
||||
x = 1;
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
x = 0;
|
||||
char pmptstr[(strlen(cmd_entry->arg1) + 3)];
|
||||
|
||||
strcpy(pmptstr, cmd_entry->arg1);
|
||||
strcat(pmptstr, ": ");
|
||||
|
||||
rp_getline(pmptstr);
|
||||
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
result = strtok(input_line, " ");
|
||||
|
||||
if (result) {
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
if (strlen(parsed_input[x]) > MAXARGSZ)
|
||||
parsed_input[x][MAXARGSZ] = '\0';
|
||||
|
||||
strcpy(arg1, parsed_input[x]);
|
||||
p1 = arg1;
|
||||
}
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN2) && cmd_entry->arg2) {
|
||||
result = strtok(NULL, " ");
|
||||
|
||||
if (vfo_mode && result) {
|
||||
x = 3;
|
||||
parsed_input[x] = result;
|
||||
} else if (result) {
|
||||
x = 2;
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
x = 0;
|
||||
char pmptstr[(strlen(cmd_entry->arg2) + 3)];
|
||||
|
||||
strcpy(pmptstr, cmd_entry->arg2);
|
||||
strcat(pmptstr, ": ");
|
||||
|
||||
rp_getline(pmptstr);
|
||||
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
result = strtok(input_line, " ");
|
||||
|
||||
if (result) {
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
if (strlen(parsed_input[x]) > MAXARGSZ)
|
||||
parsed_input[x][MAXARGSZ] = '\0';
|
||||
|
||||
strcpy(arg2, parsed_input[x]);
|
||||
p2 = arg2;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p2 = argv[optind++];
|
||||
}
|
||||
}
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN3) && cmd_entry->arg3) {
|
||||
if (interactive) {
|
||||
if (prompt)
|
||||
fprintf_flush(fout, "%s: ", cmd_entry->arg3);
|
||||
if (scanfc(fin, "%s", arg3) < 1)
|
||||
return -1;
|
||||
if (p1 && p1[0] != '?' && (cmd_entry->flags & ARG_IN3) && cmd_entry->arg3) {
|
||||
result = strtok(NULL, " ");
|
||||
|
||||
if (vfo_mode && result) {
|
||||
x = 4;
|
||||
parsed_input[x] = result;
|
||||
} else if (result) {
|
||||
x = 3;
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
x = 0;
|
||||
char pmptstr[(strlen(cmd_entry->arg3) + 3)];
|
||||
|
||||
strcpy(pmptstr, cmd_entry->arg3);
|
||||
strcat(pmptstr, ": ");
|
||||
|
||||
rp_getline(pmptstr);
|
||||
|
||||
if (!(strcmp(input_line, ""))) {
|
||||
fprintf(fout, "? for help, q to quit.\n");
|
||||
fflush(fout);
|
||||
return 0;
|
||||
}
|
||||
|
||||
result = strtok(input_line, " ");
|
||||
|
||||
if (result) {
|
||||
parsed_input[x] = result;
|
||||
} else {
|
||||
fprintf_flush(fout, "\n");
|
||||
return 1;
|
||||
}
|
||||
}
|
||||
|
||||
if (strlen(parsed_input[x]) > MAXARGSZ)
|
||||
parsed_input[x][MAXARGSZ] = '\0';
|
||||
|
||||
strcpy(arg3, parsed_input[x]);
|
||||
p3 = arg3;
|
||||
} else {
|
||||
if (!argv[optind]) {
|
||||
fprintf(stderr, "Invalid arg for command '%s'\n",
|
||||
cmd_entry->name);
|
||||
exit(1);
|
||||
}
|
||||
p3 = argv[optind++];
|
||||
}
|
||||
}
|
||||
|
||||
#endif /* HAVE_LIBREADLINE */
|
||||
|
||||
|
||||
/*
|
||||
* mutex locking needed because rigctld is multithreaded
|
||||
* and hamlib is not MT-safe
|
||||
|
|
@ -645,6 +1050,8 @@ void usage_rig(FILE *fout)
|
|||
else
|
||||
fprintf(fout, ")%*s", nbspaces, " ");
|
||||
}
|
||||
|
||||
fprintf(fout, "\n\nPrepend long command names with '\\', e.g. '\\dump_state'\n");
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
Ładowanie…
Reference in New Issue