[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.43.2.2

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