508 lines
11 KiB
C
508 lines
11 KiB
C
|
|
/*
|
|
* main.c
|
|
*
|
|
* Copyright (c) 1996-1999 Whistle Communications, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* Subject to the following obligations and disclaimer of warranty, use and
|
|
* redistribution of this software, in source or object code forms, with or
|
|
* without modifications are expressly permitted by Whistle Communications;
|
|
* provided, however, that:
|
|
* 1. Any and all reproductions of the source or object code must include the
|
|
* copyright notice above and the following disclaimer of warranties; and
|
|
* 2. No rights are granted, in any manner or form, to use Whistle
|
|
* Communications, Inc. trademarks, including the mark "WHISTLE
|
|
* COMMUNICATIONS" on advertising, endorsements, or otherwise except as
|
|
* such appears in the above copyright notice or in the software.
|
|
*
|
|
* THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND
|
|
* TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO
|
|
* REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE,
|
|
* INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT.
|
|
* WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY
|
|
* REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS
|
|
* SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE.
|
|
* IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES
|
|
* RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING
|
|
* WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
|
|
* PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR
|
|
* SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY
|
|
* OF SUCH DAMAGE.
|
|
*
|
|
* $FreeBSD$
|
|
* $Whistle: main.c,v 1.12 1999/11/29 19:17:46 archie Exp $
|
|
*/
|
|
|
|
#include "ngctl.h"
|
|
|
|
#define PROMPT "+ "
|
|
#define MAX_ARGS 512
|
|
#define WHITESPACE " \t\r\n\v\f"
|
|
#define DUMP_BYTES_PER_LINE 16
|
|
|
|
/* Internal functions */
|
|
static int ReadFile(FILE *fp);
|
|
static int DoParseCommand(char *line);
|
|
static int DoCommand(int ac, char **av);
|
|
static int DoInteractive(void);
|
|
static const struct ngcmd *FindCommand(const char *string);
|
|
static int MatchCommand(const struct ngcmd *cmd, const char *s);
|
|
static void Usage(const char *msg);
|
|
static int ReadCmd(int ac, char **av);
|
|
static int HelpCmd(int ac, char **av);
|
|
static int QuitCmd(int ac, char **av);
|
|
|
|
/* List of commands */
|
|
static const struct ngcmd *const cmds[] = {
|
|
&config_cmd,
|
|
&connect_cmd,
|
|
&debug_cmd,
|
|
&help_cmd,
|
|
&list_cmd,
|
|
&mkpeer_cmd,
|
|
&msg_cmd,
|
|
&name_cmd,
|
|
&read_cmd,
|
|
&rmhook_cmd,
|
|
&show_cmd,
|
|
&shutdown_cmd,
|
|
&status_cmd,
|
|
&types_cmd,
|
|
&write_cmd,
|
|
&quit_cmd,
|
|
NULL
|
|
};
|
|
|
|
/* Commands defined in this file */
|
|
const struct ngcmd read_cmd = {
|
|
ReadCmd,
|
|
"read <filename>",
|
|
"Read and execute commands from a file",
|
|
NULL,
|
|
{ "source", "." }
|
|
};
|
|
const struct ngcmd help_cmd = {
|
|
HelpCmd,
|
|
"help [command]",
|
|
"Show command summary or get more help on a specific command",
|
|
NULL,
|
|
{ "?" }
|
|
};
|
|
const struct ngcmd quit_cmd = {
|
|
QuitCmd,
|
|
"quit",
|
|
"Exit program",
|
|
NULL,
|
|
{ "exit" }
|
|
};
|
|
|
|
/* Our control and data sockets */
|
|
int csock, dsock;
|
|
|
|
/*
|
|
* main()
|
|
*/
|
|
int
|
|
main(int ac, char *av[])
|
|
{
|
|
char name[NG_NODELEN + 1];
|
|
int interactive = isatty(0) && isatty(1);
|
|
FILE *fp = NULL;
|
|
int ch, rtn = 0;
|
|
|
|
/* Set default node name */
|
|
snprintf(name, sizeof(name), "ngctl%d", getpid());
|
|
|
|
/* Parse command line */
|
|
while ((ch = getopt(ac, av, "df:n:")) != EOF) {
|
|
switch (ch) {
|
|
case 'd':
|
|
NgSetDebug(NgSetDebug(-1) + 1);
|
|
break;
|
|
case 'f':
|
|
if (strcmp(optarg, "-") == 0)
|
|
fp = stdin;
|
|
else if ((fp = fopen(optarg, "r")) == NULL)
|
|
err(EX_NOINPUT, "%s", optarg);
|
|
break;
|
|
case 'n':
|
|
snprintf(name, sizeof(name), "%s", optarg);
|
|
break;
|
|
case '?':
|
|
default:
|
|
Usage((char *)NULL);
|
|
break;
|
|
}
|
|
}
|
|
ac -= optind;
|
|
av += optind;
|
|
|
|
/* Create a new socket node */
|
|
if (NgMkSockNode(name, &csock, &dsock) < 0)
|
|
err(EX_OSERR, "can't create node");
|
|
|
|
/* Do commands as requested */
|
|
if (ac == 0) {
|
|
if (fp != NULL) {
|
|
rtn = ReadFile(fp);
|
|
} else if (interactive) {
|
|
rtn = DoInteractive();
|
|
} else
|
|
Usage("no command specified");
|
|
} else {
|
|
rtn = DoCommand(ac, av);
|
|
}
|
|
|
|
/* Convert command return code into system exit code */
|
|
switch (rtn) {
|
|
case CMDRTN_OK:
|
|
case CMDRTN_QUIT:
|
|
rtn = 0;
|
|
break;
|
|
case CMDRTN_USAGE:
|
|
rtn = EX_USAGE;
|
|
break;
|
|
case CMDRTN_ERROR:
|
|
rtn = EX_OSERR;
|
|
break;
|
|
}
|
|
return(rtn);
|
|
}
|
|
|
|
/*
|
|
* Process commands from a file
|
|
*/
|
|
static int
|
|
ReadFile(FILE *fp)
|
|
{
|
|
char line[LINE_MAX];
|
|
int num, rtn;
|
|
|
|
for (num = 1; fgets(line, sizeof(line), fp) != NULL; num++) {
|
|
if (*line == '#')
|
|
continue;
|
|
if ((rtn = DoParseCommand(line)) != 0) {
|
|
warnx("line %d: error in file", num);
|
|
return(rtn);
|
|
}
|
|
}
|
|
return(CMDRTN_OK);
|
|
}
|
|
|
|
/*
|
|
* Interactive mode
|
|
*/
|
|
static int
|
|
DoInteractive(void)
|
|
{
|
|
const int maxfd = MAX(csock, dsock) + 1;
|
|
|
|
(*help_cmd.func)(0, NULL);
|
|
while (1) {
|
|
struct timeval tv;
|
|
fd_set rfds;
|
|
|
|
/* See if any data or control messages are arriving */
|
|
FD_ZERO(&rfds);
|
|
FD_SET(csock, &rfds);
|
|
FD_SET(dsock, &rfds);
|
|
memset(&tv, 0, sizeof(tv));
|
|
if (select(maxfd, &rfds, NULL, NULL, &tv) <= 0) {
|
|
|
|
/* Issue prompt and wait for anything to happen */
|
|
printf("%s", PROMPT);
|
|
fflush(stdout);
|
|
FD_ZERO(&rfds);
|
|
FD_SET(0, &rfds);
|
|
FD_SET(csock, &rfds);
|
|
FD_SET(dsock, &rfds);
|
|
if (select(maxfd, &rfds, NULL, NULL, NULL) < 0)
|
|
err(EX_OSERR, "select");
|
|
|
|
/* If not user input, print a newline first */
|
|
if (!FD_ISSET(0, &rfds))
|
|
printf("\n");
|
|
}
|
|
|
|
/* Display any incoming control message */
|
|
if (FD_ISSET(csock, &rfds))
|
|
MsgRead();
|
|
|
|
/* Display any incoming data packet */
|
|
if (FD_ISSET(dsock, &rfds)) {
|
|
u_char buf[8192];
|
|
char hook[NG_HOOKLEN + 1];
|
|
int rl;
|
|
|
|
/* Read packet from socket */
|
|
if ((rl = NgRecvData(dsock,
|
|
buf, sizeof(buf), hook)) < 0)
|
|
err(EX_OSERR, "reading hook \"%s\"", hook);
|
|
if (rl == 0)
|
|
errx(EX_OSERR, "EOF from hook \"%s\"?", hook);
|
|
|
|
/* Write packet to stdout */
|
|
printf("Rec'd data packet on hook \"%s\":\n", hook);
|
|
DumpAscii(buf, rl);
|
|
}
|
|
|
|
/* Get any user input */
|
|
if (FD_ISSET(0, &rfds)) {
|
|
char buf[LINE_MAX];
|
|
|
|
if (fgets(buf, sizeof(buf), stdin) == NULL) {
|
|
printf("\n");
|
|
break;
|
|
}
|
|
if (DoParseCommand(buf) == CMDRTN_QUIT)
|
|
break;
|
|
}
|
|
}
|
|
return(CMDRTN_QUIT);
|
|
}
|
|
|
|
/*
|
|
* Parse a command line and execute the command
|
|
*/
|
|
static int
|
|
DoParseCommand(char *line)
|
|
{
|
|
char *av[MAX_ARGS];
|
|
int ac;
|
|
|
|
/* Parse line */
|
|
for (ac = 0, av[0] = strtok(line, WHITESPACE);
|
|
ac < MAX_ARGS - 1 && av[ac];
|
|
av[++ac] = strtok(NULL, WHITESPACE));
|
|
|
|
/* Do command */
|
|
return(DoCommand(ac, av));
|
|
}
|
|
|
|
/*
|
|
* Execute the command
|
|
*/
|
|
static int
|
|
DoCommand(int ac, char **av)
|
|
{
|
|
const struct ngcmd *cmd;
|
|
int rtn;
|
|
|
|
if (ac == 0 || *av[0] == 0)
|
|
return(CMDRTN_OK);
|
|
if ((cmd = FindCommand(av[0])) == NULL)
|
|
return(CMDRTN_ERROR);
|
|
if ((rtn = (*cmd->func)(ac, av)) == CMDRTN_USAGE)
|
|
warnx("usage: %s", cmd->cmd);
|
|
return(rtn);
|
|
}
|
|
|
|
/*
|
|
* Find a command
|
|
*/
|
|
static const struct ngcmd *
|
|
FindCommand(const char *string)
|
|
{
|
|
int k, found = -1;
|
|
|
|
for (k = 0; cmds[k] != NULL; k++) {
|
|
if (MatchCommand(cmds[k], string)) {
|
|
if (found != -1) {
|
|
warnx("\"%s\": ambiguous command", string);
|
|
return(NULL);
|
|
}
|
|
found = k;
|
|
}
|
|
}
|
|
if (found == -1) {
|
|
warnx("\"%s\": unknown command", string);
|
|
return(NULL);
|
|
}
|
|
return(cmds[found]);
|
|
}
|
|
|
|
/*
|
|
* See if string matches a prefix of "cmd" (or an alias) case insensitively
|
|
*/
|
|
static int
|
|
MatchCommand(const struct ngcmd *cmd, const char *s)
|
|
{
|
|
int a;
|
|
|
|
/* Try to match command, ignoring the usage stuff */
|
|
if (strlen(s) <= strcspn(cmd->cmd, WHITESPACE)) {
|
|
if (strncasecmp(s, cmd->cmd, strlen(s)) == 0)
|
|
return (1);
|
|
}
|
|
|
|
/* Try to match aliases */
|
|
for (a = 0; a < MAX_CMD_ALIAS && cmd->aliases[a] != NULL; a++) {
|
|
if (strlen(cmd->aliases[a]) >= strlen(s)) {
|
|
if (strncasecmp(s, cmd->aliases[a], strlen(s)) == 0)
|
|
return (1);
|
|
}
|
|
}
|
|
|
|
/* No match */
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* ReadCmd()
|
|
*/
|
|
static int
|
|
ReadCmd(int ac, char **av)
|
|
{
|
|
FILE *fp;
|
|
int rtn;
|
|
|
|
/* Open file */
|
|
switch (ac) {
|
|
case 2:
|
|
if ((fp = fopen(av[1], "r")) == NULL) {
|
|
warn("%s", av[1]);
|
|
return(CMDRTN_ERROR);
|
|
}
|
|
break;
|
|
default:
|
|
return(CMDRTN_USAGE);
|
|
}
|
|
|
|
/* Process it */
|
|
rtn = ReadFile(fp);
|
|
fclose(fp);
|
|
return(rtn);
|
|
}
|
|
|
|
/*
|
|
* HelpCmd()
|
|
*/
|
|
static int
|
|
HelpCmd(int ac, char **av)
|
|
{
|
|
const struct ngcmd *cmd;
|
|
int k;
|
|
|
|
switch (ac) {
|
|
case 0:
|
|
case 1:
|
|
/* Show all commands */
|
|
printf("Available commands:\n");
|
|
for (k = 0; cmds[k] != NULL; k++) {
|
|
char *s, buf[100];
|
|
|
|
cmd = cmds[k];
|
|
snprintf(buf, sizeof(buf), "%s", cmd->cmd);
|
|
for (s = buf; *s != '\0' && !isspace(*s); s++);
|
|
*s = '\0';
|
|
printf(" %-10s %s\n", buf, cmd->desc);
|
|
}
|
|
return(CMDRTN_OK);
|
|
default:
|
|
/* Show help on a specific command */
|
|
if ((cmd = FindCommand(av[1])) != NULL) {
|
|
printf("Usage: %s\n", cmd->cmd);
|
|
if (cmd->aliases[0] != NULL) {
|
|
int a = 0;
|
|
|
|
printf("Aliases: ");
|
|
while (1) {
|
|
printf("%s", cmd->aliases[a++]);
|
|
if (a == MAX_CMD_ALIAS
|
|
|| cmd->aliases[a] == NULL) {
|
|
printf("\n");
|
|
break;
|
|
}
|
|
printf(", ");
|
|
}
|
|
}
|
|
printf("Summary: %s\n", cmd->desc);
|
|
if (cmd->help != NULL) {
|
|
const char *s;
|
|
char buf[65];
|
|
int tot, len, done;
|
|
|
|
printf("Description:\n");
|
|
for (s = cmd->help; *s != '\0'; s += len) {
|
|
while (isspace(*s))
|
|
s++;
|
|
tot = snprintf(buf,
|
|
sizeof(buf), "%s", s);
|
|
len = strlen(buf);
|
|
done = len == tot;
|
|
if (!done) {
|
|
while (len > 0
|
|
&& !isspace(buf[len-1]))
|
|
buf[--len] = '\0';
|
|
}
|
|
printf(" %s\n", buf);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return(CMDRTN_OK);
|
|
}
|
|
|
|
/*
|
|
* QuitCmd()
|
|
*/
|
|
static int
|
|
QuitCmd(int ac, char **av)
|
|
{
|
|
return(CMDRTN_QUIT);
|
|
}
|
|
|
|
/*
|
|
* Dump data in hex and ASCII form
|
|
*/
|
|
void
|
|
DumpAscii(const u_char *buf, int len)
|
|
{
|
|
char ch, sbuf[100];
|
|
int k, count;
|
|
|
|
for (count = 0; count < len; count += DUMP_BYTES_PER_LINE) {
|
|
snprintf(sbuf, sizeof(sbuf), "%04x: ", count);
|
|
for (k = 0; k < DUMP_BYTES_PER_LINE; k++) {
|
|
if (count + k < len) {
|
|
snprintf(sbuf + strlen(sbuf),
|
|
sizeof(sbuf) - strlen(sbuf),
|
|
"%02x ", buf[count + k]);
|
|
} else {
|
|
snprintf(sbuf + strlen(sbuf),
|
|
sizeof(sbuf) - strlen(sbuf), " ");
|
|
}
|
|
}
|
|
snprintf(sbuf + strlen(sbuf), sizeof(sbuf) - strlen(sbuf), " ");
|
|
for (k = 0; k < DUMP_BYTES_PER_LINE; k++) {
|
|
if (count + k < len) {
|
|
ch = isprint(buf[count + k]) ?
|
|
buf[count + k] : '.';
|
|
snprintf(sbuf + strlen(sbuf),
|
|
sizeof(sbuf) - strlen(sbuf), "%c", ch);
|
|
} else {
|
|
snprintf(sbuf + strlen(sbuf),
|
|
sizeof(sbuf) - strlen(sbuf), " ");
|
|
}
|
|
}
|
|
printf("%s\n", sbuf);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Usage()
|
|
*/
|
|
static void
|
|
Usage(const char *msg)
|
|
{
|
|
if (msg)
|
|
warnx("%s", msg);
|
|
errx(EX_USAGE, "usage: ngctl [-d] [-f file] [-n name] [command ...]");
|
|
}
|
|
|