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

1.238   ! djm         1: /* $OpenBSD: scp.c,v 1.237 2021/09/18 02:03:25 djm Exp $ */
1.1       deraadt     2: /*
1.38      deraadt     3:  * scp - secure remote copy.  This is basically patched BSD rcp which
                      4:  * uses ssh to do the data transfer (instead of using rcmd).
1.27      markus      5:  *
1.38      deraadt     6:  * NOTE: This version should NOT be suid root.  (This uses ssh to
                      7:  * do the transfer and ssh has the necessary privileges.)
1.27      markus      8:  *
1.38      deraadt     9:  * 1995 Timo Rinne <tri@iki.fi>, Tatu Ylonen <ylo@cs.hut.fi>
                     10:  *
                     11:  * As far as I am concerned, the code I have written for this software
                     12:  * can be used freely for any purpose.  Any derived versions of this
                     13:  * software must be clearly marked as such, and if the derived work is
                     14:  * incompatible with the protocol description in the RFC file, it must be
                     15:  * called by a name other than "ssh" or "Secure Shell".
1.39      markus     16:  */
1.38      deraadt    17: /*
1.60      deraadt    18:  * Copyright (c) 1999 Theo de Raadt.  All rights reserved.
                     19:  * Copyright (c) 1999 Aaron Campbell.  All rights reserved.
1.27      markus     20:  *
1.38      deraadt    21:  * Redistribution and use in source and binary forms, with or without
                     22:  * modification, are permitted provided that the following conditions
                     23:  * are met:
                     24:  * 1. Redistributions of source code must retain the above copyright
                     25:  *    notice, this list of conditions and the following disclaimer.
                     26:  * 2. Redistributions in binary form must reproduce the above copyright
                     27:  *    notice, this list of conditions and the following disclaimer in the
                     28:  *    documentation and/or other materials provided with the distribution.
1.27      markus     29:  *
1.38      deraadt    30:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
                     31:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
                     32:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
                     33:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
                     34:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
                     35:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
                     36:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
                     37:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
                     38:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
                     39:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
                     40:  */
1.1       deraadt    41:
                     42: /*
1.35      deraadt    43:  * Parts from:
                     44:  *
1.1       deraadt    45:  * Copyright (c) 1983, 1990, 1992, 1993, 1995
                     46:  *     The Regents of the University of California.  All rights reserved.
                     47:  *
                     48:  * Redistribution and use in source and binary forms, with or without
                     49:  * modification, are permitted provided that the following conditions
                     50:  * are met:
                     51:  * 1. Redistributions of source code must retain the above copyright
                     52:  *    notice, this list of conditions and the following disclaimer.
                     53:  * 2. Redistributions in binary form must reproduce the above copyright
                     54:  *    notice, this list of conditions and the following disclaimer in the
                     55:  *    documentation and/or other materials provided with the distribution.
1.103     millert    56:  * 3. Neither the name of the University nor the names of its contributors
1.1       deraadt    57:  *    may be used to endorse or promote products derived from this software
                     58:  *    without specific prior written permission.
                     59:  *
                     60:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     61:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     62:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     63:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     64:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     65:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     66:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     67:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     68:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     69:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     70:  * SUCH DAMAGE.
                     71:  *
                     72:  */
                     73:
1.132     stevesk    74: #include <sys/types.h>
1.161     djm        75: #include <sys/poll.h>
1.132     stevesk    76: #include <sys/wait.h>
1.134     stevesk    77: #include <sys/stat.h>
1.151     stevesk    78: #include <sys/time.h>
1.155     deraadt    79: #include <sys/uio.h>
1.131     stevesk    80:
1.135     stevesk    81: #include <ctype.h>
1.131     stevesk    82: #include <dirent.h>
1.147     stevesk    83: #include <errno.h>
1.144     stevesk    84: #include <fcntl.h>
1.202     djm        85: #include <fnmatch.h>
1.216     djm        86: #include <glob.h>
                     87: #include <libgen.h>
1.186     schwarze   88: #include <locale.h>
1.143     stevesk    89: #include <pwd.h>
1.133     stevesk    90: #include <signal.h>
1.146     stevesk    91: #include <stdarg.h>
1.189     millert    92: #include <stdint.h>
1.154     stevesk    93: #include <stdio.h>
1.153     stevesk    94: #include <stdlib.h>
1.150     stevesk    95: #include <string.h>
1.149     stevesk    96: #include <time.h>
1.148     stevesk    97: #include <unistd.h>
1.181     deraadt    98: #include <limits.h>
1.158     dtucker    99: #include <vis.h>
1.1       deraadt   100:
                    101: #include "xmalloc.h"
1.193     millert   102: #include "ssh.h"
1.51      markus    103: #include "atomicio.h"
1.50      markus    104: #include "pathnames.h"
1.51      markus    105: #include "log.h"
1.69      mouring   106: #include "misc.h"
1.97      fgsch     107: #include "progressmeter.h"
1.186     schwarze  108: #include "utf8.h"
1.1       deraadt   109:
1.216     djm       110: #include "sftp-common.h"
                    111: #include "sftp-client.h"
                    112:
1.161     djm       113: #define COPY_BUFLEN    16384
                    114:
1.231     naddy     115: int do_cmd(char *, char *, char *, int, int, char *, int *, int *, pid_t *);
                    116: int do_cmd2(char *, char *, int, char *, int, int);
1.11      aaron     117:
1.70      mouring   118: /* Struct for addargs */
                    119: arglist args;
1.168     djm       120: arglist remote_remote_args;
1.41      markus    121:
1.99      markus    122: /* Bandwidth limit */
1.167     djm       123: long long limit_kbps = 0;
                    124: struct bwlimit bwlimit;
1.99      markus    125:
1.11      aaron     126: /* Name of current file being transferred. */
                    127: char *curfile;
1.4       aaron     128:
1.1       deraadt   129: /* This is set to non-zero to enable verbose mode. */
1.17      markus    130: int verbose_mode = 0;
1.216     djm       131: LogLevel log_level = SYSLOG_LEVEL_INFO;
1.1       deraadt   132:
1.6       aaron     133: /* This is set to zero if the progressmeter is not desired. */
                    134: int showprogress = 1;
                    135:
1.169     markus    136: /*
                    137:  * This is set to non-zero if remote-remote copy should be piped
                    138:  * through this process.
                    139:  */
1.229     djm       140: int throughlocal = 1;
1.169     markus    141:
1.193     millert   142: /* Non-standard port to use for the ssh connection or -1. */
                    143: int sshport = -1;
                    144:
1.34      deraadt   145: /* This is the program to execute for the secured connection. ("ssh" or -S) */
1.50      markus    146: char *ssh_program = _PATH_SSH_PROGRAM;
1.34      deraadt   147:
1.92      markus    148: /* This is used to store the pid of ssh_program */
1.105     djm       149: pid_t do_cmd_pid = -1;
1.219     djm       150: pid_t do_cmd_pid2 = -1;
1.105     djm       151:
1.216     djm       152: /* Needed for sftp */
                    153: volatile sig_atomic_t interrupted = 0;
                    154:
                    155: int remote_glob(struct sftp_conn *, const char *, int,
                    156:     int (*)(const char *, int), glob_t *); /* proto for sftp-glob.c */
                    157:
1.105     djm       158: static void
                    159: killchild(int signo)
                    160: {
1.119     dtucker   161:        if (do_cmd_pid > 1) {
1.123     avsm      162:                kill(do_cmd_pid, signo ? signo : SIGTERM);
1.119     dtucker   163:                waitpid(do_cmd_pid, NULL, 0);
                    164:        }
1.219     djm       165:        if (do_cmd_pid2 > 1) {
                    166:                kill(do_cmd_pid2, signo ? signo : SIGTERM);
                    167:                waitpid(do_cmd_pid2, NULL, 0);
                    168:        }
1.105     djm       169:
1.123     avsm      170:        if (signo)
                    171:                _exit(1);
                    172:        exit(1);
1.105     djm       173: }
1.92      markus    174:
1.166     millert   175: static void
1.219     djm       176: suspone(int pid, int signo)
1.166     millert   177: {
                    178:        int status;
                    179:
1.219     djm       180:        if (pid > 1) {
                    181:                kill(pid, signo);
                    182:                while (waitpid(pid, &status, WUNTRACED) == -1 &&
1.166     millert   183:                    errno == EINTR)
                    184:                        ;
                    185:        }
                    186: }
                    187:
1.219     djm       188: static void
                    189: suspchild(int signo)
                    190: {
                    191:        suspone(do_cmd_pid, signo);
                    192:        suspone(do_cmd_pid2, signo);
                    193:        kill(getpid(), SIGSTOP);
                    194: }
                    195:
1.129     djm       196: static int
                    197: do_local_cmd(arglist *a)
                    198: {
                    199:        u_int i;
                    200:        int status;
                    201:        pid_t pid;
                    202:
                    203:        if (a->num == 0)
                    204:                fatal("do_local_cmd: no arguments");
                    205:
                    206:        if (verbose_mode) {
                    207:                fprintf(stderr, "Executing:");
                    208:                for (i = 0; i < a->num; i++)
1.186     schwarze  209:                        fmprintf(stderr, " %s", a->list[i]);
1.129     djm       210:                fprintf(stderr, "\n");
                    211:        }
                    212:        if ((pid = fork()) == -1)
                    213:                fatal("do_local_cmd: fork: %s", strerror(errno));
                    214:
                    215:        if (pid == 0) {
                    216:                execvp(a->list[0], a->list);
                    217:                perror(a->list[0]);
                    218:                exit(1);
                    219:        }
                    220:
                    221:        do_cmd_pid = pid;
1.207     dtucker   222:        ssh_signal(SIGTERM, killchild);
                    223:        ssh_signal(SIGINT, killchild);
                    224:        ssh_signal(SIGHUP, killchild);
1.129     djm       225:
                    226:        while (waitpid(pid, &status, 0) == -1)
                    227:                if (errno != EINTR)
                    228:                        fatal("do_local_cmd: waitpid: %s", strerror(errno));
                    229:
                    230:        do_cmd_pid = -1;
                    231:
                    232:        if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
                    233:                return (-1);
                    234:
                    235:        return (0);
                    236: }
                    237:
1.20      markus    238: /*
                    239:  * This function executes the given command as the specified user on the
                    240:  * given host.  This returns < 0 if execution fails, and >= 0 otherwise. This
                    241:  * assigns the input and output file descriptors on success.
                    242:  */
1.1       deraadt   243:
1.27      markus    244: int
1.231     naddy     245: do_cmd(char *program, char *host, char *remuser, int port, int subsystem,
                    246:     char *cmd, int *fdin, int *fdout, pid_t *pid)
1.1       deraadt   247: {
1.18      markus    248:        int pin[2], pout[2], reserved[2];
                    249:
                    250:        if (verbose_mode)
1.186     schwarze  251:                fmprintf(stderr,
1.78      deraadt   252:                    "Executing: program %s host %s, user %s, command %s\n",
1.216     djm       253:                    program, host,
1.78      deraadt   254:                    remuser ? remuser : "(unspecified)", cmd);
1.18      markus    255:
1.193     millert   256:        if (port == -1)
                    257:                port = sshport;
                    258:
1.20      markus    259:        /*
                    260:         * Reserve two descriptors so that the real pipes won't get
                    261:         * descriptors 0 and 1 because that will screw up dup2 below.
                    262:         */
1.205     deraadt   263:        if (pipe(reserved) == -1)
1.142     markus    264:                fatal("pipe: %s", strerror(errno));
1.18      markus    265:
                    266:        /* Create a socket pair for communicating with ssh. */
1.205     deraadt   267:        if (pipe(pin) == -1)
1.18      markus    268:                fatal("pipe: %s", strerror(errno));
1.205     deraadt   269:        if (pipe(pout) == -1)
1.18      markus    270:                fatal("pipe: %s", strerror(errno));
                    271:
                    272:        /* Free the reserved descriptors. */
                    273:        close(reserved[0]);
                    274:        close(reserved[1]);
1.166     millert   275:
1.207     dtucker   276:        ssh_signal(SIGTSTP, suspchild);
                    277:        ssh_signal(SIGTTIN, suspchild);
                    278:        ssh_signal(SIGTTOU, suspchild);
1.18      markus    279:
1.106     nino      280:        /* Fork a child to execute the command on the remote host using ssh. */
1.219     djm       281:        *pid = fork();
                    282:        if (*pid == 0) {
1.18      markus    283:                /* Child. */
                    284:                close(pin[1]);
                    285:                close(pout[0]);
                    286:                dup2(pin[0], 0);
                    287:                dup2(pout[1], 1);
                    288:                close(pin[0]);
                    289:                close(pout[1]);
                    290:
1.216     djm       291:                replacearg(&args, 0, "%s", program);
1.193     millert   292:                if (port != -1) {
                    293:                        addargs(&args, "-p");
                    294:                        addargs(&args, "%d", port);
                    295:                }
1.165     guenther  296:                if (remuser != NULL) {
                    297:                        addargs(&args, "-l");
                    298:                        addargs(&args, "%s", remuser);
                    299:                }
1.231     naddy     300:                if (subsystem)
                    301:                        addargs(&args, "-s");
1.165     guenther  302:                addargs(&args, "--");
1.70      mouring   303:                addargs(&args, "%s", host);
                    304:                addargs(&args, "%s", cmd);
1.18      markus    305:
1.216     djm       306:                execvp(program, args.list);
                    307:                perror(program);
1.18      markus    308:                exit(1);
1.219     djm       309:        } else if (*pid == -1) {
1.92      markus    310:                fatal("fork: %s", strerror(errno));
1.18      markus    311:        }
                    312:        /* Parent.  Close the other side, and return the local side. */
                    313:        close(pin[0]);
                    314:        *fdout = pin[1];
                    315:        close(pout[1]);
                    316:        *fdin = pout[0];
1.207     dtucker   317:        ssh_signal(SIGTERM, killchild);
                    318:        ssh_signal(SIGINT, killchild);
                    319:        ssh_signal(SIGHUP, killchild);
1.18      markus    320:        return 0;
1.1       deraadt   321: }
                    322:
1.169     markus    323: /*
1.196     djm       324:  * This function executes a command similar to do_cmd(), but expects the
1.169     markus    325:  * input and output descriptors to be setup by a previous call to do_cmd().
                    326:  * This way the input and output of two commands can be connected.
                    327:  */
                    328: int
1.219     djm       329: do_cmd2(char *host, char *remuser, int port, char *cmd,
                    330:     int fdin, int fdout)
1.169     markus    331: {
1.219     djm       332:        int status;
1.169     markus    333:        pid_t pid;
                    334:
                    335:        if (verbose_mode)
1.186     schwarze  336:                fmprintf(stderr,
1.169     markus    337:                    "Executing: 2nd program %s host %s, user %s, command %s\n",
                    338:                    ssh_program, host,
                    339:                    remuser ? remuser : "(unspecified)", cmd);
                    340:
1.193     millert   341:        if (port == -1)
                    342:                port = sshport;
                    343:
1.169     markus    344:        /* Fork a child to execute the command on the remote host using ssh. */
                    345:        pid = fork();
                    346:        if (pid == 0) {
                    347:                dup2(fdin, 0);
                    348:                dup2(fdout, 1);
                    349:
                    350:                replacearg(&args, 0, "%s", ssh_program);
1.193     millert   351:                if (port != -1) {
                    352:                        addargs(&args, "-p");
                    353:                        addargs(&args, "%d", port);
                    354:                }
1.169     markus    355:                if (remuser != NULL) {
                    356:                        addargs(&args, "-l");
                    357:                        addargs(&args, "%s", remuser);
                    358:                }
1.208     markus    359:                addargs(&args, "-oBatchMode=yes");
1.169     markus    360:                addargs(&args, "--");
                    361:                addargs(&args, "%s", host);
                    362:                addargs(&args, "%s", cmd);
                    363:
                    364:                execvp(ssh_program, args.list);
                    365:                perror(ssh_program);
                    366:                exit(1);
                    367:        } else if (pid == -1) {
                    368:                fatal("fork: %s", strerror(errno));
                    369:        }
                    370:        while (waitpid(pid, &status, 0) == -1)
                    371:                if (errno != EINTR)
                    372:                        fatal("do_cmd2: waitpid: %s", strerror(errno));
                    373:        return 0;
                    374: }
                    375:
1.1       deraadt   376: typedef struct {
1.124     djm       377:        size_t cnt;
1.1       deraadt   378:        char *buf;
                    379: } BUF;
                    380:
1.18      markus    381: BUF *allocbuf(BUF *, int, int);
                    382: void lostconn(int);
                    383: int okname(char *);
1.211     millert   384: void run_err(const char *,...)
                    385:     __attribute__((__format__ (printf, 1, 2)))
                    386:     __attribute__((__nonnull__ (1)));
                    387: int note_err(const char *,...)
                    388:     __attribute__((__format__ (printf, 1, 2)));
1.18      markus    389: void verifydir(char *);
1.1       deraadt   390:
                    391: struct passwd *pwd;
1.18      markus    392: uid_t userid;
1.219     djm       393: int errs, remin, remout, remin2, remout2;
1.202     djm       394: int Tflag, pflag, iamremote, iamrecursive, targetshouldbedirectory;
1.1       deraadt   395:
                    396: #define        CMDNEEDS        64
                    397: char cmd[CMDNEEDS];            /* must hold "rcp -r -p -d\0" */
                    398:
1.216     djm       399: enum scp_mode_e {
                    400:        MODE_SCP,
                    401:        MODE_SFTP
                    402: };
                    403:
1.18      markus    404: int response(void);
                    405: void rsource(char *, struct stat *);
1.202     djm       406: void sink(int, char *[], const char *);
1.18      markus    407: void source(int, char *[]);
1.216     djm       408: void tolocal(int, char *[], enum scp_mode_e, char *sftp_direct);
                    409: void toremote(int, char *[], enum scp_mode_e, char *sftp_direct);
1.18      markus    410: void usage(void);
1.1       deraadt   411:
1.228     djm       412: void source_sftp(int, char *, char *, struct sftp_conn *);
1.216     djm       413: void sink_sftp(int, char *, const char *, struct sftp_conn *);
1.219     djm       414: void throughlocal_sftp(struct sftp_conn *, struct sftp_conn *,
1.228     djm       415:     char *, char *);
1.216     djm       416:
1.1       deraadt   417: int
1.104     djm       418: main(int argc, char **argv)
1.1       deraadt   419: {
1.145     djm       420:        int ch, fflag, tflag, status, n;
1.216     djm       421:        char **newargv, *argv0;
1.167     djm       422:        const char *errstr;
1.1       deraadt   423:        extern char *optarg;
                    424:        extern int optind;
1.238   ! djm       425:        enum scp_mode_e mode = MODE_SCP;
1.216     djm       426:        char *sftp_direct = NULL;
1.126     djm       427:
                    428:        /* Ensure that fds 0, 1 and 2 are open or directed to /dev/null */
                    429:        sanitise_stdfd();
1.145     djm       430:
1.186     schwarze  431:        setlocale(LC_CTYPE, "");
                    432:
1.145     djm       433:        /* Copy argv, because we modify it */
1.216     djm       434:        argv0 = argv[0];
1.187     deraadt   435:        newargv = xcalloc(MAXIMUM(argc + 1, 1), sizeof(*newargv));
1.145     djm       436:        for (n = 0; n < argc; n++)
                    437:                newargv[n] = xstrdup(argv[n]);
                    438:        argv = newargv;
1.1       deraadt   439:
1.235     djm       440:        log_init(argv0, log_level, SYSLOG_FACILITY_USER, 2);
1.218     djm       441:
1.129     djm       442:        memset(&args, '\0', sizeof(args));
1.168     djm       443:        memset(&remote_remote_args, '\0', sizeof(remote_remote_args));
                    444:        args.list = remote_remote_args.list = NULL;
1.129     djm       445:        addargs(&args, "%s", ssh_program);
1.70      mouring   446:        addargs(&args, "-x");
1.168     djm       447:        addargs(&args, "-oPermitLocalCommand=no");
                    448:        addargs(&args, "-oClearAllForwardings=yes");
1.195     djm       449:        addargs(&args, "-oRemoteCommand=none");
                    450:        addargs(&args, "-oRequestTTY=no");
1.41      markus    451:
1.202     djm       452:        fflag = Tflag = tflag = 0;
                    453:        while ((ch = getopt(argc, argv,
1.230     djm       454:            "12346ABCTdfOpqRrstvD:F:J:M:P:S:c:i:l:o:")) != -1) {
1.18      markus    455:                switch (ch) {
                    456:                /* User-visible flags. */
1.100     markus    457:                case '1':
1.190     djm       458:                        fatal("SSH protocol v.1 is no longer supported");
                    459:                        break;
1.100     markus    460:                case '2':
1.190     djm       461:                        /* Ignored */
                    462:                        break;
1.212     djm       463:                case 'A':
1.23      markus    464:                case '4':
1.41      markus    465:                case '6':
                    466:                case 'C':
1.70      mouring   467:                        addargs(&args, "-%c", ch);
1.168     djm       468:                        addargs(&remote_remote_args, "-%c", ch);
1.41      markus    469:                        break;
1.216     djm       470:                case 'D':
                    471:                        sftp_direct = optarg;
                    472:                        break;
1.169     markus    473:                case '3':
                    474:                        throughlocal = 1;
                    475:                        break;
1.229     djm       476:                case 'R':
                    477:                        throughlocal = 0;
                    478:                        break;
1.41      markus    479:                case 'o':
                    480:                case 'c':
                    481:                case 'i':
1.83      stevesk   482:                case 'F':
1.199     tb        483:                case 'J':
1.168     djm       484:                        addargs(&remote_remote_args, "-%c", ch);
                    485:                        addargs(&remote_remote_args, "%s", optarg);
1.165     guenther  486:                        addargs(&args, "-%c", ch);
                    487:                        addargs(&args, "%s", optarg);
1.23      markus    488:                        break;
1.230     djm       489:                case 'O':
                    490:                        mode = MODE_SCP;
                    491:                        break;
                    492:                case 's':
                    493:                        mode = MODE_SFTP;
                    494:                        break;
1.41      markus    495:                case 'P':
1.193     millert   496:                        sshport = a2port(optarg);
                    497:                        if (sshport <= 0)
                    498:                                fatal("bad port \"%s\"\n", optarg);
1.41      markus    499:                        break;
                    500:                case 'B':
1.168     djm       501:                        addargs(&remote_remote_args, "-oBatchmode=yes");
                    502:                        addargs(&args, "-oBatchmode=yes");
1.23      markus    503:                        break;
1.99      markus    504:                case 'l':
1.167     djm       505:                        limit_kbps = strtonum(optarg, 1, 100 * 1024 * 1024,
                    506:                            &errstr);
                    507:                        if (errstr != NULL)
1.99      markus    508:                                usage();
1.167     djm       509:                        limit_kbps *= 1024; /* kbps */
                    510:                        bandwidth_limit_init(&bwlimit, limit_kbps, COPY_BUFLEN);
1.99      markus    511:                        break;
1.1       deraadt   512:                case 'p':
                    513:                        pflag = 1;
                    514:                        break;
                    515:                case 'r':
                    516:                        iamrecursive = 1;
                    517:                        break;
1.34      deraadt   518:                case 'S':
1.41      markus    519:                        ssh_program = xstrdup(optarg);
                    520:                        break;
                    521:                case 'v':
1.72      markus    522:                        addargs(&args, "-v");
1.168     djm       523:                        addargs(&remote_remote_args, "-v");
1.216     djm       524:                        if (verbose_mode == 0)
                    525:                                log_level = SYSLOG_LEVEL_DEBUG1;
                    526:                        else if (log_level < SYSLOG_LEVEL_DEBUG3)
                    527:                                log_level++;
1.41      markus    528:                        verbose_mode = 1;
                    529:                        break;
                    530:                case 'q':
1.111     dtucker   531:                        addargs(&args, "-q");
1.168     djm       532:                        addargs(&remote_remote_args, "-q");
1.41      markus    533:                        showprogress = 0;
1.34      deraadt   534:                        break;
                    535:
1.18      markus    536:                /* Server options. */
1.1       deraadt   537:                case 'd':
                    538:                        targetshouldbedirectory = 1;
                    539:                        break;
1.18      markus    540:                case 'f':       /* "from" */
1.1       deraadt   541:                        iamremote = 1;
                    542:                        fflag = 1;
                    543:                        break;
1.18      markus    544:                case 't':       /* "to" */
1.1       deraadt   545:                        iamremote = 1;
                    546:                        tflag = 1;
                    547:                        break;
1.202     djm       548:                case 'T':
                    549:                        Tflag = 1;
                    550:                        break;
1.1       deraadt   551:                default:
                    552:                        usage();
                    553:                }
1.202     djm       554:        }
1.1       deraadt   555:        argc -= optind;
                    556:        argv += optind;
                    557:
1.235     djm       558:        log_init(argv0, log_level, SYSLOG_FACILITY_USER, 2);
1.216     djm       559:
1.212     djm       560:        /* Do this last because we want the user to be able to override it */
                    561:        addargs(&args, "-oForwardAgent=no");
                    562:
1.218     djm       563:        if (iamremote)
                    564:                mode = MODE_SCP;
1.216     djm       565:
1.1       deraadt   566:        if ((pwd = getpwuid(userid = getuid())) == NULL)
1.108     deraadt   567:                fatal("unknown user %u", (u_int) userid);
1.1       deraadt   568:
1.156     djm       569:        if (!isatty(STDOUT_FILENO))
1.7       deraadt   570:                showprogress = 0;
1.184     deraadt   571:
                    572:        if (pflag) {
                    573:                /* Cannot pledge: -p allows setuid/setgid files... */
                    574:        } else {
                    575:                if (pledge("stdio rpath wpath cpath fattr tty proc exec",
                    576:                    NULL) == -1) {
                    577:                        perror("pledge");
                    578:                        exit(1);
                    579:                }
                    580:        }
1.7       deraadt   581:
1.1       deraadt   582:        remin = STDIN_FILENO;
                    583:        remout = STDOUT_FILENO;
                    584:
1.52      stevesk   585:        if (fflag) {
1.18      markus    586:                /* Follow "protocol", send data. */
                    587:                (void) response();
1.1       deraadt   588:                source(argc, argv);
                    589:                exit(errs != 0);
                    590:        }
1.18      markus    591:        if (tflag) {
                    592:                /* Receive data. */
1.202     djm       593:                sink(argc, argv, NULL);
1.1       deraadt   594:                exit(errs != 0);
                    595:        }
                    596:        if (argc < 2)
                    597:                usage();
                    598:        if (argc > 2)
                    599:                targetshouldbedirectory = 1;
                    600:
                    601:        remin = remout = -1;
1.92      markus    602:        do_cmd_pid = -1;
1.1       deraadt   603:        /* Command to be executed on remote system using "ssh". */
1.55      deraadt   604:        (void) snprintf(cmd, sizeof cmd, "scp%s%s%s%s",
                    605:            verbose_mode ? " -v" : "",
1.35      deraadt   606:            iamrecursive ? " -r" : "", pflag ? " -p" : "",
                    607:            targetshouldbedirectory ? " -d" : "");
1.1       deraadt   608:
1.207     dtucker   609:        (void) ssh_signal(SIGPIPE, lostconn);
1.1       deraadt   610:
1.193     millert   611:        if (colon(argv[argc - 1]))      /* Dest is remote host. */
1.216     djm       612:                toremote(argc, argv, mode, sftp_direct);
1.1       deraadt   613:        else {
                    614:                if (targetshouldbedirectory)
                    615:                        verifydir(argv[argc - 1]);
1.216     djm       616:                tolocal(argc, argv, mode, sftp_direct); /* Dest is local host. */
1.92      markus    617:        }
                    618:        /*
                    619:         * Finally check the exit status of the ssh process, if one was forked
1.164     stevesk   620:         * and no error has occurred yet
1.92      markus    621:         */
1.234     djm       622:        if (do_cmd_pid != -1 && (mode == MODE_SFTP || errs == 0)) {
1.92      markus    623:                if (remin != -1)
                    624:                    (void) close(remin);
                    625:                if (remout != -1)
                    626:                    (void) close(remout);
                    627:                if (waitpid(do_cmd_pid, &status, 0) == -1)
                    628:                        errs = 1;
                    629:                else {
                    630:                        if (!WIFEXITED(status) || WEXITSTATUS(status) != 0)
                    631:                                errs = 1;
                    632:                }
1.1       deraadt   633:        }
                    634:        exit(errs != 0);
                    635: }
                    636:
1.167     djm       637: /* Callback from atomicio6 to update progress meter and limit bandwidth */
                    638: static int
                    639: scpio(void *_cnt, size_t s)
1.161     djm       640: {
1.167     djm       641:        off_t *cnt = (off_t *)_cnt;
                    642:
                    643:        *cnt += s;
1.201     dtucker   644:        refresh_progress_meter(0);
1.167     djm       645:        if (limit_kbps > 0)
                    646:                bandwidth_limit(&bwlimit, s);
                    647:        return 0;
1.161     djm       648: }
                    649:
1.176     guenther  650: static int
                    651: do_times(int fd, int verb, const struct stat *sb)
                    652: {
                    653:        /* strlen(2^64) == 20; strlen(10^6) == 7 */
                    654:        char buf[(20 + 7 + 2) * 2 + 2];
                    655:
                    656:        (void)snprintf(buf, sizeof(buf), "T%llu 0 %llu 0\n",
                    657:            (unsigned long long) (sb->st_mtime < 0 ? 0 : sb->st_mtime),
                    658:            (unsigned long long) (sb->st_atime < 0 ? 0 : sb->st_atime));
                    659:        if (verb) {
                    660:                fprintf(stderr, "File mtime %lld atime %lld\n",
                    661:                    (long long)sb->st_mtime, (long long)sb->st_atime);
                    662:                fprintf(stderr, "Sending file timestamps: %s", buf);
                    663:        }
                    664:        (void) atomicio(vwrite, fd, buf, strlen(buf));
                    665:        return (response());
                    666: }
                    667:
1.194     millert   668: static int
                    669: parse_scp_uri(const char *uri, char **userp, char **hostp, int *portp,
1.214     djm       670:     char **pathp)
1.194     millert   671: {
                    672:        int r;
                    673:
                    674:        r = parse_uri("scp", uri, userp, hostp, portp, pathp);
                    675:        if (r == 0 && *pathp == NULL)
                    676:                *pathp = xstrdup(".");
                    677:        return r;
                    678: }
                    679:
1.204     djm       680: /* Appends a string to an array; returns 0 on success, -1 on alloc failure */
                    681: static int
                    682: append(char *cp, char ***ap, size_t *np)
                    683: {
                    684:        char **tmp;
                    685:
                    686:        if ((tmp = reallocarray(*ap, *np + 1, sizeof(*tmp))) == NULL)
                    687:                return -1;
                    688:        tmp[(*np)] = cp;
                    689:        (*np)++;
                    690:        *ap = tmp;
                    691:        return 0;
                    692: }
                    693:
                    694: /*
                    695:  * Finds the start and end of the first brace pair in the pattern.
                    696:  * returns 0 on success or -1 for invalid patterns.
                    697:  */
                    698: static int
                    699: find_brace(const char *pattern, int *startp, int *endp)
                    700: {
                    701:        int i;
                    702:        int in_bracket, brace_level;
                    703:
                    704:        *startp = *endp = -1;
                    705:        in_bracket = brace_level = 0;
                    706:        for (i = 0; i < INT_MAX && *endp < 0 && pattern[i] != '\0'; i++) {
                    707:                switch (pattern[i]) {
                    708:                case '\\':
                    709:                        /* skip next character */
                    710:                        if (pattern[i + 1] != '\0')
                    711:                                i++;
                    712:                        break;
                    713:                case '[':
                    714:                        in_bracket = 1;
                    715:                        break;
                    716:                case ']':
                    717:                        in_bracket = 0;
                    718:                        break;
                    719:                case '{':
                    720:                        if (in_bracket)
                    721:                                break;
                    722:                        if (pattern[i + 1] == '}') {
                    723:                                /* Protect a single {}, for find(1), like csh */
                    724:                                i++; /* skip */
                    725:                                break;
                    726:                        }
                    727:                        if (*startp == -1)
                    728:                                *startp = i;
                    729:                        brace_level++;
                    730:                        break;
                    731:                case '}':
                    732:                        if (in_bracket)
                    733:                                break;
                    734:                        if (*startp < 0) {
                    735:                                /* Unbalanced brace */
                    736:                                return -1;
                    737:                        }
                    738:                        if (--brace_level <= 0)
                    739:                                *endp = i;
                    740:                        break;
                    741:                }
                    742:        }
                    743:        /* unbalanced brackets/braces */
                    744:        if (*endp < 0 && (*startp >= 0 || in_bracket))
                    745:                return -1;
                    746:        return 0;
                    747: }
                    748:
                    749: /*
                    750:  * Assembles and records a successfully-expanded pattern, returns -1 on
                    751:  * alloc failure.
                    752:  */
                    753: static int
                    754: emit_expansion(const char *pattern, int brace_start, int brace_end,
                    755:     int sel_start, int sel_end, char ***patternsp, size_t *npatternsp)
                    756: {
                    757:        char *cp;
                    758:        int o = 0, tail_len = strlen(pattern + brace_end + 1);
                    759:
                    760:        if ((cp = malloc(brace_start + (sel_end - sel_start) +
                    761:            tail_len + 1)) == NULL)
                    762:                return -1;
                    763:
                    764:        /* Pattern before initial brace */
                    765:        if (brace_start > 0) {
                    766:                memcpy(cp, pattern, brace_start);
                    767:                o = brace_start;
                    768:        }
                    769:        /* Current braced selection */
                    770:        if (sel_end - sel_start > 0) {
                    771:                memcpy(cp + o, pattern + sel_start,
                    772:                    sel_end - sel_start);
                    773:                o += sel_end - sel_start;
                    774:        }
                    775:        /* Remainder of pattern after closing brace */
                    776:        if (tail_len > 0) {
                    777:                memcpy(cp + o, pattern + brace_end + 1, tail_len);
                    778:                o += tail_len;
                    779:        }
                    780:        cp[o] = '\0';
                    781:        if (append(cp, patternsp, npatternsp) != 0) {
                    782:                free(cp);
                    783:                return -1;
                    784:        }
                    785:        return 0;
                    786: }
                    787:
                    788: /*
                    789:  * Expand the first encountered brace in pattern, appending the expanded
                    790:  * patterns it yielded to the *patternsp array.
                    791:  *
                    792:  * Returns 0 on success or -1 on allocation failure.
                    793:  *
                    794:  * Signals whether expansion was performed via *expanded and whether
                    795:  * pattern was invalid via *invalid.
                    796:  */
                    797: static int
                    798: brace_expand_one(const char *pattern, char ***patternsp, size_t *npatternsp,
                    799:     int *expanded, int *invalid)
                    800: {
                    801:        int i;
                    802:        int in_bracket, brace_start, brace_end, brace_level;
                    803:        int sel_start, sel_end;
                    804:
                    805:        *invalid = *expanded = 0;
                    806:
                    807:        if (find_brace(pattern, &brace_start, &brace_end) != 0) {
                    808:                *invalid = 1;
                    809:                return 0;
                    810:        } else if (brace_start == -1)
                    811:                return 0;
                    812:
                    813:        in_bracket = brace_level = 0;
                    814:        for (i = sel_start = brace_start + 1; i < brace_end; i++) {
                    815:                switch (pattern[i]) {
                    816:                case '{':
                    817:                        if (in_bracket)
                    818:                                break;
                    819:                        brace_level++;
                    820:                        break;
                    821:                case '}':
                    822:                        if (in_bracket)
                    823:                                break;
                    824:                        brace_level--;
                    825:                        break;
                    826:                case '[':
                    827:                        in_bracket = 1;
                    828:                        break;
                    829:                case ']':
                    830:                        in_bracket = 0;
                    831:                        break;
                    832:                case '\\':
                    833:                        if (i < brace_end - 1)
                    834:                                i++; /* skip */
                    835:                        break;
                    836:                }
                    837:                if (pattern[i] == ',' || i == brace_end - 1) {
                    838:                        if (in_bracket || brace_level > 0)
                    839:                                continue;
                    840:                        /* End of a selection, emit an expanded pattern */
                    841:
                    842:                        /* Adjust end index for last selection */
                    843:                        sel_end = (i == brace_end - 1) ? brace_end : i;
                    844:                        if (emit_expansion(pattern, brace_start, brace_end,
                    845:                            sel_start, sel_end, patternsp, npatternsp) != 0)
                    846:                                return -1;
                    847:                        /* move on to the next selection */
                    848:                        sel_start = i + 1;
                    849:                        continue;
                    850:                }
                    851:        }
                    852:        if (in_bracket || brace_level > 0) {
                    853:                *invalid = 1;
                    854:                return 0;
                    855:        }
                    856:        /* success */
                    857:        *expanded = 1;
                    858:        return 0;
                    859: }
                    860:
                    861: /* Expand braces from pattern. Returns 0 on success, -1 on failure */
                    862: static int
                    863: brace_expand(const char *pattern, char ***patternsp, size_t *npatternsp)
                    864: {
                    865:        char *cp, *cp2, **active = NULL, **done = NULL;
                    866:        size_t i, nactive = 0, ndone = 0;
                    867:        int ret = -1, invalid = 0, expanded = 0;
                    868:
                    869:        *patternsp = NULL;
                    870:        *npatternsp = 0;
                    871:
                    872:        /* Start the worklist with the original pattern */
                    873:        if ((cp = strdup(pattern)) == NULL)
                    874:                return -1;
                    875:        if (append(cp, &active, &nactive) != 0) {
                    876:                free(cp);
                    877:                return -1;
                    878:        }
                    879:        while (nactive > 0) {
                    880:                cp = active[nactive - 1];
                    881:                nactive--;
                    882:                if (brace_expand_one(cp, &active, &nactive,
                    883:                    &expanded, &invalid) == -1) {
                    884:                        free(cp);
                    885:                        goto fail;
                    886:                }
                    887:                if (invalid)
1.213     djm       888:                        fatal_f("invalid brace pattern \"%s\"", cp);
1.204     djm       889:                if (expanded) {
                    890:                        /*
                    891:                         * Current entry expanded to new entries on the
                    892:                         * active list; discard the progenitor pattern.
                    893:                         */
                    894:                        free(cp);
                    895:                        continue;
                    896:                }
                    897:                /*
                    898:                 * Pattern did not expand; append the finename component to
                    899:                 * the completed list
                    900:                 */
                    901:                if ((cp2 = strrchr(cp, '/')) != NULL)
                    902:                        *cp2++ = '\0';
                    903:                else
                    904:                        cp2 = cp;
                    905:                if (append(xstrdup(cp2), &done, &ndone) != 0) {
                    906:                        free(cp);
                    907:                        goto fail;
                    908:                }
                    909:                free(cp);
                    910:        }
                    911:        /* success */
                    912:        *patternsp = done;
                    913:        *npatternsp = ndone;
                    914:        done = NULL;
                    915:        ndone = 0;
                    916:        ret = 0;
                    917:  fail:
                    918:        for (i = 0; i < nactive; i++)
                    919:                free(active[i]);
                    920:        free(active);
                    921:        for (i = 0; i < ndone; i++)
                    922:                free(done[i]);
                    923:        free(done);
                    924:        return ret;
                    925: }
                    926:
1.216     djm       927: static struct sftp_conn *
1.219     djm       928: do_sftp_connect(char *host, char *user, int port, char *sftp_direct,
                    929:    int *reminp, int *remoutp, int *pidp)
1.216     djm       930: {
                    931:        if (sftp_direct == NULL) {
1.231     naddy     932:                if (do_cmd(ssh_program, host, user, port, 1, "sftp",
1.219     djm       933:                    reminp, remoutp, pidp) < 0)
1.216     djm       934:                        return NULL;
                    935:
                    936:        } else {
                    937:                args.list = NULL;
                    938:                addargs(&args, "sftp-server");
1.231     naddy     939:                if (do_cmd(sftp_direct, host, NULL, -1, 0, "sftp",
1.219     djm       940:                    reminp, remoutp, pidp) < 0)
1.216     djm       941:                        return NULL;
                    942:        }
1.219     djm       943:        return do_init(*reminp, *remoutp, 32768, 64, limit_kbps);
1.216     djm       944: }
                    945:
1.1       deraadt   946: void
1.216     djm       947: toremote(int argc, char **argv, enum scp_mode_e mode, char *sftp_direct)
1.1       deraadt   948: {
1.193     millert   949:        char *suser = NULL, *host = NULL, *src = NULL;
                    950:        char *bp, *tuser, *thost, *targ;
                    951:        int sport = -1, tport = -1;
1.219     djm       952:        struct sftp_conn *conn = NULL, *conn2 = NULL;
1.129     djm       953:        arglist alist;
1.219     djm       954:        int i, r, status;
1.168     djm       955:        u_int j;
1.129     djm       956:
                    957:        memset(&alist, '\0', sizeof(alist));
                    958:        alist.list = NULL;
1.1       deraadt   959:
1.193     millert   960:        /* Parse target */
1.194     millert   961:        r = parse_scp_uri(argv[argc - 1], &tuser, &thost, &tport, &targ);
                    962:        if (r == -1) {
                    963:                fmprintf(stderr, "%s: invalid uri\n", argv[argc - 1]);
                    964:                ++errs;
                    965:                goto out;
                    966:        }
1.193     millert   967:        if (r != 0) {
                    968:                if (parse_user_host_path(argv[argc - 1], &tuser, &thost,
1.194     millert   969:                    &targ) == -1) {
                    970:                        fmprintf(stderr, "%s: invalid target\n", argv[argc - 1]);
                    971:                        ++errs;
1.193     millert   972:                        goto out;
1.194     millert   973:                }
1.129     djm       974:        }
                    975:
1.193     millert   976:        /* Parse source files */
1.1       deraadt   977:        for (i = 0; i < argc - 1; i++) {
1.193     millert   978:                free(suser);
                    979:                free(host);
                    980:                free(src);
1.194     millert   981:                r = parse_scp_uri(argv[i], &suser, &host, &sport, &src);
                    982:                if (r == -1) {
                    983:                        fmprintf(stderr, "%s: invalid uri\n", argv[i]);
                    984:                        ++errs;
                    985:                        continue;
                    986:                }
                    987:                if (r != 0) {
1.193     millert   988:                        parse_user_host_path(argv[i], &suser, &host, &src);
1.194     millert   989:                }
1.193     millert   990:                if (suser != NULL && !okname(suser)) {
                    991:                        ++errs;
                    992:                        continue;
                    993:                }
                    994:                if (host && throughlocal) {     /* extended remote to remote */
1.219     djm       995:                        if (mode == MODE_SFTP) {
                    996:                                if (remin == -1) {
                    997:                                        /* Connect to dest now */
                    998:                                        conn = do_sftp_connect(thost, tuser,
                    999:                                            tport, sftp_direct,
                   1000:                                            &remin, &remout, &do_cmd_pid);
                   1001:                                        if (conn == NULL) {
                   1002:                                                fatal("Unable to open "
                   1003:                                                    "destination connection");
                   1004:                                        }
                   1005:                                        debug3_f("origin in %d out %d pid %ld",
                   1006:                                            remin, remout, (long)do_cmd_pid);
                   1007:                                }
                   1008:                                /*
                   1009:                                 * XXX remember suser/host/sport and only
                   1010:                                 * reconnect if they change between arguments.
                   1011:                                 * would save reconnections for cases like
                   1012:                                 * scp -3 hosta:/foo hosta:/bar hostb:
                   1013:                                 */
                   1014:                                /* Connect to origin now */
                   1015:                                conn2 = do_sftp_connect(host, suser,
                   1016:                                    sport, sftp_direct,
                   1017:                                    &remin2, &remout2, &do_cmd_pid2);
                   1018:                                if (conn2 == NULL) {
                   1019:                                        fatal("Unable to open "
                   1020:                                            "source connection");
                   1021:                                }
                   1022:                                debug3_f("destination in %d out %d pid %ld",
                   1023:                                    remin2, remout2, (long)do_cmd_pid2);
1.228     djm      1024:                                throughlocal_sftp(conn2, conn, src, targ);
1.219     djm      1025:                                (void) close(remin2);
                   1026:                                (void) close(remout2);
                   1027:                                remin2 = remout2 = -1;
                   1028:                                if (waitpid(do_cmd_pid2, &status, 0) == -1)
                   1029:                                        ++errs;
                   1030:                                else if (!WIFEXITED(status) ||
                   1031:                                    WEXITSTATUS(status) != 0)
                   1032:                                        ++errs;
                   1033:                                do_cmd_pid2 = -1;
                   1034:                                continue;
                   1035:                        } else {
                   1036:                                xasprintf(&bp, "%s -f %s%s", cmd,
                   1037:                                    *src == '-' ? "-- " : "", src);
1.231     naddy    1038:                                if (do_cmd(ssh_program, host, suser, sport, 0,
1.219     djm      1039:                                    bp, &remin, &remout, &do_cmd_pid) < 0)
                   1040:                                        exit(1);
                   1041:                                free(bp);
                   1042:                                xasprintf(&bp, "%s -t %s%s", cmd,
                   1043:                                    *targ == '-' ? "-- " : "", targ);
                   1044:                                if (do_cmd2(thost, tuser, tport, bp,
                   1045:                                    remin, remout) < 0)
                   1046:                                        exit(1);
                   1047:                                free(bp);
                   1048:                                (void) close(remin);
                   1049:                                (void) close(remout);
                   1050:                                remin = remout = -1;
                   1051:                        }
1.193     millert  1052:                } else if (host) {      /* standard remote to remote */
1.215     djm      1053:                        /*
                   1054:                         * Second remote user is passed to first remote side
                   1055:                         * via scp command-line. Ensure it contains no obvious
                   1056:                         * shell characters.
                   1057:                         */
                   1058:                        if (tuser != NULL && !okname(tuser)) {
                   1059:                                ++errs;
                   1060:                                continue;
                   1061:                        }
1.193     millert  1062:                        if (tport != -1 && tport != SSH_DEFAULT_PORT) {
                   1063:                                /* This would require the remote support URIs */
                   1064:                                fatal("target port not supported with two "
1.232     naddy    1065:                                    "remote hosts and the -R option");
1.193     millert  1066:                        }
                   1067:
1.129     djm      1068:                        freeargs(&alist);
                   1069:                        addargs(&alist, "%s", ssh_program);
                   1070:                        addargs(&alist, "-x");
1.168     djm      1071:                        addargs(&alist, "-oClearAllForwardings=yes");
1.129     djm      1072:                        addargs(&alist, "-n");
1.168     djm      1073:                        for (j = 0; j < remote_remote_args.num; j++) {
                   1074:                                addargs(&alist, "%s",
                   1075:                                    remote_remote_args.list[j]);
                   1076:                        }
1.193     millert  1077:
                   1078:                        if (sport != -1) {
                   1079:                                addargs(&alist, "-p");
                   1080:                                addargs(&alist, "%d", sport);
                   1081:                        }
                   1082:                        if (suser) {
1.129     djm      1083:                                addargs(&alist, "-l");
                   1084:                                addargs(&alist, "%s", suser);
1.23      markus   1085:                        }
1.165     guenther 1086:                        addargs(&alist, "--");
1.129     djm      1087:                        addargs(&alist, "%s", host);
                   1088:                        addargs(&alist, "%s", cmd);
                   1089:                        addargs(&alist, "%s", src);
                   1090:                        addargs(&alist, "%s%s%s:%s",
                   1091:                            tuser ? tuser : "", tuser ? "@" : "",
                   1092:                            thost, targ);
                   1093:                        if (do_local_cmd(&alist) != 0)
1.109     markus   1094:                                errs = 1;
1.18      markus   1095:                } else {        /* local to remote */
1.216     djm      1096:                        if (mode == MODE_SFTP) {
                   1097:                                if (remin == -1) {
                   1098:                                        /* Connect to remote now */
                   1099:                                        conn = do_sftp_connect(thost, tuser,
1.219     djm      1100:                                            tport, sftp_direct,
                   1101:                                            &remin, &remout, &do_cmd_pid);
1.216     djm      1102:                                        if (conn == NULL) {
                   1103:                                                fatal("Unable to open sftp "
                   1104:                                                    "connection");
                   1105:                                        }
                   1106:                                }
                   1107:
                   1108:                                /* The protocol */
1.228     djm      1109:                                source_sftp(1, argv[i], targ, conn);
1.216     djm      1110:                                continue;
                   1111:                        }
                   1112:                        /* SCP */
1.1       deraadt  1113:                        if (remin == -1) {
1.171     djm      1114:                                xasprintf(&bp, "%s -t %s%s", cmd,
                   1115:                                    *targ == '-' ? "-- " : "", targ);
1.231     naddy    1116:                                if (do_cmd(ssh_program, thost, tuser, tport, 0,
                   1117:                                    bp, &remin, &remout, &do_cmd_pid) < 0)
1.18      markus   1118:                                        exit(1);
1.1       deraadt  1119:                                if (response() < 0)
                   1120:                                        exit(1);
1.173     djm      1121:                                free(bp);
1.1       deraadt  1122:                        }
1.18      markus   1123:                        source(1, argv + i);
1.1       deraadt  1124:                }
                   1125:        }
1.193     millert  1126: out:
1.228     djm      1127:        if (mode == MODE_SFTP)
1.216     djm      1128:                free(conn);
1.193     millert  1129:        free(tuser);
                   1130:        free(thost);
                   1131:        free(targ);
                   1132:        free(suser);
                   1133:        free(host);
                   1134:        free(src);
1.1       deraadt  1135: }
                   1136:
                   1137: void
1.216     djm      1138: tolocal(int argc, char **argv, enum scp_mode_e mode, char *sftp_direct)
1.1       deraadt  1139: {
1.193     millert  1140:        char *bp, *host = NULL, *src = NULL, *suser = NULL;
1.129     djm      1141:        arglist alist;
1.216     djm      1142:        struct sftp_conn *conn = NULL;
1.193     millert  1143:        int i, r, sport = -1;
1.129     djm      1144:
                   1145:        memset(&alist, '\0', sizeof(alist));
                   1146:        alist.list = NULL;
1.1       deraadt  1147:
                   1148:        for (i = 0; i < argc - 1; i++) {
1.193     millert  1149:                free(suser);
                   1150:                free(host);
                   1151:                free(src);
1.194     millert  1152:                r = parse_scp_uri(argv[i], &suser, &host, &sport, &src);
1.193     millert  1153:                if (r == -1) {
1.194     millert  1154:                        fmprintf(stderr, "%s: invalid uri\n", argv[i]);
1.193     millert  1155:                        ++errs;
                   1156:                        continue;
                   1157:                }
                   1158:                if (r != 0)
                   1159:                        parse_user_host_path(argv[i], &suser, &host, &src);
                   1160:                if (suser != NULL && !okname(suser)) {
                   1161:                        ++errs;
                   1162:                        continue;
                   1163:                }
                   1164:                if (!host) {    /* Local to local. */
1.129     djm      1165:                        freeargs(&alist);
                   1166:                        addargs(&alist, "%s", _PATH_CP);
                   1167:                        if (iamrecursive)
                   1168:                                addargs(&alist, "-r");
                   1169:                        if (pflag)
                   1170:                                addargs(&alist, "-p");
1.165     guenther 1171:                        addargs(&alist, "--");
1.129     djm      1172:                        addargs(&alist, "%s", argv[i]);
                   1173:                        addargs(&alist, "%s", argv[argc-1]);
                   1174:                        if (do_local_cmd(&alist))
1.1       deraadt  1175:                                ++errs;
                   1176:                        continue;
                   1177:                }
1.193     millert  1178:                /* Remote to local. */
1.216     djm      1179:                if (mode == MODE_SFTP) {
1.219     djm      1180:                        conn = do_sftp_connect(host, suser, sport,
                   1181:                            sftp_direct, &remin, &remout, &do_cmd_pid);
1.216     djm      1182:                        if (conn == NULL) {
1.236     djm      1183:                                error("sftp connection failed");
1.216     djm      1184:                                ++errs;
                   1185:                                continue;
                   1186:                        }
                   1187:
                   1188:                        /* The protocol */
                   1189:                        sink_sftp(1, argv[argc - 1], src, conn);
                   1190:
                   1191:                        free(conn);
                   1192:                        (void) close(remin);
                   1193:                        (void) close(remout);
                   1194:                        remin = remout = -1;
                   1195:                        continue;
                   1196:                }
                   1197:                /* SCP */
1.171     djm      1198:                xasprintf(&bp, "%s -f %s%s",
                   1199:                    cmd, *src == '-' ? "-- " : "", src);
1.231     naddy    1200:                if (do_cmd(ssh_program, host, suser, sport, 0, bp,
1.219     djm      1201:                    &remin, &remout, &do_cmd_pid) < 0) {
1.173     djm      1202:                        free(bp);
1.18      markus   1203:                        ++errs;
                   1204:                        continue;
1.1       deraadt  1205:                }
1.173     djm      1206:                free(bp);
1.202     djm      1207:                sink(1, argv + argc - 1, src);
1.18      markus   1208:                (void) close(remin);
1.1       deraadt  1209:                remin = remout = -1;
                   1210:        }
1.193     millert  1211:        free(suser);
                   1212:        free(host);
                   1213:        free(src);
1.1       deraadt  1214: }
                   1215:
1.228     djm      1216: /* Prepare remote path, handling ~ by assuming cwd is the homedir */
1.226     djm      1217: static char *
1.228     djm      1218: prepare_remote_path(struct sftp_conn *conn, const char *path)
1.226     djm      1219: {
1.228     djm      1220:        /* Handle ~ prefixed paths */
                   1221:        if (*path != '~')
                   1222:                return xstrdup(path);
                   1223:        if (*path == '\0' || strcmp(path, "~") == 0)
                   1224:                return xstrdup(".");
                   1225:        if (strncmp(path, "~/", 2) == 0)
                   1226:                return xstrdup(path + 2);
1.227     djm      1227:        if (can_expand_path(conn))
                   1228:                return do_expand_path(conn, path);
1.228     djm      1229:        /* No protocol extension */
1.237     djm      1230:        error("server expand-path extension is required "
                   1231:            "for ~user paths in SFTP mode");
1.228     djm      1232:        return NULL;
1.226     djm      1233: }
                   1234:
1.1       deraadt  1235: void
1.228     djm      1236: source_sftp(int argc, char *src, char *targ, struct sftp_conn *conn)
1.216     djm      1237: {
                   1238:        char *target = NULL, *filename = NULL, *abs_dst = NULL;
                   1239:        int target_is_dir;
                   1240:
                   1241:        if ((filename = basename(src)) == NULL)
                   1242:                fatal("basename %s: %s", src, strerror(errno));
                   1243:
                   1244:        /*
                   1245:         * No need to glob here - the local shell already took care of
                   1246:         * the expansions
                   1247:         */
1.228     djm      1248:        if ((target = prepare_remote_path(conn, targ)) == NULL)
1.226     djm      1249:                cleanup_exit(255);
1.216     djm      1250:        target_is_dir = remote_is_dir(conn, target);
                   1251:        if (targetshouldbedirectory && !target_is_dir) {
                   1252:                fatal("Target is not a directory, but more files selected "
                   1253:                    "for upload");
                   1254:        }
                   1255:        if (target_is_dir)
                   1256:                abs_dst = path_append(target, filename);
                   1257:        else {
                   1258:                abs_dst = target;
                   1259:                target = NULL;
                   1260:        }
                   1261:        debug3_f("copying local %s to remote %s", src, abs_dst);
                   1262:
                   1263:        if (local_is_dir(src) && iamrecursive) {
1.220     djm      1264:                if (upload_dir(conn, src, abs_dst, pflag,
1.221     djm      1265:                    SFTP_PROGRESS_ONLY, 0, 0, 1) != 0) {
1.234     djm      1266:                        error("failed to upload directory %s to %s",
1.216     djm      1267:                                src, abs_dst);
1.234     djm      1268:                        errs = 1;
1.216     djm      1269:                }
1.234     djm      1270:        } else if (do_upload(conn, src, abs_dst, pflag, 0, 0) != 0) {
                   1271:                error("failed to upload file %s to %s", src, abs_dst);
                   1272:                errs = 1;
                   1273:        }
1.216     djm      1274:
                   1275:        free(abs_dst);
                   1276:        free(target);
                   1277: }
                   1278:
                   1279: void
1.104     djm      1280: source(int argc, char **argv)
1.1       deraadt  1281: {
                   1282:        struct stat stb;
                   1283:        static BUF buffer;
                   1284:        BUF *bp;
1.163     dtucker  1285:        off_t i, statbytes;
1.180     djm      1286:        size_t amt, nr;
1.125     dtucker  1287:        int fd = -1, haderr, indx;
1.206     dtucker  1288:        char *last, *name, buf[PATH_MAX + 128], encname[PATH_MAX];
1.65      deraadt  1289:        int len;
1.1       deraadt  1290:
                   1291:        for (indx = 0; indx < argc; ++indx) {
1.18      markus   1292:                name = argv[indx];
1.11      aaron    1293:                statbytes = 0;
1.65      deraadt  1294:                len = strlen(name);
                   1295:                while (len > 1 && name[len-1] == '/')
                   1296:                        name[--len] = '\0';
1.205     deraadt  1297:                if ((fd = open(name, O_RDONLY|O_NONBLOCK, 0)) == -1)
1.158     dtucker  1298:                        goto syserr;
1.85      markus   1299:                if (strchr(name, '\n') != NULL) {
1.158     dtucker  1300:                        strnvis(encname, name, sizeof(encname), VIS_NL);
                   1301:                        name = encname;
1.85      markus   1302:                }
1.205     deraadt  1303:                if (fstat(fd, &stb) == -1) {
1.1       deraadt  1304: syserr:                        run_err("%s: %s", name, strerror(errno));
                   1305:                        goto next;
                   1306:                }
1.163     dtucker  1307:                if (stb.st_size < 0) {
                   1308:                        run_err("%s: %s", name, "Negative file size");
                   1309:                        goto next;
                   1310:                }
1.157     djm      1311:                unset_nonblock(fd);
1.1       deraadt  1312:                switch (stb.st_mode & S_IFMT) {
                   1313:                case S_IFREG:
                   1314:                        break;
                   1315:                case S_IFDIR:
                   1316:                        if (iamrecursive) {
                   1317:                                rsource(name, &stb);
                   1318:                                goto next;
                   1319:                        }
                   1320:                        /* FALLTHROUGH */
                   1321:                default:
                   1322:                        run_err("%s: not a regular file", name);
                   1323:                        goto next;
                   1324:                }
                   1325:                if ((last = strrchr(name, '/')) == NULL)
                   1326:                        last = name;
                   1327:                else
                   1328:                        ++last;
1.11      aaron    1329:                curfile = last;
1.1       deraadt  1330:                if (pflag) {
1.176     guenther 1331:                        if (do_times(remout, verbose_mode, &stb) < 0)
1.1       deraadt  1332:                                goto next;
                   1333:                }
                   1334: #define        FILEMODEMASK    (S_ISUID|S_ISGID|S_IRWXU|S_IRWXG|S_IRWXO)
1.61      markus   1335:                snprintf(buf, sizeof buf, "C%04o %lld %s\n",
1.47      markus   1336:                    (u_int) (stb.st_mode & FILEMODEMASK),
1.62      markus   1337:                    (long long)stb.st_size, last);
1.186     schwarze 1338:                if (verbose_mode)
                   1339:                        fmprintf(stderr, "Sending file modes: %s", buf);
1.107     deraadt  1340:                (void) atomicio(vwrite, remout, buf, strlen(buf));
1.1       deraadt  1341:                if (response() < 0)
                   1342:                        goto next;
1.161     djm      1343:                if ((bp = allocbuf(&buffer, fd, COPY_BUFLEN)) == NULL) {
1.127     deraadt  1344: next:                  if (fd != -1) {
                   1345:                                (void) close(fd);
                   1346:                                fd = -1;
                   1347:                        }
1.1       deraadt  1348:                        continue;
                   1349:                }
1.97      fgsch    1350:                if (showprogress)
                   1351:                        start_progress_meter(curfile, stb.st_size, &statbytes);
1.161     djm      1352:                set_nonblock(remout);
1.1       deraadt  1353:                for (haderr = i = 0; i < stb.st_size; i += bp->cnt) {
                   1354:                        amt = bp->cnt;
1.163     dtucker  1355:                        if (i + (off_t)amt > stb.st_size)
1.1       deraadt  1356:                                amt = stb.st_size - i;
                   1357:                        if (!haderr) {
1.180     djm      1358:                                if ((nr = atomicio(read, fd,
                   1359:                                    bp->buf, amt)) != amt) {
1.122     avsm     1360:                                        haderr = errno;
1.180     djm      1361:                                        memset(bp->buf + nr, 0, amt - nr);
                   1362:                                }
1.1       deraadt  1363:                        }
1.161     djm      1364:                        /* Keep writing after error to retain sync */
                   1365:                        if (haderr) {
                   1366:                                (void)atomicio(vwrite, remout, bp->buf, amt);
1.180     djm      1367:                                memset(bp->buf, 0, amt);
1.161     djm      1368:                                continue;
1.1       deraadt  1369:                        }
1.167     djm      1370:                        if (atomicio6(vwrite, remout, bp->buf, amt, scpio,
1.161     djm      1371:                            &statbytes) != amt)
                   1372:                                haderr = errno;
1.1       deraadt  1373:                }
1.161     djm      1374:                unset_nonblock(remout);
1.4       aaron    1375:
1.127     deraadt  1376:                if (fd != -1) {
1.205     deraadt  1377:                        if (close(fd) == -1 && !haderr)
1.127     deraadt  1378:                                haderr = errno;
                   1379:                        fd = -1;
                   1380:                }
1.1       deraadt  1381:                if (!haderr)
1.107     deraadt  1382:                        (void) atomicio(vwrite, remout, "", 1);
1.1       deraadt  1383:                else
                   1384:                        run_err("%s: %s", name, strerror(haderr));
1.18      markus   1385:                (void) response();
1.185     dtucker  1386:                if (showprogress)
                   1387:                        stop_progress_meter();
1.1       deraadt  1388:        }
                   1389: }
                   1390:
                   1391: void
1.104     djm      1392: rsource(char *name, struct stat *statp)
1.1       deraadt  1393: {
                   1394:        DIR *dirp;
                   1395:        struct dirent *dp;
1.181     deraadt  1396:        char *last, *vect[1], path[PATH_MAX];
1.1       deraadt  1397:
                   1398:        if (!(dirp = opendir(name))) {
                   1399:                run_err("%s: %s", name, strerror(errno));
                   1400:                return;
                   1401:        }
                   1402:        last = strrchr(name, '/');
1.183     mmcc     1403:        if (last == NULL)
1.1       deraadt  1404:                last = name;
                   1405:        else
                   1406:                last++;
                   1407:        if (pflag) {
1.176     guenther 1408:                if (do_times(remout, verbose_mode, statp) < 0) {
1.1       deraadt  1409:                        closedir(dirp);
                   1410:                        return;
                   1411:                }
                   1412:        }
1.55      deraadt  1413:        (void) snprintf(path, sizeof path, "D%04o %d %.1024s\n",
1.47      markus   1414:            (u_int) (statp->st_mode & FILEMODEMASK), 0, last);
1.18      markus   1415:        if (verbose_mode)
1.186     schwarze 1416:                fmprintf(stderr, "Entering directory: %s", path);
1.107     deraadt  1417:        (void) atomicio(vwrite, remout, path, strlen(path));
1.1       deraadt  1418:        if (response() < 0) {
                   1419:                closedir(dirp);
                   1420:                return;
                   1421:        }
1.63      stevesk  1422:        while ((dp = readdir(dirp)) != NULL) {
1.1       deraadt  1423:                if (dp->d_ino == 0)
                   1424:                        continue;
                   1425:                if (!strcmp(dp->d_name, ".") || !strcmp(dp->d_name, ".."))
                   1426:                        continue;
                   1427:                if (strlen(name) + 1 + strlen(dp->d_name) >= sizeof(path) - 1) {
                   1428:                        run_err("%s/%s: name too long", name, dp->d_name);
                   1429:                        continue;
                   1430:                }
1.55      deraadt  1431:                (void) snprintf(path, sizeof path, "%s/%s", name, dp->d_name);
1.1       deraadt  1432:                vect[0] = path;
                   1433:                source(1, vect);
                   1434:        }
1.18      markus   1435:        (void) closedir(dirp);
1.107     deraadt  1436:        (void) atomicio(vwrite, remout, "E\n", 2);
1.18      markus   1437:        (void) response();
1.1       deraadt  1438: }
                   1439:
1.216     djm      1440: void
                   1441: sink_sftp(int argc, char *dst, const char *src, struct sftp_conn *conn)
                   1442: {
                   1443:        char *abs_src = NULL;
                   1444:        char *abs_dst = NULL;
                   1445:        glob_t g;
1.228     djm      1446:        char *filename, *tmp = NULL;
1.216     djm      1447:        int i, r, err = 0;
                   1448:
1.226     djm      1449:        memset(&g, 0, sizeof(g));
1.216     djm      1450:        /*
                   1451:         * Here, we need remote glob as SFTP can not depend on remote shell
                   1452:         * expansions
                   1453:         */
                   1454:
1.228     djm      1455:        if ((abs_src = prepare_remote_path(conn, src)) == NULL) {
1.226     djm      1456:                err = -1;
                   1457:                goto out;
                   1458:        }
1.216     djm      1459:
                   1460:        debug3_f("copying remote %s to local %s", abs_src, dst);
                   1461:        if ((r = remote_glob(conn, abs_src, GLOB_MARK, NULL, &g)) != 0) {
                   1462:                if (r == GLOB_NOSPACE)
1.236     djm      1463:                        error("%s: too many glob matches", abs_src);
1.216     djm      1464:                else
1.236     djm      1465:                        error("%s: %s", abs_src, strerror(ENOENT));
1.216     djm      1466:                err = -1;
                   1467:                goto out;
                   1468:        }
                   1469:
                   1470:        if (g.gl_matchc > 1 && !local_is_dir(dst)) {
                   1471:                error("Multiple files match pattern, but destination "
                   1472:                    "\"%s\" is not a directory", dst);
                   1473:                err = -1;
                   1474:                goto out;
                   1475:        }
                   1476:
                   1477:        for (i = 0; g.gl_pathv[i] && !interrupted; i++) {
                   1478:                tmp = xstrdup(g.gl_pathv[i]);
                   1479:                if ((filename = basename(tmp)) == NULL) {
                   1480:                        error("basename %s: %s", tmp, strerror(errno));
                   1481:                        err = -1;
                   1482:                        goto out;
                   1483:                }
                   1484:
                   1485:                if (local_is_dir(dst))
                   1486:                        abs_dst = path_append(dst, filename);
                   1487:                else
                   1488:                        abs_dst = xstrdup(dst);
                   1489:
                   1490:                debug("Fetching %s to %s\n", g.gl_pathv[i], abs_dst);
                   1491:                if (globpath_is_dir(g.gl_pathv[i]) && iamrecursive) {
                   1492:                        if (download_dir(conn, g.gl_pathv[i], abs_dst, NULL,
1.221     djm      1493:                            pflag, SFTP_PROGRESS_ONLY, 0, 0, 1) == -1)
1.216     djm      1494:                                err = -1;
                   1495:                } else {
                   1496:                        if (do_download(conn, g.gl_pathv[i], abs_dst, NULL,
                   1497:                            pflag, 0, 0) == -1)
                   1498:                                err = -1;
                   1499:                }
                   1500:                free(abs_dst);
                   1501:                abs_dst = NULL;
1.217     dtucker  1502:                free(tmp);
                   1503:                tmp = NULL;
1.216     djm      1504:        }
                   1505:
                   1506: out:
                   1507:        free(abs_src);
1.217     dtucker  1508:        free(tmp);
1.216     djm      1509:        globfree(&g);
1.235     djm      1510:        if (err == -1)
1.234     djm      1511:                errs = 1;
1.216     djm      1512: }
                   1513:
                   1514:
1.189     millert  1515: #define TYPE_OVERFLOW(type, val) \
                   1516:        ((sizeof(type) == 4 && (val) > INT32_MAX) || \
                   1517:         (sizeof(type) == 8 && (val) > INT64_MAX) || \
                   1518:         (sizeof(type) != 4 && sizeof(type) != 8))
                   1519:
1.1       deraadt  1520: void
1.202     djm      1521: sink(int argc, char **argv, const char *src)
1.1       deraadt  1522: {
                   1523:        static BUF buffer;
                   1524:        struct stat stb;
                   1525:        BUF *bp;
1.122     avsm     1526:        off_t i;
1.124     djm      1527:        size_t j, count;
1.140     deraadt  1528:        int amt, exists, first, ofd;
                   1529:        mode_t mode, omode, mask;
1.97      fgsch    1530:        off_t size, statbytes;
1.176     guenther 1531:        unsigned long long ull;
1.209     djm      1532:        int setimes, targisdir, wrerr;
1.186     schwarze 1533:        char ch, *cp, *np, *targ, *why, *vect[1], buf[2048], visbuf[2048];
1.204     djm      1534:        char **patterns = NULL;
                   1535:        size_t n, npatterns = 0;
1.40      markus   1536:        struct timeval tv[2];
1.1       deraadt  1537:
1.66      stevesk  1538: #define        atime   tv[0]
                   1539: #define        mtime   tv[1]
1.118     deraadt  1540: #define        SCREWUP(str)    { why = str; goto screwup; }
1.1       deraadt  1541:
1.189     millert  1542:        if (TYPE_OVERFLOW(time_t, 0) || TYPE_OVERFLOW(off_t, 0))
                   1543:                SCREWUP("Unexpected off_t/time_t size");
                   1544:
1.1       deraadt  1545:        setimes = targisdir = 0;
                   1546:        mask = umask(0);
                   1547:        if (!pflag)
1.18      markus   1548:                (void) umask(mask);
1.1       deraadt  1549:        if (argc != 1) {
                   1550:                run_err("ambiguous target");
                   1551:                exit(1);
                   1552:        }
                   1553:        targ = *argv;
                   1554:        if (targetshouldbedirectory)
                   1555:                verifydir(targ);
1.18      markus   1556:
1.107     deraadt  1557:        (void) atomicio(vwrite, remout, "", 1);
1.1       deraadt  1558:        if (stat(targ, &stb) == 0 && S_ISDIR(stb.st_mode))
                   1559:                targisdir = 1;
1.202     djm      1560:        if (src != NULL && !iamrecursive && !Tflag) {
                   1561:                /*
                   1562:                 * Prepare to try to restrict incoming filenames to match
                   1563:                 * the requested destination file glob.
                   1564:                 */
1.204     djm      1565:                if (brace_expand(src, &patterns, &npatterns) != 0)
1.213     djm      1566:                        fatal_f("could not expand pattern");
1.202     djm      1567:        }
1.1       deraadt  1568:        for (first = 1;; first = 0) {
                   1569:                cp = buf;
1.122     avsm     1570:                if (atomicio(read, remin, cp, 1) != 1)
1.204     djm      1571:                        goto done;
1.1       deraadt  1572:                if (*cp++ == '\n')
                   1573:                        SCREWUP("unexpected <newline>");
                   1574:                do {
1.30      deraadt  1575:                        if (atomicio(read, remin, &ch, sizeof(ch)) != sizeof(ch))
1.1       deraadt  1576:                                SCREWUP("lost connection");
                   1577:                        *cp++ = ch;
                   1578:                } while (cp < &buf[sizeof(buf) - 1] && ch != '\n');
                   1579:                *cp = 0;
1.114     markus   1580:                if (verbose_mode)
1.186     schwarze 1581:                        fmprintf(stderr, "Sink: %s", buf);
1.1       deraadt  1582:
                   1583:                if (buf[0] == '\01' || buf[0] == '\02') {
1.186     schwarze 1584:                        if (iamremote == 0) {
                   1585:                                (void) snmprintf(visbuf, sizeof(visbuf),
                   1586:                                    NULL, "%s", buf + 1);
1.107     deraadt  1587:                                (void) atomicio(vwrite, STDERR_FILENO,
1.186     schwarze 1588:                                    visbuf, strlen(visbuf));
                   1589:                        }
1.1       deraadt  1590:                        if (buf[0] == '\02')
                   1591:                                exit(1);
                   1592:                        ++errs;
                   1593:                        continue;
                   1594:                }
                   1595:                if (buf[0] == 'E') {
1.107     deraadt  1596:                        (void) atomicio(vwrite, remout, "", 1);
1.204     djm      1597:                        goto done;
1.1       deraadt  1598:                }
                   1599:                if (ch == '\n')
                   1600:                        *--cp = 0;
                   1601:
                   1602:                cp = buf;
                   1603:                if (*cp == 'T') {
                   1604:                        setimes++;
                   1605:                        cp++;
1.176     guenther 1606:                        if (!isdigit((unsigned char)*cp))
                   1607:                                SCREWUP("mtime.sec not present");
                   1608:                        ull = strtoull(cp, &cp, 10);
1.66      stevesk  1609:                        if (!cp || *cp++ != ' ')
1.1       deraadt  1610:                                SCREWUP("mtime.sec not delimited");
1.189     millert  1611:                        if (TYPE_OVERFLOW(time_t, ull))
1.176     guenther 1612:                                setimes = 0;    /* out of range */
                   1613:                        mtime.tv_sec = ull;
1.66      stevesk  1614:                        mtime.tv_usec = strtol(cp, &cp, 10);
1.176     guenther 1615:                        if (!cp || *cp++ != ' ' || mtime.tv_usec < 0 ||
                   1616:                            mtime.tv_usec > 999999)
1.1       deraadt  1617:                                SCREWUP("mtime.usec not delimited");
1.176     guenther 1618:                        if (!isdigit((unsigned char)*cp))
                   1619:                                SCREWUP("atime.sec not present");
                   1620:                        ull = strtoull(cp, &cp, 10);
1.66      stevesk  1621:                        if (!cp || *cp++ != ' ')
1.1       deraadt  1622:                                SCREWUP("atime.sec not delimited");
1.189     millert  1623:                        if (TYPE_OVERFLOW(time_t, ull))
1.176     guenther 1624:                                setimes = 0;    /* out of range */
                   1625:                        atime.tv_sec = ull;
1.66      stevesk  1626:                        atime.tv_usec = strtol(cp, &cp, 10);
1.176     guenther 1627:                        if (!cp || *cp++ != '\0' || atime.tv_usec < 0 ||
                   1628:                            atime.tv_usec > 999999)
1.1       deraadt  1629:                                SCREWUP("atime.usec not delimited");
1.107     deraadt  1630:                        (void) atomicio(vwrite, remout, "", 1);
1.1       deraadt  1631:                        continue;
                   1632:                }
                   1633:                if (*cp != 'C' && *cp != 'D') {
                   1634:                        /*
                   1635:                         * Check for the case "rcp remote:foo\* local:bar".
                   1636:                         * In this case, the line "No match." can be returned
                   1637:                         * by the shell before the rcp command on the remote is
                   1638:                         * executed so the ^Aerror_message convention isn't
                   1639:                         * followed.
                   1640:                         */
                   1641:                        if (first) {
                   1642:                                run_err("%s", cp);
                   1643:                                exit(1);
                   1644:                        }
                   1645:                        SCREWUP("expected control record");
                   1646:                }
                   1647:                mode = 0;
                   1648:                for (++cp; cp < buf + 5; cp++) {
                   1649:                        if (*cp < '0' || *cp > '7')
                   1650:                                SCREWUP("bad mode");
                   1651:                        mode = (mode << 3) | (*cp - '0');
                   1652:                }
1.197     dtucker  1653:                if (!pflag)
                   1654:                        mode &= ~mask;
1.1       deraadt  1655:                if (*cp++ != ' ')
                   1656:                        SCREWUP("mode not delimited");
                   1657:
1.188     millert  1658:                if (!isdigit((unsigned char)*cp))
                   1659:                        SCREWUP("size not present");
                   1660:                ull = strtoull(cp, &cp, 10);
                   1661:                if (!cp || *cp++ != ' ')
1.1       deraadt  1662:                        SCREWUP("size not delimited");
1.189     millert  1663:                if (TYPE_OVERFLOW(off_t, ull))
1.188     millert  1664:                        SCREWUP("size out of range");
                   1665:                size = (off_t)ull;
                   1666:
1.198     djm      1667:                if (*cp == '\0' || strchr(cp, '/') != NULL ||
                   1668:                    strcmp(cp, ".") == 0 || strcmp(cp, "..") == 0) {
1.114     markus   1669:                        run_err("error: unexpected filename: %s", cp);
                   1670:                        exit(1);
                   1671:                }
1.204     djm      1672:                if (npatterns > 0) {
                   1673:                        for (n = 0; n < npatterns; n++) {
                   1674:                                if (fnmatch(patterns[n], cp, 0) == 0)
                   1675:                                        break;
                   1676:                        }
                   1677:                        if (n >= npatterns)
                   1678:                                SCREWUP("filename does not match request");
                   1679:                }
1.1       deraadt  1680:                if (targisdir) {
                   1681:                        static char *namebuf;
1.124     djm      1682:                        static size_t cursize;
1.1       deraadt  1683:                        size_t need;
                   1684:
                   1685:                        need = strlen(targ) + strlen(cp) + 250;
1.55      deraadt  1686:                        if (need > cursize) {
1.173     djm      1687:                                free(namebuf);
1.18      markus   1688:                                namebuf = xmalloc(need);
1.55      deraadt  1689:                                cursize = need;
                   1690:                        }
                   1691:                        (void) snprintf(namebuf, need, "%s%s%s", targ,
1.88      mouring  1692:                            strcmp(targ, "/") ? "/" : "", cp);
1.1       deraadt  1693:                        np = namebuf;
                   1694:                } else
                   1695:                        np = targ;
1.12      aaron    1696:                curfile = cp;
1.1       deraadt  1697:                exists = stat(np, &stb) == 0;
                   1698:                if (buf[0] == 'D') {
                   1699:                        int mod_flag = pflag;
1.114     markus   1700:                        if (!iamrecursive)
                   1701:                                SCREWUP("received directory without -r");
1.1       deraadt  1702:                        if (exists) {
                   1703:                                if (!S_ISDIR(stb.st_mode)) {
                   1704:                                        errno = ENOTDIR;
                   1705:                                        goto bad;
                   1706:                                }
                   1707:                                if (pflag)
1.18      markus   1708:                                        (void) chmod(np, mode);
1.1       deraadt  1709:                        } else {
1.214     djm      1710:                                /* Handle copying from a read-only directory */
1.1       deraadt  1711:                                mod_flag = 1;
1.205     deraadt  1712:                                if (mkdir(np, mode | S_IRWXU) == -1)
1.1       deraadt  1713:                                        goto bad;
                   1714:                        }
1.58      danh     1715:                        vect[0] = xstrdup(np);
1.202     djm      1716:                        sink(1, vect, src);
1.1       deraadt  1717:                        if (setimes) {
                   1718:                                setimes = 0;
1.210     djm      1719:                                (void) utimes(vect[0], tv);
1.1       deraadt  1720:                        }
                   1721:                        if (mod_flag)
1.59      deraadt  1722:                                (void) chmod(vect[0], mode);
1.173     djm      1723:                        free(vect[0]);
1.1       deraadt  1724:                        continue;
                   1725:                }
                   1726:                omode = mode;
1.174     dtucker  1727:                mode |= S_IWUSR;
1.205     deraadt  1728:                if ((ofd = open(np, O_WRONLY|O_CREAT, mode)) == -1) {
1.1       deraadt  1729: bad:                   run_err("%s: %s", np, strerror(errno));
                   1730:                        continue;
                   1731:                }
1.107     deraadt  1732:                (void) atomicio(vwrite, remout, "", 1);
1.161     djm      1733:                if ((bp = allocbuf(&buffer, ofd, COPY_BUFLEN)) == NULL) {
1.18      markus   1734:                        (void) close(ofd);
1.1       deraadt  1735:                        continue;
                   1736:                }
                   1737:                cp = bp->buf;
1.209     djm      1738:                wrerr = 0;
1.7       deraadt  1739:
1.209     djm      1740:                /*
                   1741:                 * NB. do not use run_err() unless immediately followed by
                   1742:                 * exit() below as it may send a spurious reply that might
                   1743:                 * desyncronise us from the peer. Use note_err() instead.
                   1744:                 */
1.12      aaron    1745:                statbytes = 0;
1.97      fgsch    1746:                if (showprogress)
                   1747:                        start_progress_meter(curfile, size, &statbytes);
1.161     djm      1748:                set_nonblock(remin);
                   1749:                for (count = i = 0; i < size; i += bp->cnt) {
                   1750:                        amt = bp->cnt;
1.1       deraadt  1751:                        if (i + amt > size)
                   1752:                                amt = size - i;
                   1753:                        count += amt;
                   1754:                        do {
1.167     djm      1755:                                j = atomicio6(read, remin, cp, amt,
                   1756:                                    scpio, &statbytes);
1.122     avsm     1757:                                if (j == 0) {
1.161     djm      1758:                                        run_err("%s", j != EPIPE ?
                   1759:                                            strerror(errno) :
1.63      stevesk  1760:                                            "dropped connection");
1.1       deraadt  1761:                                        exit(1);
                   1762:                                }
                   1763:                                amt -= j;
                   1764:                                cp += j;
                   1765:                        } while (amt > 0);
1.112     djm      1766:
1.1       deraadt  1767:                        if (count == bp->cnt) {
                   1768:                                /* Keep reading so we stay sync'd up. */
1.209     djm      1769:                                if (!wrerr) {
1.122     avsm     1770:                                        if (atomicio(vwrite, ofd, bp->buf,
                   1771:                                            count) != count) {
1.209     djm      1772:                                                note_err("%s: %s", np,
                   1773:                                                    strerror(errno));
                   1774:                                                wrerr = 1;
1.1       deraadt  1775:                                        }
                   1776:                                }
                   1777:                                count = 0;
                   1778:                                cp = bp->buf;
                   1779:                        }
                   1780:                }
1.161     djm      1781:                unset_nonblock(remin);
1.209     djm      1782:                if (count != 0 && !wrerr &&
1.122     avsm     1783:                    atomicio(vwrite, ofd, bp->buf, count) != count) {
1.209     djm      1784:                        note_err("%s: %s", np, strerror(errno));
                   1785:                        wrerr = 1;
1.1       deraadt  1786:                }
1.209     djm      1787:                if (!wrerr && (!exists || S_ISREG(stb.st_mode)) &&
                   1788:                    ftruncate(ofd, size) != 0)
                   1789:                        note_err("%s: truncate: %s", np, strerror(errno));
1.1       deraadt  1790:                if (pflag) {
                   1791:                        if (exists || omode != mode)
1.116     dtucker  1792:                                if (fchmod(ofd, omode)) {
1.209     djm      1793:                                        note_err("%s: set mode: %s",
1.63      stevesk  1794:                                            np, strerror(errno));
1.116     dtucker  1795:                                }
1.1       deraadt  1796:                } else {
                   1797:                        if (!exists && omode != mode)
1.116     dtucker  1798:                                if (fchmod(ofd, omode & ~mask)) {
1.209     djm      1799:                                        note_err("%s: set mode: %s",
1.63      stevesk  1800:                                            np, strerror(errno));
1.116     dtucker  1801:                                }
1.1       deraadt  1802:                }
1.209     djm      1803:                if (close(ofd) == -1)
1.211     millert  1804:                        note_err("%s: close: %s", np, strerror(errno));
1.18      markus   1805:                (void) response();
1.185     dtucker  1806:                if (showprogress)
                   1807:                        stop_progress_meter();
1.209     djm      1808:                if (setimes && !wrerr) {
1.1       deraadt  1809:                        setimes = 0;
1.205     deraadt  1810:                        if (utimes(np, tv) == -1) {
1.209     djm      1811:                                note_err("%s: set times: %s",
1.63      stevesk  1812:                                    np, strerror(errno));
1.1       deraadt  1813:                        }
                   1814:                }
1.209     djm      1815:                /* If no error was noted then signal success for this file */
                   1816:                if (note_err(NULL) == 0)
1.107     deraadt  1817:                        (void) atomicio(vwrite, remout, "", 1);
1.1       deraadt  1818:        }
1.204     djm      1819: done:
                   1820:        for (n = 0; n < npatterns; n++)
                   1821:                free(patterns[n]);
                   1822:        free(patterns);
                   1823:        return;
1.1       deraadt  1824: screwup:
1.204     djm      1825:        for (n = 0; n < npatterns; n++)
                   1826:                free(patterns[n]);
                   1827:        free(patterns);
1.1       deraadt  1828:        run_err("protocol error: %s", why);
                   1829:        exit(1);
1.219     djm      1830: }
                   1831:
                   1832: void
                   1833: throughlocal_sftp(struct sftp_conn *from, struct sftp_conn *to,
1.228     djm      1834:     char *src, char *targ)
1.219     djm      1835: {
                   1836:        char *target = NULL, *filename = NULL, *abs_dst = NULL;
1.228     djm      1837:        char *abs_src = NULL, *tmp = NULL;
1.219     djm      1838:        glob_t g;
                   1839:        int i, r, targetisdir, err = 0;
                   1840:
                   1841:        if ((filename = basename(src)) == NULL)
                   1842:                fatal("basename %s: %s", src, strerror(errno));
                   1843:
1.228     djm      1844:        if ((abs_src = prepare_remote_path(from, src)) == NULL ||
                   1845:            (target = prepare_remote_path(to, targ)) == NULL)
1.226     djm      1846:                cleanup_exit(255);
1.219     djm      1847:        memset(&g, 0, sizeof(g));
                   1848:
                   1849:        targetisdir = remote_is_dir(to, target);
                   1850:        if (!targetisdir && targetshouldbedirectory) {
1.236     djm      1851:                error("%s: destination is not a directory", target);
1.219     djm      1852:                err = -1;
                   1853:                goto out;
                   1854:        }
                   1855:
                   1856:        debug3_f("copying remote %s to remote %s", abs_src, target);
                   1857:        if ((r = remote_glob(from, abs_src, GLOB_MARK, NULL, &g)) != 0) {
                   1858:                if (r == GLOB_NOSPACE)
1.236     djm      1859:                        error("%s: too many glob matches", abs_src);
1.219     djm      1860:                else
1.236     djm      1861:                        error("%s: %s", abs_src, strerror(ENOENT));
1.219     djm      1862:                err = -1;
                   1863:                goto out;
                   1864:        }
                   1865:
                   1866:        for (i = 0; g.gl_pathv[i] && !interrupted; i++) {
                   1867:                tmp = xstrdup(g.gl_pathv[i]);
                   1868:                if ((filename = basename(tmp)) == NULL) {
                   1869:                        error("basename %s: %s", tmp, strerror(errno));
                   1870:                        err = -1;
                   1871:                        goto out;
                   1872:                }
                   1873:
                   1874:                if (targetisdir)
                   1875:                        abs_dst = path_append(target, filename);
                   1876:                else
                   1877:                        abs_dst = xstrdup(target);
                   1878:
                   1879:                debug("Fetching %s to %s\n", g.gl_pathv[i], abs_dst);
                   1880:                if (globpath_is_dir(g.gl_pathv[i]) && iamrecursive) {
                   1881:                        if (crossload_dir(from, to, g.gl_pathv[i], abs_dst,
1.221     djm      1882:                            NULL, pflag, SFTP_PROGRESS_ONLY, 1) == -1)
1.219     djm      1883:                                err = -1;
                   1884:                } else {
                   1885:                        if (do_crossload(from, to, g.gl_pathv[i], abs_dst, NULL,
                   1886:                            pflag) == -1)
                   1887:                                err = -1;
                   1888:                }
                   1889:                free(abs_dst);
                   1890:                abs_dst = NULL;
                   1891:                free(tmp);
                   1892:                tmp = NULL;
                   1893:        }
                   1894:
                   1895: out:
                   1896:        free(abs_src);
                   1897:        free(abs_dst);
                   1898:        free(target);
                   1899:        free(tmp);
                   1900:        globfree(&g);
                   1901:        if (err == -1)
1.235     djm      1902:                errs = 1;
1.1       deraadt  1903: }
                   1904:
                   1905: int
1.86      itojun   1906: response(void)
1.1       deraadt  1907: {
1.186     schwarze 1908:        char ch, *cp, resp, rbuf[2048], visbuf[2048];
1.1       deraadt  1909:
1.30      deraadt  1910:        if (atomicio(read, remin, &resp, sizeof(resp)) != sizeof(resp))
1.1       deraadt  1911:                lostconn(0);
                   1912:
                   1913:        cp = rbuf;
1.18      markus   1914:        switch (resp) {
                   1915:        case 0:         /* ok */
1.1       deraadt  1916:                return (0);
                   1917:        default:
                   1918:                *cp++ = resp;
                   1919:                /* FALLTHROUGH */
1.18      markus   1920:        case 1:         /* error, followed by error msg */
                   1921:        case 2:         /* fatal error, "" */
1.1       deraadt  1922:                do {
1.30      deraadt  1923:                        if (atomicio(read, remin, &ch, sizeof(ch)) != sizeof(ch))
1.1       deraadt  1924:                                lostconn(0);
                   1925:                        *cp++ = ch;
                   1926:                } while (cp < &rbuf[sizeof(rbuf) - 1] && ch != '\n');
                   1927:
1.186     schwarze 1928:                if (!iamremote) {
                   1929:                        cp[-1] = '\0';
                   1930:                        (void) snmprintf(visbuf, sizeof(visbuf),
                   1931:                            NULL, "%s\n", rbuf);
                   1932:                        (void) atomicio(vwrite, STDERR_FILENO,
                   1933:                            visbuf, strlen(visbuf));
                   1934:                }
1.1       deraadt  1935:                ++errs;
                   1936:                if (resp == 1)
                   1937:                        return (-1);
                   1938:                exit(1);
                   1939:        }
                   1940:        /* NOTREACHED */
                   1941: }
                   1942:
                   1943: void
1.86      itojun   1944: usage(void)
1.1       deraadt  1945: {
1.83      stevesk  1946:        (void) fprintf(stderr,
1.233     djm      1947:            "usage: scp [-346ABCOpqRrTv] [-c cipher] [-D sftp_server_path] [-F ssh_config]\n"
1.230     djm      1948:            "           [-i identity_file] [-J destination] [-l limit]\n"
1.224     djm      1949:            "           [-o ssh_option] [-P port] [-S program] source ... target\n");
1.1       deraadt  1950:        exit(1);
                   1951: }
                   1952:
                   1953: void
1.18      markus   1954: run_err(const char *fmt,...)
1.1       deraadt  1955: {
                   1956:        static FILE *fp;
                   1957:        va_list ap;
                   1958:
                   1959:        ++errs;
1.136     biorn    1960:        if (fp != NULL || (remout != -1 && (fp = fdopen(remout, "w")))) {
                   1961:                (void) fprintf(fp, "%c", 0x01);
                   1962:                (void) fprintf(fp, "scp: ");
                   1963:                va_start(ap, fmt);
                   1964:                (void) vfprintf(fp, fmt, ap);
                   1965:                va_end(ap);
                   1966:                (void) fprintf(fp, "\n");
                   1967:                (void) fflush(fp);
                   1968:        }
1.18      markus   1969:
                   1970:        if (!iamremote) {
1.73      markus   1971:                va_start(ap, fmt);
1.186     schwarze 1972:                vfmprintf(stderr, fmt, ap);
1.73      markus   1973:                va_end(ap);
1.18      markus   1974:                fprintf(stderr, "\n");
                   1975:        }
1.209     djm      1976: }
                   1977:
                   1978: /*
                   1979:  * Notes a sink error for sending at the end of a file transfer. Returns 0 if
                   1980:  * no error has been noted or -1 otherwise. Use note_err(NULL) to flush
                   1981:  * any active error at the end of the transfer.
                   1982:  */
                   1983: int
                   1984: note_err(const char *fmt, ...)
                   1985: {
                   1986:        static char *emsg;
                   1987:        va_list ap;
                   1988:
                   1989:        /* Replay any previously-noted error */
                   1990:        if (fmt == NULL) {
                   1991:                if (emsg == NULL)
                   1992:                        return 0;
                   1993:                run_err("%s", emsg);
                   1994:                free(emsg);
                   1995:                emsg = NULL;
                   1996:                return -1;
                   1997:        }
                   1998:
                   1999:        errs++;
                   2000:        /* Prefer first-noted error */
                   2001:        if (emsg != NULL)
                   2002:                return -1;
                   2003:
                   2004:        va_start(ap, fmt);
                   2005:        vasnmprintf(&emsg, INT_MAX, NULL, fmt, ap);
                   2006:        va_end(ap);
                   2007:        return -1;
1.1       deraadt  2008: }
                   2009:
                   2010: void
1.104     djm      2011: verifydir(char *cp)
1.1       deraadt  2012: {
                   2013:        struct stat stb;
                   2014:
                   2015:        if (!stat(cp, &stb)) {
                   2016:                if (S_ISDIR(stb.st_mode))
                   2017:                        return;
                   2018:                errno = ENOTDIR;
                   2019:        }
                   2020:        run_err("%s: %s", cp, strerror(errno));
1.123     avsm     2021:        killchild(0);
1.1       deraadt  2022: }
                   2023:
                   2024: int
1.104     djm      2025: okname(char *cp0)
1.1       deraadt  2026: {
                   2027:        int c;
                   2028:        char *cp;
                   2029:
                   2030:        cp = cp0;
                   2031:        do {
1.75      deraadt  2032:                c = (int)*cp;
1.1       deraadt  2033:                if (c & 0200)
                   2034:                        goto bad;
1.179     deraadt  2035:                if (!isalpha(c) && !isdigit((unsigned char)c)) {
1.101     markus   2036:                        switch (c) {
                   2037:                        case '\'':
                   2038:                        case '"':
                   2039:                        case '`':
                   2040:                        case ' ':
                   2041:                        case '#':
                   2042:                                goto bad;
                   2043:                        default:
                   2044:                                break;
                   2045:                        }
                   2046:                }
1.1       deraadt  2047:        } while (*++cp);
                   2048:        return (1);
                   2049:
1.186     schwarze 2050: bad:   fmprintf(stderr, "%s: invalid user name\n", cp0);
1.1       deraadt  2051:        return (0);
                   2052: }
                   2053:
                   2054: BUF *
1.104     djm      2055: allocbuf(BUF *bp, int fd, int blksize)
1.1       deraadt  2056: {
                   2057:        size_t size;
                   2058:        struct stat stb;
                   2059:
1.205     deraadt  2060:        if (fstat(fd, &stb) == -1) {
1.1       deraadt  2061:                run_err("fstat: %s", strerror(errno));
                   2062:                return (0);
                   2063:        }
1.187     deraadt  2064:        size = ROUNDUP(stb.st_blksize, blksize);
1.95      markus   2065:        if (size == 0)
1.18      markus   2066:                size = blksize;
1.1       deraadt  2067:        if (bp->cnt >= size)
                   2068:                return (bp);
1.192     deraadt  2069:        bp->buf = xrecallocarray(bp->buf, bp->cnt, size, 1);
1.1       deraadt  2070:        bp->cnt = size;
                   2071:        return (bp);
                   2072: }
                   2073:
                   2074: void
1.104     djm      2075: lostconn(int signo)
1.1       deraadt  2076: {
                   2077:        if (!iamremote)
1.172     dtucker  2078:                (void)write(STDERR_FILENO, "lost connection\n", 16);
1.74      markus   2079:        if (signo)
                   2080:                _exit(1);
                   2081:        else
                   2082:                exit(1);
1.225     djm      2083: }
                   2084:
                   2085: void
                   2086: cleanup_exit(int i)
                   2087: {
                   2088:        if (remin > 0)
                   2089:                close(remin);
                   2090:        if (remout > 0)
                   2091:                close(remout);
                   2092:        if (remin2 > 0)
                   2093:                close(remin2);
                   2094:        if (remout2 > 0)
                   2095:                close(remout2);
                   2096:        if (do_cmd_pid > 0)
                   2097:                waitpid(do_cmd_pid, NULL, 0);
                   2098:        if (do_cmd_pid2 > 0)
                   2099:                waitpid(do_cmd_pid2, NULL, 0);
                   2100:        exit(i);
1.4       aaron    2101: }