]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/read.c
Check neg device use cound + fix BlockNumber check + close socket with shutdown(...
[bacula/bacula] / bacula / src / stored / read.c
1 /*
2  * Read code for Storage daemon
3  *
4  *     Kern Sibbald, November MM
5  *
6  *   Version $Id$
7  */
8 /*
9    Copyright (C) 2000-2003 Kern Sibbald and John Walker
10
11    This program is free software; you can redistribute it and/or
12    modify it under the terms of the GNU General Public License as
13    published by the Free Software Foundation; either version 2 of
14    the License, or (at your option) any later version.
15
16    This program is distributed in the hope that it will be useful,
17    but WITHOUT ANY WARRANTY; without even the implied warranty of
18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19    General Public License for more details.
20
21    You should have received a copy of the GNU General Public
22    License along with this program; if not, write to the Free
23    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
24    MA 02111-1307, USA.
25
26  */
27
28 #include "bacula.h"
29 #include "stored.h"
30
31 /* Forward referenced subroutines */
32 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec);
33
34
35 /* Responses sent to the File daemon */
36 static char OK_data[]    = "3000 OK data\n";
37 static char rec_header[] = "rechdr %ld %ld %ld %ld %ld";
38
39 /* 
40  *  Read Data and send to File Daemon
41  *   Returns: 0 on failure
42  *            1 on success
43  */
44 int do_read_data(JCR *jcr) 
45 {
46    BSOCK *ds;
47    BSOCK *fd_sock = jcr->file_bsock;
48    int ok = TRUE;
49    int done = FALSE;
50    DEVICE *dev;
51    DEV_RECORD *rec;
52    DEV_BLOCK *block;
53    POOLMEM *hdr; 
54    SESSION_LABEL sessrec;              /* session record */
55    uint32_t BlockNumber = 0;
56    
57    Dmsg0(20, "Start read data.\n");
58
59    dev = jcr->device->dev;
60    memset(&sessrec, 0, sizeof(sessrec));
61
62    /* Tell File daemon we will send data */
63    bnet_fsend(fd_sock, OK_data);
64    Dmsg1(10, "bstored>filed: %s\n", fd_sock->msg);
65
66    ds = fd_sock;
67
68    if (!bnet_set_buffer_size(ds, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_READ)) {
69       return 0;
70    }
71
72
73    Dmsg1(20, "Begin read device=%s\n", dev_name(dev));
74
75    block = new_block(dev);
76
77    create_vol_list(jcr);
78    if (jcr->NumVolumes == 0) {
79       Jmsg(jcr, M_FATAL, 0, _("No Volume names found for restore.\n"));
80       free_block(block);
81       free_vol_list(jcr);
82       return 0;
83    }
84
85    Dmsg2(200, "Found %d volumes names to restore. First=%s\n", jcr->NumVolumes, 
86       jcr->VolList->VolumeName);
87
88    pm_strcpy(&jcr->VolumeName, jcr->VolList->VolumeName);
89
90    /* 
91     * Ready device for reading, and read records
92     */
93    if (!acquire_device_for_read(jcr, dev, block)) {
94       free_block(block);
95       free_vol_list(jcr);
96       return 0;
97    }
98
99    rec = new_record();
100    free_pool_memory(rec->data);
101    rec->data = ds->msg;                /* use socket message buffer */
102    hdr = get_pool_memory(PM_MESSAGE);
103
104    /*
105     *   Read records, apply BSR filtering, and return any that are 
106     *    matched.
107     */
108    for ( ; ok && !done; ) {
109       if (job_canceled(jcr)) {
110          ok = FALSE;
111          break;
112       }
113       /* Read Record */
114       Dmsg1(500, "Main read_record. rem=%d\n", rec->remainder);
115
116       if (block_is_empty(block) && !read_block_from_device(jcr, dev, block, CHECK_BLOCK_NUMBERS)) {
117          Dmsg1(500, "Main read record failed. rem=%d\n", rec->remainder);
118          if (dev->state & ST_EOT) {
119             DEV_RECORD *record;
120             if (!mount_next_read_volume(jcr, dev, block)) {
121                break;
122             }
123             /* Read and discard Volume Label */
124             record = new_record();
125             read_block_from_device(jcr, dev, block, NO_BLOCK_NUMBER_CHECK);
126             read_record_from_block(block, record);
127             get_session_record(dev, record, &sessrec);
128             free_record(record);
129             /* Now, continue to read the records on this volume */
130
131          } else if (dev->state & ST_EOF) {
132             Dmsg0(90, "Got End of File. Trying again ...\n");
133             continue;                 /* End of File */
134          } else if (dev->state & ST_SHORT) {
135             continue;
136          } else {
137             /* I/O error -- or non-standard end of tape */
138             Dmsg0(000, "I/O error, bailing out.\n");
139             ok = FALSE;
140             break;
141          }
142       }
143
144       for (rec->state=0; !is_block_empty(rec); ) {
145
146          if (!read_record_from_block(block, rec)) {
147             break;
148          }
149          /*
150           * At this point, we have at least a record header.
151           *  Now decide if we want this record or not, but remember
152           *  before accessing the record, we may need to read again to
153           *  get all the data.
154           */
155
156          if (rec->FileIndex == EOM_LABEL) { /* end of tape? */
157             Dmsg0(40, "Get EOM LABEL\n");
158             rec->remainder = 0;
159             break;                         /* yes, get out */
160          }
161
162          /* Some sort of label? */ 
163          if (rec->FileIndex < 0) {
164             get_session_record(dev, rec, &sessrec);
165             continue;
166          } /* end if label record */
167
168
169          /* Match BSR against current record */
170          if (jcr->bsr) {
171             int stat = match_bsr(jcr->bsr, rec, &dev->VolHdr, &sessrec);
172             if (stat == -1) {         /* no more possible matches */
173                done = TRUE;
174                break;
175             } else if (stat == 0) {   /* no match */
176                Dmsg0(50, "BSR rejected record\n");
177                rec->remainder = 0;
178                continue;
179             }
180          } else { 
181             /* Old way, deprecated */
182             if (rec->VolSessionId != jcr->read_VolSessionId ||
183                 rec->VolSessionTime != jcr->read_VolSessionTime) {
184                Dmsg0(50, "Ignore record ids not equal\n");
185                rec->remainder = 0;
186                continue;                    /* ignore */
187             }
188          }
189
190          if (block->block_read) {
191             if (BlockNumber != block->BlockNumber) {
192                Jmsg(jcr, M_ERROR, 0, _("Invalid block number. Expected %u, got %u\n"),
193                     BlockNumber, block->BlockNumber);
194             }
195             BlockNumber = block->BlockNumber + 1;
196             block->block_read = false;
197          }
198
199          if (is_partial_record(rec)) {
200             break;                    /* Go read full record */
201          }
202           
203          /*
204           * We "finally" have a full record here. Now
205           *   generate Header parameters and send to File daemon
206           * Note, we build header in hdr buffer to avoid wiping
207           *   out the data record
208           */
209          ds->msg = hdr;
210          Dmsg5(400, "Send to FD: SessId=%u SessTim=%u FI=%d Strm=%d, len=%d\n",
211             rec->VolSessionId, rec->VolSessionTime, rec->FileIndex, rec->Stream,
212             rec->data_len);
213          if (!bnet_fsend(ds, rec_header, rec->VolSessionId, rec->VolSessionTime,
214                 rec->FileIndex, rec->Stream, rec->data_len)) {
215             Dmsg1(30, ">filed: Error Hdr=%s\n", ds->msg);
216             hdr = ds->msg;
217             ds->msg = rec->data;
218             Jmsg1(jcr, M_FATAL, 0, _("Error sending to File daemon. ERR=%s\n"),
219                bnet_strerror(ds));
220             ok = FALSE;
221             break;
222          } else {
223             Dmsg1(30, ">filed: Hdr=%s\n", ds->msg);
224          }
225
226          hdr = ds->msg;               /* restore hdr buffer */
227          ds->msg = rec->data;         /* restore data record address */
228
229          /* Send data record to File daemon */
230          ds->msglen = rec->data_len;
231          Dmsg1(40, ">filed: send %d bytes data.\n", ds->msglen);
232          if (!bnet_send(ds)) {
233             Pmsg1(000, "Error sending to FD. ERR=%s\n", bnet_strerror(ds));
234             Dmsg1(100, "Hdr=%s\n", hdr);
235             Dmsg1(100, "data=%s\n", ds->msg);
236             Jmsg1(jcr, M_FATAL, 0, _("Error sending to File daemon. ERR=%s\n"),
237                bnet_strerror(ds));
238             ok = FALSE;
239             break;
240          }
241       } /* end for loop reading records */
242    } /* end for loop reading blocks */
243    /* Send end of data to FD */
244    bnet_sig(ds, BNET_EOD);
245
246    if (!release_device(jcr, dev)) {
247       ok = FALSE;
248    }
249    free_pool_memory(hdr);
250    free_block(block);
251    rec->data = NULL;                  /* previously released */
252    free_record(rec);
253    free_vol_list(jcr);
254    Dmsg0(30, "Done reading.\n");
255    return ok ? 1 : 0;
256 }
257
258 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec)
259 {
260    char *rtype;
261    memset(sessrec, 0, sizeof(sessrec));
262    switch (rec->FileIndex) {
263    case PRE_LABEL:
264       rtype = "Fresh Volume Label";   
265       break;
266    case VOL_LABEL:
267       rtype = "Volume Label";
268       unser_volume_label(dev, rec);
269       break;
270    case SOS_LABEL:
271       rtype = "Begin Session";
272       unser_session_label(sessrec, rec);
273       break;
274    case EOS_LABEL:
275       rtype = "End Session";
276       break;
277    case EOM_LABEL:
278       rtype = "End of Media";
279       break;
280    default:
281       rtype = "Unknown";
282       break;
283    }
284    Dmsg5(10, "%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n",
285          rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
286 }