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 <sys/param.h> 42 #include <sys/socket.h> 43 #include <sys/select.h> 44 45 #include <ctype.h> 46 #include <err.h> 47 #include <errno.h> 48 #include <limits.h> 49 #include <stdio.h> 50 #include <stdlib.h> 51 #include <string.h> 52 #include <sysexits.h> 53 #include <unistd.h> 54 #ifdef EDITLINE 55 #include <signal.h> 56 #include <histedit.h> 57 #include <pthread.h> 58 #endif 59 60 #include <netgraph.h> 61 62 #include "ngctl.h" 63 64 #define PROMPT "+ " 65 #define MAX_ARGS 512 66 #define WHITESPACE " \t\r\n\v\f" 67 #define DUMP_BYTES_PER_LINE 16 68 69 /* Internal functions */ 70 static int ReadFile(FILE *fp); 71 static void ReadSockets(fd_set *); 72 static int DoParseCommand(char *line); 73 static int DoCommand(int ac, char **av); 74 static int DoInteractive(void); 75 static const struct ngcmd *FindCommand(const char *string); 76 static int MatchCommand(const struct ngcmd *cmd, const char *s); 77 static void Usage(const char *msg); 78 static int ReadCmd(int ac, char **av); 79 static int HelpCmd(int ac, char **av); 80 static int QuitCmd(int ac, char **av); 81 #ifdef EDITLINE 82 static sig_atomic_t unblock; 83 static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER; 84 static pthread_cond_t cond = PTHREAD_COND_INITIALIZER; 85 #endif 86 87 /* List of commands */ 88 static const struct ngcmd *const cmds[] = { 89 &config_cmd, 90 &connect_cmd, 91 &debug_cmd, 92 &dot_cmd, 93 &help_cmd, 94 &list_cmd, 95 &mkpeer_cmd, 96 &msg_cmd, 97 &name_cmd, 98 &read_cmd, 99 &rmhook_cmd, 100 &show_cmd, 101 &shutdown_cmd, 102 &status_cmd, 103 &types_cmd, 104 &write_cmd, 105 &quit_cmd, 106 NULL 107 }; 108 109 /* Commands defined in this file */ 110 const struct ngcmd read_cmd = { 111 ReadCmd, 112 "read <filename>", 113 "Read and execute commands from a file", 114 NULL, 115 { "source", "." } 116 }; 117 const struct ngcmd help_cmd = { 118 HelpCmd, 119 "help [command]", 120 "Show command summary or get more help on a specific command", 121 NULL, 122 { "?" } 123 }; 124 const struct ngcmd quit_cmd = { 125 QuitCmd, 126 "quit", 127 "Exit program", 128 NULL, 129 { "exit" } 130 }; 131 132 /* Our control and data sockets */ 133 int csock, dsock; 134 135 /* 136 * main() 137 */ 138 int 139 main(int ac, char *av[]) 140 { 141 char name[NG_NODESIZ]; 142 int interactive = isatty(0) && isatty(1); 143 FILE *fp = NULL; 144 int ch, rtn = 0; 145 146 /* Set default node name */ 147 snprintf(name, sizeof(name), "ngctl%d", getpid()); 148 149 /* Parse command line */ 150 while ((ch = getopt(ac, av, "df:n:")) != -1) { 151 switch (ch) { 152 case 'd': 153 NgSetDebug(NgSetDebug(-1) + 1); 154 break; 155 case 'f': 156 if (strcmp(optarg, "-") == 0) 157 fp = stdin; 158 else if ((fp = fopen(optarg, "r")) == NULL) 159 err(EX_NOINPUT, "%s", optarg); 160 break; 161 case 'n': 162 snprintf(name, sizeof(name), "%s", optarg); 163 break; 164 case '?': 165 default: 166 Usage((char *)NULL); 167 break; 168 } 169 } 170 ac -= optind; 171 av += optind; 172 173 /* Create a new socket node */ 174 if (NgMkSockNode(name, &csock, &dsock) < 0) 175 err(EX_OSERR, "can't create node"); 176 177 /* Do commands as requested */ 178 if (ac == 0) { 179 if (fp != NULL) { 180 rtn = ReadFile(fp); 181 } else if (interactive) { 182 rtn = DoInteractive(); 183 } else 184 Usage("no command specified"); 185 } else { 186 rtn = DoCommand(ac, av); 187 } 188 189 /* Convert command return code into system exit code */ 190 switch (rtn) { 191 case CMDRTN_OK: 192 case CMDRTN_QUIT: 193 rtn = 0; 194 break; 195 case CMDRTN_USAGE: 196 rtn = EX_USAGE; 197 break; 198 case CMDRTN_ERROR: 199 rtn = EX_OSERR; 200 break; 201 } 202 return (rtn); 203 } 204 205 /* 206 * Process commands from a file 207 */ 208 static int 209 ReadFile(FILE *fp) 210 { 211 char line[LINE_MAX]; 212 int num, rtn; 213 214 for (num = 1; fgets(line, sizeof(line), fp) != NULL; num++) { 215 if (*line == '#') 216 continue; 217 if ((rtn = DoParseCommand(line)) != 0) { 218 warnx("line %d: error in file", num); 219 return (rtn); 220 } 221 } 222 return (CMDRTN_OK); 223 } 224 225 #ifdef EDITLINE 226 /* Signal handler for Monitor() thread. */ 227 static void 228 Unblock(int signal) 229 { 230 231 unblock = 1; 232 } 233 234 /* 235 * Thread that monitors csock and dsock while main thread 236 * can be blocked in el_gets(). 237 */ 238 static void * 239 Monitor(void *v) 240 { 241 struct sigaction act; 242 const int maxfd = MAX(csock, dsock) + 1; 243 244 act.sa_handler = Unblock; 245 sigemptyset(&act.sa_mask); 246 act.sa_flags = 0; 247 sigaction(SIGUSR1, &act, NULL); 248 249 pthread_mutex_lock(&mutex); 250 for (;;) { 251 fd_set rfds; 252 253 /* See if any data or control messages are arriving. */ 254 FD_ZERO(&rfds); 255 FD_SET(csock, &rfds); 256 FD_SET(dsock, &rfds); 257 unblock = 0; 258 if (select(maxfd, &rfds, NULL, NULL, NULL) <= 0) { 259 if (errno == EINTR) { 260 if (unblock == 1) 261 pthread_cond_wait(&cond, &mutex); 262 continue; 263 } 264 err(EX_OSERR, "select"); 265 } 266 ReadSockets(&rfds); 267 } 268 269 return (NULL); 270 } 271 272 static char * 273 Prompt(EditLine *el) 274 { 275 276 return (PROMPT); 277 } 278 279 /* 280 * Here we start a thread, that will monitor the netgraph 281 * sockets and catch any unexpected messages or data on them, 282 * that can arrive while user edits his/her commands. 283 * 284 * Whenever we expect data on netgraph sockets, we send signal 285 * to monitoring thread. The signal forces it to exit select() 286 * system call and sleep on condvar until we wake it. While 287 * monitoring thread sleeps, we can do our work with netgraph 288 * sockets. 289 */ 290 static int 291 DoInteractive(void) 292 { 293 pthread_t monitor; 294 EditLine *el; 295 History *hist; 296 HistEvent hev = { 0, "" }; 297 298 (*help_cmd.func)(0, NULL); 299 pthread_create(&monitor, NULL, Monitor, NULL); 300 el = el_init(getprogname(), stdin, stdout, stderr); 301 if (el == NULL) 302 return (CMDRTN_ERROR); 303 el_set(el, EL_PROMPT, Prompt); 304 el_set(el, EL_SIGNAL, 1); 305 el_set(el, EL_EDITOR, "emacs"); 306 hist = history_init(); 307 if (hist == NULL) 308 return (CMDRTN_ERROR); 309 history(hist, &hev, H_SETSIZE, 100); 310 history(hist, &hev, H_SETUNIQUE, 1); 311 el_set(el, EL_HIST, history, (const char *)hist); 312 el_source(el, NULL); 313 314 for (;;) { 315 const char *buf; 316 int count; 317 318 if ((buf = el_gets(el, &count)) == NULL) { 319 printf("\n"); 320 break; 321 } 322 history(hist, &hev, H_ENTER, buf); 323 pthread_kill(monitor, SIGUSR1); 324 pthread_mutex_lock(&mutex); 325 if (DoParseCommand((char *)buf) == CMDRTN_QUIT) 326 break; 327 pthread_cond_signal(&cond); 328 pthread_mutex_unlock(&mutex); 329 } 330 331 history_end(hist); 332 el_end(el); 333 pthread_cancel(monitor); 334 335 return (CMDRTN_QUIT); 336 } 337 338 #else /* !EDITLINE */ 339 340 /* 341 * Interactive mode w/o libedit functionality. 342 */ 343 static int 344 DoInteractive(void) 345 { 346 const int maxfd = MAX(csock, dsock) + 1; 347 348 (*help_cmd.func)(0, NULL); 349 while (1) { 350 struct timeval tv; 351 fd_set rfds; 352 353 /* See if any data or control messages are arriving */ 354 FD_ZERO(&rfds); 355 FD_SET(csock, &rfds); 356 FD_SET(dsock, &rfds); 357 memset(&tv, 0, sizeof(tv)); 358 if (select(maxfd, &rfds, NULL, NULL, &tv) <= 0) { 359 360 /* Issue prompt and wait for anything to happen */ 361 printf("%s", PROMPT); 362 fflush(stdout); 363 FD_ZERO(&rfds); 364 FD_SET(0, &rfds); 365 FD_SET(csock, &rfds); 366 FD_SET(dsock, &rfds); 367 if (select(maxfd, &rfds, NULL, NULL, NULL) < 0) 368 err(EX_OSERR, "select"); 369 370 /* If not user input, print a newline first */ 371 if (!FD_ISSET(0, &rfds)) 372 printf("\n"); 373 } 374 375 ReadSockets(&rfds); 376 377 /* Get any user input */ 378 if (FD_ISSET(0, &rfds)) { 379 char buf[LINE_MAX]; 380 381 if (fgets(buf, sizeof(buf), stdin) == NULL) { 382 printf("\n"); 383 break; 384 } 385 if (DoParseCommand(buf) == CMDRTN_QUIT) 386 break; 387 } 388 } 389 return (CMDRTN_QUIT); 390 } 391 #endif /* !EDITLINE */ 392 393 /* 394 * Read and process data on netgraph control and data sockets. 395 */ 396 static void 397 ReadSockets(fd_set *rfds) 398 { 399 /* Display any incoming control message. */ 400 if (FD_ISSET(csock, rfds)) 401 MsgRead(); 402 403 /* Display any incoming data packet. */ 404 if (FD_ISSET(dsock, rfds)) { 405 char hook[NG_HOOKSIZ]; 406 u_char *buf; 407 int rl; 408 409 /* Read packet from socket. */ 410 if ((rl = NgAllocRecvData(dsock, &buf, hook)) < 0) 411 err(EX_OSERR, "reading hook \"%s\"", hook); 412 if (rl == 0) 413 errx(EX_OSERR, "EOF from hook \"%s\"?", hook); 414 415 /* Write packet to stdout. */ 416 printf("Rec'd data packet on hook \"%s\":\n", hook); 417 DumpAscii(buf, rl); 418 free(buf); 419 } 420 } 421 422 /* 423 * Parse a command line and execute the command 424 */ 425 static int 426 DoParseCommand(char *line) 427 { 428 char *av[MAX_ARGS]; 429 int ac; 430 431 /* Parse line */ 432 for (ac = 0, av[0] = strtok(line, WHITESPACE); 433 ac < MAX_ARGS - 1 && av[ac]; 434 av[++ac] = strtok(NULL, WHITESPACE)); 435 436 /* Do command */ 437 return (DoCommand(ac, av)); 438 } 439 440 /* 441 * Execute the command 442 */ 443 static int 444 DoCommand(int ac, char **av) 445 { 446 const struct ngcmd *cmd; 447 int rtn; 448 449 if (ac == 0 || *av[0] == 0) 450 return (CMDRTN_OK); 451 if ((cmd = FindCommand(av[0])) == NULL) 452 return (CMDRTN_ERROR); 453 if ((rtn = (*cmd->func)(ac, av)) == CMDRTN_USAGE) 454 warnx("usage: %s", cmd->cmd); 455 return (rtn); 456 } 457 458 /* 459 * Find a command 460 */ 461 static const struct ngcmd * 462 FindCommand(const char *string) 463 { 464 int k, found = -1; 465 466 for (k = 0; cmds[k] != NULL; k++) { 467 if (MatchCommand(cmds[k], string)) { 468 if (found != -1) { 469 warnx("\"%s\": ambiguous command", string); 470 return (NULL); 471 } 472 found = k; 473 } 474 } 475 if (found == -1) { 476 warnx("\"%s\": unknown command", string); 477 return (NULL); 478 } 479 return (cmds[found]); 480 } 481 482 /* 483 * See if string matches a prefix of "cmd" (or an alias) case insensitively 484 */ 485 static int 486 MatchCommand(const struct ngcmd *cmd, const char *s) 487 { 488 int a; 489 490 /* Try to match command, ignoring the usage stuff */ 491 if (strlen(s) <= strcspn(cmd->cmd, WHITESPACE)) { 492 if (strncasecmp(s, cmd->cmd, strlen(s)) == 0) 493 return (1); 494 } 495 496 /* Try to match aliases */ 497 for (a = 0; a < MAX_CMD_ALIAS && cmd->aliases[a] != NULL; a++) { 498 if (strlen(cmd->aliases[a]) >= strlen(s)) { 499 if (strncasecmp(s, cmd->aliases[a], strlen(s)) == 0) 500 return (1); 501 } 502 } 503 504 /* No match */ 505 return (0); 506 } 507 508 /* 509 * ReadCmd() 510 */ 511 static int 512 ReadCmd(int ac, char **av) 513 { 514 FILE *fp; 515 int rtn; 516 517 /* Open file */ 518 switch (ac) { 519 case 2: 520 if ((fp = fopen(av[1], "r")) == NULL) { 521 warn("%s", av[1]); 522 return (CMDRTN_ERROR); 523 } 524 break; 525 default: 526 return (CMDRTN_USAGE); 527 } 528 529 /* Process it */ 530 rtn = ReadFile(fp); 531 fclose(fp); 532 return (rtn); 533 } 534 535 /* 536 * HelpCmd() 537 */ 538 static int 539 HelpCmd(int ac, char **av) 540 { 541 const struct ngcmd *cmd; 542 int k; 543 544 switch (ac) { 545 case 0: 546 case 1: 547 /* Show all commands */ 548 printf("Available commands:\n"); 549 for (k = 0; cmds[k] != NULL; k++) { 550 char *s, buf[100]; 551 552 cmd = cmds[k]; 553 snprintf(buf, sizeof(buf), "%s", cmd->cmd); 554 for (s = buf; *s != '\0' && !isspace(*s); s++); 555 *s = '\0'; 556 printf(" %-10s %s\n", buf, cmd->desc); 557 } 558 return (CMDRTN_OK); 559 default: 560 /* Show help on a specific command */ 561 if ((cmd = FindCommand(av[1])) != NULL) { 562 printf("usage: %s\n", cmd->cmd); 563 if (cmd->aliases[0] != NULL) { 564 int a = 0; 565 566 printf("Aliases: "); 567 while (1) { 568 printf("%s", cmd->aliases[a++]); 569 if (a == MAX_CMD_ALIAS 570 || cmd->aliases[a] == NULL) { 571 printf("\n"); 572 break; 573 } 574 printf(", "); 575 } 576 } 577 printf("Summary: %s\n", cmd->desc); 578 if (cmd->help != NULL) { 579 const char *s; 580 char buf[65]; 581 int tot, len, done; 582 583 printf("Description:\n"); 584 for (s = cmd->help; *s != '\0'; s += len) { 585 while (isspace(*s)) 586 s++; 587 tot = snprintf(buf, 588 sizeof(buf), "%s", s); 589 len = strlen(buf); 590 done = len == tot; 591 if (!done) { 592 while (len > 0 593 && !isspace(buf[len-1])) 594 buf[--len] = '\0'; 595 } 596 printf(" %s\n", buf); 597 } 598 } 599 } 600 } 601 return (CMDRTN_OK); 602 } 603 604 /* 605 * QuitCmd() 606 */ 607 static int 608 QuitCmd(int ac __unused, char **av __unused) 609 { 610 return (CMDRTN_QUIT); 611 } 612 613 /* 614 * Dump data in hex and ASCII form 615 */ 616 void 617 DumpAscii(const u_char *buf, int len) 618 { 619 char ch, sbuf[100]; 620 int k, count; 621 622 for (count = 0; count < len; count += DUMP_BYTES_PER_LINE) { 623 snprintf(sbuf, sizeof(sbuf), "%04x: ", count); 624 for (k = 0; k < DUMP_BYTES_PER_LINE; k++) { 625 if (count + k < len) { 626 snprintf(sbuf + strlen(sbuf), 627 sizeof(sbuf) - strlen(sbuf), 628 "%02x ", buf[count + k]); 629 } else { 630 snprintf(sbuf + strlen(sbuf), 631 sizeof(sbuf) - strlen(sbuf), " "); 632 } 633 } 634 snprintf(sbuf + strlen(sbuf), sizeof(sbuf) - strlen(sbuf), " "); 635 for (k = 0; k < DUMP_BYTES_PER_LINE; k++) { 636 if (count + k < len) { 637 ch = isprint(buf[count + k]) ? 638 buf[count + k] : '.'; 639 snprintf(sbuf + strlen(sbuf), 640 sizeof(sbuf) - strlen(sbuf), "%c", ch); 641 } else { 642 snprintf(sbuf + strlen(sbuf), 643 sizeof(sbuf) - strlen(sbuf), " "); 644 } 645 } 646 printf("%s\n", sbuf); 647 } 648 } 649 650 /* 651 * Usage() 652 */ 653 static void 654 Usage(const char *msg) 655 { 656 if (msg) 657 warnx("%s", msg); 658 fprintf(stderr, 659 "usage: ngctl [-d] [-f file] [-n name] [command ...]\n"); 660 exit(EX_USAGE); 661 } 662