Made delete_file() backup files it is removing if --backup was specified.

[rsync/rsync.git] / rsync.c

/*
   Copyright (C) Andrew Tridgell 1996
   Copyright (C) Paul Mackerras 1996

   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
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

/* this file contains code used by more than one part of the rsync
   process */

#include "rsync.h"

extern int verbose;
extern int dry_run;
extern int daemon_log_format_has_i;
extern int preserve_times;
extern int omit_dir_times;
extern int am_root;
extern int am_server;
extern int am_sender;
extern int am_generator;
extern int preserve_uid;
extern int preserve_gid;
extern int force_delete;
extern int inplace;
extern int recurse;
extern int max_delete;
extern int keep_dirlinks;
extern int make_backups;
extern struct stats stats;
extern char *backup_dir;
extern char *log_format;
extern char *backup_suffix;
extern int backup_suffix_len;


static int is_backup_file(char *fn)
{
	int k = strlen(fn) - backup_suffix_len;
	return k > 0 && strcmp(fn+k, backup_suffix) == 0;
}


/*
  free a sums struct
  */
void free_sums(struct sum_struct *s)
{
	if (s->sums) free(s->sums);
	free(s);
}


int deletion_count = 0; /* used to implement --max-delete */

/*
 * delete a file or directory. If force_delete is set then delete
 * recursively
 */
int delete_file(char *fname, int mode, int flags)
{
	DIR *d;
	struct dirent *di;
	char buf[MAXPATHLEN];
	STRUCT_STAT st;
	int zap_dir;

	if (max_delete && deletion_count >= max_delete)
		return -1;

	if (!S_ISDIR(mode)) {
		int ok;
		if (make_backups && (backup_dir || !is_backup_file(fname)))
			ok = make_backup(fname);
		else
			ok = robust_unlink(fname) == 0;
		if (ok) {
			if ((verbose || log_format) && !(flags & DEL_TERSE))
				log_delete(fname, mode);
			deletion_count++;
			return 0;
		}
		if (errno == ENOENT)
			return 0;
		rsyserr(FERROR, errno, "delete_file: unlink %s failed",
			full_fname(fname));
		return -1;
	}

	zap_dir = (flags & DEL_FORCE_RECURSE || (force_delete && recurse))
		&& !(flags & DEL_NO_RECURSE);
	if (dry_run && zap_dir)
		errno = ENOTEMPTY;
	else if (do_rmdir(fname) == 0) {
		if ((verbose || log_format) && !(flags & DEL_TERSE))
			log_delete(fname, mode);
		deletion_count++;
		return 0;
	}
	if (errno == ENOENT)
		return 0;
	if (!zap_dir || (errno != ENOTEMPTY && errno != EEXIST)) {
		rsyserr(FERROR, errno, "delete_file: rmdir %s failed",
			full_fname(fname));
		return -1;
	}

	/* now we do a recsursive delete on the directory ... */
	if (!(d = opendir(fname))) {
		rsyserr(FERROR, errno, "delete_file: opendir %s failed",
			full_fname(fname));
		return -1;
	}

	if (!(flags & DEL_TERSE)) {
		if (verbose || log_format)
			log_delete(fname, mode);
		flags |= DEL_TERSE;
	}

	for (errno = 0, di = readdir(d); di; errno = 0, di = readdir(d)) {
		char *dname = d_name(di);
		if (dname[0] == '.' && (dname[1] == '\0'
		    || (dname[1] == '.' && dname[2] == '\0')))
			continue;
		pathjoin(buf, sizeof buf, fname, dname);

		if (do_lstat(buf, &st) < 0)
			continue;
		if (verbose || log_format)
			log_delete(buf, st.st_mode);
		if (delete_file(buf, st.st_mode, flags) != 0) {
			closedir(d);
			return -1;
		}
	}
	if (errno) {
		rsyserr(FERROR, errno, "delete_file: readdir %s failed",
			full_fname(fname));
		closedir(d);
		return -1;
	}

	closedir(d);

	if (max_delete && deletion_count >= max_delete)
		return -1;
	if (do_rmdir(fname) != 0 && errno != ENOENT) {
		rsyserr(FERROR, errno, "delete_file: rmdir %s failed",
			full_fname(fname));
		return -1;
	}
	deletion_count++;

	return 0;
}

int set_perms(char *fname,struct file_struct *file,STRUCT_STAT *st,
	      int flags)
{
	int updated = 0;
	STRUCT_STAT st2;
	int change_uid, change_gid;

	if (!st) {
		if (dry_run)
			return 1;
		if (link_stat(fname, &st2, 0) < 0) {
			rsyserr(FERROR, errno, "stat %s failed",
				full_fname(fname));
			return 0;
		}
		st = &st2;
	}

	if (!preserve_times || S_ISLNK(st->st_mode)
	 || (S_ISDIR(st->st_mode)
	  && (omit_dir_times || (make_backups && !backup_dir))))
		flags |= PERMS_SKIP_MTIME;
	if (!(flags & PERMS_SKIP_MTIME)
	    && cmp_modtime(st->st_mtime, file->modtime) != 0) {
		if (set_modtime(fname,file->modtime) != 0) {
			rsyserr(FERROR, errno, "failed to set times on %s",
				full_fname(fname));
			return 0;
		}
		updated = 1;
	}

	change_uid = am_root && preserve_uid && st->st_uid != file->uid;
	change_gid = preserve_gid && file->gid != GID_NONE
		&& st->st_gid != file->gid;
#if !defined HAVE_LCHOWN && !defined CHOWN_MODIFIES_SYMLINK
	if (S_ISLNK(st->st_mode))
		;
	else
#endif
	if (change_uid || change_gid) {
		if (verbose > 2) {
			if (change_uid) {
				rprintf(FINFO,
					"set uid of %s from %ld to %ld\n",
					safe_fname(fname),
					(long)st->st_uid, (long)file->uid);
			}
			if (change_gid) {
				rprintf(FINFO,
					"set gid of %s from %ld to %ld\n",
					safe_fname(fname),
					(long)st->st_gid, (long)file->gid);
			}
		}
		if (do_lchown(fname,
		    change_uid ? file->uid : st->st_uid,
		    change_gid ? file->gid : st->st_gid) != 0) {
			/* shouldn't have attempted to change uid or gid
			 * unless have the privilege */
			rsyserr(FERROR, errno, "%s %s failed",
			    change_uid ? "chown" : "chgrp",
			    full_fname(fname));
			return 0;
		}
		/* a lchown had been done - we have to re-stat if the
		 * destination had the setuid or setgid bits set due
		 * to the side effect of the chown call */
		if (st->st_mode & (S_ISUID | S_ISGID)) {
			link_stat(fname, st,
				  keep_dirlinks && S_ISDIR(st->st_mode));
		}
		updated = 1;
	}

#ifdef HAVE_CHMOD
	if (!S_ISLNK(st->st_mode)) {
		if ((st->st_mode & CHMOD_BITS) != (file->mode & CHMOD_BITS)) {
			updated = 1;
			if (do_chmod(fname,(file->mode & CHMOD_BITS)) != 0) {
				rsyserr(FERROR, errno, "failed to set permissions on %s",
					full_fname(fname));
				return 0;
			}
		}
	}
#endif

	if (verbose > 1 && flags & PERMS_REPORT) {
		enum logcode code = daemon_log_format_has_i || dry_run
				  ? FCLIENT : FINFO;
		if (updated)
			rprintf(code, "%s\n", safe_fname(fname));
		else
			rprintf(code, "%s is uptodate\n", safe_fname(fname));
	}
	return updated;
}


void sig_int(void)
{
	/* KLUGE: if the user hits Ctrl-C while ssh is prompting
	 * for a password, then our cleanup's sending of a SIGUSR1
	 * signal to all our children may kill ssh before it has a
	 * chance to restore the tty settings (i.e. turn echo back
	 * on).  By sleeping for a short time, ssh gets a bigger
	 * chance to do the right thing.  If child processes are
	 * not ssh waiting for a password, then this tiny delay
	 * shouldn't hurt anything. */
	msleep(400);
	exit_cleanup(RERR_SIGNAL);
}


/* finish off a file transfer, renaming the file and setting the permissions
   and ownership */
void finish_transfer(char *fname, char *fnametmp, struct file_struct *file,
		     int ok_to_set_time, int overwriting_basis)
{
	int ret;

	if (inplace) {
		if (verbose > 2)
			rprintf(FINFO, "finishing %s\n", safe_fname(fname));
		goto do_set_perms;
	}

	if (make_backups && overwriting_basis && !make_backup(fname))
		return;

	/* Change permissions before putting the file into place. */
	set_perms(fnametmp, file, NULL, ok_to_set_time ? 0 : PERMS_SKIP_MTIME);

	/* move tmp file over real file */
	if (verbose > 2) {
		rprintf(FINFO, "renaming %s to %s\n",
			safe_fname(fnametmp), safe_fname(fname));
	}
	ret = robust_rename(fnametmp, fname, file->mode & INITACCESSPERMS);
	if (ret < 0) {
		rsyserr(FERROR, errno, "%s %s -> \"%s\"",
		    ret == -2 ? "copy" : "rename",
		    full_fname(fnametmp), safe_fname(fname));
		do_unlink(fnametmp);
		return;
	}
	if (ret == 0) {
		/* The file was moved into place (not copied), so it's done. */
		return;
	}
    do_set_perms:
	set_perms(fname, file, NULL, ok_to_set_time ? 0 : PERMS_SKIP_MTIME);
}

const char *who_am_i(void)
{
	if (am_sender < 0)
		return am_server ? "server" : "client";
	return am_sender ? "sender" : am_generator ? "generator" : "receiver";
}