]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/filed/backup.c
First cut 1.23 -- kes07Jul02
[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;
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    jcr->last_fname = (char *) check_pool_memory_size(jcr->last_fname, strlen(ff_pkt->fname) + 1);
183    strcpy(jcr->last_fname, ff_pkt->fname);
184     
185    /*
186     * Send Attributes header to Storage daemon
187     *    <file-index> <stream> <info>
188     */
189    if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_UNIX_ATTRIBUTES)) {
190       if (fid >= 0) {
191          close(fid);
192       }
193       return 0;
194    }
195    Dmsg1(10, ">stored: attrhdr %s\n", sd->msg);
196
197    /* 
198     * Send file attributes to Storage daemon   
199     *   File_index
200     *   File type
201     *   Filename (full path)
202     *   Encoded attributes
203     *   Link name (if type==FT_LNK)
204     * For a directory, link is the same as fname, but with trailing
205     * slash. For a linked file, link is the link.
206     */
207    if (ff_pkt->type == FT_LNK) {
208       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%s%c", jcr->JobFiles, 
209                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, ff_pkt->link, 0);
210    } else if (ff_pkt->type == FT_DIR) {
211       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles, 
212                ff_pkt->type, ff_pkt->link, 0, attribs, 0, 0);
213    } else {
214       stat = bnet_fsend(sd, "%ld %d %s%c%s%c%c", jcr->JobFiles, 
215                ff_pkt->type, ff_pkt->fname, 0, attribs, 0, 0);
216    }
217
218    Dmsg2(20, ">stored: attr len=%d: %s\n", sd->msglen, sd->msg);
219    if (!stat) {
220       if (fid >= 0) {
221          close(fid);
222       }
223       return 0;
224    }
225    /* send data termination sentinel */
226    bnet_sig(sd, BNET_EOD);
227
228    /* 
229     * If the file has data, read it and send to the Storage daemon
230     *
231     */
232    if (fid >= 0) {
233
234       Dmsg1(60, "Saving data, type=%d\n", ff_pkt->type);
235       /*
236        * Send Data header to Storage daemon
237        *    <file-index> <stream> <info>
238        */
239
240       stream = STREAM_FILE_DATA;
241
242 #ifdef HAVE_LIBZ
243       if (ff_pkt->flags & FO_GZIP) {
244          stream = STREAM_GZIP_DATA;
245       }
246 #endif
247
248       if (!bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, stream)) {
249          close(fid);
250          return 0;
251       }
252       Dmsg1(10, ">stored: datahdr %s\n", sd->msg);
253
254       if (ff_pkt->flags & FO_MD5) {
255          MD5Init(&md5c);
256       }
257
258       msgsave = sd->msg;
259       while ((sd->msglen=read(fid, sd->msg, jcr->buf_size)) > 0) {
260          if (ff_pkt->flags & FO_MD5) {
261             MD5Update(&md5c, (unsigned char *)(sd->msg), sd->msglen);
262             gotMD5 = 1;
263          }
264 #ifdef HAVE_LIBZ
265          /* ***FIXME*** add compression level options */
266          if (ff_pkt->flags & FO_GZIP) {
267             uLong compress_len;
268             compress_len = jcr->compress_buf_size; /* set max length */
269             if (compress2((Bytef *)jcr->compress_buf, &compress_len, 
270                   (const Bytef *)sd->msg, (uLong)sd->msglen,
271                   ff_pkt->GZIP_level)  != Z_OK) {
272                Jmsg(jcr, M_ERROR, 0, _("Compression error\n"));
273                sd->msg = msgsave;
274                sd->msglen = 0;
275                close(fid);
276                return 0;
277             }
278             Dmsg2(100, "compressed len=%d uncompressed len=%d\n", 
279                compress_len, sd->msglen);
280
281             sd->msg = jcr->compress_buf; /* write compressed buffer */
282             sd->msglen = compress_len;
283             if (!bnet_send(sd)) {
284                sd->msg = msgsave;     /* restore read buffer */
285                sd->msglen = 0;
286                close(fid);
287                return 0;
288             }
289             Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
290             jcr->JobBytes += sd->msglen;
291             sd->msg = msgsave;        /* restore read buffer */
292             continue;
293          }
294 #endif
295          if (!bnet_send(sd)) {
296             close(fid);
297             return 0;
298          }
299          Dmsg1(30, "Send data to FD len=%d\n", sd->msglen);
300          jcr->JobBytes += sd->msglen;
301       } /* end while */
302
303       if (sd->msglen < 0) {
304          Jmsg(jcr, M_ERROR, 0, _("Error during save reading ERR=%s\n"), ff_pkt->fname, 
305             strerror(ff_pkt->ff_errno));
306       }
307
308       /* Send data termination poll signal to Storage daemon.
309        *  NOTE possibly put this poll on a counter as specified
310        *  by the user to improve efficiency (i.e. poll every
311        *  other file, every third file, ... 
312        */
313       bnet_sig(sd, BNET_EOD_POLL);
314       Dmsg0(30, "Send EndData_Poll\n");
315       /* ***FIXME**** change to use bget_msg() */
316       if (bnet_recv(sd) <= 0) {
317          close(fid);
318          return 0;
319       } else {
320          if (strcmp(sd->msg, "3000 OK\n") != 0) {
321            Jmsg1(jcr, M_ERROR, 0, _("Job aborted by Storage daemon: %s\n"), sd->msg);
322            close(fid);
323            return 0;
324          }
325       }
326       close(fid);                        /* close file */
327    }
328
329
330    /* Terminate any MD5 signature and send it to Storage daemon and the Director */
331    if (gotMD5 && ff_pkt->flags & FO_MD5) {
332       MD5Final(signature, &md5c);
333       bnet_fsend(sd, "%ld %d 0", jcr->JobFiles, STREAM_MD5_SIGNATURE);
334       Dmsg1(10, "bfiled>stored:header %s\n", sd->msg);
335       memcpy(sd->msg, signature, 16);
336       sd->msglen = 16;
337       bnet_send(sd);
338       bnet_sig(sd, BNET_EOD);         /* end of MD5 */
339       gotMD5 = 0;
340    }
341 #ifdef really_needed
342    if (ff_pkt->type == FT_DIR) {
343       Jmsg(jcr, M_SAVED, -1, _("     Directory saved normally: %s\n"), ff_pkt->link);
344    } else {
345       Jmsg(jcr, M_SAVED, -1, _("     File saved normally: %s\n"), ff_pkt->fname);
346    }
347 #endif
348    return 1;
349 }