git.sur5r.net Git - bacula/bacula/blob - 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 /* Variables used by Child process */
  35 /* Global statistics */
  36 /* Note, these probably should be in shared memory so that
  37  * they are truly global for all processes
  38  */
  39 extern struct s_shm *shm;             /* shared memory structure */
  40 extern int  FiledDataChan;            /* File daemon data channel (port) */
  41
  42
  43 /* Responses sent to the File daemon */
  44 static char OK_data[]    = "3000 OK data\n";
  45 static char rec_header[] = "rechdr %ld %ld %ld %ld %ld";
  46
  47
  48 /*
  49  *  Read Data and send to File Daemon
  50  *   Returns: 0 on failure
  51  *            1 on success
  52  */
  53 int do_read_data(JCR *jcr)
  54 {
  55    BSOCK *ds;
  56    BSOCK *fd_sock = jcr->file_bsock;
  57    int ok = TRUE;
  58    int done = FALSE;
  59    DEVICE *dev;
  60    DEV_RECORD *rec;
  61    DEV_BLOCK *block;
  62    POOLMEM *hdr;
  63    SESSION_LABEL sessrec;              /* session record */
  64
  65    Dmsg0(20, "Start read data.\n");
  66
  67    dev = jcr->device->dev;
  68    memset(&sessrec, 0, sizeof(sessrec));
  69
  70    /* Tell File daemon we will send data */
  71    bnet_fsend(fd_sock, OK_data);
  72    Dmsg1(10, "bstored>filed: %s\n", fd_sock->msg);
  73
  74    ds = fd_sock;
  75
  76    if (!bnet_set_buffer_size(ds, MAX_NETWORK_BUFFER_SIZE, BNET_SETBUF_READ)) {
  77       return 0;
  78    }
  79
  80
  81    Dmsg1(20, "Begin read device=%s\n", dev_name(dev));
  82
  83    block = new_block(dev);
  84
  85    create_vol_list(jcr);
  86    if (jcr->NumVolumes == 0) {
  87       Jmsg(jcr, M_FATAL, 0, _("No Volume names found for restore.\n"));
  88       free_block(block);
  89       free_vol_list(jcr);
  90       return 0;
  91    }
  92
  93    Dmsg2(200, "Found %d volumes names to restore. First=%s\n", jcr->NumVolumes,
  94       jcr->VolList->VolumeName);
  95
  96    pm_strcpy(&jcr->VolumeName, jcr->VolList->VolumeName);
  97
  98    /*
  99     * Ready device for reading, and read records
 100     */
 101    if (!acquire_device_for_read(jcr, dev, block)) {
 102       free_block(block);
 103       free_vol_list(jcr);
 104       return 0;
 105    }
 106
 107    rec = new_record();
 108    free_pool_memory(rec->data);
 109    rec->data = ds->msg;                /* use socket message buffer */
 110    hdr = get_pool_memory(PM_MESSAGE);
 111
 112    /*
 113     *   Read records, apply BSR filtering, and return any that are
 114     *    matched.
 115     */
 116    for ( ; ok && !done; ) {
 117       if (job_canceled(jcr)) {
 118          ok = FALSE;
 119          break;
 120       }
 121       /* Read Record */
 122       Dmsg1(500, "Main read_record. rem=%d\n", rec->remainder);
 123
 124       if (block_is_empty(block) && !read_block_from_device(jcr, dev, block, CHECK_BLOCK_NUMBERS)) {
 125          Dmsg1(500, "Main read record failed. rem=%d\n", rec->remainder);
 126          if (dev->state & ST_EOT) {
 127             DEV_RECORD *record;
 128             if (!mount_next_read_volume(jcr, dev, block)) {
 129                break;
 130             }
 131             /* Read and discard Volume Label */
 132             record = new_record();
 133             read_block_from_device(jcr, dev, block, NO_BLOCK_NUMBER_CHECK);
 134             read_record_from_block(block, record);
 135             get_session_record(dev, record, &sessrec);
 136             free_record(record);
 137             /* Now, continue to read the records on this volume */
 138
 139          } else if (dev->state & ST_EOF) {
 140             Dmsg0(90, "Got End of File. Trying again ...\n");
 141             continue;                 /* End of File */
 142          } else if (dev->state & ST_SHORT) {
 143             continue;
 144          } else {
 145             /* I/O error -- or non-standard end of tape */
 146             Dmsg0(000, "I/O error, bailing out.\n");
 147             ok = FALSE;
 148             break;
 149          }
 150       }
 151
 152       for (rec->state=0; !is_block_empty(rec); ) {
 153
 154          if (!read_record_from_block(block, rec)) {
 155             break;
 156          }
 157          /*
 158           * At this point, we have at least a record header.
 159           *  Now decide if we want this record or not, but remember
 160           *  before accessing the record, we may need to read again to
 161           *  get all the data.
 162           */
 163
 164          if (rec->FileIndex == EOM_LABEL) { /* end of tape? */
 165             Dmsg0(40, "Get EOM LABEL\n");
 166             rec->remainder = 0;
 167             break;                         /* yes, get out */
 168          }
 169
 170          /* Some sort of label? */
 171          if (rec->FileIndex < 0) {
 172             get_session_record(dev, rec, &sessrec);
 173             continue;
 174          } /* end if label record */
 175
 176
 177          /* Match BSR against current record */
 178          if (jcr->bsr) {
 179             int stat = match_bsr(jcr->bsr, rec, &dev->VolHdr, &sessrec);
 180             if (stat == -1) {         /* no more possible matches */
 181                done = TRUE;
 182                break;
 183             } else if (stat == 0) {   /* no match */
 184                Dmsg0(50, "BSR rejected record\n");
 185                rec->remainder = 0;
 186                continue;
 187             }
 188          } else {
 189             /* Old way, deprecated */
 190             if (rec->VolSessionId != jcr->read_VolSessionId ||
 191                 rec->VolSessionTime != jcr->read_VolSessionTime) {
 192                Dmsg0(50, "Ignore record ids not equal\n");
 193                rec->remainder = 0;
 194                continue;                    /* ignore */
 195             }
 196          }
 197
 198          if (is_partial_record(rec)) {
 199             break;                    /* Go read full record */
 200          }
 201
 202          /* Generate Header parameters and send to File daemon
 203           * Note, we build header in hdr buffer to avoid wiping
 204           * out the data record
 205           */
 206          ds->msg = hdr;
 207          Dmsg5(400, "Send to FD: SessId=%u SessTim=%u FI=%d Strm=%d, len=%d\n",
 208             rec->VolSessionId, rec->VolSessionTime, rec->FileIndex, rec->Stream,
 209             rec->data_len);
 210          if (!bnet_fsend(ds, rec_header, rec->VolSessionId, rec->VolSessionTime,
 211                 rec->FileIndex, rec->Stream, rec->data_len)) {
 212             Dmsg1(30, ">filed: Error Hdr=%s\n", ds->msg);
 213             hdr = ds->msg;
 214             ds->msg = rec->data;
 215             ok = FALSE;
 216             break;
 217          } else {
 218             Dmsg1(30, ">filed: Hdr=%s\n", ds->msg);
 219          }
 220
 221          hdr = ds->msg;               /* restore hdr buffer */
 222          ds->msg = rec->data;         /* restore data record address */
 223
 224          /* Send data record to File daemon */
 225          ds->msglen = rec->data_len;
 226          Dmsg1(40, ">filed: send %d bytes data.\n", ds->msglen);
 227          if (!bnet_send(ds)) {
 228             Pmsg1(000, "Error sending to FD. ERR=%s\n", bnet_strerror(ds));
 229             Dmsg1(100, "Hdr=%s\n", hdr);
 230             Dmsg1(100, "data=%s\n", ds->msg);
 231             Jmsg1(jcr, M_FATAL, 0, _("Error sending to File daemon. ERR=%s\n"),
 232                bnet_strerror(ds));
 233             ok = FALSE;
 234             break;
 235          }
 236       }
 237    }
 238    /* Send end of data to FD */
 239    bnet_sig(ds, BNET_EOD);
 240
 241    if (!release_device(jcr, dev)) {
 242       ok = FALSE;
 243    }
 244    free_pool_memory(hdr);
 245    free_block(block);
 246    rec->data = NULL;                  /* previously released */
 247    free_record(rec);
 248    free_vol_list(jcr);
 249    Dmsg0(30, "Done reading.\n");
 250    return ok ? 1 : 0;
 251 }
 252
 253 static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec)
 254 {
 255    char *rtype;
 256    memset(sessrec, 0, sizeof(sessrec));
 257    switch (rec->FileIndex) {
 258    case PRE_LABEL:
 259       rtype = "Fresh Volume Label";
 260       break;
 261    case VOL_LABEL:
 262       rtype = "Volume Label";
 263       unser_volume_label(dev, rec);
 264       break;
 265    case SOS_LABEL:
 266       rtype = "Begin Session";
 267       unser_session_label(sessrec, rec);
 268       break;
 269    case EOS_LABEL:
 270       rtype = "End Session";
 271       break;
 272    case EOM_LABEL:
 273       rtype = "End of Media";
 274       break;
 275    default:
 276       rtype = "Unknown";
 277       break;
 278    }
 279    Dmsg5(10, "%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n",
 280          rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
 281 }