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