X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=bacula%2Fsrc%2Ffindlib%2Fcreate_file.c;h=ab8afd2ff55cf6570ae60683b76add4e18c9cd2f;hb=e34a533319e7b947448eb90eb1a269958190e7b1;hp=e8d76730693022338b15a19d2da210056be19f6b;hpb=03cfd51f6a0ca63dc7105f84901558249b9937b2;p=bacula%2Fbacula diff --git a/bacula/src/findlib/create_file.c b/bacula/src/findlib/create_file.c index e8d7673069..ab8afd2ff5 100644 --- a/bacula/src/findlib/create_file.c +++ b/bacula/src/findlib/create_file.c @@ -1,29 +1,37 @@ /* - * Create a file, and reset the modes - * - * Kern Sibbald, November MM - * - * Version $Id$ - * - */ -/* - Copyright (C) 2000-2003 Kern Sibbald and John Walker + Bacula® - The Network Backup Solution + + Copyright (C) 2000-2011 Free Software Foundation Europe e.V. - 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. + The main author of Bacula is Kern Sibbald, with contributions from + many others, a complete list can be found in the file AUTHORS. + This program is Free Software; you can redistribute it and/or + modify it under the terms of version three of the GNU Affero General Public + License as published by the Free Software Foundation and included + in the file LICENSE. - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of + 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., 59 Temple Place - Suite 330, Boston, - MA 02111-1307, USA. + You should have received a copy of the GNU Affero General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + 02110-1301, USA. + Bacula® is a registered trademark of Kern Sibbald. + The licensor of Bacula is the Free Software Foundation Europe + (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich, + Switzerland, email:ftf@fsfeurope.org. +*/ +/* + * Create a file, and reset the modes + * + * Kern Sibbald, November MM + * + * Version $Id$ + * */ #include "bacula.h" @@ -38,186 +46,363 @@ #define O_CTG 0 #endif +static int separate_path_and_file(JCR *jcr, char *fname, char *ofile); +static int path_already_seen(JCR *jcr, char *path, int pnl); + /* * Create the file, or the directory * - * fname is the original filename + * fname is the original filename * ofile is the output filename (may be in a different directory) * - * Returns: CF_SKIP if file should be skipped - * CF_ERROR on error - * CF_EXTRACT file created and data to restore - * CF_CREATED file created no data to restore + * Returns: CF_SKIP if file should be skipped + * CF_ERROR on error + * CF_EXTRACT file created and data to restore + * CF_CREATED file created no data to restore * * Note, we create the file here, except for special files, - * we do not set the attributes because we want to first + * we do not set the attributes because we want to first * write the file, then when the writing is done, set the * attributes. - * So, we return with the file descriptor open for normal + * So, we return with the file descriptor open for normal * files. * */ -int create_file(void *jcr, char *fname, char *ofile, char *lname, - int type, int stream, struct stat *statp, - char *attribsEx, int *ofd, int replace) +int create_file(JCR *jcr, ATTR *attr, BFILE *bfd, int replace) { - int new_mode, parent_mode, mode; + mode_t new_mode, parent_mode; + int flags; uid_t uid; gid_t gid; - int stat = 0; - int fnl, pnl; - char *f, *p, savechr; + int pnl; + bool exists = false; + struct stat mstatp; - *ofd = -1; - new_mode = statp->st_mode; - Dmsg2(300, "newmode=%x file=%s\n", new_mode, ofile); + bfd->reparse_point = false; + if (is_win32_stream(attr->data_stream)) { + set_win32_backup(bfd); + } else { + set_portable_backup(bfd); + } + + new_mode = attr->statp.st_mode; + Dmsg3(200, "type=%d newmode=%x file=%s\n", attr->type, new_mode, attr->ofname); parent_mode = S_IWUSR | S_IXUSR | new_mode; - gid = statp->st_gid; - uid = statp->st_uid; - - Dmsg2(400, "Replace=%c %d\n", (char)replace, replace); - /* If not always replacing, do a stat and decide */ - if (replace != REPLACE_ALWAYS) { - struct stat mstatp; - if (lstat(ofile, &mstatp) == 0) { - switch (replace) { - case REPLACE_IFNEWER: - if (statp->st_mtime <= mstatp.st_mtime) { - Jmsg(jcr, M_SKIPPED, 0, _("File skipped. Not newer: %s\n"), ofile); - return CF_SKIP; - } - break; - case REPLACE_IFOLDER: - if (statp->st_mtime >= mstatp.st_mtime) { - Jmsg(jcr, M_SKIPPED, 0, _("File skipped. Not older: %s\n"), ofile); - return CF_SKIP; - } - break; - case REPLACE_NEVER: - Jmsg(jcr, M_SKIPPED, 0, _("File skipped. Already exists: %s\n"), ofile); - return CF_SKIP; - } + gid = attr->statp.st_gid; + uid = attr->statp.st_uid; + +#ifdef HAVE_WIN32 + if (!bfd->use_backup_api) { + // eliminate invalid windows filename characters from foreign filenames + char *ch = (char *)attr->ofname; + if (ch[0] != 0 && ch[1] != 0) { + ch += 2; + while (*ch) { + switch (*ch) { + case ':': + case '<': + case '>': + case '*': + case '?': + case '|': + *ch = '_'; + break; + } + ch++; + } } } - switch (type) { - case FT_LNKSAVED: /* Hard linked, file already saved */ - Dmsg2(130, "Hard link %s => %s\n", ofile, lname); - if (link(lname, ofile) != 0) { - Jmsg3(jcr, M_ERROR, 0, _("Could not hard link %s ==> %s: ERR=%s\n"), - ofile, lname, strerror(errno)); - return CF_ERROR; - } - break; - case FT_REGE: /* empty file */ - case FT_REG: /* regular file */ - /* Separate pathname and filename */ - for (p=f=ofile; *p; p++) { - if (*p == '/') { - f = p; /* possible filename */ - } +#endif + Dmsg3(200, "Create %s Replace=%c FT=%d\n", attr->ofname, (char)replace, attr->type); + if (lstat(attr->ofname, &mstatp) == 0) { + exists = true; + /* + * For directories we do not apply the replace options, because + * we must always create directories that do not exist, and thus + * when the directory end record comes, the directory exists. So + * we always apply the FT_DIREND record for directories. + */ + if (attr->type != FT_DIREND) { + switch (replace) { + case REPLACE_IFNEWER: + if (attr->statp.st_mtime <= mstatp.st_mtime) { + Qmsg(jcr, M_SKIPPED, 0, _("File skipped. Not newer: %s\n"), attr->ofname); + return CF_SKIP; + } + break; + + case REPLACE_IFOLDER: + if (attr->statp.st_mtime >= mstatp.st_mtime) { + Qmsg(jcr, M_SKIPPED, 0, _("File skipped. Not older: %s\n"), attr->ofname); + return CF_SKIP; + } + break; + + case REPLACE_NEVER: + Qmsg(jcr, M_SKIPPED, 0, _("File skipped. Already exists: %s\n"), attr->ofname); + return CF_SKIP; + + case REPLACE_ALWAYS: + break; + } } - if (*f == '/') { - f++; + } + switch (attr->type) { + case FT_RAW: /* raw device to be written */ + case FT_FIFO: /* FIFO to be written to */ + case FT_LNKSAVED: /* Hard linked, file already saved */ + case FT_LNK: + case FT_SPEC: /* fifo, ... to be backed up */ + case FT_REGE: /* empty file */ + case FT_REG: /* regular file */ + /* + * Note, we do not delete FT_RAW because these are device files + * or FIFOs that should already exist. If we blow it away, + * we may blow away a FIFO that is being used to read the + * restore data, or we may blow away a partition definition. + */ + if (exists && attr->type != FT_RAW && attr->type != FT_FIFO) { + /* Get rid of old copy */ + Dmsg1(400, "unlink %s\n", attr->ofname); + if (unlink(attr->ofname) == -1) { + berrno be; + Qmsg(jcr, M_ERROR, 0, _("File %s already exists and could not be replaced. ERR=%s.\n"), + attr->ofname, be.bstrerror()); + /* Continue despite error */ + } } - - fnl = p - f; - if (fnl == 0) { - /* The filename length must not be zero here because we - * are dealing with a file (i.e. FT_REGE or FT_REG). - */ - Jmsg1(jcr, M_ERROR, 0, _("Zero length filename: %s\n"), fname); - return CF_ERROR; + /* + * Here we do some preliminary work for all the above + * types to create the path to the file if it does + * not already exist. Below, we will split to + * do the file type specific work + */ + pnl = separate_path_and_file(jcr, attr->fname, attr->ofname); + if (pnl < 0) { + return CF_ERROR; } - pnl = f - ofile - 1; - /* * If path length is <= 0 we are making a file in the root * directory. Assume that the directory already exists. */ if (pnl > 0) { - savechr = ofile[pnl]; - ofile[pnl] = 0; /* terminate path */ - - Dmsg1(50, "Make path %s\n", ofile); - /* - * If we need to make the directory, ensure that it is with - * execute bit set (i.e. parent_mode), and preserve what already - * exists. Normally, this should do nothing. - */ - stat = !make_path(jcr, ofile, parent_mode, parent_mode, uid, gid, 1, NULL); - if (stat == 0) { - Dmsg1(0, "Could not make path. %s\n", ofile); - return CF_ERROR; - } - - ofile[pnl] = savechr; /* restore full name */ - } + char savechr; + savechr = attr->ofname[pnl]; + attr->ofname[pnl] = 0; /* terminate path */ - Dmsg1(100, "Create file %s\n", ofile); - mode = O_WRONLY | O_CREAT | O_TRUNC | O_BINARY; /* O_NOFOLLOW; */ - if (IS_CTG(statp->st_mode)) { - mode |= O_CTG; /* set contiguous bit if needed */ - } - Dmsg1(50, "Create file: %s\n", ofile); - if ((*ofd = open(ofile, mode, S_IRUSR | S_IWUSR)) < 0) { - Jmsg2(jcr, M_ERROR, 0, _("Could not create %s: ERR=%s\n"), ofile, strerror(errno)); - return CF_ERROR; + if (!path_already_seen(jcr, attr->ofname, pnl)) { + /* + * If we need to make the directory, ensure that it is with + * execute bit set (i.e. parent_mode), and preserve what already + * exists. Normally, this should do nothing. + */ + Dmsg1(400, "makepath %s\n", attr->ofname); + if (!makepath(attr, attr->ofname, parent_mode, parent_mode, uid, gid, 1)) { + Dmsg1(10, "Could not make path. %s\n", attr->ofname); + attr->ofname[pnl] = savechr; /* restore full name */ + return CF_ERROR; + } + } + attr->ofname[pnl] = savechr; /* restore full name */ } - return CF_EXTRACT; - case FT_LNK: - Dmsg2(130, "FT_LNK should restore: %s -> %s\n", ofile, lname); - if (symlink(lname, ofile) != 0 && errno != EEXIST) { - Jmsg3(jcr, M_ERROR, 0, _("Could not symlink %s -> %s: ERR=%s\n"), - ofile, lname, strerror(errno)); - return CF_ERROR; - } - return CF_CREATED; - case FT_DIR: - Dmsg2(300, "Make dir mode=%o dir=%s\n", new_mode, ofile); - if (make_path(jcr, ofile, new_mode, parent_mode, uid, gid, 0, NULL) != 0) { - Jmsg1(jcr, M_ERROR, 0, _("Could not make directory: %s\n"), ofile); - return CF_ERROR; + + /* Now we do the specific work for each file type */ + switch(attr->type) { + case FT_REGE: + case FT_REG: + Dmsg1(100, "Create=%s\n", attr->ofname); + flags = O_WRONLY | O_CREAT | O_TRUNC | O_BINARY; /* O_NOFOLLOW; */ + if (IS_CTG(attr->statp.st_mode)) { + flags |= O_CTG; /* set contiguous bit if needed */ + } + if (is_bopen(bfd)) { + Qmsg1(jcr, M_ERROR, 0, _("bpkt already open fid=%d\n"), bfd->fid); + bclose(bfd); + } + + + if ((bopen(bfd, attr->ofname, flags, S_IRUSR | S_IWUSR)) < 0) { + berrno be; + be.set_errno(bfd->berrno); + Qmsg2(jcr, M_ERROR, 0, _("Could not create %s: ERR=%s\n"), + attr->ofname, be.bstrerror()); + Dmsg2(100,"Could not create %s: ERR=%s\n", attr->ofname, be.bstrerror()); + return CF_ERROR; + } + return CF_EXTRACT; + +#ifndef HAVE_WIN32 // none of these exist in MS Windows + case FT_RAW: /* Bacula raw device e.g. /dev/sda1 */ + case FT_FIFO: /* Bacula fifo to save data */ + case FT_SPEC: + if (S_ISFIFO(attr->statp.st_mode)) { + Dmsg1(400, "Restore fifo: %s\n", attr->ofname); + if (mkfifo(attr->ofname, attr->statp.st_mode) != 0 && errno != EEXIST) { + berrno be; + Qmsg2(jcr, M_ERROR, 0, _("Cannot make fifo %s: ERR=%s\n"), + attr->ofname, be.bstrerror()); + return CF_ERROR; + } + } else if (S_ISSOCK(attr->statp.st_mode)) { + Dmsg1(200, "Skipping restore of socket: %s\n", attr->ofname); +#ifdef S_IFDOOR // Solaris high speed RPC mechanism + } else if (S_ISDOOR(attr->statp.st_mode)) { + Dmsg1(200, "Skipping restore of door file: %s\n", attr->ofname); +#endif +#ifdef S_IFPORT // Solaris event port for handling AIO + } else if (S_ISPORT(attr->statp.st_mode)) { + Dmsg1(200, "Skipping restore of event port file: %s\n", attr->ofname); +#endif + } else { + Dmsg1(400, "Restore node: %s\n", attr->ofname); + if (mknod(attr->ofname, attr->statp.st_mode, attr->statp.st_rdev) != 0 && errno != EEXIST) { + berrno be; + Qmsg2(jcr, M_ERROR, 0, _("Cannot make node %s: ERR=%s\n"), + attr->ofname, be.bstrerror()); + return CF_ERROR; + } + } + /* + * Here we are going to attempt to restore to a FIFO, which + * means that the FIFO must already exist, AND there must + * be some process already attempting to read from the + * FIFO, so we open it write-only. + */ + if (attr->type == FT_RAW || attr->type == FT_FIFO) { + btimer_t *tid; + Dmsg1(400, "FT_RAW|FT_FIFO %s\n", attr->ofname); + flags = O_WRONLY | O_BINARY; + /* Timeout open() in 60 seconds */ + if (attr->type == FT_FIFO) { + Dmsg0(400, "Set FIFO timer\n"); + tid = start_thread_timer(jcr, pthread_self(), 60); + } else { + tid = NULL; + } + if (is_bopen(bfd)) { + Qmsg1(jcr, M_ERROR, 0, _("bpkt already open fid=%d\n"), bfd->fid); + } + Dmsg2(400, "open %s flags=0x%x\n", attr->ofname, flags); + if ((bopen(bfd, attr->ofname, flags, 0)) < 0) { + berrno be; + be.set_errno(bfd->berrno); + Qmsg2(jcr, M_ERROR, 0, _("Could not open %s: ERR=%s\n"), + attr->ofname, be.bstrerror()); + Dmsg2(400, "Could not open %s: ERR=%s\n", attr->ofname, be.bstrerror()); + stop_thread_timer(tid); + return CF_ERROR; + } + stop_thread_timer(tid); + return CF_EXTRACT; + } + Dmsg1(400, "FT_SPEC %s\n", attr->ofname); + return CF_CREATED; + + case FT_LNK: + Dmsg2(130, "FT_LNK should restore: %s -> %s\n", attr->ofname, attr->olname); + if (symlink(attr->olname, attr->ofname) != 0 && errno != EEXIST) { + berrno be; + Qmsg3(jcr, M_ERROR, 0, _("Could not symlink %s -> %s: ERR=%s\n"), + attr->ofname, attr->olname, be.bstrerror()); + return CF_ERROR; + } + return CF_CREATED; + + case FT_LNKSAVED: /* Hard linked, file already saved */ + Dmsg2(130, "Hard link %s => %s\n", attr->ofname, attr->olname); + if (link(attr->olname, attr->ofname) != 0) { + berrno be; +#ifdef HAVE_CHFLAGS + struct stat s; + + /* + * If using BSD user flags, maybe has a file flag + * preventing this. So attempt to disable, retry link, + * and reset flags. + * Note that BSD securelevel may prevent disabling flag. + */ + + if (stat(attr->olname, &s) == 0 && s.st_flags != 0) { + if (chflags(attr->olname, 0) == 0) { + if (link(attr->olname, attr->ofname) != 0) { + /* restore original file flags even when linking failed */ + if (chflags(attr->olname, s.st_flags) < 0) { + Qmsg2(jcr, M_ERROR, 0, _("Could not restore file flags for file %s: ERR=%s\n"), + attr->olname, be.bstrerror()); + } +#endif /* HAVE_CHFLAGS */ + Qmsg3(jcr, M_ERROR, 0, _("Could not hard link %s -> %s: ERR=%s\n"), + attr->ofname, attr->olname, be.bstrerror()); + Dmsg3(200, "Could not hard link %s -> %s: ERR=%s\n", + attr->ofname, attr->olname, be.bstrerror()); + return CF_ERROR; +#ifdef HAVE_CHFLAGS + } + /* finally restore original file flags */ + if (chflags(attr->olname, s.st_flags) < 0) { + Qmsg2(jcr, M_ERROR, 0, _("Could not restore file flags for file %s: ERR=%s\n"), + attr->olname, be.bstrerror()); + } + } else { + Qmsg2(jcr, M_ERROR, 0, _("Could not reset file flags for file %s: ERR=%s\n"), + attr->olname, be.bstrerror()); + } + } else { + Qmsg3(jcr, M_ERROR, 0, _("Could not hard link %s -> %s: ERR=%s\n"), + attr->ofname, attr->olname, be.bstrerror()); + return CF_ERROR; + } +#endif /* HAVE_CHFLAGS */ + + } + return CF_CREATED; +#endif + } /* End inner switch */ + + case FT_REPARSE: + case FT_JUNCTION: + bfd->reparse_point = true; + /* Fall through wanted */ + case FT_DIRBEGIN: + case FT_DIREND: + Dmsg2(200, "Make dir mode=%o dir=%s\n", new_mode, attr->ofname); + if (!makepath(attr, attr->ofname, new_mode, parent_mode, uid, gid, 0)) { + return CF_ERROR; } - return CF_CREATED; - case FT_RAW: - case FT_FIFO: - case FT_SPEC: - if (S_ISFIFO(statp->st_mode)) { - Dmsg1(200, "Restore fifo: %s\n", ofile); - if (mkfifo(ofile, statp->st_mode) != 0 && errno != EEXIST) { - Jmsg2(jcr, M_ERROR, 0, _("Cannot make fifo %s: ERR=%s\n"), ofile, strerror(errno)); - return CF_ERROR; - } - } else { - Dmsg1(200, "Restore node: %s\n", ofile); - if (mknod(ofile, statp->st_mode, statp->st_rdev) != 0 && errno != EEXIST) { - Jmsg2(jcr, M_ERROR, 0, _("Cannot make node %s: ERR=%s\n"), ofile, strerror(errno)); - return CF_ERROR; - } - } - if (type == FT_RAW || type == FT_FIFO) { - btimer_id tid; - Dmsg1(200, "FT_RAW|FT_FIFO %s\n", ofile); - mode = O_WRONLY | O_BINARY; - /* Timeout open() in 60 seconds */ - if (type == FT_FIFO) { - tid = start_thread_timer(pthread_self(), 60); - } else { - tid = NULL; - } - if ((*ofd = open(ofile, mode)) < 0) { - Jmsg2(jcr, M_ERROR, 0, _("Could not open %s: ERR=%s\n"), ofile, strerror(errno)); - stop_thread_timer(tid); - return CF_ERROR; - } - stop_thread_timer(tid); - return CF_EXTRACT; + /* + * If we are using the Win32 Backup API, we open the + * directory so that the security info will be read + * and saved. + */ + if (!is_portable_backup(bfd)) { + if (is_bopen(bfd)) { + Qmsg1(jcr, M_ERROR, 0, _("bpkt already open fid=%d\n"), bfd->fid); + } + if ((bopen(bfd, attr->ofname, O_WRONLY|O_BINARY, 0)) < 0) { + berrno be; + be.set_errno(bfd->berrno); +#ifdef HAVE_WIN32 + /* Check for trying to create a drive, if so, skip */ + if (attr->ofname[1] == ':' && + IsPathSeparator(attr->ofname[2]) && + attr->ofname[3] == '\0') { + return CF_SKIP; + } +#endif + Qmsg2(jcr, M_ERROR, 0, _("Could not open %s: ERR=%s\n"), + attr->ofname, be.bstrerror()); + return CF_ERROR; + } + return CF_EXTRACT; + } else { + return CF_CREATED; } - Dmsg1(200, "FT_SPEC %s\n", ofile); - return CF_CREATED; + case FT_DELETED: + Qmsg2(jcr, M_INFO, 0, _("Original file %s have been deleted: type=%d\n"), attr->fname, attr->type); + break; /* The following should not occur */ case FT_NOACCESS: case FT_NOFOLLOW: @@ -228,9 +413,73 @@ int create_file(void *jcr, char *fname, char *ofile, char *lname, case FT_NORECURSE: case FT_NOFSCHG: case FT_NOOPEN: - Jmsg2(jcr, M_ERROR, 0, _("Original file %s not saved. Stat=%d\n"), fname, type); + Qmsg2(jcr, M_ERROR, 0, _("Original file %s not saved: type=%d\n"), attr->fname, attr->type); + break; default: - Jmsg2(jcr, M_ERROR, 0, _("Unknown file type %d; not restored: %s\n"), type, fname); + Qmsg2(jcr, M_ERROR, 0, _("Unknown file type %d; not restored: %s\n"), attr->type, attr->fname); + break; } return CF_ERROR; } + +/* + * Returns: > 0 index into path where last path char is. + * 0 no path + * -1 filename is zero length + */ +static int separate_path_and_file(JCR *jcr, char *fname, char *ofile) +{ + char *f, *p, *q; + int fnl, pnl; + + /* Separate pathname and filename */ + for (q=p=f=ofile; *p; p++) { +#ifdef HAVE_WIN32 + if (IsPathSeparator(*p)) { + f = q; + if (IsPathSeparator(p[1])) { + p++; + } + } + *q++ = *p; /* copy data */ +#else + if (IsPathSeparator(*p)) { + f = q; /* possible filename */ + } + q++; +#endif + } + + if (IsPathSeparator(*f)) { + f++; + } + *q = 0; /* terminate string */ + + fnl = q - f; + if (fnl == 0) { + /* The filename length must not be zero here because we + * are dealing with a file (i.e. FT_REGE or FT_REG). + */ + Jmsg1(jcr, M_ERROR, 0, _("Zero length filename: %s\n"), fname); + return -1; + } + pnl = f - ofile - 1; + return pnl; +} + +/* + * Primitive caching of path to prevent recreating a pathname + * each time as long as we remain in the same directory. + */ +static int path_already_seen(JCR *jcr, char *path, int pnl) +{ + if (!jcr->cached_path) { + jcr->cached_path = get_pool_memory(PM_FNAME); + } + if (jcr->cached_pnl == pnl && strcmp(path, jcr->cached_path) == 0) { + return 1; + } + pm_strcpy(jcr->cached_path, path); + jcr->cached_pnl = pnl; + return 0; +}