]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/filed/backup.c
btape updates + documentation -- see kes09Oct02
[bacula/bacula] / 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(110, "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(110, "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       Dmsg2(130, "FT_LNKSAVED hard link: %s => %s\n", ff_pkt->fname, ff_pkt->link);
115       break;
116    case FT_REGE:
117       Dmsg1(130, "FT_REGE saving: %s\n", ff_pkt->fname);
118       break;
119    case FT_REG:
120       Dmsg1(130, "FT_REG saving: %s\n", ff_pkt->fname);
121       break;
122    case FT_LNK:
123       Dmsg2(130, "FT_LNK saving: %s -> %s\n", ff_pkt->fname, ff_pkt->link);
124       break;
125    case FT_DIR:
126       Dmsg1(130, "FT_DIR saving: %s\n", ff_pkt->link);
127       break;
128    case FT_SPEC:
129       Dmsg1(130, "FT_SPEC saving: %s\n", ff_pkt->fname);
130       break;
131    case FT_NOACCESS:
132       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not access %s: ERR=%s\n"), ff_pkt->fname, 
133          strerror(ff_pkt->ff_errno));
134       return 1;
135    case FT_NOFOLLOW:
136       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not follow link %s: ERR=%s\n"), ff_pkt->fname, 
137          strerror(ff_pkt->ff_errno));
138       return 1;
139    case FT_NOSTAT:
140       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not stat %s: ERR=%s\n"), ff_pkt->fname, 
141          strerror(ff_pkt->ff_errno));
142       return 1;
143    case FT_DIRNOCHG:
144    case FT_NOCHG:
145       Jmsg(jcr, M_SKIPPED, -1,  _("     Unchanged file skipped: %s\n"), ff_pkt->fname);
146       return 1;
147    case FT_ISARCH:
148       Jmsg(jcr, M_NOTSAVED, -1, _("     Archive file not saved: %s\n"), ff_pkt->fname);
149       return 1;
150    case FT_NORECURSE:
151       Jmsg(jcr, M_SKIPPED, -1,  _("     Recursion turned off. Directory skipped: %s\n"), 
152          ff_pkt->fname);
153       return 1;
154    case FT_NOFSCHG:
155       Jmsg(jcr, M_SKIPPED, -1,  _("     File system change prohibited. Directory skipped. %s\n"), 
156          ff_pkt->fname);
157       return 1;
158    case FT_NOOPEN:
159       Jmsg(jcr, M_NOTSAVED, -1, _("     Could not open directory %s: ERR=%s\n"), ff_pkt->fname, 
160          strerror(ff_pkt->ff_errno));
161       return 1;
162    default:
163       Jmsg(jcr, M_NOTSAVED, 0,  _("     Unknown file type %d; not saved: %s\n"), ff_pkt->type, ff_pkt->fname);
164       return 1;
165    }
166
167    if (ff_pkt->type != FT_LNKSAVED && S_ISREG(ff_pkt->statp.st_mode) && 
168          ff_pkt->statp.st_size > 0) {
169       if ((fid = open(ff_pkt->fname, O_RDONLY | O_BINARY)) < 0) {
170          ff_pkt->ff_errno = errno;
171          Jmsg(jcr, M_NOTSAVED, -1, _("     Cannot open %s: ERR=%s.\n"), ff_pkt->fname, strerror(ff_pkt->ff_errno));
172          return 1;
173       }
174    } else {
175       fid = -1;
176    }
177
178    Dmsg1(130, "bfiled: sending %s to stored\n", ff_pkt->fname);
179    encode_stat(attribs, &ff_pkt->statp);
180      
181    jcr->JobFiles++;                    /* increment number of files sent */
182    len = strlen(ff_pkt->fname);
183    jcr->last_fname = check_pool_memory_size(jcr->last_fname, len + 1);
184    jcr->last_fname[len] = 0;          /* terminate properly before copy */
185    strcpy(jcr->last_fname, ff_pkt->fname);
186     
187    /*
188     * Send Attributes header to Storage daemon
189     *    <file-index> <stream> <info>
190     */
191 #ifndef NO_FD_SEND_TEST
192    if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_UNIX_ATTRIBUTES)) {
193       if (fid >= 0) {
194          close(fid);
195       }
196       return 0;
197    }
198    Dmsg1(100, ">stored: attrhdr %s\n", sd->msg);
199
200    /* 
201     * Send file attributes to Storage daemon   
202     *   File_index
203     *   File type
204     *   Filename (full path)
205     *   Encoded attributes
206     *   Link name (if type==FT_LNK)
207     * For a directory, link is the same as fname, but with trailing
208     * slash. For a linked file, link is the link.
209     */
210    if (ff_pkt->type == FT_LNK || ff_pkt->type == FT_LNKSAVED) {
211       Dmsg2(100, "Link %s to %s\n", ff_pkt->fname, ff_pkt->link);
212       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%s%c", jcr->JobFiles, 
213                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, ff_pkt->link, 0);
214    } else if (ff_pkt->type == FT_DIR) {
215       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles, 
216                ff_pkt->type, ff_pkt->link, 0, attribs, 0, 0);
217    } else {
218       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles, 
219                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, 0);
220    }
221
222    Dmsg2(100, ">stored: attr len=%d: %s\n", sd->msglen, sd->msg);
223    if (!stat) {
224       if (fid >= 0) {
225          close(fid);
226       }
227       return 0;
228    }
229    /* send data termination sentinel */
230    bnet_sig(sd, BNET_EOD);
231 #endif
232
233    /* 
234     * If the file has data, read it and send to the Storage daemon
235     *
236     */
237    if (fid >= 0) {
238
239       Dmsg1(100, "Saving data, type=%d\n", ff_pkt->type);
240       /*
241        * Send Data header to Storage daemon
242        *    <file-index> <stream> <info>
243        */
244
245       stream = STREAM_FILE_DATA;
246
247 #ifdef HAVE_LIBZ
248       if (ff_pkt->flags & FO_GZIP) {
249          stream = STREAM_GZIP_DATA;
250       }
251 #endif
252
253 #ifndef NO_FD_SEND_TEST
254       if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, stream)) {
255          close(fid);
256          return 0;
257       }
258       Dmsg1(100, ">stored: datahdr %s\n", sd->msg);
259 #endif
260
261       if (ff_pkt->flags & FO_MD5) {
262          MD5Init(&md5c);
263       }
264
265       msgsave = sd->msg;
266       while ((sd->msglen=read(fid, sd->msg, jcr->buf_size)) > 0) {
267          jcr->ReadBytes += sd->msglen; /* count bytes read */
268          if (ff_pkt->flags & FO_MD5) {
269             MD5Update(&md5c, (unsigned char *)(sd->msg), sd->msglen);
270             gotMD5 = 1;
271          }
272 #ifdef HAVE_LIBZ
273          /* ***FIXME*** add compression level options */
274          if (ff_pkt->flags & FO_GZIP) {
275             uLong compress_len;
276             compress_len = jcr->compress_buf_size; /* set max length */
277             if (compress2((Bytef *)jcr->compress_buf, &compress_len, 
278                   (const Bytef *)sd->msg, (uLong)sd->msglen,
279                   ff_pkt->GZIP_level)  != Z_OK) {
280                Jmsg(jcr, M_FATAL, 0, _("Compression error\n"));
281                sd->msg = msgsave;
282                sd->msglen = 0;
283                close(fid);
284                return 0;
285             }
286             Dmsg2(100, "compressed len=%d uncompressed len=%d\n", 
287                compress_len, sd->msglen);
288
289             sd->msg = jcr->compress_buf; /* write compressed buffer */
290             sd->msglen = compress_len;
291 #ifndef NO_FD_SEND_TEST
292             if (!bnet_send(sd)) {
293                sd->msg = msgsave;     /* restore read buffer */
294                sd->msglen = 0;
295                close(fid);
296                return 0;
297             }
298             Dmsg1(130, "Send data to FD len=%d\n", sd->msglen);
299 #endif
300             jcr->JobBytes += sd->msglen; /* count compressed bytes saved */
301             sd->msg = msgsave;        /* restore read buffer */
302             continue;
303          }
304 #endif
305 #ifndef NO_FD_SEND_TEST
306          if (!bnet_send(sd)) {
307             close(fid);
308             return 0;
309          }
310          Dmsg1(130, "Send data to FD len=%d\n", sd->msglen);
311 #endif
312          jcr->JobBytes += sd->msglen;   /* count bytes saved */
313       } /* end while */
314
315       if (sd->msglen < 0) {
316          Jmsg(jcr, M_ERROR, 0, _("Network error. ERR=%s\n"), bnet_strerror(sd));
317       }
318
319       /* Send data termination poll signal to Storage daemon.
320        *  NOTE possibly put this poll on a counter as specified
321        *  by the user to improve efficiency (i.e. poll every
322        *  other file, every third file, ... 
323        */
324 #ifndef NO_FD_SEND_TEST
325 #ifndef NO_POLL_TEST
326       bnet_sig(sd, BNET_EOD_POLL);
327       Dmsg0(130, "Send EndData_Poll\n");
328       /* ***FIXME**** change to use bget_msg() */
329       if (bnet_recv(sd) <= 0) {
330          close(fid);
331          return 0;
332       } else {
333          if (strcmp(sd->msg, "3000 OK\n") != 0) {
334            Jmsg1(jcr, M_FATAL, 0, _("Job aborted by Storage daemon: %s\n"), sd->msg);
335            close(fid);
336            return 0;
337          }
338       }
339 #else 
340       bnet_sig(sd, BNET_EOD);
341 #endif
342 #endif /* NO_FD_SEND_TEST */
343       close(fid);                        /* close file */
344    }
345
346
347    /* Terminate any MD5 signature and send it to Storage daemon and the Director */
348    if (gotMD5 && ff_pkt->flags & FO_MD5) {
349       MD5Final(signature, &md5c);
350 #ifndef NO_FD_SEND_TEST
351       bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_MD5_SIGNATURE);
352       Dmsg1(100, "bfiled>stored:header %s\n", sd->msg);
353       memcpy(sd->msg, signature, 16);
354       sd->msglen = 16;
355       bnet_send(sd);
356       bnet_sig(sd, BNET_EOD);         /* end of MD5 */
357 #endif
358       gotMD5 = 0;
359    }
360 #ifdef really_needed
361    if (ff_pkt->type == FT_DIR) {
362       Jmsg(jcr, M_SAVED, -1, _("     Directory saved normally: %s\n"), ff_pkt->link);
363    } else {
364       Jmsg(jcr, M_SAVED, -1, _("     File saved normally: %s\n"), ff_pkt->fname);
365    }
366 #endif
367    return 1;
368 }