git.sur5r.net Git - bacula/bacula/blob - bacula/src/filed/backup.c

   1 /*
   2  *  Bacula File Daemon  backup.c  send file attributes and data
   3  *   to the Storage daemon.
   4  *
   5  *    Kern Sibbald, March MM
   6  *
   7  *   Version $Id$
   8  *
   9  */
  10 /*
  11    Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
  12
  13    This program is free software; you can redistribute it and/or
  14    modify it under the terms of the GNU General Public License as
  15    published by the Free Software Foundation; either version 2 of
  16    the License, or (at your option) any later version.
  17
  18    This program is distributed in the hope that it will be useful,
  19    but WITHOUT ANY WARRANTY; without even the implied warranty of
  20    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  21    General Public License for more details.
  22
  23    You should have received a copy of the GNU General Public
  24    License along with this program; if not, write to the Free
  25    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  26    MA 02111-1307, USA.
  27
  28  */
  29
  30 #include "bacula.h"
  31 #include "filed.h"
  32
  33 static int save_file(FF_PKT *ff_pkt, void *pkt);
  34
  35 /*
  36  * Find all the requested files and send them
  37  * to the Storage daemon.
  38  *
  39  */
  40 int blast_data_to_storage_daemon(JCR *jcr, char *addr)
  41 {
  42    BSOCK *sd;
  43    int stat = 1;
  44
  45    sd = jcr->store_bsock;
  46
  47    jcr->JobStatus = JS_Running;
  48
  49    Dmsg1(10, "bfiled: opened data connection %d to stored\n", sd->fd);
  50
  51    if (!bnet_set_buffer_size(sd, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_WRITE)) {
  52       return 0;
  53    }
  54
  55    jcr->buf_size = sd->msglen;
  56    /* Adjust for compression so that output buffer is
  57     * 12 bytes + 0.1% larger than input buffer plus 2 bytes.
  58     * Note, we adjust the read size to be smaller so that the
  59     * same output buffer can be used without growing it.
  60     */
  61    jcr->compress_buf_size = jcr->buf_size + ((jcr->buf_size+999) / 1000) + 14;
  62    jcr->compress_buf = get_memory(jcr->compress_buf_size);
  63
  64    Dmsg1(100, "set_find_options ff=%p\n", jcr->ff);
  65    set_find_options(jcr->ff, jcr->incremental, jcr->mtime);
  66    Dmsg0(10, "start find files\n");
  67
  68    /* Subroutine save_file() is called for each file */
  69    /* ***FIXME**** add FSM code */
  70    if (!find_files(jcr->ff, save_file, (void *)jcr)) {
  71       stat = 0;                       /* error */
  72    }
  73
  74    bnet_sig(sd, BNET_EOD);            /* end data connection */
  75
  76    if (jcr->big_buf) {
  77       free(jcr->big_buf);
  78       jcr->big_buf = NULL;
  79    }
  80    if (jcr->compress_buf) {
  81       free_pool_memory(jcr->compress_buf);
  82       jcr->compress_buf = NULL;
  83    }
  84    return stat;
  85 }
  86
  87 /*
  88  * Called here by find() for each file included.
  89  *
  90  *  *****FIXME*****   add FSMs File System Modules
  91  *
  92  *  Send the file and its data to the Storage daemon.
  93  */
  94 static int save_file(FF_PKT *ff_pkt, void *ijcr)
  95 {
  96    char attribs[MAXSTRING];
  97    int fid, stat, stream, len;
  98    struct MD5Context md5c;
  99    int gotMD5 = 0;
 100    unsigned char signature[16];
 101    BSOCK *sd;
 102    JCR *jcr = (JCR *)ijcr;
 103    POOLMEM *msgsave;
 104
 105    if (job_cancelled(jcr)) {
 106       return 0;
 107    }
 108
 109    sd = jcr->store_bsock;
 110    jcr->num_files_examined++;         /* bump total file count */
 111
 112    switch (ff_pkt->type) {
 113    case FT_LNKSAVED:                  /* Hard linked, file already saved */
 114       break;
 115    case FT_REGE:
 116       Dmsg1(30, "FT_REGE saving: %s\n", ff_pkt->fname);
 117       break;
 118    case FT_REG:
 119       Dmsg1(30, "FT_REG saving: %s\n", ff_pkt->fname);
 120       break;
 121    case FT_LNK:
 122       Dmsg2(30, "FT_LNK saving: %s -> %s\n", ff_pkt->fname, ff_pkt->link);
 123       break;
 124    case FT_DIR:
 125       Dmsg1(30, "FT_DIR saving: %s\n", ff_pkt->link);
 126       break;
 127    case FT_SPEC:
 128       Dmsg1(30, "FT_SPEC saving: %s\n", ff_pkt->fname);
 129       break;
 130    case FT_NOACCESS:
 131       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not access %s: ERR=%s"), ff_pkt->fname,
 132          strerror(ff_pkt->ff_errno));
 133       return 1;
 134    case FT_NOFOLLOW:
 135       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not follow link %s: ERR=%s\n"), ff_pkt->fname,
 136          strerror(ff_pkt->ff_errno));
 137       return 1;
 138    case FT_NOSTAT:
 139       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not stat %s: ERR=%s\n"), ff_pkt->fname,
 140          strerror(ff_pkt->ff_errno));
 141       return 1;
 142    case FT_DIRNOCHG:
 143    case FT_NOCHG:
 144       Jmsg(jcr, M_SKIPPED, -1,  _("     Unchanged file skipped: %s\n"), ff_pkt->fname);
 145       return 1;
 146    case FT_ISARCH:
 147       Jmsg(jcr, M_NOTSAVED, -1, _("     Archive file not saved: %s\n"), ff_pkt->fname);
 148       return 1;
 149    case FT_NORECURSE:
 150       Jmsg(jcr, M_SKIPPED, -1,  _("     Recursion turned off. Directory skipped: %s\n"),
 151          ff_pkt->fname);
 152       return 1;
 153    case FT_NOFSCHG:
 154       Jmsg(jcr, M_SKIPPED, -1,  _("     File system change prohibited. Directory skipped. %s\n"),
 155          ff_pkt->fname);
 156       return 1;
 157    case FT_NOOPEN:
 158       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not open directory %s: ERR=%s\n"), ff_pkt->fname,
 159          strerror(ff_pkt->ff_errno));
 160       return 1;
 161    default:
 162       Jmsg(jcr, M_ERROR, 0, _("Unknown file type %d; not saved: %s\n"), ff_pkt->type, ff_pkt->fname);
 163       return 1;
 164    }
 165
 166    if (ff_pkt->type != FT_LNKSAVED && S_ISREG(ff_pkt->statp.st_mode) &&
 167          ff_pkt->statp.st_size > 0) {
 168       if ((fid = open(ff_pkt->fname, O_RDONLY | O_BINARY)) < 0) {
 169          ff_pkt->ff_errno = errno;
 170          Jmsg(jcr, M_NOTSAVED, -1, _("Cannot open %s: ERR=%s.\n"), ff_pkt->fname, strerror(ff_pkt->ff_errno));
 171          return 1;
 172       }
 173    } else {
 174       fid = -1;
 175    }
 176
 177    Dmsg1(30, "bfiled: sending %s to stored\n", ff_pkt->fname);
 178    encode_stat(attribs, &ff_pkt->statp);
 179
 180    jcr->JobFiles++;                    /* increment number of files sent */
 181    len = strlen(ff_pkt->fname);
 182    jcr->last_fname = check_pool_memory_size(jcr->last_fname, len + 1);
 183    jcr->last_fname[len] = 0;          /* terminate properly before copy */
 184    strcpy(jcr->last_fname, ff_pkt->fname);
 185
 186    /*
 187     * Send Attributes header to Storage daemon
 188     *    <file-index> <stream> <info>
 189     */
 190 #ifndef NO_FD_SEND_TEST
 191    if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_UNIX_ATTRIBUTES)) {
 192       if (fid >= 0) {
 193          close(fid);
 194       }
 195       return 0;
 196    }
 197    Dmsg1(10, ">stored: attrhdr %s\n", sd->msg);
 198
 199    /*
 200     * Send file attributes to Storage daemon
 201     *   File_index
 202     *   File type
 203     *   Filename (full path)
 204     *   Encoded attributes
 205     *   Link name (if type==FT_LNK)
 206     * For a directory, link is the same as fname, but with trailing
 207     * slash. For a linked file, link is the link.
 208     */
 209    if (ff_pkt->type == FT_LNK) {
 210       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%s%c", jcr->JobFiles,
 211                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, ff_pkt->link, 0);
 212    } else if (ff_pkt->type == FT_DIR) {
 213       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles,
 214                ff_pkt->type, ff_pkt->link, 0, attribs, 0, 0);
 215    } else {
 216       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles,
 217                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, 0);
 218    }
 219
 220    Dmsg2(20, ">stored: attr len=%d: %s\n", sd->msglen, sd->msg);
 221    if (!stat) {
 222       if (fid >= 0) {
 223          close(fid);
 224       }
 225       return 0;
 226    }
 227    /* send data termination sentinel */
 228    bnet_sig(sd, BNET_EOD);
 229 #endif
 230
 231    /*
 232     * If the file has data, read it and send to the Storage daemon
 233     *
 234     */
 235    if (fid >= 0) {
 236
 237       Dmsg1(60, "Saving data, type=%d\n", ff_pkt->type);
 238       /*
 239        * Send Data header to Storage daemon
 240        *    <file-index> <stream> <info>
 241        */
 242
 243       stream = STREAM_FILE_DATA;
 244
 245 #ifdef HAVE_LIBZ
 246       if (ff_pkt->flags & FO_GZIP) {
 247          stream = STREAM_GZIP_DATA;
 248       }
 249 #endif
 250
 251 #ifndef NO_FD_SEND_TEST
 252       if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, stream)) {
 253          close(fid);
 254          return 0;
 255       }
 256       Dmsg1(10, ">stored: datahdr %s\n", sd->msg);
 257 #endif
 258
 259       if (ff_pkt->flags & FO_MD5) {
 260          MD5Init(&md5c);
 261       }
 262
 263       msgsave = sd->msg;
 264       while ((sd->msglen=read(fid, sd->msg, jcr->buf_size)) > 0) {
 265          if (ff_pkt->flags & FO_MD5) {
 266             MD5Update(&md5c, (unsigned char *)(sd->msg), sd->msglen);
 267             gotMD5 = 1;
 268          }
 269 #ifdef HAVE_LIBZ
 270          /* ***FIXME*** add compression level options */
 271          if (ff_pkt->flags & FO_GZIP) {
 272             uLong compress_len;
 273             compress_len = jcr->compress_buf_size; /* set max length */
 274             if (compress2((Bytef *)jcr->compress_buf, &compress_len,
 275                   (const Bytef *)sd->msg, (uLong)sd->msglen,
 276                   ff_pkt->GZIP_level)  != Z_OK) {
 277                Jmsg(jcr, M_ERROR, 0, _("Compression error\n"));
 278                sd->msg = msgsave;
 279                sd->msglen = 0;
 280                close(fid);
 281                return 0;
 282             }
 283             Dmsg2(100, "compressed len=%d uncompressed len=%d\n",
 284                compress_len, sd->msglen);
 285
 286             sd->msg = jcr->compress_buf; /* write compressed buffer */
 287             sd->msglen = compress_len;
 288 #ifndef NO_FD_SEND_TEST
 289             if (!bnet_send(sd)) {
 290                sd->msg = msgsave;     /* restore read buffer */
 291                sd->msglen = 0;
 292                close(fid);
 293                return 0;
 294             }
 295             Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
 296 #endif
 297             jcr->JobBytes += sd->msglen;
 298             sd->msg = msgsave;        /* restore read buffer */
 299             continue;
 300          }
 301 #endif
 302 #ifndef NO_FD_SEND_TEST
 303          if (!bnet_send(sd)) {
 304             close(fid);
 305             return 0;
 306          }
 307          Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
 308 #endif
 309          jcr->JobBytes += sd->msglen;
 310       } /* end while */
 311
 312       if (sd->msglen < 0) {
 313          Jmsg(jcr, M_ERROR, 0, _("Error during save reading ERR=%s\n"), ff_pkt->fname,
 314             strerror(ff_pkt->ff_errno));
 315       }
 316
 317       /* Send data termination poll signal to Storage daemon.
 318        *  NOTE possibly put this poll on a counter as specified
 319        *  by the user to improve efficiency (i.e. poll every
 320        *  other file, every third file, ...
 321        */
 322 #ifndef NO_FD_SEND_TEST
 323 #ifndef NO_POLL_TEST
 324       bnet_sig(sd, BNET_EOD_POLL);
 325       Dmsg0(30, "Send EndData_Poll\n");
 326       /* ***FIXME**** change to use bget_msg() */
 327       if (bnet_recv(sd) <= 0) {
 328          close(fid);
 329          return 0;
 330       } else {
 331          if (strcmp(sd->msg, "3000 OK\n") != 0) {
 332            Jmsg1(jcr, M_ERROR, 0, _("Job aborted by Storage daemon: %s\n"), sd->msg);
 333            close(fid);
 334            return 0;
 335          }
 336       }
 337 #else
 338       bnet_sig(sd, BNET_EOD);
 339 #endif
 340 #endif /* NO_FD_SEND_TEST */
 341       close(fid);                        /* close file */
 342    }
 343
 344
 345    /* Terminate any MD5 signature and send it to Storage daemon and the Director */
 346    if (gotMD5 && ff_pkt->flags & FO_MD5) {
 347       MD5Final(signature, &md5c);
 348 #ifndef NO_FD_SEND_TEST
 349       bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_MD5_SIGNATURE);
 350       Dmsg1(10, "bfiled>stored:header %s\n", sd->msg);
 351       memcpy(sd->msg, signature, 16);
 352       sd->msglen = 16;
 353       bnet_send(sd);
 354       bnet_sig(sd, BNET_EOD);         /* end of MD5 */
 355 #endif
 356       gotMD5 = 0;
 357    }
 358 #ifdef really_needed
 359    if (ff_pkt->type == FT_DIR) {
 360       Jmsg(jcr, M_SAVED, -1, _("     Directory saved normally: %s\n"), ff_pkt->link);
 361    } else {
 362       Jmsg(jcr, M_SAVED, -1, _("     File saved normally: %s\n"), ff_pkt->fname);
 363    }
 364 #endif
 365    return 1;
 366 }