[rsync/rsync.git] / backup.c

/*
 * Backup handling code.
 *
 * Copyright (C) 1999 Andrew Tridgell
 * Copyright (C) 2003-2009 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
 * the Free Software Foundation; either version 3 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, visit the http://fsf.org website.
 */

#include "rsync.h"
#include "ifuncs.h"

extern int am_root;
extern int preserve_acls;
extern int preserve_xattrs;
extern int preserve_devices;
extern int preserve_specials;
extern int preserve_links;
extern int safe_symlinks;
extern int backup_dir_len;
extern unsigned int backup_dir_remainder;
extern char backup_dir_buf[MAXPATHLEN];
extern char *backup_suffix;
extern char *backup_dir;

/* make a complete pathname for backup file */
char *get_backup_name(const char *fname)
{
	if (backup_dir) {
		if (stringjoin(backup_dir_buf + backup_dir_len, backup_dir_remainder,
			       fname, backup_suffix, NULL) < backup_dir_remainder)
			return backup_dir_buf;
	} else {
		if (stringjoin(backup_dir_buf, MAXPATHLEN,
			       fname, backup_suffix, NULL) < MAXPATHLEN)
			return backup_dir_buf;
	}

	rprintf(FERROR, "backup filename too long\n");
	return NULL;
}

/****************************************************************************
Create a directory given an absolute path, perms based upon another directory
path
****************************************************************************/
int make_bak_dir(const char *fullpath)
{
	char fbuf[MAXPATHLEN], *rel, *end, *p;
	struct file_struct *file;
	int len = backup_dir_len;
	stat_x sx;

	while (*fullpath == '.' && fullpath[1] == '/') {
		fullpath += 2;
		len -= 2;
	}

	if (strlcpy(fbuf, fullpath, sizeof fbuf) >= sizeof fbuf)
		return -1;

	rel = fbuf + len;
	end = p = rel + strlen(rel);

	/* Try to find an existing dir, starting from the deepest dir. */
	while (1) {
		if (--p == fbuf)
			return -1;
		if (*p == '/') {
			*p = '\0';
			if (mkdir_defmode(fbuf) == 0)
				break;
			if (errno != ENOENT) {
				rsyserr(FERROR, errno,
					"make_bak_dir mkdir %s failed",
					full_fname(fbuf));
				return -1;
			}
		}
	}

	/* Make all the dirs that we didn't find on the way here. */
	while (1) {
		if (p >= rel) {
			/* Try to transfer the directory settings of the
			 * actual dir that the files are coming from. */
			init_stat_x(&sx);
			if (x_stat(rel, &sx.st, NULL) < 0) {
				rsyserr(FERROR, errno,
					"make_bak_dir stat %s failed",
					full_fname(rel));
			} else {
				if (!(file = make_file(rel, NULL, NULL, 0, NO_FILTERS)))
					continue;
#ifdef SUPPORT_ACLS
				if (preserve_acls && !S_ISLNK(file->mode)) {
					get_acl(rel, &sx);
					cache_tmp_acl(file, &sx);
					free_acl(&sx);
				}
#endif
#ifdef SUPPORT_XATTRS
				if (preserve_xattrs) {
					get_xattr(rel, &sx);
					cache_tmp_xattr(file, &sx);
					free_xattr(&sx);
				}
#endif
				set_file_attrs(fbuf, file, NULL, NULL, 0);
				unmake_file(file);
#ifdef SUPPORT_ACLS
				uncache_tmp_acls();
#endif
#ifdef SUPPORT_XATTRS
				uncache_tmp_xattrs();
#endif
			}
		}
		*p = '/';
		p += strlen(p);
		if (p == end)
			break;
		if (mkdir_defmode(fbuf) < 0) {
			rsyserr(FERROR, errno, "make_bak_dir mkdir %s failed",
				full_fname(fbuf));
			return -1;
		}
	}

	return 0;
}

/* Has same return codes as make_backup(). */
static inline int link_or_rename(const char *from, const char *to,
				 BOOL prefer_rename, STRUCT_STAT *stp)
{
	if (S_ISLNK(stp->st_mode)) {
		if (prefer_rename)
			goto do_rename;
#ifndef CAN_HARDLINK_SYMLINK
		return 0; /* Use copy code. */
#endif
	}
	if (IS_SPECIAL(stp->st_mode) || IS_DEVICE(stp->st_mode)) {
		if (prefer_rename)
			goto do_rename;
#ifndef CAN_HARDLINK_SPECIAL
		return 0; /* Use copy code. */
#endif
	}
#ifdef SUPPORT_HARD_LINKS
	if (!S_ISDIR(stp->st_mode)) {
		if (do_link(from, to) == 0)
			return 2;
		return 0;
	}
#endif
  do_rename:
	if (do_rename(from, to) == 0) {
		if (stp->st_nlink > 1 && !S_ISDIR(stp->st_mode)) {
			/* If someone has hard-linked the file into the backup
			 * dir, rename() might return success but do nothing! */
			robust_unlink(to); /* Just in case... */
		}
		return 1;
	}
	return 0;
}

/* Hard-link, rename, or copy an item to the backup name.  Returns 2 if item
 * was duplicated into backup area, 1 if item was moved, or 0 for failure.*/
int make_backup(const char *fname, BOOL prefer_rename)
{
	stat_x sx;
	struct file_struct *file;
	int save_preserve_xattrs;
	char *buf = get_backup_name(fname);
	int ret = 0;

	if (!buf)
		return 0;

	init_stat_x(&sx);
	/* Return success if no file to keep. */
	if (x_lstat(fname, &sx.st, NULL) < 0)
		return 1;

	/* Try a hard-link or a rename first.  Using rename is not atomic, but
	 * is more efficient than forcing a copy for larger files when no hard-
	 * linking is possible. */
	if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
		goto success;
	if (errno == EEXIST) {
		STRUCT_STAT bakst;
		if (do_lstat(buf, &bakst) == 0) {
			int flags = get_del_for_flag(bakst.st_mode) | DEL_FOR_BACKUP | DEL_RECURSE;
			if (delete_item(buf, bakst.st_mode, flags) != 0)
				return 0;
		}
		if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
			goto success;
	} else if (backup_dir && errno == ENOENT) {
		/* If the backup dir is missing, try again after making it. */
		if (make_bak_dir(buf) != 0)
			return 0;
		if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
			goto success;
	}

	/* Fall back to making a copy. */
	if (!(file = make_file(fname, NULL, &sx.st, 0, NO_FILTERS)))
		return 1; /* the file could have disappeared */

#ifdef SUPPORT_ACLS
	if (preserve_acls && !S_ISLNK(file->mode)) {
		get_acl(fname, &sx);
		cache_tmp_acl(file, &sx);
		free_acl(&sx);
	}
#endif
#ifdef SUPPORT_XATTRS
	if (preserve_xattrs) {
		get_xattr(fname, &sx);
		cache_tmp_xattr(file, &sx);
		free_xattr(&sx);
	}
#endif

	/* Check to see if this is a device file, or link */
	if ((am_root && preserve_devices && IS_DEVICE(file->mode))
	 || (preserve_specials && IS_SPECIAL(file->mode))) {
		int save_errno;
		if (do_mknod(buf, file->mode, sx.st.st_rdev) < 0) {
			save_errno = errno ? errno : EINVAL; /* 0 paranoia */
			if (errno == ENOENT && make_bak_dir(buf) == 0) {
				if (do_mknod(buf, file->mode, sx.st.st_rdev) < 0)
					save_errno = errno ? errno : save_errno;
				else
					save_errno = 0;
			}
			if (save_errno) {
				rsyserr(FERROR, save_errno, "mknod %s failed",
					full_fname(buf));
			}
		} else
			save_errno = 0;
		if (DEBUG_GTE(BACKUP, 1) && save_errno == 0) {
			rprintf(FINFO, "make_backup: DEVICE %s successful.\n",
				fname);
		}
		ret = 2;
	}

	if (!ret && S_ISDIR(file->mode)) {
		int ret_code;
		/* make an empty directory */
		if (do_mkdir(buf, file->mode) < 0) {
			int save_errno = errno ? errno : EINVAL; /* 0 paranoia */
			if (errno == ENOENT && make_bak_dir(buf) == 0) {
				if (do_mkdir(buf, file->mode) < 0)
					save_errno = errno ? errno : save_errno;
				else
					save_errno = 0;
			}
			if (save_errno) {
				rsyserr(FINFO, save_errno, "mkdir %s failed",
					full_fname(buf));
			}
		}

		ret_code = do_rmdir(fname);
		if (DEBUG_GTE(BACKUP, 1)) {
			rprintf(FINFO, "make_backup: RMDIR %s returns %i\n",
				full_fname(fname), ret_code);
		}
		ret = 2;
	}

#ifdef SUPPORT_LINKS
	if (!ret && preserve_links && S_ISLNK(file->mode)) {
		const char *sl = F_SYMLINK(file);
		if (safe_symlinks && unsafe_symlink(sl, fname)) {
			if (INFO_GTE(SYMSAFE, 1)) {
				rprintf(FINFO, "ignoring unsafe symlink %s -> %s\n",
					full_fname(buf), sl);
			}
			ret = 2;
		} else {
			if (do_symlink(sl, buf) < 0) {
				int save_errno = errno ? errno : EINVAL; /* 0 paranoia */
				if (errno == ENOENT && make_bak_dir(buf) == 0) {
					if (do_symlink(sl, buf) < 0)
						save_errno = errno ? errno : save_errno;
					else
						save_errno = 0;
				}
				if (save_errno) {
					rsyserr(FERROR, save_errno, "link %s -> \"%s\"",
						full_fname(buf), sl);
				}
			}
			ret = 2;
		}
	}
#endif

	if (!ret && !S_ISREG(file->mode)) {
		rprintf(FINFO, "make_bak: skipping non-regular file %s\n",
			fname);
		unmake_file(file);
#ifdef SUPPORT_ACLS
		uncache_tmp_acls();
#endif
#ifdef SUPPORT_XATTRS
		uncache_tmp_xattrs();
#endif
		return 2;
	}

	/* Copy to backup tree if a file. */
	if (!ret) {
		if (copy_file(fname, buf, -1, file->mode, 1) < 0) {
			rsyserr(FERROR, errno, "keep_backup failed: %s -> \"%s\"",
				full_fname(fname), buf);
			unmake_file(file);
#ifdef SUPPORT_ACLS
			uncache_tmp_acls();
#endif
#ifdef SUPPORT_XATTRS
			uncache_tmp_xattrs();
#endif
			return 0;
		}
		ret = 2;
	}

	save_preserve_xattrs = preserve_xattrs;
	preserve_xattrs = 0;
	set_file_attrs(buf, file, NULL, fname, 0);
	preserve_xattrs = save_preserve_xattrs;

	unmake_file(file);
#ifdef SUPPORT_ACLS
	uncache_tmp_acls();
#endif
#ifdef SUPPORT_XATTRS
	uncache_tmp_xattrs();
#endif

  success:
	if (INFO_GTE(BACKUP, 1)) {
		rprintf(FINFO, "backed up %s to %s\n",
			fname, buf);
	}
	return ret;
}
Commit	Line	Data
addf0c4a	1	/*
0f78b815 WD	2	* Backup handling code.
	3	*
	4	* Copyright (C) 1999 Andrew Tridgell
b3bf9b9d	5	* Copyright (C) 2003-2009 Wayne Davison
0f78b815 WD	6	*
0f78b815 WD	7	* This program is free software; you can redistribute it and/or modify
8e41b68e WD	8	* it under the terms of the GNU General Public License as published by
	9	* the Free Software Foundation; either version 3 of the License, or
	10	* (at your option) any later version.
0f78b815 WD	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
e7c67065	17	* You should have received a copy of the GNU General Public License along
4fd842f9	18	* with this program; if not, visit the http://fsf.org website.
0f78b815	19	*/
3d19b4c8 AT	20
3d19b4c8 AT	21	#include "rsync.h"
09ca0d15	22	#include "ifuncs.h"
3d19b4c8	23
378a074c	24	extern int am_root;
1c3344a1	25	extern int preserve_acls;
16edf865	26	extern int preserve_xattrs;
378a074c	27	extern int preserve_devices;
b5c6a6ae	28	extern int preserve_specials;
378a074c	29	extern int preserve_links;
377dbd20	30	extern int safe_symlinks;
6b2a3d5d	31	extern int backup_dir_len;
82ad07c4 WD	32	extern unsigned int backup_dir_remainder;
	33	extern char backup_dir_buf[MAXPATHLEN];
	34	extern char *backup_suffix;
	35	extern char *backup_dir;
378a074c	36
c94e4afb	37	/* make a complete pathname for backup file */
45d8bfe0	38	char get_backup_name(const char fname)
c94e4afb	39	{
c94e4afb WD	40	if (backup_dir) {
	41	if (stringjoin(backup_dir_buf + backup_dir_len, backup_dir_remainder,
	42	fname, backup_suffix, NULL) < backup_dir_remainder)
	43	return backup_dir_buf;
	44	} else {
fb22c277 WD	45	if (stringjoin(backup_dir_buf, MAXPATHLEN,
	46	fname, backup_suffix, NULL) < MAXPATHLEN)
	47	return backup_dir_buf;
c94e4afb WD	48	}
	49
	50	rprintf(FERROR, "backup filename too long\n");
	51	return NULL;
	52	}
	53
378a074c AT	54	/****************************************************************************
	55	Create a directory given an absolute path, perms based upon another directory
	56	path
	57	****************************************************************************/
e1ac7791	58	int make_bak_dir(const char *fullpath)
378a074c	59	{
e1ac7791	60	char fbuf[MAXPATHLEN], rel, end, *p;
1c3344a1	61	struct file_struct *file;
e1ac7791	62	int len = backup_dir_len;
13710874	63	stat_x sx;
de0e2250	64
e1ac7791	65	while (*fullpath == '.' && fullpath[1] == '/') {
de0e2250	66	fullpath += 2;
e1ac7791 WD	67	len -= 2;
	68	}
	69
	70	if (strlcpy(fbuf, fullpath, sizeof fbuf) >= sizeof fbuf)
	71	return -1;
	72
	73	rel = fbuf + len;
	74	end = p = rel + strlen(rel);
de0e2250 WD	75
	76	/* Try to find an existing dir, starting from the deepest dir. */
	77	while (1) {
e1ac7791 WD	78	if (--p == fbuf)
e1ac7791 WD	79	return -1;
de0e2250 WD	80	if (*p == '/') {
de0e2250 WD	81	*p = '\0';
e1ac7791	82	if (mkdir_defmode(fbuf) == 0)
de0e2250 WD	83	break;
de0e2250 WD	84	if (errno != ENOENT) {
d62bcc17 WD	85	rsyserr(FERROR, errno,
d62bcc17 WD	86	"make_bak_dir mkdir %s failed",
e1ac7791 WD	87	full_fname(fbuf));
e1ac7791 WD	88	return -1;
de0e2250 WD	89	}
de0e2250 WD	90	}
47d6a60c	91	}
de0e2250 WD	92
	93	/* Make all the dirs that we didn't find on the way here. */
	94	while (1) {
	95	if (p >= rel) {
	96	/* Try to transfer the directory settings of the
	97	* actual dir that the files are coming from. */
09ca0d15	98	init_stat_x(&sx);
9439c0cb	99	if (x_stat(rel, &sx.st, NULL) < 0) {
d62bcc17 WD	100	rsyserr(FERROR, errno,
	101	"make_bak_dir stat %s failed",
	102	full_fname(rel));
de0e2250	103	} else {
1c3344a1 WD	104	if (!(file = make_file(rel, NULL, NULL, 0, NO_FILTERS)))
	105	continue;
	106	#ifdef SUPPORT_ACLS
	107	if (preserve_acls && !S_ISLNK(file->mode)) {
	108	get_acl(rel, &sx);
cb197514	109	cache_tmp_acl(file, &sx);
1c3344a1 WD	110	free_acl(&sx);
1c3344a1 WD	111	}
1e999f9f	112	#endif
16edf865 WD	113	#ifdef SUPPORT_XATTRS
	114	if (preserve_xattrs) {
	115	get_xattr(rel, &sx);
cb197514	116	cache_tmp_xattr(file, &sx);
16edf865 WD	117	free_xattr(&sx);
	118	}
	119	#endif
e1ac7791	120	set_file_attrs(fbuf, file, NULL, NULL, 0);
b13505da	121	unmake_file(file);
cb197514 WD	122	#ifdef SUPPORT_ACLS
	123	uncache_tmp_acls();
	124	#endif
	125	#ifdef SUPPORT_XATTRS
	126	uncache_tmp_xattrs();
	127	#endif
47d6a60c S	128	}
47d6a60c S	129	}
de0e2250 WD	130	*p = '/';
	131	p += strlen(p);
	132	if (p == end)
	133	break;
e1ac7791	134	if (mkdir_defmode(fbuf) < 0) {
d62bcc17	135	rsyserr(FERROR, errno, "make_bak_dir mkdir %s failed",
e1ac7791 WD	136	full_fname(fbuf));
e1ac7791 WD	137	return -1;
de0e2250	138	}
47d6a60c	139	}
de0e2250	140
e1ac7791	141	return 0;
378a074c AT	142	}
378a074c AT	143
21cddef2 WD	144	/* Has same return codes as make_backup(). */
	145	static inline int link_or_rename(const char from, const char to,
	146	BOOL prefer_rename, STRUCT_STAT *stp)
66203a98	147	{
21cddef2 WD	148	if (S_ISLNK(stp->st_mode)) {
	149	if (prefer_rename)
	150	goto do_rename;
	151	#ifndef CAN_HARDLINK_SYMLINK
	152	return 0; /* Use copy code. */
	153	#endif
	154	}
	155	if (IS_SPECIAL(stp->st_mode) \|\| IS_DEVICE(stp->st_mode)) {
	156	if (prefer_rename)
	157	goto do_rename;
	158	#ifndef CAN_HARDLINK_SPECIAL
	159	return 0; /* Use copy code. */
	160	#endif
	161	}
	162	#ifdef SUPPORT_HARD_LINKS
	163	if (!S_ISDIR(stp->st_mode)) {
	164	if (do_link(from, to) == 0)
	165	return 2;
	166	return 0;
	167	}
	168	#endif
	169	do_rename:
	170	if (do_rename(from, to) == 0) {
	171	if (stp->st_nlink > 1 && !S_ISDIR(stp->st_mode)) {
	172	/* If someone has hard-linked the file into the backup
	173	* dir, rename() might return success but do nothing! */
	174	robust_unlink(to); /* Just in case... */
f1ca7c44	175	}
21cddef2	176	return 1;
f1ca7c44	177	}
62c9e6b3	178	return 0;
de0e2250	179	}
66203a98	180
21cddef2 WD	181	/* Hard-link, rename, or copy an item to the backup name. Returns 2 if item
	182	* was duplicated into backup area, 1 if item was moved, or 0 for failure.*/
	183	int make_backup(const char *fname, BOOL prefer_rename)
66203a98	184	{
13710874	185	stat_x sx;
66203a98	186	struct file_struct *file;
21cddef2 WD	187	int save_preserve_xattrs;
	188	char *buf = get_backup_name(fname);
	189	int ret = 0;
	190
	191	if (!buf)
	192	return 0;
378a074c	193
09ca0d15 WD	194	init_stat_x(&sx);
09ca0d15 WD	195	/* Return success if no file to keep. */
9439c0cb	196	if (x_lstat(fname, &sx.st, NULL) < 0)
9fd62d15	197	return 1;
66203a98	198
21cddef2 WD	199	/* Try a hard-link or a rename first. Using rename is not atomic, but
	200	* is more efficient than forcing a copy for larger files when no hard-
	201	* linking is possible. */
	202	if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
	203	goto success;
	204	if (errno == EEXIST) {
	205	STRUCT_STAT bakst;
	206	if (do_lstat(buf, &bakst) == 0) {
	207	int flags = get_del_for_flag(bakst.st_mode) \| DEL_FOR_BACKUP \| DEL_RECURSE;
	208	if (delete_item(buf, bakst.st_mode, flags) != 0)
	209	return 0;
	210	}
	211	if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
	212	goto success;
	213	} else if (backup_dir && errno == ENOENT) {
	214	/* If the backup dir is missing, try again after making it. */
	215	if (make_bak_dir(buf) != 0)
	216	return 0;
	217	if ((ret = link_or_rename(fname, buf, prefer_rename, &sx.st)) != 0)
	218	goto success;
82ad07c4	219	}
378a074c	220
21cddef2 WD	221	/* Fall back to making a copy. */
	222	if (!(file = make_file(fname, NULL, &sx.st, 0, NO_FILTERS)))
	223	return 1; /* the file could have disappeared */
	224
1c3344a1 WD	225	#ifdef SUPPORT_ACLS
	226	if (preserve_acls && !S_ISLNK(file->mode)) {
	227	get_acl(fname, &sx);
cb197514	228	cache_tmp_acl(file, &sx);
1c3344a1 WD	229	free_acl(&sx);
	230	}
	231	#endif
16edf865 WD	232	#ifdef SUPPORT_XATTRS
	233	if (preserve_xattrs) {
	234	get_xattr(fname, &sx);
cb197514	235	cache_tmp_xattr(file, &sx);
16edf865 WD	236	free_xattr(&sx);
	237	}
	238	#endif
1c3344a1	239
378a074c	240	/* Check to see if this is a device file, or link */
b5c6a6ae WD	241	if ((am_root && preserve_devices && IS_DEVICE(file->mode))
b5c6a6ae WD	242	\|\| (preserve_specials && IS_SPECIAL(file->mode))) {
88e05f84	243	int save_errno;
a64f19e2	244	if (do_mknod(buf, file->mode, sx.st.st_rdev) < 0) {
88e05f84	245	save_errno = errno ? errno : EINVAL; /* 0 paranoia */
f1ca7c44	246	if (errno == ENOENT && make_bak_dir(buf) == 0) {
a64f19e2	247	if (do_mknod(buf, file->mode, sx.st.st_rdev) < 0)
f1ca7c44 WD	248	save_errno = errno ? errno : save_errno;
	249	else
	250	save_errno = 0;
	251	}
	252	if (save_errno) {
	253	rsyserr(FERROR, save_errno, "mknod %s failed",
	254	full_fname(buf));
	255	}
88e05f84 WD	256	} else
88e05f84 WD	257	save_errno = 0;
951e826b	258	if (DEBUG_GTE(BACKUP, 1) && save_errno == 0) {
93e28fbd	259	rprintf(FINFO, "make_backup: DEVICE %s successful.\n",
45c49b52	260	fname);
47d6a60c	261	}
21cddef2	262	ret = 2;
47d6a60c	263	}
378a074c	264
21cddef2 WD	265	if (!ret && S_ISDIR(file->mode)) {
21cddef2 WD	266	int ret_code;
378a074c	267	/* make an empty directory */
f1ca7c44 WD	268	if (do_mkdir(buf, file->mode) < 0) {
	269	int save_errno = errno ? errno : EINVAL; /* 0 paranoia */
	270	if (errno == ENOENT && make_bak_dir(buf) == 0) {
	271	if (do_mkdir(buf, file->mode) < 0)
	272	save_errno = errno ? errno : save_errno;
	273	else
	274	save_errno = 0;
	275	}
	276	if (save_errno) {
	277	rsyserr(FINFO, save_errno, "mkdir %s failed",
	278	full_fname(buf));
	279	}
377dbd20	280	}
47d6a60c	281
377dbd20	282	ret_code = do_rmdir(fname);
951e826b	283	if (DEBUG_GTE(BACKUP, 1)) {
ea42541f WD	284	rprintf(FINFO, "make_backup: RMDIR %s returns %i\n",
ea42541f WD	285	full_fname(fname), ret_code);
47d6a60c	286	}
21cddef2	287	ret = 2;
47d6a60c	288	}
378a074c	289
4f5b0756	290	#ifdef SUPPORT_LINKS
21cddef2	291	if (!ret && preserve_links && S_ISLNK(file->mode)) {
82ad07c4	292	const char *sl = F_SYMLINK(file);
e6f3a33c	293	if (safe_symlinks && unsafe_symlink(sl, fname)) {
951e826b	294	if (INFO_GTE(SYMSAFE, 1)) {
47d6a60c	295	rprintf(FINFO, "ignoring unsafe symlink %s -> %s\n",
82ad07c4	296	full_fname(buf), sl);
47d6a60c	297	}
21cddef2	298	ret = 2;
93e28fbd	299	} else {
f1ca7c44 WD	300	if (do_symlink(sl, buf) < 0) {
	301	int save_errno = errno ? errno : EINVAL; /* 0 paranoia */
	302	if (errno == ENOENT && make_bak_dir(buf) == 0) {
	303	if (do_symlink(sl, buf) < 0)
	304	save_errno = errno ? errno : save_errno;
	305	else
	306	save_errno = 0;
	307	}
	308	if (save_errno) {
	309	rsyserr(FERROR, save_errno, "link %s -> \"%s\"",
	310	full_fname(buf), sl);
	311	}
93e28fbd	312	}
21cddef2	313	ret = 2;
47d6a60c	314	}
47d6a60c	315	}
378a074c	316	#endif
378a074c	317
21cddef2	318	if (!ret && !S_ISREG(file->mode)) {
47d6a60c	319	rprintf(FINFO, "make_bak: skipping non-regular file %s\n",
45c49b52	320	fname);
82ad07c4	321	unmake_file(file);
cb197514 WD	322	#ifdef SUPPORT_ACLS
	323	uncache_tmp_acls();
	324	#endif
	325	#ifdef SUPPORT_XATTRS
	326	uncache_tmp_xattrs();
	327	#endif
21cddef2	328	return 2;
47d6a60c	329	}
66203a98	330
21cddef2 WD	331	/* Copy to backup tree if a file. */
	332	if (!ret) {
	333	if (copy_file(fname, buf, -1, file->mode, 1) < 0) {
d62bcc17	334	rsyserr(FERROR, errno, "keep_backup failed: %s -> \"%s\"",
45c49b52	335	full_fname(fname), buf);
21cddef2	336	unmake_file(file);
cb197514 WD	337	#ifdef SUPPORT_ACLS
	338	uncache_tmp_acls();
	339	#endif
	340	#ifdef SUPPORT_XATTRS
	341	uncache_tmp_xattrs();
	342	#endif
21cddef2	343	return 0;
47d6a60c	344	}
21cddef2	345	ret = 2;
47d6a60c	346	}
21cddef2 WD	347
21cddef2 WD	348	save_preserve_xattrs = preserve_xattrs;
e9489cd6	349	preserve_xattrs = 0;
16edf865	350	set_file_attrs(buf, file, NULL, fname, 0);
e9489cd6	351	preserve_xattrs = save_preserve_xattrs;
21cddef2	352
82ad07c4	353	unmake_file(file);
cb197514 WD	354	#ifdef SUPPORT_ACLS
	355	uncache_tmp_acls();
	356	#endif
	357	#ifdef SUPPORT_XATTRS
	358	uncache_tmp_xattrs();
	359	#endif
378a074c	360
21cddef2	361	success:
951e826b	362	if (INFO_GTE(BACKUP, 1)) {
4875d6b6	363	rprintf(FINFO, "backed up %s to %s\n",
45c49b52	364	fname, buf);
4875d6b6	365	}
21cddef2	366	return ret;
66203a98	367	}