[BACK]Return to cmds.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / ftp

Annotation of src/usr.bin/ftp/cmds.c, Revision 1.59

1.59    ! martynas    1: /*     $OpenBSD: cmds.c,v 1.58 2008/05/13 02:09:38 ray Exp $   */
1.23      millert     2: /*     $NetBSD: cmds.c,v 1.27 1997/08/18 10:20:15 lukem Exp $  */
1.1       deraadt     3:
                      4: /*
1.32      itojun      5:  * Copyright (C) 1997 and 1998 WIDE Project.
                      6:  * All rights reserved.
                      7:  *
                      8:  * Redistribution and use in source and binary forms, with or without
                      9:  * modification, are permitted provided that the following conditions
                     10:  * are met:
                     11:  * 1. Redistributions of source code must retain the above copyright
                     12:  *    notice, this list of conditions and the following disclaimer.
                     13:  * 2. Redistributions in binary form must reproduce the above copyright
                     14:  *    notice, this list of conditions and the following disclaimer in the
                     15:  *    documentation and/or other materials provided with the distribution.
                     16:  * 3. Neither the name of the project nor the names of its contributors
                     17:  *    may be used to endorse or promote products derived from this software
                     18:  *    without specific prior written permission.
                     19:  *
                     20:  * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
                     21:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     22:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     23:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
                     24:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     25:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     26:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     27:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     28:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     29:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     30:  * SUCH DAMAGE.
                     31:  */
                     32:
                     33: /*
1.1       deraadt    34:  * Copyright (c) 1985, 1989, 1993, 1994
                     35:  *     The Regents of the University of California.  All rights reserved.
                     36:  *
                     37:  * Redistribution and use in source and binary forms, with or without
                     38:  * modification, are permitted provided that the following conditions
                     39:  * are met:
                     40:  * 1. Redistributions of source code must retain the above copyright
                     41:  *    notice, this list of conditions and the following disclaimer.
                     42:  * 2. Redistributions in binary form must reproduce the above copyright
                     43:  *    notice, this list of conditions and the following disclaimer in the
                     44:  *    documentation and/or other materials provided with the distribution.
1.45      millert    45:  * 3. Neither the name of the University nor the names of its contributors
1.1       deraadt    46:  *    may be used to endorse or promote products derived from this software
                     47:  *    without specific prior written permission.
                     48:  *
                     49:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     50:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     51:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     52:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     53:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     54:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     55:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     56:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     57:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     58:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     59:  * SUCH DAMAGE.
                     60:  */
                     61:
1.46      deraadt    62: #if !defined(lint) && !defined(SMALL)
1.59    ! martynas   63: static const char rcsid[] = "$OpenBSD: cmds.c,v 1.58 2008/05/13 02:09:38 ray Exp $";
1.46      deraadt    64: #endif /* not lint and not SMALL */
1.1       deraadt    65:
                     66: /*
                     67:  * FTP User Program -- Command Routines.
                     68:  */
1.13      millert    69: #include <sys/types.h>
                     70: #include <sys/socket.h>
                     71: #include <sys/stat.h>
1.1       deraadt    72: #include <sys/wait.h>
                     73: #include <arpa/ftp.h>
                     74:
                     75: #include <ctype.h>
                     76: #include <err.h>
                     77: #include <glob.h>
                     78: #include <netdb.h>
                     79: #include <stdio.h>
                     80: #include <stdlib.h>
                     81: #include <string.h>
                     82: #include <unistd.h>
                     83:
                     84: #include "ftp_var.h"
                     85: #include "pathnames.h"
                     86:
                     87: jmp_buf        jabort;
                     88: char   *mname;
                     89: char   *home = "/";
                     90:
                     91: struct types {
                     92:        char    *t_name;
                     93:        char    *t_mode;
                     94:        int     t_type;
                     95:        char    *t_arg;
                     96: } types[] = {
                     97:        { "ascii",      "A",    TYPE_A, 0 },
                     98:        { "binary",     "I",    TYPE_I, 0 },
                     99:        { "image",      "I",    TYPE_I, 0 },
                    100:        { "ebcdic",     "E",    TYPE_E, 0 },
                    101:        { "tenex",      "L",    TYPE_L, bytename },
                    102:        { NULL }
                    103: };
                    104:
                    105: /*
                    106:  * Set transfer type.
                    107:  */
                    108: void
1.47      deraadt   109: settype(int argc, char *argv[])
1.1       deraadt   110: {
                    111:        struct types *p;
                    112:        int comret;
                    113:
                    114:        if (argc > 2) {
                    115:                char *sep;
                    116:
1.20      deraadt   117:                fprintf(ttyout, "usage: %s [", argv[0]);
1.1       deraadt   118:                sep = " ";
                    119:                for (p = types; p->t_name; p++) {
1.20      deraadt   120:                        fprintf(ttyout, "%s%s", sep, p->t_name);
1.1       deraadt   121:                        sep = " | ";
                    122:                }
1.20      deraadt   123:                fputs(" ]\n", ttyout);
1.1       deraadt   124:                code = -1;
                    125:                return;
                    126:        }
                    127:        if (argc < 2) {
1.20      deraadt   128:                fprintf(ttyout, "Using %s mode to transfer files.\n", typename);
1.1       deraadt   129:                code = 0;
                    130:                return;
                    131:        }
                    132:        for (p = types; p->t_name; p++)
                    133:                if (strcmp(argv[1], p->t_name) == 0)
                    134:                        break;
                    135:        if (p->t_name == 0) {
1.20      deraadt   136:                fprintf(ttyout, "%s: unknown mode.\n", argv[1]);
1.1       deraadt   137:                code = -1;
                    138:                return;
                    139:        }
                    140:        if ((p->t_arg != NULL) && (*(p->t_arg) != '\0'))
1.15      millert   141:                comret = command("TYPE %s %s", p->t_mode, p->t_arg);
1.1       deraadt   142:        else
                    143:                comret = command("TYPE %s", p->t_mode);
                    144:        if (comret == COMPLETE) {
1.44      deraadt   145:                (void)strlcpy(typename, p->t_name, sizeof typename);
1.1       deraadt   146:                curtype = type = p->t_type;
                    147:        }
                    148: }
                    149:
                    150: /*
                    151:  * Internal form of settype; changes current type in use with server
                    152:  * without changing our notion of the type for data transfers.
                    153:  * Used to change to and from ascii for listings.
                    154:  */
                    155: void
1.47      deraadt   156: changetype(int newtype, int show)
1.1       deraadt   157: {
                    158:        struct types *p;
                    159:        int comret, oldverbose = verbose;
                    160:
                    161:        if (newtype == 0)
                    162:                newtype = TYPE_I;
                    163:        if (newtype == curtype)
                    164:                return;
                    165:        if (debug == 0 && show == 0)
                    166:                verbose = 0;
                    167:        for (p = types; p->t_name; p++)
                    168:                if (newtype == p->t_type)
                    169:                        break;
                    170:        if (p->t_name == 0) {
1.16      millert   171:                warnx("internal error: unknown type %d.", newtype);
1.1       deraadt   172:                return;
                    173:        }
                    174:        if (newtype == TYPE_L && bytename[0] != '\0')
                    175:                comret = command("TYPE %s %s", p->t_mode, bytename);
                    176:        else
                    177:                comret = command("TYPE %s", p->t_mode);
                    178:        if (comret == COMPLETE)
                    179:                curtype = newtype;
                    180:        verbose = oldverbose;
                    181: }
                    182:
                    183: char *stype[] = {
                    184:        "type",
                    185:        "",
                    186:        0
                    187: };
                    188:
                    189: /*
                    190:  * Set binary transfer type.
                    191:  */
1.48      deraadt   192: /*ARGSUSED*/
1.1       deraadt   193: void
1.47      deraadt   194: setbinary(int argc, char *argv[])
1.1       deraadt   195: {
                    196:
                    197:        stype[1] = "binary";
                    198:        settype(2, stype);
                    199: }
                    200:
                    201: /*
                    202:  * Set ascii transfer type.
                    203:  */
1.48      deraadt   204: /*ARGSUSED*/
1.1       deraadt   205: void
1.47      deraadt   206: setascii(int argc, char *argv[])
1.1       deraadt   207: {
                    208:
                    209:        stype[1] = "ascii";
                    210:        settype(2, stype);
                    211: }
                    212:
                    213: /*
                    214:  * Set tenex transfer type.
                    215:  */
1.48      deraadt   216: /*ARGSUSED*/
1.1       deraadt   217: void
1.47      deraadt   218: settenex(int argc, char *argv[])
1.1       deraadt   219: {
                    220:
                    221:        stype[1] = "tenex";
                    222:        settype(2, stype);
                    223: }
                    224:
                    225: /*
                    226:  * Set file transfer mode.
                    227:  */
                    228: /*ARGSUSED*/
                    229: void
1.47      deraadt   230: setftmode(int argc, char *argv[])
1.1       deraadt   231: {
                    232:
1.20      deraadt   233:        fprintf(ttyout, "We only support %s mode, sorry.\n", modename);
1.1       deraadt   234:        code = -1;
                    235: }
                    236:
                    237: /*
                    238:  * Set file transfer format.
                    239:  */
                    240: /*ARGSUSED*/
                    241: void
1.47      deraadt   242: setform(int argc, char *argv[])
1.1       deraadt   243: {
                    244:
1.20      deraadt   245:        fprintf(ttyout, "We only support %s format, sorry.\n", formname);
1.1       deraadt   246:        code = -1;
                    247: }
                    248:
                    249: /*
                    250:  * Set file transfer structure.
                    251:  */
                    252: /*ARGSUSED*/
                    253: void
1.47      deraadt   254: setstruct(int argc, char *argv[])
1.1       deraadt   255: {
                    256:
1.20      deraadt   257:        fprintf(ttyout, "We only support %s structure, sorry.\n", structname);
1.1       deraadt   258:        code = -1;
                    259: }
                    260:
                    261: /*
                    262:  * Send a single file.
                    263:  */
                    264: void
1.47      deraadt   265: put(int argc, char *argv[])
1.1       deraadt   266: {
                    267:        char *cmd;
                    268:        int loc = 0;
                    269:        char *oldargv1, *oldargv2;
                    270:
                    271:        if (argc == 2) {
                    272:                argc++;
                    273:                argv[2] = argv[1];
                    274:                loc++;
                    275:        }
                    276:        if (argc < 2 && !another(&argc, &argv, "local-file"))
                    277:                goto usage;
1.13      millert   278:        if ((argc < 3 && !another(&argc, &argv, "remote-file")) || argc > 3) {
1.1       deraadt   279: usage:
1.20      deraadt   280:                fprintf(ttyout, "usage: %s local-file [ remote-file ]\n", argv[0]);
1.1       deraadt   281:                code = -1;
                    282:                return;
                    283:        }
                    284:        oldargv1 = argv[1];
                    285:        oldargv2 = argv[2];
                    286:        if (!globulize(&argv[1])) {
                    287:                code = -1;
                    288:                return;
                    289:        }
                    290:        /*
                    291:         * If "globulize" modifies argv[1], and argv[2] is a copy of
                    292:         * the old argv[1], make it a copy of the new argv[1].
                    293:         */
                    294:        if (argv[1] != oldargv1 && argv[2] == oldargv1) {
                    295:                argv[2] = argv[1];
                    296:        }
                    297:        cmd = (argv[0][0] == 'a') ? "APPE" : ((sunique) ? "STOU" : "STOR");
                    298:        if (loc && ntflag) {
                    299:                argv[2] = dotrans(argv[2]);
                    300:        }
                    301:        if (loc && mapflag) {
                    302:                argv[2] = domap(argv[2]);
                    303:        }
                    304:        sendrequest(cmd, argv[1], argv[2],
                    305:            argv[1] != oldargv1 || argv[2] != oldargv2);
1.23      millert   306:        if (oldargv1 != argv[1])        /* free up after globulize() */
                    307:                free(argv[1]);
1.1       deraadt   308: }
                    309:
                    310: /*
                    311:  * Send multiple files.
                    312:  */
                    313: void
1.47      deraadt   314: mput(int argc, char *argv[])
1.1       deraadt   315: {
                    316:        int i;
                    317:        sig_t oldintr;
                    318:        int ointer;
                    319:        char *tp;
                    320:
                    321:        if (argc < 2 && !another(&argc, &argv, "local-files")) {
1.20      deraadt   322:                fprintf(ttyout, "usage: %s local-files\n", argv[0]);
1.1       deraadt   323:                code = -1;
                    324:                return;
                    325:        }
                    326:        mname = argv[0];
                    327:        mflag = 1;
                    328:        oldintr = signal(SIGINT, mabort);
1.14      millert   329:        (void)setjmp(jabort);
1.1       deraadt   330:        if (proxy) {
                    331:                char *cp, *tp2, tmpbuf[MAXPATHLEN];
                    332:
1.16      millert   333:                while ((cp = remglob(argv, 0, NULL)) != NULL) {
1.13      millert   334:                        if (*cp == '\0') {
1.1       deraadt   335:                                mflag = 0;
                    336:                                continue;
                    337:                        }
                    338:                        if (mflag && confirm(argv[0], cp)) {
                    339:                                tp = cp;
                    340:                                if (mcase) {
                    341:                                        while (*tp && !islower(*tp)) {
                    342:                                                tp++;
                    343:                                        }
                    344:                                        if (!*tp) {
                    345:                                                tp = cp;
                    346:                                                tp2 = tmpbuf;
1.21      millert   347:                                                while ((*tp2 = *tp) != '\0') {
1.1       deraadt   348:                                                     if (isupper(*tp2)) {
1.23      millert   349:                                                            *tp2 =
                    350:                                                                tolower(*tp2);
1.1       deraadt   351:                                                     }
                    352:                                                     tp++;
                    353:                                                     tp2++;
                    354:                                                }
                    355:                                        }
                    356:                                        tp = tmpbuf;
                    357:                                }
                    358:                                if (ntflag) {
                    359:                                        tp = dotrans(tp);
                    360:                                }
                    361:                                if (mapflag) {
                    362:                                        tp = domap(tp);
                    363:                                }
                    364:                                sendrequest((sunique) ? "STOU" : "STOR",
                    365:                                    cp, tp, cp != tp || !interactive);
                    366:                                if (!mflag && fromatty) {
                    367:                                        ointer = interactive;
                    368:                                        interactive = 1;
1.13      millert   369:                                        if (confirm("Continue with", "mput")) {
1.1       deraadt   370:                                                mflag++;
                    371:                                        }
                    372:                                        interactive = ointer;
                    373:                                }
                    374:                        }
                    375:                }
1.14      millert   376:                (void)signal(SIGINT, oldintr);
1.1       deraadt   377:                mflag = 0;
                    378:                return;
                    379:        }
                    380:        for (i = 1; i < argc; i++) {
1.13      millert   381:                char **cpp;
1.1       deraadt   382:                glob_t gl;
                    383:                int flags;
                    384:
                    385:                if (!doglob) {
                    386:                        if (mflag && confirm(argv[0], argv[i])) {
                    387:                                tp = (ntflag) ? dotrans(argv[i]) : argv[i];
                    388:                                tp = (mapflag) ? domap(tp) : tp;
                    389:                                sendrequest((sunique) ? "STOU" : "STOR",
                    390:                                    argv[i], tp, tp != argv[i] || !interactive);
                    391:                                if (!mflag && fromatty) {
                    392:                                        ointer = interactive;
                    393:                                        interactive = 1;
1.13      millert   394:                                        if (confirm("Continue with", "mput")) {
1.1       deraadt   395:                                                mflag++;
                    396:                                        }
                    397:                                        interactive = ointer;
                    398:                                }
                    399:                        }
                    400:                        continue;
                    401:                }
                    402:
                    403:                memset(&gl, 0, sizeof(gl));
                    404:                flags = GLOB_BRACE|GLOB_NOCHECK|GLOB_QUOTE|GLOB_TILDE;
                    405:                if (glob(argv[i], flags, NULL, &gl) || gl.gl_pathc == 0) {
                    406:                        warnx("%s: not found", argv[i]);
                    407:                        globfree(&gl);
                    408:                        continue;
                    409:                }
                    410:                for (cpp = gl.gl_pathv; cpp && *cpp != NULL; cpp++) {
                    411:                        if (mflag && confirm(argv[0], *cpp)) {
                    412:                                tp = (ntflag) ? dotrans(*cpp) : *cpp;
                    413:                                tp = (mapflag) ? domap(tp) : tp;
                    414:                                sendrequest((sunique) ? "STOU" : "STOR",
                    415:                                    *cpp, tp, *cpp != tp || !interactive);
                    416:                                if (!mflag && fromatty) {
                    417:                                        ointer = interactive;
                    418:                                        interactive = 1;
1.13      millert   419:                                        if (confirm("Continue with", "mput")) {
1.1       deraadt   420:                                                mflag++;
                    421:                                        }
                    422:                                        interactive = ointer;
                    423:                                }
                    424:                        }
                    425:                }
                    426:                globfree(&gl);
                    427:        }
1.14      millert   428:        (void)signal(SIGINT, oldintr);
1.1       deraadt   429:        mflag = 0;
                    430: }
                    431:
                    432: void
1.47      deraadt   433: reget(int argc, char *argv[])
1.1       deraadt   434: {
                    435:
1.14      millert   436:        (void)getit(argc, argv, 1, "r+w");
1.1       deraadt   437: }
                    438:
                    439: void
1.47      deraadt   440: get(int argc, char *argv[])
1.1       deraadt   441: {
                    442:
1.14      millert   443:        (void)getit(argc, argv, 0, restart_point ? "r+w" : "w" );
1.1       deraadt   444: }
                    445:
                    446: /*
                    447:  * Receive one file.
                    448:  */
                    449: int
1.47      deraadt   450: getit(int argc, char *argv[], int restartit, const char *mode)
1.1       deraadt   451: {
                    452:        int loc = 0;
1.23      millert   453:        int rval = 0;
                    454:        char *oldargv1, *oldargv2, *globargv2;
1.1       deraadt   455:
                    456:        if (argc == 2) {
                    457:                argc++;
                    458:                argv[2] = argv[1];
                    459:                loc++;
                    460:        }
                    461:        if (argc < 2 && !another(&argc, &argv, "remote-file"))
                    462:                goto usage;
1.13      millert   463:        if ((argc < 3 && !another(&argc, &argv, "local-file")) || argc > 3) {
1.1       deraadt   464: usage:
1.20      deraadt   465:                fprintf(ttyout, "usage: %s remote-file [ local-file ]\n", argv[0]);
1.1       deraadt   466:                code = -1;
                    467:                return (0);
                    468:        }
                    469:        oldargv1 = argv[1];
                    470:        oldargv2 = argv[2];
                    471:        if (!globulize(&argv[2])) {
                    472:                code = -1;
                    473:                return (0);
                    474:        }
1.23      millert   475:        globargv2 = argv[2];
1.1       deraadt   476:        if (loc && mcase) {
                    477:                char *tp = argv[1], *tp2, tmpbuf[MAXPATHLEN];
                    478:
                    479:                while (*tp && !islower(*tp)) {
                    480:                        tp++;
                    481:                }
                    482:                if (!*tp) {
                    483:                        tp = argv[2];
                    484:                        tp2 = tmpbuf;
1.21      millert   485:                        while ((*tp2 = *tp) != '\0') {
1.1       deraadt   486:                                if (isupper(*tp2)) {
1.23      millert   487:                                        *tp2 = tolower(*tp2);
1.1       deraadt   488:                                }
                    489:                                tp++;
                    490:                                tp2++;
                    491:                        }
                    492:                        argv[2] = tmpbuf;
                    493:                }
                    494:        }
                    495:        if (loc && ntflag)
                    496:                argv[2] = dotrans(argv[2]);
                    497:        if (loc && mapflag)
                    498:                argv[2] = domap(argv[2]);
                    499:        if (restartit) {
                    500:                struct stat stbuf;
                    501:                int ret;
                    502:
                    503:                ret = stat(argv[2], &stbuf);
                    504:                if (restartit == 1) {
                    505:                        if (ret < 0) {
                    506:                                warn("local: %s", argv[2]);
1.23      millert   507:                                goto freegetit;
1.1       deraadt   508:                        }
                    509:                        restart_point = stbuf.st_size;
                    510:                } else {
                    511:                        if (ret == 0) {
1.13      millert   512:                                time_t mtime;
1.1       deraadt   513:
1.13      millert   514:                                mtime = remotemodtime(argv[1], 0);
                    515:                                if (mtime == -1)
1.23      millert   516:                                        goto freegetit;
                    517:                                if (stbuf.st_mtime >= mtime) {
                    518:                                        rval = 1;
                    519:                                        goto freegetit;
                    520:                                }
1.1       deraadt   521:                        }
                    522:                }
                    523:        }
                    524:
                    525:        recvrequest("RETR", argv[2], argv[1], mode,
1.23      millert   526:            argv[1] != oldargv1 || argv[2] != oldargv2, loc);
1.1       deraadt   527:        restart_point = 0;
1.23      millert   528: freegetit:
                    529:        if (oldargv2 != globargv2)      /* free up after globulize() */
                    530:                free(globargv2);
                    531:        return (rval);
1.1       deraadt   532: }
                    533:
1.55      ray       534: /* XXX - Signal race. */
1.1       deraadt   535: /* ARGSUSED */
                    536: void
1.47      deraadt   537: mabort(int signo)
1.1       deraadt   538: {
1.13      millert   539:        int ointer, oconf;
1.1       deraadt   540:
1.13      millert   541:        alarmtimer(0);
1.20      deraadt   542:        putc('\n', ttyout);
                    543:        (void)fflush(ttyout);
1.1       deraadt   544:        if (mflag && fromatty) {
                    545:                ointer = interactive;
1.13      millert   546:                oconf = confirmrest;
1.1       deraadt   547:                interactive = 1;
1.13      millert   548:                confirmrest = 0;
1.1       deraadt   549:                if (confirm("Continue with", mname)) {
                    550:                        interactive = ointer;
1.13      millert   551:                        confirmrest = oconf;
1.40      art       552:                        longjmp(jabort, 1);
1.1       deraadt   553:                }
                    554:                interactive = ointer;
1.13      millert   555:                confirmrest = oconf;
1.1       deraadt   556:        }
                    557:        mflag = 0;
1.40      art       558:        longjmp(jabort, 1);
1.1       deraadt   559: }
                    560:
                    561: /*
                    562:  * Get multiple files.
                    563:  */
                    564: void
1.47      deraadt   565: mget(int argc, char *argv[])
1.1       deraadt   566: {
                    567:        sig_t oldintr;
                    568:        int ch, ointer;
1.49      otto      569:        char *cp, *tp, *tp2, tmpbuf[MAXPATHLEN], localcwd[MAXPATHLEN];
1.1       deraadt   570:
                    571:        if (argc < 2 && !another(&argc, &argv, "remote-files")) {
1.20      deraadt   572:                fprintf(ttyout, "usage: %s remote-files\n", argv[0]);
1.1       deraadt   573:                code = -1;
                    574:                return;
                    575:        }
                    576:        mname = argv[0];
                    577:        mflag = 1;
1.49      otto      578:        if (getcwd(localcwd, sizeof(localcwd)) == NULL)
                    579:                err(1, "can't get cwd");
                    580:
1.1       deraadt   581:        oldintr = signal(SIGINT, mabort);
1.14      millert   582:        (void)setjmp(jabort);
1.16      millert   583:        while ((cp = remglob(argv, proxy, NULL)) != NULL) {
1.1       deraadt   584:                if (*cp == '\0') {
                    585:                        mflag = 0;
                    586:                        continue;
                    587:                }
1.49      otto      588:                if (!mflag)
                    589:                        continue;
                    590:                if (!fileindir(cp, localcwd)) {
                    591:                        fprintf(ttyout, "Skipping non-relative filename `%s'\n",
                    592:                            cp);
                    593:                        continue;
                    594:                }
                    595:                if (confirm(argv[0], cp)) {
1.1       deraadt   596:                        tp = cp;
                    597:                        if (mcase) {
1.21      millert   598:                                for (tp2 = tmpbuf; (ch = *tp++) != 0; )
1.1       deraadt   599:                                        *tp2++ = isupper(ch) ? tolower(ch) : ch;
                    600:                                *tp2 = '\0';
                    601:                                tp = tmpbuf;
                    602:                        }
1.21      millert   603:                        if (ntflag)
1.1       deraadt   604:                                tp = dotrans(tp);
1.21      millert   605:                        if (mapflag)
1.1       deraadt   606:                                tp = domap(tp);
                    607:                        recvrequest("RETR", tp, cp, "w",
1.23      millert   608:                            tp != cp || !interactive, 1);
1.1       deraadt   609:                        if (!mflag && fromatty) {
                    610:                                ointer = interactive;
                    611:                                interactive = 1;
1.13      millert   612:                                if (confirm("Continue with", "mget")) {
1.1       deraadt   613:                                        mflag++;
                    614:                                }
                    615:                                interactive = ointer;
                    616:                        }
                    617:                }
                    618:        }
1.14      millert   619:        (void)signal(SIGINT, oldintr);
1.1       deraadt   620:        mflag = 0;
                    621: }
                    622:
                    623: char *
1.47      deraadt   624: onoff(int bool)
1.1       deraadt   625: {
                    626:
                    627:        return (bool ? "on" : "off");
                    628: }
                    629:
                    630: /*
                    631:  * Show status.
                    632:  */
                    633: /*ARGSUSED*/
                    634: void
1.47      deraadt   635: status(int argc, char *argv[])
1.1       deraadt   636: {
                    637:        int i;
                    638:
                    639:        if (connected)
1.20      deraadt   640:                fprintf(ttyout, "Connected %sto %s.\n",
1.19      millert   641:                    connected == -1 ? "and logged in" : "", hostname);
1.1       deraadt   642:        else
1.20      deraadt   643:                fputs("Not connected.\n", ttyout);
1.1       deraadt   644:        if (!proxy) {
                    645:                pswitch(1);
                    646:                if (connected) {
1.20      deraadt   647:                        fprintf(ttyout, "Connected for proxy commands to %s.\n",
1.13      millert   648:                            hostname);
1.1       deraadt   649:                }
                    650:                else {
1.20      deraadt   651:                        fputs("No proxy connection.\n", ttyout);
1.1       deraadt   652:                }
                    653:                pswitch(0);
                    654:        }
1.32      itojun    655:        fprintf(ttyout, "Gate ftp: %s, server %s, port %s.\n", onoff(gatemode),
                    656:            *gateserver ? gateserver : "(none)", gateport);
1.20      deraadt   657:        fprintf(ttyout, "Passive mode: %s.\n", onoff(passivemode));
                    658:        fprintf(ttyout, "Mode: %s; Type: %s; Form: %s; Structure: %s.\n",
1.1       deraadt   659:                modename, typename, formname, structname);
1.20      deraadt   660:        fprintf(ttyout, "Verbose: %s; Bell: %s; Prompting: %s; Globbing: %s.\n",
1.1       deraadt   661:                onoff(verbose), onoff(bell), onoff(interactive),
                    662:                onoff(doglob));
1.20      deraadt   663:        fprintf(ttyout, "Store unique: %s; Receive unique: %s.\n", onoff(sunique),
1.1       deraadt   664:                onoff(runique));
1.20      deraadt   665:        fprintf(ttyout, "Preserve modification times: %s.\n", onoff(preserve));
                    666:        fprintf(ttyout, "Case: %s; CR stripping: %s.\n", onoff(mcase), onoff(crflag));
1.1       deraadt   667:        if (ntflag) {
1.20      deraadt   668:                fprintf(ttyout, "Ntrans: (in) %s (out) %s\n", ntin, ntout);
1.1       deraadt   669:        }
                    670:        else {
1.20      deraadt   671:                fputs("Ntrans: off.\n", ttyout);
1.1       deraadt   672:        }
                    673:        if (mapflag) {
1.20      deraadt   674:                fprintf(ttyout, "Nmap: (in) %s (out) %s\n", mapin, mapout);
1.1       deraadt   675:        }
                    676:        else {
1.20      deraadt   677:                fputs("Nmap: off.\n", ttyout);
1.1       deraadt   678:        }
1.20      deraadt   679:        fprintf(ttyout, "Hash mark printing: %s; Mark count: %d; Progress bar: %s.\n",
1.13      millert   680:            onoff(hash), mark, onoff(progress));
1.32      itojun    681:        fprintf(ttyout, "Use of PORT/LPRT cmds: %s.\n", onoff(sendport));
1.34      itojun    682:        fprintf(ttyout, "Use of EPSV/EPRT cmds for IPv4: %s%s.\n", onoff(epsv4),
                    683:            epsv4bad ? " (disabled for this connection)" : "");
1.17      millert   684: #ifndef SMALL
1.20      deraadt   685:        fprintf(ttyout, "Command line editing: %s.\n", onoff(editing));
1.17      millert   686: #endif /* !SMALL */
1.1       deraadt   687:        if (macnum > 0) {
1.27      millert   688:                fputs("Macros:\n", ttyout);
1.1       deraadt   689:                for (i=0; i<macnum; i++) {
1.20      deraadt   690:                        fprintf(ttyout, "\t%s\n", macros[i].mac_name);
1.1       deraadt   691:                }
                    692:        }
                    693:        code = 0;
                    694: }
                    695:
                    696: /*
1.13      millert   697:  * Toggle a variable
                    698:  */
                    699: int
1.47      deraadt   700: togglevar(int argc, char *argv[], int *var, const char *mesg)
1.13      millert   701: {
                    702:        if (argc < 2) {
                    703:                *var = !*var;
                    704:        } else if (argc == 2 && strcasecmp(argv[1], "on") == 0) {
                    705:                *var = 1;
                    706:        } else if (argc == 2 && strcasecmp(argv[1], "off") == 0) {
                    707:                *var = 0;
                    708:        } else {
1.20      deraadt   709:                fprintf(ttyout, "usage: %s [ on | off ]\n", argv[0]);
1.16      millert   710:                return (-1);
1.13      millert   711:        }
1.15      millert   712:        if (mesg)
1.20      deraadt   713:                fprintf(ttyout, "%s %s.\n", mesg, onoff(*var));
1.14      millert   714:        return (*var);
1.13      millert   715: }
                    716:
                    717: /*
1.1       deraadt   718:  * Set beep on cmd completed mode.
                    719:  */
1.48      deraadt   720: /*ARGSUSED*/
1.1       deraadt   721: void
1.47      deraadt   722: setbell(int argc, char *argv[])
1.1       deraadt   723: {
                    724:
1.13      millert   725:        code = togglevar(argc, argv, &bell, "Bell mode");
1.1       deraadt   726: }
                    727:
1.17      millert   728: #ifndef SMALL
1.1       deraadt   729: /*
1.13      millert   730:  * Set command line editing
1.1       deraadt   731:  */
1.48      deraadt   732: /*ARGSUSED*/
1.1       deraadt   733: void
1.47      deraadt   734: setedit(int argc, char *argv[])
1.1       deraadt   735: {
                    736:
1.13      millert   737:        code = togglevar(argc, argv, &editing, "Editing mode");
1.18      millert   738:        controlediting();
1.1       deraadt   739: }
1.17      millert   740: #endif /* !SMALL */
1.34      itojun    741:
                    742: /*
                    743:  * Toggle use of IPv4 EPSV/EPRT
                    744:  */
1.48      deraadt   745: /*ARGSUSED*/
1.34      itojun    746: void
1.47      deraadt   747: setepsv4(int argc, char *argv[])
1.34      itojun    748: {
                    749:
                    750:        code = togglevar(argc, argv, &epsv4, "EPSV/EPRT on IPv4");
                    751:        epsv4bad = 0;
                    752: }
1.1       deraadt   753:
                    754: /*
1.13      millert   755:  * Turn on packet tracing.
1.1       deraadt   756:  */
1.48      deraadt   757: /*ARGSUSED*/
1.1       deraadt   758: void
1.47      deraadt   759: settrace(int argc, char *argv[])
1.1       deraadt   760: {
                    761:
1.13      millert   762:        code = togglevar(argc, argv, &trace, "Packet tracing");
1.1       deraadt   763: }
1.6       kstailey  764:
                    765: /*
1.13      millert   766:  * Toggle hash mark printing during transfers, or set hash mark bytecount.
1.6       kstailey  767:  */
1.48      deraadt   768: /*ARGSUSED*/
1.6       kstailey  769: void
1.47      deraadt   770: sethash(int argc, char *argv[])
1.6       kstailey  771: {
                    772:        if (argc == 1)
1.13      millert   773:                hash = !hash;
1.6       kstailey  774:        else if (argc != 2) {
1.20      deraadt   775:                fprintf(ttyout, "usage: %s [ on | off | bytecount ]\n", argv[0]);
1.13      millert   776:                code = -1;
                    777:                return;
                    778:        } else if (strcasecmp(argv[1], "on") == 0)
                    779:                hash = 1;
                    780:        else if (strcasecmp(argv[1], "off") == 0)
                    781:                hash = 0;
                    782:        else {
1.50      tedu      783:                int nmark;
                    784:                const char *errstr;
1.28      millert   785:
1.50      tedu      786:                nmark = strtonum(argv[1], 1, INT_MAX, &errstr);
                    787:                if (errstr) {
                    788:                        fprintf(ttyout, "bytecount value is %s: %s\n",
                    789:                            errstr, argv[1]);
1.13      millert   790:                        code = -1;
                    791:                        return;
1.6       kstailey  792:                }
1.13      millert   793:                mark = nmark;
                    794:                hash = 1;
1.6       kstailey  795:        }
1.20      deraadt   796:        fprintf(ttyout, "Hash mark printing %s", onoff(hash));
1.13      millert   797:        if (hash)
1.20      deraadt   798:                fprintf(ttyout, " (%d bytes/hash mark)", mark);
                    799:        fputs(".\n", ttyout);
1.13      millert   800:        code = hash;
1.6       kstailey  801: }
                    802:
1.1       deraadt   803: /*
                    804:  * Turn on printing of server echo's.
                    805:  */
1.48      deraadt   806: /*ARGSUSED*/
1.1       deraadt   807: void
1.47      deraadt   808: setverbose(int argc, char *argv[])
1.1       deraadt   809: {
                    810:
1.13      millert   811:        code = togglevar(argc, argv, &verbose, "Verbose mode");
1.1       deraadt   812: }
                    813:
                    814: /*
1.32      itojun    815:  * Toggle PORT/LPRT cmd use before each data connection.
1.1       deraadt   816:  */
1.48      deraadt   817: /*ARGSUSED*/
1.1       deraadt   818: void
1.47      deraadt   819: setport(int argc, char *argv[])
1.1       deraadt   820: {
                    821:
1.32      itojun    822:        code = togglevar(argc, argv, &sendport, "Use of PORT/LPRT cmds");
1.13      millert   823: }
                    824:
                    825: /*
                    826:  * Toggle transfer progress bar.
                    827:  */
1.48      deraadt   828: /*ARGSUSED*/
1.13      millert   829: void
1.47      deraadt   830: setprogress(int argc, char *argv[])
1.13      millert   831: {
                    832:
                    833:        code = togglevar(argc, argv, &progress, "Progress bar");
1.1       deraadt   834: }
                    835:
                    836: /*
1.23      millert   837:  * Turn on interactive prompting during mget, mput, and mdelete.
1.1       deraadt   838:  */
1.48      deraadt   839: /*ARGSUSED*/
1.1       deraadt   840: void
1.47      deraadt   841: setprompt(int argc, char *argv[])
1.1       deraadt   842: {
                    843:
1.13      millert   844:        code = togglevar(argc, argv, &interactive, "Interactive mode");
1.1       deraadt   845: }
                    846:
                    847: /*
1.23      millert   848:  * Toggle gate-ftp mode, or set gate-ftp server
                    849:  */
1.48      deraadt   850: /*ARGSUSED*/
1.23      millert   851: void
1.47      deraadt   852: setgate(int argc, char *argv[])
1.23      millert   853: {
                    854:        static char gsbuf[MAXHOSTNAMELEN];
                    855:
                    856:        if (argc > 3) {
                    857:                fprintf(ttyout, "usage: %s [ on | off | gateserver [ port ] ]\n",
                    858:                    argv[0]);
                    859:                code = -1;
                    860:                return;
                    861:        } else if (argc < 2) {
                    862:                gatemode = !gatemode;
                    863:        } else {
                    864:                if (argc == 2 && strcasecmp(argv[1], "on") == 0)
                    865:                        gatemode = 1;
                    866:                else if (argc == 2 && strcasecmp(argv[1], "off") == 0)
                    867:                        gatemode = 0;
                    868:                else {
                    869:                        if (argc == 3) {
1.32      itojun    870:                                gateport = strdup(argv[2]);
1.41      deraadt   871:                                if (gateport == NULL)
                    872:                                        err(1, NULL);
1.23      millert   873:                        }
1.36      lebel     874:                        strlcpy(gsbuf, argv[1], sizeof(gsbuf));
1.23      millert   875:                        gateserver = gsbuf;
                    876:                        gatemode = 1;
                    877:                }
                    878:        }
                    879:        if (gatemode && (gateserver == NULL || *gateserver == '\0')) {
                    880:                fprintf(ttyout,
                    881:                    "Disabling gate-ftp mode - no gate-ftp server defined.\n");
                    882:                gatemode = 0;
                    883:        } else {
1.32      itojun    884:                fprintf(ttyout, "Gate ftp: %s, server %s, port %s.\n",
1.23      millert   885:                    onoff(gatemode),
1.32      itojun    886:                    *gateserver ? gateserver : "(none)", gateport);
1.23      millert   887:        }
                    888:        code = gatemode;
                    889: }
                    890:
                    891: /*
                    892:  * Toggle metacharacter interpretation on local file names.
1.1       deraadt   893:  */
1.48      deraadt   894: /*ARGSUSED*/
1.1       deraadt   895: void
1.47      deraadt   896: setglob(int argc, char *argv[])
1.1       deraadt   897: {
1.13      millert   898:
                    899:        code = togglevar(argc, argv, &doglob, "Globbing");
                    900: }
                    901:
                    902: /*
1.31      aaron     903:  * Toggle preserving modification times on retrieved files.
1.13      millert   904:  */
1.48      deraadt   905: /*ARGSUSED*/
1.13      millert   906: void
1.47      deraadt   907: setpreserve(int argc, char *argv[])
1.13      millert   908: {
                    909:
                    910:        code = togglevar(argc, argv, &preserve, "Preserve modification times");
1.1       deraadt   911: }
                    912:
                    913: /*
1.23      millert   914:  * Set debugging mode on/off and/or set level of debugging.
1.1       deraadt   915:  */
1.48      deraadt   916: /*ARGSUSED*/
1.1       deraadt   917: void
1.47      deraadt   918: setdebug(int argc, char *argv[])
1.1       deraadt   919: {
1.13      millert   920:        if (argc > 2) {
1.20      deraadt   921:                fprintf(ttyout, "usage: %s [ on | off | debuglevel ]\n", argv[0]);
1.13      millert   922:                code = -1;
                    923:                return;
                    924:        } else if (argc == 2) {
                    925:                if (strcasecmp(argv[1], "on") == 0)
                    926:                        debug = 1;
                    927:                else if (strcasecmp(argv[1], "off") == 0)
                    928:                        debug = 0;
                    929:                else {
1.50      tedu      930:                        const char *errstr;
                    931:                        int val;
1.21      millert   932:
1.50      tedu      933:                        val = strtonum(argv[1], 0, INT_MAX, &errstr);
                    934:                        if (errstr) {
                    935:                                fprintf(ttyout, "debugging value is %s: %s\n",
                    936:                                    errstr, argv[1]);
1.13      millert   937:                                code = -1;
                    938:                                return;
                    939:                        }
1.50      tedu      940:                        debug = val;
1.1       deraadt   941:                }
                    942:        } else
1.13      millert   943:                debug = !debug;
1.1       deraadt   944:        if (debug)
                    945:                options |= SO_DEBUG;
                    946:        else
                    947:                options &= ~SO_DEBUG;
1.20      deraadt   948:        fprintf(ttyout, "Debugging %s (debug=%d).\n", onoff(debug), debug);
1.1       deraadt   949:        code = debug > 0;
                    950: }
                    951:
                    952: /*
1.23      millert   953:  * Set current working directory on remote machine.
1.1       deraadt   954:  */
1.13      millert   955: void
1.47      deraadt   956: cd(int argc, char *argv[])
1.1       deraadt   957: {
1.13      millert   958:        int r;
1.1       deraadt   959:
1.13      millert   960:        if ((argc < 2 && !another(&argc, &argv, "remote-directory")) ||
                    961:            argc > 2) {
1.20      deraadt   962:                fprintf(ttyout, "usage: %s remote-directory\n", argv[0]);
1.1       deraadt   963:                code = -1;
1.13      millert   964:                return;
1.1       deraadt   965:        }
1.13      millert   966:        r = command("CWD %s", argv[1]);
                    967:        if (r == ERROR && code == 500) {
                    968:                if (verbose)
1.20      deraadt   969:                        fputs("CWD command not recognized, trying XCWD.\n", ttyout);
1.13      millert   970:                r = command("XCWD %s", argv[1]);
1.42      deraadt   971:        }
                    972:        if (r == ERROR && code == 550) {
                    973:                dirchange = 0;
                    974:                return;
1.1       deraadt   975:        }
1.13      millert   976:        if (r == COMPLETE)
                    977:                dirchange = 1;
1.1       deraadt   978: }
                    979:
                    980: /*
1.23      millert   981:  * Set current working directory on local machine.
1.1       deraadt   982:  */
                    983: void
1.47      deraadt   984: lcd(int argc, char *argv[])
1.1       deraadt   985: {
                    986:        char buf[MAXPATHLEN];
1.23      millert   987:        char *oldargv1;
1.1       deraadt   988:
                    989:        if (argc < 2)
                    990:                argc++, argv[1] = home;
                    991:        if (argc != 2) {
1.20      deraadt   992:                fprintf(ttyout, "usage: %s local-directory\n", argv[0]);
1.1       deraadt   993:                code = -1;
                    994:                return;
                    995:        }
1.23      millert   996:        oldargv1 = argv[1];
1.1       deraadt   997:        if (!globulize(&argv[1])) {
                    998:                code = -1;
                    999:                return;
                   1000:        }
                   1001:        if (chdir(argv[1]) < 0) {
                   1002:                warn("local: %s", argv[1]);
                   1003:                code = -1;
1.23      millert  1004:        } else {
                   1005:                if (getcwd(buf, sizeof(buf)) != NULL)
                   1006:                        fprintf(ttyout, "Local directory now %s\n", buf);
                   1007:                else
                   1008:                        warn("getcwd: %s", argv[1]);
                   1009:                code = 0;
1.1       deraadt  1010:        }
1.23      millert  1011:        if (oldargv1 != argv[1])        /* free up after globulize() */
                   1012:                free(argv[1]);
1.1       deraadt  1013: }
                   1014:
                   1015: /*
                   1016:  * Delete a single file.
                   1017:  */
                   1018: void
1.48      deraadt  1019: deletecmd(int argc, char *argv[])
1.1       deraadt  1020: {
                   1021:
1.13      millert  1022:        if ((argc < 2 && !another(&argc, &argv, "remote-file")) || argc > 2) {
1.20      deraadt  1023:                fprintf(ttyout, "usage: %s remote-file\n", argv[0]);
1.1       deraadt  1024:                code = -1;
                   1025:                return;
                   1026:        }
1.14      millert  1027:        (void)command("DELE %s", argv[1]);
1.1       deraadt  1028: }
                   1029:
                   1030: /*
                   1031:  * Delete multiple files.
                   1032:  */
                   1033: void
1.47      deraadt  1034: mdelete(int argc, char *argv[])
1.1       deraadt  1035: {
                   1036:        sig_t oldintr;
                   1037:        int ointer;
                   1038:        char *cp;
                   1039:
                   1040:        if (argc < 2 && !another(&argc, &argv, "remote-files")) {
1.20      deraadt  1041:                fprintf(ttyout, "usage: %s remote-files\n", argv[0]);
1.1       deraadt  1042:                code = -1;
                   1043:                return;
                   1044:        }
                   1045:        mname = argv[0];
                   1046:        mflag = 1;
                   1047:        oldintr = signal(SIGINT, mabort);
1.14      millert  1048:        (void)setjmp(jabort);
1.16      millert  1049:        while ((cp = remglob(argv, 0, NULL)) != NULL) {
1.1       deraadt  1050:                if (*cp == '\0') {
                   1051:                        mflag = 0;
                   1052:                        continue;
                   1053:                }
                   1054:                if (mflag && confirm(argv[0], cp)) {
1.14      millert  1055:                        (void)command("DELE %s", cp);
1.1       deraadt  1056:                        if (!mflag && fromatty) {
                   1057:                                ointer = interactive;
                   1058:                                interactive = 1;
                   1059:                                if (confirm("Continue with", "mdelete")) {
                   1060:                                        mflag++;
                   1061:                                }
                   1062:                                interactive = ointer;
                   1063:                        }
                   1064:                }
                   1065:        }
1.14      millert  1066:        (void)signal(SIGINT, oldintr);
1.1       deraadt  1067:        mflag = 0;
                   1068: }
                   1069:
                   1070: /*
                   1071:  * Rename a remote file.
                   1072:  */
                   1073: void
1.47      deraadt  1074: renamefile(int argc, char *argv[])
1.1       deraadt  1075: {
                   1076:
                   1077:        if (argc < 2 && !another(&argc, &argv, "from-name"))
                   1078:                goto usage;
1.13      millert  1079:        if ((argc < 3 && !another(&argc, &argv, "to-name")) || argc > 3) {
1.1       deraadt  1080: usage:
1.20      deraadt  1081:                fprintf(ttyout, "usage: %s from-name to-name\n", argv[0]);
1.1       deraadt  1082:                code = -1;
                   1083:                return;
                   1084:        }
                   1085:        if (command("RNFR %s", argv[1]) == CONTINUE)
1.14      millert  1086:                (void)command("RNTO %s", argv[2]);
1.1       deraadt  1087: }
                   1088:
                   1089: /*
1.23      millert  1090:  * Get a directory listing of remote files.
1.1       deraadt  1091:  */
                   1092: void
1.47      deraadt  1093: ls(int argc, char *argv[])
1.1       deraadt  1094: {
1.13      millert  1095:        const char *cmd;
1.23      millert  1096:        char *oldargv2, *globargv2;
1.1       deraadt  1097:
                   1098:        if (argc < 2)
                   1099:                argc++, argv[1] = NULL;
                   1100:        if (argc < 3)
                   1101:                argc++, argv[2] = "-";
                   1102:        if (argc > 3) {
1.20      deraadt  1103:                fprintf(ttyout, "usage: %s remote-directory local-file\n", argv[0]);
1.1       deraadt  1104:                code = -1;
                   1105:                return;
                   1106:        }
1.33      millert  1107:        cmd = strcmp(argv[0], "nlist") == 0 ? "NLST" : "LIST";
1.23      millert  1108:        oldargv2 = argv[2];
1.1       deraadt  1109:        if (strcmp(argv[2], "-") && !globulize(&argv[2])) {
                   1110:                code = -1;
                   1111:                return;
                   1112:        }
1.23      millert  1113:        globargv2 = argv[2];
                   1114:        if (strcmp(argv[2], "-") && *argv[2] != '|' && (!globulize(&argv[2]) ||
                   1115:            !confirm("output to local-file:", argv[2]))) {
                   1116:                code = -1;
                   1117:                goto freels;
1.1       deraadt  1118:        }
1.23      millert  1119:        recvrequest(cmd, argv[2], argv[1], "w", 0, 0);
1.3       downsj   1120:
                   1121:        /* flush results in case commands are coming from a pipe */
1.20      deraadt  1122:        fflush(ttyout);
1.23      millert  1123: freels:
                   1124:        if (argv[2] != globargv2)               /* free up after globulize() */
                   1125:                free(argv[2]);
                   1126:        if (globargv2 != oldargv2)
                   1127:                free(globargv2);
1.1       deraadt  1128: }
                   1129:
                   1130: /*
1.23      millert  1131:  * Get a directory listing of multiple remote files.
1.1       deraadt  1132:  */
                   1133: void
1.47      deraadt  1134: mls(int argc, char *argv[])
1.1       deraadt  1135: {
                   1136:        sig_t oldintr;
                   1137:        int ointer, i;
1.51      ray      1138:        char lmode[1], *dest, *odest;
1.1       deraadt  1139:
                   1140:        if (argc < 2 && !another(&argc, &argv, "remote-files"))
                   1141:                goto usage;
                   1142:        if (argc < 3 && !another(&argc, &argv, "local-file")) {
                   1143: usage:
1.20      deraadt  1144:                fprintf(ttyout, "usage: %s remote-files local-file\n", argv[0]);
1.1       deraadt  1145:                code = -1;
                   1146:                return;
                   1147:        }
1.23      millert  1148:        odest = dest = argv[argc - 1];
1.1       deraadt  1149:        argv[argc - 1] = NULL;
                   1150:        if (strcmp(dest, "-") && *dest != '|')
                   1151:                if (!globulize(&dest) ||
                   1152:                    !confirm("output to local-file:", dest)) {
                   1153:                        code = -1;
                   1154:                        return;
                   1155:        }
                   1156:        mname = argv[0];
                   1157:        mflag = 1;
                   1158:        oldintr = signal(SIGINT, mabort);
1.14      millert  1159:        (void)setjmp(jabort);
1.1       deraadt  1160:        for (i = 1; mflag && i < argc-1; ++i) {
1.51      ray      1161:                *lmode = (i == 1) ? 'w' : 'a';
                   1162:                recvrequest("LIST", dest, argv[i], lmode, 0, 0);
1.1       deraadt  1163:                if (!mflag && fromatty) {
                   1164:                        ointer = interactive;
                   1165:                        interactive = 1;
                   1166:                        if (confirm("Continue with", argv[0])) {
                   1167:                                mflag ++;
                   1168:                        }
                   1169:                        interactive = ointer;
                   1170:                }
                   1171:        }
1.14      millert  1172:        (void)signal(SIGINT, oldintr);
1.1       deraadt  1173:        mflag = 0;
1.23      millert  1174:        if (dest != odest)                      /* free up after globulize() */
                   1175:                free(dest);
1.1       deraadt  1176: }
                   1177:
                   1178: /*
                   1179:  * Do a shell escape
                   1180:  */
                   1181: /*ARGSUSED*/
                   1182: void
1.47      deraadt  1183: shell(int argc, char *argv[])
1.1       deraadt  1184: {
                   1185:        pid_t pid;
                   1186:        sig_t old1, old2;
1.51      ray      1187:        char shellnam[MAXPATHLEN], *shellp, *namep;
1.24      millert  1188:        int wait_status;
1.1       deraadt  1189:
                   1190:        old1 = signal (SIGINT, SIG_IGN);
                   1191:        old2 = signal (SIGQUIT, SIG_IGN);
                   1192:        if ((pid = fork()) == 0) {
                   1193:                for (pid = 3; pid < 20; pid++)
1.14      millert  1194:                        (void)close(pid);
                   1195:                (void)signal(SIGINT, SIG_DFL);
                   1196:                (void)signal(SIGQUIT, SIG_DFL);
1.51      ray      1197:                shellp = getenv("SHELL");
                   1198:                if (shellp == NULL || *shellp == '\0')
                   1199:                        shellp = _PATH_BSHELL;
                   1200:                namep = strrchr(shellp, '/');
1.1       deraadt  1201:                if (namep == NULL)
1.51      ray      1202:                        namep = shellp;
1.13      millert  1203:                shellnam[0] = '-';
1.36      lebel    1204:                (void)strlcpy(shellnam + 1, ++namep, sizeof(shellnam) - 1);
1.1       deraadt  1205:                if (strcmp(namep, "sh") != 0)
                   1206:                        shellnam[0] = '+';
                   1207:                if (debug) {
1.51      ray      1208:                        fputs(shellp, ttyout);
1.21      millert  1209:                        fputc('\n', ttyout);
1.20      deraadt  1210:                        (void)fflush(ttyout);
1.1       deraadt  1211:                }
                   1212:                if (argc > 1) {
1.51      ray      1213:                        execl(shellp, shellnam, "-c", altarg, (char *)0);
1.1       deraadt  1214:                }
                   1215:                else {
1.51      ray      1216:                        execl(shellp, shellnam, (char *)0);
1.1       deraadt  1217:                }
1.51      ray      1218:                warn("%s", shellp);
1.1       deraadt  1219:                code = -1;
                   1220:                exit(1);
                   1221:        }
                   1222:        if (pid > 0)
1.24      millert  1223:                while (wait(&wait_status) != pid)
1.1       deraadt  1224:                        ;
1.14      millert  1225:        (void)signal(SIGINT, old1);
                   1226:        (void)signal(SIGQUIT, old2);
1.1       deraadt  1227:        if (pid == -1) {
1.16      millert  1228:                warn("Try again later");
1.1       deraadt  1229:                code = -1;
                   1230:        }
                   1231:        else {
                   1232:                code = 0;
                   1233:        }
                   1234: }
                   1235:
                   1236: /*
                   1237:  * Send new user information (re-login)
                   1238:  */
                   1239: void
1.47      deraadt  1240: user(int argc, char *argv[])
1.1       deraadt  1241: {
1.51      ray      1242:        char acctname[80];
1.1       deraadt  1243:        int n, aflag = 0;
                   1244:
                   1245:        if (argc < 2)
1.14      millert  1246:                (void)another(&argc, &argv, "username");
1.1       deraadt  1247:        if (argc < 2 || argc > 4) {
1.20      deraadt  1248:                fprintf(ttyout, "usage: %s username [password] [account]\n", argv[0]);
1.1       deraadt  1249:                code = -1;
                   1250:                return;
                   1251:        }
                   1252:        n = command("USER %s", argv[1]);
                   1253:        if (n == CONTINUE) {
                   1254:                if (argc < 3 )
1.56      millert  1255:                        argv[2] = getpass("Password:"), argc++;
1.1       deraadt  1256:                n = command("PASS %s", argv[2]);
                   1257:        }
                   1258:        if (n == CONTINUE) {
                   1259:                if (argc < 4) {
1.20      deraadt  1260:                        (void)fputs("Account: ", ttyout);
                   1261:                        (void)fflush(ttyout);
1.59    ! martynas 1262:                        if (fgets(acctname, sizeof(acctname), stdin) == NULL) {
        !          1263:                                clearerr(stdin);
1.53      ray      1264:                                goto fail;
1.59    ! martynas 1265:                        }
1.57      gilles   1266:
                   1267:                        acctname[strcspn(acctname, "\n")] = '\0';
                   1268:
1.51      ray      1269:                        argv[3] = acctname;
                   1270:                        argc++;
1.1       deraadt  1271:                }
                   1272:                n = command("ACCT %s", argv[3]);
                   1273:                aflag++;
                   1274:        }
                   1275:        if (n != COMPLETE) {
1.53      ray      1276:  fail:
1.20      deraadt  1277:                fputs("Login failed.\n", ttyout);
1.1       deraadt  1278:                return;
                   1279:        }
                   1280:        if (!aflag && argc == 4) {
1.14      millert  1281:                (void)command("ACCT %s", argv[3]);
1.1       deraadt  1282:        }
1.19      millert  1283:        connected = -1;
1.1       deraadt  1284: }
                   1285:
                   1286: /*
1.13      millert  1287:  * Print working directory on remote machine.
1.1       deraadt  1288:  */
1.48      deraadt  1289: /*ARGSUSED*/
1.1       deraadt  1290: void
1.47      deraadt  1291: pwd(int argc, char *argv[])
1.1       deraadt  1292: {
                   1293:        int oldverbose = verbose;
                   1294:
                   1295:        /*
                   1296:         * If we aren't verbose, this doesn't do anything!
                   1297:         */
                   1298:        verbose = 1;
                   1299:        if (command("PWD") == ERROR && code == 500) {
1.20      deraadt  1300:                fputs("PWD command not recognized, trying XPWD.\n", ttyout);
1.14      millert  1301:                (void)command("XPWD");
1.1       deraadt  1302:        }
                   1303:        verbose = oldverbose;
                   1304: }
                   1305:
                   1306: /*
1.13      millert  1307:  * Print working directory on local machine.
                   1308:  */
1.48      deraadt  1309: /* ARGSUSED */
1.13      millert  1310: void
1.47      deraadt  1311: lpwd(int argc, char *argv[])
1.13      millert  1312: {
                   1313:        char buf[MAXPATHLEN];
                   1314:
                   1315:        if (getcwd(buf, sizeof(buf)) != NULL)
1.20      deraadt  1316:                fprintf(ttyout, "Local directory %s\n", buf);
1.13      millert  1317:        else
                   1318:                warn("getcwd");
                   1319:        code = 0;
                   1320: }
                   1321:
                   1322: /*
1.1       deraadt  1323:  * Make a directory.
                   1324:  */
                   1325: void
1.47      deraadt  1326: makedir(int argc, char *argv[])
1.1       deraadt  1327: {
                   1328:
1.13      millert  1329:        if ((argc < 2 && !another(&argc, &argv, "directory-name")) ||
                   1330:            argc > 2) {
1.20      deraadt  1331:                fprintf(ttyout, "usage: %s directory-name\n", argv[0]);
1.1       deraadt  1332:                code = -1;
                   1333:                return;
                   1334:        }
                   1335:        if (command("MKD %s", argv[1]) == ERROR && code == 500) {
                   1336:                if (verbose)
1.20      deraadt  1337:                        fputs("MKD command not recognized, trying XMKD.\n", ttyout);
1.14      millert  1338:                (void)command("XMKD %s", argv[1]);
1.1       deraadt  1339:        }
                   1340: }
                   1341:
                   1342: /*
                   1343:  * Remove a directory.
                   1344:  */
                   1345: void
1.47      deraadt  1346: removedir(int argc, char *argv[])
1.1       deraadt  1347: {
                   1348:
1.13      millert  1349:        if ((argc < 2 && !another(&argc, &argv, "directory-name")) ||
                   1350:            argc > 2) {
1.20      deraadt  1351:                fprintf(ttyout, "usage: %s directory-name\n", argv[0]);
1.1       deraadt  1352:                code = -1;
                   1353:                return;
                   1354:        }
                   1355:        if (command("RMD %s", argv[1]) == ERROR && code == 500) {
                   1356:                if (verbose)
1.20      deraadt  1357:                        fputs("RMD command not recognized, trying XRMD.\n", ttyout);
1.14      millert  1358:                (void)command("XRMD %s", argv[1]);
1.1       deraadt  1359:        }
                   1360: }
                   1361:
                   1362: /*
                   1363:  * Send a line, verbatim, to the remote machine.
                   1364:  */
                   1365: void
1.47      deraadt  1366: quote(int argc, char *argv[])
1.1       deraadt  1367: {
                   1368:
                   1369:        if (argc < 2 && !another(&argc, &argv, "command line to send")) {
1.20      deraadt  1370:                fprintf(ttyout, "usage: %s line-to-send\n", argv[0]);
1.1       deraadt  1371:                code = -1;
                   1372:                return;
                   1373:        }
                   1374:        quote1("", argc, argv);
                   1375: }
                   1376:
                   1377: /*
                   1378:  * Send a SITE command to the remote machine.  The line
                   1379:  * is sent verbatim to the remote machine, except that the
                   1380:  * word "SITE" is added at the front.
                   1381:  */
                   1382: void
1.47      deraadt  1383: site(int argc, char *argv[])
1.1       deraadt  1384: {
                   1385:
                   1386:        if (argc < 2 && !another(&argc, &argv, "arguments to SITE command")) {
1.20      deraadt  1387:                fprintf(ttyout, "usage: %s line-to-send\n", argv[0]);
1.1       deraadt  1388:                code = -1;
                   1389:                return;
                   1390:        }
1.26      weingart 1391:        quote1("SITE", argc, argv);
1.1       deraadt  1392: }
                   1393:
                   1394: /*
                   1395:  * Turn argv[1..argc) into a space-separated string, then prepend initial text.
                   1396:  * Send the result as a one-line command and get response.
                   1397:  */
                   1398: void
1.47      deraadt  1399: quote1(const char *initial, int argc, char *argv[])
1.1       deraadt  1400: {
                   1401:        int i, len;
                   1402:        char buf[BUFSIZ];               /* must be >= sizeof(line) */
                   1403:
1.36      lebel    1404:        (void)strlcpy(buf, initial, sizeof(buf));
1.1       deraadt  1405:        if (argc > 1) {
1.26      weingart 1406:                for (i = 1, len = strlen(buf); i < argc && len < sizeof(buf)-1; i++) {
                   1407:                        /* Space for next arg */
                   1408:                        if (len > 1)
                   1409:                                buf[len++] = ' ';
                   1410:
                   1411:                        /* Sanity check */
                   1412:                        if (len >= sizeof(buf) - 1)
                   1413:                                break;
                   1414:
1.27      millert  1415:                        /* Copy next argument, NUL terminate always */
1.36      lebel    1416:                        strlcpy(&buf[len], argv[i], sizeof(buf) - len);
1.26      weingart 1417:
                   1418:                        /* Update string length */
                   1419:                        len = strlen(buf);
1.1       deraadt  1420:                }
                   1421:        }
1.26      weingart 1422:
1.35      aaron    1423:        /* Make double (triple?) sure the sucker is NUL terminated */
1.26      weingart 1424:        buf[sizeof(buf) - 1] = '\0';
                   1425:
1.29      deraadt  1426:        if (command("%s", buf) == PRELIM) {
1.1       deraadt  1427:                while (getreply(0) == PRELIM)
                   1428:                        continue;
                   1429:        }
                   1430: }
                   1431:
                   1432: void
1.47      deraadt  1433: do_chmod(int argc, char *argv[])
1.1       deraadt  1434: {
                   1435:
                   1436:        if (argc < 2 && !another(&argc, &argv, "mode"))
                   1437:                goto usage;
1.13      millert  1438:        if ((argc < 3 && !another(&argc, &argv, "file-name")) || argc > 3) {
1.1       deraadt  1439: usage:
1.20      deraadt  1440:                fprintf(ttyout, "usage: %s mode file-name\n", argv[0]);
1.1       deraadt  1441:                code = -1;
                   1442:                return;
                   1443:        }
1.14      millert  1444:        (void)command("SITE CHMOD %s %s", argv[1], argv[2]);
1.1       deraadt  1445: }
                   1446:
                   1447: void
1.47      deraadt  1448: do_umask(int argc, char *argv[])
1.1       deraadt  1449: {
                   1450:        int oldverbose = verbose;
                   1451:
                   1452:        verbose = 1;
1.14      millert  1453:        (void)command(argc == 1 ? "SITE UMASK" : "SITE UMASK %s", argv[1]);
1.1       deraadt  1454:        verbose = oldverbose;
                   1455: }
                   1456:
                   1457: void
1.47      deraadt  1458: idle(int argc, char *argv[])
1.1       deraadt  1459: {
                   1460:        int oldverbose = verbose;
                   1461:
                   1462:        verbose = 1;
1.14      millert  1463:        (void)command(argc == 1 ? "SITE IDLE" : "SITE IDLE %s", argv[1]);
1.1       deraadt  1464:        verbose = oldverbose;
                   1465: }
                   1466:
                   1467: /*
                   1468:  * Ask the other side for help.
                   1469:  */
                   1470: void
1.47      deraadt  1471: rmthelp(int argc, char *argv[])
1.1       deraadt  1472: {
                   1473:        int oldverbose = verbose;
                   1474:
                   1475:        verbose = 1;
1.14      millert  1476:        (void)command(argc == 1 ? "HELP" : "HELP %s", argv[1]);
1.1       deraadt  1477:        verbose = oldverbose;
                   1478: }
                   1479:
                   1480: /*
                   1481:  * Terminate session and exit.
                   1482:  */
1.48      deraadt  1483: /*ARGSUSED*/
1.1       deraadt  1484: void
1.47      deraadt  1485: quit(int argc, char *argv[])
1.1       deraadt  1486: {
                   1487:
                   1488:        if (connected)
                   1489:                disconnect(0, 0);
                   1490:        pswitch(1);
                   1491:        if (connected) {
                   1492:                disconnect(0, 0);
                   1493:        }
                   1494:        exit(0);
                   1495: }
                   1496:
                   1497: /*
                   1498:  * Terminate session, but don't exit.
                   1499:  */
1.48      deraadt  1500: /* ARGSUSED */
1.1       deraadt  1501: void
1.47      deraadt  1502: disconnect(int argc, char *argv[])
1.1       deraadt  1503: {
                   1504:
                   1505:        if (!connected)
                   1506:                return;
1.14      millert  1507:        (void)command("QUIT");
1.1       deraadt  1508:        if (cout) {
1.14      millert  1509:                (void)fclose(cout);
1.1       deraadt  1510:        }
                   1511:        cout = NULL;
                   1512:        connected = 0;
                   1513:        data = -1;
                   1514:        if (!proxy) {
                   1515:                macnum = 0;
                   1516:        }
                   1517: }
                   1518:
                   1519: void
1.47      deraadt  1520: account(int argc, char *argv[])
1.1       deraadt  1521: {
1.13      millert  1522:        char *ap;
1.1       deraadt  1523:
1.13      millert  1524:        if (argc > 2) {
1.20      deraadt  1525:                fprintf(ttyout, "usage: %s [password]\n", argv[0]);
1.13      millert  1526:                code = -1;
                   1527:                return;
1.1       deraadt  1528:        }
1.13      millert  1529:        else if (argc == 2)
                   1530:                ap = argv[1];
                   1531:        else
1.1       deraadt  1532:                ap = getpass("Account:");
1.14      millert  1533:        (void)command("ACCT %s", ap);
1.1       deraadt  1534: }
                   1535:
                   1536: jmp_buf abortprox;
                   1537:
1.48      deraadt  1538: /* ARGSUSED */
1.1       deraadt  1539: void
1.48      deraadt  1540: proxabort(int signo)
1.1       deraadt  1541: {
                   1542:
1.13      millert  1543:        alarmtimer(0);
1.1       deraadt  1544:        if (!proxy) {
                   1545:                pswitch(1);
                   1546:        }
                   1547:        if (connected) {
                   1548:                proxflag = 1;
                   1549:        }
                   1550:        else {
                   1551:                proxflag = 0;
                   1552:        }
                   1553:        pswitch(0);
1.13      millert  1554:        longjmp(abortprox, 1);
1.1       deraadt  1555: }
                   1556:
                   1557: void
1.47      deraadt  1558: doproxy(int argc, char *argv[])
1.1       deraadt  1559: {
                   1560:        struct cmd *c;
1.13      millert  1561:        int cmdpos;
1.1       deraadt  1562:        sig_t oldintr;
                   1563:
                   1564:        if (argc < 2 && !another(&argc, &argv, "command")) {
1.20      deraadt  1565:                fprintf(ttyout, "usage: %s command\n", argv[0]);
1.1       deraadt  1566:                code = -1;
                   1567:                return;
                   1568:        }
                   1569:        c = getcmd(argv[1]);
                   1570:        if (c == (struct cmd *) -1) {
1.20      deraadt  1571:                fputs("?Ambiguous command.\n", ttyout);
                   1572:                (void)fflush(ttyout);
1.1       deraadt  1573:                code = -1;
                   1574:                return;
                   1575:        }
                   1576:        if (c == 0) {
1.20      deraadt  1577:                fputs("?Invalid command.\n", ttyout);
                   1578:                (void)fflush(ttyout);
1.1       deraadt  1579:                code = -1;
                   1580:                return;
                   1581:        }
                   1582:        if (!c->c_proxy) {
1.20      deraadt  1583:                fputs("?Invalid proxy command.\n", ttyout);
                   1584:                (void)fflush(ttyout);
1.1       deraadt  1585:                code = -1;
                   1586:                return;
                   1587:        }
                   1588:        if (setjmp(abortprox)) {
                   1589:                code = -1;
                   1590:                return;
                   1591:        }
                   1592:        oldintr = signal(SIGINT, proxabort);
                   1593:        pswitch(1);
                   1594:        if (c->c_conn && !connected) {
1.20      deraadt  1595:                fputs("Not connected.\n", ttyout);
                   1596:                (void)fflush(ttyout);
1.1       deraadt  1597:                pswitch(0);
1.14      millert  1598:                (void)signal(SIGINT, oldintr);
1.1       deraadt  1599:                code = -1;
                   1600:                return;
                   1601:        }
1.13      millert  1602:        cmdpos = strcspn(line, " \t");
                   1603:        if (cmdpos > 0)         /* remove leading "proxy " from input buffer */
                   1604:                memmove(line, line + cmdpos + 1, strlen(line) - cmdpos + 1);
1.1       deraadt  1605:        (*c->c_handler)(argc-1, argv+1);
                   1606:        if (connected) {
                   1607:                proxflag = 1;
                   1608:        }
                   1609:        else {
                   1610:                proxflag = 0;
                   1611:        }
                   1612:        pswitch(0);
1.14      millert  1613:        (void)signal(SIGINT, oldintr);
1.1       deraadt  1614: }
                   1615:
                   1616: void
1.47      deraadt  1617: setcase(int argc, char *argv[])
1.1       deraadt  1618: {
                   1619:
1.13      millert  1620:        code = togglevar(argc, argv, &mcase, "Case mapping");
1.1       deraadt  1621: }
                   1622:
                   1623: void
1.47      deraadt  1624: setcr(int argc, char *argv[])
1.1       deraadt  1625: {
                   1626:
1.13      millert  1627:        code = togglevar(argc, argv, &crflag, "Carriage Return stripping");
1.1       deraadt  1628: }
                   1629:
                   1630: void
1.47      deraadt  1631: setntrans(int argc, char *argv[])
1.1       deraadt  1632: {
                   1633:        if (argc == 1) {
                   1634:                ntflag = 0;
1.20      deraadt  1635:                fputs("Ntrans off.\n", ttyout);
1.1       deraadt  1636:                code = ntflag;
                   1637:                return;
                   1638:        }
                   1639:        ntflag++;
                   1640:        code = ntflag;
1.36      lebel    1641:        (void)strlcpy(ntin, argv[1], sizeof(ntin));
1.1       deraadt  1642:        if (argc == 2) {
                   1643:                ntout[0] = '\0';
                   1644:                return;
                   1645:        }
1.36      lebel    1646:        (void)strlcpy(ntout, argv[2], sizeof(ntout));
1.1       deraadt  1647: }
                   1648:
                   1649: char *
1.47      deraadt  1650: dotrans(char *name)
1.1       deraadt  1651: {
                   1652:        static char new[MAXPATHLEN];
                   1653:        char *cp1, *cp2 = new;
                   1654:        int i, ostop, found;
                   1655:
                   1656:        for (ostop = 0; *(ntout + ostop) && ostop < 16; ostop++)
                   1657:                continue;
                   1658:        for (cp1 = name; *cp1; cp1++) {
                   1659:                found = 0;
                   1660:                for (i = 0; *(ntin + i) && i < 16; i++) {
                   1661:                        if (*cp1 == *(ntin + i)) {
                   1662:                                found++;
                   1663:                                if (i < ostop) {
                   1664:                                        *cp2++ = *(ntout + i);
                   1665:                                }
                   1666:                                break;
                   1667:                        }
                   1668:                }
                   1669:                if (!found) {
                   1670:                        *cp2++ = *cp1;
                   1671:                }
                   1672:        }
                   1673:        *cp2 = '\0';
                   1674:        return (new);
                   1675: }
                   1676:
                   1677: void
1.47      deraadt  1678: setnmap(int argc, char *argv[])
1.1       deraadt  1679: {
                   1680:        char *cp;
                   1681:
                   1682:        if (argc == 1) {
                   1683:                mapflag = 0;
1.20      deraadt  1684:                fputs("Nmap off.\n", ttyout);
1.1       deraadt  1685:                code = mapflag;
                   1686:                return;
                   1687:        }
1.13      millert  1688:        if ((argc < 3 && !another(&argc, &argv, "mapout")) || argc > 3) {
1.20      deraadt  1689:                fprintf(ttyout, "usage: %s [mapin mapout]\n", argv[0]);
1.1       deraadt  1690:                code = -1;
                   1691:                return;
                   1692:        }
                   1693:        mapflag = 1;
                   1694:        code = 1;
                   1695:        cp = strchr(altarg, ' ');
                   1696:        if (proxy) {
                   1697:                while(*++cp == ' ')
                   1698:                        continue;
                   1699:                altarg = cp;
                   1700:                cp = strchr(altarg, ' ');
                   1701:        }
                   1702:        *cp = '\0';
1.14      millert  1703:        (void)strncpy(mapin, altarg, MAXPATHLEN - 1);
1.1       deraadt  1704:        while (*++cp == ' ')
                   1705:                continue;
1.14      millert  1706:        (void)strncpy(mapout, cp, MAXPATHLEN - 1);
1.1       deraadt  1707: }
                   1708:
                   1709: char *
1.47      deraadt  1710: domap(char *name)
1.1       deraadt  1711: {
                   1712:        static char new[MAXPATHLEN];
                   1713:        char *cp1 = name, *cp2 = mapin;
                   1714:        char *tp[9], *te[9];
                   1715:        int i, toks[9], toknum = 0, match = 1;
                   1716:
                   1717:        for (i=0; i < 9; ++i) {
                   1718:                toks[i] = 0;
                   1719:        }
                   1720:        while (match && *cp1 && *cp2) {
                   1721:                switch (*cp2) {
                   1722:                        case '\\':
                   1723:                                if (*++cp2 != *cp1) {
                   1724:                                        match = 0;
                   1725:                                }
                   1726:                                break;
                   1727:                        case '$':
                   1728:                                if (*(cp2+1) >= '1' && (*cp2+1) <= '9') {
                   1729:                                        if (*cp1 != *(++cp2+1)) {
                   1730:                                                toks[toknum = *cp2 - '1']++;
                   1731:                                                tp[toknum] = cp1;
                   1732:                                                while (*++cp1 && *(cp2+1)
                   1733:                                                        != *cp1);
                   1734:                                                te[toknum] = cp1;
                   1735:                                        }
                   1736:                                        cp2++;
                   1737:                                        break;
                   1738:                                }
                   1739:                                /* FALLTHROUGH */
                   1740:                        default:
                   1741:                                if (*cp2 != *cp1) {
                   1742:                                        match = 0;
                   1743:                                }
                   1744:                                break;
                   1745:                }
                   1746:                if (match && *cp1) {
                   1747:                        cp1++;
                   1748:                }
                   1749:                if (match && *cp2) {
                   1750:                        cp2++;
                   1751:                }
                   1752:        }
                   1753:        if (!match && *cp1) /* last token mismatch */
                   1754:        {
                   1755:                toks[toknum] = 0;
                   1756:        }
                   1757:        cp1 = new;
                   1758:        *cp1 = '\0';
                   1759:        cp2 = mapout;
                   1760:        while (*cp2) {
                   1761:                match = 0;
                   1762:                switch (*cp2) {
                   1763:                        case '\\':
                   1764:                                if (*(cp2 + 1)) {
                   1765:                                        *cp1++ = *++cp2;
                   1766:                                }
                   1767:                                break;
                   1768:                        case '[':
                   1769: LOOP:
1.13      millert  1770:                                if (*++cp2 == '$' && isdigit(*(cp2+1))) {
1.1       deraadt  1771:                                        if (*++cp2 == '0') {
                   1772:                                                char *cp3 = name;
                   1773:
                   1774:                                                while (*cp3) {
                   1775:                                                        *cp1++ = *cp3++;
                   1776:                                                }
                   1777:                                                match = 1;
                   1778:                                        }
                   1779:                                        else if (toks[toknum = *cp2 - '1']) {
                   1780:                                                char *cp3 = tp[toknum];
                   1781:
                   1782:                                                while (cp3 != te[toknum]) {
                   1783:                                                        *cp1++ = *cp3++;
                   1784:                                                }
                   1785:                                                match = 1;
                   1786:                                        }
                   1787:                                }
                   1788:                                else {
1.13      millert  1789:                                        while (*cp2 && *cp2 != ',' &&
1.1       deraadt  1790:                                            *cp2 != ']') {
                   1791:                                                if (*cp2 == '\\') {
                   1792:                                                        cp2++;
                   1793:                                                }
                   1794:                                                else if (*cp2 == '$' &&
                   1795:                                                        isdigit(*(cp2+1))) {
                   1796:                                                        if (*++cp2 == '0') {
                   1797:                                                           char *cp3 = name;
                   1798:
                   1799:                                                           while (*cp3) {
                   1800:                                                                *cp1++ = *cp3++;
                   1801:                                                           }
                   1802:                                                        }
                   1803:                                                        else if (toks[toknum =
                   1804:                                                            *cp2 - '1']) {
                   1805:                                                           char *cp3=tp[toknum];
                   1806:
                   1807:                                                           while (cp3 !=
                   1808:                                                                  te[toknum]) {
                   1809:                                                                *cp1++ = *cp3++;
                   1810:                                                           }
                   1811:                                                        }
                   1812:                                                }
                   1813:                                                else if (*cp2) {
                   1814:                                                        *cp1++ = *cp2++;
                   1815:                                                }
                   1816:                                        }
                   1817:                                        if (!*cp2) {
1.20      deraadt  1818:                                                fputs(
                   1819: "nmap: unbalanced brackets.\n", ttyout);
1.1       deraadt  1820:                                                return (name);
                   1821:                                        }
                   1822:                                        match = 1;
                   1823:                                        cp2--;
                   1824:                                }
                   1825:                                if (match) {
                   1826:                                        while (*++cp2 && *cp2 != ']') {
                   1827:                                              if (*cp2 == '\\' && *(cp2 + 1)) {
                   1828:                                                        cp2++;
                   1829:                                              }
                   1830:                                        }
                   1831:                                        if (!*cp2) {
1.20      deraadt  1832:                                                fputs(
                   1833: "nmap: unbalanced brackets.\n", ttyout);
1.1       deraadt  1834:                                                return (name);
                   1835:                                        }
                   1836:                                        break;
                   1837:                                }
                   1838:                                switch (*++cp2) {
                   1839:                                        case ',':
                   1840:                                                goto LOOP;
                   1841:                                        case ']':
                   1842:                                                break;
                   1843:                                        default:
                   1844:                                                cp2--;
                   1845:                                                goto LOOP;
                   1846:                                }
                   1847:                                break;
                   1848:                        case '$':
                   1849:                                if (isdigit(*(cp2 + 1))) {
                   1850:                                        if (*++cp2 == '0') {
                   1851:                                                char *cp3 = name;
                   1852:
                   1853:                                                while (*cp3) {
                   1854:                                                        *cp1++ = *cp3++;
                   1855:                                                }
                   1856:                                        }
                   1857:                                        else if (toks[toknum = *cp2 - '1']) {
                   1858:                                                char *cp3 = tp[toknum];
                   1859:
                   1860:                                                while (cp3 != te[toknum]) {
                   1861:                                                        *cp1++ = *cp3++;
                   1862:                                                }
                   1863:                                        }
                   1864:                                        break;
                   1865:                                }
1.51      ray      1866:                                /* FALLTHROUGH */
1.1       deraadt  1867:                        default:
                   1868:                                *cp1++ = *cp2;
                   1869:                                break;
                   1870:                }
                   1871:                cp2++;
                   1872:        }
                   1873:        *cp1 = '\0';
                   1874:        if (!*new) {
                   1875:                return (name);
                   1876:        }
                   1877:        return (new);
                   1878: }
                   1879:
                   1880: void
1.47      deraadt  1881: setpassive(int argc, char *argv[])
1.1       deraadt  1882: {
                   1883:
1.15      millert  1884:        code = togglevar(argc, argv, &passivemode,
                   1885:            verbose ? "Passive mode" : NULL);
1.1       deraadt  1886: }
                   1887:
                   1888: void
1.47      deraadt  1889: setsunique(int argc, char *argv[])
1.1       deraadt  1890: {
                   1891:
1.13      millert  1892:        code = togglevar(argc, argv, &sunique, "Store unique");
1.1       deraadt  1893: }
                   1894:
                   1895: void
1.47      deraadt  1896: setrunique(int argc, char *argv[])
1.1       deraadt  1897: {
                   1898:
1.13      millert  1899:        code = togglevar(argc, argv, &runique, "Receive unique");
1.1       deraadt  1900: }
                   1901:
1.13      millert  1902: /* change directory to parent directory */
1.48      deraadt  1903: /* ARGSUSED */
1.1       deraadt  1904: void
1.47      deraadt  1905: cdup(int argc, char *argv[])
1.1       deraadt  1906: {
1.13      millert  1907:        int r;
1.1       deraadt  1908:
1.13      millert  1909:        r = command("CDUP");
                   1910:        if (r == ERROR && code == 500) {
1.1       deraadt  1911:                if (verbose)
1.20      deraadt  1912:                        fputs("CDUP command not recognized, trying XCUP.\n", ttyout);
1.13      millert  1913:                r = command("XCUP");
1.1       deraadt  1914:        }
1.13      millert  1915:        if (r == COMPLETE)
                   1916:                dirchange = 1;
1.1       deraadt  1917: }
                   1918:
1.23      millert  1919: /*
                   1920:  * Restart transfer at specific point
                   1921:  */
1.1       deraadt  1922: void
1.47      deraadt  1923: restart(int argc, char *argv[])
1.1       deraadt  1924: {
1.27      millert  1925:        quad_t nrestart_point;
                   1926:        char *ep;
1.1       deraadt  1927:
                   1928:        if (argc != 2)
1.20      deraadt  1929:                fputs("restart: offset not specified.\n", ttyout);
1.1       deraadt  1930:        else {
1.38      millert  1931:                nrestart_point = strtoq(argv[1], &ep, 10);
1.27      millert  1932:                if (nrestart_point == QUAD_MAX || *ep != '\0')
                   1933:                        fputs("restart: invalid offset.\n", ttyout);
                   1934:                else {
1.39      millert  1935:                        fprintf(ttyout, "Restarting at %lld. Execute get, put "
                   1936:                                "or append to initiate transfer\n",
1.37      deraadt  1937:                                (long long)nrestart_point);
1.27      millert  1938:                        restart_point = nrestart_point;
                   1939:                }
1.1       deraadt  1940:        }
                   1941: }
                   1942:
1.23      millert  1943: /*
                   1944:  * Show remote system type
                   1945:  */
1.48      deraadt  1946: /* ARGSUSED */
1.1       deraadt  1947: void
1.47      deraadt  1948: syst(int argc, char *argv[])
1.1       deraadt  1949: {
                   1950:
1.14      millert  1951:        (void)command("SYST");
1.1       deraadt  1952: }
                   1953:
                   1954: void
1.47      deraadt  1955: macdef(int argc, char *argv[])
1.1       deraadt  1956: {
                   1957:        char *tmp;
                   1958:        int c;
                   1959:
                   1960:        if (macnum == 16) {
1.20      deraadt  1961:                fputs("Limit of 16 macros have already been defined.\n", ttyout);
1.1       deraadt  1962:                code = -1;
                   1963:                return;
                   1964:        }
1.13      millert  1965:        if ((argc < 2 && !another(&argc, &argv, "macro name")) || argc > 2) {
1.20      deraadt  1966:                fprintf(ttyout, "usage: %s macro_name\n", argv[0]);
1.1       deraadt  1967:                code = -1;
                   1968:                return;
                   1969:        }
1.16      millert  1970:        if (interactive)
1.20      deraadt  1971:                fputs(
                   1972: "Enter macro line by line, terminating it with a null line.\n", ttyout);
1.36      lebel    1973:        (void)strlcpy(macros[macnum].mac_name, argv[1],
                   1974:            sizeof(macros[macnum].mac_name));
1.14      millert  1975:        if (macnum == 0)
1.1       deraadt  1976:                macros[macnum].mac_start = macbuf;
1.14      millert  1977:        else
1.1       deraadt  1978:                macros[macnum].mac_start = macros[macnum - 1].mac_end + 1;
                   1979:        tmp = macros[macnum].mac_start;
                   1980:        while (tmp != macbuf+4096) {
                   1981:                if ((c = getchar()) == EOF) {
1.20      deraadt  1982:                        fputs("macdef: end of file encountered.\n", ttyout);
1.1       deraadt  1983:                        code = -1;
                   1984:                        return;
                   1985:                }
                   1986:                if ((*tmp = c) == '\n') {
                   1987:                        if (tmp == macros[macnum].mac_start) {
                   1988:                                macros[macnum++].mac_end = tmp;
                   1989:                                code = 0;
                   1990:                                return;
                   1991:                        }
                   1992:                        if (*(tmp-1) == '\0') {
                   1993:                                macros[macnum++].mac_end = tmp - 1;
                   1994:                                code = 0;
                   1995:                                return;
                   1996:                        }
                   1997:                        *tmp = '\0';
                   1998:                }
                   1999:                tmp++;
                   2000:        }
                   2001:        while (1) {
                   2002:                while ((c = getchar()) != '\n' && c != EOF)
                   2003:                        /* LOOP */;
                   2004:                if (c == EOF || getchar() == '\n') {
1.20      deraadt  2005:                        fputs("Macro not defined - 4K buffer exceeded.\n", ttyout);
1.1       deraadt  2006:                        code = -1;
                   2007:                        return;
                   2008:                }
                   2009:        }
                   2010: }
                   2011:
                   2012: /*
1.23      millert  2013:  * Get size of file on remote machine
1.1       deraadt  2014:  */
                   2015: void
1.47      deraadt  2016: sizecmd(int argc, char *argv[])
1.1       deraadt  2017: {
1.13      millert  2018:        off_t size;
1.1       deraadt  2019:
1.13      millert  2020:        if ((argc < 2 && !another(&argc, &argv, "filename")) || argc > 2) {
1.20      deraadt  2021:                fprintf(ttyout, "usage: %s filename\n", argv[0]);
1.1       deraadt  2022:                code = -1;
                   2023:                return;
                   2024:        }
1.13      millert  2025:        size = remotesize(argv[1], 1);
                   2026:        if (size != -1)
1.37      deraadt  2027:                fprintf(ttyout, "%s\t%lld\n", argv[1], (long long)size);
1.13      millert  2028:        code = size;
1.1       deraadt  2029: }
                   2030:
                   2031: /*
1.23      millert  2032:  * Get last modification time of file on remote machine
1.1       deraadt  2033:  */
                   2034: void
1.47      deraadt  2035: modtime(int argc, char *argv[])
1.1       deraadt  2036: {
1.13      millert  2037:        time_t mtime;
1.1       deraadt  2038:
1.13      millert  2039:        if ((argc < 2 && !another(&argc, &argv, "filename")) || argc > 2) {
1.20      deraadt  2040:                fprintf(ttyout, "usage: %s filename\n", argv[0]);
1.1       deraadt  2041:                code = -1;
                   2042:                return;
                   2043:        }
1.13      millert  2044:        mtime = remotemodtime(argv[1], 1);
                   2045:        if (mtime != -1)
1.20      deraadt  2046:                fprintf(ttyout, "%s\t%s", argv[1], asctime(localtime(&mtime)));
1.13      millert  2047:        code = mtime;
1.1       deraadt  2048: }
                   2049:
                   2050: /*
1.23      millert  2051:  * Show status on remote machine
1.1       deraadt  2052:  */
                   2053: void
1.47      deraadt  2054: rmtstatus(int argc, char *argv[])
1.1       deraadt  2055: {
                   2056:
1.14      millert  2057:        (void)command(argc > 1 ? "STAT %s" : "STAT" , argv[1]);
1.1       deraadt  2058: }
                   2059:
                   2060: /*
1.23      millert  2061:  * Get file if modtime is more recent than current file
1.1       deraadt  2062:  */
                   2063: void
1.47      deraadt  2064: newer(int argc, char *argv[])
1.1       deraadt  2065: {
                   2066:
                   2067:        if (getit(argc, argv, -1, "w"))
1.20      deraadt  2068:                fprintf(ttyout, "Local file \"%s\" is newer than remote file \"%s\".\n",
1.1       deraadt  2069:                        argv[2], argv[1]);
1.16      millert  2070: }
                   2071:
                   2072: /*
                   2073:  * Display one file through $PAGER (defaults to "more").
                   2074:  */
                   2075: void
1.47      deraadt  2076: page(int argc, char *argv[])
1.16      millert  2077: {
                   2078:        int orestart_point, ohash, overbose;
1.23      millert  2079:        char *p, *pager, *oldargv1;
1.16      millert  2080:
                   2081:        if ((argc < 2 && !another(&argc, &argv, "filename")) || argc > 2) {
1.20      deraadt  2082:                fprintf(ttyout, "usage: %s filename\n", argv[0]);
1.16      millert  2083:                code = -1;
                   2084:                return;
                   2085:        }
1.23      millert  2086:        oldargv1 = argv[1];
1.16      millert  2087:        if (!globulize(&argv[1])) {
                   2088:                code = -1;
                   2089:                return;
                   2090:        }
                   2091:        p = getenv("PAGER");
1.30      pjanzen  2092:        if (p == NULL || (*p == '\0'))
1.16      millert  2093:                p = PAGER;
1.44      deraadt  2094:        if (asprintf(&pager, "|%s", p) == -1)
1.16      millert  2095:                errx(1, "Can't allocate memory for $PAGER");
                   2096:
                   2097:        orestart_point = restart_point;
                   2098:        ohash = hash;
                   2099:        overbose = verbose;
                   2100:        restart_point = hash = verbose = 0;
1.23      millert  2101:        recvrequest("RETR", pager, argv[1], "r+w", 1, 0);
1.16      millert  2102:        (void)free(pager);
                   2103:        restart_point = orestart_point;
                   2104:        hash = ohash;
                   2105:        verbose = overbose;
1.23      millert  2106:        if (oldargv1 != argv[1])        /* free up after globulize() */
                   2107:                free(argv[1]);
1.1       deraadt  2108: }