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

Annotation of src/usr.bin/ssh/scp.c, Revision 1.85

1.1       deraadt     1: /*
1.38      deraadt     2:  * scp - secure remote copy.  This is basically patched BSD rcp which
                      3:  * uses ssh to do the data transfer (instead of using rcmd).
1.27      markus      4:  *
1.38      deraadt     5:  * NOTE: This version should NOT be suid root.  (This uses ssh to
                      6:  * do the transfer and ssh has the necessary privileges.)
1.27      markus      7:  *
1.38      deraadt     8:  * 1995 Timo Rinne <tri@iki.fi>, Tatu Ylonen <ylo@cs.hut.fi>
                      9:  *
                     10:  * As far as I am concerned, the code I have written for this software
                     11:  * can be used freely for any purpose.  Any derived versions of this
                     12:  * software must be clearly marked as such, and if the derived work is
                     13:  * incompatible with the protocol description in the RFC file, it must be
                     14:  * called by a name other than "ssh" or "Secure Shell".
1.39      markus     15:  */
1.38      deraadt    16: /*
1.60      deraadt    17:  * Copyright (c) 1999 Theo de Raadt.  All rights reserved.
                     18:  * Copyright (c) 1999 Aaron Campbell.  All rights reserved.
1.27      markus     19:  *
1.38      deraadt    20:  * Redistribution and use in source and binary forms, with or without
                     21:  * modification, are permitted provided that the following conditions
                     22:  * are met:
                     23:  * 1. Redistributions of source code must retain the above copyright
                     24:  *    notice, this list of conditions and the following disclaimer.
                     25:  * 2. Redistributions in binary form must reproduce the above copyright
                     26:  *    notice, this list of conditions and the following disclaimer in the
                     27:  *    documentation and/or other materials provided with the distribution.
1.27      markus     28:  *
1.38      deraadt    29:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
                     30:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
                     31:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
                     32:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
                     33:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
                     34:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
                     35:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
                     36:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
                     37:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
                     38:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
                     39:  */
1.1       deraadt    40:
                     41: /*
1.35      deraadt    42:  * Parts from:
                     43:  *
1.1       deraadt    44:  * Copyright (c) 1983, 1990, 1992, 1993, 1995
                     45:  *     The Regents of the University of California.  All rights reserved.
                     46:  *
                     47:  * Redistribution and use in source and binary forms, with or without
                     48:  * modification, are permitted provided that the following conditions
                     49:  * are met:
                     50:  * 1. Redistributions of source code must retain the above copyright
                     51:  *    notice, this list of conditions and the following disclaimer.
                     52:  * 2. Redistributions in binary form must reproduce the above copyright
                     53:  *    notice, this list of conditions and the following disclaimer in the
                     54:  *    documentation and/or other materials provided with the distribution.
                     55:  * 3. All advertising materials mentioning features or use of this software
                     56:  *    must display the following acknowledgement:
                     57:  *     This product includes software developed by the University of
                     58:  *     California, Berkeley and its contributors.
                     59:  * 4. Neither the name of the University nor the names of its contributors
                     60:  *    may be used to endorse or promote products derived from this software
                     61:  *    without specific prior written permission.
                     62:  *
                     63:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     64:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     65:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     66:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     67:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     68:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     69:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     70:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     71:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     72:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     73:  * SUCH DAMAGE.
                     74:  *
                     75:  */
                     76:
                     77: #include "includes.h"
1.85    ! markus     78: RCSID("$OpenBSD: scp.c,v 1.84 2001/09/19 19:24:19 stevesk Exp $");
1.1       deraadt    79:
                     80: #include "xmalloc.h"
1.51      markus     81: #include "atomicio.h"
1.50      markus     82: #include "pathnames.h"
1.51      markus     83: #include "log.h"
1.69      mouring    84: #include "misc.h"
1.1       deraadt    85:
1.11      aaron      86: /* For progressmeter() -- number of seconds before xfer considered "stalled" */
1.4       aaron      87: #define STALLTIME      5
1.79      stevesk    88: /* alarm() interval for updating progress meter */
                     89: #define PROGRESSTIME   1
1.4       aaron      90:
1.11      aaron      91: /* Visual statistics about files as they are transferred. */
                     92: void progressmeter(int);
                     93:
                     94: /* Returns width of the terminal (for progress meter calculations). */
                     95: int getttywidth(void);
1.35      deraadt    96: int do_cmd(char *host, char *remuser, char *cmd, int *fdin, int *fdout, int argc);
1.11      aaron      97:
1.70      mouring    98: /* Struct for addargs */
                     99: arglist args;
1.41      markus    100:
1.11      aaron     101: /* Time a transfer started. */
1.4       aaron     102: static struct timeval start;
1.11      aaron     103:
                    104: /* Number of bytes of current file transferred so far. */
1.68      markus    105: volatile off_t statbytes;
1.11      aaron     106:
                    107: /* Total size of current file. */
1.15      markus    108: off_t totalbytes = 0;
1.11      aaron     109:
                    110: /* Name of current file being transferred. */
                    111: char *curfile;
1.4       aaron     112:
1.1       deraadt   113: /* This is set to non-zero to enable verbose mode. */
1.17      markus    114: int verbose_mode = 0;
1.1       deraadt   115:
1.6       aaron     116: /* This is set to zero if the progressmeter is not desired. */
                    117: int showprogress = 1;
                    118:
1.34      deraadt   119: /* This is the program to execute for the secured connection. ("ssh" or -S) */
1.50      markus    120: char *ssh_program = _PATH_SSH_PROGRAM;
1.34      deraadt   121:
1.20      markus    122: /*
                    123:  * This function executes the given command as the specified user on the
                    124:  * given host.  This returns < 0 if execution fails, and >= 0 otherwise. This
                    125:  * assigns the input and output file descriptors on success.
                    126:  */
1.1       deraadt   127:
1.27      markus    128: int
1.35      deraadt   129: do_cmd(char *host, char *remuser, char *cmd, int *fdin, int *fdout, int argc)
1.1       deraadt   130: {
1.18      markus    131:        int pin[2], pout[2], reserved[2];
                    132:
                    133:        if (verbose_mode)
1.78      deraadt   134:                fprintf(stderr,
                    135:                    "Executing: program %s host %s, user %s, command %s\n",
                    136:                    ssh_program, host,
                    137:                    remuser ? remuser : "(unspecified)", cmd);
1.18      markus    138:
1.20      markus    139:        /*
                    140:         * Reserve two descriptors so that the real pipes won't get
                    141:         * descriptors 0 and 1 because that will screw up dup2 below.
                    142:         */
1.18      markus    143:        pipe(reserved);
                    144:
                    145:        /* Create a socket pair for communicating with ssh. */
                    146:        if (pipe(pin) < 0)
                    147:                fatal("pipe: %s", strerror(errno));
                    148:        if (pipe(pout) < 0)
                    149:                fatal("pipe: %s", strerror(errno));
                    150:
                    151:        /* Free the reserved descriptors. */
                    152:        close(reserved[0]);
                    153:        close(reserved[1]);
                    154:
                    155:        /* For a child to execute the command on the remote host using ssh. */
1.41      markus    156:        if (fork() == 0)  {
1.18      markus    157:                /* Child. */
                    158:                close(pin[1]);
                    159:                close(pout[0]);
                    160:                dup2(pin[0], 0);
                    161:                dup2(pout[1], 1);
                    162:                close(pin[0]);
                    163:                close(pout[1]);
                    164:
1.41      markus    165:                args.list[0] = ssh_program;
                    166:                if (remuser != NULL)
1.70      mouring   167:                        addargs(&args, "-l%s", remuser);
                    168:                addargs(&args, "%s", host);
                    169:                addargs(&args, "%s", cmd);
1.18      markus    170:
1.41      markus    171:                execvp(ssh_program, args.list);
1.34      deraadt   172:                perror(ssh_program);
1.18      markus    173:                exit(1);
                    174:        }
                    175:        /* Parent.  Close the other side, and return the local side. */
                    176:        close(pin[0]);
                    177:        *fdout = pin[1];
                    178:        close(pout[1]);
                    179:        *fdin = pout[0];
                    180:        return 0;
1.1       deraadt   181: }
                    182:
                    183: typedef struct {
                    184:        int cnt;
                    185:        char *buf;
                    186: } BUF;
                    187:
1.18      markus    188: BUF *allocbuf(BUF *, int, int);
                    189: void lostconn(int);
                    190: void nospace(void);
                    191: int okname(char *);
                    192: void run_err(const char *,...);
                    193: void verifydir(char *);
1.1       deraadt   194:
                    195: struct passwd *pwd;
1.18      markus    196: uid_t userid;
1.1       deraadt   197: int errs, remin, remout;
                    198: int pflag, iamremote, iamrecursive, targetshouldbedirectory;
                    199:
                    200: #define        CMDNEEDS        64
                    201: char cmd[CMDNEEDS];            /* must hold "rcp -r -p -d\0" */
                    202:
1.18      markus    203: int response(void);
                    204: void rsource(char *, struct stat *);
                    205: void sink(int, char *[]);
                    206: void source(int, char *[]);
                    207: void tolocal(int, char *[]);
                    208: void toremote(char *, int, char *[]);
                    209: void usage(void);
1.1       deraadt   210:
                    211: int
                    212: main(argc, argv)
                    213:        int argc;
                    214:        char *argv[];
                    215: {
                    216:        int ch, fflag, tflag;
                    217:        char *targ;
                    218:        extern char *optarg;
                    219:        extern int optind;
                    220:
1.41      markus    221:        args.list = NULL;
1.70      mouring   222:        addargs(&args, "ssh");          /* overwritten with ssh_program */
                    223:        addargs(&args, "-x");
1.82      stevesk   224:        addargs(&args, "-oForwardAgent no");
1.70      mouring   225:        addargs(&args, "-oFallBackToRsh no");
1.84      stevesk   226:        addargs(&args, "-oClearAllForwardings yes");
1.41      markus    227:
1.1       deraadt   228:        fflag = tflag = 0;
1.83      stevesk   229:        while ((ch = getopt(argc, argv, "dfprtvBCc:i:P:q46S:o:F:")) != -1)
1.18      markus    230:                switch (ch) {
                    231:                /* User-visible flags. */
1.23      markus    232:                case '4':
1.41      markus    233:                case '6':
                    234:                case 'C':
1.70      mouring   235:                        addargs(&args, "-%c", ch);
1.41      markus    236:                        break;
                    237:                case 'o':
                    238:                case 'c':
                    239:                case 'i':
1.83      stevesk   240:                case 'F':
1.70      mouring   241:                        addargs(&args, "-%c%s", ch, optarg);
1.23      markus    242:                        break;
1.41      markus    243:                case 'P':
1.70      mouring   244:                        addargs(&args, "-p%s", optarg);
1.41      markus    245:                        break;
                    246:                case 'B':
1.70      mouring   247:                        addargs(&args, "-oBatchmode yes");
1.23      markus    248:                        break;
1.1       deraadt   249:                case 'p':
                    250:                        pflag = 1;
                    251:                        break;
                    252:                case 'r':
                    253:                        iamrecursive = 1;
                    254:                        break;
1.34      deraadt   255:                case 'S':
1.41      markus    256:                        ssh_program = xstrdup(optarg);
                    257:                        break;
                    258:                case 'v':
1.72      markus    259:                        addargs(&args, "-v");
1.41      markus    260:                        verbose_mode = 1;
                    261:                        break;
                    262:                case 'q':
                    263:                        showprogress = 0;
1.34      deraadt   264:                        break;
                    265:
1.18      markus    266:                /* Server options. */
1.1       deraadt   267:                case 'd':
                    268:                        targetshouldbedirectory = 1;
                    269:                        break;
1.18      markus    270:                case 'f':       /* "from" */
1.1       deraadt   271:                        iamremote = 1;
                    272:                        fflag = 1;
                    273:                        break;
1.18      markus    274:                case 't':       /* "to" */
1.1       deraadt   275:                        iamremote = 1;
                    276:                        tflag = 1;
                    277:                        break;
                    278:                default:
                    279:                        usage();
                    280:                }
                    281:        argc -= optind;
                    282:        argv += optind;
                    283:
                    284:        if ((pwd = getpwuid(userid = getuid())) == NULL)
1.18      markus    285:                fatal("unknown user %d", (int) userid);
1.1       deraadt   286:
1.18      markus    287:        if (!isatty(STDERR_FILENO))
1.7       deraadt   288:                showprogress = 0;
                    289:
1.1       deraadt   290:        remin = STDIN_FILENO;
                    291:        remout = STDOUT_FILENO;
                    292:
1.52      stevesk   293:        if (fflag) {
1.18      markus    294:                /* Follow "protocol", send data. */
                    295:                (void) response();
1.1       deraadt   296:                source(argc, argv);
                    297:                exit(errs != 0);
                    298:        }
1.18      markus    299:        if (tflag) {
                    300:                /* Receive data. */
1.1       deraadt   301:                sink(argc, argv);
                    302:                exit(errs != 0);
                    303:        }
                    304:        if (argc < 2)
                    305:                usage();
                    306:        if (argc > 2)
                    307:                targetshouldbedirectory = 1;
                    308:
                    309:        remin = remout = -1;
                    310:        /* Command to be executed on remote system using "ssh". */
1.55      deraadt   311:        (void) snprintf(cmd, sizeof cmd, "scp%s%s%s%s",
                    312:            verbose_mode ? " -v" : "",
1.35      deraadt   313:            iamrecursive ? " -r" : "", pflag ? " -p" : "",
                    314:            targetshouldbedirectory ? " -d" : "");
1.1       deraadt   315:
1.18      markus    316:        (void) signal(SIGPIPE, lostconn);
1.1       deraadt   317:
                    318:        if ((targ = colon(argv[argc - 1])))     /* Dest is remote host. */
                    319:                toremote(targ, argc, argv);
                    320:        else {
1.18      markus    321:                tolocal(argc, argv);    /* Dest is local host. */
1.1       deraadt   322:                if (targetshouldbedirectory)
                    323:                        verifydir(argv[argc - 1]);
                    324:        }
                    325:        exit(errs != 0);
                    326: }
                    327:
                    328: void
                    329: toremote(targ, argc, argv)
                    330:        char *targ, *argv[];
                    331:        int argc;
                    332: {
                    333:        int i, len;
                    334:        char *bp, *host, *src, *suser, *thost, *tuser;
                    335:
                    336:        *targ++ = 0;
                    337:        if (*targ == 0)
                    338:                targ = ".";
                    339:
                    340:        if ((thost = strchr(argv[argc - 1], '@'))) {
                    341:                /* user@host */
                    342:                *thost++ = 0;
                    343:                tuser = argv[argc - 1];
                    344:                if (*tuser == '\0')
                    345:                        tuser = NULL;
                    346:                else if (!okname(tuser))
                    347:                        exit(1);
                    348:        } else {
                    349:                thost = argv[argc - 1];
                    350:                tuser = NULL;
                    351:        }
                    352:
                    353:        for (i = 0; i < argc - 1; i++) {
                    354:                src = colon(argv[i]);
1.18      markus    355:                if (src) {      /* remote to remote */
1.84      stevesk   356:                        static char *ssh_options =
                    357:                            "-x -o'FallBackToRsh no' "
                    358:                            "-o'ClearAllForwardings yes'";
1.1       deraadt   359:                        *src++ = 0;
                    360:                        if (*src == 0)
                    361:                                src = ".";
                    362:                        host = strchr(argv[i], '@');
1.34      deraadt   363:                        len = strlen(ssh_program) + strlen(argv[i]) +
1.35      deraadt   364:                            strlen(src) + (tuser ? strlen(tuser) : 0) +
1.84      stevesk   365:                            strlen(thost) + strlen(targ) +
                    366:                            strlen(ssh_options) + CMDNEEDS + 20;
1.18      markus    367:                        bp = xmalloc(len);
1.1       deraadt   368:                        if (host) {
                    369:                                *host++ = 0;
1.23      markus    370:                                host = cleanhostname(host);
1.1       deraadt   371:                                suser = argv[i];
                    372:                                if (*suser == '\0')
                    373:                                        suser = pwd->pw_name;
                    374:                                else if (!okname(suser))
                    375:                                        continue;
1.55      deraadt   376:                                snprintf(bp, len,
1.84      stevesk   377:                                    "%s%s %s -n "
1.55      deraadt   378:                                    "-l %s %s %s %s '%s%s%s:%s'",
1.44      deraadt   379:                                    ssh_program, verbose_mode ? " -v" : "",
1.84      stevesk   380:                                    ssh_options, suser, host, cmd, src,
1.44      deraadt   381:                                    tuser ? tuser : "", tuser ? "@" : "",
                    382:                                    thost, targ);
1.23      markus    383:                        } else {
                    384:                                host = cleanhostname(argv[i]);
1.55      deraadt   385:                                snprintf(bp, len,
1.84      stevesk   386:                                    "exec %s%s %s -n %s "
1.55      deraadt   387:                                    "%s %s '%s%s%s:%s'",
1.44      deraadt   388:                                    ssh_program, verbose_mode ? " -v" : "",
1.84      stevesk   389:                                    ssh_options, host, cmd, src,
1.44      deraadt   390:                                    tuser ? tuser : "", tuser ? "@" : "",
                    391:                                    thost, targ);
1.23      markus    392:                        }
1.18      markus    393:                        if (verbose_mode)
                    394:                                fprintf(stderr, "Executing: %s\n", bp);
                    395:                        (void) system(bp);
                    396:                        (void) xfree(bp);
                    397:                } else {        /* local to remote */
1.1       deraadt   398:                        if (remin == -1) {
                    399:                                len = strlen(targ) + CMDNEEDS + 20;
1.18      markus    400:                                bp = xmalloc(len);
1.55      deraadt   401:                                (void) snprintf(bp, len, "%s -t %s", cmd, targ);
1.23      markus    402:                                host = cleanhostname(thost);
1.35      deraadt   403:                                if (do_cmd(host, tuser, bp, &remin,
                    404:                                    &remout, argc) < 0)
1.18      markus    405:                                        exit(1);
1.1       deraadt   406:                                if (response() < 0)
                    407:                                        exit(1);
1.18      markus    408:                                (void) xfree(bp);
1.1       deraadt   409:                        }
1.18      markus    410:                        source(1, argv + i);
1.1       deraadt   411:                }
                    412:        }
                    413: }
                    414:
                    415: void
                    416: tolocal(argc, argv)
                    417:        int argc;
                    418:        char *argv[];
                    419: {
                    420:        int i, len;
                    421:        char *bp, *host, *src, *suser;
                    422:
                    423:        for (i = 0; i < argc - 1; i++) {
1.18      markus    424:                if (!(src = colon(argv[i]))) {  /* Local to local. */
1.1       deraadt   425:                        len = strlen(_PATH_CP) + strlen(argv[i]) +
1.35      deraadt   426:                            strlen(argv[argc - 1]) + 20;
1.1       deraadt   427:                        bp = xmalloc(len);
1.55      deraadt   428:                        (void) snprintf(bp, len, "exec %s%s%s %s %s", _PATH_CP,
1.35      deraadt   429:                            iamrecursive ? " -r" : "", pflag ? " -p" : "",
                    430:                            argv[i], argv[argc - 1]);
1.18      markus    431:                        if (verbose_mode)
                    432:                                fprintf(stderr, "Executing: %s\n", bp);
1.1       deraadt   433:                        if (system(bp))
                    434:                                ++errs;
1.18      markus    435:                        (void) xfree(bp);
1.1       deraadt   436:                        continue;
                    437:                }
                    438:                *src++ = 0;
                    439:                if (*src == 0)
                    440:                        src = ".";
                    441:                if ((host = strchr(argv[i], '@')) == NULL) {
                    442:                        host = argv[i];
                    443:                        suser = NULL;
                    444:                } else {
                    445:                        *host++ = 0;
                    446:                        suser = argv[i];
                    447:                        if (*suser == '\0')
                    448:                                suser = pwd->pw_name;
                    449:                        else if (!okname(suser))
                    450:                                continue;
                    451:                }
1.23      markus    452:                host = cleanhostname(host);
1.1       deraadt   453:                len = strlen(src) + CMDNEEDS + 20;
1.18      markus    454:                bp = xmalloc(len);
1.55      deraadt   455:                (void) snprintf(bp, len, "%s -f %s", cmd, src);
1.35      deraadt   456:                if (do_cmd(host, suser, bp, &remin, &remout, argc) < 0) {
1.18      markus    457:                        (void) xfree(bp);
                    458:                        ++errs;
                    459:                        continue;
1.1       deraadt   460:                }
1.18      markus    461:                xfree(bp);
1.1       deraadt   462:                sink(1, argv + argc - 1);
1.18      markus    463:                (void) close(remin);
1.1       deraadt   464:                remin = remout = -1;
                    465:        }
                    466: }
                    467:
                    468: void
                    469: source(argc, argv)
                    470:        int argc;
                    471:        char *argv[];
                    472: {
                    473:        struct stat stb;
                    474:        static BUF buffer;
                    475:        BUF *bp;
1.68      markus    476:        off_t i, amt, result;
                    477:        int fd, haderr, indx;
1.1       deraadt   478:        char *last, *name, buf[2048];
1.65      deraadt   479:        int len;
1.1       deraadt   480:
                    481:        for (indx = 0; indx < argc; ++indx) {
1.18      markus    482:                name = argv[indx];
1.11      aaron     483:                statbytes = 0;
1.65      deraadt   484:                len = strlen(name);
                    485:                while (len > 1 && name[len-1] == '/')
                    486:                        name[--len] = '\0';
1.85    ! markus    487:                if (strchr(name, '\n') != NULL) {
        !           488:                        run_err("%s: skipping, filename contains a newline",
        !           489:                            name);
        !           490:                        goto next;
        !           491:                }
1.1       deraadt   492:                if ((fd = open(name, O_RDONLY, 0)) < 0)
                    493:                        goto syserr;
                    494:                if (fstat(fd, &stb) < 0) {
                    495: syserr:                        run_err("%s: %s", name, strerror(errno));
                    496:                        goto next;
                    497:                }
                    498:                switch (stb.st_mode & S_IFMT) {
                    499:                case S_IFREG:
                    500:                        break;
                    501:                case S_IFDIR:
                    502:                        if (iamrecursive) {
                    503:                                rsource(name, &stb);
                    504:                                goto next;
                    505:                        }
                    506:                        /* FALLTHROUGH */
                    507:                default:
                    508:                        run_err("%s: not a regular file", name);
                    509:                        goto next;
                    510:                }
                    511:                if ((last = strrchr(name, '/')) == NULL)
                    512:                        last = name;
                    513:                else
                    514:                        ++last;
1.11      aaron     515:                curfile = last;
1.1       deraadt   516:                if (pflag) {
                    517:                        /*
                    518:                         * Make it compatible with possible future
                    519:                         * versions expecting microseconds.
                    520:                         */
1.55      deraadt   521:                        (void) snprintf(buf, sizeof buf, "T%lu 0 %lu 0\n",
1.47      markus    522:                            (u_long) stb.st_mtime,
                    523:                            (u_long) stb.st_atime);
1.29      deraadt   524:                        (void) atomicio(write, remout, buf, strlen(buf));
1.1       deraadt   525:                        if (response() < 0)
                    526:                                goto next;
                    527:                }
                    528: #define        FILEMODEMASK    (S_ISUID|S_ISGID|S_IRWXU|S_IRWXG|S_IRWXO)
1.61      markus    529:                snprintf(buf, sizeof buf, "C%04o %lld %s\n",
1.47      markus    530:                    (u_int) (stb.st_mode & FILEMODEMASK),
1.62      markus    531:                    (long long)stb.st_size, last);
1.18      markus    532:                if (verbose_mode) {
                    533:                        fprintf(stderr, "Sending file modes: %s", buf);
                    534:                        fflush(stderr);
                    535:                }
1.29      deraadt   536:                (void) atomicio(write, remout, buf, strlen(buf));
1.1       deraadt   537:                if (response() < 0)
                    538:                        goto next;
                    539:                if ((bp = allocbuf(&buffer, fd, 2048)) == NULL) {
1.18      markus    540: next:                  (void) close(fd);
1.1       deraadt   541:                        continue;
                    542:                }
1.12      aaron     543:                if (showprogress) {
                    544:                        totalbytes = stb.st_size;
1.6       aaron     545:                        progressmeter(-1);
1.12      aaron     546:                }
1.1       deraadt   547:                /* Keep writing after an error so that we stay sync'd up. */
                    548:                for (haderr = i = 0; i < stb.st_size; i += bp->cnt) {
                    549:                        amt = bp->cnt;
                    550:                        if (i + amt > stb.st_size)
                    551:                                amt = stb.st_size - i;
                    552:                        if (!haderr) {
1.30      deraadt   553:                                result = atomicio(read, fd, bp->buf, amt);
1.1       deraadt   554:                                if (result != amt)
                    555:                                        haderr = result >= 0 ? EIO : errno;
                    556:                        }
                    557:                        if (haderr)
1.29      deraadt   558:                                (void) atomicio(write, remout, bp->buf, amt);
1.1       deraadt   559:                        else {
1.29      deraadt   560:                                result = atomicio(write, remout, bp->buf, amt);
1.1       deraadt   561:                                if (result != amt)
                    562:                                        haderr = result >= 0 ? EIO : errno;
1.4       aaron     563:                                statbytes += result;
1.1       deraadt   564:                        }
                    565:                }
1.18      markus    566:                if (showprogress)
1.6       aaron     567:                        progressmeter(1);
1.4       aaron     568:
1.1       deraadt   569:                if (close(fd) < 0 && !haderr)
                    570:                        haderr = errno;
                    571:                if (!haderr)
1.29      deraadt   572:                        (void) atomicio(write, remout, "", 1);
1.1       deraadt   573:                else
                    574:                        run_err("%s: %s", name, strerror(haderr));
1.18      markus    575:                (void) response();
1.1       deraadt   576:        }
                    577: }
                    578:
                    579: void
                    580: rsource(name, statp)
                    581:        char *name;
                    582:        struct stat *statp;
                    583: {
                    584:        DIR *dirp;
                    585:        struct dirent *dp;
                    586:        char *last, *vect[1], path[1100];
                    587:
                    588:        if (!(dirp = opendir(name))) {
                    589:                run_err("%s: %s", name, strerror(errno));
                    590:                return;
                    591:        }
                    592:        last = strrchr(name, '/');
                    593:        if (last == 0)
                    594:                last = name;
                    595:        else
                    596:                last++;
                    597:        if (pflag) {
1.55      deraadt   598:                (void) snprintf(path, sizeof(path), "T%lu 0 %lu 0\n",
1.47      markus    599:                    (u_long) statp->st_mtime,
                    600:                    (u_long) statp->st_atime);
1.29      deraadt   601:                (void) atomicio(write, remout, path, strlen(path));
1.1       deraadt   602:                if (response() < 0) {
                    603:                        closedir(dirp);
                    604:                        return;
                    605:                }
                    606:        }
1.55      deraadt   607:        (void) snprintf(path, sizeof path, "D%04o %d %.1024s\n",
1.47      markus    608:            (u_int) (statp->st_mode & FILEMODEMASK), 0, last);
1.18      markus    609:        if (verbose_mode)
                    610:                fprintf(stderr, "Entering directory: %s", path);
1.29      deraadt   611:        (void) atomicio(write, remout, path, strlen(path));
1.1       deraadt   612:        if (response() < 0) {
                    613:                closedir(dirp);
                    614:                return;
                    615:        }
1.63      stevesk   616:        while ((dp = readdir(dirp)) != NULL) {
1.1       deraadt   617:                if (dp->d_ino == 0)
                    618:                        continue;
                    619:                if (!strcmp(dp->d_name, ".") || !strcmp(dp->d_name, ".."))
                    620:                        continue;
                    621:                if (strlen(name) + 1 + strlen(dp->d_name) >= sizeof(path) - 1) {
                    622:                        run_err("%s/%s: name too long", name, dp->d_name);
                    623:                        continue;
                    624:                }
1.55      deraadt   625:                (void) snprintf(path, sizeof path, "%s/%s", name, dp->d_name);
1.1       deraadt   626:                vect[0] = path;
                    627:                source(1, vect);
                    628:        }
1.18      markus    629:        (void) closedir(dirp);
1.29      deraadt   630:        (void) atomicio(write, remout, "E\n", 2);
1.18      markus    631:        (void) response();
1.1       deraadt   632: }
                    633:
                    634: void
                    635: sink(argc, argv)
                    636:        int argc;
                    637:        char *argv[];
                    638: {
                    639:        static BUF buffer;
                    640:        struct stat stb;
1.18      markus    641:        enum {
                    642:                YES, NO, DISPLAYED
                    643:        } wrerr;
1.1       deraadt   644:        BUF *bp;
                    645:        off_t i, j;
                    646:        int amt, count, exists, first, mask, mode, ofd, omode;
1.36      deraadt   647:        off_t size;
                    648:        int setimes, targisdir, wrerrno = 0;
1.1       deraadt   649:        char ch, *cp, *np, *targ, *why, *vect[1], buf[2048];
1.40      markus    650:        struct timeval tv[2];
1.1       deraadt   651:
1.66      stevesk   652: #define        atime   tv[0]
                    653: #define        mtime   tv[1]
1.75      deraadt   654: #define        SCREWUP(str)    do { why = str; goto screwup; } while (0)
1.1       deraadt   655:
                    656:        setimes = targisdir = 0;
                    657:        mask = umask(0);
                    658:        if (!pflag)
1.18      markus    659:                (void) umask(mask);
1.1       deraadt   660:        if (argc != 1) {
                    661:                run_err("ambiguous target");
                    662:                exit(1);
                    663:        }
                    664:        targ = *argv;
                    665:        if (targetshouldbedirectory)
                    666:                verifydir(targ);
1.18      markus    667:
1.29      deraadt   668:        (void) atomicio(write, remout, "", 1);
1.1       deraadt   669:        if (stat(targ, &stb) == 0 && S_ISDIR(stb.st_mode))
                    670:                targisdir = 1;
                    671:        for (first = 1;; first = 0) {
                    672:                cp = buf;
1.30      deraadt   673:                if (atomicio(read, remin, cp, 1) <= 0)
1.1       deraadt   674:                        return;
                    675:                if (*cp++ == '\n')
                    676:                        SCREWUP("unexpected <newline>");
                    677:                do {
1.30      deraadt   678:                        if (atomicio(read, remin, &ch, sizeof(ch)) != sizeof(ch))
1.1       deraadt   679:                                SCREWUP("lost connection");
                    680:                        *cp++ = ch;
                    681:                } while (cp < &buf[sizeof(buf) - 1] && ch != '\n');
                    682:                *cp = 0;
                    683:
                    684:                if (buf[0] == '\01' || buf[0] == '\02') {
                    685:                        if (iamremote == 0)
1.29      deraadt   686:                                (void) atomicio(write, STDERR_FILENO,
1.44      deraadt   687:                                    buf + 1, strlen(buf + 1));
1.1       deraadt   688:                        if (buf[0] == '\02')
                    689:                                exit(1);
                    690:                        ++errs;
                    691:                        continue;
                    692:                }
                    693:                if (buf[0] == 'E') {
1.29      deraadt   694:                        (void) atomicio(write, remout, "", 1);
1.1       deraadt   695:                        return;
                    696:                }
                    697:                if (ch == '\n')
                    698:                        *--cp = 0;
                    699:
                    700:                cp = buf;
                    701:                if (*cp == 'T') {
                    702:                        setimes++;
                    703:                        cp++;
1.66      stevesk   704:                        mtime.tv_sec = strtol(cp, &cp, 10);
                    705:                        if (!cp || *cp++ != ' ')
1.1       deraadt   706:                                SCREWUP("mtime.sec not delimited");
1.66      stevesk   707:                        mtime.tv_usec = strtol(cp, &cp, 10);
                    708:                        if (!cp || *cp++ != ' ')
1.1       deraadt   709:                                SCREWUP("mtime.usec not delimited");
1.66      stevesk   710:                        atime.tv_sec = strtol(cp, &cp, 10);
                    711:                        if (!cp || *cp++ != ' ')
1.1       deraadt   712:                                SCREWUP("atime.sec not delimited");
1.66      stevesk   713:                        atime.tv_usec = strtol(cp, &cp, 10);
                    714:                        if (!cp || *cp++ != '\0')
1.1       deraadt   715:                                SCREWUP("atime.usec not delimited");
1.29      deraadt   716:                        (void) atomicio(write, remout, "", 1);
1.1       deraadt   717:                        continue;
                    718:                }
                    719:                if (*cp != 'C' && *cp != 'D') {
                    720:                        /*
                    721:                         * Check for the case "rcp remote:foo\* local:bar".
                    722:                         * In this case, the line "No match." can be returned
                    723:                         * by the shell before the rcp command on the remote is
                    724:                         * executed so the ^Aerror_message convention isn't
                    725:                         * followed.
                    726:                         */
                    727:                        if (first) {
                    728:                                run_err("%s", cp);
                    729:                                exit(1);
                    730:                        }
                    731:                        SCREWUP("expected control record");
                    732:                }
                    733:                mode = 0;
                    734:                for (++cp; cp < buf + 5; cp++) {
                    735:                        if (*cp < '0' || *cp > '7')
                    736:                                SCREWUP("bad mode");
                    737:                        mode = (mode << 3) | (*cp - '0');
                    738:                }
                    739:                if (*cp++ != ' ')
                    740:                        SCREWUP("mode not delimited");
                    741:
1.63      stevesk   742:                for (size = 0; isdigit(*cp);)
1.1       deraadt   743:                        size = size * 10 + (*cp++ - '0');
                    744:                if (*cp++ != ' ')
                    745:                        SCREWUP("size not delimited");
                    746:                if (targisdir) {
                    747:                        static char *namebuf;
                    748:                        static int cursize;
                    749:                        size_t need;
                    750:
                    751:                        need = strlen(targ) + strlen(cp) + 250;
1.55      deraadt   752:                        if (need > cursize) {
1.58      danh      753:                                if (namebuf)
                    754:                                        xfree(namebuf);
1.18      markus    755:                                namebuf = xmalloc(need);
1.55      deraadt   756:                                cursize = need;
                    757:                        }
                    758:                        (void) snprintf(namebuf, need, "%s%s%s", targ,
1.35      deraadt   759:                            *targ ? "/" : "", cp);
1.1       deraadt   760:                        np = namebuf;
                    761:                } else
                    762:                        np = targ;
1.12      aaron     763:                curfile = cp;
1.1       deraadt   764:                exists = stat(np, &stb) == 0;
                    765:                if (buf[0] == 'D') {
                    766:                        int mod_flag = pflag;
                    767:                        if (exists) {
                    768:                                if (!S_ISDIR(stb.st_mode)) {
                    769:                                        errno = ENOTDIR;
                    770:                                        goto bad;
                    771:                                }
                    772:                                if (pflag)
1.18      markus    773:                                        (void) chmod(np, mode);
1.1       deraadt   774:                        } else {
1.18      markus    775:                                /* Handle copying from a read-only
                    776:                                   directory */
1.1       deraadt   777:                                mod_flag = 1;
                    778:                                if (mkdir(np, mode | S_IRWXU) < 0)
                    779:                                        goto bad;
                    780:                        }
1.58      danh      781:                        vect[0] = xstrdup(np);
1.1       deraadt   782:                        sink(1, vect);
                    783:                        if (setimes) {
                    784:                                setimes = 0;
1.59      deraadt   785:                                if (utimes(vect[0], tv) < 0)
1.18      markus    786:                                        run_err("%s: set times: %s",
1.59      deraadt   787:                                            vect[0], strerror(errno));
1.1       deraadt   788:                        }
                    789:                        if (mod_flag)
1.59      deraadt   790:                                (void) chmod(vect[0], mode);
                    791:                        if (vect[0])
                    792:                                xfree(vect[0]);
1.1       deraadt   793:                        continue;
                    794:                }
                    795:                omode = mode;
                    796:                mode |= S_IWRITE;
1.71      markus    797:                if ((ofd = open(np, O_WRONLY|O_CREAT, mode)) < 0) {
1.1       deraadt   798: bad:                   run_err("%s: %s", np, strerror(errno));
                    799:                        continue;
                    800:                }
1.29      deraadt   801:                (void) atomicio(write, remout, "", 1);
1.1       deraadt   802:                if ((bp = allocbuf(&buffer, ofd, 4096)) == NULL) {
1.18      markus    803:                        (void) close(ofd);
1.1       deraadt   804:                        continue;
                    805:                }
                    806:                cp = bp->buf;
                    807:                wrerr = NO;
1.7       deraadt   808:
                    809:                if (showprogress) {
                    810:                        totalbytes = size;
                    811:                        progressmeter(-1);
                    812:                }
1.12      aaron     813:                statbytes = 0;
1.1       deraadt   814:                for (count = i = 0; i < size; i += 4096) {
                    815:                        amt = 4096;
                    816:                        if (i + amt > size)
                    817:                                amt = size - i;
                    818:                        count += amt;
                    819:                        do {
1.43      markus    820:                                j = read(remin, cp, amt);
1.78      deraadt   821:                                if (j == -1 && (errno == EINTR ||
                    822:                                    errno == EAGAIN)) {
1.43      markus    823:                                        continue;
                    824:                                } else if (j <= 0) {
1.1       deraadt   825:                                        run_err("%s", j ? strerror(errno) :
1.63      stevesk   826:                                            "dropped connection");
1.1       deraadt   827:                                        exit(1);
                    828:                                }
                    829:                                amt -= j;
                    830:                                cp += j;
1.18      markus    831:                                statbytes += j;
1.1       deraadt   832:                        } while (amt > 0);
                    833:                        if (count == bp->cnt) {
                    834:                                /* Keep reading so we stay sync'd up. */
                    835:                                if (wrerr == NO) {
1.30      deraadt   836:                                        j = atomicio(write, ofd, bp->buf, count);
1.1       deraadt   837:                                        if (j != count) {
                    838:                                                wrerr = YES;
1.18      markus    839:                                                wrerrno = j >= 0 ? EIO : errno;
1.1       deraadt   840:                                        }
                    841:                                }
                    842:                                count = 0;
                    843:                                cp = bp->buf;
                    844:                        }
                    845:                }
1.7       deraadt   846:                if (showprogress)
                    847:                        progressmeter(1);
1.1       deraadt   848:                if (count != 0 && wrerr == NO &&
1.30      deraadt   849:                    (j = atomicio(write, ofd, bp->buf, count)) != count) {
1.1       deraadt   850:                        wrerr = YES;
1.18      markus    851:                        wrerrno = j >= 0 ? EIO : errno;
1.1       deraadt   852:                }
                    853:                if (ftruncate(ofd, size)) {
                    854:                        run_err("%s: truncate: %s", np, strerror(errno));
                    855:                        wrerr = DISPLAYED;
                    856:                }
                    857:                if (pflag) {
                    858:                        if (exists || omode != mode)
                    859:                                if (fchmod(ofd, omode))
                    860:                                        run_err("%s: set mode: %s",
1.63      stevesk   861:                                            np, strerror(errno));
1.1       deraadt   862:                } else {
                    863:                        if (!exists && omode != mode)
                    864:                                if (fchmod(ofd, omode & ~mask))
                    865:                                        run_err("%s: set mode: %s",
1.63      stevesk   866:                                            np, strerror(errno));
1.1       deraadt   867:                }
1.33      provos    868:                if (close(ofd) == -1) {
                    869:                        wrerr = YES;
                    870:                        wrerrno = errno;
                    871:                }
1.18      markus    872:                (void) response();
1.1       deraadt   873:                if (setimes && wrerr == NO) {
                    874:                        setimes = 0;
1.40      markus    875:                        if (utimes(np, tv) < 0) {
1.1       deraadt   876:                                run_err("%s: set times: %s",
1.63      stevesk   877:                                    np, strerror(errno));
1.1       deraadt   878:                                wrerr = DISPLAYED;
                    879:                        }
                    880:                }
1.18      markus    881:                switch (wrerr) {
1.1       deraadt   882:                case YES:
                    883:                        run_err("%s: %s", np, strerror(wrerrno));
                    884:                        break;
                    885:                case NO:
1.29      deraadt   886:                        (void) atomicio(write, remout, "", 1);
1.1       deraadt   887:                        break;
                    888:                case DISPLAYED:
                    889:                        break;
                    890:                }
                    891:        }
                    892: screwup:
                    893:        run_err("protocol error: %s", why);
                    894:        exit(1);
                    895: }
                    896:
                    897: int
                    898: response()
                    899: {
                    900:        char ch, *cp, resp, rbuf[2048];
                    901:
1.30      deraadt   902:        if (atomicio(read, remin, &resp, sizeof(resp)) != sizeof(resp))
1.1       deraadt   903:                lostconn(0);
                    904:
                    905:        cp = rbuf;
1.18      markus    906:        switch (resp) {
                    907:        case 0:         /* ok */
1.1       deraadt   908:                return (0);
                    909:        default:
                    910:                *cp++ = resp;
                    911:                /* FALLTHROUGH */
1.18      markus    912:        case 1:         /* error, followed by error msg */
                    913:        case 2:         /* fatal error, "" */
1.1       deraadt   914:                do {
1.30      deraadt   915:                        if (atomicio(read, remin, &ch, sizeof(ch)) != sizeof(ch))
1.1       deraadt   916:                                lostconn(0);
                    917:                        *cp++ = ch;
                    918:                } while (cp < &rbuf[sizeof(rbuf) - 1] && ch != '\n');
                    919:
                    920:                if (!iamremote)
1.29      deraadt   921:                        (void) atomicio(write, STDERR_FILENO, rbuf, cp - rbuf);
1.1       deraadt   922:                ++errs;
                    923:                if (resp == 1)
                    924:                        return (-1);
                    925:                exit(1);
                    926:        }
                    927:        /* NOTREACHED */
                    928: }
                    929:
                    930: void
                    931: usage()
                    932: {
1.83      stevesk   933:        (void) fprintf(stderr,
                    934:            "usage: scp [-pqrvBC46] [-F config] [-S ssh] [-P port] [-c cipher] [-i identity]\n"
                    935:            "           [-o option] f1 f2\n"
1.64      stevesk   936:            "   or: scp [options] f1 ... fn directory\n");
1.1       deraadt   937:        exit(1);
                    938: }
                    939:
                    940: void
1.18      markus    941: run_err(const char *fmt,...)
1.1       deraadt   942: {
                    943:        static FILE *fp;
                    944:        va_list ap;
                    945:
                    946:        ++errs;
                    947:        if (fp == NULL && !(fp = fdopen(remout, "w")))
                    948:                return;
1.18      markus    949:        (void) fprintf(fp, "%c", 0x01);
                    950:        (void) fprintf(fp, "scp: ");
1.73      markus    951:        va_start(ap, fmt);
1.18      markus    952:        (void) vfprintf(fp, fmt, ap);
1.73      markus    953:        va_end(ap);
1.18      markus    954:        (void) fprintf(fp, "\n");
                    955:        (void) fflush(fp);
                    956:
                    957:        if (!iamremote) {
1.73      markus    958:                va_start(ap, fmt);
1.18      markus    959:                vfprintf(stderr, fmt, ap);
1.73      markus    960:                va_end(ap);
1.18      markus    961:                fprintf(stderr, "\n");
                    962:        }
1.1       deraadt   963: }
                    964:
                    965: void
                    966: verifydir(cp)
                    967:        char *cp;
                    968: {
                    969:        struct stat stb;
                    970:
                    971:        if (!stat(cp, &stb)) {
                    972:                if (S_ISDIR(stb.st_mode))
                    973:                        return;
                    974:                errno = ENOTDIR;
                    975:        }
                    976:        run_err("%s: %s", cp, strerror(errno));
                    977:        exit(1);
                    978: }
                    979:
                    980: int
                    981: okname(cp0)
                    982:        char *cp0;
                    983: {
                    984:        int c;
                    985:        char *cp;
                    986:
                    987:        cp = cp0;
                    988:        do {
1.75      deraadt   989:                c = (int)*cp;
1.1       deraadt   990:                if (c & 0200)
                    991:                        goto bad;
1.46      markus    992:                if (!isalpha(c) && !isdigit(c) &&
                    993:                    c != '_' && c != '-' && c != '.' && c != '+')
1.1       deraadt   994:                        goto bad;
                    995:        } while (*++cp);
                    996:        return (1);
                    997:
1.25      markus    998: bad:   fprintf(stderr, "%s: invalid user name\n", cp0);
1.1       deraadt   999:        return (0);
                   1000: }
                   1001:
                   1002: BUF *
                   1003: allocbuf(bp, fd, blksize)
                   1004:        BUF *bp;
                   1005:        int fd, blksize;
                   1006: {
                   1007:        size_t size;
                   1008:        struct stat stb;
                   1009:
                   1010:        if (fstat(fd, &stb) < 0) {
                   1011:                run_err("fstat: %s", strerror(errno));
                   1012:                return (0);
                   1013:        }
1.18      markus   1014:        if (stb.st_blksize == 0)
                   1015:                size = blksize;
                   1016:        else
                   1017:                size = blksize + (stb.st_blksize - blksize % stb.st_blksize) %
1.35      deraadt  1018:                    stb.st_blksize;
1.1       deraadt  1019:        if (bp->cnt >= size)
                   1020:                return (bp);
1.18      markus   1021:        if (bp->buf == NULL)
                   1022:                bp->buf = xmalloc(size);
                   1023:        else
                   1024:                bp->buf = xrealloc(bp->buf, size);
1.81      markus   1025:        memset(bp->buf, 0, size);
1.1       deraadt  1026:        bp->cnt = size;
                   1027:        return (bp);
                   1028: }
                   1029:
                   1030: void
                   1031: lostconn(signo)
                   1032:        int signo;
                   1033: {
                   1034:        if (!iamremote)
1.74      markus   1035:                write(STDERR_FILENO, "lost connection\n", 16);
                   1036:        if (signo)
                   1037:                _exit(1);
                   1038:        else
                   1039:                exit(1);
1.1       deraadt  1040: }
1.4       aaron    1041:
1.76      itojun   1042: static void
1.26      markus   1043: updateprogressmeter(int ignore)
1.4       aaron    1044: {
1.9       deraadt  1045:        int save_errno = errno;
                   1046:
1.4       aaron    1047:        progressmeter(0);
1.79      stevesk  1048:        signal(SIGALRM, updateprogressmeter);
                   1049:        alarm(PROGRESSTIME);
1.9       deraadt  1050:        errno = save_errno;
1.4       aaron    1051: }
                   1052:
1.76      itojun   1053: static int
1.56      itojun   1054: foregroundproc(void)
1.16      deraadt  1055: {
                   1056:        static pid_t pgrp = -1;
                   1057:        int ctty_pgrp;
                   1058:
                   1059:        if (pgrp == -1)
                   1060:                pgrp = getpgrp();
                   1061:
1.18      markus   1062:        return ((ioctl(STDOUT_FILENO, TIOCGPGRP, &ctty_pgrp) != -1 &&
                   1063:                 ctty_pgrp == pgrp));
1.16      deraadt  1064: }
                   1065:
1.8       deraadt  1066: void
                   1067: progressmeter(int flag)
1.4       aaron    1068: {
                   1069:        static const char prefixes[] = " KMGTP";
                   1070:        static struct timeval lastupdate;
1.11      aaron    1071:        static off_t lastsize;
1.4       aaron    1072:        struct timeval now, td, wait;
                   1073:        off_t cursize, abbrevsize;
                   1074:        double elapsed;
                   1075:        int ratio, barlength, i, remaining;
                   1076:        char buf[256];
                   1077:
                   1078:        if (flag == -1) {
1.18      markus   1079:                (void) gettimeofday(&start, (struct timezone *) 0);
1.4       aaron    1080:                lastupdate = start;
1.11      aaron    1081:                lastsize = 0;
1.18      markus   1082:        }
1.16      deraadt  1083:        if (foregroundproc() == 0)
                   1084:                return;
                   1085:
1.18      markus   1086:        (void) gettimeofday(&now, (struct timezone *) 0);
1.4       aaron    1087:        cursize = statbytes;
1.13      aaron    1088:        if (totalbytes != 0) {
1.21      markus   1089:                ratio = 100.0 * cursize / totalbytes;
1.13      aaron    1090:                ratio = MAX(ratio, 0);
                   1091:                ratio = MIN(ratio, 100);
1.18      markus   1092:        } else
1.13      aaron    1093:                ratio = 100;
                   1094:
1.18      markus   1095:        snprintf(buf, sizeof(buf), "\r%-20.20s %3d%% ", curfile, ratio);
1.4       aaron    1096:
1.11      aaron    1097:        barlength = getttywidth() - 51;
1.4       aaron    1098:        if (barlength > 0) {
                   1099:                i = barlength * ratio / 100;
                   1100:                snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.35      deraadt  1101:                    "|%.*s%*s|", i,
1.78      deraadt  1102:                    "***************************************"
                   1103:                    "***************************************"
                   1104:                    "***************************************"
                   1105:                    "***************************************",
1.35      deraadt  1106:                    barlength - i, "");
1.4       aaron    1107:        }
                   1108:        i = 0;
                   1109:        abbrevsize = cursize;
                   1110:        while (abbrevsize >= 100000 && i < sizeof(prefixes)) {
                   1111:                i++;
                   1112:                abbrevsize >>= 10;
                   1113:        }
1.54      itojun   1114:        snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf), " %5llu %c%c ",
1.53      deraadt  1115:            (unsigned long long) abbrevsize, prefixes[i],
                   1116:            prefixes[i] == ' ' ? ' ' : 'B');
1.4       aaron    1117:
                   1118:        timersub(&now, &lastupdate, &wait);
                   1119:        if (cursize > lastsize) {
                   1120:                lastupdate = now;
                   1121:                lastsize = cursize;
                   1122:                if (wait.tv_sec >= STALLTIME) {
                   1123:                        start.tv_sec += wait.tv_sec;
                   1124:                        start.tv_usec += wait.tv_usec;
                   1125:                }
                   1126:                wait.tv_sec = 0;
                   1127:        }
                   1128:        timersub(&now, &start, &td);
1.6       aaron    1129:        elapsed = td.tv_sec + (td.tv_usec / 1000000.0);
1.4       aaron    1130:
1.44      deraadt  1131:        if (flag != 1 &&
                   1132:            (statbytes <= 0 || elapsed <= 0.0 || cursize > totalbytes)) {
1.4       aaron    1133:                snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.44      deraadt  1134:                    "   --:-- ETA");
1.4       aaron    1135:        } else if (wait.tv_sec >= STALLTIME) {
                   1136:                snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.44      deraadt  1137:                    " - stalled -");
1.4       aaron    1138:        } else {
1.28      deraadt  1139:                if (flag != 1)
1.44      deraadt  1140:                        remaining = (int)(totalbytes / (statbytes / elapsed) -
                   1141:                            elapsed);
1.28      deraadt  1142:                else
                   1143:                        remaining = elapsed;
                   1144:
1.14      aaron    1145:                i = remaining / 3600;
1.4       aaron    1146:                if (i)
                   1147:                        snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.35      deraadt  1148:                            "%2d:", i);
1.4       aaron    1149:                else
                   1150:                        snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.35      deraadt  1151:                            "   ");
1.4       aaron    1152:                i = remaining % 3600;
                   1153:                snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf),
1.35      deraadt  1154:                    "%02d:%02d%s", i / 60, i % 60,
                   1155:                    (flag != 1) ? " ETA" : "    ");
1.4       aaron    1156:        }
1.10      deraadt  1157:        atomicio(write, fileno(stdout), buf, strlen(buf));
1.4       aaron    1158:
                   1159:        if (flag == -1) {
1.26      markus   1160:                signal(SIGALRM, updateprogressmeter);
1.79      stevesk  1161:                alarm(PROGRESSTIME);
1.4       aaron    1162:        } else if (flag == 1) {
1.79      stevesk  1163:                alarm(0);
1.29      deraadt  1164:                atomicio(write, fileno(stdout), "\n", 1);
1.12      aaron    1165:                statbytes = 0;
1.4       aaron    1166:        }
                   1167: }
                   1168:
1.8       deraadt  1169: int
                   1170: getttywidth(void)
1.4       aaron    1171: {
                   1172:        struct winsize winsize;
                   1173:
                   1174:        if (ioctl(fileno(stdout), TIOCGWINSZ, &winsize) != -1)
1.18      markus   1175:                return (winsize.ws_col ? winsize.ws_col : 80);
1.4       aaron    1176:        else
1.18      markus   1177:                return (80);
1.4       aaron    1178: }