1 /* $NetBSD: main.c,v 1.123 2015/04/23 23:31:23 lukem Exp $ */ 2 3 /*- 4 * Copyright (c) 1996-2015 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Luke Mewburn. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 /* 33 * Copyright (c) 1985, 1989, 1993, 1994 34 * The Regents of the University of California. All rights reserved. 35 * 36 * Redistribution and use in source and binary forms, with or without 37 * modification, are permitted provided that the following conditions 38 * are met: 39 * 1. Redistributions of source code must retain the above copyright 40 * notice, this list of conditions and the following disclaimer. 41 * 2. Redistributions in binary form must reproduce the above copyright 42 * notice, this list of conditions and the following disclaimer in the 43 * documentation and/or other materials provided with the distribution. 44 * 3. Neither the name of the University nor the names of its contributors 45 * may be used to endorse or promote products derived from this software 46 * without specific prior written permission. 47 * 48 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 49 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 50 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 51 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 52 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 53 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 54 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 55 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 56 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 57 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 58 * SUCH DAMAGE. 59 */ 60 61 /* 62 * Copyright (C) 1997 and 1998 WIDE Project. 63 * All rights reserved. 64 * 65 * Redistribution and use in source and binary forms, with or without 66 * modification, are permitted provided that the following conditions 67 * are met: 68 * 1. Redistributions of source code must retain the above copyright 69 * notice, this list of conditions and the following disclaimer. 70 * 2. Redistributions in binary form must reproduce the above copyright 71 * notice, this list of conditions and the following disclaimer in the 72 * documentation and/or other materials provided with the distribution. 73 * 3. Neither the name of the project nor the names of its contributors 74 * may be used to endorse or promote products derived from this software 75 * without specific prior written permission. 76 * 77 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND 78 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 79 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 80 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE 81 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 82 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 83 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 84 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 85 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 86 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 87 * SUCH DAMAGE. 88 */ 89 90 #include <sys/cdefs.h> 91 #ifndef lint 92 __COPYRIGHT("@(#) Copyright (c) 1985, 1989, 1993, 1994\ 93 The Regents of the University of California. All rights reserved.\ 94 Copyright 1996-2015 The NetBSD Foundation, Inc. All rights reserved"); 95 #endif /* not lint */ 96 97 #ifndef lint 98 #if 0 99 static char sccsid[] = "@(#)main.c 8.6 (Berkeley) 10/9/94"; 100 #else 101 __RCSID("$NetBSD: main.c,v 1.123 2015/04/23 23:31:23 lukem Exp $"); 102 #endif 103 #endif /* not lint */ 104 105 /* 106 * FTP User Program -- Command Interface. 107 */ 108 #include <sys/types.h> 109 #include <sys/socket.h> 110 111 #include <err.h> 112 #include <errno.h> 113 #include <netdb.h> 114 #include <paths.h> 115 #include <pwd.h> 116 #include <signal.h> 117 #include <stdio.h> 118 #include <stdlib.h> 119 #include <string.h> 120 #include <time.h> 121 #include <unistd.h> 122 #include <locale.h> 123 124 #define GLOBAL /* force GLOBAL decls in ftp_var.h to be declared */ 125 #include "ftp_var.h" 126 127 #define FTP_PROXY "ftp_proxy" /* env var with FTP proxy location */ 128 #define HTTP_PROXY "http_proxy" /* env var with HTTP proxy location */ 129 #define HTTPS_PROXY "https_proxy" /* env var with HTTPS proxy location */ 130 #define NO_PROXY "no_proxy" /* env var with list of non-proxied 131 * hosts, comma or space separated */ 132 133 __dead static void usage(void); 134 static void setupoption(const char *, const char *, const char *); 135 136 int 137 main(int volatile argc, char **volatile argv) 138 { 139 int ch, rval; 140 struct passwd *pw; 141 char *cp, *ep, *anonpass, *upload_path, *src_addr; 142 const char *anonuser; 143 int dumbterm, isupload; 144 size_t len; 145 146 tzset(); 147 setlocale(LC_ALL, ""); 148 setprogname(argv[0]); 149 150 sigint_raised = 0; 151 152 ftpport = "ftp"; 153 httpport = "http"; 154 #ifdef WITH_SSL 155 httpsport = "https"; 156 #endif 157 gateport = NULL; 158 cp = getenv("FTPSERVERPORT"); 159 if (cp != NULL) 160 gateport = cp; 161 else 162 gateport = "ftpgate"; 163 doglob = 1; 164 interactive = 1; 165 autologin = 1; 166 passivemode = 1; 167 activefallback = 1; 168 preserve = 1; 169 verbose = 0; 170 progress = 0; 171 gatemode = 0; 172 data = -1; 173 outfile = NULL; 174 restartautofetch = 0; 175 #ifndef NO_EDITCOMPLETE 176 editing = 0; 177 el = NULL; 178 hist = NULL; 179 #endif 180 bytes = 0; 181 mark = HASHBYTES; 182 rate_get = 0; 183 rate_get_incr = DEFAULTINCR; 184 rate_put = 0; 185 rate_put_incr = DEFAULTINCR; 186 #ifdef INET6 187 epsv4 = 1; 188 epsv6 = 1; 189 #else 190 epsv4 = 0; 191 epsv6 = 0; 192 #endif 193 epsv4bad = 0; 194 epsv6bad = 0; 195 src_addr = NULL; 196 upload_path = NULL; 197 isupload = 0; 198 reply_callback = NULL; 199 #ifdef INET6 200 family = AF_UNSPEC; 201 #else 202 family = AF_INET; /* force AF_INET if no INET6 support */ 203 #endif 204 205 netrc[0] = '\0'; 206 cp = getenv("NETRC"); 207 if (cp != NULL && strlcpy(netrc, cp, sizeof(netrc)) >= sizeof(netrc)) 208 errx(1, "$NETRC `%s': %s", cp, strerror(ENAMETOOLONG)); 209 210 marg_sl = ftp_sl_init(); 211 if ((tmpdir = getenv("TMPDIR")) == NULL) 212 tmpdir = _PATH_TMP; 213 214 /* Set default operation mode based on FTPMODE environment variable */ 215 if ((cp = getenv("FTPMODE")) != NULL) { 216 if (strcasecmp(cp, "passive") == 0) { 217 passivemode = 1; 218 activefallback = 0; 219 } else if (strcasecmp(cp, "active") == 0) { 220 passivemode = 0; 221 activefallback = 0; 222 } else if (strcasecmp(cp, "gate") == 0) { 223 gatemode = 1; 224 } else if (strcasecmp(cp, "auto") == 0) { 225 passivemode = 1; 226 activefallback = 1; 227 } else 228 warnx("Unknown $FTPMODE `%s'; using defaults", cp); 229 } 230 231 if (strcmp(getprogname(), "pftp") == 0) { 232 passivemode = 1; 233 activefallback = 0; 234 } else if (strcmp(getprogname(), "gate-ftp") == 0) 235 gatemode = 1; 236 237 gateserver = getenv("FTPSERVER"); 238 if (gateserver == NULL || *gateserver == '\0') 239 gateserver = GATE_SERVER; 240 if (gatemode) { 241 if (*gateserver == '\0') { 242 warnx( 243 "Neither $FTPSERVER nor GATE_SERVER is defined; disabling gate-ftp"); 244 gatemode = 0; 245 } 246 } 247 248 cp = getenv("TERM"); 249 if (cp == NULL || strcmp(cp, "dumb") == 0) 250 dumbterm = 1; 251 else 252 dumbterm = 0; 253 fromatty = isatty(fileno(stdin)); 254 ttyout = stdout; 255 if (isatty(fileno(ttyout))) { 256 verbose = 1; /* verbose if to a tty */ 257 if (! dumbterm) { 258 #ifndef NO_EDITCOMPLETE 259 if (fromatty) /* editing mode on if tty is usable */ 260 editing = 1; 261 #endif 262 #ifndef NO_PROGRESS 263 if (foregroundproc()) 264 progress = 1; /* progress bar on if fg */ 265 #endif 266 } 267 } 268 269 while ((ch = getopt(argc, argv, "46AadefginN:o:pP:q:r:Rs:tT:u:vVx:")) != -1) { 270 switch (ch) { 271 case '4': 272 family = AF_INET; 273 break; 274 275 case '6': 276 #ifdef INET6 277 family = AF_INET6; 278 #else 279 warnx("INET6 support is not available; ignoring -6"); 280 #endif 281 break; 282 283 case 'A': 284 activefallback = 0; 285 passivemode = 0; 286 break; 287 288 case 'a': 289 anonftp = 1; 290 break; 291 292 case 'd': 293 options |= SO_DEBUG; 294 ftp_debug++; 295 break; 296 297 case 'e': 298 #ifndef NO_EDITCOMPLETE 299 editing = 0; 300 #endif 301 break; 302 303 case 'f': 304 flushcache = 1; 305 break; 306 307 case 'g': 308 doglob = 0; 309 break; 310 311 case 'i': 312 interactive = 0; 313 break; 314 315 case 'n': 316 autologin = 0; 317 break; 318 319 case 'N': 320 if (strlcpy(netrc, optarg, sizeof(netrc)) 321 >= sizeof(netrc)) 322 errx(1, "%s: %s", optarg, 323 strerror(ENAMETOOLONG)); 324 break; 325 326 case 'o': 327 outfile = optarg; 328 if (strcmp(outfile, "-") == 0) 329 ttyout = stderr; 330 break; 331 332 case 'p': 333 passivemode = 1; 334 activefallback = 0; 335 break; 336 337 case 'P': 338 ftpport = optarg; 339 break; 340 341 case 'q': 342 quit_time = strtol(optarg, &ep, 10); 343 if (quit_time < 1 || *ep != '\0') 344 errx(1, "Bad quit value: %s", optarg); 345 break; 346 347 case 'r': 348 retry_connect = strtol(optarg, &ep, 10); 349 if (retry_connect < 1 || *ep != '\0') 350 errx(1, "Bad retry value: %s", optarg); 351 break; 352 353 case 'R': 354 restartautofetch = 1; 355 break; 356 357 case 's': 358 src_addr = optarg; 359 break; 360 361 case 't': 362 trace = 1; 363 break; 364 365 case 'T': 366 { 367 int targc; 368 char *targv[6], *oac; 369 char cmdbuf[MAX_C_NAME]; 370 371 /* look for `dir,max[,incr]' */ 372 targc = 0; 373 (void)strlcpy(cmdbuf, "-T", sizeof(cmdbuf)); 374 targv[targc++] = cmdbuf; 375 oac = ftp_strdup(optarg); 376 377 while ((cp = strsep(&oac, ",")) != NULL) { 378 if (*cp == '\0') { 379 warnx("Bad throttle value `%s'", 380 optarg); 381 usage(); 382 /* NOTREACHED */ 383 } 384 targv[targc++] = cp; 385 if (targc >= 5) 386 break; 387 } 388 if (parserate(targc, targv, 1) == -1) 389 usage(); 390 free(oac); 391 break; 392 } 393 394 case 'u': 395 { 396 isupload = 1; 397 interactive = 0; 398 upload_path = ftp_strdup(optarg); 399 400 break; 401 } 402 403 case 'v': 404 progress = verbose = 1; 405 break; 406 407 case 'V': 408 progress = verbose = 0; 409 break; 410 411 case 'x': 412 sndbuf_size = strsuftoi(optarg); 413 if (sndbuf_size < 1) 414 errx(1, "Bad xferbuf value: %s", optarg); 415 rcvbuf_size = sndbuf_size; 416 break; 417 418 default: 419 usage(); 420 } 421 } 422 /* set line buffering on ttyout */ 423 setvbuf(ttyout, NULL, _IOLBF, 0); 424 argc -= optind; 425 argv += optind; 426 427 cpend = 0; /* no pending replies */ 428 proxy = 0; /* proxy not active */ 429 crflag = 1; /* strip c.r. on ascii gets */ 430 sendport = -1; /* not using ports */ 431 432 if (src_addr != NULL) { 433 struct addrinfo hints; 434 int error; 435 436 memset(&hints, 0, sizeof(hints)); 437 hints.ai_family = family; 438 hints.ai_socktype = SOCK_STREAM; 439 hints.ai_flags = AI_PASSIVE; 440 error = getaddrinfo(src_addr, NULL, &hints, &bindai); 441 if (error) { 442 errx(1, "Can't lookup `%s': %s", src_addr, 443 (error == EAI_SYSTEM) ? strerror(errno) 444 : gai_strerror(error)); 445 } 446 } 447 448 /* 449 * Cache the user name and home directory. 450 */ 451 localhome = NULL; 452 localname = NULL; 453 anonuser = "anonymous"; 454 cp = getenv("HOME"); 455 if (! EMPTYSTRING(cp)) 456 localhome = ftp_strdup(cp); 457 pw = NULL; 458 cp = getlogin(); 459 if (cp != NULL) 460 pw = getpwnam(cp); 461 if (pw == NULL) 462 pw = getpwuid(getuid()); 463 if (pw != NULL) { 464 if (localhome == NULL && !EMPTYSTRING(pw->pw_dir)) 465 localhome = ftp_strdup(pw->pw_dir); 466 localname = ftp_strdup(pw->pw_name); 467 anonuser = localname; 468 } 469 if (netrc[0] == '\0' && localhome != NULL) { 470 if (strlcpy(netrc, localhome, sizeof(netrc)) >= sizeof(netrc) || 471 strlcat(netrc, "/.netrc", sizeof(netrc)) >= sizeof(netrc)) { 472 warnx("%s/.netrc: %s", localhome, 473 strerror(ENAMETOOLONG)); 474 netrc[0] = '\0'; 475 } 476 } 477 if (localhome == NULL) 478 localhome = ftp_strdup("/"); 479 480 /* 481 * Every anonymous FTP server I've encountered will accept the 482 * string "username@", and will append the hostname itself. We 483 * do this by default since many servers are picky about not 484 * having a FQDN in the anonymous password. 485 * - thorpej@NetBSD.org 486 */ 487 len = strlen(anonuser) + 2; 488 anonpass = ftp_malloc(len); 489 (void)strlcpy(anonpass, anonuser, len); 490 (void)strlcat(anonpass, "@", len); 491 492 /* 493 * set all the defaults for options defined in 494 * struct option optiontab[] declared in cmdtab.c 495 */ 496 setupoption("anonpass", getenv("FTPANONPASS"), anonpass); 497 setupoption("ftp_proxy", getenv(FTP_PROXY), ""); 498 setupoption("http_proxy", getenv(HTTP_PROXY), ""); 499 setupoption("https_proxy", getenv(HTTPS_PROXY), ""); 500 setupoption("no_proxy", getenv(NO_PROXY), ""); 501 setupoption("pager", getenv("PAGER"), DEFAULTPAGER); 502 setupoption("prompt", getenv("FTPPROMPT"), DEFAULTPROMPT); 503 setupoption("rprompt", getenv("FTPRPROMPT"), DEFAULTRPROMPT); 504 505 free(anonpass); 506 507 setttywidth(0); 508 #ifdef SIGINFO 509 (void)xsignal(SIGINFO, psummary); 510 #endif 511 (void)xsignal(SIGQUIT, psummary); 512 (void)xsignal(SIGUSR1, crankrate); 513 (void)xsignal(SIGUSR2, crankrate); 514 (void)xsignal(SIGWINCH, setttywidth); 515 516 if (argc > 0) { 517 if (isupload) { 518 rval = auto_put(argc, argv, upload_path); 519 sigint_or_rval_exit: 520 if (sigint_raised) { 521 (void)xsignal(SIGINT, SIG_DFL); 522 raise(SIGINT); 523 } 524 exit(rval); 525 } else if (strchr(argv[0], ':') != NULL 526 && ! isipv6addr(argv[0])) { 527 rval = auto_fetch(argc, argv); 528 if (rval >= 0) /* -1 == connected and cd-ed */ 529 goto sigint_or_rval_exit; 530 } else { 531 char *xargv[4], *uuser, *host; 532 char cmdbuf[MAXPATHLEN]; 533 534 if ((rval = sigsetjmp(toplevel, 1))) 535 goto sigint_or_rval_exit; 536 (void)xsignal(SIGINT, intr); 537 (void)xsignal(SIGPIPE, lostpeer); 538 uuser = NULL; 539 host = argv[0]; 540 cp = strchr(host, '@'); 541 if (cp) { 542 *cp = '\0'; 543 uuser = host; 544 host = cp + 1; 545 } 546 (void)strlcpy(cmdbuf, getprogname(), sizeof(cmdbuf)); 547 xargv[0] = cmdbuf; 548 xargv[1] = host; 549 xargv[2] = argv[1]; 550 xargv[3] = NULL; 551 do { 552 int oautologin; 553 554 oautologin = autologin; 555 if (uuser != NULL) { 556 anonftp = 0; 557 autologin = 0; 558 } 559 setpeer(argc+1, xargv); 560 autologin = oautologin; 561 if (connected == 1 && uuser != NULL) 562 (void)ftp_login(host, uuser, NULL); 563 if (!retry_connect) 564 break; 565 if (!connected) { 566 macnum = 0; 567 fprintf(ttyout, 568 "Retrying in %d seconds...\n", 569 retry_connect); 570 sleep(retry_connect); 571 } 572 } while (!connected); 573 retry_connect = 0; /* connected, stop hiding msgs */ 574 } 575 } 576 if (isupload) 577 usage(); 578 579 #ifndef NO_EDITCOMPLETE 580 controlediting(); 581 #endif /* !NO_EDITCOMPLETE */ 582 583 (void)sigsetjmp(toplevel, 1); 584 (void)xsignal(SIGINT, intr); 585 (void)xsignal(SIGPIPE, lostpeer); 586 for (;;) 587 cmdscanner(); 588 } 589 590 /* 591 * Generate a prompt 592 */ 593 char * 594 prompt(void) 595 { 596 static char **promptopt; 597 static char buf[MAXPATHLEN]; 598 599 if (promptopt == NULL) { 600 struct option *o; 601 602 o = getoption("prompt"); 603 if (o == NULL) 604 errx(1, "prompt: no such option `prompt'"); 605 promptopt = &(o->value); 606 } 607 formatbuf(buf, sizeof(buf), *promptopt ? *promptopt : DEFAULTPROMPT); 608 return (buf); 609 } 610 611 /* 612 * Generate an rprompt 613 */ 614 char * 615 rprompt(void) 616 { 617 static char **rpromptopt; 618 static char buf[MAXPATHLEN]; 619 620 if (rpromptopt == NULL) { 621 struct option *o; 622 623 o = getoption("rprompt"); 624 if (o == NULL) 625 errx(1, "rprompt: no such option `rprompt'"); 626 rpromptopt = &(o->value); 627 } 628 formatbuf(buf, sizeof(buf), *rpromptopt ? *rpromptopt : DEFAULTRPROMPT); 629 return (buf); 630 } 631 632 /* 633 * Command parser. 634 */ 635 void 636 cmdscanner(void) 637 { 638 struct cmd *c; 639 char *p; 640 #ifndef NO_EDITCOMPLETE 641 int ch; 642 size_t num; 643 #endif 644 int len; 645 char cmdbuf[MAX_C_NAME]; 646 647 for (;;) { 648 #ifndef NO_EDITCOMPLETE 649 if (!editing) { 650 #endif /* !NO_EDITCOMPLETE */ 651 if (fromatty) { 652 fputs(prompt(), ttyout); 653 p = rprompt(); 654 if (*p) 655 fprintf(ttyout, "%s ", p); 656 } 657 (void)fflush(ttyout); 658 len = get_line(stdin, line, sizeof(line), NULL); 659 switch (len) { 660 case -1: /* EOF */ 661 case -2: /* error */ 662 if (fromatty) 663 putc('\n', ttyout); 664 quit(0, NULL); 665 /* NOTREACHED */ 666 case -3: /* too long; try again */ 667 fputs("Sorry, input line is too long.\n", 668 ttyout); 669 continue; 670 case 0: /* empty; try again */ 671 continue; 672 default: /* all ok */ 673 break; 674 } 675 #ifndef NO_EDITCOMPLETE 676 } else { 677 const char *buf; 678 HistEvent ev; 679 cursor_pos = NULL; 680 681 buf = el_gets(el, &ch); 682 num = ch; 683 if (buf == NULL || num == 0) { 684 if (fromatty) 685 putc('\n', ttyout); 686 quit(0, NULL); 687 } 688 if (num >= sizeof(line)) { 689 fputs("Sorry, input line is too long.\n", 690 ttyout); 691 break; 692 } 693 memcpy(line, buf, num); 694 if (line[--num] == '\n') { 695 line[num] = '\0'; 696 if (num == 0) 697 break; 698 } 699 history(hist, &ev, H_ENTER, buf); 700 } 701 #endif /* !NO_EDITCOMPLETE */ 702 703 makeargv(); 704 if (margc == 0) 705 continue; 706 c = getcmd(margv[0]); 707 if (c == (struct cmd *)-1) { 708 fputs("?Ambiguous command.\n", ttyout); 709 continue; 710 } 711 if (c == NULL) { 712 #if !defined(NO_EDITCOMPLETE) 713 /* 714 * attempt to el_parse() unknown commands. 715 * any command containing a ':' would be parsed 716 * as "[prog:]cmd ...", and will result in a 717 * false positive if prog != "ftp", so treat 718 * such commands as invalid. 719 */ 720 if (strchr(margv[0], ':') != NULL || 721 !editing || 722 el_parse(el, margc, (void *)margv) != 0) 723 #endif /* !NO_EDITCOMPLETE */ 724 fputs("?Invalid command.\n", ttyout); 725 continue; 726 } 727 if (c->c_conn && !connected) { 728 fputs("Not connected.\n", ttyout); 729 continue; 730 } 731 confirmrest = 0; 732 (void)strlcpy(cmdbuf, c->c_name, sizeof(cmdbuf)); 733 margv[0] = cmdbuf; 734 (*c->c_handler)(margc, margv); 735 if (bell && c->c_bell) 736 (void)putc('\007', ttyout); 737 if (c->c_handler != help) 738 break; 739 } 740 (void)xsignal(SIGINT, intr); 741 (void)xsignal(SIGPIPE, lostpeer); 742 } 743 744 struct cmd * 745 getcmd(const char *name) 746 { 747 const char *p, *q; 748 struct cmd *c, *found; 749 int nmatches, longest; 750 751 if (name == NULL) 752 return (0); 753 754 longest = 0; 755 nmatches = 0; 756 found = 0; 757 for (c = cmdtab; (p = c->c_name) != NULL; c++) { 758 for (q = name; *q == *p++; q++) 759 if (*q == 0) /* exact match? */ 760 return (c); 761 if (!*q) { /* the name was a prefix */ 762 if (q - name > longest) { 763 longest = q - name; 764 nmatches = 1; 765 found = c; 766 } else if (q - name == longest) 767 nmatches++; 768 } 769 } 770 if (nmatches > 1) 771 return ((struct cmd *)-1); 772 return (found); 773 } 774 775 /* 776 * Slice a string up into argc/argv. 777 */ 778 779 int slrflag; 780 781 void 782 makeargv(void) 783 { 784 char *argp; 785 786 stringbase = line; /* scan from first of buffer */ 787 argbase = argbuf; /* store from first of buffer */ 788 slrflag = 0; 789 marg_sl->sl_cur = 0; /* reset to start of marg_sl */ 790 for (margc = 0; ; margc++) { 791 argp = slurpstring(); 792 ftp_sl_add(marg_sl, argp); 793 if (argp == NULL) 794 break; 795 } 796 #ifndef NO_EDITCOMPLETE 797 if (cursor_pos == line) { 798 cursor_argc = 0; 799 cursor_argo = 0; 800 } else if (cursor_pos != NULL) { 801 cursor_argc = margc; 802 cursor_argo = strlen(margv[margc-1]); 803 } 804 #endif /* !NO_EDITCOMPLETE */ 805 } 806 807 #ifdef NO_EDITCOMPLETE 808 #define INC_CHKCURSOR(x) (x)++ 809 #else /* !NO_EDITCOMPLETE */ 810 #define INC_CHKCURSOR(x) { (x)++ ; \ 811 if (x == cursor_pos) { \ 812 cursor_argc = margc; \ 813 cursor_argo = ap-argbase; \ 814 cursor_pos = NULL; \ 815 } } 816 817 #endif /* !NO_EDITCOMPLETE */ 818 819 /* 820 * Parse string into argbuf; 821 * implemented with FSM to 822 * handle quoting and strings 823 */ 824 char * 825 slurpstring(void) 826 { 827 static char bangstr[2] = { '!', '\0' }; 828 static char dollarstr[2] = { '$', '\0' }; 829 int got_one = 0; 830 char *sb = stringbase; 831 char *ap = argbase; 832 char *tmp = argbase; /* will return this if token found */ 833 834 if (*sb == '!' || *sb == '$') { /* recognize ! as a token for shell */ 835 switch (slrflag) { /* and $ as token for macro invoke */ 836 case 0: 837 slrflag++; 838 INC_CHKCURSOR(stringbase); 839 return ((*sb == '!') ? bangstr : dollarstr); 840 /* NOTREACHED */ 841 case 1: 842 slrflag++; 843 altarg = stringbase; 844 break; 845 default: 846 break; 847 } 848 } 849 850 S0: 851 switch (*sb) { 852 853 case '\0': 854 goto OUT; 855 856 case ' ': 857 case '\t': 858 INC_CHKCURSOR(sb); 859 goto S0; 860 861 default: 862 switch (slrflag) { 863 case 0: 864 slrflag++; 865 break; 866 case 1: 867 slrflag++; 868 altarg = sb; 869 break; 870 default: 871 break; 872 } 873 goto S1; 874 } 875 876 S1: 877 switch (*sb) { 878 879 case ' ': 880 case '\t': 881 case '\0': 882 goto OUT; /* end of token */ 883 884 case '\\': 885 INC_CHKCURSOR(sb); 886 goto S2; /* slurp next character */ 887 888 case '"': 889 INC_CHKCURSOR(sb); 890 goto S3; /* slurp quoted string */ 891 892 default: 893 *ap = *sb; /* add character to token */ 894 ap++; 895 INC_CHKCURSOR(sb); 896 got_one = 1; 897 goto S1; 898 } 899 900 S2: 901 switch (*sb) { 902 903 case '\0': 904 goto OUT; 905 906 default: 907 *ap = *sb; 908 ap++; 909 INC_CHKCURSOR(sb); 910 got_one = 1; 911 goto S1; 912 } 913 914 S3: 915 switch (*sb) { 916 917 case '\0': 918 goto OUT; 919 920 case '"': 921 INC_CHKCURSOR(sb); 922 goto S1; 923 924 default: 925 *ap = *sb; 926 ap++; 927 INC_CHKCURSOR(sb); 928 got_one = 1; 929 goto S3; 930 } 931 932 OUT: 933 if (got_one) 934 *ap++ = '\0'; 935 argbase = ap; /* update storage pointer */ 936 stringbase = sb; /* update scan pointer */ 937 if (got_one) { 938 return (tmp); 939 } 940 switch (slrflag) { 941 case 0: 942 slrflag++; 943 break; 944 case 1: 945 slrflag++; 946 altarg = NULL; 947 break; 948 default: 949 break; 950 } 951 return (NULL); 952 } 953 954 /* 955 * Help/usage command. 956 * Call each command handler with argc == 0 and argv[0] == name. 957 */ 958 void 959 help(int argc, char *argv[]) 960 { 961 struct cmd *c; 962 char *nargv[1], *cmd; 963 const char *p; 964 int isusage; 965 966 cmd = argv[0]; 967 isusage = (strcmp(cmd, "usage") == 0); 968 if (argc == 0 || (isusage && argc == 1)) { 969 UPRINTF("usage: %s [command [...]]\n", cmd); 970 return; 971 } 972 if (argc == 1) { 973 StringList *buf; 974 975 buf = ftp_sl_init(); 976 fprintf(ttyout, 977 "%sommands may be abbreviated. Commands are:\n\n", 978 proxy ? "Proxy c" : "C"); 979 for (c = cmdtab; (p = c->c_name) != NULL; c++) 980 if (!proxy || c->c_proxy) 981 ftp_sl_add(buf, ftp_strdup(p)); 982 list_vertical(buf); 983 sl_free(buf, 1); 984 return; 985 } 986 987 #define HELPINDENT ((int) sizeof("disconnect")) 988 989 while (--argc > 0) { 990 char *arg; 991 char cmdbuf[MAX_C_NAME]; 992 993 arg = *++argv; 994 c = getcmd(arg); 995 if (c == (struct cmd *)-1) 996 fprintf(ttyout, "?Ambiguous %s command `%s'\n", 997 cmd, arg); 998 else if (c == NULL) 999 fprintf(ttyout, "?Invalid %s command `%s'\n", 1000 cmd, arg); 1001 else { 1002 if (isusage) { 1003 (void)strlcpy(cmdbuf, c->c_name, sizeof(cmdbuf)); 1004 nargv[0] = cmdbuf; 1005 (*c->c_handler)(0, nargv); 1006 } else 1007 fprintf(ttyout, "%-*s\t%s\n", HELPINDENT, 1008 c->c_name, c->c_help); 1009 } 1010 } 1011 } 1012 1013 struct option * 1014 getoption(const char *name) 1015 { 1016 const char *p; 1017 struct option *c; 1018 1019 if (name == NULL) 1020 return (NULL); 1021 for (c = optiontab; (p = c->name) != NULL; c++) { 1022 if (strcasecmp(p, name) == 0) 1023 return (c); 1024 } 1025 return (NULL); 1026 } 1027 1028 char * 1029 getoptionvalue(const char *name) 1030 { 1031 struct option *c; 1032 1033 if (name == NULL) 1034 errx(1, "getoptionvalue: invoked with NULL name"); 1035 c = getoption(name); 1036 if (c != NULL) 1037 return (c->value); 1038 errx(1, "getoptionvalue: invoked with unknown option `%s'", name); 1039 /* NOTREACHED */ 1040 } 1041 1042 static void 1043 setupoption(const char *name, const char *value, const char *defaultvalue) 1044 { 1045 set_option(name, value ? value : defaultvalue, 0); 1046 } 1047 1048 void 1049 usage(void) 1050 { 1051 const char *progname = getprogname(); 1052 1053 (void)fprintf(stderr, 1054 "usage: %s [-46AadefginpRtVv] [-N netrc] [-o outfile] [-P port] [-q quittime]\n" 1055 " [-r retry] [-s srcaddr] [-T dir,max[,inc]] [-x xferbufsize]\n" 1056 " [[user@]host [port]] [host:path[/]] [file:///file]\n" 1057 " [ftp://[user[:pass]@]host[:port]/path[/]]\n" 1058 " [http://[user[:pass]@]host[:port]/path] [...]\n" 1059 #ifdef WITH_SSL 1060 " [https://[user[:pass]@]host[:port]/path] [...]\n" 1061 #endif 1062 " %s -u URL file [...]\n", progname, progname); 1063 exit(1); 1064 } 1065