X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=bacula%2Fsrc%2Fstored%2Fdev.c;h=7a3dafe03dbaca7f7a8c594c4d57243c5f23f530;hb=8ec628bc2c18b136d3496203ebd9fa1a0cdc50d5;hp=143eaab02146599e23ae3384b72715f8aeee765c;hpb=6457aa352c6e68e6eda99da79f12ba1f7cd91755;p=bacula%2Fbacula diff --git a/bacula/src/stored/dev.c b/bacula/src/stored/dev.c index 143eaab021..7a3dafe03d 100644 --- a/bacula/src/stored/dev.c +++ b/bacula/src/stored/dev.c @@ -1,26 +1,26 @@ /* Bacula® - The Network Backup Solution - Copyright (C) 2000-2007 Free Software Foundation Europe e.V. + Copyright (C) 2000-2010 Free Software Foundation Europe e.V. The main author of Bacula is Kern Sibbald, with contributions from many others, a complete list can be found in the file AUTHORS. This program is Free Software; you can redistribute it and/or - modify it under the terms of version two of the GNU General Public - License as published by the Free Software Foundation plus additions - that are listed in the file LICENSE. + modify it under the terms of version three of the GNU Affero General Public + License as published by the Free Software Foundation and included + in the file LICENSE. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. - You should have received a copy of the GNU General Public License + You should have received a copy of the GNU Affero General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. - Bacula® is a registered trademark of John Walker. + Bacula® is a registered trademark of Kern Sibbald. The licensor of Bacula is the Free Software Foundation Europe (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich, Switzerland, email:ftf@fsfeurope.org. @@ -47,18 +47,11 @@ * daemon. More complicated coding (double buffering, writer * thread, ...) is left for a later version. * - * Unfortunately, I have had to add more and more complication - * to this code. This was not foreseen as noted above, and as - * a consequence has lead to something more contorted than is - * really necessary -- KES. Note, this contortion has been - * corrected to a large extent by a rewrite (Apr MMI). - * - * Version $Id$ */ /* * Handling I/O errors and end of tape conditions are a bit tricky. - * This is how it is currently done when writting. + * This is how it is currently done when writing. * On either an I/O error or end of tape, * we will stop writing on the physical device (no I/O recovery is * attempted at least in this daemon). The state flag will be sent @@ -95,7 +88,7 @@ /* Forward referenced functions */ void set_os_device_parameters(DCR *dcr); static bool dev_get_os_pos(DEVICE *dev, struct mtget *mt_stat); -static char *mode_to_str(int mode); +static const char *mode_to_str(int mode); /* * Allocate and initialize the DEVICE structure @@ -115,6 +108,7 @@ init_dev(JCR *jcr, DEVRES *device) int errstat; DCR *dcr = NULL; DEVICE *dev; + uint32_t max_bs; /* If no device type specified, try to guess */ @@ -123,7 +117,7 @@ init_dev(JCR *jcr, DEVRES *device) 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()); + device->device_name, be.bstrerror()); return NULL; } if (S_ISDIR(statp.st_mode)) { @@ -132,6 +126,13 @@ init_dev(JCR *jcr, DEVRES *device) device->dev_type = B_TAPE_DEV; } else if (S_ISFIFO(statp.st_mode)) { device->dev_type = B_FIFO_DEV; +#ifdef USE_VTAPE + /* must set DeviceType = Vtape + * in normal mode, autodetection is disabled + */ + } else if (S_ISREG(statp.st_mode)) { + device->dev_type = B_VTAPE_DEV; +#endif } 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"), @@ -141,10 +142,37 @@ init_dev(JCR *jcr, DEVRES *device) device->dev_type = B_DVD_DEV; } } - - dev = (DEVICE *)malloc(sizeof(DEVICE)); - memset(dev, 0, sizeof(DEVICE)); - dev->Slot = -1; /* unknown */ + switch (device->dev_type) { + case B_DVD_DEV: + Jmsg0(jcr, M_FATAL, 0, _("DVD support is now deprecated\n")); + return NULL; + case B_VTAPE_DEV: + dev = New(vtape); + break; +#ifdef USE_FTP + case B_FTP_DEV: + dev = New(ftp_device); + break; +#endif +#ifdef HAVE_WIN32 +/* TODO: defined in src/win32/stored/mtops.cpp */ + case B_TAPE_DEV: + dev = New(win32_tape_device); + break; + case B_FILE_DEV: + dev = New(win32_file_device); + break; +#else + case B_TAPE_DEV: + case B_FILE_DEV: + case B_FIFO_DEV: + dev = New(DEVICE); + break; +#endif + default: + return NULL; + } + dev->clear_slot(); /* unknown */ /* Copy user supplied device parameters from Resource */ dev->dev_name = get_memory(strlen(device->device_name)+1); @@ -158,6 +186,7 @@ init_dev(JCR *jcr, DEVRES *device) dev->max_block_size = device->max_block_size; dev->max_volume_size = device->max_volume_size; dev->max_file_size = device->max_file_size; + dev->max_concurrent_jobs = device->max_concurrent_jobs; dev->volume_capacity = device->volume_capacity; dev->max_rewind_wait = device->max_rewind_wait; dev->max_open_wait = device->max_open_wait; @@ -188,24 +217,30 @@ init_dev(JCR *jcr, DEVRES *device) * - Check that the mount point is available * - Check that (un)mount commands are defined */ - if ((dev->is_file() || dev->is_dvd()) && dev->requires_mount()) { + if (dev->is_file() && dev->requires_mount()) { if (!device->mount_point || stat(device->mount_point, &statp) < 0) { berrno be; dev->dev_errno = errno; Jmsg2(jcr, M_ERROR_TERM, 0, _("Unable to stat mount point %s: ERR=%s\n"), - device->mount_point, be.strerror()); + device->mount_point, be.bstrerror()); } - } - 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")); - } } - if (dev->max_block_size > 1000000) { + /* Sanity check */ + if (dev->max_block_size == 0) { + max_bs = DEFAULT_BLOCK_SIZE; + } else { + max_bs = dev->max_block_size; + } + if (dev->min_block_size > max_bs) { + Jmsg(jcr, M_ERROR_TERM, 0, _("Min block size > max on device %s\n"), + dev->print_name()); + } + if (dev->max_block_size > 4096000) { Jmsg3(jcr, M_ERROR, 0, _("Block size %u on device %s is too large, using default %u\n"), dev->max_block_size, dev->print_name(), DEFAULT_BLOCK_SIZE); dev->max_block_size = 0; @@ -214,6 +249,10 @@ init_dev(JCR *jcr, DEVRES *device) Jmsg2(jcr, M_WARNING, 0, _("Max block size %u not multiple of device %s block size.\n"), dev->max_block_size, dev->print_name()); } + if (dev->max_volume_size != 0 && dev->max_volume_size < (dev->max_block_size << 4)) { + Jmsg(jcr, M_ERROR_TERM, 0, _("Max Vol Size < 8 * Max Block Size on device %s\n"), + dev->print_name()); + } dev->errmsg = get_pool_memory(PM_EMSG); *dev->errmsg = 0; @@ -221,44 +260,80 @@ init_dev(JCR *jcr, DEVRES *device) if ((errstat = pthread_mutex_init(&dev->m_mutex, NULL)) != 0) { berrno be; dev->dev_errno = errstat; - Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.strerror(errstat)); + Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.bstrerror(errstat)); Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); } if ((errstat = pthread_cond_init(&dev->wait, NULL)) != 0) { berrno be; dev->dev_errno = errstat; - Mmsg1(dev->errmsg, _("Unable to init cond variable: ERR=%s\n"), be.strerror(errstat)); + Mmsg1(dev->errmsg, _("Unable to init cond variable: ERR=%s\n"), be.bstrerror(errstat)); Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); } if ((errstat = pthread_cond_init(&dev->wait_next_vol, NULL)) != 0) { berrno be; dev->dev_errno = errstat; - Mmsg1(dev->errmsg, _("Unable to init cond variable: ERR=%s\n"), be.strerror(errstat)); + Mmsg1(dev->errmsg, _("Unable to init cond variable: ERR=%s\n"), be.bstrerror(errstat)); Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); } if ((errstat = pthread_mutex_init(&dev->spool_mutex, NULL)) != 0) { berrno be; dev->dev_errno = errstat; - Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.strerror(errstat)); + Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.bstrerror(errstat)); + Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); + } + if ((errstat = pthread_mutex_init(&dev->acquire_mutex, NULL)) != 0) { + berrno be; + dev->dev_errno = errstat; + Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.bstrerror(errstat)); Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); } + /* Ensure that we respect this order in P/V operations */ + bthread_mutex_set_priority(&dev->m_mutex, PRIO_SD_DEV_ACCESS); + bthread_mutex_set_priority(&dev->spool_mutex, PRIO_SD_DEV_SPOOL); + bthread_mutex_set_priority(&dev->acquire_mutex, PRIO_SD_DEV_ACQUIRE); #ifdef xxx if ((errstat = rwl_init(&dev->lock)) != 0) { berrno be; dev->dev_errno = errstat; - Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.strerror(errstat)); + Mmsg1(dev->errmsg, _("Unable to init mutex: ERR=%s\n"), be.bstrerror(errstat)); Jmsg0(jcr, M_ERROR_TERM, 0, dev->errmsg); } #endif 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); + Dmsg2(100, "init_dev: tape=%d dev_name=%s\n", dev->is_tape(), dev->dev_name); dev->initiated = true; return dev; } +/* default primitives are designed for file */ +int DEVICE::d_open(const char *pathname, int flags) +{ + return ::open(pathname, flags); +} + +int DEVICE::d_close(int fd) +{ + return ::close(fd); +} + +int DEVICE::d_ioctl(int fd, ioctl_req_t request, char *mt_com) +{ + return ::ioctl(fd, request, mt_com); +} + +ssize_t DEVICE::d_read(int fd, void *buffer, size_t count) +{ + return ::read(fd, buffer, count); +} + +ssize_t DEVICE::d_write(int fd, const void *buffer, size_t count) +{ + return ::write(fd, buffer, count); +} + /* * Open the device with the operating system and * initialize buffer pointers. @@ -280,30 +355,26 @@ DEVICE::open(DCR *dcr, int omode) if (openmode == omode) { return m_fd; } else { - if (is_tape()) { - tape_close(m_fd); - } else { - ::close(m_fd); - } + d_close(m_fd); clear_opened(); Dmsg0(100, "Close fd for mode change.\n"); preserve = state & (ST_LABEL|ST_APPEND|ST_READ); } } if (dcr) { - bstrncpy(VolCatInfo.VolCatName, dcr->VolumeName, sizeof(VolCatInfo.VolCatName)); + dcr->setVolCatName(dcr->VolumeName); + VolCatInfo = dcr->VolCatInfo; /* structure assign */ } - Dmsg4(29, "open dev: type=%d dev_name=%s vol=%s mode=%s\n", dev_type, - print_name(), VolCatInfo.VolCatName, mode_to_str(omode)); + Dmsg4(100, "open dev: type=%d dev_name=%s vol=%s mode=%s\n", dev_type, + print_name(), getVolCatName(), mode_to_str(omode)); state &= ~(ST_LABEL|ST_APPEND|ST_READ|ST_EOT|ST_WEOT|ST_EOF); - Slot = -1; /* unknown slot */ label_type = B_BACULA_LABEL; + if (is_tape() || is_fifo()) { open_tape_device(dcr, omode); - } else if (is_dvd()) { - Dmsg1(100, "call open_dvd_device mode=%s\n", mode_to_str(omode)); - open_dvd_device(dcr, omode); + } else if (is_ftp()) { + open_device(dcr, omode); } else { Dmsg1(100, "call open_file_device mode=%s\n", mode_to_str(omode)); open_file_device(dcr, omode); @@ -344,8 +415,9 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) utime_t start_time = time(NULL); #endif + mount(1); /* do mount if required */ - Dmsg0(29, "Open dev: device is tape\n"); + Dmsg0(100, "Open dev: device is tape\n"); get_autochanger_loaded_slot(dcr); @@ -358,13 +430,13 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) errno = 0; if (is_fifo() && timeout) { /* Set open timer */ - tid = start_thread_timer(pthread_self(), timeout); + tid = start_thread_timer(dcr->jcr, pthread_self(), timeout); } Dmsg2(100, "Try open %s mode=%s\n", print_name(), mode_to_str(omode)); #if defined(HAVE_WIN32) /* Windows Code */ - if ((m_fd = tape_open(dev_name, mode)) < 0) { + if ((m_fd = d_open(dev_name, mode)) < 0) { dev_errno = errno; } @@ -374,38 +446,38 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) /* If busy retry each second for max_open_wait seconds */ for ( ;; ) { /* Try non-blocking open */ - m_fd = ::open(dev_name, mode+O_NONBLOCK); + m_fd = d_open(dev_name, mode+O_NONBLOCK); if (m_fd < 0) { berrno be; dev_errno = errno; - Dmsg5(050, "Open error on %s omode=%d mode=%x errno=%d: ERR=%s\n", - print_name(), omode, mode, errno, be.strerror()); + Dmsg5(100, "Open error on %s omode=%d mode=%x errno=%d: ERR=%s\n", + print_name(), omode, mode, errno, be.bstrerror()); } else { /* Tape open, now rewind it */ - Dmsg0(050, "Rewind after open\n"); + Dmsg0(100, "Rewind after open\n"); mt_com.mt_op = MTREW; mt_com.mt_count = 1; /* rewind only if dev is a tape */ - if (is_tape() && (ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0)) { + if (is_tape() && (d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0)) { berrno be; dev_errno = errno; /* set error status from rewind */ - ::close(m_fd); + d_close(m_fd); clear_opened(); Dmsg2(100, "Rewind error on %s close: ERR=%s\n", print_name(), - be.strerror(dev_errno)); + be.bstrerror(dev_errno)); /* If we get busy, device is probably rewinding, try again */ if (dev_errno != EBUSY) { break; /* error -- no medium */ } } else { /* Got fd and rewind worked, so we must have medium in drive */ - ::close(m_fd); - m_fd = ::open(dev_name, mode); /* open normally */ + d_close(m_fd); + m_fd = d_open(dev_name, mode); /* open normally */ if (m_fd < 0) { berrno be; dev_errno = errno; - Dmsg5(050, "Open error on %s omode=%d mode=%x errno=%d: ERR=%s\n", - print_name(), omode, mode, errno, be.strerror()); + Dmsg5(100, "Open error on %s omode=%d mode=%x errno=%d: ERR=%s\n", + print_name(), omode, mode, errno, be.bstrerror()); break; } dev_errno = 0; @@ -425,7 +497,7 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) if (!is_open()) { berrno be; Mmsg2(errmsg, _("Unable to open device %s: ERR=%s\n"), - print_name(), be.strerror(dev_errno)); + print_name(), be.bstrerror(dev_errno)); Dmsg1(100, "%s", errmsg); } @@ -434,9 +506,13 @@ void DEVICE::open_tape_device(DCR *dcr, int omode) stop_thread_timer(tid); tid = 0; } - Dmsg1(29, "open dev: tape %d opened\n", m_fd); + Dmsg1(100, "open dev: tape %d opened\n", m_fd); } +void DEVICE::open_device(DCR *dcr, int omode) +{ + /* do nothing waiting to split open_file/tape_device */ +} /* * Open a file device @@ -468,7 +544,7 @@ void DEVICE::open_file_device(DCR *dcr, int omode) if (!IsPathSeparator(archive_name.c_str()[strlen(archive_name.c_str())-1])) { pm_strcat(archive_name, "/"); } - pm_strcat(archive_name, VolCatInfo.VolCatName); + pm_strcat(archive_name, getVolCatName()); } mount(1); /* do mount if required */ @@ -476,225 +552,25 @@ void DEVICE::open_file_device(DCR *dcr, int omode) openmode = omode; set_mode(omode); /* If creating file, give 0640 permissions */ - Dmsg3(29, "open disk: mode=%s open(%s, 0x%x, 0640)\n", mode_to_str(omode), + Dmsg3(100, "open disk: mode=%s open(%s, 0x%x, 0640)\n", mode_to_str(omode), archive_name.c_str(), mode); /* Use system open() */ if ((m_fd = ::open(archive_name.c_str(), mode, 0640)) < 0) { berrno be; dev_errno = errno; Mmsg2(errmsg, _("Could not open: %s, ERR=%s\n"), archive_name.c_str(), - be.strerror()); - Dmsg1(29, "open failed: %s", errmsg); - Emsg0(M_FATAL, 0, errmsg); + be.bstrerror()); + Dmsg1(100, "open failed: %s", errmsg); +// Jmsg1(NULL, M_WARNING, 0, "%s", errmsg); } else { dev_errno = 0; file = 0; file_addr = 0; } - Dmsg4(29, "open dev: disk fd=%d opened, part=%d/%d, part_size=%u\n", + Dmsg4(100, "open dev: disk fd=%d opened, part=%d/%d, part_size=%u\n", m_fd, part, num_dvd_parts, part_size); } -/* - * Open a DVD device. N.B. at this point, dcr->VolCatInfo.VolCatName - * (NB:??? I think it's VolCatInfo.VolCatName that is right) - * has the desired Volume name, but there is NO assurance that - * any other field of VolCatInfo is correct. - */ -void DEVICE::open_dvd_device(DCR *dcr, int omode) -{ - POOL_MEM archive_name(PM_FNAME); - struct stat filestat; - - /* - * Handle opening of DVD Volume - */ - Dmsg2(29, "Enter: open_dvd_dev: DVD vol=%s mode=%s\n", - &dcr->VolCatInfo, mode_to_str(omode)); - - /* - * For a DVD we must always pull the state info from dcr->VolCatInfo - * This is a bit ugly, but is necessary because we need to open/close/re-open - * the dvd file in order to properly mount/unmount and access the - * DVD. So we store the state of the DVD as far as is known in the - * catalog in dcr->VolCatInfo, and thus we refresh the dev->VolCatInfo - * copy here, when opening. - */ - VolCatInfo = dcr->VolCatInfo; /* structure assignment */ - Dmsg1(100, "Volume=%s\n", VolCatInfo.VolCatName); - - if (VolCatInfo.VolCatName[0] == 0) { - Dmsg1(10, "Could not open DVD device %s. No Volume name given.\n", - print_name()); - Mmsg(errmsg, _("Could not open DVD device %s. No Volume name given.\n"), - print_name()); - clear_opened(); - return; - } - - if (part == 0) { - Dmsg0(100, "Set part=1\n"); - part = 1; /* count from 1 */ - file_size = 0; - } - part_size = 0; - if (num_dvd_parts != VolCatInfo.VolCatParts) { - num_dvd_parts = VolCatInfo.VolCatParts; - } - - /* - * If we are not trying to access the last part, set mode to - * OPEN_READ_ONLY as writing would be an error. - */ - Dmsg2(29, "open DVD part=%d num_dvd_parts=%d\n", part, num_dvd_parts); - /* Now find the name of the part that we want to access */ - if (part <= num_dvd_parts) { - omode = OPEN_READ_ONLY; - make_mounted_dvd_filename(this, archive_name); - set_part_spooled(false); - } else { - omode = OPEN_READ_WRITE; - make_spooled_dvd_filename(this, archive_name); - set_part_spooled(true); - } - set_mode(omode); - - // Clear any previous blank_dvd status - we will recalculate it here - blank_dvd = false; - - Dmsg3(99, "open_dvd_device: part=%d num_dvd_parts=%d, VolCatInfo.VolCatParts=%d\n", - part, num_dvd_parts, dcr->VolCatInfo.VolCatParts); - - if (mount(1)) { - Dmsg0(99, "DVD device mounted.\n"); - if (num_dvd_parts == 0 && !truncating) { - /* - * If we can mount the device, and we are not truncating the DVD, - * we usually want to abort. There is one exception, if there is - * only one 0-sized file on the DVD, with the right volume name, - * we continue (it's the method used by truncate_dvd to truncate a volume). - */ - if (!check_can_write_on_non_blank_dvd(dcr)) { - Mmsg(errmsg, _("The DVD in device %s contains data, please blank it before writing.\n"), print_name()); - Emsg0(M_FATAL, 0, errmsg); - unmount(1); /* Unmount the device, so the operator can change it. */ - clear_opened(); - return; - } - blank_dvd = true; - } else { - /* - * Ensure that we have the correct DVD loaded by looking for part1. - * We only succeed the open if it exists. Failure to do this could - * leave us trying to add a part to a different DVD! - */ - uint32_t oldpart = part; - struct stat statp; - POOL_MEM part1_name(PM_FNAME); - part = 1; - make_mounted_dvd_filename(this, part1_name); - part = oldpart; - if (stat(part1_name.c_str(), &statp) < 0) { - berrno be; - Mmsg(errmsg, _("Unable to stat DVD part 1 file %s: ERR=%s\n"), - part1_name.c_str(), be.strerror()); - Emsg0(M_FATAL, 0, errmsg); - clear_opened(); - return; - } - if (!S_ISREG(statp.st_mode)) { - /* It is not a regular file */ - Mmsg(errmsg, _("DVD part 1 is not a regular file %s.\n"), - part1_name.c_str()); - Emsg0(M_FATAL, 0, errmsg); - clear_opened(); - return; - } - } - } else { - Dmsg0(99, "DVD device mount failed.\n"); - /* We cannot mount the device */ - if (num_dvd_parts == 0) { - /* Run free space, check there is a media. */ - if (!update_freespace()) { - Emsg0(M_FATAL, 0, errmsg); - clear_opened(); - return; - } - if (have_media()) { - Dmsg1(29, "Could not mount device %s, this is not a problem (num_dvd_parts == 0), and have media.\n", print_name()); - } else { - Mmsg(errmsg, _("There is no valid DVD in device %s.\n"), print_name()); - Emsg0(M_FATAL, 0, errmsg); - clear_opened(); - return; - } - } else { - Mmsg(errmsg, _("Could not mount DVD device %s.\n"), print_name()); - Emsg0(M_FATAL, 0, errmsg); - clear_opened(); - return; - } - } - - Dmsg5(29, "open dev: DVD dev=%s mode=%s part=%d npart=%d volcatnparts=%d\n", - archive_name.c_str(), mode_to_str(omode), - part, num_dvd_parts, dcr->VolCatInfo.VolCatParts); - openmode = omode; - Dmsg2(100, "openmode=%d %s\n", openmode, mode_to_str(openmode)); - - - /* If creating file, give 0640 permissions */ - Dmsg3(29, "mode=%s open(%s, 0x%x, 0640)\n", mode_to_str(omode), - archive_name.c_str(), mode); - /* Use system open() */ - if ((m_fd = ::open(archive_name.c_str(), mode, 0640)) < 0) { - berrno be; - Mmsg2(errmsg, _("Could not open: %s, ERR=%s\n"), archive_name.c_str(), - be.strerror()); - // Should this be set if we try the create/open below - dev_errno = EIO; /* Interpreted as no device present by acquire.c:acquire_device_for_read(). */ - Dmsg1(29, "open failed: %s", errmsg); - - /* Previous open failed. See if we can recover */ - if ((omode == OPEN_READ_ONLY || omode == OPEN_READ_WRITE) && - (part > num_dvd_parts)) { - /* If the last part (on spool), doesn't exist when accessing, - * create it. In read/write mode a write will be allowed (higher - * level software thinks that we are extending a pre-existing - * media. Reads for READ_ONLY will report immediately an EOF - * Sometimes it is better to finish with an EOF than with an error. */ - Dmsg1(29, "Creating last part on spool: %s\n", archive_name.c_str()); - omode = CREATE_READ_WRITE; - set_mode(CREATE_READ_WRITE); - m_fd = ::open(archive_name.c_str(), mode, 0640); - set_mode(omode); - } - } - Dmsg1(100, "after open fd=%d\n", m_fd); - if (is_open()) { - if (omode == OPEN_READ_WRITE || omode == CREATE_READ_WRITE) { - set_append(); - } - /* Get size of file */ - if (fstat(m_fd, &filestat) < 0) { - berrno be; - dev_errno = errno; - Mmsg2(errmsg, _("Could not fstat: %s, ERR=%s\n"), archive_name.c_str(), - be.strerror()); - Dmsg1(29, "open failed: %s", errmsg); - /* Use system close() */ - ::close(m_fd); - clear_opened(); - } else { - part_size = filestat.st_size; - dev_errno = 0; - update_pos(dcr); /* update position */ - } - } -} - - /* * Rewind the device. * Returns: true on success @@ -706,18 +582,12 @@ bool DEVICE::rewind(DCR *dcr) unsigned int i; bool first = true; - Dmsg3(400, "rewind res=%d fd=%d %s\n", reserved_device, m_fd, print_name()); + Dmsg3(400, "rewind res=%d fd=%d %s\n", num_reserved(), m_fd, print_name()); state &= ~(ST_EOT|ST_EOF|ST_WEOT); /* remove EOF/EOT flags */ block_num = file = 0; file_size = 0; file_addr = 0; if (m_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; } if (is_tape()) { @@ -728,11 +598,11 @@ bool DEVICE::rewind(DCR *dcr) * retrying every 5 seconds. */ for (i=max_rewind_wait; ; i -= 5) { - if (tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { + if (d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { berrno be; clrerror(MTREW); if (i == max_rewind_wait) { - Dmsg1(200, "Rewind error, %s. retrying ...\n", be.strerror()); + Dmsg1(200, "Rewind error, %s. retrying ...\n", be.bstrerror()); } /* * This is a gross hack, because if the user has the @@ -742,7 +612,7 @@ bool DEVICE::rewind(DCR *dcr) */ if (first && dcr) { int open_mode = openmode; - tape_close(m_fd); + d_close(m_fd); clear_opened(); open(dcr, open_mode); if (m_fd < 0) { @@ -764,61 +634,23 @@ bool DEVICE::rewind(DCR *dcr) } #endif Mmsg2(errmsg, _("Rewind error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } break; } - } else if (is_file() || is_dvd()) { + } else if (is_file()) { if (lseek(dcr, (boffset_t)0, SEEK_SET) < 0) { berrno be; dev_errno = errno; Mmsg2(errmsg, _("lseek error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } } return true; } -void DEVICE::block(int why) -{ - r_dlock(); /* need recursive lock to block */ - block_device(this, why); - r_dunlock(); -} - -void DEVICE::unblock(bool locked) -{ - if (!locked) { - dlock(); - } - unblock_device(this); - dunlock(); -} - - -const char *DEVICE::print_blocked() const -{ - switch (m_blocked) { - case BST_NOT_BLOCKED: - return "BST_NOT_BLOCKED"; - case BST_UNMOUNTED: - return "BST_UNMOUNTED"; - case BST_WAITING_FOR_SYSOP: - return "BST_WAITING_FOR_SYSOP"; - case BST_DOING_ACQUIRE: - return "BST_DOING_ACQUIRE"; - case BST_WRITING_LABEL: - return "BST_WRITING_LABEL"; - case BST_UNMOUNTED_WAITING_FOR_SYSOP: - return "BST_UNMOUNTED_WAITING_FOR_SYSOP"; - case BST_MOUNT: - return "BST_MOUNT"; - default: - return _("unknown blocked code"); - } -} /* * Called to indicate that we have just read an @@ -868,7 +700,7 @@ bool DEVICE::eod(DCR *dcr) return fsf(VolCatInfo.VolCatFiles); #endif - Dmsg0(29, "eod\n"); + Dmsg0(100, "Enter eod\n"); if (at_eot()) { return true; } @@ -876,12 +708,12 @@ bool DEVICE::eod(DCR *dcr) block_num = file = 0; file_size = 0; file_addr = 0; - if (is_fifo() || is_prog()) { + if (is_fifo()) { return true; } if (!is_tape()) { pos = lseek(dcr, (boffset_t)0, SEEK_END); -// Dmsg1(100, "====== Seek to %lld\n", pos); + Dmsg1(200, "====== Seek to %lld\n", pos); if (pos >= 0) { update_pos(dcr); set_eot(); @@ -890,7 +722,8 @@ bool DEVICE::eod(DCR *dcr) dev_errno = errno; berrno be; Mmsg2(errmsg, _("lseek error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); + Dmsg0(100, errmsg); return false; } #ifdef MTEOM @@ -899,6 +732,7 @@ bool DEVICE::eod(DCR *dcr) /* If unknown position, rewind */ if (get_os_tape_file() < 0) { if (!rewind(NULL)) { + Dmsg0(100, "Rewind error\n"); return false; } } @@ -920,13 +754,14 @@ bool DEVICE::eod(DCR *dcr) mt_com.mt_count = 1; } - if (tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { + if (d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { berrno be; clrerror(mt_com.mt_op); - Dmsg1(50, "ioctl error: %s\n", be.strerror()); + Dmsg1(50, "ioctl error: %s\n", be.bstrerror()); update_pos(dcr); Mmsg2(errmsg, _("ioctl MTEOM error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); + Dmsg0(100, errmsg); return false; } @@ -935,7 +770,8 @@ bool DEVICE::eod(DCR *dcr) berrno be; clrerror(-1); Mmsg2(errmsg, _("ioctl MTIOCGET error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); + Dmsg0(100, errmsg); return false; } Dmsg1(100, "EOD file=%d\n", os_file); @@ -949,6 +785,7 @@ bool DEVICE::eod(DCR *dcr) * Rewind then use FSF until EOT reached */ if (!rewind(NULL)) { + Dmsg0(100, "Rewind error.\n"); return false; } /* @@ -958,7 +795,7 @@ bool DEVICE::eod(DCR *dcr) for (file_num=file; !at_eot(); file_num++) { Dmsg0(200, "eod: doing fsf 1\n"); if (!fsf(1)) { - Dmsg0(200, "fsf error.\n"); + Dmsg0(100, "fsf error.\n"); return false; } /* @@ -1017,17 +854,16 @@ bool DEVICE::update_pos(DCR *dcr) return false; } - /* Find out where we are */ - if (is_file() || is_dvd()) { + if (is_file()) { file = 0; file_addr = 0; pos = lseek(dcr, (boffset_t)0, SEEK_CUR); if (pos < 0) { berrno be; dev_errno = errno; - Pmsg1(000, _("Seek error: ERR=%s\n"), be.strerror()); + Pmsg1(000, _("Seek error: ERR=%s\n"), be.bstrerror()); Mmsg2(errmsg, _("lseek error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); ok = false; } else { file_addr = pos; @@ -1064,11 +900,11 @@ uint32_t status_dev(DEVICE *dev) stat |= BMT_TAPE; Pmsg0(-20,_(" Bacula status:")); Pmsg2(-20,_(" file=%d block=%d\n"), dev->file, dev->block_num); - if (tape_ioctl(dev->fd(), MTIOCGET, (char *)&mt_stat) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCGET, (char *)&mt_stat) < 0) { berrno be; dev->dev_errno = errno; Mmsg2(dev->errmsg, _("ioctl MTIOCGET error on %s. ERR=%s.\n"), - dev->print_name(), be.strerror()); + dev->print_name(), be.bstrerror()); return 0; } Pmsg0(-20, _(" Device status:")); @@ -1182,7 +1018,7 @@ bool load_dev(DEVICE *dev) berrno be; dev->dev_errno = ENOTTY; /* function not available */ Mmsg2(dev->errmsg, _("ioctl MTLOAD error on %s. ERR=%s.\n"), - dev->print_name(), be.strerror()); + dev->print_name(), be.bstrerror()); return false; #else @@ -1191,11 +1027,11 @@ bool load_dev(DEVICE *dev) dev->file_addr = 0; mt_com.mt_op = MTLOAD; mt_com.mt_count = 1; - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { berrno be; dev->dev_errno = errno; Mmsg2(dev->errmsg, _("ioctl MTLOAD error on %s. ERR=%s.\n"), - dev->print_name(), be.strerror()); + dev->print_name(), be.bstrerror()); return false; } return true; @@ -1222,11 +1058,11 @@ bool DEVICE::offline() unlock_door(); mt_com.mt_op = MTOFFL; mt_com.mt_count = 1; - if (tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { + if (d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com) < 0) { berrno be; dev_errno = errno; Mmsg2(errmsg, _("ioctl MTOFFL error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } Dmsg1(100, "Offlined device %s\n", print_name()); @@ -1260,7 +1096,7 @@ bool DEVICE::offline_or_rewind() */ bool DEVICE::fsf(int num) { - int32_t os_file; + int32_t os_file = 0; struct mtop mt_com; int stat = 0; @@ -1294,19 +1130,26 @@ bool DEVICE::fsf(int num) * forward space past the end of the medium. */ if (has_cap(CAP_FSF) && has_cap(CAP_MTIOCGET) && has_cap(CAP_FASTFSF)) { + int my_errno = 0; mt_com.mt_op = MTFSF; mt_com.mt_count = num; - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); - if (stat < 0 || (os_file=get_os_tape_file()) < 0) { + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + if (stat < 0) { + my_errno = errno; /* save errno */ + } else if ((os_file=get_os_tape_file()) < 0) { + my_errno = errno; /* save errno */ + } + if (my_errno != 0) { berrno be; set_eot(); Dmsg0(200, "Set ST_EOT\n"); clrerror(MTFSF); Mmsg2(errmsg, _("ioctl MTFSF error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror(my_errno)); Dmsg1(200, "%s", errmsg); return false; } + Dmsg1(200, "fsf file=%d\n", os_file); set_ateof(); file = os_file; @@ -1347,9 +1190,9 @@ bool DEVICE::fsf(int num) set_eot(); clrerror(-1); Dmsg2(100, "Set ST_EOT read errno=%d. ERR=%s\n", dev_errno, - be.strerror()); + be.bstrerror()); Mmsg2(errmsg, _("read error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); Dmsg1(100, "%s", errmsg); break; } @@ -1371,14 +1214,14 @@ bool DEVICE::fsf(int num) } Dmsg0(100, "Doing MTFSF\n"); - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat < 0) { /* error => EOT */ berrno be; set_eot(); Dmsg0(100, "Set ST_EOT\n"); clrerror(MTFSF); Mmsg2(errmsg, _("ioctl MTFSF error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); Dmsg0(100, "Got < 0 for MTFSF\n"); Dmsg1(100, "%s", errmsg); } else { @@ -1437,7 +1280,7 @@ bool DEVICE::bsf(int num) return false; } - Dmsg0(29, "bsf\n"); + Dmsg0(100, "bsf\n"); clear_eot(); clear_eof(); file -= num; @@ -1445,12 +1288,12 @@ bool DEVICE::bsf(int num) file_size = 0; mt_com.mt_op = MTBSF; mt_com.mt_count = num; - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat < 0) { berrno be; clrerror(MTBSF); Mmsg2(errmsg, _("ioctl MTBSF error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); } return stat == 0; } @@ -1482,10 +1325,10 @@ bool DEVICE::fsr(int num) return false; } - Dmsg1(29, "fsr %d\n", num); + Dmsg1(100, "fsr %d\n", num); mt_com.mt_op = MTFSR; mt_com.mt_count = num; - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat == 0) { clear_eof(); block_num += num; @@ -1493,7 +1336,7 @@ bool DEVICE::fsr(int num) berrno be; struct mtget mt_stat; clrerror(MTFSR); - Dmsg1(100, "FSF fail: ERR=%s\n", be.strerror()); + Dmsg1(100, "FSF fail: ERR=%s\n", be.bstrerror()); if (dev_get_os_pos(this, &mt_stat)) { Dmsg4(100, "Adjust from %d:%d to %d:%d\n", file, block_num, mt_stat.mt_fileno, mt_stat.mt_blkno); @@ -1507,7 +1350,7 @@ bool DEVICE::fsr(int num) } } Mmsg3(errmsg, _("ioctl MTFSR %d error on %s. ERR=%s.\n"), - num, print_name(), be.strerror()); + num, print_name(), be.bstrerror()); } return stat == 0; } @@ -1538,18 +1381,18 @@ bool DEVICE::bsr(int num) return false; } - Dmsg0(29, "bsr_dev\n"); + Dmsg0(100, "bsr_dev\n"); block_num -= num; clear_eof(); clear_eot(); mt_com.mt_op = MTBSR; mt_com.mt_count = num; - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat < 0) { berrno be; clrerror(MTBSR); Mmsg2(errmsg, _("ioctl MTBSR error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); } return stat == 0; } @@ -1560,7 +1403,7 @@ void DEVICE::lock_door() struct mtop mt_com; mt_com.mt_op = MTLOCK; mt_com.mt_count = 1; - tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); #endif } @@ -1570,9 +1413,22 @@ void DEVICE::unlock_door() struct mtop mt_com; mt_com.mt_op = MTUNLOCK; mt_com.mt_count = 1; - tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); #endif } + +void DEVICE::set_slot(int32_t slot) +{ + m_slot = slot; + if (vol) vol->clear_slot(); +} + +void DEVICE::clear_slot() +{ + m_slot = -1; + if (vol) vol->set_slot(-1); +} + /* @@ -1596,7 +1452,7 @@ bool DEVICE::reposition(DCR *dcr, uint32_t rfile, uint32_t rblock) berrno be; dev_errno = errno; Mmsg2(errmsg, _("lseek error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } file = rfile; @@ -1639,7 +1495,7 @@ bool DEVICE::reposition(DCR *dcr, uint32_t rfile, uint32_t rblock) berrno be; dev_errno = errno; Dmsg2(30, "Failed to find requested block on %s: ERR=%s", - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } Dmsg2(300, "moving forward wanted_blk=%d at_blk=%d\n", rblock, block_num); @@ -1659,7 +1515,7 @@ bool DEVICE::weof(int num) { struct mtop mt_com; int stat; - Dmsg0(129, "weof_dev\n"); + Dmsg1(129, "=== weof_dev=%s\n", print_name()); if (!is_open()) { dev_errno = EBADF; @@ -1682,7 +1538,7 @@ bool DEVICE::weof(int num) clear_eot(); mt_com.mt_op = MTWEOF; mt_com.mt_count = num; - stat = tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + stat = d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); if (stat == 0) { block_num = 0; file += num; @@ -1692,7 +1548,7 @@ bool DEVICE::weof(int num) clrerror(MTWEOF); if (stat == -1) { Mmsg2(errmsg, _("ioctl MTWEOF error on %s. ERR=%s.\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); } } return stat == 0; @@ -1813,7 +1669,7 @@ void DEVICE::clrerror(int func) /* Found on Solaris */ #ifdef MTIOCLRERR { - tape_ioctl(m_fd, MTIOCLRERR); + d_ioctl(m_fd, MTIOCLRERR); Dmsg0(200, "Did MTIOCLRERR\n"); } #endif @@ -1825,36 +1681,45 @@ void DEVICE::clrerror(int func) /* Read and clear SCSI error status */ union mterrstat mt_errstat; Dmsg2(200, "Doing MTIOCERRSTAT errno=%d ERR=%s\n", dev_errno, - be.strerror(dev_errno)); - tape_ioctl(m_fd, MTIOCERRSTAT, (char *)&mt_errstat); + be.bstrerror(dev_errno)); + d_ioctl(m_fd, MTIOCERRSTAT, (char *)&mt_errstat); } #endif -/* Clear Subsystem Exception OSF1 */ +/* Clear Subsystem Exception TRU64 */ #ifdef MTCSE { struct mtop mt_com; mt_com.mt_op = MTCSE; mt_com.mt_count = 1; /* Clear any error condition on the tape */ - tape_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); + d_ioctl(m_fd, MTIOCTOP, (char *)&mt_com); Dmsg0(200, "Did MTCSE\n"); } #endif } +/* + * Set to unload the current volume in the drive + */ +void DEVICE::set_unload() +{ + if (!m_unload && VolHdr.VolumeName[0] != 0) { + m_unload = true; + memcpy(UnloadVolName, VolHdr.VolumeName, sizeof(UnloadVolName)); + } +} + + /* * Clear volume header */ void DEVICE::clear_volhdr() { - /* If we have an unused volume associated with this drive, free it */ - if (vol && !is_busy()) { - free_volume(this); - } Dmsg1(100, "Clear volhdr vol=%s\n", VolHdr.VolumeName); memset(&VolHdr, 0, sizeof(VolHdr)); + setVolCatInfo(false); } @@ -1864,9 +1729,7 @@ void DEVICE::clear_volhdr() void DEVICE::close() { Dmsg1(100, "close_dev %s\n", print_name()); - if (has_cap(CAP_OFFLINEUNMOUNT)) { - offline(); - } + offline_or_rewind(); if (!is_open()) { Dmsg2(100, "device %s already closed vol=%s\n", print_name(), @@ -1875,24 +1738,31 @@ void DEVICE::close() } switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: case B_TAPE_DEV: unlock_door(); - tape_close(m_fd); - break; default: - ::close(m_fd); + d_close(m_fd); + break; } + unmount(1); /* do unmount if required */ + /* Clean up device packet so it can be reused */ clear_opened(); - state &= ~(ST_LABEL|ST_READ|ST_APPEND|ST_EOT|ST_WEOT|ST_EOF); + /* + * Be careful not to clear items needed by the DVD driver + * when it is closing a single part. + */ + state &= ~(ST_LABEL|ST_READ|ST_APPEND|ST_EOT|ST_WEOT|ST_EOF| + ST_MOUNTED|ST_MEDIA|ST_SHORT); label_type = B_BACULA_LABEL; file = block_num = 0; file_size = 0; file_addr = 0; EndFile = EndBlock = 0; openmode = 0; - Slot = -1; /* unknown slot */ clear_volhdr(); memset(&VolCatInfo, 0, sizeof(VolCatInfo)); if (tid) { @@ -1910,7 +1780,7 @@ void DEVICE::close() * the Volume parts multiple times without losing track of what the * main Volume parameters are. */ -void DEVICE::close_part(DCR *dcr) +void DEVICE::close_part(DCR * /*dcr*/) { VOLUME_LABEL saveVolHdr; VOLUME_CAT_INFO saveVolCatInfo; /* Volume Catalog Information */ @@ -1921,19 +1791,16 @@ void DEVICE::close_part(DCR *dcr) close(); /* close current part */ VolHdr = saveVolHdr; /* structure assignment */ VolCatInfo = saveVolCatInfo; /* structure assignment */ - dcr->VolCatInfo = saveVolCatInfo; /* structure assignment */ } boffset_t DEVICE::lseek(DCR *dcr, boffset_t offset, int whence) { switch (dev_type) { - case B_DVD_DEV: - return lseek_dvd(dcr, offset, whence); case B_FILE_DEV: #if defined(HAVE_WIN32) return ::_lseeki64(m_fd, (__int64)offset, whence); #else - return ::lseek(m_fd, (off_t)offset, whence); + return ::lseek(m_fd, offset, whence); #endif } return -1; @@ -1942,97 +1809,235 @@ boffset_t DEVICE::lseek(DCR *dcr, boffset_t offset, int whence) bool DEVICE::truncate(DCR *dcr) /* We need the DCR for DVD-writing */ { + struct stat st; + Dmsg1(100, "truncate %s\n", print_name()); switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: case B_TAPE_DEV: /* maybe we should rewind and write and eof ???? */ return true; /* we don't really truncate tapes */ - case B_DVD_DEV: - return truncate_dvd(dcr); case B_FILE_DEV: - /* ***FIXME*** we really need to unlink() the file so that - * its name can be changed for a relabel. - */ if (ftruncate(m_fd, 0) != 0) { berrno be; Mmsg2(errmsg, _("Unable to truncate device %s. ERR=%s\n"), - print_name(), be.strerror()); + print_name(), be.bstrerror()); return false; } + + /* + * Check for a successful ftruncate() and issue a work-around for devices + * (mostly cheap NAS) that don't support truncation. + * Workaround supplied by Martin Schmid as a solution to bug #1011. + * 1. close file + * 2. delete file + * 3. open new file with same mode + * 4. change ownership to original + */ + + if (fstat(m_fd, &st) != 0) { + berrno be; + Mmsg2(errmsg, _("Unable to stat device %s. ERR=%s\n"), + print_name(), be.bstrerror()); + return false; + } + + if (st.st_size != 0) { /* ftruncate() didn't work */ + POOL_MEM archive_name(PM_FNAME); + + pm_strcpy(archive_name, dev_name); + if (!IsPathSeparator(archive_name.c_str()[strlen(archive_name.c_str())-1])) { + pm_strcat(archive_name, "/"); + } + pm_strcat(archive_name, dcr->VolumeName); + + Mmsg2(errmsg, _("Device %s doesn't support ftruncate(). Recreating file %s.\n"), + print_name(), archive_name.c_str()); + + /* Close file and blow it away */ + ::close(m_fd); + ::unlink(archive_name.c_str()); + + /* Recreate the file -- of course, empty */ + set_mode(CREATE_READ_WRITE); + if ((m_fd = ::open(archive_name.c_str(), mode, st.st_mode)) < 0) { + berrno be; + dev_errno = errno; + Mmsg2(errmsg, _("Could not reopen: %s, ERR=%s\n"), archive_name.c_str(), + be.bstrerror()); + Dmsg1(100, "reopen failed: %s", errmsg); + Emsg0(M_FATAL, 0, errmsg); + return false; + } + + /* Reset proper owner */ + chown(archive_name.c_str(), st.st_uid, st.st_gid); + } + return true; } return false; } -/* Mount the device. +/* + * Mount the device. * If timeout, wait until the mount command returns 0. * If !timeout, try to mount the device only once. */ bool DEVICE::mount(int timeout) { Dmsg0(190, "Enter mount\n"); + if (is_mounted()) { return true; - } else if (requires_mount()) { - return do_mount(1, timeout); - } + } + + switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: + case B_TAPE_DEV: + if (device->mount_command) { + return do_tape_mount(1, timeout); + } + break; + case B_FILE_DEV: + if (requires_mount() && device->mount_command) { + return do_file_mount(1, timeout); + } + break; + default: + break; + } + return true; } -/* Unmount the device +/* + * Unmount the device * If timeout, wait until the unmount command returns 0. * If !timeout, try to unmount the device only once. */ bool DEVICE::unmount(int timeout) { - Dmsg0(90, "Enter unmount\n"); - if (is_mounted()) { - return do_mount(0, timeout); + Dmsg0(100, "Enter unmount\n"); + + if (!is_mounted()) { + return true; } + + switch (dev_type) { + case B_VTL_DEV: + case B_VTAPE_DEV: + case B_TAPE_DEV: + if (device->unmount_command) { + return do_tape_mount(0, timeout); + } + break; + case B_FILE_DEV: + case B_DVD_DEV: + if (requires_mount() && device->unmount_command) { + return do_file_mount(0, timeout); + } + break; + default: + break; + } + return true; } -/* (Un)mount the device */ -bool DEVICE::do_mount(int mount, int dotimeout) +/* + * (Un)mount the device (for tape devices) + */ +bool DEVICE::do_tape_mount(int mount, int dotimeout) { POOL_MEM ocmd(PM_FNAME); POOLMEM *results; char *icmd; - int status, timeout; - - sm_check(__FILE__, __LINE__, false); + int status, tries; + berrno be; + + Dsm_check(200); if (mount) { - if (is_mounted()) { - Dmsg0(200, "======= mount=1\n"); - return true; - } icmd = device->mount_command; } else { - if (!is_mounted()) { - Dmsg0(200, "======= mount=0\n"); - return true; + icmd = device->unmount_command; + } + + edit_mount_codes(ocmd, icmd); + + Dmsg2(100, "do_tape_mount: cmd=%s mounted=%d\n", ocmd.c_str(), !!is_mounted()); + + if (dotimeout) { + /* Try at most 10 times to (un)mount the device. This should perhaps be configurable. */ + tries = 10; + } else { + tries = 1; + } + results = get_memory(4000); + + /* If busy retry each second */ + Dmsg1(100, "do_tape_mount run_prog=%s\n", ocmd.c_str()); + while ((status = run_program_full_output(ocmd.c_str(), max_open_wait/2, results)) != 0) { + if (tries-- > 0) { + continue; } + + Dmsg5(100, "Device %s cannot be %smounted. stat=%d result=%s ERR=%s\n", print_name(), + (mount ? "" : "un"), status, results, be.bstrerror(status)); + Mmsg(errmsg, _("Device %s cannot be %smounted. ERR=%s\n"), + print_name(), (mount ? "" : "un"), be.bstrerror(status)); + + set_mounted(false); + free_pool_memory(results); + Dmsg0(200, "============ mount=0\n"); + Dsm_check(200); + return false; + } + + set_mounted(mount); /* set/clear mounted flag */ + free_pool_memory(results); + Dmsg1(200, "============ mount=%d\n", mount); + return true; +} + +/* + * (Un)mount the device (either a FILE or DVD device) + */ +bool DEVICE::do_file_mount(int mount, int dotimeout) +{ + POOL_MEM ocmd(PM_FNAME); + POOLMEM *results; + DIR* dp; + char *icmd; + struct dirent *entry, *result; + int status, tries, name_max, count; + berrno be; + + Dsm_check(200); + if (mount) { + icmd = device->mount_command; + } else { icmd = device->unmount_command; } clear_freespace_ok(); edit_mount_codes(ocmd, icmd); - Dmsg2(100, "do_mount: cmd=%s mounted=%d\n", ocmd.c_str(), !!is_mounted()); + Dmsg2(100, "do_file_mount: cmd=%s mounted=%d\n", ocmd.c_str(), !!is_mounted()); if (dotimeout) { - /* Try at most 1 time to (un)mount the device. This should perhaps be configurable. */ - timeout = 1; + /* Try at most 10 times to (un)mount the device. This should perhaps be configurable. */ + tries = 10; } else { - timeout = 0; + tries = 1; } results = get_memory(4000); - results[0] = 0; /* If busy retry each second */ - Dmsg1(20, "do_mount run_prog=%s\n", ocmd.c_str()); - while ((status = run_program_full_output(ocmd.c_str(), - max_open_wait/2, results)) != 0) { + Dmsg1(100, "do_file_mount run_prog=%s\n", ocmd.c_str()); + while ((status = run_program_full_output(ocmd.c_str(), max_open_wait/2, results)) != 0) { /* Doesn't work with internationalization (This is not a problem) */ if (mount && fnmatch("*is already mounted on*", results, 0) == 0) { break; @@ -2040,37 +2045,24 @@ bool DEVICE::do_mount(int mount, int dotimeout) if (!mount && fnmatch("* not mounted*", results, 0) == 0) { break; } - if (timeout-- > 0) { + if (tries-- > 0) { /* Sometimes the device cannot be mounted because it is already mounted. * Try to unmount it, then remount it */ if (mount) { Dmsg1(400, "Trying to unmount the device %s...\n", print_name()); - do_mount(0, 0); + do_file_mount(0, 0); } bmicrosleep(1, 0); continue; } - if (status != 0) { - berrno be; - Dmsg5(40, "Device %s cannot be %smounted. stat=%d result=%s ERR=%s\n", print_name(), - (mount ? "" : "un"), status, results, be.strerror(status)); - Mmsg(errmsg, _("Device %s cannot be %smounted. ERR=%s\n"), - print_name(), (mount ? "" : "un"), be.strerror(status)); - } else { - Dmsg4(40, "Device %s cannot be %smounted. stat=%d ERR=%s\n", print_name(), - (mount ? "" : "un"), status, results); - Mmsg(errmsg, _("Device %s cannot be %smounted. ERR=%s\n"), - print_name(), (mount ? "" : "un"), results); - } + Dmsg5(100, "Device %s cannot be %smounted. stat=%d result=%s ERR=%s\n", print_name(), + (mount ? "" : "un"), status, results, be.bstrerror(status)); + Mmsg(errmsg, _("Device %s cannot be %smounted. ERR=%s\n"), + print_name(), (mount ? "" : "un"), be.bstrerror(status)); + /* - * Now, just to be sure it is not mounted, try to read the - * filesystem. + * Now, just to be sure it is not mounted, try to read the filesystem. */ - DIR* dp; - struct dirent *entry, *result; - int name_max; - int count; - name_max = pathconf(".", _PC_NAME_MAX); if (name_max < 1024) { name_max = 1024; @@ -2079,8 +2071,8 @@ bool DEVICE::do_mount(int mount, int dotimeout) if (!(dp = opendir(device->mount_point))) { berrno be; dev_errno = errno; - Dmsg3(29, "do_mount: failed to open dir %s (dev=%s), ERR=%s\n", - device->mount_point, print_name(), be.strerror()); + Dmsg3(100, "do_file_mount: failed to open dir %s (dev=%s), ERR=%s\n", + device->mount_point, print_name(), be.bstrerror()); goto get_out; } @@ -2089,7 +2081,7 @@ bool DEVICE::do_mount(int mount, int dotimeout) while (1) { if ((readdir_r(dp, entry, &result) != 0) || (result == NULL)) { dev_errno = EIO; - Dmsg2(129, "do_mount: failed to find suitable file in dir %s (dev=%s)\n", + Dmsg2(129, "do_file_mount: failed to find suitable file in dir %s (dev=%s)\n", device->mount_point, print_name()); break; } @@ -2097,13 +2089,13 @@ bool DEVICE::do_mount(int mount, int dotimeout) count++; /* result->d_name != ., .. or .keep (Gentoo-specific) */ break; } else { - Dmsg2(129, "do_mount: ignoring %s in %s\n", result->d_name, device->mount_point); + Dmsg2(129, "do_file_mount: ignoring %s in %s\n", result->d_name, device->mount_point); } } free(entry); closedir(dp); - Dmsg1(29, "do_mount: got %d files in the mount point (not counting ., .. and .keep)\n", count); + Dmsg1(100, "do_file_mount: got %d files in the mount point (not counting ., .. and .keep)\n", count); if (count > 0) { /* If we got more than ., .. and .keep */ @@ -2121,9 +2113,9 @@ bool DEVICE::do_mount(int mount, int dotimeout) } get_out: set_mounted(false); - sm_check(__FILE__, __LINE__, false); free_pool_memory(results); Dmsg0(200, "============ mount=0\n"); + Dsm_check(200); return false; } @@ -2209,12 +2201,15 @@ void DEVICE::edit_mount_codes(POOL_MEM &omsg, const char *imsg) } } -/* return the last timer interval (ms) */ +/* return the last timer interval (ms) + * or 0 if something goes wrong + */ btime_t DEVICE::get_timer_count() { - btime_t old = last_timer; + btime_t temp = last_timer; last_timer = get_current_btime(); - return last_timer - old; + temp = last_timer - temp; /* get elapsed time */ + return (temp>0)?temp:0; /* take care of skewed clock */ } /* read from fd */ @@ -2224,11 +2219,7 @@ ssize_t DEVICE::read(void *buf, size_t len) get_timer_count(); - if (this->is_tape()) { - read_len = tape_read(m_fd, buf, len); - } else { - read_len = ::read(m_fd, buf, len); - } + read_len = d_read(m_fd, buf, len); last_tick = get_timer_count(); @@ -2249,11 +2240,7 @@ ssize_t DEVICE::write(const void *buf, size_t len) get_timer_count(); - if (this->is_tape()) { - write_len = tape_write(m_fd, buf, len); - } else { - write_len = ::write(m_fd, buf, len); - } + write_len = d_write(m_fd, buf, len); last_tick = get_timer_count(); @@ -2279,7 +2266,7 @@ int32_t DEVICE::get_os_tape_file() struct mtget mt_stat; if (has_cap(CAP_MTIOCGET) && - tape_ioctl(m_fd, MTIOCGET, (char *)&mt_stat) == 0) { + d_ioctl(m_fd, MTIOCGET, (char *)&mt_stat) == 0) { return mt_stat.mt_fileno; } return -1; @@ -2288,7 +2275,7 @@ int32_t DEVICE::get_os_tape_file() char * dev_vol_name(DEVICE *dev) { - return dev->VolCatInfo.VolCatName; + return dev->getVolCatName(); } @@ -2323,7 +2310,7 @@ void DEVICE::term(void) if (device) { device->dev = NULL; } - free((char *)this); + delete this; } /* @@ -2342,7 +2329,6 @@ void init_device_wait_timers(DCR *dcr) dev->rem_wait_sec = dev->wait_sec; dev->num_wait = 0; dev->poll = false; - dev->BadVolName[0] = 0; jcr->min_wait = 60 * 60; jcr->max_wait = 24 * 60 * 60; @@ -2397,20 +2383,20 @@ void set_os_device_parameters(DCR *dcr) #if defined(HAVE_LINUX_OS) || defined(HAVE_WIN32) struct mtop mt_com; - Dmsg0(050, "In set_os_device_parameters\n"); + Dmsg0(100, "In set_os_device_parameters\n"); #if defined(MTSETBLK) if (dev->min_block_size == dev->max_block_size && dev->min_block_size == 0) { /* variable block mode */ mt_com.mt_op = MTSETBLK; mt_com.mt_count = 0; - Dmsg0(050, "Set block size to zero\n"); - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + Dmsg0(100, "Set block size to zero\n"); + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTSETBLK); } } #endif #if defined(MTSETDRVBUFFER) - if (getpid() == 0) { /* Only root can do this */ + if (getuid() == 0) { /* Only root can do this */ mt_com.mt_op = MTSETDRVBUFFER; mt_com.mt_count = MT_ST_CLEARBOOLEANS; if (!dev->has_cap(CAP_TWOEOF)) { @@ -2419,8 +2405,8 @@ void set_os_device_parameters(DCR *dcr) if (dev->has_cap(CAP_EOM)) { mt_com.mt_count |= MT_ST_FAST_MTEOM; } - Dmsg0(050, "MTSETDRVBUFFER\n"); - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + Dmsg0(100, "MTSETDRVBUFFER\n"); + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTSETDRVBUFFER); } } @@ -2434,13 +2420,13 @@ void set_os_device_parameters(DCR *dcr) dev->min_block_size == 0) { /* variable block mode */ mt_com.mt_op = MTSETBSIZ; mt_com.mt_count = 0; - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTSETBSIZ); } /* Get notified at logical end of tape */ mt_com.mt_op = MTEWARN; mt_com.mt_count = 1; - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTEWARN); } } @@ -2453,7 +2439,7 @@ void set_os_device_parameters(DCR *dcr) dev->min_block_size == 0) { /* variable block mode */ mt_com.mt_op = MTSETBSIZ; mt_com.mt_count = 0; - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTSETBSIZ); } } @@ -2464,11 +2450,11 @@ void set_os_device_parameters(DCR *dcr) } else { neof = 1; } - if (ioctl(dev->fd(), MTIOCSETEOTMODEL, (caddr_t)&neof) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCSETEOTMODEL, (caddr_t)&neof) < 0) { berrno be; dev->dev_errno = errno; /* save errno */ Mmsg2(dev->errmsg, _("Unable to set eotmodel on device %s: ERR=%s\n"), - dev->print_name(), be.strerror(dev->dev_errno)); + dev->print_name(), be.bstrerror(dev->dev_errno)); Jmsg(dcr->jcr, M_FATAL, 0, dev->errmsg); } #endif @@ -2481,7 +2467,7 @@ void set_os_device_parameters(DCR *dcr) dev->min_block_size == 0) { /* variable block mode */ mt_com.mt_op = MTSRSZ; mt_com.mt_count = 0; - if (tape_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { + if (dev->d_ioctl(dev->fd(), MTIOCTOP, (char *)&mt_com) < 0) { dev->clrerror(MTSRSZ); } } @@ -2491,13 +2477,13 @@ void set_os_device_parameters(DCR *dcr) static bool dev_get_os_pos(DEVICE *dev, struct mtget *mt_stat) { - Dmsg0(050, "dev_get_os_pos\n"); + Dmsg0(100, "dev_get_os_pos\n"); return dev->has_cap(CAP_MTIOCGET) && - tape_ioctl(dev->fd(), MTIOCGET, (char *)mt_stat) == 0 && + dev->d_ioctl(dev->fd(), MTIOCGET, (char *)mt_stat) == 0 && mt_stat->mt_fileno >= 0; } -static char *modes[] = { +static const char *modes[] = { "CREATE_READ_WRITE", "OPEN_READ_WRITE", "OPEN_READ_ONLY", @@ -2505,7 +2491,7 @@ static char *modes[] = { }; -static char *mode_to_str(int mode) +static const char *mode_to_str(int mode) { static char buf[100]; if (mode < 1 || mode > 4) {