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

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