Add safety check for local --remove-source-files.
[rsync.git] / batch.c
diff --git a/batch.c b/batch.c
index b8d99a06848ecda17ecbaea268ef8a8e0cc18df7..accc4c6e677b639fe870084d914a68a61684a4a1 100644 (file)
--- a/batch.c
+++ b/batch.c
@@ -3,7 +3,7 @@
  *
  * Copyright (C) 1999 Weiss
  * Copyright (C) 2004 Chris Shoemaker
- * Copyright (C) 2004-2007 Wayne Davison
+ * Copyright (C) 2004-2022 Wayne Davison
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -20,7 +20,7 @@
  */
 
 #include "rsync.h"
-#include "zlib/zlib.h"
+#include <zlib.h>
 #include <time.h>
 
 extern int eol_nulls;
@@ -37,14 +37,19 @@ extern int always_checksum;
 extern int do_compression;
 extern int inplace;
 extern int append_mode;
+extern int write_batch;
 extern int protocol_version;
+extern int raw_argc, cooked_argc;
+extern char **raw_argv, **cooked_argv;
 extern char *batch_name;
 #ifdef ICONV_OPTION
 extern char *iconv_opt;
 #endif
 
-extern struct filter_list_struct filter_list;
+extern filter_rule_list filter_list;
 
+int batch_fd = -1;
+int batch_sh_fd = -1;
 int batch_stream_flags;
 
 static int tweaked_append;
@@ -135,7 +140,7 @@ void check_batch_flags(void)
                                        set ? "Please" : "Do not");
                                exit_cleanup(RERR_SYNTAX);
                        }
-                       if (verbose) {
+                       if (INFO_GTE(MISC, 1)) {
                                rprintf(FINFO,
                                        "%sing the %s option to match the batchfile.\n",
                                        set ? "Sett" : "Clear", flag_name[i]);
@@ -156,40 +161,58 @@ void check_batch_flags(void)
                append_mode = 2;
 }
 
-static void write_arg(int fd, char *arg)
+static int write_arg(const char *arg)
 {
-       char *x, *s;
+       const char *x, *s;
+       int len, err = 0;
 
        if (*arg == '-' && (x = strchr(arg, '=')) != NULL) {
-               write(fd, arg, x - arg + 1);
+               err |= write(batch_sh_fd, arg, x - arg + 1) != x - arg + 1;
                arg += x - arg + 1;
        }
 
        if (strpbrk(arg, " \"'&;|[]()$#!*?^\\") != NULL) {
-               write(fd, "'", 1);
+               err |= write(batch_sh_fd, "'", 1) != 1;
                for (s = arg; (x = strchr(s, '\'')) != NULL; s = x + 1) {
-                       write(fd, s, x - s + 1);
-                       write(fd, "'", 1);
+                       err |= write(batch_sh_fd, s, x - s + 1) != x - s + 1;
+                       err |= write(batch_sh_fd, "'", 1) != 1;
                }
-               write(fd, s, strlen(s));
-               write(fd, "'", 1);
-               return;
+               len = strlen(s);
+               err |= write(batch_sh_fd, s, len) != len;
+               err |= write(batch_sh_fd, "'", 1) != 1;
+               return err;
        }
 
-       write(fd, arg, strlen(arg));
+       len = strlen(arg);
+       err |= write(batch_sh_fd, arg, len) != len;
+
+       return err;
+}
+
+/* Writes out a space and then an option (or other string) with an optional "=" + arg suffix. */
+static int write_opt(const char *opt, const char *arg)
+{
+       int len = strlen(opt);
+       int err = write(batch_sh_fd, " ", 1) != 1;
+       err = write(batch_sh_fd, opt, len) != len ? 1 : 0;
+       if (arg) {
+               err |= write(batch_sh_fd, "=", 1) != 1;
+               err |= write_arg(arg);
+       }
+       return err;
 }
 
 static void write_filter_rules(int fd)
 {
-       struct filter_struct *ent;
+       filter_rule *ent;
 
        write_sbuf(fd, " <<'#E#'\n");
        for (ent = filter_list.head; ent; ent = ent->next) {
                unsigned int plen;
-               char *p = get_rule_prefix(ent->match_flags, "- ", 0, &plen);
+               char *p = get_rule_prefix(ent, "- ", 0, &plen);
                write_buf(fd, p, plen);
                write_sbuf(fd, ent->pattern);
-               if (ent->match_flags & MATCHFLG_DIRECTORY)
+               if (ent->rflags & FILTRULE_DIRECTORY)
                        write_byte(fd, '/');
                write_byte(fd, eol_nulls ? 0 : '\n');
        }
@@ -198,40 +221,66 @@ static void write_filter_rules(int fd)
        write_sbuf(fd, "#E#");
 }
 
+/* This sets batch_fd and (for --write-batch) batch_sh_fd. */
+void open_batch_files(void)
+{
+       if (write_batch) {
+               char filename[MAXPATHLEN];
+
+               stringjoin(filename, sizeof filename, batch_name, ".sh", NULL);
+
+               batch_sh_fd = do_open(filename, O_WRONLY | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR | S_IXUSR);
+               if (batch_sh_fd < 0) {
+                       rsyserr(FERROR, errno, "Batch file %s open error", full_fname(filename));
+                       exit_cleanup(RERR_FILESELECT);
+               }
+
+               batch_fd = do_open(batch_name, O_WRONLY | O_CREAT | O_TRUNC, S_IRUSR | S_IWUSR);
+       } else if (strcmp(batch_name, "-") == 0)
+               batch_fd = STDIN_FILENO;
+       else
+               batch_fd = do_open(batch_name, O_RDONLY, S_IRUSR | S_IWUSR);
+
+       if (batch_fd < 0) {
+               rsyserr(FERROR, errno, "Batch file %s open error", full_fname(batch_name));
+               exit_cleanup(RERR_FILEIO);
+       }
+}
+
 /* This routine tries to write out an equivalent --read-batch command
  * given the user's --write-batch args.  However, it doesn't really
  * understand most of the options, so it uses some overly simple
  * heuristics to munge the command line into something that will
  * (hopefully) work. */
-void write_batch_shell_file(int argc, char *argv[], int file_arg_cnt)
+void write_batch_shell_file(void)
 {
-       int fd, i, len;
-       char *p, filename[MAXPATHLEN];
-
-       stringjoin(filename, sizeof filename,
-                  batch_name, ".sh", NULL);
-       fd = do_open(filename, O_WRONLY | O_CREAT | O_TRUNC,
-                    S_IRUSR | S_IWUSR | S_IEXEC);
-       if (fd < 0) {
-               rsyserr(FERROR, errno, "Batch file %s open error",
-                       filename);
-               exit_cleanup(RERR_FILESELECT);
-       }
+       int i, j, len, err = 0;
+       char *p, *p2;
 
        /* Write argvs info to BATCH.sh file */
-       write_arg(fd, argv[0]);
+       err |= write_arg(raw_argv[0]);
        if (filter_list.head) {
                if (protocol_version >= 29)
-                       write_sbuf(fd, " --filter=._-");
+                       err |= write_opt("--filter", "._-");
                else
-                       write_sbuf(fd, " --exclude-from=-");
+                       err |= write_opt("--exclude-from", "-");
+       }
+
+       /* Elide the filename args from the option list, but scan for them in reverse. */
+       for (i = raw_argc-1, j = cooked_argc-1; i > 0 && j >= 0; i--) {
+               if (strcmp(raw_argv[i], cooked_argv[j]) == 0) {
+                       raw_argv[i] = NULL;
+                       j--;
+               }
        }
-       for (i = 1; i < argc - file_arg_cnt; i++) {
-               p = argv[i];
+
+       for (i = 1; i < raw_argc; i++) {
+               if (!(p = raw_argv[i]))
+                       continue;
                if (strncmp(p, "--files-from", 12) == 0
-                   || strncmp(p, "--filter", 8) == 0
-                   || strncmp(p, "--include", 9) == 0
-                   || strncmp(p, "--exclude", 9) == 0) {
+                || strncmp(p, "--filter", 8) == 0
+                || strncmp(p, "--include", 9) == 0
+                || strncmp(p, "--exclude", 9) == 0) {
                        if (strchr(p, '=') == NULL)
                                i++;
                        continue;
@@ -240,27 +289,24 @@ void write_batch_shell_file(int argc, char *argv[], int file_arg_cnt)
                        i++;
                        continue;
                }
-               write(fd, " ", 1);
                if (strncmp(p, "--write-batch", len = 13) == 0
-                || strncmp(p, "--only-write-batch", len = 18) == 0) {
-                       write(fd, "--read-batch", 12);
-                       if (p[len] == '=') {
-                               write(fd, "=", 1);
-                               write_arg(fd, p + len + 1);
-                       }
-               } else
-                       write_arg(fd, p);
+                || strncmp(p, "--only-write-batch", len = 18) == 0)
+                       err |= write_opt("--read-batch", p[len] == '=' ? p + len + 1 : NULL);
+               else {
+                       err |= write(batch_sh_fd, " ", 1) != 1;
+                       err |= write_arg(p);
+               }
        }
-       if (!(p = check_for_hostspec(argv[argc - 1], &p, &i)))
-               p = argv[argc - 1];
-       write(fd, " ${1:-", 6);
-       write_arg(fd, p);
-       write_byte(fd, '}');
+       if (!(p = check_for_hostspec(cooked_argv[cooked_argc - 1], &p2, &i)))
+               p = cooked_argv[cooked_argc - 1];
+       err |= write_opt("${1:-", NULL);
+       err |= write_arg(p);
+       err |= write(batch_sh_fd, "}", 1) != 1;
        if (filter_list.head)
-               write_filter_rules(fd);
-       if (write(fd, "\n", 1) != 1 || close(fd) < 0) {
-               rsyserr(FERROR, errno, "Batch file %s write error",
-                       filename);
+               write_filter_rules(batch_sh_fd);
+       if (write(batch_sh_fd, "\n", 1) != 1 || close(batch_sh_fd) < 0 || err) {
+               rsyserr(FERROR, errno, "Batch file %s.sh write error", batch_name);
                exit_cleanup(RERR_FILEIO);
        }
+       batch_sh_fd = -1;
 }