git.sur5r.net Git - bacula/bacula/blob - bacula/src/findlib/create_file.c

   1 /*
   2  *  Create a file, and reset the modes
   3  *
   4  *    Kern Sibbald, November MM
   5  *
   6  *   Version $Id$
   7  *
   8  */
   9 /*
  10    Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
  11
  12    This program is free software; you can redistribute it and/or
  13    modify it under the terms of the GNU General Public License as
  14    published by the Free Software Foundation; either version 2 of
  15    the License, or (at your option) any later version.
  16
  17    This program is distributed in the hope that it will be useful,
  18    but WITHOUT ANY WARRANTY; without even the implied warranty of
  19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  20    General Public License for more details.
  21
  22    You should have received a copy of the GNU General Public
  23    License along with this program; if not, write to the Free
  24    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  25    MA 02111-1307, USA.
  26
  27  */
  28
  29 #include "bacula.h"
  30 #include "find.h"
  31
  32 #ifndef S_IRWXUGO
  33 #define S_IRWXUGO (S_IRWXU | S_IRWXG | S_IRWXO)
  34 #endif
  35
  36 #ifndef IS_CTG
  37 #define IS_CTG(x) 0
  38 #define O_CTG 0
  39 #endif
  40
  41
  42 /*
  43  * Create the file, or the directory
  44  *
  45  *  fname is the original filename
  46  *  ofile is the output filename (may be in a different directory)
  47  *
  48  * Returns:  1 on success
  49  *           0 on failure
  50  *
  51  *   Note, we create the file here, except for special files,
  52  *     we do not set the attributes because we want to first
  53  *     write the file, then when the writing is done, set the
  54  *     attributes.
  55  *   So, we return with the file descriptor open for normal
  56  *     files.
  57  *
  58  */
  59 int create_file(void *jcr, char *fname, char *ofile, char *lname,
  60                 int type, int stream, struct stat *statp,
  61                 char *attribsEx, int *ofd)
  62 {
  63    int new_mode, parent_mode, mode;
  64    uid_t uid;
  65    gid_t gid;
  66    int stat = 0;
  67    int fnl, pnl;
  68    char *f, *p, savechr;
  69
  70    *ofd = -1;
  71 /*
  72  * new_mode = S_IRWXUGO & ~umask(0);
  73  */
  74    new_mode = statp->st_mode;
  75    Dmsg2(300, "newmode=%x file=%s\n", new_mode, ofile);
  76    parent_mode = S_IWUSR | S_IXUSR | new_mode;
  77    gid = statp->st_gid;
  78    uid = statp->st_uid;
  79
  80    switch (type) {
  81    case FT_LNKSAVED:                  /* Hard linked, file already saved */
  82       Dmsg2(130, "Hard link %s => %s\n", ofile, lname);
  83       if (link(lname, ofile) != 0) {
  84          Jmsg3(jcr, M_ERROR, 0, "Could not hard link %s ==> %s: ERR=%s\n",
  85                ofile, lname, strerror(errno));
  86       }
  87       break;
  88    case FT_REGE:                      /* empty file */
  89    case FT_REG:                       /* regular file */
  90       /* Separate pathname and filename */
  91       for (p=f=ofile; *p; p++) {
  92          if (*p == '/') {
  93             f = p;                    /* possible filename */
  94          }
  95       }
  96       if (*f == '/') {
  97          f++;
  98       }
  99
 100       fnl = p - f;
 101       if (fnl == 0) {
 102          Jmsg1(jcr, M_ERROR, 0, "Zero length filename: %s\n", fname);
 103          return 0;
 104       }
 105
 106       pnl = f - ofile - 1;
 107       if (pnl <= 0) {
 108          Jmsg1(jcr, M_ERROR, 0, "Zero length path: %s\n", fname);
 109          return 0;
 110       }
 111       savechr = ofile[pnl];
 112       ofile[pnl] = 0;                 /* terminate path */
 113
 114       Dmsg1(50, "Make path %s\n", ofile);
 115       /*
 116        * If we need to make the directory, ensure that it is with
 117        * execute bit set (i.e. parent_mode), and preserve what already
 118        * exists. Normally, this should do nothing.
 119        */
 120       stat = !make_path(jcr, ofile, parent_mode, parent_mode, uid, gid, 1, NULL);
 121       if (stat == 0) {
 122          Dmsg1(0, "Could not make path. %s\n", ofile);
 123          return 0;
 124       }
 125
 126       ofile[pnl] = savechr;           /* restore full name */
 127       Dmsg1(100, "Create file %s\n", ofile);
 128       mode =  O_WRONLY | O_CREAT | O_TRUNC;
 129       if (IS_CTG(statp->st_mode)) {
 130          mode |= O_CTG;               /* set contiguous bit if needed */
 131       }
 132       Dmsg1(50, "Create file: %s\n", ofile);
 133       if ((*ofd = open(ofile, mode, S_IRUSR | S_IWUSR)) < 0) {
 134          Jmsg2(jcr, M_ERROR, 0, "Could not create %s: ERR=%s\n", ofile, strerror(errno));
 135          return 0;
 136       }
 137       return 1;
 138    case FT_LNK:
 139       Dmsg2(130, "FT_LNK should restore: %s -> %s\n", ofile, lname);
 140       if (symlink(lname, ofile) != 0 && errno != EEXIST) {
 141          Jmsg3(jcr, M_ERROR, 0, "Could not symlink %s -> %s: ERR=%s\n",
 142             ofile, lname, strerror(errno));
 143       }
 144       return 0;
 145    case FT_DIR:
 146       Dmsg2(300, "Make dir mode=%o dir=%s\n", new_mode, ofile);
 147       if (make_path(jcr, ofile, new_mode, parent_mode, uid, gid, 0, NULL) != 0) {
 148          Jmsg1(jcr, M_ERROR, 0, "Could not make directory: %s\n", ofile);
 149       }
 150       return 0;
 151    case FT_SPEC:
 152       if (S_ISFIFO(statp->st_mode)) {
 153          Dmsg1(0, "Restore fifo: %s\n", ofile);
 154          if (mkfifo(ofile, statp->st_mode) != 0) {
 155             Jmsg2(jcr, M_ERROR, 0, "Cannot make fifo %s: ERR=%s\n", ofile, strerror(errno));
 156             return 0;
 157          }
 158       } else {
 159          Dmsg1(0, "Restore node: %s\n", ofile);
 160          if (mknod(ofile, statp->st_mode, statp->st_rdev) != 0) {
 161             Jmsg2(jcr, M_ERROR, 0, "Cannot make node %s: ERR=%s\n", ofile, strerror(errno));
 162             return 0;
 163          }
 164       }
 165       Dmsg1(0, "FT_SPEC %s\n", ofile);
 166       return 0;
 167
 168    /* The following should not occur */
 169    case FT_NOACCESS:
 170    case FT_NOFOLLOW:
 171    case FT_NOSTAT:
 172    case FT_DIRNOCHG:
 173    case FT_NOCHG:
 174    case FT_ISARCH:
 175    case FT_NORECURSE:
 176    case FT_NOFSCHG:
 177    case FT_NOOPEN:
 178       Jmsg2(jcr, M_ERROR, 0, "Original file %s not saved. Stat=%d\n", fname, type);
 179       return 0;
 180    default:
 181       Jmsg2(jcr, M_ERROR, 0, "Unknown file type %d; not restored: %s\n", type, fname);
 182       return 0;
 183    }
 184
 185    return 0;
 186 }