]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/stored/dev.c
This commit was manufactured by cvs2svn to create tag
[bacula/bacula] / bacula / src / stored / dev.c
index 0cd3fcfa06fd86dfc9c4bc95e7a4b281ecd11076..294c17d9c33cda68bc667f92c6506eb5768a683a 100644 (file)
@@ -29,7 +29,7 @@
  *   Version $Id$
  */
 /*
-   Copyright (C) 2000-2005 Kern Sibbald
+   Copyright (C) 2000-2006 Kern Sibbald
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License
@@ -99,33 +99,34 @@ DEVICE *
 init_dev(JCR *jcr, DEVRES *device)
 {
    struct stat statp;
-   bool tape, fifo;
    int errstat;
    DCR *dcr = NULL;
    DEVICE *dev;
 
-   /* Check that device is available */
-   if (stat(device->device_name, &statp) < 0) {
-      berrno be;
-      Jmsg2(jcr, M_ERROR, 0, _("Unable to stat device %s: ERR=%s\n"), 
-         device->device_name, be.strerror());
-      return NULL;
-   }
-   
-   
-   tape = false;
-   fifo = false;
-   if (S_ISDIR(statp.st_mode)) {
-      tape = false;
-   } else if (S_ISCHR(statp.st_mode)) {
-      tape = true;
-   } else if (S_ISFIFO(statp.st_mode)) {
-      fifo = true;
-   } else if (!(device->cap_bits & CAP_REQMOUNT)) {
-      Jmsg2(jcr, M_ERROR, 0, _("%s is an unknown device type. Must be tape or directory\n"
-            " or have RequiresMount=yes for DVD. st_mode=%x\n"),
-         device->device_name, statp.st_mode);
-      return NULL;
+
+   /* If no device type specified, try to guess */
+   if (!device->dev_type) {
+      /* Check that device is available */
+      if (stat(device->device_name, &statp) < 0) {
+         berrno be;
+         Jmsg2(jcr, M_ERROR, 0, _("Unable to stat device %s: ERR=%s\n"), 
+            device->device_name, be.strerror());
+         return NULL;
+      }
+      if (S_ISDIR(statp.st_mode)) {
+         device->dev_type = B_FILE_DEV;
+      } else if (S_ISCHR(statp.st_mode)) {
+         device->dev_type = B_TAPE_DEV;
+      } else if (S_ISFIFO(statp.st_mode)) {
+         device->dev_type = B_FILE_DEV;
+      } else if (!(device->cap_bits & CAP_REQMOUNT)) {
+         Jmsg2(jcr, M_ERROR, 0, _("%s is an unknown device type. Must be tape or directory\n"
+               " or have RequiresMount=yes for DVD. st_mode=%x\n"),
+            device->device_name, statp.st_mode);
+         return NULL;
+      } else {
+         device->dev_type = B_DVD_DEV;
+      }
    }
 
    dev = (DEVICE *)get_memory(sizeof(DEVICE));
@@ -151,10 +152,10 @@ init_dev(JCR *jcr, DEVRES *device)
    dev->max_spool_size = device->max_spool_size;
    dev->drive_index = device->drive_index;
    dev->autoselect = device->autoselect;
-   if (tape) { /* No parts on tapes */
-      dev->max_part_size = 0;
-   }
-   else {
+   dev->dev_type = device->dev_type;
+   if (dev->is_tape()) { /* No parts on tapes */
+       dev->max_part_size = 0;
+   else {
       dev->max_part_size = device->max_part_size;
    }
    /* Sanity check */
@@ -163,34 +164,30 @@ init_dev(JCR *jcr, DEVRES *device)
    }
    dev->device = device;
 
-   if (tape) {
-      dev->state |= ST_TAPE;
-   } else if (fifo) {
-      dev->state |= ST_FIFO;
+   if (dev->is_fifo()) {
       dev->capabilities |= CAP_STREAM; /* set stream device */
-   } else {
-      dev->state |= ST_FILE;
    }
 
    /* If the device requires mount :
     * - Check that the mount point is available 
     * - Check that (un)mount commands are defined
     */
-   if (dev->is_file() && dev->requires_mount()) {
-      if (stat(device->mount_point, &statp) < 0) {
+   if ((dev->is_file() || dev->is_dvd()) && dev->requires_mount()) {
+      if (!device->mount_point || stat(device->mount_point, &statp) < 0) {
          berrno be;
          dev->dev_errno = errno;
          Jmsg2(jcr, M_ERROR, 0, _("Unable to stat mount point %s: ERR=%s\n"), 
             device->mount_point, be.strerror());
          return NULL;
       }
+   }
+   if (dev->is_dvd()) {
       if (!device->mount_command || !device->unmount_command) {
          Jmsg0(jcr, M_ERROR_TERM, 0, _("Mount and unmount commands must defined for a device which requires mount.\n"));
       }
       if (!device->write_part_command) {
          Jmsg0(jcr, M_ERROR_TERM, 0, _("Write part command must be defined for a device which requires mount.\n"));
       }
-      dev->state |= ST_DVD;
    }
 
    if (dev->max_block_size > 1000000) {
@@ -237,7 +234,7 @@ init_dev(JCR *jcr, DEVRES *device)
       Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg);
    }
 
-   dev->fd = -1;
+   dev->clear_opened();
    dev->attached_dcrs = New(dlist(dcr, &dcr->dev_link));
    Dmsg2(29, "init_dev: tape=%d dev_name=%s\n", dev->is_tape(), dev->dev_name);
    
@@ -260,13 +257,15 @@ init_dev(JCR *jcr, DEVRES *device)
 int
 DEVICE::open(DCR *dcr, int omode)
 {
+   int preserve = 0;
    if (is_open()) {
       if (openmode == omode) {
          return fd;
       } else {
         ::close(fd); /* use system close so correct mode will be used on open */
-        fd = -1;
+        clear_opened();
         Dmsg0(100, "Close fd for mode change.\n");
+        preserve = state & (ST_LABEL|ST_APPEND|ST_READ);
       }
    }
    if (dcr) {
@@ -286,6 +285,7 @@ DEVICE::open(DCR *dcr, int omode)
       Dmsg1(100, "call open_file_device mode=%s\n", mode_to_str(omode));
       open_file_device(omode);
    }
+   state |= preserve;                 /* reset any important state info */
    return fd;
 }
 
@@ -314,41 +314,21 @@ void DEVICE::set_mode(int new_mode)
 }
 
 /*
- * If the flage open_nowait is set, which is the case
- *   when the daemon is initially trying to open the device,
- *   we open it with O_NONBLOCK set and O_RONLY, which will
- *   allow us to open normal Linux tape drives with no tape
- *   in the drive without blocking.  We then immediately
- *   set blocking status so that if we read from the device they
- *   will be normal blocking reads.
- *
- * If later, we want to write on the device, it will be freed and
- *   reopened, but hopefully there will be a tape in the drive so
- *   we will not block.
  */
 void DEVICE::open_tape_device(DCR *dcr, int omode) 
 {
-   int nonblocking = 0;
    file_size = 0;
    int timeout;
-   int ioerrcnt = 10;
+   int nonblocking = O_NONBLOCK;
    Dmsg0(29, "open dev: device is tape\n");
 
-   if (is_tape() && is_autochanger()) {
+   if (is_autochanger()) {
       get_autochanger_loaded_slot(dcr);
    }
 
    set_mode(omode);
    timeout = max_open_wait;
    errno = 0;
-#ifdef HAVE_LINUX_OS
-   if (open_nowait) {
-       /* Set wait counters to zero for no wait */
-       timeout = ioerrcnt = 0;
-       /* Open drive in non-block mode */
-       nonblocking = O_NONBLOCK;
-   }
-#endif
    if (is_fifo() && timeout) {
       /* Set open timer */
       tid = start_thread_timer(pthread_self(), timeout);
@@ -357,26 +337,21 @@ void DEVICE::open_tape_device(DCR *dcr, int omode)
    Dmsg3(100, "Try open %s mode=%s nonblocking=%d\n", print_name(),
       mode_to_str(omode), nonblocking);
    /* Use system open() */
-   while ((fd = ::open(dev_name, mode+nonblocking, MODE_RW)) < 0) {
+   while ((fd = ::open(dev_name, mode+nonblocking)) < 0) {
       berrno be;
-      Dmsg2(100, "Open error errno=%d ERR=%s\n", errno, be.strerror());
-      if (errno == EINTR || errno == EAGAIN) {
+      dev_errno = errno;
+      Dmsg5(050, "Open omode=%d mode=%x nonblock=%d error errno=%d ERR=%s\n", 
+           omode, mode, nonblocking, errno, be.strerror());
+      if (dev_errno == EINTR || dev_errno == EAGAIN) {
          Dmsg0(100, "Continue open\n");
          continue;
       }
       /* Busy wait for specified time (default = 5 mins) */
-      if (errno == EBUSY && timeout-- > 0) {
+      if (dev_errno == EBUSY && timeout-- > 0) {
          Dmsg2(100, "Device %s busy. ERR=%s\n", print_name(), be.strerror());
          bmicrosleep(1, 0);
          continue;
       }
-      /* IO error (no volume) try 10 times every 6 seconds */
-      if (errno == EIO && ioerrcnt-- > 0) {
-         bmicrosleep(5, 0);
-         Dmsg0(100, "Continue open\n");
-         continue;
-      }
-      dev_errno = errno;
       Mmsg2(errmsg, _("Unable to open device %s: ERR=%s\n"),
             print_name(), be.strerror(dev_errno));
       /* Stop any open timer we set */
@@ -388,18 +363,15 @@ void DEVICE::open_tape_device(DCR *dcr, int omode)
       break;
    }
 
-   if (nonblocking) {
-      set_blocking();
-   }
-
    if (fd >= 0) {
       openmode = omode;              /* save open mode */
+      set_blocking();   
       Dmsg2(100, "openmode=%d %s\n", openmode, mode_to_str(openmode));
       dev_errno = 0;
-      set_opened();
-      use_count = 1;
       update_pos_dev(this);                /* update position */
       set_os_device_parameters(this);      /* do system dependent stuff */
+   } else {
+      clear_opened();
    }
 
    /* Stop any open() timer we started */
@@ -414,13 +386,19 @@ void DEVICE::set_blocking()
 {
    int oflags;
    /* Try to reset blocking */
+#ifdef xxx
    if ((oflags = fcntl(fd, F_GETFL, 0)) < 0 ||
        fcntl(fd, F_SETFL, oflags & ~O_NONBLOCK) < 0) {
       berrno be;
       ::close(fd);                   /* use system close() */
-      fd = ::open(dev_name, mode, MODE_RW);       
+      fd = ::open(dev_name, mode);       
       Dmsg2(100, "fcntl error. ERR=%s. Close-reopen fd=%d\n", be.strerror(), fd);
    }
+#endif
+   oflags = fcntl(fd, F_GETFL, 0);       
+   if (oflags > 0 && (oflags & O_NONBLOCK)) {
+      fcntl(fd, F_SETFL, oflags & ~O_NONBLOCK);
+   }
 }
 
 /*
@@ -433,21 +411,27 @@ void DEVICE::open_file_device(int omode)
    /*
     * Handle opening of File Archive (not a tape)
     */     
-   Dmsg3(29, "Enter: open_file_dev: %s dev=%s mode=%s\n", is_dvd()?"DVD":"disk",
-         archive_name.c_str(), mode_to_str(omode));
-
-   if (VolCatInfo.VolCatName[0] == 0) {
-      Mmsg(errmsg, _("Could not open file device %s. No Volume name given.\n"),
-         print_name());
-      fd = -1;
-      return;
-   }
 
    pm_strcpy(archive_name, dev_name);
-   if (archive_name.c_str()[strlen(archive_name.c_str())-1] != '/') {
-      pm_strcat(archive_name, "/");
+   /*  
+    * If this is a virtual autochanger (i.e. changer_res != NULL)
+    *  we simply use the deviced name, assuming it has been
+    *  appropriately setup by the "autochanger".
+    */
+   if (!device->changer_res) {
+      if (VolCatInfo.VolCatName[0] == 0) {
+         Mmsg(errmsg, _("Could not open file device %s. No Volume name given.\n"),
+            print_name());
+         clear_opened();
+         return;
+      }
+
+      if (archive_name.c_str()[strlen(archive_name.c_str())-1] != '/') {
+         pm_strcat(archive_name, "/");
+      }
+      pm_strcat(archive_name, VolCatInfo.VolCatName);
    }
-   pm_strcat(archive_name, VolCatInfo.VolCatName);
+
          
    Dmsg3(29, "open dev: %s dev=%s mode=%s\n", is_dvd()?"DVD":"disk",
          archive_name.c_str(), mode_to_str(omode));
@@ -468,8 +452,6 @@ void DEVICE::open_file_device(int omode)
       Emsg0(M_FATAL, 0, errmsg);
    } else {
       dev_errno = 0;
-      set_opened();
-      use_count = 1;
       update_pos_dev(this);                /* update position */
    }
    Dmsg5(29, "open dev: %s fd=%d opened, part=%d/%d, part_size=%u\n", 
@@ -498,7 +480,7 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode)
          print_name());
       Mmsg(errmsg, _("Could not open file device %s. No Volume name given.\n"),
          print_name());
-      fd = -1;
+      clear_opened();
       return;
    }
 
@@ -523,7 +505,8 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode)
          if (!check_can_write_on_non_blank_dvd(dcr)) {
             Mmsg(errmsg, _("The media in the device %s is not empty, please blank it before writing anything to it.\n"), print_name());
             Emsg0(M_FATAL, 0, errmsg);
-            fd = -1;
+            unmount_dev(this, 1); /* Unmount the device, so the operator can change it. */
+            clear_opened();
             return;
          }
       }
@@ -539,14 +522,14 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode)
          else {
             Mmsg(errmsg, _("There is no valid media in the device %s.\n"), print_name());
             Emsg0(M_FATAL, 0, errmsg);
-            fd = -1;
+            clear_opened();
             return;
          }
       }
       else {
          Mmsg(errmsg, _("Could not mount device %s.\n"), print_name());
          Emsg0(M_FATAL, 0, errmsg);
-         fd = -1;
+         clear_opened();
          return;
       }
    }
@@ -607,12 +590,10 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode)
          Dmsg1(29, "open failed: %s", errmsg);
          /* Use system close() */
          ::close(fd);
-         fd = -1;
+         clear_opened();
       } else {
          part_size = filestat.st_size;
          dev_errno = 0;
-         set_opened();
-         use_count = 1;
          update_pos_dev(this);                /* update position */
          
          /* NB: It seems this code is wrong... part number is incremented in open_next_part, not here */
@@ -632,70 +613,79 @@ void DEVICE::open_dvd_device(DCR *dcr, int omode)
 }
 
 
-#ifdef debug_tracing
-#undef rewind_dev
-bool _rewind_dev(char *file, int line, DEVICE *dev)
-{
-   Dmsg3(100, "rewind_dev fd=%d called from %s:%d\n", dev->fd, file, line);
-   return rewind_dev(dev);
-}
-#endif
-
 /*
  * Rewind the device.
  *  Returns: true  on success
  *           false on failure
  */
-bool rewind_dev(DEVICE *dev)
+bool DEVICE::rewind(DCR *dcr)
 {
    struct mtop mt_com;
    unsigned int i;
+   bool first = true;
 
-   Dmsg2(29, "rewind_dev fd=%d %s\n", dev->fd, dev->print_name());
-   if (dev->fd < 0) {
-      if (!dev->is_dvd()) { /* In case of major error, the fd is not open on DVD, so we don't want to abort. */
-         dev->dev_errno = EBADF;
-         Mmsg1(dev->errmsg, _("Bad call to rewind_dev. Device %s not open\n"),
-            dev->print_name());
-         Emsg0(M_ABORT, 0, dev->errmsg);
+   Dmsg3(29, "rewind res=%d fd=%d %s\n", reserved_device, fd, print_name());
+   if (fd < 0) {
+      if (!is_dvd()) { /* In case of major error, the fd is not open on DVD, so we don't want to abort. */
+         dev_errno = EBADF;
+         Mmsg1(errmsg, _("Bad call to rewind. Device %s not open\n"),
+            print_name());
+         Emsg0(M_ABORT, 0, errmsg);
       }
       return false;
    }
-   dev->state &= ~(ST_EOT|ST_EOF|ST_WEOT);  /* remove EOF/EOT flags */
-   dev->block_num = dev->file = 0;
-   dev->file_size = 0;
-   dev->file_addr = 0;
-   if (dev->is_tape()) {
+   state &= ~(ST_EOT|ST_EOF|ST_WEOT);  /* remove EOF/EOT flags */
+   block_num = file = 0;
+   file_size = 0;
+   file_addr = 0;
+   if (is_tape()) {
       mt_com.mt_op = MTREW;
       mt_com.mt_count = 1;
       /* If we get an I/O error on rewind, it is probably because
        * the drive is actually busy. We loop for (about 5 minutes)
        * retrying every 5 seconds.
        */
-      for (i=dev->max_rewind_wait; ; i -= 5) {
-         if (ioctl(dev->fd, MTIOCTOP, (char *)&mt_com) < 0) {
+      for (i=max_rewind_wait; ; i -= 5) {
+         if (ioctl(fd, MTIOCTOP, (char *)&mt_com) < 0) {
             berrno be;
-            clrerror_dev(dev, MTREW);
-            if (i == dev->max_rewind_wait) {
+            clrerror_dev(this, MTREW);
+            if (i == max_rewind_wait) {
                Dmsg1(200, "Rewind error, %s. retrying ...\n", be.strerror());
             }
-            if (dev->dev_errno == EIO && i > 0) {
+            /*
+             * This is a gross hack, because if the user has the
+             *   device mounted (i.e. open), then uses mtx to load
+             *   a tape, the current open file descriptor is invalid.
+             *   So, we close the drive and re-open it.
+             */
+            if (first && dcr) {
+               int open_mode = openmode;
+               ::close(fd);
+               clear_opened();
+               open(dcr, open_mode);
+               if (fd < 0) {
+                  return false;
+               }
+               first = false;
+               continue;
+            }
+            if (dev_errno == EIO && i > 0) {
                Dmsg0(200, "Sleeping 5 seconds.\n");
                bmicrosleep(5, 0);
                continue;
             }
-            Mmsg2(dev->errmsg, _("Rewind error on %s. ERR=%s.\n"),
-               dev->print_name(), be.strerror());
+            Mmsg2(errmsg, _("Rewind error on %s. ERR=%s.\n"),
+               print_name(), be.strerror());
             return false;
          }
          break;
       }
-   } else if (dev->is_file()) {      
-      if (lseek_dev(dev, (off_t)0, SEEK_SET) < 0) {
+   } else if (is_file()) {      
+      if (lseek_dev(this, (off_t)0, SEEK_SET) < 0) {
          berrno be;
-         dev->dev_errno = errno;
-         Mmsg2(dev->errmsg, _("lseek_dev error on %s. ERR=%s.\n"),
-            dev->print_name(), be.strerror());
+         dev_errno = errno;
+         Mmsg2(errmsg, _("lseek_dev error on %s. ERR=%s.\n"),
+            print_name(), be.strerror());
          return false;
       }
    }
@@ -745,7 +735,9 @@ const char *DEVICE::print_blocked() const
 void DEVICE::set_ateof() 
 { 
    set_eof();
-   file++;
+   if (is_tape()) {
+      file++;
+   }
    file_addr = 0;
    file_size = 0;
    block_num = 0;
@@ -794,7 +786,7 @@ eod_dev(DEVICE *dev)
    dev->block_num = dev->file = 0;
    dev->file_size = 0;
    dev->file_addr = 0;
-   if (dev->state & (ST_FIFO | ST_PROG)) {
+   if (dev->is_fifo() || dev->is_prog()) {
       return true;
    }
    if (!dev->is_tape()) {
@@ -816,7 +808,7 @@ eod_dev(DEVICE *dev)
       Dmsg0(100,"Using FAST FSF for EOM\n");
       /* If unknown position, rewind */
       if (!dev_get_os_pos(dev, &mt_stat)) {
-        if (!rewind_dev(dev)) {
+        if (!dev->rewind(NULL)) {
           return false;
         }
       }
@@ -865,7 +857,7 @@ eod_dev(DEVICE *dev)
       /*
        * Rewind then use FSF until EOT reached
        */
-      if (!rewind_dev(dev)) {
+      if (!dev->rewind(NULL)) {
          return false;
       }
       /*
@@ -1136,7 +1128,7 @@ bool offline_or_rewind_dev(DEVICE *dev)
     *  done, all future references to the drive get and I/O error.
     */
       clrerror_dev(dev, MTREW);
-      return rewind_dev(dev);
+      return dev->rewind(NULL);
    }
 }
 
@@ -1474,8 +1466,8 @@ reposition_dev(DEVICE *dev, uint32_t file, uint32_t block)
    Dmsg4(100, "reposition_dev from %u:%u to %u:%u\n",
       dev->file, dev->block_num, file, block);
    if (file < dev->file) {
-      Dmsg0(100, "Rewind_dev\n");
-      if (!rewind_dev(dev)) {
+      Dmsg0(100, "Rewind\n");
+      if (!dev->rewind(NULL)) {
          return false;
       }
    }
@@ -1696,9 +1688,9 @@ int flush_dev(DEVICE *dev)
 static void do_close(DEVICE *dev)
 {
 
-   Dmsg1(29, "really close_dev %s\n", dev->print_name());
+   Dmsg1(100, "really close_dev %s\n", dev->print_name());
    if (dev->fd >= 0) {
-      close(dev->fd);
+      ::close(dev->fd);
    }
 
    if (!unmount_dev(dev, 1)) {
@@ -1720,8 +1712,8 @@ static void do_close(DEVICE *dev)
    }
    
    /* Clean up device packet so it can be reused */
-   dev->fd = -1;
-   dev->state &= ~(ST_OPENED|ST_LABEL|ST_READ|ST_APPEND|ST_EOT|ST_WEOT|ST_EOF);
+   dev->clear_opened();
+   dev->state &= ~(ST_LABEL|ST_READ|ST_APPEND|ST_EOT|ST_WEOT|ST_EOF);
    dev->label_type = B_BACULA_LABEL;
    dev->file = dev->block_num = 0;
    dev->file_size = 0;
@@ -1731,14 +1723,13 @@ static void do_close(DEVICE *dev)
    dev->part_size = 0;
    dev->part_start = 0;
    dev->EndFile = dev->EndBlock = 0;
-   memset(&dev->VolCatInfo, 0, sizeof(dev->VolCatInfo));
    free_volume(dev);
+   memset(&dev->VolCatInfo, 0, sizeof(dev->VolCatInfo));
    memset(&dev->VolHdr, 0, sizeof(dev->VolHdr));
    if (dev->tid) {
       stop_thread_timer(dev->tid);
       dev->tid = 0;
    }
-   dev->use_count = 0;
    dev->openmode = 0;
 }
 
@@ -1747,19 +1738,7 @@ static void do_close(DEVICE *dev)
  */
 void DEVICE::close()
 {
-   /*if (fd >= 0 && use_count == 1) {*/
-   /* No need to check if fd >= 0: it is checked again
-    * in do_close, and do_close MUST be called for volumes
-    * splitted in parts, even if fd == -1. */
-   if (use_count == 1) {
-      do_close(this);
-   } else if (use_count > 0) {
-      use_count--;
-   }
-
-#ifdef FULL_DEBUG
-   ASSERT(use_count >= 0);
-#endif
+   do_close(this);
 }