1 2 /* 3 * main.c 4 * 5 * Copyright (c) 1996-1999 Whistle Communications, Inc. 6 * All rights reserved. 7 * 8 * Subject to the following obligations and disclaimer of warranty, use and 9 * redistribution of this software, in source or object code forms, with or 10 * without modifications are expressly permitted by Whistle Communications; 11 * provided, however, that: 12 * 1. Any and all reproductions of the source or object code must include the 13 * copyright notice above and the following disclaimer of warranties; and 14 * 2. No rights are granted, in any manner or form, to use Whistle 15 * Communications, Inc. trademarks, including the mark "WHISTLE 16 * COMMUNICATIONS" on advertising, endorsements, or otherwise except as 17 * such appears in the above copyright notice or in the software. 18 * 19 * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND 20 * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO 21 * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE, 22 * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF 23 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT. 24 * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY 25 * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS 26 * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE. 27 * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES 28 * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING 29 * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 30 * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR 31 * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY 32 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 33 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 34 * THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY 35 * OF SUCH DAMAGE. 36 * 37 * $FreeBSD$ 38 * $Whistle: main.c,v 1.12 1999/11/29 19:17:46 archie Exp $ 39 */ 40 41 #include "ngctl.h" 42 43 #define PROMPT "+ " 44 #define MAX_ARGS 512 45 #define WHITESPACE " \t\r\n\v\f" 46 #define DUMP_BYTES_PER_LINE 16 47 48 /* Internal functions */ 49 static int ReadFile(FILE *fp); 50 static int DoParseCommand(char *line); 51 static int DoCommand(int ac, char **av); 52 static int DoInteractive(void); 53 static const struct ngcmd *FindCommand(const char *string); 54 static int MatchCommand(const struct ngcmd *cmd, const char *s); 55 static void DumpAscii(const u_char *buf, int len); 56 static void Usage(const char *msg); 57 static int ReadCmd(int ac, char **av); 58 static int HelpCmd(int ac, char **av); 59 static int QuitCmd(int ac, char **av); 60 61 /* List of commands */ 62 static const struct ngcmd *const cmds[] = { 63 &connect_cmd, 64 &debug_cmd, 65 &help_cmd, 66 &list_cmd, 67 &mkpeer_cmd, 68 &msg_cmd, 69 &name_cmd, 70 &read_cmd, 71 &rmhook_cmd, 72 &show_cmd, 73 &shutdown_cmd, 74 &status_cmd, 75 &types_cmd, 76 &quit_cmd, 77 NULL 78 }; 79 80 /* Commands defined in this file */ 81 const struct ngcmd read_cmd = { 82 ReadCmd, 83 "read <filename>", 84 "Read and execute commands from a file", 85 NULL, 86 { "source", "." } 87 }; 88 const struct ngcmd help_cmd = { 89 HelpCmd, 90 "help [command]", 91 "Show command summary or get more help on a specific command", 92 NULL, 93 { "?" } 94 }; 95 const struct ngcmd quit_cmd = { 96 QuitCmd, 97 "quit", 98 "Exit program", 99 NULL, 100 { "exit" } 101 }; 102 103 /* Our control and data sockets */ 104 int csock, dsock; 105 106 /* 107 * main() 108 */ 109 int 110 main(int ac, char *av[]) 111 { 112 char name[NG_NODELEN + 1]; 113 int interactive = isatty(0) && isatty(1); 114 FILE *fp = NULL; 115 int ch, rtn = 0; 116 117 /* Set default node name */ 118 snprintf(name, sizeof(name), "ngctl%d", getpid()); 119 120 /* Parse command line */ 121 while ((ch = getopt(ac, av, "df:n:")) != EOF) { 122 switch (ch) { 123 case 'd': 124 NgSetDebug(NgSetDebug(-1) + 1); 125 break; 126 case 'f': 127 if (strcmp(optarg, "-") == 0) 128 fp = stdin; 129 else if ((fp = fopen(optarg, "r")) == NULL) 130 err(EX_NOINPUT, "%s", optarg); 131 break; 132 case 'n': 133 snprintf(name, sizeof(name), "%s", optarg); 134 break; 135 case '?': 136 default: 137 Usage((char *)NULL); 138 break; 139 } 140 } 141 ac -= optind; 142 av += optind; 143 144 /* Create a new socket node */ 145 if (NgMkSockNode(name, &csock, &dsock) < 0) 146 err(EX_OSERR, "can't create node"); 147 148 /* Do commands as requested */ 149 if (ac == 0) { 150 if (fp != NULL) { 151 rtn = ReadFile(fp); 152 } else if (interactive) { 153 rtn = DoInteractive(); 154 } else 155 Usage("no command specified"); 156 } else { 157 rtn = DoCommand(ac, av); 158 } 159 160 /* Convert command return code into system exit code */ 161 switch (rtn) { 162 case CMDRTN_OK: 163 case CMDRTN_QUIT: 164 rtn = 0; 165 break; 166 case CMDRTN_USAGE: 167 rtn = EX_USAGE; 168 break; 169 case CMDRTN_ERROR: 170 rtn = EX_OSERR; 171 break; 172 } 173 return(rtn); 174 } 175 176 /* 177 * Process commands from a file 178 */ 179 static int 180 ReadFile(FILE *fp) 181 { 182 char line[LINE_MAX]; 183 int num, rtn; 184 185 for (num = 1; fgets(line, sizeof(line), fp) != NULL; num++) { 186 if (*line == '#') 187 continue; 188 if ((rtn = DoParseCommand(line)) != 0) { 189 warnx("line %d: error in file", num); 190 return(rtn); 191 } 192 } 193 return(CMDRTN_OK); 194 } 195 196 /* 197 * Interactive mode 198 */ 199 static int 200 DoInteractive(void) 201 { 202 const int maxfd = MAX(csock, dsock) + 1; 203 204 (*help_cmd.func)(0, NULL); 205 while (1) { 206 struct timeval tv; 207 fd_set rfds; 208 209 /* See if any data or control messages are arriving */ 210 FD_ZERO(&rfds); 211 FD_SET(csock, &rfds); 212 FD_SET(dsock, &rfds); 213 memset(&tv, 0, sizeof(tv)); 214 if (select(maxfd, &rfds, NULL, NULL, &tv) <= 0) { 215 216 /* Issue prompt and wait for anything to happen */ 217 printf("%s", PROMPT); 218 fflush(stdout); 219 FD_ZERO(&rfds); 220 FD_SET(0, &rfds); 221 FD_SET(csock, &rfds); 222 FD_SET(dsock, &rfds); 223 if (select(maxfd, &rfds, NULL, NULL, NULL) < 0) 224 err(EX_OSERR, "select"); 225 226 /* If not user input, print a newline first */ 227 if (!FD_ISSET(0, &rfds)) 228 printf("\n"); 229 } 230 231 /* Display any incoming control message */ 232 while (FD_ISSET(csock, &rfds)) { 233 u_char buf[2 * sizeof(struct ng_mesg) + 8192]; 234 struct ng_mesg *const m = (struct ng_mesg *)buf; 235 struct ng_mesg *const ascii = (struct ng_mesg *)m->data; 236 char path[NG_PATHLEN+1]; 237 238 /* Get incoming message (in binary form) */ 239 if (NgRecvMsg(csock, m, sizeof(buf), path) < 0) { 240 warn("recv incoming message"); 241 break; 242 } 243 244 /* Ask originating node to convert to ASCII */ 245 if (NgSendMsg(csock, path, NGM_GENERIC_COOKIE, 246 NGM_BINARY2ASCII, m, 247 sizeof(*m) + m->header.arglen) < 0 248 || NgRecvMsg(csock, m, sizeof(buf), NULL) < 0) { 249 printf("Rec'd %s %d from \"%s\":\n", 250 (m->header.flags & NGF_RESP) != 0 ? 251 "response" : "command", 252 m->header.cmd, path); 253 if (m->header.arglen == 0) 254 printf("No arguments\n"); 255 else 256 DumpAscii(m->data, m->header.arglen); 257 break; 258 } 259 260 /* Display message in ASCII form */ 261 printf("Rec'd %s \"%s\" (%d) from \"%s\":\n", 262 (ascii->header.flags & NGF_RESP) != 0 ? 263 "response" : "command", 264 ascii->header.cmdstr, ascii->header.cmd, path); 265 if (*ascii->data != '\0') 266 printf("Args:\t%s\n", ascii->data); 267 else 268 printf("No arguments\n"); 269 break; 270 } 271 272 /* Display any incoming data packet */ 273 while (FD_ISSET(dsock, &rfds)) { 274 u_char buf[8192]; 275 char hook[NG_HOOKLEN + 1]; 276 int rl; 277 278 /* Read packet from socket */ 279 if ((rl = NgRecvData(dsock, 280 buf, sizeof(buf), hook)) < 0) 281 err(EX_OSERR, "read(hook)"); 282 if (rl == 0) 283 errx(EX_OSERR, "EOF from hook \"%s\"?", hook); 284 285 /* Write packet to stdout */ 286 printf("Rec'd data packet on hook \"%s\":\n", hook); 287 DumpAscii(buf, rl); 288 break; 289 } 290 291 /* Get any user input */ 292 if (FD_ISSET(0, &rfds)) { 293 char buf[LINE_MAX]; 294 295 if (fgets(buf, sizeof(buf), stdin) == NULL) { 296 printf("\n"); 297 break; 298 } 299 if (DoParseCommand(buf) == CMDRTN_QUIT) 300 break; 301 } 302 } 303 return(CMDRTN_QUIT); 304 } 305 306 /* 307 * Parse a command line and execute the command 308 */ 309 static int 310 DoParseCommand(char *line) 311 { 312 char *av[MAX_ARGS]; 313 int ac; 314 315 /* Parse line */ 316 for (ac = 0, av[0] = strtok(line, WHITESPACE); 317 ac < MAX_ARGS - 1 && av[ac]; 318 av[++ac] = strtok(NULL, WHITESPACE)); 319 320 /* Do command */ 321 return(DoCommand(ac, av)); 322 } 323 324 /* 325 * Execute the command 326 */ 327 static int 328 DoCommand(int ac, char **av) 329 { 330 const struct ngcmd *cmd; 331 int rtn; 332 333 if (ac == 0 || *av[0] == 0) 334 return(CMDRTN_OK); 335 if ((cmd = FindCommand(av[0])) == NULL) 336 return(CMDRTN_ERROR); 337 if ((rtn = (*cmd->func)(ac, av)) == CMDRTN_USAGE) 338 warnx("usage: %s", cmd->cmd); 339 return(rtn); 340 } 341 342 /* 343 * Find a command 344 */ 345 static const struct ngcmd * 346 FindCommand(const char *string) 347 { 348 int k, found = -1; 349 350 for (k = 0; cmds[k] != NULL; k++) { 351 if (MatchCommand(cmds[k], string)) { 352 if (found != -1) { 353 warnx("\"%s\": ambiguous command", string); 354 return(NULL); 355 } 356 found = k; 357 } 358 } 359 if (found == -1) { 360 warnx("\"%s\": unknown command", string); 361 return(NULL); 362 } 363 return(cmds[found]); 364 } 365 366 /* 367 * See if string matches a prefix of "cmd" (or an alias) case insensitively 368 */ 369 static int 370 MatchCommand(const struct ngcmd *cmd, const char *s) 371 { 372 int a; 373 374 /* Try to match command, ignoring the usage stuff */ 375 if (strlen(s) <= strcspn(cmd->cmd, WHITESPACE)) { 376 if (strncasecmp(s, cmd->cmd, strlen(s)) == 0) 377 return (1); 378 } 379 380 /* Try to match aliases */ 381 for (a = 0; a < MAX_CMD_ALIAS && cmd->aliases[a] != NULL; a++) { 382 if (strlen(cmd->aliases[a]) >= strlen(s)) { 383 if (strncasecmp(s, cmd->aliases[a], strlen(s)) == 0) 384 return (1); 385 } 386 } 387 388 /* No match */ 389 return (0); 390 } 391 392 /* 393 * ReadCmd() 394 */ 395 static int 396 ReadCmd(int ac, char **av) 397 { 398 FILE *fp; 399 int rtn; 400 401 /* Open file */ 402 switch (ac) { 403 case 2: 404 if ((fp = fopen(av[1], "r")) == NULL) 405 warn("%s", av[1]); 406 return(CMDRTN_ERROR); 407 default: 408 return(CMDRTN_USAGE); 409 } 410 411 /* Process it */ 412 rtn = ReadFile(fp); 413 fclose(fp); 414 return(rtn); 415 } 416 417 /* 418 * HelpCmd() 419 */ 420 static int 421 HelpCmd(int ac, char **av) 422 { 423 const struct ngcmd *cmd; 424 int k; 425 426 switch (ac) { 427 case 0: 428 case 1: 429 /* Show all commands */ 430 printf("Available commands:\n"); 431 for (k = 0; cmds[k] != NULL; k++) { 432 char *s, buf[100]; 433 434 cmd = cmds[k]; 435 snprintf(buf, sizeof(buf), "%s", cmd->cmd); 436 for (s = buf; *s != '\0' && !isspace(*s); s++); 437 *s = '\0'; 438 printf(" %-10s %s\n", buf, cmd->desc); 439 } 440 return(CMDRTN_OK); 441 default: 442 /* Show help on a specific command */ 443 if ((cmd = FindCommand(av[1])) != NULL) { 444 printf("Usage: %s\n", cmd->cmd); 445 if (cmd->aliases[0] != NULL) { 446 int a = 0; 447 448 printf("Aliases: "); 449 while (1) { 450 printf("%s", cmd->aliases[a++]); 451 if (a == MAX_CMD_ALIAS 452 || cmd->aliases[a] == NULL) { 453 printf("\n"); 454 break; 455 } 456 printf(", "); 457 } 458 } 459 printf("Summary: %s\n", cmd->desc); 460 if (cmd->help != NULL) { 461 const char *s; 462 char buf[65]; 463 int tot, len, done; 464 465 printf("Description:\n"); 466 for (s = cmd->help; *s != '\0'; s += len) { 467 while (isspace(*s)) 468 s++; 469 tot = snprintf(buf, 470 sizeof(buf), "%s", s); 471 len = strlen(buf); 472 done = len == tot; 473 if (!done) { 474 while (len > 0 475 && !isspace(buf[len-1])) 476 buf[--len] = '\0'; 477 } 478 printf(" %s\n", buf); 479 } 480 } 481 } 482 } 483 return(CMDRTN_OK); 484 } 485 486 /* 487 * QuitCmd() 488 */ 489 static int 490 QuitCmd(int ac, char **av) 491 { 492 return(CMDRTN_QUIT); 493 } 494 495 /* 496 * Dump data in hex and ASCII form 497 */ 498 static void 499 DumpAscii(const u_char *buf, int len) 500 { 501 char ch, sbuf[100]; 502 int k, count; 503 504 for (count = 0; count < len; count += DUMP_BYTES_PER_LINE) { 505 snprintf(sbuf, sizeof(sbuf), "%04x: ", count); 506 for (k = 0; k < DUMP_BYTES_PER_LINE; k++) { 507 if (count + k < len) { 508 snprintf(sbuf + strlen(sbuf), 509 sizeof(sbuf) - strlen(sbuf), 510 "%02x ", buf[count + k]); 511 } else { 512 snprintf(sbuf + strlen(sbuf), 513 sizeof(sbuf) - strlen(sbuf), " "); 514 } 515 } 516 snprintf(sbuf + strlen(sbuf), sizeof(sbuf) - strlen(sbuf), " "); 517 for (k = 0; k < DUMP_BYTES_PER_LINE; k++) { 518 if (count + k < len) { 519 ch = isprint(buf[count + k]) ? 520 buf[count + k] : '.'; 521 snprintf(sbuf + strlen(sbuf), 522 sizeof(sbuf) - strlen(sbuf), "%c", ch); 523 } else { 524 snprintf(sbuf + strlen(sbuf), 525 sizeof(sbuf) - strlen(sbuf), " "); 526 } 527 } 528 printf("%s\n", sbuf); 529 } 530 } 531 532 /* 533 * Usage() 534 */ 535 static void 536 Usage(const char *msg) 537 { 538 if (msg) 539 warnx("%s", msg); 540 errx(EX_USAGE, "usage: ngctl [-d] [-f file] [-n name] [command ...]"); 541 } 542 543