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

   1 /*
   2    Bacula® - The Network Backup Solution
   3
   4    Copyright (C) 2000-2008 Free Software Foundation Europe e.V.
   5
   6    The main author of Bacula is Kern Sibbald, with contributions from
   7    many others, a complete list can be found in the file AUTHORS.
   8    This program is Free Software; you can redistribute it and/or
   9    modify it under the terms of version two of the GNU General Public
  10    License as published by the Free Software Foundation and included
  11    in the file LICENSE.
  12
  13    This program is distributed in the hope that it will be useful, but
  14    WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16    General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  21    02110-1301, USA.
  22
  23    Bacula® is a registered trademark of John Walker.
  24    The licensor of Bacula is the Free Software Foundation Europe
  25    (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
  26    Switzerland, email:ftf@fsfeurope.org.
  27 */
  28 /*
  29  *  Subroutines to handle Catalog reqests sent to the Director
  30  *   Reqests/commands from the Director are handled in dircmd.c
  31  *
  32  *   Kern Sibbald, December 2000
  33  *
  34  *   Version $Id$
  35  */
  36
  37 #include "bacula.h"                   /* pull in global headers */
  38 #include "stored.h"                   /* pull in Storage Deamon headers */
  39
  40 /* Requests sent to the Director */
  41 static char Find_media[]   = "CatReq Job=%s FindMedia=%d pool_name=%s media_type=%s\n";
  42 static char Get_Vol_Info[] = "CatReq Job=%s GetVolInfo VolName=%s write=%d\n";
  43 static char Update_media[] = "CatReq Job=%s UpdateMedia VolName=%s"
  44    " VolJobs=%u VolFiles=%u VolBlocks=%u VolBytes=%s VolMounts=%u"
  45    " VolErrors=%u VolWrites=%u MaxVolBytes=%s EndTime=%s VolStatus=%s"
  46    " Slot=%d relabel=%d InChanger=%d VolReadTime=%s VolWriteTime=%s"
  47    " VolFirstWritten=%s VolParts=%u\n";
  48 static char Create_job_media[] = "CatReq Job=%s CreateJobMedia"
  49    " FirstIndex=%u LastIndex=%u StartFile=%u EndFile=%u"
  50    " StartBlock=%u EndBlock=%u Copy=%d Strip=%d MediaId=%s\n";
  51 static char FileAttributes[] = "UpdCat Job=%s FileAttributes ";
  52 static char Job_status[]     = "Status Job=%s JobStatus=%d\n";
  53
  54 /* Responses received from the Director */
  55 static char OK_media[] = "1000 OK VolName=%127s VolJobs=%u VolFiles=%lu"
  56    " VolBlocks=%lu VolBytes=%lld VolMounts=%lu VolErrors=%lu VolWrites=%lu"
  57    " MaxVolBytes=%lld VolCapacityBytes=%lld VolStatus=%20s"
  58    " Slot=%ld MaxVolJobs=%lu MaxVolFiles=%lu InChanger=%ld"
  59    " VolReadTime=%lld VolWriteTime=%lld EndFile=%lu EndBlock=%lu"
  60    " VolParts=%lu LabelType=%ld MediaId=%lld\n";
  61
  62
  63 static char OK_create[] = "1000 OK CreateJobMedia\n";
  64
  65 static pthread_mutex_t vol_info_mutex = PTHREAD_MUTEX_INITIALIZER;
  66
  67 #ifdef needed
  68
  69 static char Device_update[] = "DevUpd Job=%s device=%s "
  70    "append=%d read=%d num_writers=%d "
  71    "open=%d labeled=%d offline=%d "
  72    "reserved=%d max_writers=%d "
  73    "autoselect=%d autochanger=%d "
  74    "changer_name=%s media_type=%s volume_name=%s\n";
  75
  76
  77 /* Send update information about a device to Director */
  78 bool dir_update_device(JCR *jcr, DEVICE *dev)
  79 {
  80    BSOCK *dir = jcr->dir_bsock;
  81    POOL_MEM dev_name, VolumeName, MediaType, ChangerName;
  82    DEVRES *device = dev->device;
  83    bool ok;
  84
  85    pm_strcpy(dev_name, device->hdr.name);
  86    bash_spaces(dev_name);
  87    if (dev->is_labeled()) {
  88       pm_strcpy(VolumeName, dev->VolHdr.VolumeName);
  89    } else {
  90       pm_strcpy(VolumeName, "*");
  91    }
  92    bash_spaces(VolumeName);
  93    pm_strcpy(MediaType, device->media_type);
  94    bash_spaces(MediaType);
  95    if (device->changer_res) {
  96       pm_strcpy(ChangerName, device->changer_res->hdr.name);
  97       bash_spaces(ChangerName);
  98    } else {
  99       pm_strcpy(ChangerName, "*");
 100    }
 101    ok = dir->fsend(Device_update,
 102       jcr->Job,
 103       dev_name.c_str(),
 104       dev->can_append()!=0,
 105       dev->can_read()!=0, dev->num_writers,
 106       dev->is_open()!=0, dev->is_labeled()!=0,
 107       dev->is_offline()!=0, dev->reserved_device,
 108       dev->is_tape()?100000:1,
 109       dev->autoselect, 0,
 110       ChangerName.c_str(), MediaType.c_str(), VolumeName.c_str());
 111    Dmsg1(100, ">dird: %s\n", dir->msg);
 112    return ok;
 113 }
 114
 115 bool dir_update_changer(JCR *jcr, AUTOCHANGER *changer)
 116 {
 117    BSOCK *dir = jcr->dir_bsock;
 118    POOL_MEM dev_name, MediaType;
 119    DEVRES *device;
 120    bool ok;
 121
 122    pm_strcpy(dev_name, changer->hdr.name);
 123    bash_spaces(dev_name);
 124    device = (DEVRES *)changer->device->first();
 125    pm_strcpy(MediaType, device->media_type);
 126    bash_spaces(MediaType);
 127    /* This is mostly to indicate that we are here */
 128    ok = dir->fsend(Device_update,
 129       jcr->Job,
 130       dev_name.c_str(),         /* Changer name */
 131       0, 0, 0,                  /* append, read, num_writers */
 132       0, 0, 0,                  /* is_open, is_labeled, offline */
 133       0, 0,                     /* reserved, max_writers */
 134       0,                        /* Autoselect */
 135       changer->device->size(),  /* Number of devices */
 136       "0",                      /* PoolId */
 137       "*",                      /* ChangerName */
 138       MediaType.c_str(),        /* MediaType */
 139       "*");                     /* VolName */
 140    Dmsg1(100, ">dird: %s\n", dir->msg);
 141    return ok;
 142 }
 143 #endif
 144
 145
 146 /*
 147  * Send current JobStatus to Director
 148  */
 149 bool dir_send_job_status(JCR *jcr)
 150 {
 151    return jcr->dir_bsock->fsend(Job_status, jcr->Job, jcr->JobStatus);
 152 }
 153
 154 /*
 155  * Common routine for:
 156  *   dir_get_volume_info()
 157  * and
 158  *   dir_find_next_appendable_volume()
 159  *
 160  *  NOTE!!! All calls to this routine must be protected by
 161  *          locking vol_info_mutex before calling it so that
 162  *          we don't have one thread modifying the parameters
 163  *          and another reading them.
 164  *
 165  *  Returns: true  on success and vol info in dcr->VolCatInfo
 166  *           false on failure
 167  */
 168 static bool do_get_volume_info(DCR *dcr)
 169 {
 170     JCR *jcr = dcr->jcr;
 171     BSOCK *dir = jcr->dir_bsock;
 172     VOLUME_CAT_INFO vol;
 173     int n;
 174     int32_t InChanger;
 175
 176     if (dir->recv() <= 0) {
 177        Dmsg0(200, "getvolname error bnet_recv\n");
 178        Mmsg(jcr->errmsg, _("Network error on bnet_recv in req_vol_info.\n"));
 179        return false;
 180     }
 181     memset(&vol, 0, sizeof(vol));
 182     Dmsg1(100, "<dird %s", dir->msg);
 183     n = sscanf(dir->msg, OK_media, vol.VolCatName,
 184                &vol.VolCatJobs, &vol.VolCatFiles,
 185                &vol.VolCatBlocks, &vol.VolCatBytes,
 186                &vol.VolCatMounts, &vol.VolCatErrors,
 187                &vol.VolCatWrites, &vol.VolCatMaxBytes,
 188                &vol.VolCatCapacityBytes, vol.VolCatStatus,
 189                &vol.Slot, &vol.VolCatMaxJobs, &vol.VolCatMaxFiles,
 190                &InChanger, &vol.VolReadTime, &vol.VolWriteTime,
 191                &vol.EndFile, &vol.EndBlock, &vol.VolCatParts,
 192                &vol.LabelType, &vol.VolMediaId);
 193     if (n != 22) {
 194        Dmsg3(100, "Bad response from Dir fields=%d, len=%d: %s",
 195              n, dir->msglen, dir->msg);
 196        Mmsg(jcr->errmsg, _("Error getting Volume info: %s"), dir->msg);
 197        return false;
 198     }
 199     vol.InChanger = InChanger;        /* bool in structure */
 200     unbash_spaces(vol.VolCatName);
 201     bstrncpy(dcr->VolumeName, vol.VolCatName, sizeof(dcr->VolumeName));
 202     dcr->VolCatInfo = vol;            /* structure assignment */
 203
 204     Dmsg2(100, "do_reqest_vol_info return true slot=%d Volume=%s\n",
 205           vol.Slot, vol.VolCatName);
 206     return true;
 207 }
 208
 209
 210 /*
 211  * Get Volume info for a specific volume from the Director's Database
 212  *
 213  * Returns: true  on success   (Director guarantees that Pool and MediaType
 214  *                              are correct and VolStatus==Append or
 215  *                              VolStatus==Recycle)
 216  *          false on failure
 217  *
 218  *          Volume information returned in dcr->VolCatInfo
 219  */
 220 bool dir_get_volume_info(DCR *dcr, enum get_vol_info_rw writing)
 221 {
 222     JCR *jcr = dcr->jcr;
 223     BSOCK *dir = jcr->dir_bsock;
 224
 225     P(vol_info_mutex);
 226     bstrncpy(dcr->VolCatInfo.VolCatName, dcr->VolumeName, sizeof(dcr->VolCatInfo.VolCatName));
 227     bash_spaces(dcr->VolCatInfo.VolCatName);
 228     dir->fsend(Get_Vol_Info, jcr->Job, dcr->VolCatInfo.VolCatName,
 229        writing==GET_VOL_INFO_FOR_WRITE?1:0);
 230     Dmsg1(100, ">dird %s", dir->msg);
 231     unbash_spaces(dcr->VolCatInfo.VolCatName);
 232     bool ok = do_get_volume_info(dcr);
 233     V(vol_info_mutex);
 234     return ok;
 235 }
 236
 237
 238
 239 /*
 240  * Get info on the next appendable volume in the Director's database
 241  *
 242  * Returns: true  on success dcr->VolumeName is volume
 243  *                reserve_volume() called on Volume name
 244  *          false on failure dcr->VolumeName[0] == 0
 245  *                also sets dcr->volume_in_use if at least one
 246  *                in use volume was found.
 247  *
 248  *          Volume information returned in dcr
 249  *
 250  */
 251 bool dir_find_next_appendable_volume(DCR *dcr)
 252 {
 253     JCR *jcr = dcr->jcr;
 254     BSOCK *dir = jcr->dir_bsock;
 255     bool rtn;
 256
 257     Dmsg2(200, "dir_find_next_appendable_volume: reserved=%d Vol=%s\n",
 258        dcr->reserved_device, dcr->VolumeName);
 259
 260     /*
 261      * Try the forty oldest or most available volumes.  Note,
 262      *   the most available could already be mounted on another
 263      *   drive, so we continue looking for a not in use Volume.
 264      */
 265     lock_volumes();
 266     P(vol_info_mutex);
 267     dcr->volume_in_use = false;
 268     for (int vol_index=1;  vol_index < 40; vol_index++) {
 269        bash_spaces(dcr->media_type);
 270        bash_spaces(dcr->pool_name);
 271        dir->fsend(Find_media, jcr->Job, vol_index, dcr->pool_name, dcr->media_type);
 272        unbash_spaces(dcr->media_type);
 273        unbash_spaces(dcr->pool_name);
 274        Dmsg1(100, ">dird %s", dir->msg);
 275        if (do_get_volume_info(dcr)) {
 276           if (!is_volume_in_use(dcr)) {
 277              Dmsg1(100, "Call reserve_volume. Vol=%s\n", dcr->VolumeName);
 278              if (reserve_volume(dcr, dcr->VolumeName) == 0) {
 279                 Dmsg2(100, "Could not reserve volume %s on %s\n", dcr->VolumeName,
 280                     dcr->dev->print_name());
 281                 continue;
 282              }
 283              Dmsg1(100, "dir_find_next_appendable_volume return true. vol=%s\n",
 284                 dcr->VolumeName);
 285              rtn = true;
 286              goto get_out;
 287           } else {
 288              Dmsg1(100, "Volume %s is in use.\n", dcr->VolumeName);
 289              dcr->volume_in_use = true;
 290              continue;
 291           }
 292        }
 293        Dmsg2(100, "No vol. index %d return false. dev=%s\n", vol_index,
 294           dcr->dev->print_name());
 295        break;
 296     }
 297     rtn = false;
 298     dcr->VolumeName[0] = 0;
 299
 300 get_out:
 301     V(vol_info_mutex);
 302     unlock_volumes();
 303     return rtn;
 304 }
 305
 306
 307 /*
 308  * After writing a Volume, send the updated statistics
 309  * back to the director. The information comes from the
 310  * dev record.
 311  */
 312 bool dir_update_volume_info(DCR *dcr, bool label, bool update_LastWritten)
 313 {
 314    JCR *jcr = dcr->jcr;
 315    BSOCK *dir = jcr->dir_bsock;
 316    DEVICE *dev = dcr->dev;
 317    VOLUME_CAT_INFO *vol = &dev->VolCatInfo;
 318    char ed1[50], ed2[50], ed3[50], ed4[50], ed5[50], ed6[50];
 319    int InChanger;
 320    bool ok = false;
 321    POOL_MEM VolumeName;
 322
 323    /* If system job, do not update catalog */
 324    if (jcr->JobType == JT_SYSTEM) {
 325       return true;
 326    }
 327
 328    if (vol->VolCatName[0] == 0) {
 329       Jmsg0(jcr, M_FATAL, 0, _("NULL Volume name. This shouldn't happen!!!\n"));
 330       Pmsg0(000, _("NULL Volume name. This shouldn't happen!!!\n"));
 331       return false;
 332    }
 333
 334    /* Lock during Volume update */
 335    P(vol_info_mutex);
 336    Dmsg1(100, "Update cat VolFiles=%d\n", dev->file);
 337    /* Just labeled or relabeled the tape */
 338    if (label) {
 339       bstrncpy(vol->VolCatStatus, "Append", sizeof(vol->VolCatStatus));
 340    }
 341 // if (update_LastWritten) {
 342       vol->VolLastWritten = time(NULL);
 343 // }
 344    pm_strcpy(VolumeName, vol->VolCatName);
 345    bash_spaces(VolumeName);
 346    InChanger = vol->InChanger;
 347    dir->fsend(Update_media, jcr->Job,
 348       VolumeName.c_str(), vol->VolCatJobs, vol->VolCatFiles,
 349       vol->VolCatBlocks, edit_uint64(vol->VolCatBytes, ed1),
 350       vol->VolCatMounts, vol->VolCatErrors,
 351       vol->VolCatWrites, edit_uint64(vol->VolCatMaxBytes, ed2),
 352       edit_uint64(vol->VolLastWritten, ed6),
 353       vol->VolCatStatus, vol->Slot, label,
 354       InChanger,                      /* bool in structure */
 355       edit_int64(vol->VolReadTime, ed3),
 356       edit_int64(vol->VolWriteTime, ed4),
 357       edit_uint64(vol->VolFirstWritten, ed5),
 358       vol->VolCatParts);
 359     Dmsg1(100, ">dird %s", dir->msg);
 360
 361    /* Do not lock device here because it may be locked from label */
 362    if (!do_get_volume_info(dcr)) {
 363       Jmsg(jcr, M_FATAL, 0, "%s", jcr->errmsg);
 364       Dmsg2(100, _("Didn't get vol info vol=%s: ERR=%s"),
 365          vol->VolCatName, jcr->errmsg);
 366       goto bail_out;
 367    }
 368    Dmsg1(420, "get_volume_info() %s", dir->msg);
 369    /* Update dev Volume info in case something changed (e.g. expired) */
 370    dev->VolCatInfo = dcr->VolCatInfo;
 371    ok = true;
 372
 373 bail_out:
 374    V(vol_info_mutex);
 375    return ok;
 376 }
 377
 378 /*
 379  * After writing a Volume, create the JobMedia record.
 380  */
 381 bool dir_create_jobmedia_record(DCR *dcr)
 382 {
 383    JCR *jcr = dcr->jcr;
 384    BSOCK *dir = jcr->dir_bsock;
 385    char ed1[50];
 386
 387    /* If system job, do not update catalog */
 388    if (jcr->JobType == JT_SYSTEM) {
 389       return true;
 390    }
 391
 392    if (!dcr->WroteVol) {
 393       return true;                    /* nothing written to tape */
 394    }
 395
 396    dcr->WroteVol = false;
 397    dir->fsend(Create_job_media, jcr->Job,
 398       dcr->VolFirstIndex, dcr->VolLastIndex,
 399       dcr->StartFile, dcr->EndFile,
 400       dcr->StartBlock, dcr->EndBlock,
 401       dcr->Copy, dcr->Stripe,
 402       edit_uint64(dcr->VolMediaId, ed1));
 403     Dmsg1(100, ">dird %s", dir->msg);
 404    if (dir->recv() <= 0) {
 405       Dmsg0(190, "create_jobmedia error bnet_recv\n");
 406       Jmsg(jcr, M_FATAL, 0, _("Error creating JobMedia record: ERR=%s\n"),
 407            dir->bstrerror());
 408       return false;
 409    }
 410    Dmsg1(100, "<dird %s", dir->msg);
 411    if (strcmp(dir->msg, OK_create) != 0) {
 412       Dmsg1(130, "Bad response from Dir: %s\n", dir->msg);
 413       Jmsg(jcr, M_FATAL, 0, _("Error creating JobMedia record: %s\n"), dir->msg);
 414       return false;
 415    }
 416    return true;
 417 }
 418
 419
 420 /*
 421  * Update File Attribute data
 422  */
 423 bool dir_update_file_attributes(DCR *dcr, DEV_RECORD *rec)
 424 {
 425    JCR *jcr = dcr->jcr;
 426    BSOCK *dir = jcr->dir_bsock;
 427    ser_declare;
 428
 429 #ifdef NO_ATTRIBUTES_TEST
 430    return true;
 431 #endif
 432
 433    dir->msg = check_pool_memory_size(dir->msg, sizeof(FileAttributes) +
 434                 MAX_NAME_LENGTH + sizeof(DEV_RECORD) + rec->data_len + 1);
 435    dir->msglen = bsnprintf(dir->msg, sizeof(FileAttributes) +
 436                 MAX_NAME_LENGTH + 1, FileAttributes, jcr->Job);
 437    ser_begin(dir->msg + dir->msglen, 0);
 438    ser_uint32(rec->VolSessionId);
 439    ser_uint32(rec->VolSessionTime);
 440    ser_int32(rec->FileIndex);
 441    ser_int32(rec->Stream);
 442    ser_uint32(rec->data_len);
 443    ser_bytes(rec->data, rec->data_len);
 444    dir->msglen = ser_length(dir->msg);
 445    Dmsg1(1800, ">dird %s\n", dir->msg);    /* Attributes */
 446    return dir->send();
 447 }
 448
 449
 450 /*
 451  *   Request the sysop to create an appendable volume
 452  *
 453  *   Entered with device blocked.
 454  *   Leaves with device blocked.
 455  *
 456  *   Returns: true  on success (operator issues a mount command)
 457  *            false on failure
 458  *              Note, must create dev->errmsg on error return.
 459  *
 460  *    On success, dcr->VolumeName and dcr->VolCatInfo contain
 461  *      information on suggested volume, but this may not be the
 462  *      same as what is actually mounted.
 463  *
 464  *    When we return with success, the correct tape may or may not
 465  *      actually be mounted. The calling routine must read it and
 466  *      verify the label.
 467  */
 468 bool dir_ask_sysop_to_create_appendable_volume(DCR *dcr)
 469 {
 470    int stat = W_TIMEOUT;
 471    DEVICE *dev = dcr->dev;
 472    JCR *jcr = dcr->jcr;
 473    bool got_vol = false;
 474
 475    Dmsg0(400, "enter dir_ask_sysop_to_create_appendable_volume\n");
 476    ASSERT(dev->blocked());
 477    for ( ;; ) {
 478       if (job_canceled(jcr)) {
 479          Mmsg(dev->errmsg,
 480               _("Job %s canceled while waiting for mount on Storage Device \"%s\".\n"),
 481               jcr->Job, dev->print_name());
 482          Jmsg(jcr, M_INFO, 0, "%s", dev->errmsg);
 483          return false;
 484       }
 485       dev->dlock();
 486       got_vol = dir_find_next_appendable_volume(dcr);   /* get suggested volume */
 487       dev->dunlock();
 488       if (got_vol) {
 489          return true;
 490       } else {
 491          if (stat == W_TIMEOUT || stat == W_MOUNT) {
 492             Jmsg(jcr, M_MOUNT, 0, _(
 493 "Job %s waiting. Cannot find any appendable volumes.\n"
 494 "Please use the \"label\"  command to create a new Volume for:\n"
 495 "    Storage:      %s\n"
 496 "    Pool:         %s\n"
 497 "    Media type:   %s\n"),
 498                jcr->Job,
 499                dev->print_name(),
 500                dcr->pool_name,
 501                dcr->media_type);
 502          }
 503       }
 504
 505       set_jcr_job_status(jcr, JS_WaitMedia);
 506       dir_send_job_status(jcr);
 507
 508       stat = wait_for_sysop(dcr);
 509       Dmsg1(100, "Back from wait_for_sysop stat=%d\n", stat);
 510       if (dev->poll) {
 511          Dmsg1(100, "Poll timeout in create append vol on device %s\n", dev->print_name());
 512          continue;
 513       }
 514
 515       if (stat == W_TIMEOUT) {
 516          if (!double_dev_wait_time(dev)) {
 517             Mmsg(dev->errmsg, _("Max time exceeded waiting to mount Storage Device %s for Job %s\n"),
 518                dev->print_name(), jcr->Job);
 519             Jmsg(jcr, M_FATAL, 0, "%s", dev->errmsg);
 520             Dmsg1(100, "Gave up waiting on device %s\n", dev->print_name());
 521             return false;             /* exceeded maximum waits */
 522          }
 523          continue;
 524       }
 525       if (stat == W_ERROR) {
 526          berrno be;
 527          Mmsg0(dev->errmsg, _("pthread error in mount_next_volume.\n"));
 528          Jmsg(jcr, M_FATAL, 0, "%s", dev->errmsg);
 529          return false;
 530       }
 531       Dmsg1(100, "Someone woke me for device %s\n", dev->print_name());
 532    }
 533    set_jcr_job_status(jcr, JS_Running);
 534    dir_send_job_status(jcr);
 535    Dmsg0(100, "leave dir_ask_sysop_to_mount_create_appendable_volume\n");
 536    return true;
 537 }
 538
 539 /*
 540  *   Request to mount specific Volume
 541  *
 542  *   Entered with device blocked and dcr->VolumeName is desired
 543  *      volume.
 544  *   Leaves with device blocked.
 545  *
 546  *   Returns: true  on success (operator issues a mount command)
 547  *            false on failure
 548  *                  Note, must create dev->errmsg on error return.
 549  *
 550  */
 551 bool dir_ask_sysop_to_mount_volume(DCR *dcr, int mode)
 552 {
 553    int stat = W_TIMEOUT;
 554    DEVICE *dev = dcr->dev;
 555    JCR *jcr = dcr->jcr;
 556
 557    Dmsg0(400, "enter dir_ask_sysop_to_mount_volume\n");
 558    if (!dcr->VolumeName[0]) {
 559       Mmsg0(dev->errmsg, _("Cannot request another volume: no volume name given.\n"));
 560       return false;
 561    }
 562    ASSERT(dev->blocked());
 563    for ( ;; ) {
 564       if (job_canceled(jcr)) {
 565          Mmsg(dev->errmsg, _("Job %s canceled while waiting for mount on Storage Device %s.\n"),
 566               jcr->Job, dev->print_name());
 567          return false;
 568       }
 569
 570       if (dev->is_dvd()) {
 571          dev->unmount(0);
 572       }
 573
 574       /*
 575        * If we are not polling, and the wait timeout or the
 576        *   user explicitly did a mount, send him the message.
 577        *   Otherwise skip it.
 578        */
 579       if (!dev->poll && (stat == W_TIMEOUT || stat == W_MOUNT)) {
 580          char *msg;
 581          if (mode == ST_APPEND) {
 582             msg = _("Please mount Volume \"%s\" or label a new one for:\n"
 583               "    Job:          %s\n"
 584               "    Storage:      %s\n"
 585               "    Pool:         %s\n"
 586               "    Media type:   %s\n");
 587          } else {
 588             msg = _("Please mount Volume \"%s\" for:\n"
 589               "    Job:          %s\n"
 590               "    Storage:      %s\n"
 591               "    Pool:         %s\n"
 592               "    Media type:   %s\n");
 593          }
 594          Jmsg(jcr, M_MOUNT, 0, msg,
 595               dcr->VolumeName,
 596               jcr->Job,
 597               dev->print_name(),
 598               dcr->pool_name,
 599               dcr->media_type);
 600          Dmsg3(400, "Mount \"%s\" on device \"%s\" for Job %s\n",
 601                dcr->VolumeName, dev->print_name(), jcr->Job);
 602       }
 603
 604       set_jcr_job_status(jcr, JS_WaitMount);
 605       dir_send_job_status(jcr);
 606
 607       stat = wait_for_sysop(dcr);          /* wait on device */
 608       Dmsg1(100, "Back from wait_for_sysop stat=%d\n", stat);
 609       if (dev->poll) {
 610          Dmsg1(400, "Poll timeout in mount vol on device %s\n", dev->print_name());
 611          Dmsg1(400, "Blocked=%s\n", dev->print_blocked());
 612          goto bail_out;
 613       }
 614
 615       if (stat == W_TIMEOUT) {
 616          if (!double_dev_wait_time(dev)) {
 617             Mmsg(dev->errmsg, _("Max time exceeded waiting to mount Storage Device %s for Job %s\n"),
 618                dev->print_name(), jcr->Job);
 619             Jmsg(jcr, M_FATAL, 0, "%s", dev->errmsg);
 620             Dmsg1(400, "Gave up waiting on device %s\n", dev->print_name());
 621             return false;             /* exceeded maximum waits */
 622          }
 623          continue;
 624       }
 625       if (stat == W_ERROR) {
 626          berrno be;
 627          Mmsg(dev->errmsg, _("pthread error in mount_volume\n"));
 628          Jmsg(jcr, M_FATAL, 0, "%s", dev->errmsg);
 629          return false;
 630       }
 631       Dmsg1(400, "Someone woke me for device %s\n", dev->print_name());
 632       break;
 633    }
 634
 635 bail_out:
 636    set_jcr_job_status(jcr, JS_Running);
 637    dir_send_job_status(jcr);
 638    Dmsg0(400, "leave dir_ask_sysop_to_mount_volume\n");
 639    return true;
 640 }