]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/append.c
First cut AutoPrune
[bacula/bacula] / bacula / src / stored / append.c
1 /*
2  * Append code for Storage daemon
3  *  Kern Sibbald, May MM
4  *
5  *  Version $Id$
6  */
7 /*
8    Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
9
10    This program is free software; you can redistribute it and/or
11    modify it under the terms of the GNU General Public License as
12    published by the Free Software Foundation; either version 2 of
13    the License, or (at your option) any later version.
14
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18    General Public License for more details.
19
20    You should have received a copy of the GNU General Public
21    License along with this program; if not, write to the Free
22    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
23    MA 02111-1307, USA.
24
25  */
26
27 #include "bacula.h"
28 #include "stored.h"
29
30 extern int  FiledDataChan;            /* File daemon data channel (port) */
31 extern int BaculaTapeVersion;         /* Version number */
32 extern char BaculaId[];               /* Id string */
33
34 /* Responses sent to the File daemon */
35 static char OK_data[]    = "3000 OK data\n";
36
37 /* 
38  *  Append Data sent from File daemon   
39  *
40  */
41 int do_append_data(JCR *jcr) 
42 {
43    int32_t n;
44    long file_index, stream, last_file_index;
45    BSOCK *ds;
46    BSOCK *fd_sock = jcr->file_bsock;
47    int ok = TRUE;
48    DEVICE *dev = jcr->device->dev;
49    DEV_RECORD rec;
50    DEV_BLOCK  *block;
51    
52    Dmsg0(10, "Start append data.\n");
53
54    /* Tell File daemon to send data */
55    bnet_fsend(fd_sock, OK_data);
56
57    sm_check(__FILE__, __LINE__, False);
58
59    ds = fd_sock;
60
61    if (!bnet_set_buffer_size(ds, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_WRITE)) {
62       jcr->JobStatus = JS_Cancelled;
63       Jmsg(jcr, M_FATAL, 0, _("Unable to set network buffer size.\n"));
64       return 0;
65    }
66
67    Dmsg1(20, "Begin append device=%s\n", dev_name(dev));
68
69    block = new_block(dev);
70
71    /* 
72     * Acquire output device for writing.  Note, after acquiring a
73     *   device, we MUST release it, which is done at the end of this
74     *   subroutine.
75     */
76    Dmsg0(100, "just before acquire_device\n");
77    if (!acquire_device_for_append(jcr, dev, block)) {
78       jcr->JobStatus = JS_Cancelled;
79       free_block(block);
80       return 0;
81    }
82    sm_check(__FILE__, __LINE__, False);
83
84    Dmsg0(100, "Just after acquire_device_for_append\n");
85    /*
86     * Write Begin Session Record
87     */
88    if (!write_session_label(jcr, block, SOS_LABEL)) {
89       jcr->JobStatus = JS_Cancelled;
90       Jmsg1(jcr, M_FATAL, 0, _("Write session label failed. ERR=%s\n"),
91          strerror_dev(dev));
92       ok = FALSE;
93    }
94
95    sm_check(__FILE__, __LINE__, False);
96
97    memset(&rec, 0, sizeof(rec));
98
99    /* 
100     * Get Data from File daemon, write to device   
101     */
102    jcr->VolFirstFile = 0;
103    time(&jcr->run_time);              /* start counting time for rates */
104    for (last_file_index = 0; ok && !job_cancelled(jcr); ) {
105       char info[100];
106
107       /* Read Stream header from the File daemon.
108        *  The stream header consists of the
109        *
110        *   file_index (sequential Bacula file index)
111        *   stream     (arbitrary Bacula number to distinguish parts of data)
112        *   info       (Info for Storage daemon -- compressed, encryped, ...)
113        */
114       if ((n=bget_msg(ds)) < 0) { 
115          Jmsg1(jcr, M_FATAL, 0, _("Error reading data header from FD. ERR=%s\n"),
116             bnet_strerror(ds));
117          ok = FALSE;
118          break;
119       }
120       if (n == 0) {                   /* End of conversation */
121          break;                       /* all done */
122       }
123       sm_check(__FILE__, __LINE__, False);
124       ds->msg[ds->msglen] = 0;
125       if (sscanf(ds->msg, "%ld %ld %100s", &file_index, &stream, info) != 3) {
126          Jmsg1(jcr, M_FATAL, 0, _("Malformed data header from FD: %s\n"), ds->msg);
127          ok = FALSE;
128          break;
129       }
130       Dmsg2(190, "<filed: Header FilInx=%d stream=%d\n", file_index, stream);
131
132       if (!(file_index > 0 && (file_index == last_file_index ||
133           file_index == last_file_index + 1))) {
134          Jmsg0(jcr, M_FATAL, 0, _("File index from FD not positive or sequential\n"));
135          ok = FALSE;
136          break;
137       }
138       if (file_index != last_file_index) {
139          jcr->JobFiles = file_index;
140          if (jcr->VolFirstFile == 0) {
141             jcr->VolFirstFile = file_index;
142          }
143          last_file_index = file_index;
144       }
145       
146       /* Read data stream from the File daemon.
147        *  The data stream is just raw bytes
148        */
149       sm_check(__FILE__, __LINE__, False);
150       while ((n=bget_msg(ds)) > 0 && !job_cancelled(jcr)) {
151          char *dsmsg = ds->msg;
152
153          sm_check(__FILE__, __LINE__, False);
154          rec.VolSessionId = jcr->VolSessionId;
155          rec.VolSessionTime = jcr->VolSessionTime;
156          rec.FileIndex = file_index;
157          rec.Stream = stream;
158          rec.data_len = ds->msglen;
159          rec.data = ds->msg;            /* use message buffer */
160
161          Dmsg4(250, "before writ_rec FI=%d SessId=%d Strm=%s len=%d\n",
162             rec.FileIndex, rec.VolSessionId, stream_to_ascii(rec.Stream), 
163             rec.data_len);
164           
165          while (!write_record_to_block(block, &rec)) {
166             Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec.data_len,
167                        rec.remainder);
168             if (!write_block_to_device(jcr, dev, block)) {
169                Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
170                   dev_name(dev), strerror_dev(dev));
171                Jmsg(jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
172                      strerror_dev(dev));
173                ok = FALSE;
174                break;
175             }
176          }
177          sm_check(__FILE__, __LINE__, False);
178          if (!ok) {
179             break;
180          }
181          jcr->JobBytes += rec.data_len;   /* increment bytes this job */
182          Dmsg4(190, "write_record FI=%s SessId=%d Strm=%s len=%d\n",
183             FI_to_ascii(rec.FileIndex), rec.VolSessionId, 
184             stream_to_ascii(rec.Stream), rec.data_len);
185          /* Send attributes and MD5 to Director for Catalog */
186          if (stream == STREAM_UNIX_ATTRIBUTES || stream == STREAM_MD5_SIGNATURE) {
187             if (!dir_update_file_attributes(jcr, &rec)) {
188                ok = FALSE;
189                break;
190             }
191          }
192          ASSERT(dsmsg == ds->msg);
193          ASSERT(dsmsg == rec.data);
194          sm_check(__FILE__, __LINE__, False);
195       }
196       if (n < 0) {
197          Jmsg1(jcr, M_FATAL, 0, _("Network error on data channel. ERR=%s\n"),
198             bnet_strerror(ds));
199          ok = FALSE;
200          break;
201       }
202    }
203    /* 
204     *******FIXME***** we should put the ok status in the End of
205     * session label 
206     *
207     *   We probably need a new flag that says "Do not attempt
208     *   to write because there is no tape".
209     */
210    sm_check(__FILE__, __LINE__, False);
211    Dmsg0(90, "Write_end_session_label()\n");
212    if (!write_session_label(jcr, block, EOS_LABEL)) {
213       Jmsg1(jcr, M_FATAL, 0, _("Error writting end session label. ERR=%s\n"),
214           strerror_dev(dev));
215       ok = FALSE;
216    }
217    /* Write out final block of this session */
218    if (!write_block_to_device(jcr, dev, block)) {
219       Dmsg0(0, "Set ok=FALSE after write_block_to_device.\n");
220       ok = FALSE;
221    }
222
223    /* Release the device */
224    if (!release_device(jcr, dev, block)) {
225       Dmsg0(0, "Error in release_device\n");
226       ok = FALSE;
227    }
228
229    free_block(block);
230    Dmsg0(90, "return from do_append_data()\n");
231    return ok ? 1 : 0;
232 }