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

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