2 * Append code for Storage daemon
8 Copyright (C) 2000-2003 Kern Sibbald and John Walker
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.
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.
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,
31 /* Responses sent to the File daemon */
32 static char OK_data[] = "3000 OK data\n";
35 * Append Data sent from File daemon
38 int do_append_data(JCR *jcr)
41 int32_t file_index, stream, last_file_index;
43 BSOCK *fd_sock = jcr->file_bsock;
45 DEVICE *dev = jcr->device->dev;
49 Dmsg0(10, "Start append data.\n");
51 /* Tell File daemon to send data */
52 bnet_fsend(fd_sock, OK_data);
54 if (!jcr->no_attributes && jcr->spool_attributes) {
55 open_spool_file(jcr, jcr->dir_bsock);
60 if (!bnet_set_buffer_size(ds, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_WRITE)) {
61 set_jcr_job_status(jcr, JS_ErrorTerminated);
62 Jmsg(jcr, M_FATAL, 0, _("Unable to set network buffer size.\n"));
66 Dmsg1(20, "Begin append device=%s\n", dev_name(dev));
68 block = new_block(dev);
69 memset(&rec, 0, sizeof(rec));
72 * Acquire output device for writing. Note, after acquiring a
73 * device, we MUST release it, which is done at the end of this
76 Dmsg0(100, "just before acquire_device\n");
77 if (!(dev=acquire_device_for_append(jcr, dev, block))) {
78 set_jcr_job_status(jcr, JS_ErrorTerminated);
82 Dmsg0(100, "Just after acquire_device_for_append\n");
84 * Write Begin Session Record
86 if (!write_session_label(jcr, block, SOS_LABEL)) {
87 Jmsg1(jcr, M_FATAL, 0, _("Write session label failed. ERR=%s\n"),
89 set_jcr_job_status(jcr, JS_ErrorTerminated);
95 * Get Data from File daemon, write to device. To clarify what is
96 * going on here. We expect:
98 * - Multiple records of data
101 * The Stream header is just used to sychronize things, and
102 * none of the stream header is written to tape.
103 * The Multiple records of data, contain first the Attributes,
104 * then after another stream header, the file data, then
105 * after another stream header, the MD5 data if any.
107 * So we get the (stream header, data, EOD) three time for each
108 * file. 1. for the Attributes, 2. for the file data if any,
109 * and 3. for the MD5 if any.
111 jcr->VolFirstIndex = 0;
112 jcr->run_time = time(NULL); /* start counting time for rates */
113 for (last_file_index = 0; ok && !job_canceled(jcr); ) {
115 /* Read Stream header from the File daemon.
116 * The stream header consists of the following:
117 * file_index (sequential Bacula file index, base 1)
118 * stream (Bacula number to distinguish parts of data)
119 * info (Info for Storage daemon -- compressed, encryped, ...)
120 * info is not currently used, so is read, but ignored!
122 if ((n=bget_msg(ds)) <= 0) {
123 if (n == BNET_SIGNAL && ds->msglen == BNET_EOD) {
124 break; /* end of data */
126 Jmsg1(jcr, M_FATAL, 0, _("Error reading data header from FD. ERR=%s\n"),
133 * This hand scanning is a bit more complicated than a simple
134 * sscanf, but it allows us to handle any size integer up to
135 * int64_t without worrying about whether %d, %ld, %lld, or %q
136 * is the correct format for each different architecture.
137 * It is a real pity that sscanf() is not portable.
140 while (B_ISSPACE(*p)) {
143 file_index = (int32_t)str_to_int64(p);
144 while (B_ISDIGIT(*p)) {
147 if (!B_ISSPACE(*p) || !B_ISDIGIT(*(p+1))) {
148 Jmsg1(jcr, M_FATAL, 0, _("Malformed data header from FD: %s\n"), ds->msg);
152 stream = (int32_t)str_to_int64(p);
154 Dmsg2(190, "<filed: Header FilInx=%d stream=%d\n", file_index, stream);
156 if (!(file_index > 0 && (file_index == last_file_index ||
157 file_index == last_file_index + 1))) {
158 Jmsg0(jcr, M_FATAL, 0, _("File index from FD not positive or sequential\n"));
162 if (file_index != last_file_index) {
163 jcr->JobFiles = file_index;
164 if (jcr->VolFirstIndex == 0) {
165 jcr->VolFirstIndex = file_index;
167 jcr->VolLastIndex = file_index;
168 last_file_index = file_index;
171 /* Read data stream from the File daemon.
172 * The data stream is just raw bytes
174 while ((n=bget_msg(ds)) > 0 && !job_canceled(jcr)) {
176 rec.VolSessionId = jcr->VolSessionId;
177 rec.VolSessionTime = jcr->VolSessionTime;
178 rec.FileIndex = file_index;
180 rec.data_len = ds->msglen;
181 rec.data = ds->msg; /* use message buffer */
183 Dmsg4(250, "before writ_rec FI=%d SessId=%d Strm=%s len=%d\n",
184 rec.FileIndex, rec.VolSessionId, stream_to_ascii(rec.Stream,rec.FileIndex),
187 while (!write_record_to_block(block, &rec)) {
188 Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec.data_len,
190 if (!write_block_to_device(jcr, dev, block)) {
191 Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
192 dev_name(dev), strerror_dev(dev));
193 Jmsg(jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
200 Dmsg0(400, "Not OK\n");
203 jcr->JobBytes += rec.data_len; /* increment bytes this job */
204 Dmsg4(200, "write_record FI=%s SessId=%d Strm=%s len=%d\n",
205 FI_to_ascii(rec.FileIndex), rec.VolSessionId,
206 stream_to_ascii(rec.Stream, rec.FileIndex), rec.data_len);
208 /* Send attributes and MD5 to Director for Catalog */
209 if (stream == STREAM_UNIX_ATTRIBUTES || stream == STREAM_MD5_SIGNATURE ||
210 stream == STREAM_UNIX_ATTRIBUTES_EX || stream == STREAM_SHA1_SIGNATURE) {
211 if (!jcr->no_attributes) {
212 if (jcr->spool_attributes && jcr->dir_bsock->spool_fd) {
213 jcr->dir_bsock->spool = 1;
215 Dmsg0(200, "Send attributes.\n");
216 if (!dir_update_file_attributes(jcr, &rec)) {
217 Jmsg(jcr, M_FATAL, 0, _("Error updating file attributes. ERR=%s\n"),
218 bnet_strerror(jcr->dir_bsock));
220 jcr->dir_bsock->spool = 0;
223 jcr->dir_bsock->spool = 0;
227 if (is_bnet_error(ds)) {
228 Jmsg1(jcr, M_FATAL, 0, _("Network error on data channel. ERR=%s\n"),
235 * We probably need a new flag that says "Do not attempt
236 * to write because there is no tape".
238 Dmsg0(90, "Write_end_session_label()\n");
240 /* Create Job status for end of session label */
241 set_jcr_job_status(jcr, ok?JS_Terminated:JS_ErrorTerminated);
243 Dmsg1(200, "Write session label JobStatus=%d\n", jcr->JobStatus);
246 * If !OK, check if we can still write. This may not be the case
247 * if we are at the end of the tape or we got a fatal I/O error.
249 if (ok || dev_can_write(dev)) {
250 if (!write_session_label(jcr, block, EOS_LABEL)) {
251 Jmsg1(jcr, M_FATAL, 0, _("Error writting end session label. ERR=%s\n"),
253 set_jcr_job_status(jcr, JS_ErrorTerminated);
256 /* Flush out final partial block of this session */
257 if (!write_block_to_device(jcr, dev, block)) {
258 Dmsg0(100, _("Set ok=FALSE after write_block_to_device.\n"));
259 set_jcr_job_status(jcr, JS_ErrorTerminated);
264 Dmsg1(200, "release device JobStatus=%d\n", jcr->JobStatus);
265 /* Release the device */
266 if (!release_device(jcr, dev)) {
267 Pmsg0(000, _("Error in release_device\n"));
268 set_jcr_job_status(jcr, JS_ErrorTerminated);
274 if (jcr->spool_attributes && jcr->dir_bsock->spool_fd) {
275 bnet_despool(jcr->dir_bsock);
276 close_spool_file(jcr, jcr->dir_bsock);
279 dir_send_job_status(jcr); /* update director */
281 Dmsg1(100, "return from do_append_data() stat=%d\n", ok);