]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/filed/backup.c
SQLite performance + misc -- see kes20Jul02
[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, int port)
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_EOF);            /* terminate 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, *dir;
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    dir = jcr->dir_bsock;
111    jcr->num_files_examined++;         /* bump total file count */
112
113    switch (ff_pkt->type) {
114    case FT_LNKSAVED:                  /* Hard linked, file already saved */
115       break;
116    case FT_REGE:
117       Dmsg1(30, "FT_REGE saving: %s\n", ff_pkt->fname);
118       break;
119    case FT_REG:
120       Dmsg1(30, "FT_REG saving: %s\n", ff_pkt->fname);
121       break;
122    case FT_LNK:
123       Dmsg2(30, "FT_LNK saving: %s -> %s\n", ff_pkt->fname, ff_pkt->link);
124       break;
125    case FT_DIR:
126       Dmsg1(30, "FT_DIR saving: %s\n", ff_pkt->link);
127       break;
128    case FT_SPEC:
129       Dmsg1(30, "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"), 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_ERROR, 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(30, "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    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
230    /* 
231     * If the file has data, read it and send to the Storage daemon
232     *
233     */
234    if (fid >= 0) {
235
236       Dmsg1(60, "Saving data, type=%d\n", ff_pkt->type);
237       /*
238        * Send Data header to Storage daemon
239        *    <file-index> <stream> <info>
240        */
241
242       stream = STREAM_FILE_DATA;
243
244 #ifdef HAVE_LIBZ
245       if (ff_pkt->flags & FO_GZIP) {
246          stream = STREAM_GZIP_DATA;
247       }
248 #endif
249
250       if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, stream)) {
251          close(fid);
252          return 0;
253       }
254       Dmsg1(10, ">stored: datahdr %s\n", sd->msg);
255
256       if (ff_pkt->flags & FO_MD5) {
257          MD5Init(&md5c);
258       }
259
260       msgsave = sd->msg;
261       while ((sd->msglen=read(fid, sd->msg, jcr->buf_size)) > 0) {
262          if (ff_pkt->flags & FO_MD5) {
263             MD5Update(&md5c, (unsigned char *)(sd->msg), sd->msglen);
264             gotMD5 = 1;
265          }
266 #ifdef HAVE_LIBZ
267          /* ***FIXME*** add compression level options */
268          if (ff_pkt->flags & FO_GZIP) {
269             uLong compress_len;
270             compress_len = jcr->compress_buf_size; /* set max length */
271             if (compress2((Bytef *)jcr->compress_buf, &compress_len, 
272                   (const Bytef *)sd->msg, (uLong)sd->msglen,
273                   ff_pkt->GZIP_level)  != Z_OK) {
274                Jmsg(jcr, M_ERROR, 0, _("Compression error\n"));
275                sd->msg = msgsave;
276                sd->msglen = 0;
277                close(fid);
278                return 0;
279             }
280             Dmsg2(100, "compressed len=%d uncompressed len=%d\n", 
281                compress_len, sd->msglen);
282
283             sd->msg = jcr->compress_buf; /* write compressed buffer */
284             sd->msglen = compress_len;
285             if (!bnet_send(sd)) {
286                sd->msg = msgsave;     /* restore read buffer */
287                sd->msglen = 0;
288                close(fid);
289                return 0;
290             }
291             Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
292             jcr->JobBytes += sd->msglen;
293             sd->msg = msgsave;        /* restore read buffer */
294             continue;
295          }
296 #endif
297          if (!bnet_send(sd)) {
298             close(fid);
299             return 0;
300          }
301          Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
302          jcr->JobBytes += sd->msglen;
303       } /* end while */
304
305       if (sd->msglen < 0) {
306          Jmsg(jcr, M_ERROR, 0, _("Error during save reading ERR=%s\n"), ff_pkt->fname, 
307             strerror(ff_pkt->ff_errno));
308       }
309
310       /* Send data termination poll signal to Storage daemon.
311        *  NOTE possibly put this poll on a counter as specified
312        *  by the user to improve efficiency (i.e. poll every
313        *  other file, every third file, ... 
314        */
315       bnet_sig(sd, BNET_EOD_POLL);
316       Dmsg0(30, "Send EndData_Poll\n");
317       /* ***FIXME**** change to use bget_msg() */
318       if (bnet_recv(sd) <= 0) {
319          close(fid);
320          return 0;
321       } else {
322          if (strcmp(sd->msg, "3000 OK\n") != 0) {
323            Jmsg1(jcr, M_ERROR, 0, _("Job aborted by Storage daemon: %s\n"), sd->msg);
324            close(fid);
325            return 0;
326          }
327       }
328       close(fid);                        /* close file */
329    }
330
331
332    /* Terminate any MD5 signature and send it to Storage daemon and the Director */
333    if (gotMD5 && ff_pkt->flags & FO_MD5) {
334       MD5Final(signature, &md5c);
335       bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_MD5_SIGNATURE);
336       Dmsg1(10, "bfiled>stored:header %s\n", sd->msg);
337       memcpy(sd->msg, signature, 16);
338       sd->msglen = 16;
339       bnet_send(sd);
340       bnet_sig(sd, BNET_EOD);         /* end of MD5 */
341       gotMD5 = 0;
342    }
343 #ifdef really_needed
344    if (ff_pkt->type == FT_DIR) {
345       Jmsg(jcr, M_SAVED, -1, _("     Directory saved normally: %s\n"), ff_pkt->link);
346    } else {
347       Jmsg(jcr, M_SAVED, -1, _("     File saved normally: %s\n"), ff_pkt->fname);
348    }
349 #endif
350    return 1;
351 }