git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/mount.c

   1 /*
   2  *
   3  *  Routines for handling mounting tapes for reading and for
   4  *    writing.
   5  *
   6  *   Kern Sibbald, August MMII
   7  *
   8  *   Version $Id$
   9  */
  10 /*
  11    Copyright (C) 2002-2005 Kern Sibbald
  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
  15    version 2 as ammended with additional clauses defined in the
  16    file LICENSE in the main source directory.
  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
  21    the file LICENSE for additional details.
  22
  23  */
  24
  25 #include "bacula.h"                   /* pull in global headers */
  26 #include "stored.h"                   /* pull in Storage Deamon headers */
  27
  28 static void mark_volume_not_inchanger(DCR *dcr);
  29
  30 /*
  31  * If release is set, we rewind the current volume,
  32  * which we no longer want, and ask the user (console)
  33  * to mount the next volume.
  34  *
  35  *  Continue trying until we get it, and then ensure
  36  *  that we can write on it.
  37  *
  38  * This routine returns a 0 only if it is REALLY
  39  *  impossible to get the requested Volume.
  40  *
  41  */
  42 bool mount_next_write_volume(DCR *dcr, bool release)
  43 {
  44    int retry = 0;
  45    bool ask = false, recycle, autochanger;
  46    int vol_label_status;
  47    DEVICE *dev = dcr->dev;
  48    JCR *jcr = dcr->jcr;
  49    DEV_BLOCK *block = dcr->block;
  50
  51    Dmsg0(100, "Enter mount_next_volume()\n");
  52
  53    init_device_wait_timers(dcr);
  54
  55    /*
  56     * Attempt to mount the next volume. If something non-fatal goes
  57     *  wrong, we come back here to re-try (new op messages, re-read
  58     *  Volume, ...)
  59     */
  60 mount_next_vol:
  61    /* Ignore retry if this is poll request */
  62    if (!dev->poll && retry++ > 4) {
  63       /* Last ditch effort before giving up, force operator to respond */
  64       dcr->VolCatInfo.Slot = 0;
  65       if (!dir_ask_sysop_to_mount_volume(dcr)) {
  66          Jmsg(jcr, M_FATAL, 0, _("Too many errors trying to mount device %s.\n"),
  67               dev->print_name());
  68          return false;
  69       }
  70    }
  71    if (job_canceled(jcr)) {
  72       Jmsg(jcr, M_FATAL, 0, _("Job %d canceled.\n"), jcr->JobId);
  73       return false;
  74    }
  75    recycle = false;
  76    if (release) {
  77       Dmsg0(100, "mount_next_volume release=1\n");
  78       release_volume(dcr);
  79       ask = true;                     /* ask operator to mount tape */
  80    }
  81
  82    /*
  83     * Get Director's idea of what tape we should have mounted.
  84     *    in dcr->VolCatInfo
  85     */
  86    Dmsg0(200, "Before dir_find_next_appendable_volume.\n");
  87    while (!dir_find_next_appendable_volume(dcr)) {
  88        Dmsg0(200, "not dir_find_next\n");
  89        if (!dir_ask_sysop_to_create_appendable_volume(dcr)) {
  90          return false;
  91        }
  92        Dmsg0(200, "Again dir_find_next_append...\n");
  93    }
  94    if (job_canceled(jcr)) {
  95       return false;
  96    }
  97    Dmsg3(100, "After find_next_append. Vol=%s Slot=%d Parts=%d\n",
  98          dcr->VolCatInfo.VolCatName, dcr->VolCatInfo.Slot, dcr->VolCatInfo.VolCatParts);
  99
 100    dev->num_parts = dcr->VolCatInfo.VolCatParts;
 101
 102    /*
 103     * Get next volume and ready it for append
 104     * This code ensures that the device is ready for
 105     * writing. We start from the assumption that there
 106     * may not be a tape mounted.
 107     *
 108     * If the device is a file, we create the output
 109     * file. If it is a tape, we check the volume name
 110     * and move the tape to the end of data.
 111     *
 112     */
 113    if (autoload_device(dcr, 1, NULL) > 0) {
 114       autochanger = true;
 115       ask = false;
 116    } else {
 117       autochanger = false;
 118       dcr->VolCatInfo.Slot = 0;
 119    }
 120    Dmsg1(100, "autoload_dev returns %d\n", autochanger);
 121    /*
 122     * If we autochanged to correct Volume or (we have not just
 123     *   released the Volume AND we can automount) we go ahead
 124     *   and read the label. If there is no tape in the drive,
 125     *   we will err, recurse and ask the operator the next time.
 126     */
 127    if (!release && dev->is_tape() && dev_cap(dev, CAP_AUTOMOUNT)) {
 128       ask = false;                 /* don't ask SYSOP this time */
 129    }
 130    /* Don't ask if not removable */
 131    if (!dev_cap(dev, CAP_REM)) {
 132       ask = false;
 133    }
 134    Dmsg2(100, "Ask=%d autochanger=%d\n", ask, autochanger);
 135    release = true;                /* release next time if we "recurse" */
 136
 137    if (ask && !dir_ask_sysop_to_mount_volume(dcr)) {
 138       Dmsg0(100, "Error return ask_sysop ...\n");
 139       return false;          /* error return */
 140    }
 141    if (job_canceled(jcr)) {
 142       return false;
 143    }
 144    Dmsg1(100, "want vol=%s\n", dcr->VolumeName);
 145
 146    if (dev->poll && dev_cap(dev, CAP_CLOSEONPOLL)) {
 147       force_close_device(dev);
 148    }
 149
 150    /* Ensure the device is open */
 151    /* If we have a dvd that requires mount, we first want to guess
 152     * which Volume is loaded, so we continue (if the wrong device is
 153     * loaded, open_device just below would fail.
 154     */
 155    if (!dev->is_dvd()) {
 156       if (!open_device(dcr)) {
 157          if (dev->poll) {
 158             goto mount_next_vol;
 159          } else {
 160             return false;
 161          }
 162       }
 163    } else {
 164       /*
 165        * Just copy the VolCatName in the device resource
 166        *   (usually done by open_dev).
 167        * It is necessary so we can open the real files later.
 168        */
 169       bstrncpy(dev->VolCatInfo.VolCatName, dcr->VolCatInfo.VolCatName, sizeof(dev->VolCatInfo.VolCatName));
 170    }
 171
 172    /*
 173     * Now make sure we have the right tape mounted
 174     */
 175 read_volume:
 176    /*
 177     * If we are writing to a stream device, ASSUME the volume label
 178     *  is correct.
 179     */
 180    if (dev_cap(dev, CAP_STREAM)) {
 181       vol_label_status = VOL_OK;
 182       create_volume_label(dev, dcr->VolumeName, "Default");
 183       dev->VolHdr.LabelType = PRE_LABEL;
 184    } else if (dev->is_dvd()) {
 185       vol_label_status = read_dvd_volume_label(dcr, /*write*/true);
 186    } else {
 187       vol_label_status = read_dev_volume_label(dcr);
 188    }
 189    if (job_canceled(jcr)) {
 190       return false;
 191    }
 192
 193    Dmsg2(100, "Want dirVol=%s dirStat=%s\n", dcr->VolumeName,
 194       dcr->VolCatInfo.VolCatStatus);
 195    /*
 196     * At this point, dev->VolCatInfo has what is in the drive, if anything,
 197     *          and   dcr->VolCatInfo has what the Director wants.
 198     */
 199    switch (vol_label_status) {
 200    case VOL_OK:
 201       Dmsg1(100, "Vol OK name=%s\n", dcr->VolumeName);
 202       memcpy(&dev->VolCatInfo, &dcr->VolCatInfo, sizeof(dev->VolCatInfo));
 203       recycle = strcmp(dev->VolCatInfo.VolCatStatus, "Recycle") == 0;
 204       break;                    /* got a Volume */
 205    case VOL_NAME_ERROR:
 206       VOLUME_CAT_INFO VolCatInfo, devVolCatInfo;
 207
 208       /* If not removable, Volume is broken */
 209       if (!dev_cap(dev, CAP_REM)) {
 210          Jmsg(jcr, M_WARNING, 0, _("Volume \"%s\" not on device %s.\n"),
 211             dcr->VolumeName, dev->print_name());
 212          mark_volume_in_error(dcr);
 213          goto mount_next_vol;
 214       }
 215
 216       Dmsg1(100, "Vol NAME Error Name=%s\n", dcr->VolumeName);
 217       /* If polling and got a previous bad name, ignore it */
 218       if (dev->poll && strcmp(dev->BadVolName, dev->VolHdr.VolumeName) == 0) {
 219          ask = true;
 220          Dmsg1(200, "Vol Name error supress due to poll. Name=%s\n",
 221             dcr->VolumeName);
 222          goto mount_next_vol;
 223       }
 224       /*
 225        * OK, we got a different volume mounted. First save the
 226        *  requested Volume info (dcr) structure, then query if
 227        *  this volume is really OK. If not, put back the desired
 228        *  volume name, mark it not in changer and continue.
 229        */
 230       memcpy(&VolCatInfo, &dcr->VolCatInfo, sizeof(VolCatInfo));
 231       memcpy(&devVolCatInfo, &dev->VolCatInfo, sizeof(devVolCatInfo));
 232       /* Check if this is a valid Volume in the pool */
 233       bstrncpy(dcr->VolumeName, dev->VolHdr.VolumeName, sizeof(dcr->VolumeName));
 234       if (!dir_get_volume_info(dcr, GET_VOL_INFO_FOR_WRITE)) {
 235          /* Restore desired volume name, note device info out of sync */
 236          /* This gets the info regardless of the Pool */
 237          bstrncpy(dcr->VolumeName, dev->VolHdr.VolumeName, sizeof(dcr->VolumeName));
 238          if (autochanger && dir_get_volume_info(dcr, GET_VOL_INFO_FOR_READ)) {
 239             mark_volume_not_inchanger(dcr);
 240          }
 241          memcpy(&dev->VolCatInfo, &devVolCatInfo, sizeof(dev->VolCatInfo));
 242          bstrncpy(dev->BadVolName, dev->VolHdr.VolumeName, sizeof(dev->BadVolName));
 243          Jmsg(jcr, M_WARNING, 0, _("Director wanted Volume \"%s\".\n"
 244               "    Current Volume \"%s\" not acceptable because:\n"
 245               "    %s"),
 246              VolCatInfo.VolCatName, dev->VolHdr.VolumeName,
 247              jcr->dir_bsock->msg);
 248          ask = true;
 249          goto mount_next_vol;
 250       }
 251       /* This was not the volume we expected, but it is OK with
 252        * the Director, so use it.
 253        */
 254       Dmsg1(100, "want new name=%s\n", dcr->VolumeName);
 255       memcpy(&dev->VolCatInfo, &dcr->VolCatInfo, sizeof(dev->VolCatInfo));
 256       recycle = strcmp(dev->VolCatInfo.VolCatStatus, "Recycle") == 0;
 257       break;                /* got a Volume */
 258    /*
 259     * At this point, we assume we have a blank tape mounted.
 260     */
 261    case VOL_IO_ERROR:
 262       if (dev->is_dvd()) {
 263          Jmsg(jcr, M_FATAL, 0, "%s", jcr->errmsg);
 264          mark_volume_in_error(dcr);
 265          return false;       /* we could not write on DVD */
 266       }
 267       /* Fall through wanted */
 268    case VOL_NO_LABEL:
 269       /*
 270        * If permitted, we label the device, make sure we can do
 271        *   it by checking that the VolCatBytes is zero => not labeled,
 272        *   once the Volume is labeled we don't want to label another
 273        *   blank tape with the same name.  For disk, we go ahead and
 274        *   label it anyway, because the OS insures that there is only
 275        *   one Volume with that name.
 276        * As noted above, at this point dcr->VolCatInfo has what
 277        *   the Director wants and dev->VolCatInfo has info on the
 278        *   previous tape (or nothing).
 279        */
 280       if (dev_cap(dev, CAP_LABEL) && (dcr->VolCatInfo.VolCatBytes == 0 ||
 281             (!dev->is_tape() && strcmp(dcr->VolCatInfo.VolCatStatus,
 282                                    "Recycle") == 0))) {
 283          Dmsg0(100, "Create volume label\n");
 284          /* Create a new Volume label and write it to the device */
 285          if (!write_new_volume_label_to_dev(dcr, dcr->VolumeName,
 286                 dcr->pool_name)) {
 287             Dmsg0(100, "!write_vol_label\n");
 288             mark_volume_in_error(dcr);
 289             goto mount_next_vol;
 290          }
 291          Dmsg0(100, "dir_update_vol_info. Set Append\n");
 292          /* Copy Director's info into the device info */
 293          memcpy(&dev->VolCatInfo, &dcr->VolCatInfo, sizeof(dev->VolCatInfo));
 294          if (!dir_update_volume_info(dcr, true)) {  /* indicate tape labeled */
 295             return false;
 296          }
 297          Jmsg(jcr, M_INFO, 0, _("Labeled new Volume \"%s\" on device %s.\n"),
 298             dcr->VolumeName, dev->print_name());
 299          goto read_volume;      /* read label we just wrote */
 300       }
 301       /* If not removable, Volume is broken */
 302       if (!dev_cap(dev, CAP_REM)) {
 303          Jmsg(jcr, M_WARNING, 0, _("Volume \"%s\" not on device %s.\n"),
 304             dcr->VolumeName, dev->print_name());
 305          mark_volume_in_error(dcr);
 306          goto mount_next_vol;
 307       }
 308       /* NOTE! Fall-through wanted. */
 309    case VOL_NO_MEDIA:
 310    default:
 311       /* Send error message */
 312       if (!dev->poll) {
 313       } else {
 314          Dmsg1(200, "Msg suppressed by poll: %s\n", jcr->errmsg);
 315       }
 316       ask = true;
 317       /* Needed, so the medium can be changed */
 318       if (dev->requires_mount()) {
 319          close_device(dev);
 320       }
 321       goto mount_next_vol;
 322    }
 323
 324    /*
 325     * See if we have a fresh tape or a tape with data.
 326     *
 327     * Note, if the LabelType is PRE_LABEL, it was labeled
 328     *  but never written. If so, rewrite the label but set as
 329     *  VOL_LABEL.  We rewind and return the label (reconstructed)
 330     *  in the block so that in the case of a new tape, data can
 331     *  be appended just after the block label.  If we are writing
 332     *  a second volume, the calling routine will write the label
 333     *  before writing the overflow block.
 334     *
 335     *  If the tape is marked as Recycle, we rewrite the label.
 336     */
 337    if (dev->VolHdr.LabelType == PRE_LABEL || recycle) {
 338       if (!rewrite_volume_label(dcr, recycle)) {
 339          mark_volume_in_error(dcr);
 340          goto mount_next_vol;
 341       }
 342    } else {
 343       /*
 344        * OK, at this point, we have a valid Bacula label, but
 345        * we need to position to the end of the volume, since we are
 346        * just now putting it into append mode.
 347        */
 348       Dmsg0(200, "Device previously written, moving to end of data\n");
 349       Jmsg(jcr, M_INFO, 0, _("Volume \"%s\" previously written, moving to end of data.\n"),
 350          dcr->VolumeName);
 351       if (!eod_dev(dev)) {
 352          Jmsg(jcr, M_ERROR, 0, _("Unable to position to end of data on device %s: ERR=%s\n"),
 353             dev->print_name(), strerror_dev(dev));
 354          mark_volume_in_error(dcr);
 355          goto mount_next_vol;
 356       }
 357       /* *****FIXME**** we should do some checking for files too */
 358       if (dev->is_tape()) {
 359          /*
 360           * Check if we are positioned on the tape at the same place
 361           * that the database says we should be.
 362           */
 363          if (dev->VolCatInfo.VolCatFiles == dev_file(dev)) {
 364             Jmsg(jcr, M_INFO, 0, _("Ready to append to end of Volume \"%s\" at file=%d.\n"),
 365                  dcr->VolumeName, dev_file(dev));
 366          } else {
 367             Jmsg(jcr, M_ERROR, 0, _("I cannot write on Volume \"%s\" because:\n"
 368 "The number of files mismatch! Volume=%u Catalog=%u\n"),
 369                  dcr->VolumeName, dev_file(dev), dev->VolCatInfo.VolCatFiles);
 370             mark_volume_in_error(dcr);
 371             goto mount_next_vol;
 372          }
 373       }
 374       dev->VolCatInfo.VolCatMounts++;      /* Update mounts */
 375       Dmsg1(100, "update volinfo mounts=%d\n", dev->VolCatInfo.VolCatMounts);
 376       if (!dir_update_volume_info(dcr, false)) {
 377          return false;
 378       }
 379       /* Return an empty block */
 380       empty_block(block);             /* we used it for reading so set for write */
 381    }
 382    dev->set_append();
 383    Dmsg0(100, "set APPEND, normal return from read_dev_for_append\n");
 384    return true;
 385 }
 386
 387
 388
 389 /*
 390  * Mark volume in error in catalog
 391  */
 392 void mark_volume_in_error(DCR *dcr)
 393 {
 394    DEVICE *dev = dcr->dev;
 395    Jmsg(dcr->jcr, M_INFO, 0, _("Marking Volume \"%s\" in Error in Catalog.\n"),
 396         dcr->VolumeName);
 397    memcpy(&dev->VolCatInfo, &dcr->VolCatInfo, sizeof(dev->VolCatInfo));
 398    bstrncpy(dev->VolCatInfo.VolCatStatus, "Error", sizeof(dev->VolCatInfo.VolCatStatus));
 399    Dmsg0(100, "dir_update_vol_info. Set Error.\n");
 400    dir_update_volume_info(dcr, false);
 401 }
 402
 403 /*
 404  * The Volume is not in the correct slot, so mark this
 405  *   Volume as not being in the Changer.
 406  */
 407 static void mark_volume_not_inchanger(DCR *dcr)
 408 {
 409    JCR *jcr = dcr->jcr;
 410    DEVICE *dev = dcr->dev;
 411    Jmsg(jcr, M_ERROR, 0, _("Autochanger Volume \"%s\" not found in slot %d.\n"
 412 "    Setting InChanger to zero in catalog.\n"),
 413         dcr->VolCatInfo.VolCatName, dcr->VolCatInfo.Slot);
 414    memcpy(&dev->VolCatInfo, &dcr->VolCatInfo, sizeof(dev->VolCatInfo));
 415    dcr->VolCatInfo.InChanger = false;
 416    dev->VolCatInfo.InChanger = false;
 417    Dmsg0(400, "update vol info in mount\n");
 418    dir_update_volume_info(dcr, true);  /* set new status */
 419 }
 420
 421 /*
 422  * Either because we are going to hang a new volume, or because
 423  *  of explicit user request, we release the current volume.
 424  */
 425 void release_volume(DCR *dcr)
 426 {
 427    JCR *jcr = dcr->jcr;
 428    DEVICE *dev = dcr->dev;
 429    if (dcr->WroteVol) {
 430       Jmsg0(jcr, M_ERROR, 0, "Hey!!!!! WroteVol non-zero !!!!!\n");
 431       Dmsg0(190, "Hey!!!!! WroteVol non-zero !!!!!\n");
 432    }
 433    /*
 434     * First erase all memory of the current volume
 435     */
 436    dev->block_num = dev->file = 0;
 437    dev->EndBlock = dev->EndFile = 0;
 438    memset(&dev->VolCatInfo, 0, sizeof(dev->VolCatInfo));
 439    memset(&dcr->VolCatInfo, 0, sizeof(dcr->VolCatInfo));
 440    free_volume(dev);
 441    memset(&dev->VolHdr, 0, sizeof(dev->VolHdr));
 442    /* Force re-read of label */
 443    dev->clear_labeled();
 444    dev->clear_read();
 445    dev->clear_append();
 446    dev->label_type = B_BACULA_LABEL;
 447    dcr->VolumeName[0] = 0;
 448
 449    if (dev->is_open() && (!dev->is_tape() || !dev_cap(dev, CAP_ALWAYSOPEN))) {
 450       offline_or_rewind_dev(dev);
 451       close_device(dev);
 452    }
 453
 454    /* If we have not closed the device, then at least rewind the tape */
 455    if (dev->is_open()) {
 456       offline_or_rewind_dev(dev);
 457    }
 458    Dmsg0(190, "===== release_volume ---");
 459 }
 460
 461 /*
 462  * If we are reading, we come here at the end of the tape
 463  *  and see if there are more volumes to be mounted.
 464  */
 465 bool mount_next_read_volume(DCR *dcr)
 466 {
 467    DEVICE *dev = dcr->dev;
 468    JCR *jcr = dcr->jcr;
 469    Dmsg2(90, "NumVolumes=%d CurVolume=%d\n", jcr->NumVolumes, jcr->CurVolume);
 470    /*
 471     * End Of Tape -- mount next Volume (if another specified)
 472     */
 473    if (jcr->NumVolumes > 1 && jcr->CurVolume < jcr->NumVolumes) {
 474       close_device(dev);
 475       dev->clear_read();
 476       if (!acquire_device_for_read(dcr)) {
 477          Jmsg2(jcr, M_FATAL, 0, "Cannot open Dev=%s, Vol=%s\n", dev->print_name(),
 478                dcr->VolumeName);
 479          return false;
 480       }
 481       return true;                    /* next volume mounted */
 482    }
 483    Dmsg0(90, "End of Device reached.\n");
 484    return false;
 485 }